[SCM] Lisaac compiler branch, master, updated. 051e4c30c9f1cf5e7ddc47dd33a869ae798ea332

Benoit Sonntag sonntag at icps.u-strasbg.fr
Wed Jul 29 21:58:38 UTC 2009


The following commit has been merged in the master branch:
commit 051e4c30c9f1cf5e7ddc47dd33a869ae798ea332
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Wed Jul 29 23:58:33 2009 +0200

    Shorter inherit slot ok

diff --git a/bin/shorter.c b/bin/shorter.c
index fa97529..6d22249 100644
--- a/bin/shorter.c
+++ b/bin/shorter.c
@@ -79,9 +79,9 @@ typedef char __CHARACTER;
 typedef struct STRING_struct __STRING;
 struct STRING_struct {
   unsigned long __id;
-  __INTEGER count__KFC;
-  __INTEGER capacity__MBS;
-  __CHARACTER *storage__VBS;
+  __INTEGER count__WFC;
+  __INTEGER capacity__YBS;
+  __CHARACTER *storage__BCS;
 };
 __STRING STRING_={__STRING__};
 #define STRING__ (&STRING_)
@@ -96,9 +96,9 @@ typedef unsigned long __UINTEGER_32;
 #define __ARRAYED_COLLECTIONoSTRINGo__ 0
 typedef struct ARRAYED_COLLECTIONoSTRINGo_struct __ARRAYED_COLLECTIONoSTRINGo;
 struct ARRAYED_COLLECTIONoSTRINGo_struct {
-  __INTEGER upper__0JC;
-  __INTEGER capacity__AGT;
-  void **storage__LGT;
+  __INTEGER upper__GKC;
+  __INTEGER capacity__MGT;
+  void **storage__XGT;
 };
 __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define ARRAYED_COLLECTIONoSTRINGo__ (&ARRAYED_COLLECTIONoSTRINGo_)
@@ -107,7 +107,7 @@ __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define __FAST_ARRAYoSTRINGo__ 1
 typedef struct FAST_ARRAYoSTRINGo_struct __FAST_ARRAYoSTRINGo;
 struct FAST_ARRAYoSTRINGo_struct {
-  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__XJC;
+  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__DKC;
 };
 __FAST_ARRAYoSTRINGo FAST_ARRAYoSTRINGo_;
 #define FAST_ARRAYoSTRINGo__ (&FAST_ARRAYoSTRINGo_)
@@ -125,9 +125,9 @@ __ITM_TYPE_MONO ITM_TYPE_MONO_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_MONOo__ 3
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct __ARRAYED_COLLECTIONoITM_TYPE_MONOo;
 struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct {
-  __INTEGER upper__4HV;
-  __INTEGER capacity__TNV;
-  void **storage__FMV;
+  __INTEGER upper__KIV;
+  __INTEGER capacity__5NV;
+  void **storage__RMV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_TYPE_MONOo_)
@@ -136,7 +136,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define __FAST_ARRAYoITM_TYPE_MONOo__ 4
 typedef struct FAST_ARRAYoITM_TYPE_MONOo_struct __FAST_ARRAYoITM_TYPE_MONOo;
 struct FAST_ARRAYoITM_TYPE_MONOo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__NXC;
+  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__ZXC;
 };
 __FAST_ARRAYoITM_TYPE_MONOo FAST_ARRAYoITM_TYPE_MONOo_;
 #define FAST_ARRAYoITM_TYPE_MONOo__ (&FAST_ARRAYoITM_TYPE_MONOo_)
@@ -145,9 +145,9 @@ __FAST_ARRAYoITM_TYPE_MONOo FAST_ARRAYoITM_TYPE_MONOo_;
 #define __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__ 5
 typedef struct HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct {
-  void *key__M2T;
-  void *item__52T;
-  void *next__X2T;
+  void *key__Y2T;
+  void *item__L3T;
+  void *next__D3T;
 };
 __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo_)
@@ -156,9 +156,9 @@ __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARY_NODE
 #define __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ 6
 typedef struct HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__11T;
-  __INTEGER count__AFZ;
-  void **buckets__A2T;
+  __INTEGER capacity__H2T;
+  __INTEGER count__MFZ;
+  void **buckets__M2T;
 };
 __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_)
@@ -169,7 +169,7 @@ typedef struct STRING_CONSTANT_struct __STRING_CONSTANT;
 struct STRING_CONSTANT_struct {
   unsigned long __id;
   __INTEGER count__DD;
-  __CHARACTER *storage__JQO;
+  __CHARACTER *storage__VQO;
 };
 __STRING_CONSTANT STRING_CONSTANT_={__STRING_CONSTANT__};
 #define STRING_CONSTANT__ (&STRING_CONSTANT_)
@@ -178,9 +178,9 @@ __STRING_CONSTANT STRING_CONSTANT_={__STRING_CONSTANT__};
 #define __ARRAYED_COLLECTIONoSTRING_CONSTANTo__ 7
 typedef struct ARRAYED_COLLECTIONoSTRING_CONSTANTo_struct __ARRAYED_COLLECTIONoSTRING_CONSTANTo;
 struct ARRAYED_COLLECTIONoSTRING_CONSTANTo_struct {
-  __INTEGER upper__P5OD;
-  __INTEGER capacity__KBPD;
-  void **storage__FCPD;
+  __INTEGER upper__15OD;
+  __INTEGER capacity__WBPD;
+  void **storage__RCPD;
 };
 __ARRAYED_COLLECTIONoSTRING_CONSTANTo ARRAYED_COLLECTIONoSTRING_CONSTANTo_;
 #define ARRAYED_COLLECTIONoSTRING_CONSTANTo__ (&ARRAYED_COLLECTIONoSTRING_CONSTANTo_)
@@ -189,7 +189,7 @@ __ARRAYED_COLLECTIONoSTRING_CONSTANTo ARRAYED_COLLECTIONoSTRING_CONSTANTo_;
 #define __FAST_ARRAYoSTRING_CONSTANTo__ 8
 typedef struct FAST_ARRAYoSTRING_CONSTANTo_struct __FAST_ARRAYoSTRING_CONSTANTo;
 struct FAST_ARRAYoSTRING_CONSTANTo_struct {
-  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__14I;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__H5I;
 };
 __FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
 #define FAST_ARRAYoSTRING_CONSTANTo__ (&FAST_ARRAYoSTRING_CONSTANTo_)
@@ -198,10 +198,10 @@ __FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
 #define __MEMORY__ 9
 typedef struct MEMORY_struct __MEMORY;
 struct MEMORY_struct {
-  volatile __UINTEGER_32 map_previous_linear__1SB;
-  volatile __UINTEGER_32 map_size_and_id__2SB;
-  void *map_next_free__3SB;
-  void *map_previous_free__4SB;
+  volatile __UINTEGER_32 map_previous_linear__HTB;
+  volatile __UINTEGER_32 map_size_and_id__ITB;
+  void *map_next_free__JTB;
+  void *map_previous_free__KTB;
 } __attribute__ ((packed));
 __MEMORY MEMORY_;
 #define MEMORY__ (&MEMORY_)
@@ -210,8 +210,8 @@ __MEMORY MEMORY_;
 #define __HASHED_SET_NODEoABSTRACT_STRINGo__ 10
 typedef struct HASHED_SET_NODEoABSTRACT_STRINGo_struct __HASHED_SET_NODEoABSTRACT_STRINGo;
 struct HASHED_SET_NODEoABSTRACT_STRINGo_struct {
-  void *item__4YR;
-  void *next__KZR;
+  void *item__KZR;
+  void *next__WZR;
 };
 __HASHED_SET_NODEoABSTRACT_STRINGo HASHED_SET_NODEoABSTRACT_STRINGo_;
 #define HASHED_SET_NODEoABSTRACT_STRINGo__ (&HASHED_SET_NODEoABSTRACT_STRINGo_)
@@ -220,9 +220,9 @@ __HASHED_SET_NODEoABSTRACT_STRINGo HASHED_SET_NODEoABSTRACT_STRINGo_;
 #define __HASHED_SEToABSTRACT_STRINGo__ 11
 typedef struct HASHED_SEToABSTRACT_STRINGo_struct __HASHED_SEToABSTRACT_STRINGo;
 struct HASHED_SEToABSTRACT_STRINGo_struct {
-  __INTEGER capacity__NYR;
-  __INTEGER count__TZR;
-  void **buckets__SYR;
+  __INTEGER capacity__ZYR;
+  __INTEGER count__5ZR;
+  void **buckets__4YR;
 };
 __HASHED_SEToABSTRACT_STRINGo HASHED_SEToABSTRACT_STRINGo_;
 #define HASHED_SEToABSTRACT_STRINGo__ (&HASHED_SEToABSTRACT_STRINGo_)
@@ -234,7 +234,7 @@ typedef unsigned long __POSITION;
 #define __ITM_OBJECT__ 12
 typedef struct ITM_OBJECT_struct __ITM_OBJECT;
 struct ITM_OBJECT_struct {
-  __POSITION position__BDJ;
+  __POSITION position__NDJ;
 };
 __ITM_OBJECT ITM_OBJECT_;
 #define ITM_OBJECT__ (&ITM_OBJECT_)
@@ -245,7 +245,7 @@ typedef struct NAMED_struct __NAMED;
 struct NAMED_struct {
   __ITM_OBJECT parent_itm_object__4;
   void *name__LI;
-  __CHARACTER style__VDU;
+  __CHARACTER style__BEU;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
@@ -255,17 +255,17 @@ __NAMED NAMED_;
 typedef struct PROTOTYPE_struct __PROTOTYPE;
 struct PROTOTYPE_struct {
   __NAMED parent_named__5;
-  void *source__BBC;
-  void *last_slot__C1C;
-  void *type_style__L2C;
-  void *shortname__ZHE;
-  void *default_value__HUE;
-  void *type_c__CWE;
-  __INTEGER index__JMG;
-  void *filename__IPG;
-  void *first_slot__WFZB;
-  void *idf_generic_list__IME;
-  void *slot_list__QUS;
+  void *source__NBC;
+  void *last_slot__O1C;
+  void *type_style__X2C;
+  void *shortname__FIE;
+  void *default_value__TUE;
+  void *type_c__OWE;
+  __INTEGER index__VMG;
+  void *filename__UPG;
+  void *first_slot__CGZB;
+  void *idf_generic_list__UME;
+  void *slot_list__2US;
 };
 __PROTOTYPE PROTOTYPE_;
 #define PROTOTYPE__ (&PROTOTYPE_)
@@ -277,8 +277,8 @@ typedef char __BOOLEAN;
 #define __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ 15
 typedef struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct {
-  void *key__N2R;
-  void *next__Y2R;
+  void *key__Z2R;
+  void *next__E3R;
 };
 __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)
@@ -287,9 +287,9 @@ __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRIN
 #define __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ 16
 typedef struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__21R;
-  __INTEGER count__B3R;
-  void **buckets__B2R;
+  __INTEGER capacity__I2R;
+  __INTEGER count__N3R;
+  void **buckets__N2R;
 };
 __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)
@@ -301,7 +301,7 @@ typedef unsigned char __UINTEGER_8;
 #define __TYPE_FULL__ 17
 typedef struct TYPE_FULL_struct __TYPE_FULL;
 struct TYPE_FULL_struct {
-  __UINTEGER_8 flag__MFS;
+  __UINTEGER_8 flag__YFS;
 };
 __TYPE_FULL TYPE_FULL_;
 #define TYPE_FULL__ (&TYPE_FULL_)
@@ -319,9 +319,9 @@ __TYPE_ID TYPE_ID_={__TYPE_ID__};
 #define __ARRAYED_COLLECTIONoTYPE_IDo__ 18
 typedef struct ARRAYED_COLLECTIONoTYPE_IDo_struct __ARRAYED_COLLECTIONoTYPE_IDo;
 struct ARRAYED_COLLECTIONoTYPE_IDo_struct {
-  __INTEGER upper__G4R;
-  __INTEGER capacity__I4R;
-  void **storage__E5R;
+  __INTEGER upper__S4R;
+  __INTEGER capacity__U4R;
+  void **storage__Q5R;
 };
 __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)
@@ -330,7 +330,7 @@ __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define __FAST_ARRAYoTYPE_IDo__ 19
 typedef struct FAST_ARRAYoTYPE_IDo_struct __FAST_ARRAYoTYPE_IDo;
 struct FAST_ARRAYoTYPE_IDo_struct {
-  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__LAB;
+  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__UAB;
 };
 __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 #define FAST_ARRAYoTYPE_IDo__ (&FAST_ARRAYoTYPE_IDo_)
@@ -340,7 +340,7 @@ __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 typedef struct ENTRY_struct __ENTRY;
 struct ENTRY_struct {
   void *path__BD;
-  void *name__JNT;
+  void *name__VNT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
@@ -349,7 +349,7 @@ __ENTRY ENTRY_;
 #define __ENTRY_UNIX__ 21
 typedef struct ENTRY_UNIX_struct __ENTRY_UNIX;
 struct ENTRY_UNIX_struct {
-  __ENTRY parent_entry__MED;
+  __ENTRY parent_entry__YED;
 };
 __ENTRY_UNIX ENTRY_UNIX_;
 #define ENTRY_UNIX__ (&ENTRY_UNIX_)
@@ -358,7 +358,7 @@ __ENTRY_UNIX ENTRY_UNIX_;
 #define __DIRECTORY__ 22
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__2ERD;
+  void *list__IFRD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -368,8 +368,8 @@ __DIRECTORY DIRECTORY_;
 typedef struct DIRECTORY_UNIX_struct __DIRECTORY_UNIX;
 struct DIRECTORY_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__NED;
-  __DIRECTORY parent_directory__OED;
+  __ENTRY_UNIX parent_entry_unix__ZED;
+  __DIRECTORY parent_directory__0ED;
 };
 __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define DIRECTORY_UNIX__ (&DIRECTORY_UNIX_)
@@ -378,9 +378,9 @@ __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 23
 typedef struct HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct {
-  void *key__5CT;
-  void *next__KDT;
-  void *item__1X3;
+  void *key__LDT;
+  void *next__WDT;
+  void *item__HY3;
 };
 __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -389,9 +389,9 @@ __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DI
 #define __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 24
 typedef struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__OCT;
-  __INTEGER count__2LY;
-  void **buckets__TCT;
+  __INTEGER capacity__0CT;
+  __INTEGER count__IMY;
+  void **buckets__5CT;
 };
 __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -401,13 +401,13 @@ __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTION
 typedef struct ITM_SLOT_struct __ITM_SLOT;
 struct ITM_SLOT_struct {
   unsigned long __id;
-  __NAMED parent_named__G5;
-  void *id_section__M1C;
-  void *result_type__O4FC;
-  void *next__CHHC;
-  void *comment__KJJD;
-  __CHARACTER affect__35FC;
-  void *argument_list__0DHC;
+  __NAMED parent_named__P5;
+  void *id_section__Y1C;
+  void *result_type__04FC;
+  void *next__OHHC;
+  void *comment__WJJD;
+  __CHARACTER affect__JAGC;
+  void *argument_list__GEHC;
 };
 __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 #define ITM_SLOT__ (&ITM_SLOT_)
@@ -417,8 +417,9 @@ __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 typedef struct ITM_SLOT_OPERATOR_struct __ITM_SLOT_OPERATOR;
 struct ITM_SLOT_OPERATOR_struct {
   unsigned long __id;
-  __ITM_SLOT parent_itm_slot__CU5B;
-  void *pretty_name__J0HC;
+  __ITM_SLOT parent_itm_slot__OU5B;
+  __INTEGER priority_and_level__K0HC;
+  void *pretty_name__V0HC;
 };
 __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define ITM_SLOT_OPERATOR__ (&ITM_SLOT_OPERATOR_)
@@ -427,9 +428,9 @@ __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ 25
 typedef struct HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_struct __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo;
 struct HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_struct {
-  void *key__F1S;
-  void *item__OSOB;
-  void *next__R1S;
+  void *key__R1S;
+  void *item__0SOB;
+  void *next__31S;
 };
 __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_)
@@ -438,9 +439,9 @@ __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABS
 #define __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ 26
 typedef struct HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_struct __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo;
 struct HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_struct {
-  __INTEGER capacity__U0S;
-  __INTEGER count__01S;
-  void **buckets__Z0S;
+  __INTEGER capacity__A1S;
+  __INTEGER count__G2S;
+  void **buckets__F1S;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -449,7 +450,7 @@ __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRI
 #define __LINKED_COLLECTIONoSTRING_CONSTANTo__ 27
 typedef struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct __LINKED_COLLECTIONoSTRING_CONSTANTo;
 struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct {
-  __INTEGER upper__TCD;
+  __INTEGER upper__5CD;
 };
 __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 #define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)
@@ -459,10 +460,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__CUEC;
-  void *first_link__YTEC;
-  void *last_link__BUEC;
-  void *mem_lnk__EUEC;
+  __INTEGER mem_idx__OUEC;
+  void *first_link__EUEC;
+  void *last_link__NUEC;
+  void *mem_lnk__QUEC;
 };
 __LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
 #define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)
@@ -480,7 +481,7 @@ __PARSER PARSER_;
 #define __ITM_ARGUMENT__ 30
 typedef struct ITM_ARGUMENT_struct __ITM_ARGUMENT;
 struct ITM_ARGUMENT_struct {
-  __ITM_OBJECT parent_itm_code__G4M;
+  __ITM_OBJECT parent_itm_code__S4M;
 };
 __ITM_ARGUMENT ITM_ARGUMENT_;
 #define ITM_ARGUMENT__ (&ITM_ARGUMENT_)
@@ -489,9 +490,9 @@ __ITM_ARGUMENT ITM_ARGUMENT_;
 #define __ARRAYED_COLLECTIONoITM_ARGUMENTo__ 31
 typedef struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct __ARRAYED_COLLECTIONoITM_ARGUMENTo;
 struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct {
-  __INTEGER upper__S5GC;
-  __INTEGER capacity__U5GC;
-  void **storage__QAHC;
+  __INTEGER upper__45GC;
+  __INTEGER capacity__AAHC;
+  void **storage__2AHC;
 };
 __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)
@@ -500,7 +501,7 @@ __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define __FAST_ARRAYoITM_ARGUMENTo__ 32
 typedef struct FAST_ARRAYoITM_ARGUMENTo_struct __FAST_ARRAYoITM_ARGUMENTo;
 struct FAST_ARRAYoITM_ARGUMENTo_struct {
-  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__ZBZB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__FCZB;
 };
 __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 #define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)
@@ -510,7 +511,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__UJP;
+  void *list_type__AKP;
 };
 __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 #define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)
@@ -520,7 +521,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__PJV;
+  void *value_list__1JV;
 };
 __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 #define ITM_EXPRESSION__ (&ITM_EXPRESSION_)
@@ -530,7 +531,7 @@ __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 typedef struct ITM_RESULT_struct __ITM_RESULT;
 struct ITM_RESULT_struct {
   unsigned long __id;
-  void *value__ALFC;
+  void *value__MLFC;
 };
 __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define ITM_RESULT__ (&ITM_RESULT_)
@@ -539,9 +540,9 @@ __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ 33
 typedef struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct {
-  void *key__DBGC;
-  void *item__WBGC;
-  void *next__OBGC;
+  void *key__PBGC;
+  void *item__CCGC;
+  void *next__0BGC;
 };
 __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)
@@ -550,9 +551,9 @@ __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SL
 #define __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ 34
 typedef struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__Q4BC;
-  __INTEGER count__CPGC;
-  void **buckets__XAGC;
+  __INTEGER capacity__24BC;
+  __INTEGER count__OPGC;
+  void **buckets__DBGC;
 };
 __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)
@@ -562,9 +563,9 @@ __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_
 typedef struct ITM_ARG_struct __ITM_ARG;
 struct ITM_ARG_struct {
   unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__NHHB;
-  void *name__P0HC;
-  void *type__Q0HC;
+  __ITM_ARGUMENT parent_itm_argument__ZHHB;
+  void *name__10HC;
+  void *type__20HC;
 };
 __ITM_ARG ITM_ARG_={__ITM_ARG__};
 #define ITM_ARG__ (&ITM_ARG_)
@@ -574,9 +575,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__YREE;
-  void *type__VQOF;
-  void *name__QPOF;
+  __ITM_ARGUMENT parent_itm_argument__B5EE;
+  void *type__O1OF;
+  void *name__N1OF;
 };
 __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 #define ITM_ARGS__ (&ITM_ARGS_)
@@ -586,8 +587,8 @@ __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 typedef struct ITM_TYPE_BLOCK_struct __ITM_TYPE_BLOCK;
 struct ITM_TYPE_BLOCK_struct {
   unsigned long __id;
-  void *type_argument__KMN;
-  void *type_result__UMN;
+  void *type_argument__WMN;
+  void *type_result__ANN;
 };
 __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 #define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
@@ -597,7 +598,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__4XP;
+  void *name__KYP;
 };
 __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 #define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)
@@ -607,8 +608,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__VRN;
-  void *style__HYP;
+  __ITM_TYPE_SIMPLE parent_itm_type_simple__BSN;
+  void *style__TYP;
 };
 __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 #define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
@@ -618,8 +619,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__WRN;
-  void *list_type__RYP;
+  __ITM_TYPE_STYLE parent_itm_type_style__CSN;
+  void *list_type__3YP;
 };
 __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 #define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
@@ -629,8 +630,8 @@ __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 typedef struct FILE_UNIX_struct __FILE_UNIX;
 struct FILE_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__QCF;
-  __POINTER stream__YIRD;
+  __ENTRY_UNIX parent_entry_unix__2CF;
+  __POINTER stream__EJRD;
 };
 __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define FILE_UNIX__ (&FILE_UNIX_)
@@ -640,7 +641,7 @@ __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 typedef struct ITM_TYPE_PARAMETER_struct __ITM_TYPE_PARAMETER;
 struct ITM_TYPE_PARAMETER_struct {
   unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type__RDE;
+  __ITM_TYPE_SIMPLE parent_itm_type__3DE;
 };
 __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define ITM_TYPE_PARAMETER__ (&ITM_TYPE_PARAMETER_)
@@ -649,9 +650,9 @@ __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ 35
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_struct __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo;
 struct ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_struct {
-  __INTEGER upper__KBBC;
-  __INTEGER capacity__MBBC;
-  void **storage__ICBC;
+  __INTEGER upper__WBBC;
+  __INTEGER capacity__YBBC;
+  void **storage__UCBC;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ (&ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_)
@@ -660,7 +661,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_
 #define __FAST_ARRAYoITM_TYPE_PARAMETERo__ 36
 typedef struct FAST_ARRAYoITM_TYPE_PARAMETERo_struct __FAST_ARRAYoITM_TYPE_PARAMETERo;
 struct FAST_ARRAYoITM_TYPE_PARAMETERo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__HME;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__TME;
 };
 __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define FAST_ARRAYoITM_TYPE_PARAMETERo__ (&FAST_ARRAYoITM_TYPE_PARAMETERo_)
@@ -669,7 +670,7 @@ __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define __LIP_CODE__ 37
 typedef struct LIP_CODE_struct __LIP_CODE;
 struct LIP_CODE_struct {
-  __ITM_OBJECT parent_itm_object__TDE;
+  __ITM_OBJECT parent_itm_object__5DE;
 };
 __LIP_CODE LIP_CODE_;
 #define LIP_CODE__ (&LIP_CODE_)
@@ -679,9 +680,9 @@ __LIP_CODE LIP_CODE_;
 typedef struct LIP_AFFECT_struct __LIP_AFFECT;
 struct LIP_AFFECT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__3TPB;
-  void *name__KGFC;
-  void *value__2GFC;
+  __LIP_CODE parent_lip_code__JUPB;
+  void *name__WGFC;
+  void *value__IHFC;
 };
 __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 #define LIP_AFFECT__ (&LIP_AFFECT_)
@@ -691,9 +692,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__R14B;
-  void *argument__NNTE;
-  void *name__YNTE;
+  __LIP_CODE parent_lip_code__314B;
+  void *argument__H1TE;
+  void *name__S1TE;
 };
 __LIP_CALL LIP_CALL_={__LIP_CALL__};
 #define LIP_CALL__ (&LIP_CALL_)
@@ -703,10 +704,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__SOYC;
-  void *condition__UCQD;
-  void *then__KDQD;
-  void *else__BEQD;
+  __LIP_CODE parent_lip_code__4OYC;
+  void *condition__ADQD;
+  void *then__WDQD;
+  void *else__NEQD;
 };
 __LIP_IF LIP_IF_={__LIP_IF__};
 #define LIP_IF__ (&LIP_IF_)
@@ -716,8 +717,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__EPYC;
-  void *message__2RTE;
+  __LIP_CODE parent_lip_code__QPYC;
+  void *message__W5TE;
 };
 __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define LIP_PRINT__ (&LIP_PRINT_)
@@ -726,8 +727,8 @@ __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define __HASHED_SET_NODEoSTRING_CONSTANTo__ 38
 typedef struct HASHED_SET_NODEoSTRING_CONSTANTo_struct __HASHED_SET_NODEoSTRING_CONSTANTo;
 struct HASHED_SET_NODEoSTRING_CONSTANTo_struct {
-  void *item__PEV;
-  void *next__0EV;
+  void *item__1EV;
+  void *next__GFV;
 };
 __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define HASHED_SET_NODEoSTRING_CONSTANTo__ (&HASHED_SET_NODEoSTRING_CONSTANTo_)
@@ -736,9 +737,9 @@ __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define __HASHED_SEToSTRING_CONSTANTo__ 39
 typedef struct HASHED_SEToSTRING_CONSTANTo_struct __HASHED_SEToSTRING_CONSTANTo;
 struct HASHED_SEToSTRING_CONSTANTo_struct {
-  __INTEGER capacity__4HT;
-  __INTEGER count__MHY;
-  void **buckets__DEV;
+  __INTEGER capacity__KIT;
+  __INTEGER count__YHY;
+  void **buckets__PEV;
 };
 __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define HASHED_SEToSTRING_CONSTANTo__ (&HASHED_SEToSTRING_CONSTANTo_)
@@ -747,7 +748,7 @@ __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define __ITM_CODE__ 40
 typedef struct ITM_CODE_struct __ITM_CODE;
 struct ITM_CODE_struct {
-  __ITM_OBJECT parent_itm_object__LDE;
+  __ITM_OBJECT parent_itm_object__XDE;
 };
 __ITM_CODE ITM_CODE_;
 #define ITM_CODE__ (&ITM_CODE_)
@@ -756,9 +757,9 @@ __ITM_CODE ITM_CODE_;
 #define __ARRAYED_COLLECTIONoITM_CODEo__ 41
 typedef struct ARRAYED_COLLECTIONoITM_CODEo_struct __ARRAYED_COLLECTIONoITM_CODEo;
 struct ARRAYED_COLLECTIONoITM_CODEo_struct {
-  __INTEGER upper__QHL;
-  __INTEGER capacity__OXT;
-  void **storage__ZXT;
+  __INTEGER upper__2HL;
+  __INTEGER capacity__0XT;
+  void **storage__FYT;
 };
 __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)
@@ -767,7 +768,7 @@ __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define __FAST_ARRAYoITM_CODEo__ 42
 typedef struct FAST_ARRAYoITM_CODEo_struct __FAST_ARRAYoITM_CODEo;
 struct FAST_ARRAYoITM_CODEo_struct {
-  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__FTF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__RTF;
 };
 __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)
@@ -776,9 +777,9 @@ __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define __ARRAYED_COLLECTIONoLIP_CODEo__ 43
 typedef struct ARRAYED_COLLECTIONoLIP_CODEo_struct __ARRAYED_COLLECTIONoLIP_CODEo;
 struct ARRAYED_COLLECTIONoLIP_CODEo_struct {
-  __INTEGER upper__QDQD;
-  __INTEGER capacity__CPTD;
-  void **storage__NPTD;
+  __INTEGER upper__2DQD;
+  __INTEGER capacity__1PTD;
+  void **storage__GQTD;
 };
 __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_CODEo__ (&ARRAYED_COLLECTIONoLIP_CODEo_)
@@ -787,7 +788,7 @@ __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define __FAST_ARRAYoLIP_CODEo__ 44
 typedef struct FAST_ARRAYoLIP_CODEo_struct __FAST_ARRAYoLIP_CODEo;
 struct FAST_ARRAYoLIP_CODEo_struct {
-  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__BLYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__NLYC;
 };
 __FAST_ARRAYoLIP_CODEo FAST_ARRAYoLIP_CODEo_;
 #define FAST_ARRAYoLIP_CODEo__ (&FAST_ARRAYoLIP_CODEo_)
@@ -805,8 +806,8 @@ __HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoL
 #define __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ 46
 typedef struct HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__RURD;
-  void **buckets__WURD;
+  __INTEGER capacity__3URD;
+  void **buckets__CVRD;
 };
 __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_)
@@ -816,10 +817,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__QPZB;
-  void *left__AZQD;
-  void *right__DZQD;
-  __CHARACTER operator__GZQD;
+  __LIP_CODE parent_lip_code__2PZB;
+  void *left__MZQD;
+  void *right__PZQD;
+  __CHARACTER operator__SZQD;
 };
 __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 #define LIP_BINARY__ (&LIP_BINARY_)
@@ -829,9 +830,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__504B;
-  void *value__31QD;
-  __CHARACTER operator__A2QD;
+  __LIP_CODE parent_lip_code__L14B;
+  void *value__J2QD;
+  __CHARACTER operator__M2QD;
 };
 __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 #define LIP_UNARY__ (&LIP_UNARY_)
@@ -841,7 +842,7 @@ __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 typedef struct LIP_INTEGER_struct __LIP_INTEGER;
 struct LIP_INTEGER_struct {
   unsigned long __id;
-  __INTEGER value__G31F;
+  __INTEGER value__1X2F;
 };
 __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 #define LIP_INTEGER__ (&LIP_INTEGER_)
@@ -851,7 +852,7 @@ __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 typedef struct LIP_STRING_struct __LIP_STRING;
 struct LIP_STRING_struct {
   unsigned long __id;
-  void *value__FPTE;
+  void *value__52TE;
 };
 __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define LIP_STRING__ (&LIP_STRING_)
@@ -860,8 +861,8 @@ __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define __ITM_LOCAL__ 47
 typedef struct ITM_LOCAL_struct __ITM_LOCAL;
 struct ITM_LOCAL_struct {
-  __ITM_OBJECT parent_itm_object__T0H;
-  void *name__S2K;
+  __ITM_OBJECT parent_itm_object__50H;
+  void *name__42K;
 };
 __ITM_LOCAL ITM_LOCAL_;
 #define ITM_LOCAL__ (&ITM_LOCAL_)
@@ -870,9 +871,9 @@ __ITM_LOCAL ITM_LOCAL_;
 #define __ARRAYED_COLLECTIONoITM_LOCALo__ 48
 typedef struct ARRAYED_COLLECTIONoITM_LOCALo_struct __ARRAYED_COLLECTIONoITM_LOCALo;
 struct ARRAYED_COLLECTIONoITM_LOCALo_struct {
-  __INTEGER upper__P0K;
-  __INTEGER capacity__LKU;
-  void **storage__WKU;
+  __INTEGER upper__10K;
+  __INTEGER capacity__XKU;
+  void **storage__CLU;
 };
 __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)
@@ -881,7 +882,7 @@ __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define __FAST_ARRAYoITM_LOCALo__ 49
 typedef struct FAST_ARRAYoITM_LOCALo_struct __FAST_ARRAYoITM_LOCALo;
 struct FAST_ARRAYoITM_LOCALo_struct {
-  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__Y0H;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__E1H;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
@@ -956,8 +957,8 @@ __SHORTER SHORTER_;
 #define __FILE_SYSTEM__ 57
 typedef struct FILE_SYSTEM_struct __FILE_SYSTEM;
 struct FILE_SYSTEM_struct {
-  void *parent_directory__CFD;
-  int parent_directory__DFD;
+  void *parent_directory__OFD;
+  int parent_directory__PFD;
 };
 __FILE_SYSTEM FILE_SYSTEM_;
 #define FILE_SYSTEM__ (&FILE_SYSTEM_)
@@ -966,9 +967,9 @@ __FILE_SYSTEM FILE_SYSTEM_;
 #define __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ 58
 typedef struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct {
-  void *key__VNBC;
-  void *item__I3GD;
-  void *next__AOBC;
+  void *key__BOBC;
+  void *item__U3GD;
+  void *next__MOBC;
 };
 __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)
@@ -977,9 +978,9 @@ __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTO
 #define __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ 59
 typedef struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__ENBC;
-  __INTEGER count__JOBC;
-  void **buckets__JNBC;
+  __INTEGER capacity__QNBC;
+  __INTEGER count__VOBC;
+  void **buckets__VNBC;
 };
 __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)
@@ -989,8 +990,8 @@ __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRIN
 typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
 struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
   __INTEGER upper__HJ;
-  __INTEGER capacity__RCU;
-  void **storage__4ST;
+  __INTEGER capacity__3CU;
+  void **storage__KTT;
 };
 __ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
 #define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)
@@ -1017,8 +1018,8 @@ __FS_MIN FS_MIN_;
 #define __LINKED_LIST_NODEoSTRING_CONSTANTo__ 63
 typedef struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct __LINKED_LIST_NODEoSTRING_CONSTANTo;
 struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct {
-  void *item__OVHD;
-  void *next__AOOD;
+  void *item__0VHD;
+  void *next__MOOD;
 };
 __LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
 #define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)
@@ -1036,7 +1037,7 @@ __TYPE TYPE_;
 #define __ARRAYED_COLLECTIONoSLOTo__ 65
 typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
 struct ARRAYED_COLLECTIONoSLOTo_struct {
-  __INTEGER capacity__IES;
+  __INTEGER capacity__UES;
 };
 __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)
@@ -1045,7 +1046,7 @@ __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define __FAST_ARRAYoSLOTo__ 66
 typedef struct FAST_ARRAYoSLOTo_struct __FAST_ARRAYoSLOTo;
 struct FAST_ARRAYoSLOTo_struct {
-  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__M5;
+  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__V5;
 };
 __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define FAST_ARRAYoSLOTo__ (&FAST_ARRAYoSLOTo_)
@@ -1054,7 +1055,7 @@ __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define __LINKED_COLLECTIONoENTRYo__ 67
 typedef struct LINKED_COLLECTIONoENTRYo_struct __LINKED_COLLECTIONoENTRYo;
 struct LINKED_COLLECTIONoENTRYo_struct {
-  __INTEGER upper__C32D;
+  __INTEGER upper__TI3D;
 };
 __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define LINKED_COLLECTIONoENTRYo__ (&LINKED_COLLECTIONoENTRYo_)
@@ -1063,11 +1064,11 @@ __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define __LINKED_LISToENTRYo__ 68
 typedef struct LINKED_LISToENTRYo_struct __LINKED_LISToENTRYo;
 struct LINKED_LISToENTRYo_struct {
-  __LINKED_COLLECTIONoENTRYo parent_linked_collection__1ERD;
-  __INTEGER mem_idx__5HVE;
-  void *first_link__YHVE;
-  void *mem_lnk__AIVE;
-  void *last_link__BIVE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__HFRD;
+  __INTEGER mem_idx__VWVE;
+  void *first_link__OWVE;
+  void *mem_lnk__WWVE;
+  void *last_link__XWVE;
 };
 __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define LINKED_LISToENTRYo__ (&LINKED_LISToENTRYo_)
@@ -1076,8 +1077,8 @@ __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define __LINKED_LIST_NODEoENTRYo__ 69
 typedef struct LINKED_LIST_NODEoENTRYo_struct __LINKED_LIST_NODEoENTRYo;
 struct LINKED_LIST_NODEoENTRYo_struct {
-  void *item__TZVE;
-  void *next__GGEF;
+  void *item__OJWE;
+  void *next__V0EF;
 };
 __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define LINKED_LIST_NODEoENTRYo__ (&LINKED_LIST_NODEoENTRYo_)
@@ -1086,9 +1087,9 @@ __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ 70
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  __INTEGER upper__ZUV;
-  __INTEGER capacity__UYV;
-  void **storage__PZV;
+  __INTEGER upper__FVV;
+  __INTEGER capacity__AZV;
+  void **storage__1ZV;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1097,7 +1098,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoIT
 #define __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ 71
 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__3TP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__JUP;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1115,8 +1116,8 @@ __ALIAS_ARRAYoITM_TYPE_MONOo ALIAS_ARRAYoITM_TYPE_MONOo_;
 #define __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ 73
 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;
+  void *item__CAW;
+  void *next__OAW;
 };
 __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_)
@@ -1125,9 +1126,9 @@ __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE
 #define __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ 74
 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;
+  __INTEGER capacity__R5V;
+  __INTEGER count__FIW;
+  void **buckets__W5V;
 };
 __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1136,9 +1137,9 @@ __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ 75
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct __ARRAYED_COLLECTIONoITM_TYPE_MULTIo;
 struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct {
-  __INTEGER upper__KJP;
-  __INTEGER capacity__R1V;
-  void **storage__21V;
+  __INTEGER upper__WJP;
+  __INTEGER capacity__31V;
+  void **storage__I2V;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)
@@ -1147,7 +1148,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define __FAST_ARRAYoITM_TYPE_MULTIo__ 76
 typedef struct FAST_ARRAYoITM_TYPE_MULTIo_struct __FAST_ARRAYoITM_TYPE_MULTIo;
 struct FAST_ARRAYoITM_TYPE_MULTIo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__AJP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__MJP;
 };
 __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)
@@ -1156,9 +1157,9 @@ __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ 77
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_struct __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo;
 struct ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_struct {
-  __INTEGER upper__2LN;
-  __INTEGER capacity__0JV;
-  void **storage__FKV;
+  __INTEGER upper__IMN;
+  __INTEGER capacity__GKV;
+  void **storage__RKV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ (&ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_)
@@ -1167,7 +1168,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define __FAST_ARRAYoITM_TYPE_BLOCKo__ 78
 typedef struct FAST_ARRAYoITM_TYPE_BLOCKo_struct __FAST_ARRAYoITM_TYPE_BLOCKo;
 struct FAST_ARRAYoITM_TYPE_BLOCKo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__SLN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__4LN;
 };
 __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define FAST_ARRAYoITM_TYPE_BLOCKo__ (&FAST_ARRAYoITM_TYPE_BLOCKo_)
@@ -1176,7 +1177,7 @@ __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define __ITM_CONSTANT__ 79
 typedef struct ITM_CONSTANT_struct __ITM_CONSTANT;
 struct ITM_CONSTANT_struct {
-  __ITM_CODE parent_itm_code__PVF;
+  __ITM_CODE parent_itm_code__1VF;
 };
 __ITM_CONSTANT ITM_CONSTANT_;
 #define ITM_CONSTANT__ (&ITM_CONSTANT_)
@@ -1186,7 +1187,7 @@ __ITM_CONSTANT ITM_CONSTANT_;
 typedef struct ITM_REAL_struct __ITM_REAL;
 struct ITM_REAL_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__ZQO;
+  __ITM_CONSTANT parent_itm_constant__FRO;
 };
 __ITM_REAL ITM_REAL_={__ITM_REAL__};
 #define ITM_REAL__ (&ITM_REAL_)
@@ -1196,7 +1197,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__LRO;
+  __ITM_CONSTANT parent_itm_constant__XRO;
 };
 __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 #define ITM_NUMBER__ (&ITM_NUMBER_)
@@ -1206,7 +1207,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__3RO;
+  __ITM_CONSTANT parent_itm_constant__JSO;
 };
 __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 #define ITM_CHARACTER__ (&ITM_CHARACTER_)
@@ -1216,7 +1217,7 @@ __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 typedef struct ITM_STRING_struct __ITM_STRING;
 struct ITM_STRING_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__OSO;
+  __ITM_CONSTANT parent_itm_constant__0SO;
 };
 __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define ITM_STRING__ (&ITM_STRING_)
@@ -1225,9 +1226,9 @@ __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define __ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ 80
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct __ARRAYED_COLLECTIONoITM_TYPE_GENERICo;
 struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct {
-  __INTEGER upper__UXP;
-  __INTEGER capacity__HBW;
-  void **storage__SBW;
+  __INTEGER upper__AYP;
+  __INTEGER capacity__TBW;
+  void **storage__4BW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)
@@ -1236,7 +1237,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define __FAST_ARRAYoITM_TYPE_GENERICo__ 81
 typedef struct FAST_ARRAYoITM_TYPE_GENERICo_struct __FAST_ARRAYoITM_TYPE_GENERICo;
 struct FAST_ARRAYoITM_TYPE_GENERICo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__KXP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__WXP;
 };
 __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)
@@ -1245,9 +1246,9 @@ __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ 82
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct __ARRAYED_COLLECTIONoITM_TYPE_STYLEo;
 struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct {
-  __INTEGER upper__DOR;
-  __INTEGER capacity__PLW;
-  void **storage__0LW;
+  __INTEGER upper__POR;
+  __INTEGER capacity__1LW;
+  void **storage__GMW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)
@@ -1256,7 +1257,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define __FAST_ARRAYoITM_TYPE_STYLEo__ 83
 typedef struct FAST_ARRAYoITM_TYPE_STYLEo_struct __FAST_ARRAYoITM_TYPE_STYLEo;
 struct FAST_ARRAYoITM_TYPE_STYLEo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__ZNR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__FOR;
 };
 __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 #define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)
@@ -1266,7 +1267,7 @@ __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 typedef struct ITM_LIST_struct __ITM_LIST;
 struct ITM_LIST_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__44E;
+  __ITM_CODE parent_itm_code__K5E;
 };
 __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define ITM_LIST__ (&ITM_LIST_)
@@ -1275,9 +1276,9 @@ __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ 84
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct {
-  __INTEGER upper__30T;
-  __INTEGER capacity__QIU;
-  void **storage__1IU;
+  __INTEGER upper__J1T;
+  __INTEGER capacity__2IU;
+  void **storage__HJU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)
@@ -1286,7 +1287,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LO
 #define __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ 85
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo;
 struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__IRI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__URI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)
@@ -1304,9 +1305,9 @@ __ALIAS_ARRAYoITM_LOCALo ALIAS_ARRAYoITM_LOCALo_;
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ 87
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct {
-  __INTEGER upper__2VT;
-  __INTEGER capacity__O5T;
-  void **storage__KAU;
+  __INTEGER upper__IWT;
+  __INTEGER capacity__05T;
+  void **storage__WAU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)
@@ -1315,7 +1316,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_COD
 #define __FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ 88
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoITM_CODEoo;
 struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__U3H;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__A4H;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)
@@ -1333,9 +1334,9 @@ __ALIAS_ARRAYoITM_CODEo ALIAS_ARRAYoITM_CODEo_;
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ 90
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __INTEGER upper__OSU;
-  __INTEGER capacity__TUU;
-  void **storage__4UU;
+  __INTEGER upper__0SU;
+  __INTEGER capacity__5UU;
+  void **storage__KVU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1344,7 +1345,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYo
 #define __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ 91
 typedef struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo;
 struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__34K;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__J5K;
 };
 __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
 #define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1363,7 +1364,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__KCJ;
+  __ITM_CODE parent_itm_code__WCJ;
 };
 __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 #define ITM_LIST_IDF__ (&ITM_LIST_IDF_)
@@ -1373,7 +1374,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__EUF;
+  __ITM_CODE parent_itm_constant__QUF;
 };
 __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 #define ITM_LDOTS__ (&ITM_LDOTS_)
@@ -1383,7 +1384,7 @@ __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 typedef struct ITM_PROTOTYPE_struct __ITM_PROTOTYPE;
 struct ITM_PROTOTYPE_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__QVF;
+  __ITM_CONSTANT parent_itm_constant__2VF;
 };
 __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)
@@ -1392,7 +1393,7 @@ __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define __ITM_WRITE__ 93
 typedef struct ITM_WRITE_struct __ITM_WRITE;
 struct ITM_WRITE_struct {
-  __ITM_CODE parent_itm_code__5CJ;
+  __ITM_CODE parent_itm_code__LDJ;
 };
 __ITM_WRITE ITM_WRITE_;
 #define ITM_WRITE__ (&ITM_WRITE_)
@@ -1402,7 +1403,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__ADJ;
+  __ITM_WRITE parent_itm_write__MDJ;
 };
 __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 #define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)
@@ -1412,7 +1413,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__XDJ;
+  __ITM_WRITE parent_itm_write__DEJ;
 };
 __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 #define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)
@@ -1422,7 +1423,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__EGJ;
+  __ITM_CODE parent_itm_code__QGJ;
 };
 __ITM_READ ITM_READ_={__ITM_READ__};
 #define ITM_READ__ (&ITM_READ_)
@@ -1432,7 +1433,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__CHJ;
+  __ITM_WRITE parent_itm_write__OHJ;
 };
 __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 #define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)
@@ -1442,8 +1443,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__YEL;
-  void *name__DIL;
+  __ITM_CODE parent_itm_code__EFL;
+  void *name__PIL;
 };
 __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 #define ITM_OPERATOR__ (&ITM_OPERATOR_)
@@ -1453,7 +1454,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__4HL;
+  __ITM_READ parent_itm_read__KIL;
 };
 __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 #define ITM_READ_ARG1__ (&ITM_READ_ARG1_)
@@ -1463,7 +1464,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__LKL;
+  __ITM_READ parent_itm_read__XKL;
 };
 __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 #define ITM_READ_ARG2__ (&ITM_READ_ARG2_)
@@ -1473,7 +1474,7 @@ __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 typedef struct ITM_OLD_struct __ITM_OLD;
 struct ITM_OLD_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__B2L;
+  __ITM_CODE parent_itm_code__N2L;
 };
 __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define ITM_OLD__ (&ITM_OLD_)
@@ -1482,7 +1483,7 @@ __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define __ITM_EXTERN__ 94
 typedef struct ITM_EXTERN_struct __ITM_EXTERN;
 struct ITM_EXTERN_struct {
-  __ITM_CODE parent_itm_code__C4M;
+  __ITM_CODE parent_itm_code__O4M;
 };
 __ITM_EXTERN ITM_EXTERN_;
 #define ITM_EXTERN__ (&ITM_EXTERN_)
@@ -1492,8 +1493,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__D4M;
-  __BOOLEAN is_persistant__AHN;
+  __ITM_EXTERN parent_itm_extern__P4M;
+  __BOOLEAN is_persistant__MHN;
 };
 __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 #define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)
@@ -1503,7 +1504,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__UMDC;
+  void *list__ANDC;
 };
 __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 #define ITM_BLOCK__ (&ITM_BLOCK_)
@@ -1513,7 +1514,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__IFN;
+  __ITM_EXTERN parent_itm_extern__UFN;
 };
 __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 #define ITM_EXTERNAL__ (&ITM_EXTERNAL_)
@@ -1523,7 +1524,7 @@ __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 typedef struct ITM_READ_ARGS_struct __ITM_READ_ARGS;
 struct ITM_READ_ARGS_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__4CO;
+  __ITM_READ parent_itm_read__KDO;
 };
 __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define ITM_READ_ARGS__ (&ITM_READ_ARGS_)
@@ -1532,8 +1533,8 @@ __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ 95
 typedef struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo;
 struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  void *item__LAPF;
-  void *next__XAPF;
+  void *item__TDPF;
+  void *next__5DPF;
 };
 __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1542,9 +1543,9 @@ __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING
 #define __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ 96
 typedef struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo;
 struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __INTEGER capacity__05OF;
-  __INTEGER count__REPF;
-  void **buckets__55OF;
+  __INTEGER capacity__CDPF;
+  __INTEGER count__ZHPF;
+  void **buckets__HDPF;
 };
 __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1553,9 +1554,9 @@ __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANTo
 #define __ARRAYED_COLLECTIONoLIP_INTEGERo__ 97
 typedef struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct __ARRAYED_COLLECTIONoLIP_INTEGERo;
 struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct {
-  __INTEGER upper__SBWE;
-  __INTEGER capacity__HDWE;
-  void **storage__SDWE;
+  __INTEGER upper__4TWE;
+  __INTEGER capacity__LVWE;
+  void **storage__WVWE;
 };
 __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define ARRAYED_COLLECTIONoLIP_INTEGERo__ (&ARRAYED_COLLECTIONoLIP_INTEGERo_)
@@ -1564,7 +1565,7 @@ __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define __FAST_ARRAYoLIP_INTEGERo__ 98
 typedef struct FAST_ARRAYoLIP_INTEGERo_struct __FAST_ARRAYoLIP_INTEGERo;
 struct FAST_ARRAYoLIP_INTEGERo_struct {
-  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__RWRE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__ZFSE;
 };
 __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define FAST_ARRAYoLIP_INTEGERo__ (&FAST_ARRAYoLIP_INTEGERo_)
@@ -1573,9 +1574,9 @@ __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define __ARRAYED_COLLECTIONoLIP_STRINGo__ 99
 typedef struct ARRAYED_COLLECTIONoLIP_STRINGo_struct __ARRAYED_COLLECTIONoLIP_STRINGo;
 struct ARRAYED_COLLECTIONoLIP_STRINGo_struct {
-  __INTEGER upper__DSOF;
-  __INTEGER capacity__4WOF;
-  void **storage__JXOF;
+  __INTEGER upper__NSOF;
+  __INTEGER capacity__UYOF;
+  void **storage__5YOF;
 };
 __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define ARRAYED_COLLECTIONoLIP_STRINGo__ (&ARRAYED_COLLECTIONoLIP_STRINGo_)
@@ -1584,7 +1585,7 @@ __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define __FAST_ARRAYoLIP_STRINGo__ 100
 typedef struct FAST_ARRAYoLIP_STRINGo_struct __FAST_ARRAYoLIP_STRINGo;
 struct FAST_ARRAYoLIP_STRINGo_struct {
-  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__GIEF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__W2EF;
 };
 __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 #define FAST_ARRAYoLIP_STRINGo__ (&FAST_ARRAYoLIP_STRINGo_)
@@ -1594,7 +1595,7 @@ __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 typedef struct LIP_BOOLEAN_struct __LIP_BOOLEAN;
 struct LIP_BOOLEAN_struct {
   unsigned long __id;
-  __BOOLEAN value__DDQD;
+  __BOOLEAN value__PDQD;
 };
 __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 #define LIP_BOOLEAN__ (&LIP_BOOLEAN_)
@@ -1607,8 +1608,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__RWEE;
-  void *value__XXTE;
+  __LIP_CODE parent_lip_code__0DFE;
+  void *value__RFUE;
 };
 __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define LIP_VALUE__ (&LIP_VALUE_)
@@ -1617,9 +1618,9 @@ __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ 101
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_struct {
-  __INTEGER upper__WNTD;
-  __INTEGER capacity__X5TD;
-  void **storage__TAUD;
+  __INTEGER upper__POTD;
+  __INTEGER capacity__QAUD;
+  void **storage__MBUD;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_)
@@ -1628,7 +1629,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_COD
 #define __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ 102
 typedef struct FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo;
 struct FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__ZJID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__FKID;
 };
 __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_)
@@ -1673,9 +1674,9 @@ __LIP_SLOT_DATA LIP_SLOT_DATA_;
 #define __ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ 107
 typedef struct ARRAYED_COLLECTIONoLIP_SLOT_DATAo_struct __ARRAYED_COLLECTIONoLIP_SLOT_DATAo;
 struct ARRAYED_COLLECTIONoLIP_SLOT_DATAo_struct {
-  __INTEGER upper__AZOF;
-  __INTEGER capacity__V3OF;
-  void **storage__A4OF;
+  __INTEGER upper__W0OF;
+  __INTEGER capacity__3APF;
+  void **storage__IBPF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ (&ARRAYED_COLLECTIONoLIP_SLOT_DATAo_)
@@ -1684,7 +1685,7 @@ __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define __FAST_ARRAYoLIP_SLOT_DATAo__ 108
 typedef struct FAST_ARRAYoLIP_SLOT_DATAo_struct __FAST_ARRAYoLIP_SLOT_DATAo;
 struct FAST_ARRAYoLIP_SLOT_DATAo_struct {
-  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__WWTE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__QEUE;
 };
 __FAST_ARRAYoLIP_SLOT_DATAo FAST_ARRAYoLIP_SLOT_DATAo_;
 #define FAST_ARRAYoLIP_SLOT_DATAo__ (&FAST_ARRAYoLIP_SLOT_DATAo_)
@@ -1702,9 +1703,9 @@ __LIP_SLOT_CODE LIP_SLOT_CODE_;
 #define __ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ 110
 typedef struct ARRAYED_COLLECTIONoLIP_SLOT_CODEo_struct __ARRAYED_COLLECTIONoLIP_SLOT_CODEo;
 struct ARRAYED_COLLECTIONoLIP_SLOT_CODEo_struct {
-  __INTEGER upper__1EJF;
-  __INTEGER capacity__G0OF;
-  void **storage__R0OF;
+  __INTEGER upper__3XJF;
+  __INTEGER capacity__41OF;
+  void **storage__J2OF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ (&ARRAYED_COLLECTIONoLIP_SLOT_CODEo_)
@@ -1713,7 +1714,7 @@ __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define __FAST_ARRAYoLIP_SLOT_CODEo__ 111
 typedef struct FAST_ARRAYoLIP_SLOT_CODEo_struct __FAST_ARRAYoLIP_SLOT_CODEo;
 struct FAST_ARRAYoLIP_SLOT_CODEo_struct {
-  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__REJF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__TXJF;
 };
 __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define FAST_ARRAYoLIP_SLOT_CODEo__ (&FAST_ARRAYoLIP_SLOT_CODEo_)
@@ -1722,9 +1723,9 @@ __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ 112
 typedef struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct {
-  void *key__CPEC;
-  void *item__VPEC;
-  void *next__NPEC;
+  void *key__OPEC;
+  void *item__BQEC;
+  void *next__ZPEC;
 };
 __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)
@@ -1733,9 +1734,9 @@ __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTIO
 #define __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ 113
 typedef struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct {
-  __INTEGER capacity__ROEC;
-  __INTEGER count__TYFC;
-  void **buckets__WOEC;
+  __INTEGER capacity__3OEC;
+  __INTEGER count__5YFC;
+  void **buckets__CPEC;
 };
 __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)
@@ -1744,7 +1745,7 @@ __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_
 #define __SECTION___ 114
 typedef struct SECTION__struct __SECTION_;
 struct SECTION__struct {
-  void *name__WYDC;
+  void *name__CZDC;
 };
 __SECTION_ SECTION__;
 #define SECTION___ (&SECTION__)
@@ -1753,9 +1754,9 @@ __SECTION_ SECTION__;
 #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__1REC;
-  void *key__IREC;
-  void *next__TREC;
+  void *item__HSEC;
+  void *key__UREC;
+  void *next__5REC;
 };
 __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_)
@@ -1764,9 +1765,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__XQEC;
-  __INTEGER count__N1FC;
-  void **buckets__2QEC;
+  __INTEGER capacity__DREC;
+  __INTEGER count__Z1FC;
+  void **buckets__IREC;
 };
 __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_)
@@ -1775,9 +1776,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__ETGC;
-  __INTEGER capacity__MKHC;
-  void **storage__XKHC;
+  __INTEGER upper__QTGC;
+  __INTEGER capacity__YKHC;
+  void **storage__DLHC;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1786,7 +1787,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__JU1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__VU1B;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1800,6 +1801,26 @@ struct ALIAS_ARRAYoITM_ARGUMENTo_struct {
 __ALIAS_ARRAYoITM_ARGUMENTo ALIAS_ARRAYoITM_ARGUMENTo_;
 #define ALIAS_ARRAYoITM_ARGUMENTo__ (&ALIAS_ARRAYoITM_ARGUMENTo_)
 
+// ARRAYED_COLLECTION[ITM_SLOT]
+#define __ARRAYED_COLLECTIONoITM_SLOTo__ 120
+typedef struct ARRAYED_COLLECTIONoITM_SLOTo_struct __ARRAYED_COLLECTIONoITM_SLOTo;
+struct ARRAYED_COLLECTIONoITM_SLOTo_struct {
+  __INTEGER upper__21XD;
+  __INTEGER capacity__SMVE;
+  void **storage__MZVE;
+};
+__ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
+#define ARRAYED_COLLECTIONoITM_SLOTo__ (&ARRAYED_COLLECTIONoITM_SLOTo_)
+
+// FAST_ARRAY[ITM_SLOT]
+#define __FAST_ARRAYoITM_SLOTo__ 121
+typedef struct FAST_ARRAYoITM_SLOTo_struct __FAST_ARRAYoITM_SLOTo;
+struct FAST_ARRAYoITM_SLOTo_struct {
+  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__4JTD;
+};
+__FAST_ARRAYoITM_SLOTo FAST_ARRAYoITM_SLOTo_;
+#define FAST_ARRAYoITM_SLOTo__ (&FAST_ARRAYoITM_SLOTo_)
+
 // INTEGER_8
 typedef signed char __INTEGER_8;
 
@@ -1833,109 +1854,113 @@ __TYPE_CONTEXT TYPE_CONTEXT_={__TYPE_CONTEXT__};
 // UINTEGER_64
 typedef unsigned long long __UINTEGER_64;
 
+// INTEGER_32
+typedef signed long __INTEGER_32;
+
 // INTEGER_64
 typedef signed long long __INTEGER_64;
 
 
-void *table_type[120];
+void *table_type[122];
 
 //==========================//
 // GLOBAL                   //
 //==========================//
 
 void *parent_numeric__J;
-__POINTER begin_memory__DVH;
-__UINTEGER_32 nb_page__SRJ;
-__UINTEGER_64 capacity_max__MA5;
-void *first_free__LDVB;
-__INTEGER type_error__CNG;
-void *msg_err__DNG;
+__POINTER begin_memory__PVH;
+__UINTEGER_32 nb_page__4RJ;
+__UINTEGER_64 capacity_max__YA5;
+void *first_free__XDVB;
+__INTEGER type_error__ONG;
+void *msg_err__PNG;
 void *prototype_list__BJ;
-void *prototype_dico__DTS;
-void *list_id__NAB;
-void *string_tmp__HED;
-void *string_tmp2__N0AC;
-void *alias__YED;
-void *string_tmp3__T0AC;
+void *prototype_dico__PTS;
+void *list_tmp__5JTD;
+void *list_id__WAB;
+void *string_tmp__TED;
+void *string_tmp2__Z0AC;
+void *alias__EFD;
+void *string_tmp3__50AC;
 void *short_dico__QD;
-void *object__3AC;
-void *source__DBC;
-__INTEGER position__GBC;
-__INTEGER pos_cur__JBC;
-__INTEGER pos_line__KBC;
-__INTEGER pos_col__LBC;
-__BOOLEAN is_active_short__SBC;
-void *key_comment_default__UBC;
-__INTEGER short_derive__VBC;
-void *short_local__3BC;
-__BOOLEAN is_catch_comment__UWC;
-void *last_string__2ZC;
-void *last_section__L0C;
-void *token__0BD;
-void *last_comment__O0D;
-void *last_slot__E2D;
-__INTEGER begin_position__5AE;
-__BOOLEAN is_parameter_type__2JE;
-void *last_group__PTF;
-__INTEGER old_position__XQI;
-__INTEGER old_pos_cur__ZQI;
-__INTEGER old_pos_line__1QI;
-__INTEGER old_pos_col__3QI;
-__INTEGER old_short_derive__5QI;
-__INTEGER_64 last_integer__NRO;
-void *dico__BJP;
-void *dico__TLN;
-void *type_void__SVF;
-void *dico__GTI;
-void *type_self__1TN;
-void *type_null__TUN;
-void *dico__0NR;
-void *dico__LXP;
-void *list_data__CONC;
-void *stack__XWTE;
-void *list_method__SEJF;
-void *storage__SWRE;
-void *storage__HIEF;
-__UINTEGER_32 clone_allocation_size__RSB;
-__POINTER get_begin_memory__2BQB;
+void *object__JBC;
+void *source__PBC;
+__INTEGER position__SBC;
+__INTEGER pos_cur__VBC;
+__INTEGER pos_line__WBC;
+__INTEGER pos_col__XBC;
+__BOOLEAN is_active_short__4BC;
+void *key_comment_default__ACC;
+__INTEGER short_derive__BCC;
+void *short_local__JCC;
+__BOOLEAN is_catch_comment__AXC;
+void *last_string__I0C;
+void *last_section__X0C;
+void *token__GCD;
+void *last_comment__00D;
+void *last_slot__Q2D;
+__INTEGER begin_position__LBE;
+__BOOLEAN is_parameter_type__IKE;
+void *last_group__1TF;
+__INTEGER old_position__DRI;
+__INTEGER old_pos_cur__FRI;
+__INTEGER old_pos_line__HRI;
+__INTEGER old_pos_col__JRI;
+__INTEGER old_short_derive__LRI;
+__INTEGER_64 last_integer__ZRO;
+void *dico__NJP;
+void *dico__5LN;
+void *type_void__4VF;
+void *dico__STI;
+void *type_self__HUN;
+void *type_null__5UN;
+void *dico__GOR;
+void *dico__XXP;
+void *list_data__OONC;
+void *stack__REUE;
+void *list_method__UXJF;
+void *storage__0FSE;
+void *storage__X2EF;
+__UINTEGER_32 clone_allocation_size__3SB;
+__POINTER get_begin_memory__ICQB;
 void *list__FK;
-void *free__VNP;
+void *free__BOP;
 void *string_tmp__VH;
 void *output_code__SI;
-void *output_decl__RFE;
-void *string_tmp2__V5I;
-void *path_file__DHVF;
+void *output_decl__3FE;
+void *string_tmp2__BAJ;
+void *path_file__A2VF;
 __BOOLEAN is_short_recursive__JB;
 __BOOLEAN is_shorter2__VI;
-__BOOLEAN is_shorter__WY;
-__BOOLEAN is_short_code__G1;
-__BOOLEAN is_short_private__U1;
+__BOOLEAN is_shorter__5Y;
+__BOOLEAN is_short_code__P1;
+__BOOLEAN is_short_private__31;
 void *directory_list__YB;
 void *file_list__0B;
 void *current_list__2B;
 void *input_name__3B;
 void *proto_input__BI;
 void *output_name__DI;
-void *format_name__Y0;
-void *string_tmp__4VX;
-__INTEGER index_count__04;
-void *free_list__4TP;
-void *empty_list__FVP;
-void *bucket__QVP;
-void *free_list__JRI;
-void *free_list__V3H;
-void *free_list__44K;
-void *empty_list__GUKF;
-void *bucket__QUKF;
-void *true__VDKF;
-void *free_list__0JID;
-__INTEGER last_integer__PVTE;
-void *last_string__BWTE;
-__BOOLEAN push_back_flag__2FLF;
-__CHARACTER memory__LPKF;
-void *bucket_name__XUOB;
-void *bucket_list__SWOB;
-void *free_list__KU1B;
+void *format_name__B1;
+void *string_tmp__KWX;
+__INTEGER index_count__D5;
+void *free_list__KUP;
+void *empty_list__RVP;
+void *bucket__2VP;
+void *free_list__VRI;
+void *free_list__B4H;
+void *free_list__K5K;
+void *empty_list__WHLF;
+void *bucket__AILF;
+void *true__5TKF;
+void *free_list__GKID;
+__INTEGER last_integer__JDUE;
+void *last_string__1DUE;
+__BOOLEAN push_back_flag__NTLF;
+__CHARACTER memory__0ALF;
+void *bucket_name__DVOB;
+void *bucket_list__4WOB;
+void *free_list__WU1B;
 
 //==========================//
 // STRING CONSTANT          //
@@ -2079,22 +2104,25 @@ __STRING_CONSTANT __string_131={__STRING_CONSTANT__,9,"slot_call"};
 __STRING_CONSTANT __string_132={__STRING_CONSTANT__,10,"slot_style"};
 __STRING_CONSTANT __string_133={__STRING_CONSTANT__,5,"block"};
 __STRING_CONSTANT __string_134={__STRING_CONSTANT__,5,"local"};
-__STRING_CONSTANT __string_135={__STRING_CONSTANT__,5,"title"};
-__STRING_CONSTANT __string_136={__STRING_CONSTANT__,11,"table_begin"};
-__STRING_CONSTANT __string_137={__STRING_CONSTANT__,10,"table_item"};
-__STRING_CONSTANT __string_138={__STRING_CONSTANT__,15,"table_slot_name"};
-__STRING_CONSTANT __string_139={__STRING_CONSTANT__,18,"table_slot_comment"};
-__STRING_CONSTANT __string_140={__STRING_CONSTANT__,9,"table_end"};
-__STRING_CONSTANT __string_141={__STRING_CONSTANT__,9,"sub_title"};
-__STRING_CONSTANT __string_142={__STRING_CONSTANT__,10,"slot_title"};
-__STRING_CONSTANT __string_143={__STRING_CONSTANT__,5,"index"};
-__STRING_CONSTANT __string_144={__STRING_CONSTANT__,20,"directory_list_begin"};
-__STRING_CONSTANT __string_145={__STRING_CONSTANT__,19,"directory_list_item"};
-__STRING_CONSTANT __string_146={__STRING_CONSTANT__,18,"directory_list_end"};
-__STRING_CONSTANT __string_147={__STRING_CONSTANT__,15,"file_list_begin"};
-__STRING_CONSTANT __string_148={__STRING_CONSTANT__,14,"file_list_item"};
-__STRING_CONSTANT __string_149={__STRING_CONSTANT__,13,"file_list_end"};
-__STRING_CONSTANT __string_150={__STRING_CONSTANT__,1793,"------------------\
+__STRING_CONSTANT __string_135={__STRING_CONSTANT__,7,"warning"};
+__STRING_CONSTANT __string_136={__STRING_CONSTANT__,5,"title"};
+__STRING_CONSTANT __string_137={__STRING_CONSTANT__,11,"table_begin"};
+__STRING_CONSTANT __string_138={__STRING_CONSTANT__,10,"table_item"};
+__STRING_CONSTANT __string_139={__STRING_CONSTANT__,15,"table_slot_name"};
+__STRING_CONSTANT __string_140={__STRING_CONSTANT__,18,"table_slot_comment"};
+__STRING_CONSTANT __string_141={__STRING_CONSTANT__,9,"table_end"};
+__STRING_CONSTANT __string_142={__STRING_CONSTANT__,9,"sub_title"};
+__STRING_CONSTANT __string_143={__STRING_CONSTANT__,10,"slot_title"};
+__STRING_CONSTANT __string_144={__STRING_CONSTANT__,12,"subsub_title"};
+__STRING_CONSTANT __string_145={__STRING_CONSTANT__,14,"prototype_path"};
+__STRING_CONSTANT __string_146={__STRING_CONSTANT__,5,"index"};
+__STRING_CONSTANT __string_147={__STRING_CONSTANT__,20,"directory_list_begin"};
+__STRING_CONSTANT __string_148={__STRING_CONSTANT__,19,"directory_list_item"};
+__STRING_CONSTANT __string_149={__STRING_CONSTANT__,18,"directory_list_end"};
+__STRING_CONSTANT __string_150={__STRING_CONSTANT__,15,"file_list_begin"};
+__STRING_CONSTANT __string_151={__STRING_CONSTANT__,14,"file_list_item"};
+__STRING_CONSTANT __string_152={__STRING_CONSTANT__,13,"file_list_end"};
+__STRING_CONSTANT __string_153={__STRING_CONSTANT__,1793,"------------------\
 ----------------------------------------------\n--                   Lisaac \
 source Shorter                    --\n--            LORIA - LSIIT - ULP - CN\
 RS - FRANCE             --\n--         Benoit SONNTAG - sonntag at icps.u-stras\
@@ -2119,118 +2147,125 @@ isaac/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_151={__STRING_CONSTANT__,8,"shorter/"};
-__STRING_CONSTANT __string_152={__STRING_CONSTANT__,3,".li"};
-__STRING_CONSTANT __string_153={__STRING_CONSTANT__,20,"Error: File format `"};
-__STRING_CONSTANT __string_154={__STRING_CONSTANT__,16,"' is not open !\n"};
-__STRING_CONSTANT __string_155={__STRING_CONSTANT__,26,"Incorrect slot ident\
+__STRING_CONSTANT __string_154={__STRING_CONSTANT__,8,"shorter/"};
+__STRING_CONSTANT __string_155={__STRING_CONSTANT__,3,".li"};
+__STRING_CONSTANT __string_156={__STRING_CONSTANT__,20,"Error: File format `"};
+__STRING_CONSTANT __string_157={__STRING_CONSTANT__,16,"' is not open !\n"};
+__STRING_CONSTANT __string_158={__STRING_CONSTANT__,26,"Incorrect slot ident\
 ifier."};
-__STRING_CONSTANT __string_156={__STRING_CONSTANT__,23,"Double definition sl\
+__STRING_CONSTANT __string_159={__STRING_CONSTANT__,23,"Double definition sl\
 ot."};
-__STRING_CONSTANT __string_157={__STRING_CONSTANT__,26,"Assignment ':=' is n\
+__STRING_CONSTANT __string_160={__STRING_CONSTANT__,26,"Assignment ':=' is n\
 eeded."};
-__STRING_CONSTANT __string_158={__STRING_CONSTANT__,28,"Incorrect format exp\
+__STRING_CONSTANT __string_161={__STRING_CONSTANT__,28,"Incorrect format exp\
 ression."};
-__STRING_CONSTANT __string_159={__STRING_CONSTANT__,21,"Incorrect definition."};
-__STRING_CONSTANT __string_160={__STRING_CONSTANT__,20,"Added ';' is needed."};
-__STRING_CONSTANT __string_161={__STRING_CONSTANT__,17,"Incorrect symbol."};
-__STRING_CONSTANT __string_162={__STRING_CONSTANT__,18,"Error: directory `"};
-__STRING_CONSTANT __string_163={__STRING_CONSTANT__,13,"\' not found.\n"};
-__STRING_CONSTANT __string_164={__STRING_CONSTANT__,12,"\' not open.\n"};
-__STRING_CONSTANT __string_165={__STRING_CONSTANT__,14,"directory_list"};
-__STRING_CONSTANT __string_166={__STRING_CONSTANT__,9,"file_list"};
-__STRING_CONSTANT __string_167={__STRING_CONSTANT__,15,"Inherit Summary"};
-__STRING_CONSTANT __string_168={__STRING_CONSTANT__,6,"create"};
-__STRING_CONSTANT __string_169={__STRING_CONSTANT__,19,"Constructor Summary"};
-__STRING_CONSTANT __string_170={__STRING_CONSTANT__,12,"Slot Summary"};
-__STRING_CONSTANT __string_171={__STRING_CONSTANT__,14,"Inherit Detail"};
-__STRING_CONSTANT __string_172={__STRING_CONSTANT__,18,"Constructor Detail"};
-__STRING_CONSTANT __string_173={__STRING_CONSTANT__,11,"Slot Detail"};
-__STRING_CONSTANT __string_174={__STRING_CONSTANT__,19,"Not enough memory.\n"};
-__STRING_CONSTANT __string_175={__STRING_CONSTANT__,4,"_add"};
-__STRING_CONSTANT __string_176={__STRING_CONSTANT__,4,"_sub"};
-__STRING_CONSTANT __string_177={__STRING_CONSTANT__,9,"_logicnot"};
-__STRING_CONSTANT __string_178={__STRING_CONSTANT__,4,"_not"};
-__STRING_CONSTANT __string_179={__STRING_CONSTANT__,4,"_div"};
-__STRING_CONSTANT __string_180={__STRING_CONSTANT__,4,"_mul"};
-__STRING_CONSTANT __string_181={__STRING_CONSTANT__,4,"_xor"};
-__STRING_CONSTANT __string_182={__STRING_CONSTANT__,4,"_mod"};
-__STRING_CONSTANT __string_183={__STRING_CONSTANT__,8,"_greater"};
-__STRING_CONSTANT __string_184={__STRING_CONSTANT__,5,"_less"};
-__STRING_CONSTANT __string_185={__STRING_CONSTANT__,6,"_equal"};
-__STRING_CONSTANT __string_186={__STRING_CONSTANT__,7,"_notdiv"};
-__STRING_CONSTANT __string_187={__STRING_CONSTANT__,3,"_or"};
-__STRING_CONSTANT __string_188={__STRING_CONSTANT__,4,"_and"};
-__STRING_CONSTANT __string_189={__STRING_CONSTANT__,7,"_dollar"};
-__STRING_CONSTANT __string_190={__STRING_CONSTANT__,6,"_diese"};
-__STRING_CONSTANT __string_191={__STRING_CONSTANT__,3,"_at"};
-__STRING_CONSTANT __string_192={__STRING_CONSTANT__,4,"_ask"};
-__STRING_CONSTANT __string_193={__STRING_CONSTANT__,26,"End of comment not f\
+__STRING_CONSTANT __string_162={__STRING_CONSTANT__,21,"Incorrect definition."};
+__STRING_CONSTANT __string_163={__STRING_CONSTANT__,20,"Added ';' is needed."};
+__STRING_CONSTANT __string_164={__STRING_CONSTANT__,17,"Incorrect symbol."};
+__STRING_CONSTANT __string_165={__STRING_CONSTANT__,18,"Error: directory `"};
+__STRING_CONSTANT __string_166={__STRING_CONSTANT__,13,"\' not found.\n"};
+__STRING_CONSTANT __string_167={__STRING_CONSTANT__,12,"\' not open.\n"};
+__STRING_CONSTANT __string_168={__STRING_CONSTANT__,14,"directory_list"};
+__STRING_CONSTANT __string_169={__STRING_CONSTANT__,9,"file_list"};
+__STRING_CONSTANT __string_170={__STRING_CONSTANT__,15,"Inherit Summary"};
+__STRING_CONSTANT __string_171={__STRING_CONSTANT__,14," No developed."};
+__STRING_CONSTANT __string_172={__STRING_CONSTANT__,6,"create"};
+__STRING_CONSTANT __string_173={__STRING_CONSTANT__,19,"Constructor Summary"};
+__STRING_CONSTANT __string_174={__STRING_CONSTANT__,12,"Slot Summary"};
+__STRING_CONSTANT __string_175={__STRING_CONSTANT__,14,"Inherit Detail"};
+__STRING_CONSTANT __string_176={__STRING_CONSTANT__,7," line #"};
+__STRING_CONSTANT __string_177={__STRING_CONSTANT__,8,"Profile:"};
+__STRING_CONSTANT __string_178={__STRING_CONSTANT__,12,"Description:"};
+__STRING_CONSTANT __string_179={__STRING_CONSTANT__,11,"Parameters:"};
+__STRING_CONSTANT __string_180={__STRING_CONSTANT__,10,"Contracts:"};
+__STRING_CONSTANT __string_181={__STRING_CONSTANT__,9,"See also:"};
+__STRING_CONSTANT __string_182={__STRING_CONSTANT__,18,"Constructor Detail"};
+__STRING_CONSTANT __string_183={__STRING_CONSTANT__,11,"Slot Detail"};
+__STRING_CONSTANT __string_184={__STRING_CONSTANT__,19,"Not enough memory.\n"};
+__STRING_CONSTANT __string_185={__STRING_CONSTANT__,4,"_add"};
+__STRING_CONSTANT __string_186={__STRING_CONSTANT__,4,"_sub"};
+__STRING_CONSTANT __string_187={__STRING_CONSTANT__,9,"_logicnot"};
+__STRING_CONSTANT __string_188={__STRING_CONSTANT__,4,"_not"};
+__STRING_CONSTANT __string_189={__STRING_CONSTANT__,4,"_div"};
+__STRING_CONSTANT __string_190={__STRING_CONSTANT__,4,"_mul"};
+__STRING_CONSTANT __string_191={__STRING_CONSTANT__,4,"_xor"};
+__STRING_CONSTANT __string_192={__STRING_CONSTANT__,4,"_mod"};
+__STRING_CONSTANT __string_193={__STRING_CONSTANT__,8,"_greater"};
+__STRING_CONSTANT __string_194={__STRING_CONSTANT__,5,"_less"};
+__STRING_CONSTANT __string_195={__STRING_CONSTANT__,6,"_equal"};
+__STRING_CONSTANT __string_196={__STRING_CONSTANT__,7,"_notdiv"};
+__STRING_CONSTANT __string_197={__STRING_CONSTANT__,3,"_or"};
+__STRING_CONSTANT __string_198={__STRING_CONSTANT__,4,"_and"};
+__STRING_CONSTANT __string_199={__STRING_CONSTANT__,7,"_dollar"};
+__STRING_CONSTANT __string_200={__STRING_CONSTANT__,6,"_diese"};
+__STRING_CONSTANT __string_201={__STRING_CONSTANT__,3,"_at"};
+__STRING_CONSTANT __string_202={__STRING_CONSTANT__,4,"_ask"};
+__STRING_CONSTANT __string_203={__STRING_CONSTANT__,26,"End of comment not f\
 ound !"};
-__STRING_CONSTANT __string_194={__STRING_CONSTANT__,24,"Identifier is incorr\
+__STRING_CONSTANT __string_204={__STRING_CONSTANT__,24,"Identifier is incorr\
 ect."};
-__STRING_CONSTANT __string_195={__STRING_CONSTANT__,22,"Line counter overflo\
+__STRING_CONSTANT __string_205={__STRING_CONSTANT__,22,"Line counter overflo\
 w."};
-__STRING_CONSTANT __string_196={__STRING_CONSTANT__,40,"Column counter overf\
+__STRING_CONSTANT __string_206={__STRING_CONSTANT__,40,"Column counter overf\
 low (line too long)."};
-__STRING_CONSTANT __string_197={__STRING_CONSTANT__,20,"--SYNTAX-----------\n"};
-__STRING_CONSTANT __string_198={__STRING_CONSTANT__,20,"--SEMANTIC---------\n"};
-__STRING_CONSTANT __string_199={__STRING_CONSTANT__,20,"--WARNING----------\n"};
-__STRING_CONSTANT __string_200={__STRING_CONSTANT__,20,"--MESSAGE----------\n"};
-__STRING_CONSTANT __string_201={__STRING_CONSTANT__,6,"\nLine "};
-__STRING_CONSTANT __string_202={__STRING_CONSTANT__,8," column "};
-__STRING_CONSTANT __string_203={__STRING_CONSTANT__,4," in "};
-__STRING_CONSTANT __string_204={__STRING_CONSTANT__,3,"):\n"};
-__STRING_CONSTANT __string_205={__STRING_CONSTANT__,2,"^\n"};
-__STRING_CONSTANT __string_206={__STRING_CONSTANT__,21,"Variable not `token'."};
-__STRING_CONSTANT __string_207={__STRING_CONSTANT__,13,"Crash system."};
-__STRING_CONSTANT __string_208={__STRING_CONSTANT__,1,"."};
-__STRING_CONSTANT __string_209={__STRING_CONSTANT__,20,"Warning: directory `"};
-__STRING_CONSTANT __string_210={__STRING_CONSTANT__,36,"Error: Double defini\
+__STRING_CONSTANT __string_207={__STRING_CONSTANT__,20,"--SYNTAX-----------\n"};
+__STRING_CONSTANT __string_208={__STRING_CONSTANT__,20,"--SEMANTIC---------\n"};
+__STRING_CONSTANT __string_209={__STRING_CONSTANT__,20,"--WARNING----------\n"};
+__STRING_CONSTANT __string_210={__STRING_CONSTANT__,20,"--MESSAGE----------\n"};
+__STRING_CONSTANT __string_211={__STRING_CONSTANT__,6,"\nLine "};
+__STRING_CONSTANT __string_212={__STRING_CONSTANT__,8," column "};
+__STRING_CONSTANT __string_213={__STRING_CONSTANT__,4," in "};
+__STRING_CONSTANT __string_214={__STRING_CONSTANT__,3,"):\n"};
+__STRING_CONSTANT __string_215={__STRING_CONSTANT__,2,"^\n"};
+__STRING_CONSTANT __string_216={__STRING_CONSTANT__,21,"Variable not `token'."};
+__STRING_CONSTANT __string_217={__STRING_CONSTANT__,13,"Crash system."};
+__STRING_CONSTANT __string_218={__STRING_CONSTANT__,1,"."};
+__STRING_CONSTANT __string_219={__STRING_CONSTANT__,20,"Warning: directory `"};
+__STRING_CONSTANT __string_220={__STRING_CONSTANT__,36,"Error: Double defini\
 tion prototype:\n"};
-__STRING_CONSTANT __string_211={__STRING_CONSTANT__,4,".txt"};
-__STRING_CONSTANT __string_212={__STRING_CONSTANT__,12,"Error: File "};
-__STRING_CONSTANT __string_213={__STRING_CONSTANT__,18," is not created !\n"};
-__STRING_CONSTANT __string_214={__STRING_CONSTANT__,15," is not open !\n"};
-__STRING_CONSTANT __string_215={__STRING_CONSTANT__,20,"`Section' is needed."};
-__STRING_CONSTANT __string_216={__STRING_CONSTANT__,27,"Section `Header' is \
+__STRING_CONSTANT __string_221={__STRING_CONSTANT__,4,".txt"};
+__STRING_CONSTANT __string_222={__STRING_CONSTANT__,12,"Error: File "};
+__STRING_CONSTANT __string_223={__STRING_CONSTANT__,18," is not created !\n"};
+__STRING_CONSTANT __string_224={__STRING_CONSTANT__,15," is not open !\n"};
+__STRING_CONSTANT __string_225={__STRING_CONSTANT__,20,"`Section' is needed."};
+__STRING_CONSTANT __string_226={__STRING_CONSTANT__,27,"Section `Header' is \
 needed."};
-__STRING_CONSTANT __string_217={__STRING_CONSTANT__,22,"Slot `name' not foun\
+__STRING_CONSTANT __string_227={__STRING_CONSTANT__,22,"Slot `name' not foun\
 d."};
-__STRING_CONSTANT __string_218={__STRING_CONSTANT__,23,"Incorrect type secti\
+__STRING_CONSTANT __string_228={__STRING_CONSTANT__,23,"Incorrect type secti\
 on."};
-__STRING_CONSTANT __string_219={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
+__STRING_CONSTANT __string_229={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
 ert' must to be first section."};
-__STRING_CONSTANT __string_220={__STRING_CONSTANT__,78,"`Section Inherit' is\
+__STRING_CONSTANT __string_230={__STRING_CONSTANT__,78,"`Section Inherit' is\
  not possible with Expanded object (Use `Section Insert')."};
-__STRING_CONSTANT __string_221={__STRING_CONSTANT__,31,"No argument for inte\
+__STRING_CONSTANT __string_231={__STRING_CONSTANT__,31,"No argument for inte\
 rrupt slot."};
-__STRING_CONSTANT __string_222={__STRING_CONSTANT__,33,"No argument for inhe\
+__STRING_CONSTANT __string_232={__STRING_CONSTANT__,33,"No argument for inhe\
 ritance slot."};
-__STRING_CONSTANT __string_223={__STRING_CONSTANT__,27,"Incorrect slot decla\
+__STRING_CONSTANT __string_233={__STRING_CONSTANT__,27,"Incorrect slot decla\
 ration."};
-__STRING_CONSTANT __string_224={__STRING_CONSTANT__,22,"Incorrect result typ\
+__STRING_CONSTANT __string_234={__STRING_CONSTANT__,22,"Incorrect result typ\
 e."};
-__STRING_CONSTANT __string_225={__STRING_CONSTANT__,20,"Added ')' is needed."};
-__STRING_CONSTANT __string_226={__STRING_CONSTANT__,36,"Incorrect type for i\
+__STRING_CONSTANT __string_235={__STRING_CONSTANT__,20,"Added ')' is needed."};
+__STRING_CONSTANT __string_236={__STRING_CONSTANT__,36,"Incorrect type for i\
 nheritance slot."};
-__STRING_CONSTANT __string_227={__STRING_CONSTANT__,21,"Incorrect expression."};
-__STRING_CONSTANT __string_228={__STRING_CONSTANT__,7,"__init_"};
-__STRING_CONSTANT __string_229={__STRING_CONSTANT__,10,"Added ';'."};
-__STRING_CONSTANT __string_230={__STRING_CONSTANT__,24,"Double slot declarat\
+__STRING_CONSTANT __string_237={__STRING_CONSTANT__,21,"Incorrect expression."};
+__STRING_CONSTANT __string_238={__STRING_CONSTANT__,7,"__init_"};
+__STRING_CONSTANT __string_239={__STRING_CONSTANT__,10,"Added ';'."};
+__STRING_CONSTANT __string_240={__STRING_CONSTANT__,24,"Double slot declarat\
 ion."};
-__STRING_CONSTANT __string_231={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
+__STRING_CONSTANT __string_241={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
 t yet implemented."};
-__STRING_CONSTANT __string_232={__STRING_CONSTANT__,9,"Postfix '"};
-__STRING_CONSTANT __string_233={__STRING_CONSTANT__,7,"Infix '"};
-__STRING_CONSTANT __string_234={__STRING_CONSTANT__,8,"Prefix '"};
-__STRING_CONSTANT __string_235={__STRING_CONSTANT__,1,"+"};
-__STRING_CONSTANT __string_236={__STRING_CONSTANT__,1,"-"};
-__STRING_CONSTANT __string_237={__STRING_CONSTANT__,29,"Unterminated string \
+__STRING_CONSTANT __string_242={__STRING_CONSTANT__,9,"Postfix '"};
+__STRING_CONSTANT __string_243={__STRING_CONSTANT__,7,"Infix '"};
+__STRING_CONSTANT __string_244={__STRING_CONSTANT__,8,"Prefix '"};
+__STRING_CONSTANT __string_245={__STRING_CONSTANT__,1,"+"};
+__STRING_CONSTANT __string_246={__STRING_CONSTANT__,1,"-"};
+__STRING_CONSTANT __string_247={__STRING_CONSTANT__,29,"Unterminated string \
 constant."};
-__STRING_CONSTANT __string_238={__STRING_CONSTANT__,27,"Incorrect style slot\
+__STRING_CONSTANT __string_248={__STRING_CONSTANT__,27,"Incorrect style slot\
  ('-')."};
-__STRING_CONSTANT __string_239={__STRING_CONSTANT__,2509,"#include <pthread.\
+__STRING_CONSTANT __string_249={__STRING_CONSTANT__,2509,"#include <pthread.\
 h>\n#include <limits.h>\n\nvoid print_char(char car);\nint die_with_code(int\
  code);\n\nstatic pthread_key_t current_thread;\nstatic pthread_attr_t threa\
 d_attr;\npthread_t c_thread;\nint thread_counter;\n\nstatic char thread_stac\
@@ -2266,128 +2301,128 @@ stack[thread_counter++],PTHREAD_STACK_MIN);\n    if ((thread_counter>512) ||\
 while (*msg != 0) print_char(*(msg++));\n      die_with_code(1);\n    };\n  \
 } else {\n    node->object = obj;\n    pthread_mutex_unlock(&node->mutex);\n\
   };\n};\n\n"};
-__STRING_CONSTANT __string_240={__STRING_CONSTANT__,11,"Added ':='."};
-__STRING_CONSTANT __string_241={__STRING_CONSTANT__,31,"Prototype identifier\
+__STRING_CONSTANT __string_250={__STRING_CONSTANT__,11,"Added ':='."};
+__STRING_CONSTANT __string_251={__STRING_CONSTANT__,31,"Prototype identifier\
  is needed."};
-__STRING_CONSTANT __string_242={__STRING_CONSTANT__,34,"Incorrect name (file\
+__STRING_CONSTANT __string_252={__STRING_CONSTANT__,34,"Incorrect name (file\
 name != name)."};
-__STRING_CONSTANT __string_243={__STRING_CONSTANT__,24,"Object can't be gene\
+__STRING_CONSTANT __string_253={__STRING_CONSTANT__,24,"Object can't be gene\
 ric."};
-__STRING_CONSTANT __string_244={__STRING_CONSTANT__,10,"Added ':'."};
-__STRING_CONSTANT __string_245={__STRING_CONSTANT__,12,"Type needed."};
-__STRING_CONSTANT __string_246={__STRING_CONSTANT__,27,"Sorry, not yet imple\
+__STRING_CONSTANT __string_254={__STRING_CONSTANT__,10,"Added ':'."};
+__STRING_CONSTANT __string_255={__STRING_CONSTANT__,12,"Type needed."};
+__STRING_CONSTANT __string_256={__STRING_CONSTANT__,27,"Sorry, not yet imple\
 mented."};
-__STRING_CONSTANT __string_247={__STRING_CONSTANT__,36,"Identifier parameter\
+__STRING_CONSTANT __string_257={__STRING_CONSTANT__,36,"Identifier parameter\
  type is needed."};
-__STRING_CONSTANT __string_248={__STRING_CONSTANT__,10,"Added ')'."};
-__STRING_CONSTANT __string_249={__STRING_CONSTANT__,28,"Invalid generic list\
+__STRING_CONSTANT __string_258={__STRING_CONSTANT__,10,"Added ')'."};
+__STRING_CONSTANT __string_259={__STRING_CONSTANT__,28,"Invalid generic list\
  number."};
-__STRING_CONSTANT __string_250={__STRING_CONSTANT__,34,"Slot `name' must to \
+__STRING_CONSTANT __string_260={__STRING_CONSTANT__,34,"Slot `name' must to \
 be first slot."};
-__STRING_CONSTANT __string_251={__STRING_CONSTANT__,20,"Incorrect type list."};
-__STRING_CONSTANT __string_252={__STRING_CONSTANT__,19,"Incorrect external."};
-__STRING_CONSTANT __string_253={__STRING_CONSTANT__,3,"// "};
-__STRING_CONSTANT __string_254={__STRING_CONSTANT__,15,"Incorrect expr."};
-__STRING_CONSTANT __string_255={__STRING_CONSTANT__,33,"Double `default' slo\
+__STRING_CONSTANT __string_261={__STRING_CONSTANT__,20,"Incorrect type list."};
+__STRING_CONSTANT __string_262={__STRING_CONSTANT__,19,"Incorrect external."};
+__STRING_CONSTANT __string_263={__STRING_CONSTANT__,3,"// "};
+__STRING_CONSTANT __string_264={__STRING_CONSTANT__,15,"Incorrect expr."};
+__STRING_CONSTANT __string_265={__STRING_CONSTANT__,33,"Double `default' slo\
 t definition."};
-__STRING_CONSTANT __string_256={__STRING_CONSTANT__,30,"Double `type' slot d\
+__STRING_CONSTANT __string_266={__STRING_CONSTANT__,30,"Double `type' slot d\
 efinition."};
-__STRING_CONSTANT __string_257={__STRING_CONSTANT__,17,"Incorrect number."};
-__STRING_CONSTANT __string_258={__STRING_CONSTANT__,21,"Added '<-' is needed."};
-__STRING_CONSTANT __string_259={__STRING_CONSTANT__,20,"Added '(' is needed."};
-__STRING_CONSTANT __string_260={__STRING_CONSTANT__,17,"Unreachable code."};
-__STRING_CONSTANT __string_261={__STRING_CONSTANT__,17,"Incorrect string."};
-__STRING_CONSTANT __string_262={__STRING_CONSTANT__,15,"Incorrect slot."};
-__STRING_CONSTANT __string_263={__STRING_CONSTANT__,59,"For a section, the p\
+__STRING_CONSTANT __string_267={__STRING_CONSTANT__,17,"Incorrect number."};
+__STRING_CONSTANT __string_268={__STRING_CONSTANT__,21,"Added '<-' is needed."};
+__STRING_CONSTANT __string_269={__STRING_CONSTANT__,20,"Added '(' is needed."};
+__STRING_CONSTANT __string_270={__STRING_CONSTANT__,17,"Unreachable code."};
+__STRING_CONSTANT __string_271={__STRING_CONSTANT__,17,"Incorrect string."};
+__STRING_CONSTANT __string_272={__STRING_CONSTANT__,15,"Incorrect slot."};
+__STRING_CONSTANT __string_273={__STRING_CONSTANT__,59,"For a section, the p\
 rototype name only (without '['...']')."};
-__STRING_CONSTANT __string_264={__STRING_CONSTANT__,14,"Slot deferred."};
-__STRING_CONSTANT __string_265={__STRING_CONSTANT__,15,"Incorrect type."};
-__STRING_CONSTANT __string_266={__STRING_CONSTANT__,22,"Type `SELF' is neede\
+__STRING_CONSTANT __string_274={__STRING_CONSTANT__,14,"Slot deferred."};
+__STRING_CONSTANT __string_275={__STRING_CONSTANT__,15,"Incorrect type."};
+__STRING_CONSTANT __string_276={__STRING_CONSTANT__,22,"Type `SELF' is neede\
 d."};
-__STRING_CONSTANT __string_267={__STRING_CONSTANT__,20,"Added ':' is needed."};
-__STRING_CONSTANT __string_268={__STRING_CONSTANT__,30,"Incorrect argument i\
+__STRING_CONSTANT __string_277={__STRING_CONSTANT__,20,"Added ':' is needed."};
+__STRING_CONSTANT __string_278={__STRING_CONSTANT__,30,"Incorrect argument i\
 dentifier."};
-__STRING_CONSTANT __string_269={__STRING_CONSTANT__,24,"Incorrect argument t\
+__STRING_CONSTANT __string_279={__STRING_CONSTANT__,24,"Incorrect argument t\
 ype."};
-__STRING_CONSTANT __string_270={__STRING_CONSTANT__,30,"Incorrect argument d\
+__STRING_CONSTANT __string_280={__STRING_CONSTANT__,30,"Incorrect argument d\
 efinition."};
-__STRING_CONSTANT __string_271={__STRING_CONSTANT__,19,"Operator is needed."};
-__STRING_CONSTANT __string_272={__STRING_CONSTANT__,19,"Incorrect operator."};
-__STRING_CONSTANT __string_273={__STRING_CONSTANT__,10,"Added `''."};
-__STRING_CONSTANT __string_274={__STRING_CONSTANT__,29,"Operator declaration\
+__STRING_CONSTANT __string_281={__STRING_CONSTANT__,19,"Operator is needed."};
+__STRING_CONSTANT __string_282={__STRING_CONSTANT__,19,"Incorrect operator."};
+__STRING_CONSTANT __string_283={__STRING_CONSTANT__,10,"Added `''."};
+__STRING_CONSTANT __string_284={__STRING_CONSTANT__,29,"Operator declaration\
  invalid."};
-__STRING_CONSTANT __string_275={__STRING_CONSTANT__,39,"Not associativity fo\
+__STRING_CONSTANT __string_285={__STRING_CONSTANT__,39,"Not associativity fo\
 r postfix operator."};
-__STRING_CONSTANT __string_276={__STRING_CONSTANT__,38,"Not associativity fo\
+__STRING_CONSTANT __string_286={__STRING_CONSTANT__,38,"Not associativity fo\
 r prefix operator."};
-__STRING_CONSTANT __string_277={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
+__STRING_CONSTANT __string_287={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
 n External'."};
-__STRING_CONSTANT __string_278={__STRING_CONSTANT__,7,"Added '"};
-__STRING_CONSTANT __string_279={__STRING_CONSTANT__,2,"'."};
-__STRING_CONSTANT __string_280={__STRING_CONSTANT__,10,"Added '}'."};
-__STRING_CONSTANT __string_281={__STRING_CONSTANT__,27,"`Expanded' is not po\
+__STRING_CONSTANT __string_288={__STRING_CONSTANT__,7,"Added '"};
+__STRING_CONSTANT __string_289={__STRING_CONSTANT__,2,"'."};
+__STRING_CONSTANT __string_290={__STRING_CONSTANT__,10,"Added '}'."};
+__STRING_CONSTANT __string_291={__STRING_CONSTANT__,27,"`Expanded' is not po\
 ssible."};
-__STRING_CONSTANT __string_282={__STRING_CONSTANT__,10,"Added ']'."};
-__STRING_CONSTANT __string_283={__STRING_CONSTANT__,45,"Impossible '<-' styl\
+__STRING_CONSTANT __string_292={__STRING_CONSTANT__,10,"Added ']'."};
+__STRING_CONSTANT __string_293={__STRING_CONSTANT__,45,"Impossible '<-' styl\
 e assignment with vector."};
-__STRING_CONSTANT __string_284={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
+__STRING_CONSTANT __string_294={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
 mented !"};
-__STRING_CONSTANT __string_285={__STRING_CONSTANT__,1,"{"};
-__STRING_CONSTANT __string_286={__STRING_CONSTANT__,1,"}"};
-__STRING_CONSTANT __string_287={__STRING_CONSTANT__,24,"Unknown escape seque\
+__STRING_CONSTANT __string_295={__STRING_CONSTANT__,1,"{"};
+__STRING_CONSTANT __string_296={__STRING_CONSTANT__,1,"}"};
+__STRING_CONSTANT __string_297={__STRING_CONSTANT__,24,"Unknown escape seque\
 nce."};
-__STRING_CONSTANT __string_288={__STRING_CONSTANT__,39,"Invalid range charac\
+__STRING_CONSTANT __string_298={__STRING_CONSTANT__,39,"Invalid range charac\
 ter number [0,255]."};
-__STRING_CONSTANT __string_289={__STRING_CONSTANT__,23,"Character '\' is nee\
+__STRING_CONSTANT __string_299={__STRING_CONSTANT__,23,"Character '\' is nee\
 ded."};
-__STRING_CONSTANT __string_290={__STRING_CONSTANT__,24,"Incorrect Result num\
+__STRING_CONSTANT __string_300={__STRING_CONSTANT__,24,"Incorrect Result num\
 ber."};
-__STRING_CONSTANT __string_291={__STRING_CONSTANT__,25,"Incorrect live type \
+__STRING_CONSTANT __string_301={__STRING_CONSTANT__,25,"Incorrect live type \
 list."};
-__STRING_CONSTANT __string_292={__STRING_CONSTANT__,23,"Incorrect octal numb\
+__STRING_CONSTANT __string_302={__STRING_CONSTANT__,23,"Incorrect octal numb\
 er."};
-__STRING_CONSTANT __string_293={__STRING_CONSTANT__,24,"Incorrect binary num\
+__STRING_CONSTANT __string_303={__STRING_CONSTANT__,24,"Incorrect binary num\
 ber."};
-__STRING_CONSTANT __string_294={__STRING_CONSTANT__,25,"Incorrect decimal nu\
+__STRING_CONSTANT __string_304={__STRING_CONSTANT__,25,"Incorrect decimal nu\
 mber."};
-__STRING_CONSTANT __string_295={__STRING_CONSTANT__,6,"Slot `"};
-__STRING_CONSTANT __string_296={__STRING_CONSTANT__,12,"' not found."};
-__STRING_CONSTANT __string_297={__STRING_CONSTANT__,30,"No argument for `exi\
+__STRING_CONSTANT __string_305={__STRING_CONSTANT__,6,"Slot `"};
+__STRING_CONSTANT __string_306={__STRING_CONSTANT__,12,"' not found."};
+__STRING_CONSTANT __string_307={__STRING_CONSTANT__,30,"No argument for `exi\
 t' method."};
-__STRING_CONSTANT __string_298={__STRING_CONSTANT__,23,"String argument need\
+__STRING_CONSTANT __string_308={__STRING_CONSTANT__,23,"String argument need\
 ed."};
-__STRING_CONSTANT __string_299={__STRING_CONSTANT__,17,"Invalid argument."};
-__STRING_CONSTANT __string_300={__STRING_CONSTANT__,21,"No expression result."};
-__STRING_CONSTANT __string_301={__STRING_CONSTANT__,15,"BOOLEAN needed."};
-__STRING_CONSTANT __string_302={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
-__STRING_CONSTANT __string_303={__STRING_CONSTANT__,22,"Prototype name neede\
+__STRING_CONSTANT __string_309={__STRING_CONSTANT__,17,"Invalid argument."};
+__STRING_CONSTANT __string_310={__STRING_CONSTANT__,21,"No expression result."};
+__STRING_CONSTANT __string_311={__STRING_CONSTANT__,15,"BOOLEAN needed."};
+__STRING_CONSTANT __string_312={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
+__STRING_CONSTANT __string_313={__STRING_CONSTANT__,22,"Prototype name neede\
 d."};
-__STRING_CONSTANT __string_304={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
+__STRING_CONSTANT __string_314={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_305={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
+__STRING_CONSTANT __string_315={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_306={__STRING_CONSTANT__,7,"Style `"};
-__STRING_CONSTANT __string_307={__STRING_CONSTANT__,32,"' for parameter type\
+__STRING_CONSTANT __string_316={__STRING_CONSTANT__,7,"Style `"};
+__STRING_CONSTANT __string_317={__STRING_CONSTANT__,32,"' for parameter type\
  is ignored."};
-__STRING_CONSTANT __string_308={__STRING_CONSTANT__,10,"' ignored."};
-__STRING_CONSTANT __string_309={__STRING_CONSTANT__,21,"Incorrect identifier."};
-__STRING_CONSTANT __string_310={__STRING_CONSTANT__,21,"Incorrect local type."};
-__STRING_CONSTANT __string_311={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
+__STRING_CONSTANT __string_318={__STRING_CONSTANT__,10,"' ignored."};
+__STRING_CONSTANT __string_319={__STRING_CONSTANT__,21,"Incorrect identifier."};
+__STRING_CONSTANT __string_320={__STRING_CONSTANT__,21,"Incorrect local type."};
+__STRING_CONSTANT __string_321={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
 ession."};
-__STRING_CONSTANT __string_312={__STRING_CONSTANT__,18,"Incorrect message."};
-__STRING_CONSTANT __string_313={__STRING_CONSTANT__,22,"Incorrect real numbe\
+__STRING_CONSTANT __string_322={__STRING_CONSTANT__,18,"Incorrect message."};
+__STRING_CONSTANT __string_323={__STRING_CONSTANT__,22,"Incorrect real numbe\
 r."};
-__STRING_CONSTANT __string_314={__STRING_CONSTANT__,28,"Character constant t\
+__STRING_CONSTANT __string_324={__STRING_CONSTANT__,28,"Character constant t\
 oo long."};
-__STRING_CONSTANT __string_315={__STRING_CONSTANT__,32,"Unterminated charact\
+__STRING_CONSTANT __string_325={__STRING_CONSTANT__,32,"Unterminated charact\
 er constant."};
-__STRING_CONSTANT __string_316={__STRING_CONSTANT__,37,"Incorrect multiple r\
+__STRING_CONSTANT __string_326={__STRING_CONSTANT__,37,"Incorrect multiple r\
 esult expression."};
-__STRING_CONSTANT __string_317={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
+__STRING_CONSTANT __string_327={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
 M.read_integer.\n"};
-__STRING_CONSTANT __string_318={__STRING_CONSTANT__,21,"Incorrect directory `"};
-__STRING_CONSTANT __string_319={__STRING_CONSTANT__,19,"Incorrect argument."};
-__STRING_CONSTANT __string_320={__STRING_CONSTANT__,15,"Type incorrect."};
+__STRING_CONSTANT __string_328={__STRING_CONSTANT__,21,"Incorrect directory `"};
+__STRING_CONSTANT __string_329={__STRING_CONSTANT__,19,"Incorrect argument."};
+__STRING_CONSTANT __string_330={__STRING_CONSTANT__,15,"Type incorrect."};
 
 //==========================//
 // FUNCTION HEADER          //
@@ -2396,208 +2431,210 @@ __STRING_CONSTANT __string_320={__STRING_CONSTANT__,15,"Type incorrect."};
 // Debug Manager
 void print_string(char *str);
 // Source code
-static __STRING* create__EBB(__INTEGER needed_capacity__GBB);
-static __POINTER new_lab__ARJ(__UINTEGER_32 t__CRJ);
-static void** create__NFRB(__INTEGER nb_elements__PFRB);
-static void add_last__NLT(__STRING *Self__OLT,__CHARACTER ch__PLT);
-static void add_last__URV(__FAST_ARRAYoSTRINGo *Self__VRV,void *element__WRV);
-static __INTEGER prime_number_ceiling__L41(__INTEGER integer__N41);
-static void** create__LB4(__INTEGER nb_elements__NB4);
-static void** create__1HTC(__INTEGER nb_elements__3HTC);
-static void** create__0ESB(__INTEGER nb_elements__2ESB);
-static void** create__VF4(__INTEGER nb_elements__XF4);
-static void** create__AZ2(__INTEGER nb_elements__CZ2);
-static void** create__AJRB(__INTEGER nb_elements__CJRB);
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__2ER(__INTEGER new_count__4ER);
-static void** create__PZBB(__INTEGER nb_elements__RZBB);
-static void** create__JLXB(__INTEGER nb_elements__LLXB);
-static void** create__EUWB(__INTEGER nb_elements__GUWB);
-static void** create__DSXB(__INTEGER nb_elements__FSXB);
-static void** create__JH5(__INTEGER nb_elements__LH5);
-static void fast_put__to__HOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__IOZ,void *v__JOZ,void *k__KOZ);
-static void** create__PHYB(__INTEGER nb_elements__RHYB);
-static void* get__XSI(void *n__ZSI);
-static void** create__YGQB(__INTEGER nb_elements__0GQB);
-static void** create__I1PB(__INTEGER nb_elements__K1PB);
-static void** create__T3ZB(__INTEGER nb_elements__V3ZB);
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__VGRC(__INTEGER new_count__XGRC);
-static void** create__DPSF(__INTEGER nb_elements__FPSF);
-static void** create__4XEF(__INTEGER nb_elements__AYEF);
-static void** create__RNWF(__INTEGER nb_elements__TNWF);
-static void** create__5KIE(__INTEGER nb_elements__BLIE);
-static void* new_page__CA5();
-static void to_busy__index__HTFC(__MEMORY *Self__ITFC,__UINTEGER_32 sz__JTFC,__UINTEGER_32 idx__KTFC);
-static void** create__R1XC(__INTEGER nb_elements__T1XC);
-static void** create__UAYC(__INTEGER nb_elements__WAYC);
-static void** create__YKBD(__INTEGER nb_elements__0KBD);
-static void** create__VJ2(__INTEGER nb_elements__XJ2);
-static void add__2XR(__HASHED_SEToABSTRACT_STRINGo *Self__3XR,void *e__4XR);
-static void* operator__name__KGB(void *op__NGB);
-static void print__KHD(__STRING_CONSTANT *Self__LHD);
-static void* get__2VB(void *str__4VB);
-static void copy__NCS(__STRING *Self__OCS,void *other__PCS);
-static void append__VNS(__STRING *Self__WNS,void *other__XNS);
-static void* parent_directory__CED();
-static void* get_entry__H0AC(void *p__J0AC);
-static void put_string__I1F(void *s__K1F);
-static __PROTOTYPE* create__name__generic_count__NAC(void *f__PAC,void *n__QAC);
-static __BOOLEAN read_space__RRD();
-static __BOOLEAN read_identifier__55K();
-static __POSITION current_position__3WF();
-static void put_error__text__4MG(__INTEGER type__ANG,void *txt__BNG);
-static void put_position__IOG(__POSITION Self__JOG);
-static __BOOLEAN read_symbol__XWJ(void *st__ZWJ);
-static __BOOLEAN read_short_elt__5KKB();
-static void fast_put__to__M1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__N1R,void *k__P1R);
-static __TYPE_FULL* create__with__GQB(void *typ__IQB,__UINTEGER_8 code__JQB);
-static void** create__WYNB(__INTEGER nb_elements__YYNB);
-static void add_last__C4R(__FAST_ARRAYoTYPE_IDo *Self__D4R,void *element__E4R);
-static __BOOLEAN open__NERD(__DIRECTORY_UNIX *Self__OERD);
-static void check_in__begin__SQQC(void *entry__UQQC,__INTEGER n__VQQC);
-static void* add_ext__YAF(void *n__0AF);
-static void save_file__with__DDC(void *n__FDC,void *buf__GDC);
-static void resize__MXZ(__STRING *Self__NXZ,__INTEGER new_count__OXZ);
-static void move__to__by__VVCC(__CHARACTER *Self__WVCC,__INTEGER lower__XVCC,__INTEGER upper__YVCC,__INTEGER offset__ZVCC);
-static __BOOLEAN __infix_equal_equal__S5DB(__STRING_CONSTANT *Self__T5DB,void *other__U5DB);
-static void* at__EL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FL4,void *k__GL4);
-static void go_on__WAC(void *obj__YAC);
-static void put__to__like__CZXD(void *tok__EZXD,void *buf__FZXD,void *key__GZXD);
-static void pretty_name_in__DW1E(__ITM_SLOT *Self__EW1E,void *buffer__FW1E);
-static void pretty_name_in__YX1E(__ITM_SLOT_OPERATOR *Self__ZX1E,void *buffer__0X1E);
-static void get_all_comment_slot__in__OZ1E(__PROTOTYPE *Self__PZ1E,void *n__QZ1E,void *buf__RZ1E);
-static void shorter_profile_in__JB2E(__ITM_SLOT *Self__KB2E,void *buf__LB2E);
-static void shorter_profile_in__GC2E(__ITM_SLOT_OPERATOR *Self__HC2E,void *buf__IC2E);
-static __CHARACTER* create__VLEB(__INTEGER nb_elements__XLEB);
-static __POINTER realloc_dynamic__old_size__new_size__FELC(__POINTER p__HELC,__UINTEGER_32 old_sz__IELC,__UINTEGER_32 new_sz__JELC);
-static void** create__HBRB(__INTEGER nb_elements__JBRB);
-static void* fast_reference_at__M1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__N1T,void *k__O1T);
-static void** create__G0GE(__INTEGER nb_elements__I0GE);
-static __BOOLEAN has__PPW(__HASHED_SEToABSTRACT_STRINGo *Self__QPW,void *e__RPW);
-static void increase_capacity__SRNB(__HASHED_SEToABSTRACT_STRINGo *Self__TRNB);
-static void put_string__MHF(void *s__OHF);
-static __BOOLEAN fast_has__CAY(__HASHED_SEToABSTRACT_STRINGo *Self__DAY,void *e__EAY);
-static void* physical_get_entry__3BF(void *new_path__5BF);
-static void put__to__F0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__G0S,void *v__H0S,void *k__I0S);
-static void reduce_path__E3HC(void *st__G3HC);
-static void* reference_at__YT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__ZT0C,void *k__0T0C);
-static void* physical_get_entry__MW0C(void *new_path__OW0C);
-static void** create__JY1C(__INTEGER nb_elements__LY1C);
-static void** create__RQSC(__INTEGER nb_elements__TQSC);
-static void short__token__to__5AD(void *key__BBD,__INTEGER beg__CBD,__INTEGER end__DBD);
-static __INTEGER first_substring_index__OIYE(__STRING *Self__PIYE);
-static void append_in__CIH(__UINTEGER_32 Self__DIH,void *buffer__EIH);
-static __BOOLEAN read_string__5EQ();
-static void reduce_path__MI2E(void *st__OI2E);
-static void* item__VEPE(__DIRECTORY_UNIX *Self__WEPE,__INTEGER i__XEPE);
-static void* item__M0ND(__LINKED_LISToSTRING_CONSTANTo *Self__N0ND,__INTEGER i__O0ND);
-static void** create__H23(__INTEGER nb_elements__J23);
-static __BOOLEAN read_word__EPF(void *st__GPF);
-static __BOOLEAN read_slot_header__GDE(__BOOLEAN first__IDE);
-static void* get_name__OUOB(void *n__QUOB);
-static void* read_type_list__2LO(__PARSER *Self__3LO,__BOOLEAN is_section__4LO);
-static __INTEGER hash_code__D50(__FAST_ARRAYoITM_TYPE_MONOo *Self__E50);
-static __CHARACTER read_style__LRF();
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__FL5B(__INTEGER new_count__HL5B);
-static void* read_loc_arg__with_self__2DHB(__PARSER *Self__3DHB,__BOOLEAN mute__4DHB,__BOOLEAN self_first__5DHB);
-static void* read_slot_operator__ZT5B(void *list_arg__1T5B);
-static void add_last__O5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__P5GC,void *element__Q5GC);
-static void* read_slot_keyword__GZ5B(void *list_arg__IZ5B);
-static void** create__KPBD(__INTEGER nb_elements__MPBD);
-static void set_argument_list__JCHC(__ITM_SLOT *Self__KCHC,void *p__LCHC);
-static __ITM_TYPE_MULTI* get__WIP(void *lt__YIP);
-static void* read_type__XBM(__PARSER *Self__YBM,__BOOLEAN is_local__ZBM);
-static void set_result_type__E3FC(__ITM_SLOT *Self__F3FC,void *t__G3FC);
-static void* read_contract__1SF(__PARSER *Self__2SF);
-static void* read_expr__S4I(__PARSER *Self__T4I);
-static void set_value__type__NFHC(__ITM_SLOT *Self__OFHC,void *e__PFHC,void *p__QFHC);
-static __POSITION position__ZC5B(__ITM_EXPRESSION *Self__0C5B);
-static __POSITION position__ZIHC(__ITM_RESULT *Self__0IHC);
-static void fast_put__to__VNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__WNGC,void *v__XNGC,void *k__YNGC);
-static void* fast_reference_at__EAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__FAGC,void *k__GAGC);
-static void* fast_reference_at__TR4D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UR4D,void *k__VR4D);
-static void put__to__like__QJIF(void *tok__SJIF,void *buf__TJIF,void *key__UJIF);
-static void shorter_in__CIIF(__ITM_ARG *Self__DIIF,void *buf__EIIF);
-static void shorter_in__NPOF(__ITM_ARGS *Self__OPOF,void *buf__PPOF);
-static void put__to__like__L3LF(void *tok__N3LF,void *buf__O3LF,void *key__P3LF);
-static void put__to__like__C5LF(void *tok__E5LF,void *buf__F5LF,void *key__G5LF);
-static void shorter_raw_in__Z1KF(__ITM_TYPE_MULTI *Self__01KF,void *buf__11KF);
-static void shorter_in__FXJF(__ITM_TYPE_BLOCK *Self__GXJF,void *buf__HXJF);
-static void shorter_in__NYJF(__ITM_TYPE_GENERIC *Self__OYJF,void *buf__PYJF);
-static void put__to__like__HBMF(void *tok__JBMF,void *buf__KBMF,void *key__LBMF);
-static void put__to__like__B1JF(void *tok__D1JF,void *buf__E1JF,void *key__F1JF);
-static void set_path__CNT(__DIRECTORY_UNIX *Self__DNT,void *n__ENT);
-static void set_path__3NT(__FILE_UNIX *Self__4NT,void *n__5NT);
-static void insert_string__to__OXU(__STRING *Self__PXU,void *s__QXU,__INTEGER i__RXU);
-static void read_escape_character__PIJF();
-static __BOOLEAN read_cap_identifier__GZJ();
-static void add_last__GBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__HBBC,void *element__IBBC);
-static __BOOLEAN read_external__USO();
-static void* read_expr_primary__23M(__PARSER *Self__33M);
-static __BOOLEAN read_integer__U1P();
-static void* readlip_expr__3SPB();
-static void run__EGFC(__LIP_AFFECT *Self__FGFC);
-static void run__FNTE(__LIP_CALL *Self__GNTE);
-static void run__QCQD(__LIP_IF *Self__RCQD);
-static void run__ZRTE(__LIP_PRINT *Self__0RTE);
-static void add_last__ONV(__FAST_ARRAYoITM_TYPE_MONOo *Self__PNV,void *element__QNV);
-static void* alias__0UP(void *tmp__2UP);
-static void add__WLHB(__HASHED_SEToSTRING_CONSTANTo *Self__XLHB,void *e__YLHB);
-static void add_last__FBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__GBPD,void *element__HBPD);
-static void free__OS5(void *tmp__QS5);
-static void free__QMQ(void *tmp__SMQ);
-static __INTEGER hash_code__WCQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__XCQF);
-static void copy__Q2RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__R2RD,void *other__S2RD);
-static __BOOLEAN read_operator__1MM();
-static void* operator__name__RDO(void *typ__TDO,void *op__UDO);
-static void append_in__GIBC(__ITM_TYPE_MULTI *Self__HIBC,void *buffer__IIBC);
-static void append_in__CGPD(__ITM_TYPE_BLOCK *Self__DGPD,void *buffer__EGPD);
-static void append_in__GHPD(__ITM_TYPE_GENERIC *Self__HHPD,void *buffer__IHPD);
-static void* read_prototype__1NN(__PARSER *Self__2NN,void *styl__3NN);
-static void read_def_local__R0H(__PARSER *Self__S0H);
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__GVI(__INTEGER new_count__IVI);
-static void add_last__I5U(__FAST_ARRAYoITM_CODEo *Self__J5U,void *element__K5U);
-static void* copy__E5H(void *tmp__G5H);
-static __BOOLEAN fast_has__RDV(__HASHED_SEToSTRING_CONSTANTo *Self__SDV,void *e__TDV);
-static void restore_context__HDL();
-static void* read_expr_message__OVL(__PARSER *Self__PVL);
-static void free__MVI(void *tmp__OVI);
-static void put__to__like__2MLF(void *tok__4MLF,void *buf__5MLF,void *key__ANLF);
-static void put__to__like__VRPF(void *tok__XRPF,void *buf__YRPF,void *key__ZRPF);
-static void put__to__like__3WKF(void *tok__5WKF,void *buf__AXKF);
-static void put__to__like__JZKF(void *tok__LZKF,void *buf__MZKF,void *key__NZKF);
-static __BOOLEAN is_hexadecimal_digit__X4IE(__CHARACTER Self__Y4IE);
-static void* read_constant__PQO();
-static void* read_group__3AHB(__PARSER *Self__4AHB);
-static void* readlip_expr_operator__AOZB(__PARSER *Self__BOZB);
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__QQKD(__INTEGER new_count__SQKD);
-static void add_last__QIUD(__FAST_ARRAYoLIP_CODEo *Self__RIUD,void *element__SIUD);
-static void* copy__2KID(void *tmp__4KID);
-static void* fast_reference_at__CURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__DURD,void *k__EURD);
-static void* run_expr__0YQD(__LIP_BINARY *Self__1YQD);
-static void* run_expr__Z1QD(__LIP_UNARY *Self__01QD);
-static void* run_expr__XTTE(__LIP_CALL *Self__YTTE);
-static void* get__IWRE(__LIP_INTEGER *Self__JWRE,__INTEGER i__KWRE);
-static void* get__3HEF(__LIP_STRING *Self__4HEF,void *str__5HEF);
-static void free__4R1F(__LIP_INTEGER *Self__5R1F);
-static void free__DEDG(__LIP_STRING *Self__EEDG);
-static void load_directory__is_recursive__TFVF(__LIP_CALL *Self__UFVF,void *path__VFVF,__BOOLEAN is_rec__WFVF);
-static void append_in__JKDG(__LIP_STRING *Self__KKDG,void *str__LKDG);
-static void print_positif__AYFG(__INTEGER Self__BYFG);
-static __BOOLEAN has__HLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ILMB,void *e__JLMB);
-static void display_raw__HLIC(__ITM_TYPE_MULTI *Self__ILIC,void *buffer__JLIC);
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__EJK(__INTEGER new_count__GJK);
-static void add_last__Z1U(__FAST_ARRAYoITM_LOCALo *Self__01U,void *element__11U);
-static void free__KJK(void *tmp__MJK);
-static void* copy__T3J(void *tmp__V3J);
-static void** create__1SQB(__INTEGER nb_elements__3SQB);
-static void* read_send_msg__A4N(__PARSER *Self__B4N,void *first_arg__C4N);
-static void* readlip_expr_cmp__U01B(__PARSER *Self__V01B);
-static void** create__LFIE(__INTEGER nb_elements__NFIE);
-static void** create__1QQB(__INTEGER nb_elements__3QQB);
-static void* read_argument__HOP(__PARSER *Self__IOP);
-static void* readlip_expr_binary__RN3B(__PARSER *Self__SN3B);
-static void* readlip_expr_unary__SZ4B(__PARSER *Self__TZ4B);
-static void* readlip_expr_base__GVEE(__PARSER *Self__HVEE);
+static __STRING* create__NBB(__INTEGER needed_capacity__PBB);
+static __POINTER new_lab__MRJ(__UINTEGER_32 t__ORJ);
+static void** create__ZFRB(__INTEGER nb_elements__1FRB);
+static void add_last__ZLT(__STRING *Self__0LT,__CHARACTER ch__1LT);
+static void add_last__ASV(__FAST_ARRAYoSTRINGo *Self__BSV,void *element__CSV);
+static __INTEGER prime_number_ceiling__X41(__INTEGER integer__Z41);
+static void** create__XB4(__INTEGER nb_elements__ZB4);
+static void** create__HITC(__INTEGER nb_elements__JITC);
+static void** create__GFSB(__INTEGER nb_elements__IFSB);
+static void** create__BG4(__INTEGER nb_elements__DG4);
+static void** create__MZ2(__INTEGER nb_elements__OZ2);
+static void** create__MJRB(__INTEGER nb_elements__OJRB);
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__IFR(__INTEGER new_count__KFR);
+static void** create__1ZBB(__INTEGER nb_elements__3ZBB);
+static void** create__VLXB(__INTEGER nb_elements__XLXB);
+static void** create__QUWB(__INTEGER nb_elements__SUWB);
+static void** create__PSXB(__INTEGER nb_elements__RSXB);
+static void** create__VH5(__INTEGER nb_elements__XH5);
+static void fast_put__to__TOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UOZ,void *v__VOZ,void *k__WOZ);
+static void** create__1HYB(__INTEGER nb_elements__3HYB);
+static void* get__DTI(void *n__FTI);
+static void** create__EHQB(__INTEGER nb_elements__GHQB);
+static void** create__U1PB(__INTEGER nb_elements__W1PB);
+static void** create__53ZB(__INTEGER nb_elements__B4ZB);
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__BHRC(__INTEGER new_count__DHRC);
+static void** create__KDTF(__INTEGER nb_elements__MDTF);
+static void** create__YMFF(__INTEGER nb_elements__0MFF);
+static void** create__CFXF(__INTEGER nb_elements__EFXF);
+static void** create__I0IE(__INTEGER nb_elements__K0IE);
+static void* new_page__OA5();
+static void to_busy__index__TTFC(__MEMORY *Self__UTFC,__UINTEGER_32 sz__VTFC,__UINTEGER_32 idx__WTFC);
+static void** create__31XC(__INTEGER nb_elements__51XC);
+static void** create__ABYC(__INTEGER nb_elements__CBYC);
+static void** create__ELBD(__INTEGER nb_elements__GLBD);
+static void** create__5FEF(__INTEGER nb_elements__BGEF);
+static void** create__BK2(__INTEGER nb_elements__DK2);
+static void add__IYR(__HASHED_SEToABSTRACT_STRINGo *Self__JYR,void *e__KYR);
+static void* operator__name__WGB(void *op__ZGB);
+static void print__WHD(__STRING_CONSTANT *Self__XHD);
+static void* get__IWB(void *str__KWB);
+static void copy__ZCS(__STRING *Self__0CS,void *other__1CS);
+static void append__BOS(__STRING *Self__COS,void *other__DOS);
+static void* parent_directory__OED();
+static void* get_entry__T0AC(void *p__V0AC);
+static void put_string__U1F(void *s__W1F);
+static __PROTOTYPE* create__name__generic_count__ZAC(void *f__1AC,void *n__2AC);
+static __BOOLEAN read_space__3RD();
+static __BOOLEAN read_identifier__LAL();
+static __POSITION current_position__JXF();
+static void put_error__text__KNG(__INTEGER type__MNG,void *txt__NNG);
+static void put_position__UOG(__POSITION Self__VOG);
+static __BOOLEAN read_symbol__DXJ(void *st__FXJ);
+static __BOOLEAN read_short_elt__LLKB();
+static void fast_put__to__Y1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__Z1R,void *k__11R);
+static __TYPE_FULL* create__with__SQB(void *typ__UQB,__UINTEGER_8 code__VQB);
+static void** create__CZNB(__INTEGER nb_elements__EZNB);
+static void add_last__O4R(__FAST_ARRAYoTYPE_IDo *Self__P4R,void *element__Q4R);
+static __BOOLEAN open__ZERD(__DIRECTORY_UNIX *Self__0ERD);
+static void check_in__begin__4QQC(void *entry__ARQC,__INTEGER n__BRQC);
+static void* add_ext__EBF(void *n__GBF);
+static void save_file__with__PDC(void *n__RDC,void *buf__SDC);
+static void resize__YXZ(__STRING *Self__ZXZ,__INTEGER new_count__0XZ);
+static void move__to__by__BWCC(__CHARACTER *Self__CWCC,__INTEGER lower__DWCC,__INTEGER upper__EWCC,__INTEGER offset__FWCC);
+static __BOOLEAN __infix_equal_equal__45DB(__STRING_CONSTANT *Self__55DB,void *other__AAEB);
+static void* at__QL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RL4,void *k__SL4);
+static void go_on__CBC(void *obj__EBC);
+static void put__to__like__1ZXD(void *tok__3ZXD,void *buf__4ZXD,void *key__5ZXD);
+static void shorter_get_all_slot_in__E1XD(__PROTOTYPE *Self__F1XD,void *lst__G1XD);
+static void pretty_name_in__IA3F(__ITM_SLOT *Self__JA3F,void *buffer__KA3F);
+static void pretty_name_in__3B3F(__ITM_SLOT_OPERATOR *Self__4B3F,void *buffer__5B3F);
+static void get_all_comment_slot__in__FW2E(__PROTOTYPE *Self__GW2E,void *n__HW2E,void *buf__IW2E);
+static void append_in__OIH(__UINTEGER_32 Self__PIH,void *buffer__QIH);
+static void shorter_profile_in__UD3F(__ITM_SLOT *Self__VD3F,void *buf__WD3F);
+static void shorter_profile_in__RE3F(__ITM_SLOT_OPERATOR *Self__SE3F,void *buf__TE3F);
+static __CHARACTER* create__BMEB(__INTEGER nb_elements__DMEB);
+static __POINTER realloc_dynamic__old_size__new_size__RELC(__POINTER p__TELC,__UINTEGER_32 old_sz__UELC,__UINTEGER_32 new_sz__VELC);
+static void** create__TBRB(__INTEGER nb_elements__VBRB);
+static void* fast_reference_at__Y1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__Z1T,void *k__01T);
+static void** create__PHHE(__INTEGER nb_elements__RHHE);
+static __BOOLEAN has__1PW(__HASHED_SEToABSTRACT_STRINGo *Self__2PW,void *e__3PW);
+static void increase_capacity__4RNB(__HASHED_SEToABSTRACT_STRINGo *Self__5RNB);
+static void put_string__YHF(void *s__0HF);
+static __BOOLEAN fast_has__OAY(__HASHED_SEToABSTRACT_STRINGo *Self__PAY,void *e__QAY);
+static void* physical_get_entry__JCF(void *new_path__LCF);
+static void put__to__R0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__S0S,void *v__T0S,void *k__U0S);
+static void reduce_path__Q3HC(void *st__S3HC);
+static void* reference_at__EU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__FU0C,void *k__GU0C);
+static void* physical_get_entry__YW0C(void *new_path__0W0C);
+static void** create__VY1C(__INTEGER nb_elements__XY1C);
+static void** create__3QSC(__INTEGER nb_elements__5QSC);
+static void short__token__to__LBD(void *key__NBD,__INTEGER beg__OBD,__INTEGER end__PBD);
+static __INTEGER first_substring_index__RDZE(__STRING *Self__SDZE);
+static __BOOLEAN read_string__LFQ();
+static void reduce_path__Y42E(void *st__042E);
+static void* item__DVPE(__DIRECTORY_UNIX *Self__EVPE,__INTEGER i__FVPE);
+static void* item__Y0ND(__LINKED_LISToSTRING_CONSTANTo *Self__Z0ND,__INTEGER i__00ND);
+static void** create__T23(__INTEGER nb_elements__V23);
+static __BOOLEAN read_word__QPF(void *st__SPF);
+static __BOOLEAN read_slot_header__SDE(__BOOLEAN first__UDE);
+static void* get_name__0UOB(void *n__2UOB);
+static void* read_type_list__IMO(__PARSER *Self__JMO,__BOOLEAN is_section__KMO);
+static __INTEGER hash_code__P50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Q50);
+static __CHARACTER read_style__XRF();
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__RL5B(__INTEGER new_count__TL5B);
+static void* read_loc_arg__with_self__IEHB(__PARSER *Self__JEHB,__BOOLEAN mute__KEHB,__BOOLEAN self_first__LEHB);
+static void* read_slot_operator__FU5B(void *list_arg__HU5B);
+static void add_last__05GC(__FAST_ARRAYoITM_ARGUMENTo *Self__15GC,void *element__25GC);
+static void* read_slot_keyword__SZ5B(void *list_arg__UZ5B);
+static void** create__WPBD(__INTEGER nb_elements__YPBD);
+static void set_argument_list__VCHC(__ITM_SLOT *Self__WCHC,void *p__XCHC);
+static __ITM_TYPE_MULTI* get__CJP(void *lt__EJP);
+static void* read_type__DCM(__PARSER *Self__ECM,__BOOLEAN is_local__FCM);
+static void set_result_type__Q3FC(__ITM_SLOT *Self__R3FC,void *t__S3FC);
+static void* read_contract__HTF(__PARSER *Self__ITF);
+static void* read_expr__44I(__PARSER *Self__54I);
+static void set_value__type__ZFHC(__ITM_SLOT *Self__0FHC,void *e__1FHC,void *p__2FHC);
+static __POSITION position__FD5B(__ITM_EXPRESSION *Self__GD5B);
+static __POSITION position__FJHC(__ITM_RESULT *Self__GJHC);
+static void fast_put__to__BOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__COGC,void *v__DOGC,void *k__EOGC);
+static void* fast_reference_at__QAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__RAGC,void *k__SAGC);
+static void* fast_reference_at__E34D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__F34D,void *k__G34D);
+static void put__to__like__PT5F(void *tok__RT5F,void *buf__ST5F,void *key__TT5F);
+static void shorter_in__QQ5F(__ITM_ARG *Self__RQ5F,void *buf__SQ5F);
+static void shorter_in__HR5F(__ITM_ARGS *Self__IR5F,void *buf__JR5F);
+static void put__to__like__QCFG(void *tok__SCFG,void *buf__TCFG,void *key__UCFG);
+static void put__to__like__HEFG(void *tok__JEFG,void *buf__KEFG,void *key__LEFG);
+static void shorter_raw_in__U1DG(__ITM_TYPE_MULTI *Self__V1DG,void *buf__W1DG);
+static void shorter_in__YVBG(__ITM_TYPE_BLOCK *Self__ZVBG,void *buf__0VBG);
+static void shorter_in__AXBG(__ITM_TYPE_GENERIC *Self__BXBG,void *buf__CXBG);
+static void put__to__like__MGFG(void *tok__OGFG,void *buf__PGFG,void *key__QGFG);
+static void put__to__like__X1BG(void *tok__Z1BG,void *buf__01BG,void *key__11BG);
+static void set_path__ONT(__DIRECTORY_UNIX *Self__PNT,void *n__QNT);
+static void set_path__JOT(__FILE_UNIX *Self__KOT,void *n__LOT);
+static void insert_string__to__0XU(__STRING *Self__1XU,void *s__2XU,__INTEGER i__3XU);
+static void read_escape_character__R1JF();
+static __BOOLEAN read_cap_identifier__SZJ();
+static void add_last__SBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__TBBC,void *element__UBBC);
+static __BOOLEAN read_external__ATO();
+static void* read_expr_primary__I4M(__PARSER *Self__J4M);
+static __BOOLEAN read_integer__A2P();
+static void* readlip_expr__JTPB();
+static void run__QGFC(__LIP_AFFECT *Self__RGFC);
+static void run__50TE(__LIP_CALL *Self__A1TE);
+static void run__2CQD(__LIP_IF *Self__3CQD);
+static void run__T5TE(__LIP_PRINT *Self__U5TE);
+static void add_last__0NV(__FAST_ARRAYoITM_TYPE_MONOo *Self__1NV,void *element__2NV);
+static void* alias__GVP(void *tmp__IVP);
+static void add__CMHB(__HASHED_SEToSTRING_CONSTANTo *Self__DMHB,void *e__EMHB);
+static void add_last__RBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__SBPD,void *element__TBPD);
+static void free__0S5(void *tmp__2S5);
+static void free__2MQ(void *tmp__4MQ);
+static __INTEGER hash_code__DNQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__ENQF);
+static void copy__22RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__32RD,void *other__42RD);
+static __BOOLEAN read_operator__HNM();
+static void* operator__name__3DO(void *typ__5DO,void *op__AEO);
+static void append_in__SIBC(__ITM_TYPE_MULTI *Self__TIBC,void *buffer__UIBC);
+static void append_in__OGPD(__ITM_TYPE_BLOCK *Self__PGPD,void *buffer__QGPD);
+static void append_in__SHPD(__ITM_TYPE_GENERIC *Self__THPD,void *buffer__UHPD);
+static void* read_prototype__HON(__PARSER *Self__ION,void *styl__JON);
+static void read_def_local__30H(__PARSER *Self__40H);
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__SVI(__INTEGER new_count__UVI);
+static void add_last__U5U(__FAST_ARRAYoITM_CODEo *Self__V5U,void *element__W5U);
+static void* copy__Q5H(void *tmp__S5H);
+static __BOOLEAN fast_has__3DV(__HASHED_SEToSTRING_CONSTANTo *Self__4DV,void *e__5DV);
+static void restore_context__TDL();
+static void* read_expr_message__0VL(__PARSER *Self__1VL);
+static void free__YVI(void *tmp__0VI);
+static void put__to__like__UUEG(void *tok__WUEG,void *buf__XUEG,void *key__YUEG);
+static void put__to__like__YZBG(void *tok__0ZBG,void *buf__1ZBG,void *key__2ZBG);
+static void put__to__like__GWDG(void *tok__IWDG,void *buf__JWDG);
+static void put__to__like__SYDG(void *tok__UYDG,void *buf__VYDG,void *key__WYDG);
+static __BOOLEAN is_hexadecimal_digit__AOJE(__CHARACTER Self__BOJE);
+static void* read_constant__1QO();
+static void* read_group__JBHB(__PARSER *Self__KBHB);
+static void* readlip_expr_operator__MOZB(__PARSER *Self__NOZB);
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__2QKD(__INTEGER new_count__4QKD);
+static void add_last__JJUD(__FAST_ARRAYoLIP_CODEo *Self__KJUD,void *element__LJUD);
+static void* copy__ILID(void *tmp__KLID);
+static void* fast_reference_at__OURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__PURD,void *k__QURD);
+static void* run_expr__GZQD(__LIP_BINARY *Self__HZQD);
+static void* run_expr__F2QD(__LIP_UNARY *Self__G2QD);
+static void* run_expr__RBUE(__LIP_CALL *Self__SBUE);
+static void* get__QFSE(__LIP_INTEGER *Self__RFSE,__INTEGER i__SFSE);
+static void* get__N2EF(__LIP_STRING *Self__O2EF,void *str__P2EF);
+static void free__TM2F(__LIP_INTEGER *Self__UM2F);
+static void free__BNGG(__LIP_STRING *Self__CNGG);
+static void load_directory__is_recursive__Q0VF(__LIP_CALL *Self__R0VF,void *path__S0VF,__BOOLEAN is_rec__T0VF);
+static void append_in__LUGG(__LIP_STRING *Self__MUGG,void *str__NUGG);
+static void print_positif__JXJG(__INTEGER Self__KXJG);
+static __BOOLEAN has__TLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ULMB,void *e__VLMB);
+static void display_raw__TLIC(__ITM_TYPE_MULTI *Self__ULIC,void *buffer__VLIC);
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__QJK(__INTEGER new_count__SJK);
+static void add_last__F2U(__FAST_ARRAYoITM_LOCALo *Self__G2U,void *element__H2U);
+static void free__WJK(void *tmp__YJK);
+static void* copy__53J(void *tmp__B4J);
+static void** create__HTQB(__INTEGER nb_elements__JTQB);
+static void* read_send_msg__M4N(__PARSER *Self__N4N,void *first_arg__O4N);
+static void* readlip_expr_cmp__A11B(__PARSER *Self__B11B);
+static void** create__UUIE(__INTEGER nb_elements__WUIE);
+static void** create__HRQB(__INTEGER nb_elements__JRQB);
+static void* read_argument__TOP(__PARSER *Self__UOP);
+static void* readlip_expr_binary__3N3B(__PARSER *Self__4N3B);
+static void* readlip_expr_unary__4Z4B(__PARSER *Self__5Z4B);
+static void* readlip_expr_base__PCFE(__PARSER *Self__QCFE);
 
 //==========================//
 // SOURCE CODE              //
@@ -2605,4492 +2642,4592 @@ static void* readlip_expr_base__GVEE(__PARSER *Self__HVEE);
 
 int main(int argc,char **argv)
 {
-  void *str__XGD,*cmd__SY;
-  __INTEGER new_count__ZDCH,typ_id__SDCH,Self__1GF,limit_up__2GF;
-  __INTEGER idx__UAAH,i__2NEB,typ_id__VTG,new_capacity__XJY;
-  __INTEGER typ_id__23DB,new_capacity__4UJC,typ_id__4MJ,typ_id__FNH;
-  __INTEGER new_capacity__XLY,typ_id__HOC,new_capacity__UKX,typ_id__1ZQ;
-  __INTEGER typ_id__YDR,new_capacity__OI1,typ_id__ISQ,typ_id__O0O;
-  __INTEGER typ_id__V2Q,typ_id__DLK,new_capacity__1EZ,typ_id__FWQ;
-  __INTEGER typ_id__BVR,typ_id__AIK,typ_id__J4J,typ_id__5KM;
-  __INTEGER typ_id__12MF,new_capacity__3HQF,typ_id__13F,typ_id__USSE;
-  __INTEGER typ_id__FALF,typ_id__RRMF,typ_id__TUMD,typ_id__EVED;
-  __INTEGER new_capacity__05WD,Self__2EXE,typ_id__JKMF,Self__WK3F;
-  __INTEGER typ_id__VWLF,Self__PJ3F,typ_id__42YB,new_capacity__UFOC;
-  __INTEGER typ_id__DAZB,new_capacity__PJOC,typ_id__3J5B,typ_id__3TB;
-  __INTEGER new_capacity__QZW,j__TY,idx__TKC,typ_id__ZAAH,typ_id__4GKB;
-  __INTEGER result__DBAH,__tmp__FBAH,Self__GBAH,result__IBAH;
-  __INTEGER __tmp__KBAH,Self__LBAH,idx__UPEB,idx__SHZB;
-  __INTEGER new_capacity__THZB,i__UHZB,result__NBAH,__tmp__PBAH;
-  __INTEGER Self__QBAH,typ_id__BKZB,typ_id__UBAH,typ_id__4BAH;
-  __INTEGER typ_id__ICAH,typ_id__0OED,typ_id__GYB,Self__MKWD;
-  __INTEGER typ_id__I2B,typ_id__SCAH,typ_id__03B,result__2CAH;
-  __INTEGER __tmp__4CAH,Self__5CAH,result__BDAH,__tmp__DDAH,Self__EDAH;
-  __INTEGER result__KDAH,__tmp__MDAH,Self__NDAH,result__PDAH;
-  __INTEGER __tmp__RDAH,Self__SDAH,result__YDAH,__tmp__0DAH,Self__1DAH;
-  __INTEGER result__3DAH,__tmp__5DAH,Self__AEAH,i__WZ2G,j__YZ2G;
-  __INTEGER Self__PB5G,result__CEAH,__tmp__EEAH,Self__FEAH,result__LEAH;
-  __INTEGER __tmp__NEAH,Self__OEAH,result__QEAH,__tmp__SEAH,Self__TEAH;
-  __INTEGER i__C02G,j__E02G,Self__1B5G,result__VEAH,__tmp__XEAH;
-  __INTEGER Self__YEAH,result__0EAH,__tmp__2EAH,Self__3EAH,i1__1RCH;
-  __INTEGER i2__2RCH,__tmp__BFAH,Self__DFAH,result__IFAH,len__NFAH;
-  __INTEGER __tmp__OFAH,__tmp__QFAH,Self__RFAH,result__KSC,n__JC5G;
-  __INTEGER Self__ASCH,Self__W0QC,limit_up__X0QC,i__FSCH,i__KSCH;
-  __INTEGER i__PSCH,i__USCH;
-  __POINTER ptr__RDCH,ptr_table__1DCH,next__0DCH,result__2DCH;
-  __POINTER ptr_table__AECH,next__5DCH,result__BECH,ptr__QTG;
-  __POINTER ptr_table__FECH,next__EECH,result__GECH,ptr_table__KECH;
-  __POINTER next__JECH,result__LECH,ptr__X3DB,ptr_table__PECH;
-  __POINTER next__OECH,result__QECH,ptr_table__UECH,next__TECH;
-  __POINTER result__VECH,ptr__ZMJ,ptr_table__ZECH,next__YECH;
-  __POINTER result__0ECH,ptr_table__4ECH,next__3ECH,result__5ECH;
-  __POINTER ptr__ANH,ptr_table__DFCH,next__CFCH,result__EFCH;
-  __POINTER ptr_table__IFCH,next__HFCH,result__JFCH,ptr__COC;
-  __POINTER ptr_table__NFCH,next__MFCH,result__OFCH,ptr_table__SFCH;
-  __POINTER next__RFCH,result__TFCH,ptr__WZQ,ptr_table__XFCH,next__WFCH;
-  __POINTER result__YFCH,ptr_table__2FCH,next__1FCH,result__3FCH;
-  __POINTER ptr__TDR,ptr_table__BGCH,next__AGCH,result__CGCH;
-  __POINTER ptr_table__GGCH,next__FGCH,result__HGCH,ptr__DSQ;
-  __POINTER ptr_table__LGCH,next__KGCH,result__MGCH,ptr_table__QGCH;
-  __POINTER next__PGCH,result__RGCH,ptr__J0O,ptr_table__VGCH,next__UGCH;
-  __POINTER result__WGCH,ptr_table__0GCH,next__ZGCH,result__1GCH;
-  __POINTER ptr__Q2Q,ptr_table__5GCH,next__4GCH,result__AHCH;
-  __POINTER ptr_table__EHCH,next__DHCH,result__FHCH,ptr__4KK;
-  __POINTER ptr_table__JHCH,next__IHCH,result__KHCH,ptr_table__OHCH;
-  __POINTER next__NHCH,result__PHCH,ptr__AWQ,ptr_table__THCH,next__SHCH;
-  __POINTER result__UHCH,ptr_table__YHCH,next__XHCH,result__ZHCH;
-  __POINTER ptr__2UR,ptr_table__3HCH,next__2HCH,result__4HCH;
-  __POINTER ptr_table__CICH,next__BICH,result__DICH,ptr__1HK;
-  __POINTER ptr_table__HICH,next__GICH,result__IICH,ptr_table__MICH;
-  __POINTER next__LICH,result__NICH,ptr__E4J,ptr_table__RICH,next__QICH;
-  __POINTER result__SICH,ptr_table__WICH,next__VICH,result__XICH;
-  __POINTER ptr__0KM,ptr_table__1ICH,next__0ICH,result__2ICH;
-  __POINTER ptr_table__AJCH,next__5ICH,result__BJCH,ptr__W2MF;
-  __POINTER ptr_table__FJCH,next__EJCH,result__GJCH,ptr_table__KJCH;
-  __POINTER next__JJCH,result__LJCH,ptr__W3F,ptr_table__PJCH,next__OJCH;
-  __POINTER result__QJCH,ptr_table__UJCH,next__TJCH,result__VJCH;
-  __POINTER ptr__PSSE,ptr_table__ZJCH,next__YJCH,result__0JCH;
-  __POINTER ptr_table__4JCH,next__3JCH,result__5JCH,ptr__AALF;
-  __POINTER ptr_table__DKCH,next__CKCH,result__EKCH,ptr_table__IKCH;
-  __POINTER next__HKCH,result__JKCH,ptr__MRMF,ptr_table__NKCH;
-  __POINTER next__MKCH,result__OKCH,ptr_table__SKCH,next__RKCH;
-  __POINTER result__TKCH,ptr__OUMD,ptr_table__XKCH,next__WKCH;
-  __POINTER result__YKCH,ptr_table__2KCH,next__1KCH,result__3KCH;
-  __POINTER ptr__5UED,ptr_table__BLCH,next__ALCH,result__CLCH;
-  __POINTER ptr_table__GLCH,next__FLCH,result__HLCH,result__HW2G;
-  __POINTER ptr_table__LLCH,next__KLCH,result__MLCH,ptr__EKMF;
-  __POINTER ptr_table__TLCH,next__SLCH,result__ULCH,ptr_table__YLCH;
-  __POINTER next__XLCH,result__ZLCH,result__PW2G,ptr_table__3LCH;
-  __POINTER next__2LCH,result__4LCH,ptr__QWLF,ptr_table__FMCH;
-  __POINTER next__EMCH,result__GMCH,ptr_table__KMCH,next__JMCH;
-  __POINTER result__LMCH,result__XW2G,ptr_table__PMCH,next__OMCH;
-  __POINTER result__QMCH,ptr__Z2YB,ptr_table__XMCH,next__WMCH;
-  __POINTER result__YMCH,ptr_table__2MCH,next__1MCH,result__3MCH;
-  __POINTER ptr__45YB,ptr_table__BNCH,next__ANCH,result__CNCH;
-  __POINTER ptr_table__GNCH,next__FNCH,result__HNCH,ptr__YJ5B;
-  __POINTER ptr_table__LNCH,next__KNCH,result__MNCH,ptr_table__QNCH;
-  __POINTER next__PNCH,result__RNCH,ptr__YTB,ptr_table__VNCH,next__UNCH;
-  __POINTER result__WNCH,ptr_table__0NCH,next__ZNCH,result__1NCH;
-  __POINTER ptr__YAAH,ptr_table__5NCH,next__4NCH,result__AOCH;
-  __POINTER ptr_table__EOCH,next__DOCH,result__FOCH,ptr__ZGKB;
-  __POINTER ptr_table__MOCH,next__LOCH,result__NOCH,ptr_table__ROCH;
-  __POINTER next__QOCH,result__SOCH,ptr__2JZB,ptr_table__WOCH;
-  __POINTER next__VOCH,result__XOCH,ptr_table__1OCH,next__0OCH;
-  __POINTER result__2OCH,ptr__TBAH,ptr_table__APCH,next__5OCH;
-  __POINTER result__BPCH,ptr_table__FPCH,next__EPCH,result__GPCH;
-  __POINTER ptr__3BAH,ptr_table__KPCH,next__JPCH,result__LPCH;
-  __POINTER ptr_table__PPCH,next__OPCH,result__QPCH,ptr__HCAH;
-  __POINTER ptr_table__XPCH,next__WPCH,result__YPCH,ptr_table__2PCH;
-  __POINTER next__1PCH,result__3PCH,ptr__VOED,ptr_table__BQCH;
-  __POINTER next__AQCH,result__CQCH,ptr_table__GQCH,next__FQCH;
-  __POINTER result__HQCH,ptr__BYB,ptr_table__LQCH,next__KQCH;
-  __POINTER result__MQCH,ptr_table__QQCH,next__PQCH,result__RQCH;
-  __POINTER result__BZ2G,ptr_table__VQCH,next__UQCH,result__WQCH;
-  __POINTER ptr__D2B,ptr_table__3QCH,next__2QCH,result__4QCH;
-  __POINTER ptr_table__CRCH,next__BRCH,result__DRCH,ptr__RCAH;
-  __POINTER ptr_table__HRCH,next__GRCH,result__IRCH,ptr_table__MRCH;
-  __POINTER next__LRCH,result__NRCH,ptr__V3B,ptr_table__RRCH,next__QRCH;
-  __POINTER result__SRCH,ptr_table__WRCH,next__VRCH,result__XRCH;
-  __UINTEGER_32 sz__TDCH,a__UDCH,new_size__VDCH,t__WDCH,a__XDCH;
-  __UINTEGER_32 new_size__DECH,lab_type__CECH,sz__STG,a__GY4G;
-  __UINTEGER_32 new_size__HY4G,t__LY4G,a__KY4G,new_size__NECH;
-  __UINTEGER_32 lab_type__MECH,sz__Z3DB,a__OY4G,new_size__PY4G,t__TY4G;
-  __UINTEGER_32 a__SY4G,new_size__XECH,lab_type__WECH,sz__1MJ,a__WY4G;
-  __UINTEGER_32 new_size__XY4G,t__1Y4G,a__0Y4G,new_size__BFCH;
-  __UINTEGER_32 lab_type__AFCH,sz__CNH,a__4Y4G,new_size__5Y4G,t__DZ4G;
-  __UINTEGER_32 a__CZ4G,new_size__LFCH,lab_type__KFCH,sz__EOC,a__GZ4G;
-  __UINTEGER_32 new_size__HZ4G,t__LZ4G,a__KZ4G,new_size__VFCH;
-  __UINTEGER_32 lab_type__UFCH,sz__YZQ,a__OZ4G,new_size__PZ4G,t__TZ4G;
-  __UINTEGER_32 a__SZ4G,new_size__5FCH,lab_type__4FCH,sz__VDR,a__WZ4G;
-  __UINTEGER_32 new_size__XZ4G,t__1Z4G,a__0Z4G,new_size__JGCH;
-  __UINTEGER_32 lab_type__IGCH,sz__FSQ,a__4Z4G,new_size__5Z4G,t__D04G;
-  __UINTEGER_32 a__C04G,new_size__TGCH,lab_type__SGCH,sz__L0O,a__G04G;
-  __UINTEGER_32 new_size__H04G,t__L04G,a__K04G,new_size__3GCH;
-  __UINTEGER_32 lab_type__2GCH,sz__S2Q,a__O04G,new_size__P04G,t__T04G;
-  __UINTEGER_32 a__S04G,new_size__HHCH,lab_type__GHCH,sz__ALK,a__W04G;
-  __UINTEGER_32 new_size__X04G,t__104G,a__004G,new_size__RHCH;
-  __UINTEGER_32 lab_type__QHCH,sz__CWQ,a__P52G,new_size__Q52G,t__U52G;
-  __UINTEGER_32 a__T52G,new_size__1HCH,lab_type__0HCH,sz__4UR,a__404G;
-  __UINTEGER_32 new_size__504G,t__D14G,a__C14G,new_size__FICH;
-  __UINTEGER_32 lab_type__EICH,sz__3HK,a__G14G,new_size__H14G,t__L14G;
-  __UINTEGER_32 a__K14G,new_size__PICH,lab_type__OICH,sz__G4J,a__O14G;
-  __UINTEGER_32 new_size__P14G,t__T14G,a__S14G,new_size__ZICH;
-  __UINTEGER_32 lab_type__YICH,sz__2KM,a__W14G,new_size__X14G,t__114G;
-  __UINTEGER_32 a__014G,new_size__DJCH,lab_type__CJCH,sz__Y2MF,a__414G;
-  __UINTEGER_32 new_size__514G,t__D24G,a__C24G,new_size__NJCH;
-  __UINTEGER_32 lab_type__MJCH,sz__Y3F,a__Z02G,new_size__OXG,t__XYG;
-  __UINTEGER_32 a__502G,new_size__XJCH,lab_type__WJCH,sz__RSSE,a__G24G;
-  __UINTEGER_32 new_size__H24G,t__L24G,a__K24G,new_size__BKCH;
-  __UINTEGER_32 lab_type__AKCH,sz__CALF,a__O24G,new_size__P24G,t__T24G;
-  __UINTEGER_32 a__S24G,new_size__LKCH,lab_type__KKCH,sz__ORMF,a__W24G;
-  __UINTEGER_32 new_size__X24G,t__124G,a__024G,new_size__VKCH;
-  __UINTEGER_32 lab_type__UKCH,sz__QUMD,a__424G,new_size__524G,t__D34G;
-  __UINTEGER_32 a__C34G,new_size__5KCH,lab_type__4KCH,sz__BVED,a__G34G;
-  __UINTEGER_32 new_size__H34G,t__L34G,a__K34G,new_size__JLCH;
-  __UINTEGER_32 lab_type__ILCH,sz__IW2G,a__NW2G,new_size__JW2G;
-  __UINTEGER_32 new_size2__KW2G,a__O34G,new_size__P34G,sz__GKMF,a__V34G;
-  __UINTEGER_32 new_size__W34G,t__034G,a__Z34G,new_size__1LCH;
-  __UINTEGER_32 lab_type__0LCH,sz__QW2G,a__VW2G,new_size__RW2G;
-  __UINTEGER_32 new_size2__SW2G,a__334G,new_size__434G,sz__SWLF,a__E44G;
-  __UINTEGER_32 new_size__F44G,t__J44G,a__I44G,new_size__NMCH;
-  __UINTEGER_32 lab_type__MMCH,sz__YW2G,a__3W2G,new_size__ZW2G;
-  __UINTEGER_32 new_size2__0W2G,a__M44G,new_size__N44G,sz__12YB,a__T44G;
-  __UINTEGER_32 new_size__U44G,t__Y44G,a__X44G,new_size__5MCH;
-  __UINTEGER_32 lab_type__4MCH,sz__AAZB,a__144G,new_size__244G,t__A54G;
-  __UINTEGER_32 a__544G,new_size__JNCH,lab_type__INCH,sz__0J5B,a__D54G;
-  __UINTEGER_32 new_size__E54G,t__I54G,a__H54G,new_size__TNCH;
-  __UINTEGER_32 lab_type__SNCH,sz__0TB,a__L54G,new_size__M54G,t__Q54G;
-  __UINTEGER_32 a__P54G,new_size__3NCH,lab_type__2NCH,sz__0AAH,a__1AAH;
-  __UINTEGER_32 new_size__2AAH,t__3AAH,a__4AAH,new_size__HOCH;
-  __UINTEGER_32 lab_type__GOCH,sz__1GKB,a__U54G,new_size__V54G,t__Z54G;
-  __UINTEGER_32 a__Y54G,new_size__UOCH,lab_type__TOCH,sz__4JZB,a__554G;
-  __UINTEGER_32 new_size__AA5G,t__EA5G,a__DA5G,new_size__4OCH;
-  __UINTEGER_32 lab_type__3OCH,sz__VBAH,a__WBAH,new_size__XBAH,t__YBAH;
-  __UINTEGER_32 a__ZBAH,new_size__IPCH,lab_type__HPCH,sz__5BAH,a__ACAH;
-  __UINTEGER_32 new_size__BCAH,t__CCAH,a__DCAH,new_size__SPCH;
-  __UINTEGER_32 lab_type__RPCH,sz__JCAH,a__KCAH,new_size__LCAH,t__MCAH;
-  __UINTEGER_32 a__NCAH,new_size__5PCH,lab_type__4PCH,sz__XOED,a__YW3G;
-  __UINTEGER_32 new_size__ZW3G,t__3W3G,a__2W3G,new_size__JQCH;
-  __UINTEGER_32 lab_type__IQCH,sz__DYB,a__NA5G,new_size__OA5G,t__SA5G;
-  __UINTEGER_32 a__RA5G,new_size__TQCH,lab_type__SQCH,sz__CZ2G,a__HZ2G;
-  __UINTEGER_32 new_size__DZ2G,new_size2__EZ2G,a__VA5G,new_size__WA5G;
-  __UINTEGER_32 sz__F2B,a__2A5G,new_size__3A5G,t__BB5G,a__AB5G;
-  __UINTEGER_32 new_size__FRCH,lab_type__ERCH,sz__TCAH,a__UCAH;
-  __UINTEGER_32 new_size__VCAH,t__WCAH,a__XCAH,new_size__PRCH;
-  __UINTEGER_32 lab_type__ORCH,sz__X3B,a__ZK3G,new_size__0K3G,t__4K3G;
-  __UINTEGER_32 a__3K3G,new_size__ZRCH,lab_type__YRCH;
-  __STRING *Self__0NEB,*new__LEUG,*new__NEUG,*Self__VZ2G,*Self__B02G;
-  __STRING *Self__5EAH,*Self__GC5G,*Self__IC5G,*Self__5RCH;
-  __ITM_TYPE_PARAMETER *result__5VQ,*Self__52V;
-  __LIP_BOOLEAN *result__LRMF;
-  void *result__PLCH,*result__BMCH,*result__TMCH,*result__ZQCH;
-  void *txt__1,*fmt_name__4MC,*k__ABAH,*__tmp__QND,*k__MPEB;
-  void *element__JA5G,*i__1BAH,*element__UTEC,*i__PCAH,*__tmp__4B;
-  void *__tmp__2H,*__tmp__S1XD,*__tmp__3JTD,*__tmp__R3XD,*__tmp__GKTD;
-  void *__tmp__Q5XD,*__tmp__NBYD,*__tmp__ELTD,*__tmp__4CYD,*__tmp__NLTD;
-  void *__tmp__PEYD;
+  void *str__DHD,*cmd__1Y;
+  __INTEGER new_count__NQIH,typ_id__GQIH,Self__HHF,limit_up__IHF;
+  __INTEGER idx__ANGH,i__IOEB,typ_id__BUG,new_capacity__DKY;
+  __INTEGER typ_id__I4DB,new_capacity__KVJC,typ_id__KNJ,typ_id__RNH;
+  __INTEGER new_capacity__DMY,typ_id__TOC,new_capacity__ALX,typ_id__H0Q;
+  __INTEGER typ_id__EER,new_capacity__0I1,typ_id__USQ,typ_id__00O;
+  __INTEGER typ_id__B3Q,typ_id__PLK,new_capacity__HFZ,typ_id__RWQ;
+  __INTEGER typ_id__NVR,typ_id__MIK,typ_id__V4J,typ_id__LLM;
+  __INTEGER typ_id__5BNF,new_capacity__KSQF,typ_id__H4F,typ_id__0ATE;
+  __INTEGER typ_id__0MLF,typ_id__AYMF,typ_id__5UMD,typ_id__QVED;
+  __INTEGER new_capacity__TAXD,Self__5XXE,typ_id__2SMF,Self__QY4F;
+  __INTEGER typ_id__3DMF,Self__JX4F,typ_id__K3YB,new_capacity__AGOC;
+  __INTEGER typ_id__PAZB,new_capacity__1JOC,typ_id__JK5B,typ_id__CAIE;
+  __INTEGER typ_id__JUB,new_capacity__2ZW,j__2Y,idx__5KC,typ_id__FNGH;
+  __INTEGER typ_id__KHKB,result__PNGH,__tmp__RNGH,Self__SNGH;
+  __INTEGER result__UNGH,__tmp__WNGH,Self__XNGH,idx__AQEB,idx__4HZB;
+  __INTEGER new_capacity__5HZB,i__AIZB,result__ZNGH,__tmp__1NGH;
+  __INTEGER Self__2NGH,typ_id__NKZB,typ_id__AOGH,typ_id__KOGH;
+  __INTEGER typ_id__UOGH,typ_id__GPED,typ_id__SYB,Self__FLWD;
+  __INTEGER typ_id__U2B,typ_id__4OGH,typ_id__G4B,result__IPGH;
+  __INTEGER __tmp__KPGH,Self__LPGH,result__NPGH,__tmp__PPGH,Self__QPGH;
+  __INTEGER result__WPGH,__tmp__YPGH,Self__ZPGH,result__1PGH;
+  __INTEGER __tmp__3PGH,Self__4PGH,result__EQGH,__tmp__GQGH,Self__HQGH;
+  __INTEGER result__JQGH,__tmp__LQGH,Self__MQGH,i__SEDH,j__UEDH;
+  __INTEGER Self__MNFH,result__OQGH,__tmp__QQGH,Self__RQGH,result__XQGH;
+  __INTEGER __tmp__ZQGH,Self__0QGH,result__2QGH,__tmp__4QGH,Self__5QGH;
+  __INTEGER i__4EDH,j__AFDH,Self__YNFH,result__BRGH,__tmp__DRGH;
+  __INTEGER Self__ERGH,result__GRGH,__tmp__IRGH,Self__JRGH,i1__Z4IH;
+  __INTEGER i2__04IH,__tmp__NRGH,Self__PRGH,result__URGH,len__ZRGH;
+  __INTEGER __tmp__0RGH,__tmp__2RGH,Self__3RGH,result__WSC,n__GOFH;
+  __INTEGER Self__44IH,Self__C1QC,limit_up__D1QC,__tmp__IAYD,Self__GA5D;
+  __INTEGER __tmp__RDYD,Self__YA5D,i__D5IH,__tmp__0GYD,Self__KB5D;
+  __INTEGER i__I5IH,__tmp__DKYD,Self__2B5D,__tmp__JMYD,Self__LC5D;
+  __INTEGER i__N5IH,__tmp__POYD,Self__0C5D,i__S5IH;
+  __POINTER ptr__FQIH,ptr_table__PQIH,next__OQIH,result__QQIH;
+  __POINTER ptr_table__UQIH,next__TQIH,result__VQIH,ptr__2TG;
+  __POINTER ptr_table__ZQIH,next__YQIH,result__0QIH,ptr_table__4QIH;
+  __POINTER next__3QIH,result__5QIH,ptr__D4DB,ptr_table__DRIH;
+  __POINTER next__CRIH,result__ERIH,ptr_table__IRIH,next__HRIH;
+  __POINTER result__JRIH,ptr__FNJ,ptr_table__NRIH,next__MRIH;
+  __POINTER result__ORIH,ptr_table__SRIH,next__RRIH,result__TRIH;
+  __POINTER ptr__MNH,ptr_table__XRIH,next__WRIH,result__YRIH;
+  __POINTER ptr_table__2RIH,next__1RIH,result__3RIH,ptr__OOC;
+  __POINTER ptr_table__BSIH,next__ASIH,result__CSIH,ptr_table__GSIH;
+  __POINTER next__FSIH,result__HSIH,ptr__C0Q,ptr_table__LSIH,next__KSIH;
+  __POINTER result__MSIH,ptr_table__QSIH,next__PSIH,result__RSIH;
+  __POINTER ptr__5DR,ptr_table__VSIH,next__USIH,result__WSIH;
+  __POINTER ptr_table__0SIH,next__ZSIH,result__1SIH,ptr__PSQ;
+  __POINTER ptr_table__5SIH,next__4SIH,result__ATIH,ptr_table__ETIH;
+  __POINTER next__DTIH,result__FTIH,ptr__V0O,ptr_table__JTIH,next__ITIH;
+  __POINTER result__KTIH,ptr_table__OTIH,next__NTIH,result__PTIH;
+  __POINTER ptr__22Q,ptr_table__TTIH,next__STIH,result__UTIH;
+  __POINTER ptr_table__YTIH,next__XTIH,result__ZTIH,ptr__KLK;
+  __POINTER ptr_table__3TIH,next__2TIH,result__4TIH,ptr_table__CUIH;
+  __POINTER next__BUIH,result__DUIH,ptr__MWQ,ptr_table__HUIH,next__GUIH;
+  __POINTER result__IUIH,ptr_table__MUIH,next__LUIH,result__NUIH;
+  __POINTER ptr__IVR,ptr_table__RUIH,next__QUIH,result__SUIH;
+  __POINTER ptr_table__WUIH,next__VUIH,result__XUIH,ptr__HIK;
+  __POINTER ptr_table__1UIH,next__0UIH,result__2UIH,ptr_table__AVIH;
+  __POINTER next__5UIH,result__BVIH,ptr__Q4J,ptr_table__FVIH,next__EVIH;
+  __POINTER result__GVIH,ptr_table__KVIH,next__JVIH,result__LVIH;
+  __POINTER ptr__GLM,ptr_table__PVIH,next__OVIH,result__QVIH;
+  __POINTER ptr_table__UVIH,next__TVIH,result__VVIH,ptr__0BNF;
+  __POINTER ptr_table__ZVIH,next__YVIH,result__0VIH,ptr_table__4VIH;
+  __POINTER next__3VIH,result__5VIH,ptr__C4F,ptr_table__DWIH,next__CWIH;
+  __POINTER result__EWIH,ptr_table__IWIH,next__HWIH,result__JWIH;
+  __POINTER ptr__VATE,ptr_table__NWIH,next__MWIH,result__OWIH;
+  __POINTER ptr_table__SWIH,next__RWIH,result__TWIH,ptr__VMLF;
+  __POINTER ptr_table__XWIH,next__WWIH,result__YWIH,ptr_table__2WIH;
+  __POINTER next__1WIH,result__3WIH,ptr__1XMF,ptr_table__BXIH;
+  __POINTER next__AXIH,result__CXIH,ptr_table__GXIH,next__FXIH;
+  __POINTER result__HXIH,ptr__0UMD,ptr_table__LXIH,next__KXIH;
+  __POINTER result__MXIH,ptr_table__QXIH,next__PXIH,result__RXIH;
+  __POINTER ptr__LVED,ptr_table__VXIH,next__UXIH,result__WXIH;
+  __POINTER ptr_table__0XIH,next__ZXIH,result__1XIH,result__FBDH;
+  __POINTER ptr_table__5XIH,next__4XIH,result__AYIH,ptr__XSMF;
+  __POINTER ptr_table__HYIH,next__GYIH,result__IYIH,ptr_table__MYIH;
+  __POINTER next__LYIH,result__NYIH,result__NBDH,ptr_table__RYIH;
+  __POINTER next__QYIH,result__SYIH,ptr__YDMF,ptr_table__ZYIH;
+  __POINTER next__YYIH,result__0YIH,ptr_table__4YIH,next__3YIH;
+  __POINTER result__5YIH,result__VBDH,ptr_table__DZIH,next__CZIH;
+  __POINTER result__EZIH,ptr__F3YB,ptr_table__LZIH,next__KZIH;
+  __POINTER result__MZIH,ptr_table__QZIH,next__PZIH,result__RZIH;
+  __POINTER ptr__KAZB,ptr_table__VZIH,next__UZIH,result__WZIH;
+  __POINTER ptr_table__0ZIH,next__ZZIH,result__1ZIH,ptr__EK5B;
+  __POINTER ptr_table__5ZIH,next__4ZIH,result__A0IH,ptr_table__E0IH;
+  __POINTER next__D0IH,result__F0IH,ptr__35HE,ptr_table__J0IH;
+  __POINTER next__I0IH,result__K0IH,ptr_table__O0IH,next__N0IH;
+  __POINTER result__P0IH,ptr__EUB,ptr_table__T0IH,next__S0IH;
+  __POINTER result__U0IH,ptr_table__Y0IH,next__X0IH,result__Z0IH;
+  __POINTER ptr__ENGH,ptr_table__30IH,next__20IH,result__40IH;
+  __POINTER ptr_table__C1IH,next__B1IH,result__D1IH,ptr__FHKB;
+  __POINTER ptr_table__K1IH,next__J1IH,result__L1IH,ptr_table__P1IH;
+  __POINTER next__O1IH,result__Q1IH,ptr__IKZB,ptr_table__U1IH;
+  __POINTER next__T1IH,result__V1IH,ptr_table__Z1IH,next__Y1IH;
+  __POINTER result__01IH,ptr__5NGH,ptr_table__41IH,next__31IH;
+  __POINTER result__51IH,ptr_table__D2IH,next__C2IH,result__E2IH;
+  __POINTER ptr__JOGH,ptr_table__I2IH,next__H2IH,result__J2IH;
+  __POINTER ptr_table__N2IH,next__M2IH,result__O2IH,ptr__TOGH;
+  __POINTER ptr_table__V2IH,next__U2IH,result__W2IH,ptr_table__02IH;
+  __POINTER next__Z2IH,result__12IH,ptr__BPED,ptr_table__52IH;
+  __POINTER next__42IH,result__A3IH,ptr_table__E3IH,next__D3IH;
+  __POINTER result__F3IH,ptr__NYB,ptr_table__J3IH,next__I3IH;
+  __POINTER result__K3IH,ptr_table__O3IH,next__N3IH,result__P3IH;
+  __POINTER result__3DDH,ptr_table__T3IH,next__S3IH,result__U3IH;
+  __POINTER ptr__P2B,ptr_table__13IH,next__03IH,result__23IH;
+  __POINTER ptr_table__A4IH,next__53IH,result__B4IH,ptr__3OGH;
+  __POINTER ptr_table__F4IH,next__E4IH,result__G4IH,ptr_table__K4IH;
+  __POINTER next__J4IH,result__L4IH,ptr__B4B,ptr_table__P4IH,next__O4IH;
+  __POINTER result__Q4IH,ptr_table__U4IH,next__T4IH,result__V4IH;
+  __UINTEGER_32 sz__HQIH,a__IQIH,new_size__JQIH,t__KQIH,a__LQIH;
+  __UINTEGER_32 new_size__XQIH,lab_type__WQIH,sz__4TG,a__1DFH;
+  __UINTEGER_32 new_size__2DFH,t__AEFH,a__5DFH,new_size__BRIH;
+  __UINTEGER_32 lab_type__ARIH,sz__F4DB,a__DEFH,new_size__EEFH,t__IEFH;
+  __UINTEGER_32 a__HEFH,new_size__LRIH,lab_type__KRIH,sz__HNJ,a__LEFH;
+  __UINTEGER_32 new_size__MEFH,t__QEFH,a__PEFH,new_size__VRIH;
+  __UINTEGER_32 lab_type__URIH,sz__ONH,a__TEFH,new_size__UEFH,t__YEFH;
+  __UINTEGER_32 a__XEFH,new_size__5RIH,lab_type__4RIH,sz__QOC,a__1EFH;
+  __UINTEGER_32 new_size__2EFH,t__AFFH,a__5EFH,new_size__JSIH;
+  __UINTEGER_32 lab_type__ISIH,sz__E0Q,a__DFFH,new_size__EFFH,t__IFFH;
+  __UINTEGER_32 a__HFFH,new_size__TSIH,lab_type__SSIH,sz__BER,a__LFFH;
+  __UINTEGER_32 new_size__MFFH,t__QFFH,a__PFFH,new_size__3SIH;
+  __UINTEGER_32 lab_type__2SIH,sz__RSQ,a__TFFH,new_size__UFFH,t__YFFH;
+  __UINTEGER_32 a__XFFH,new_size__HTIH,lab_type__GTIH,sz__X0O,a__1FFH;
+  __UINTEGER_32 new_size__2FFH,t__AGFH,a__5FFH,new_size__RTIH;
+  __UINTEGER_32 lab_type__QTIH,sz__42Q,a__DGFH,new_size__EGFH,t__IGFH;
+  __UINTEGER_32 a__HGFH,new_size__1TIH,lab_type__0TIH,sz__MLK,a__LGFH;
+  __UINTEGER_32 new_size__MGFH,t__QGFH,a__PGFH,new_size__FUIH;
+  __UINTEGER_32 lab_type__EUIH,sz__OWQ,a__BMDH,new_size__CMDH,t__GMDH;
+  __UINTEGER_32 a__FMDH,new_size__PUIH,lab_type__OUIH,sz__KVR,a__TGFH;
+  __UINTEGER_32 new_size__UGFH,t__YGFH,a__XGFH,new_size__ZUIH;
+  __UINTEGER_32 lab_type__YUIH,sz__JIK,a__1GFH,new_size__2GFH,t__AHFH;
+  __UINTEGER_32 a__5GFH,new_size__DVIH,lab_type__CVIH,sz__S4J,a__DHFH;
+  __UINTEGER_32 new_size__EHFH,t__IHFH,a__HHFH,new_size__NVIH;
+  __UINTEGER_32 lab_type__MVIH,sz__ILM,a__LHFH,new_size__MHFH,t__QHFH;
+  __UINTEGER_32 a__PHFH,new_size__XVIH,lab_type__WVIH,sz__2BNF,a__THFH;
+  __UINTEGER_32 new_size__UHFH,t__YHFH,a__XHFH,new_size__BWIH;
+  __UINTEGER_32 lab_type__AWIH,sz__E4F,a__LHDH,new_size__0XG,t__DZG;
+  __UINTEGER_32 a__RHDH,new_size__LWIH,lab_type__KWIH,sz__XATE,a__1HFH;
+  __UINTEGER_32 new_size__2HFH,t__AIFH,a__5HFH,new_size__VWIH;
+  __UINTEGER_32 lab_type__UWIH,sz__XMLF,a__DIFH,new_size__EIFH,t__IIFH;
+  __UINTEGER_32 a__HIFH,new_size__5WIH,lab_type__4WIH,sz__3XMF,a__LIFH;
+  __UINTEGER_32 new_size__MIFH,t__QIFH,a__PIFH,new_size__JXIH;
+  __UINTEGER_32 lab_type__IXIH,sz__2UMD,a__TIFH,new_size__UIFH,t__YIFH;
+  __UINTEGER_32 a__XIFH,new_size__TXIH,lab_type__SXIH,sz__NVED,a__1IFH;
+  __UINTEGER_32 new_size__2IFH,t__AJFH,a__5IFH,new_size__3XIH;
+  __UINTEGER_32 lab_type__2XIH,sz__GBDH,a__LBDH,new_size__HBDH;
+  __UINTEGER_32 new_size2__IBDH,a__DJFH,new_size__EJFH,sz__ZSMF,a__KJFH;
+  __UINTEGER_32 new_size__LJFH,t__PJFH,a__OJFH,new_size__PYIH;
+  __UINTEGER_32 lab_type__OYIH,sz__OBDH,a__TBDH,new_size__PBDH;
+  __UINTEGER_32 new_size2__QBDH,a__SJFH,new_size__TJFH,sz__0DMF,a__ZJFH;
+  __UINTEGER_32 new_size__0JFH,t__4JFH,a__3JFH,new_size__BZIH;
+  __UINTEGER_32 lab_type__AZIH,sz__WBDH,a__1BDH,new_size__XBDH;
+  __UINTEGER_32 new_size2__YBDH,a__BKFH,new_size__CKFH,sz__H3YB,a__IKFH;
+  __UINTEGER_32 new_size__JKFH,t__NKFH,a__MKFH,new_size__TZIH;
+  __UINTEGER_32 lab_type__SZIH,sz__MAZB,a__QKFH,new_size__RKFH,t__VKFH;
+  __UINTEGER_32 a__UKFH,new_size__3ZIH,lab_type__2ZIH,sz__GK5B,a__YKFH;
+  __UINTEGER_32 new_size__ZKFH,t__3KFH,a__2KFH,new_size__H0IH;
+  __UINTEGER_32 lab_type__G0IH,sz__55HE,a__ALFH,new_size__BLFH,t__FLFH;
+  __UINTEGER_32 a__ELFH,new_size__R0IH,lab_type__Q0IH,sz__GUB,a__ILFH;
+  __UINTEGER_32 new_size__JLFH,t__NLFH,a__MLFH,new_size__10IH;
+  __UINTEGER_32 lab_type__00IH,sz__GNGH,a__HNGH,new_size__INGH,t__JNGH;
+  __UINTEGER_32 a__KNGH,new_size__F1IH,lab_type__E1IH,sz__HHKB,a__RLFH;
+  __UINTEGER_32 new_size__SLFH,t__WLFH,a__VLFH,new_size__S1IH;
+  __UINTEGER_32 lab_type__R1IH,sz__KKZB,a__2LFH,new_size__3LFH,t__BMFH;
+  __UINTEGER_32 a__AMFH,new_size__21IH,lab_type__11IH,sz__BOGH,a__COGH;
+  __UINTEGER_32 new_size__DOGH,t__EOGH,a__FOGH,new_size__G2IH;
+  __UINTEGER_32 lab_type__F2IH,sz__LOGH,a__MOGH,new_size__NOGH,t__OOGH;
+  __UINTEGER_32 a__POGH,new_size__Q2IH,lab_type__P2IH,sz__VOGH,a__WOGH;
+  __UINTEGER_32 new_size__XOGH,t__YOGH,a__ZOGH,new_size__32IH;
+  __UINTEGER_32 lab_type__22IH,sz__DPED,a__HCEH,new_size__ICEH,t__MCEH;
+  __UINTEGER_32 a__LCEH,new_size__H3IH,lab_type__G3IH,sz__PYB,a__KMFH;
+  __UINTEGER_32 new_size__LMFH,t__PMFH,a__OMFH,new_size__R3IH;
+  __UINTEGER_32 lab_type__Q3IH,sz__4DDH,a__DEDH,new_size__5DDH;
+  __UINTEGER_32 new_size2__AEDH,a__SMFH,new_size__TMFH,sz__R2B,a__ZMFH;
+  __UINTEGER_32 new_size__0MFH,t__4MFH,a__3MFH,new_size__D4IH;
+  __UINTEGER_32 lab_type__C4IH,sz__5OGH,a__APGH,new_size__BPGH,t__CPGH;
+  __UINTEGER_32 a__DPGH,new_size__N4IH,lab_type__M4IH,sz__D4B,a__SWDH;
+  __UINTEGER_32 new_size__TWDH,t__XWDH,a__WWDH,new_size__X4IH;
+  __UINTEGER_32 lab_type__W4IH;
+  __STRING *Self__GOEB,*new__UWZG,*new__WWZG,*Self__REDH,*Self__3EDH;
+  __STRING *Self__LRGH,*Self__DOFH,*Self__FOFH,*Self__34IH;
+  __ITM_TYPE_PARAMETER *result__LWQ,*Self__L3V;
+  __LIP_BOOLEAN *result__0XMF;
+  void *result__DYIH,*result__VYIH,*result__HZIH,*result__X3IH;
+  void *txt__1,*fmt_name__KNC,*k__MNGH,*__tmp__2ND,*k__YPEB;
+  void *element__GMFH,*i__HOGH,*element__AUEC,*i__1OGH,*__tmp__4B;
+  void *__tmp__2H,*__tmp__1BYD,*__tmp__RCYD,*__tmp__SKTD,*__tmp__EFYD;
+  void *__tmp__0FYD,*__tmp__2KTD,*__tmp__NIYD,*__tmp__DJYD,*__tmp__PLYD;
+  void *__tmp__2LTD,*__tmp__VNYD,*__tmp__GMTD,*__tmp__1PYD;
   void *p__AB;
-  __STRING_CONSTANT *result__XAAH,*Self__BWS,*Self__R54G,*Self__YMS;
-  __STRING_CONSTANT *Self__EBAH,*Self__JBAH,*Self__OBAH,*Self__KEUG;
-  __STRING_CONSTANT *Self__MEUG,*Self__3RCH,*Self__HSCH,*Self__MSCH;
-  __STRING_CONSTANT *Self__RSCH,*Self__WSCH;
-  __POSITION pos__55TG,pos__JAUG,pos__1BUG,pos__3BUG,pos__5BUG;
-  __POSITION pos__BCUG,pos__DCUG;
-  __TYPE_ID *result__QCAH,*result__U3B;
+  __STRING_CONSTANT *result__DNGH,*Self__NWS,*Self__OLFH,*Self__ENS;
+  __STRING_CONSTANT *Self__QNGH,*Self__VNGH,*Self__0NGH,*Self__TWZG;
+  __STRING_CONSTANT *Self__VWZG,*Self__14IH,*Self__F5IH,*Self__K5IH;
+  __STRING_CONSTANT *Self__P5IH,*Self__U5IH;
+  __POSITION pos__ISZG,pos__SSZG,pos__EUZG,pos__GUZG,pos__IUZG;
+  __POSITION pos__KUZG,pos__MUZG,__tmp__5KYD,__tmp__ELYD,__tmp__FNYD;
+  __POSITION __tmp__KNYD,__tmp__LPYD,__tmp__QPYD;
+  __TYPE_ID *result__2OGH,*result__A4B;
   void *ent__TB;
-  __DIRECTORY_UNIX *Self__2HSD;
-  void *dir__4HSD,*dir__GISD,*__tmp__AD,*dir__SB;
-  __FILE_UNIX *Self__SIRD;
-  __PROTOTYPE *Self__KJTD;
-  void *s__P0XD,*__tmp__41XD,*s__O2XD,*__tmp__33XD,*s__N4XD,*__tmp__25XD;
-  void *s__MAYD,*__tmp__VBYD,*s__3BYD,*__tmp__GDYD,*s__ODYD,*__tmp__XEYD;
-  void *__tmp__UJTD,*__tmp__OKTD,*__tmp__1KTD,*__tmp__VLTD;
-  __SECTION_ *Self__EXUG,*Self__FXUG,*Self__GXUG,*Self__HXUG;
-  __CHARACTER *arg__WGD,*Self__VAAH,*p__1NEB,*path__VY,*Self__HKC;
-  __CHARACTER *Self__QB5G,*model__RB5G,*Self__2B5G,*model__3B5G;
-  __CHARACTER *__tmp__AFAH,*Self__CFAH;
-  __FAST_ARRAYoSTRINGo *result__QDCH,*Self__YDCH,*result__V3F,*Self__XFT;
-  void *result__VGD;
-  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__PTG,*Self__MIT;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__W3DB;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__OMCC;
-  __FAST_ARRAYoPROTOTYPEo *result__YMJ,*Self__ICU;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__5MH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__TMT;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5AAH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KPEB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__YCAH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__CB5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GDAH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GB5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UDAH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KB5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RVVB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HEAH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WB5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__BCT;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__CC5G;
-  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__BOC,*Self__CPS;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__VZQ,*Self__L3V;
-  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__SDR,*Self__3EW;
-  __FAST_ARRAYoITM_TYPE_MULTIo *result__CSQ,*Self__I1V;
-  __FAST_ARRAYoITM_TYPE_BLOCKo *result__I0O,*Self__RJV;
-  __FAST_ARRAYoITM_TYPE_GENERICo *result__P2Q,*Self__4AW;
-  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__3KK;
-  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__DLU;
-  __FAST_ARRAYoITM_TYPE_STYLEo *result__1UR,*Self__GLW;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__0HK,*Self__HIU;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__D4J,*Self__2EU;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__ZKM,*Self__KUU;
-  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__V2MF,*Self__RCPF;
-  __FAST_ARRAYoLIP_INTEGERo *result__OSSE,*Self__4CWE;
-  __FAST_ARRAYoLIP_STRINGo *result__55KF,*Self__VWOF;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__NUMD,*Self__REUD;
-  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__4UED;
-  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__GLSD;
-  void **Result__KEHE;
-  __FAST_ARRAYoLIP_SLOT_DATAo *result__DKMF,*Self__M3OF;
-  void **Result__EBZF;
-  __FAST_ARRAYoLIP_SLOT_CODEo *result__PWLF,*Self__3ZOF;
-  void **Result__I3YF;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__Y2YB;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__WWFC;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__35YB;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__VZFC;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__XJ5B,*Self__DKHC;
-  __HASHED_SEToABSTRACT_STRINGo *result__XTB,*Self__1BS;
-  __BOOLEAN __tmp__5Z,__tmp__00,result__T5NB,__tmp__I1,result__FAOB;
-  __BOOLEAN __tmp__W1,result__XAOB,__tmp__D2,result__JBOB,__tmp__G4;
-  __BOOLEAN result__IOCH,result__2REB,result__TPCH,result__PGG;
-  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__0RCH,is_first__O0XD;
-  __BOOLEAN is_first__N2XD,result__ESCH,is_first__M4XD,result__JSCH;
-  __BOOLEAN __tmp__TKTD,is_first__LAYD,is_first__2BYD,result__OSCH;
-  __BOOLEAN is_first__NDYD,result__TSCH,__tmp__0LTD;
-  __CHARACTER result__JOCH,result__UPCH,result__TJ1G,result__OB1G;
-  __CHARACTER Self__BSCH,result__CSCH;
-  __LINKED_LISToSTRING_CONSTANTo *result__YGKB,*Self__KA5G,*Self__TTEC;
-  void *node__BBAH,*node__VPEB,*node1__WHZB,*node2__XHZB,*__tmp__CREB;
-  void *node__0CAH,*node__EB5G,*node__IDAH,*node__IB5G,*node__WDAH;
-  void *node__MB5G,*node__1VVB,*node__JEAH,*node__YB5G,*node__MCT;
-  void *node__EC5G;
-  void **old_buckets__VHZB;
-  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__1JZB;
-  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__PDGC;
-  void *def__0REB;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__SBAH,*Self__0BAH;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__2BAH,*Self__ECAH;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__GCAH,*Self__OCAH;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__UOED,*Self__UKSD;
-  __FAST_ARRAYoSLOTo *result__AYB,*Self__5DS;
-  void **Result__AI1C;
-  __FAST_ARRAYoTYPE_IDo *result__C2B,*Self__4GS;
+  __DIRECTORY_UNIX *Self__IISD;
+  void *dir__KISD,*dir__SISD,*__tmp__AD,*dir__SB;
+  __FILE_UNIX *Self__4IRD;
+  __PROTOTYPE *Self__WJTD;
+  void *s__EAYD,*s__NDYD,*s__WGYD,*s__5JYD,*s__FMYD,*s__LOYD;
+  void *__tmp__IKTD,*__tmp__FBYD,*__tmp__OEYD,*__tmp__ELTD,*__tmp__XHYD;
+  void *__tmp__SLTD,*__tmp__OMTD;
+  __SECTION_ *Self__HK0G,*Self__IK0G,*Self__JK0G,*Self__KK0G,*Self__LK0G;
+  __SECTION_ *Self__MK0G,*Self__PK0G;
+  void *__tmp__TBYD,*__tmp__2EYD,*__tmp__FIYD;
+  void *__tmp__VBYD,*ts__SBYD,*__tmp__4EYD,*ts__1EYD,*__tmp__HIYD;
+  void *ts__EIYD;
+  __CHARACTER *arg__CHD,*Self__BNGH,*p__HOEB,*path__4Y,*Self__TKC;
+  __CHARACTER *Self__NNFH,*model__ONFH,*Self__ZNFH,*model__0NFH;
+  __CHARACTER *__tmp__MRGH,*Self__ORGH;
+  __FAST_ARRAYoSTRINGo *result__EQIH,*Self__MQIH,*result__B4F,*Self__DGT;
+  void *result__BHD;
+  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__1TG,*Self__YIT;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__C4DB;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__0MCC;
+  __FAST_ARRAYoPROTOTYPEo *result__ENJ,*Self__UCU;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__LNH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5MT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__LNGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WPEB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__EPGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5MFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SPGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DNFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__AQGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HNFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3VVB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__TQGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__TNFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NCT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5NFH;
+  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__NOC,*Self__OPS;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__B0Q,*Self__X3V;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__4DR,*Self__JFW;
+  __FAST_ARRAYoITM_TYPE_MULTIo *result__OSQ,*Self__U1V;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *result__U0O,*Self__3JV;
+  __FAST_ARRAYoITM_TYPE_GENERICo *result__12Q,*Self__KBW;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__JLK;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__PLU;
+  __FAST_ARRAYoITM_TYPE_STYLEo *result__HVR,*Self__SLW;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__GIK,*Self__TIU;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__P4J,*Self__IFU;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__FLM,*Self__WUU;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__ZBNF,*Self__ZFPF;
+  __FAST_ARRAYoLIP_INTEGERo *result__UATE,*Self__CVWE;
+  __FAST_ARRAYoLIP_STRINGo *result__UMLF,*Self__LYOF;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__ZUMD,*Self__KFUD;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__KVED;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__SLSD;
+  void **Result__TRHE;
+  __FAST_ARRAYoLIP_SLOT_DATAo *result__WSMF,*Self__UAPF;
+  void **Result__42ZF;
+  __FAST_ARRAYoLIP_SLOT_CODEo *result__XDMF,*Self__V1OF;
+  void **Result__FYZF;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__E3YB;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__CXFC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__JAZB;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__B0FC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__DK5B,*Self__PKHC;
+  __FAST_ARRAYoITM_SLOTo *result__25HE,*Self__ZYVE;
+  __HASHED_SEToABSTRACT_STRINGo *result__DUB,*Self__HCS;
+  __BOOLEAN __tmp__I0,__tmp__D1,result__55NB,__tmp__R1,result__RAOB;
+  __BOOLEAN __tmp__51,result__DBOB,__tmp__M2,result__VBOB,__tmp__P4;
+  __BOOLEAN result__G1IH,result__ISEB,result__R2IH,result__1GG;
+  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__Y4IH;
+  __BOOLEAN is_first_cur__DAYD,__tmp__CCYD,__tmp__5BYD,__tmp__FCYD;
+  __BOOLEAN is_first_cur__MDYD,result__C5IH,__tmp__LFYD,__tmp__IFYD;
+  __BOOLEAN __tmp__OFYD,is_first_cur__VGYD,result__H5IH,__tmp__JLTD;
+  __BOOLEAN __tmp__UIYD,__tmp__RIYD,__tmp__XIYD,is_first__4JYD;
+  __BOOLEAN is_first__EMYD,result__M5IH,is_first__KOYD,result__R5IH;
+  __BOOLEAN __tmp__TMTD;
+  __CHARACTER result__H1IH,result__S2IH,result__3SBH,result__GKBH;
+  __CHARACTER Self__54IH,result__A5IH,__tmp__MBYD,__tmp__VEYD;
+  __CHARACTER __tmp__4HYD;
+  __LINKED_LISToSTRING_CONSTANTo *result__EHKB,*Self__HMFH,*Self__5TEC;
+  void *node__NNGH,*node__BQEB,*node1__CIZB,*node2__DIZB,*__tmp__OREB;
+  void *node__GPGH,*node__BNFH,*node__UPGH,*node__FNFH,*node__CQGH;
+  void *node__JNFH,*node__HWVB,*node__VQGH,*node__VNFH,*node__YCT;
+  void *node__BOFH;
+  void **old_buckets__BIZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__HKZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1DGC;
+  void *def__GSEB;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__4NGH,*Self__GOGH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__IOGH,*Self__QOGH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__SOGH,*Self__0OGH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__APED,*Self__ALSD;
+  __FAST_ARRAYoSLOTo *result__MYB,*Self__LES;
+  void **Result__MI1C;
+  __FAST_ARRAYoTYPE_IDo *result__O2B,*Self__KHS;
   arg_count  = argc;
   arg_vector = argv;
   parent_numeric__J=NUMERIC__;
-  clone_allocation_size__RSB= 0;
+  clone_allocation_size__3SB= 0;
   STRING_CONSTANT__->count__DD=((__INTEGER )((0)));
-  STRING__->count__KFC= 0;
-  STRING_CONSTANT__->storage__JQO=((__CHARACTER *)(NULL));
-  STRING__->storage__VBS=NULL;
-  nb_page__SRJ= 0;
-  MEMORY__->map_size_and_id__2SB= 0;
-  capacity_max__MA5= 0;
-  get_begin_memory__2BQB=((__POINTER )(NULL));
-  begin_memory__DVH=((__POINTER )(NULL));
-  MEMORY__->map_previous_linear__1SB= 0;
-  first_free__LDVB=NULL;
-  MEMORY__->map_next_free__3SB=NULL;
-  MEMORY__->map_previous_free__4SB=NULL;
-  STRING__->capacity__MBS= 0;
-  HASHED_SEToABSTRACT_STRINGo__->buckets__SYR=NULL;
-  HASHED_SEToABSTRACT_STRINGo__->capacity__NYR= 0;
-  HASHED_SEToABSTRACT_STRINGo__->count__TZR= 0;
+  STRING__->count__WFC= 0;
+  STRING_CONSTANT__->storage__VQO=((__CHARACTER *)(NULL));
+  STRING__->storage__BCS=NULL;
+  nb_page__4RJ= 0;
+  MEMORY__->map_size_and_id__ITB= 0;
+  capacity_max__YA5= 0;
+  get_begin_memory__ICQB=((__POINTER )(NULL));
+  begin_memory__PVH=((__POINTER )(NULL));
+  MEMORY__->map_previous_linear__HTB= 0;
+  first_free__XDVB=NULL;
+  MEMORY__->map_next_free__JTB=NULL;
+  MEMORY__->map_previous_free__KTB=NULL;
+  STRING__->capacity__YBS= 0;
+  HASHED_SEToABSTRACT_STRINGo__->buckets__4YR=NULL;
+  HASHED_SEToABSTRACT_STRINGo__->capacity__ZYR= 0;
+  HASHED_SEToABSTRACT_STRINGo__->count__5ZR= 0;
   list__FK=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->item__4YR=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->next__KZR=NULL;
-  string_tmp__VH=create__EBB( 256);
-  is_shorter__WY=FALSE__;
-  ARRAYED_COLLECTIONoSTRINGo__->upper__0JC= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->capacity__AGT= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->storage__LGT=NULL;
-  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__XJC=(*ARRAYED_COLLECTIONoSTRINGo__);
-  arg__WGD=NULL;
-  str__XGD=NULL;
-  new_count__ZDCH=((__INTEGER )(arg_count));
-  result__QDCH=NULL;
-  ptr__RDCH=((__POINTER )(NULL));
-  typ_id__SDCH= 0;
-  sz__TDCH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
-  if ((sz__TDCH ==  0)) {
-    result__QDCH=FAST_ARRAYoSTRINGo__;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->item__KZR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->next__WZR=NULL;
+  string_tmp__VH=create__NBB( 256);
+  is_shorter__5Y=FALSE__;
+  ARRAYED_COLLECTIONoSTRINGo__->upper__GKC= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->capacity__MGT= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->storage__XGT=NULL;
+  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__DKC=(*ARRAYED_COLLECTIONoSTRINGo__);
+  arg__CHD=NULL;
+  str__DHD=NULL;
+  new_count__NQIH=((__INTEGER )(arg_count));
+  result__EQIH=NULL;
+  ptr__FQIH=((__POINTER )(NULL));
+  typ_id__GQIH= 0;
+  sz__HQIH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__HQIH ==  0)) {
+    result__EQIH=FAST_ARRAYoSTRINGo__;
   } else {
-    typ_id__SDCH=__FAST_ARRAYoSTRINGo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__TDCH);
-    if ((typ_id__SDCH == (__INTEGER)(-  1))) {
-      a__UDCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__VDCH=(__UINTEGER_32)((__UINTEGER_32)(sz__TDCH + a__UDCH) & (__UINTEGER_32)(~ a__UDCH));
-      ptr_table__1DCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VDCH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__0DCH=((__POINTER )(NULL));
-      result__2DCH=((__POINTER *)ptr_table__1DCH)[ 0];
-      if ((result__2DCH == (void *)NULL)) {
-        result__2DCH=new_lab__ARJ(new_size__VDCH);
-        next__0DCH=(void *)((unsigned long)result__2DCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDCH)));
-        ((__POINTER *)next__0DCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1DCH)[ 0]=next__0DCH;
-      } else {
-        next__0DCH=((__POINTER *)result__2DCH)[ 0];
-        if ((next__0DCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2DCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VDCH <<  1)) <=  4096)) {
-            next__0DCH=(void *)((unsigned long)result__2DCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDCH)));
-          } else {
-            next__0DCH=new_lab__ARJ(new_size__VDCH);
-          };
-          ((__POINTER *)next__0DCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1DCH)[ 0]=next__0DCH;
-        } else {
-          ((__POINTER *)result__2DCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0DCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2DCH=next__0DCH;
-        };
-      };
-      ptr__RDCH=result__2DCH;
-    } else {
-      t__WDCH=((__UINTEGER_32 )typ_id__SDCH);
-      a__XDCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DECH=(__UINTEGER_32)((__UINTEGER_32)(sz__TDCH + a__XDCH) & (__UINTEGER_32)(~ a__XDCH));
-      ptr_table__AECH=((__POINTER )(&(table_type[(t__WDCH)])));
-      lab_type__CECH=(__UINTEGER_32)(t__WDCH |  1);
-      next__5DCH=((__POINTER )(NULL));
-      result__BECH=((__POINTER *)ptr_table__AECH)[ 0];
-      if ((result__BECH == (void *)NULL)) {
-        result__BECH=new_lab__ARJ(lab_type__CECH);
-        next__5DCH=(void *)((unsigned long)result__BECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DECH)));
-        ((__POINTER *)next__5DCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AECH)[ 0]=next__5DCH;
-      } else {
-        next__5DCH=((__POINTER *)result__BECH)[ 0];
-        if ((next__5DCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DECH <<  1)) <=  4096)) {
-            next__5DCH=(void *)((unsigned long)result__BECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DECH)));
-          } else {
-            next__5DCH=new_lab__ARJ(lab_type__CECH);
-          };
-          ((__POINTER *)next__5DCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AECH)[ 0]=next__5DCH;
-        } else {
-          ((__POINTER *)result__BECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5DCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BECH=next__5DCH;
-        };
-      };
-      ptr__RDCH=result__BECH;
-    };
-    result__QDCH=((__FAST_ARRAYoSTRINGo *)ptr__RDCH);
-    *(result__QDCH) = *(FAST_ARRAYoSTRINGo__);
-  };
-  Self__YDCH=((__FAST_ARRAYoSTRINGo *)result__QDCH);
-  if ((Self__YDCH->parent_arrayed_collection__XJC.capacity__AGT < new_count__ZDCH)) {
-    Self__YDCH->parent_arrayed_collection__XJC.storage__LGT=create__NFRB(new_count__ZDCH);
-    Self__YDCH->parent_arrayed_collection__XJC.capacity__AGT=new_count__ZDCH;
-  };
-  Self__YDCH->parent_arrayed_collection__XJC.upper__0JC=(__INTEGER)(-  1);
-  result__VGD=result__QDCH;
-  Self__1GF= 0;
-  limit_up__2GF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
-  while ((Self__1GF <= limit_up__2GF)) {
-    arg__WGD=((__CHARACTER *)(arg_vector[(Self__1GF)]));
-    Self__VAAH=((__CHARACTER *)arg__WGD);
-    idx__UAAH= 0;
-    while ((! ((idx__UAAH >  1024) || ('\0' == Self__VAAH[idx__UAAH])))) {
-      idx__UAAH=(__INTEGER)(idx__UAAH +  1);
-    };
-    str__XGD=create__EBB(idx__UAAH);
-    Self__0NEB=((__STRING *)str__XGD);
-    p__1NEB=arg__WGD;
-    i__2NEB= 0;
-    Self__0NEB->count__KFC= 0;
-    while ((((__CHARACTER *)p__1NEB)[i__2NEB] != '\0')) {
-      add_last__NLT(Self__0NEB,((__CHARACTER *)p__1NEB)[i__2NEB]);
-      i__2NEB=(__INTEGER)(i__2NEB +  1);
-    };
-    add_last__URV(result__VGD,str__XGD);
-    Self__1GF=(__INTEGER)(Self__1GF +  1);
+    typ_id__GQIH=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + 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__PQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JQIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__OQIH=((__POINTER )(NULL));
+      result__QQIH=((__POINTER *)ptr_table__PQIH)[ 0];
+      if ((result__QQIH == (void *)NULL)) {
+        result__QQIH=new_lab__MRJ(new_size__JQIH);
+        next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQIH)));
+        ((__POINTER *)next__OQIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+      } else {
+        next__OQIH=((__POINTER *)result__QQIH)[ 0];
+        if ((next__OQIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QQIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JQIH <<  1)) <=  4096)) {
+            next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQIH)));
+          } else {
+            next__OQIH=new_lab__MRJ(new_size__JQIH);
+          };
+          ((__POINTER *)next__OQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+        } else {
+          ((__POINTER *)result__QQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QQIH=next__OQIH;
+        };
+      };
+      ptr__FQIH=result__QQIH;
+    } else {
+      t__KQIH=((__UINTEGER_32 )typ_id__GQIH);
+      a__LQIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQIH + a__LQIH) & (__UINTEGER_32)(~ a__LQIH));
+      ptr_table__UQIH=((__POINTER )(&(table_type[(t__KQIH)])));
+      lab_type__WQIH=(__UINTEGER_32)(t__KQIH |  1);
+      next__TQIH=((__POINTER )(NULL));
+      result__VQIH=((__POINTER *)ptr_table__UQIH)[ 0];
+      if ((result__VQIH == (void *)NULL)) {
+        result__VQIH=new_lab__MRJ(lab_type__WQIH);
+        next__TQIH=(void *)((unsigned long)result__VQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQIH)));
+        ((__POINTER *)next__TQIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
+      } else {
+        next__TQIH=((__POINTER *)result__VQIH)[ 0];
+        if ((next__TQIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VQIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XQIH <<  1)) <=  4096)) {
+            next__TQIH=(void *)((unsigned long)result__VQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQIH)));
+          } else {
+            next__TQIH=new_lab__MRJ(lab_type__WQIH);
+          };
+          ((__POINTER *)next__TQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
+        } else {
+          ((__POINTER *)result__VQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VQIH=next__TQIH;
+        };
+      };
+      ptr__FQIH=result__VQIH;
+    };
+    result__EQIH=((__FAST_ARRAYoSTRINGo *)ptr__FQIH);
+    *(result__EQIH) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__MQIH=((__FAST_ARRAYoSTRINGo *)result__EQIH);
+  if ((Self__MQIH->parent_arrayed_collection__DKC.capacity__MGT < new_count__NQIH)) {
+    Self__MQIH->parent_arrayed_collection__DKC.storage__XGT=create__ZFRB(new_count__NQIH);
+    Self__MQIH->parent_arrayed_collection__DKC.capacity__MGT=new_count__NQIH;
+  };
+  Self__MQIH->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(-  1);
+  result__BHD=result__EQIH;
+  Self__HHF= 0;
+  limit_up__IHF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
+  while ((Self__HHF <= limit_up__IHF)) {
+    arg__CHD=((__CHARACTER *)(arg_vector[(Self__HHF)]));
+    Self__BNGH=((__CHARACTER *)arg__CHD);
+    idx__ANGH= 0;
+    while ((! ((idx__ANGH >  1024) || ('\0' == Self__BNGH[idx__ANGH])))) {
+      idx__ANGH=(__INTEGER)(idx__ANGH +  1);
+    };
+    str__DHD=create__NBB(idx__ANGH);
+    Self__GOEB=((__STRING *)str__DHD);
+    p__HOEB=arg__CHD;
+    i__IOEB= 0;
+    Self__GOEB->count__WFC= 0;
+    while ((((__CHARACTER *)p__HOEB)[i__IOEB] != '\0')) {
+      add_last__ZLT(Self__GOEB,((__CHARACTER *)p__HOEB)[i__IOEB]);
+      i__IOEB=(__INTEGER)(i__IOEB +  1);
+    };
+    add_last__ASV(result__BHD,str__DHD);
+    Self__HHF=(__INTEGER)(Self__HHF +  1);
   };
   output_name__DI=NULL;
-  format_name__Y0=NULL;
-  is_short_code__G1=FALSE__;
-  is_short_private__U1=FALSE__;
+  format_name__B1=NULL;
+  is_short_code__P1=FALSE__;
+  is_short_private__31=FALSE__;
   is_short_recursive__JB=FALSE__;
   is_shorter2__VI=FALSE__;
   input_name__3B=NULL;
-  FILE_SYSTEM__->parent_directory__DFD=1;
-  string_tmp__HED=create__EBB( 255);
+  FILE_SYSTEM__->parent_directory__PFD=1;
+  string_tmp__TED=create__NBB( 255);
   ENTRY__->path__BD=NULL;
-  ENTRY__->name__JNT=NULL;
-  ENTRY_UNIX__->parent_entry__MED=(*ENTRY__);
-  FILE_UNIX__->parent_entry_unix__QCF=(*ENTRY_UNIX__);
-  DIRECTORY_UNIX__->parent_entry_unix__NED=(*ENTRY_UNIX__);
-  DIRECTORY__->list__2ERD=NULL;
-  DIRECTORY_UNIX__->parent_directory__OED=(*DIRECTORY__);
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__Z0S=NULL;
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__U0S= 0;
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__01S= 0;
-  result__PTG=NULL;
-  ptr__QTG=((__POINTER )(NULL));
-  typ_id__VTG= 0;
-  sz__STG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
-  if ((sz__STG ==  0)) {
-    result__PTG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+  ENTRY__->name__VNT=NULL;
+  ENTRY_UNIX__->parent_entry__YED=(*ENTRY__);
+  FILE_UNIX__->parent_entry_unix__2CF=(*ENTRY_UNIX__);
+  DIRECTORY_UNIX__->parent_entry_unix__ZED=(*ENTRY_UNIX__);
+  DIRECTORY__->list__IFRD=NULL;
+  DIRECTORY_UNIX__->parent_directory__0ED=(*DIRECTORY__);
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__F1S=NULL;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__A1S= 0;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__G2S= 0;
+  result__1TG=NULL;
+  ptr__2TG=((__POINTER )(NULL));
+  typ_id__BUG= 0;
+  sz__4TG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
+  if ((sz__4TG ==  0)) {
+    result__1TG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
   } else {
-    typ_id__VTG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__STG);
-    if ((typ_id__VTG == (__INTEGER)(-  1))) {
-      a__GY4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__HY4G=(__UINTEGER_32)((__UINTEGER_32)(sz__STG + a__GY4G) & (__UINTEGER_32)(~ a__GY4G));
-      ptr_table__FECH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HY4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__EECH=((__POINTER )(NULL));
-      result__GECH=((__POINTER *)ptr_table__FECH)[ 0];
-      if ((result__GECH == (void *)NULL)) {
-        result__GECH=new_lab__ARJ(new_size__HY4G);
-        next__EECH=(void *)((unsigned long)result__GECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HY4G)));
-        ((__POINTER *)next__EECH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FECH)[ 0]=next__EECH;
-      } else {
-        next__EECH=((__POINTER *)result__GECH)[ 0];
-        if ((next__EECH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HY4G <<  1)) <=  4096)) {
-            next__EECH=(void *)((unsigned long)result__GECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HY4G)));
-          } else {
-            next__EECH=new_lab__ARJ(new_size__HY4G);
-          };
-          ((__POINTER *)next__EECH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FECH)[ 0]=next__EECH;
-        } else {
-          ((__POINTER *)result__GECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EECH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GECH=next__EECH;
-        };
-      };
-      ptr__QTG=result__GECH;
-    } else {
-      t__LY4G=((__UINTEGER_32 )typ_id__VTG);
-      a__KY4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NECH=(__UINTEGER_32)((__UINTEGER_32)(sz__STG + a__KY4G) & (__UINTEGER_32)(~ a__KY4G));
-      ptr_table__KECH=((__POINTER )(&(table_type[(t__LY4G)])));
-      lab_type__MECH=(__UINTEGER_32)(t__LY4G |  1);
-      next__JECH=((__POINTER )(NULL));
-      result__LECH=((__POINTER *)ptr_table__KECH)[ 0];
-      if ((result__LECH == (void *)NULL)) {
-        result__LECH=new_lab__ARJ(lab_type__MECH);
-        next__JECH=(void *)((unsigned long)result__LECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NECH)));
-        ((__POINTER *)next__JECH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KECH)[ 0]=next__JECH;
-      } else {
-        next__JECH=((__POINTER *)result__LECH)[ 0];
-        if ((next__JECH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NECH <<  1)) <=  4096)) {
-            next__JECH=(void *)((unsigned long)result__LECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NECH)));
-          } else {
-            next__JECH=new_lab__ARJ(lab_type__MECH);
-          };
-          ((__POINTER *)next__JECH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KECH)[ 0]=next__JECH;
-        } else {
-          ((__POINTER *)result__LECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JECH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LECH=next__JECH;
-        };
-      };
-      ptr__QTG=result__LECH;
-    };
-    result__PTG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__QTG);
-    *(result__PTG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
-  };
-  Self__MIT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__PTG);
-  new_capacity__XJY=prime_number_ceiling__L41( 193);
-  Self__MIT->buckets__Z0S=create__LB4(new_capacity__XJY);
-  Self__MIT->capacity__U0S=new_capacity__XJY;
-  Self__MIT->count__01S= 0;
-  alias__YED=result__PTG;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__F1S=NULL;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__R1S=NULL;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__OSOB=NULL;
-  string_tmp2__N0AC=create__EBB( 255);
-  string_tmp3__T0AC=create__EBB( 255);
-  ITM_OBJECT__->position__BDJ=((__POSITION ) 0);
+    typ_id__BUG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4TG);
+    if ((typ_id__BUG == (__INTEGER)(-  1))) {
+      a__1DFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2DFH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TG + a__1DFH) & (__UINTEGER_32)(~ a__1DFH));
+      ptr_table__ZQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2DFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YQIH=((__POINTER )(NULL));
+      result__0QIH=((__POINTER *)ptr_table__ZQIH)[ 0];
+      if ((result__0QIH == (void *)NULL)) {
+        result__0QIH=new_lab__MRJ(new_size__2DFH);
+        next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2DFH)));
+        ((__POINTER *)next__YQIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
+      } else {
+        next__YQIH=((__POINTER *)result__0QIH)[ 0];
+        if ((next__YQIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0QIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2DFH <<  1)) <=  4096)) {
+            next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2DFH)));
+          } else {
+            next__YQIH=new_lab__MRJ(new_size__2DFH);
+          };
+          ((__POINTER *)next__YQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
+        } else {
+          ((__POINTER *)result__0QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0QIH=next__YQIH;
+        };
+      };
+      ptr__2TG=result__0QIH;
+    } else {
+      t__AEFH=((__UINTEGER_32 )typ_id__BUG);
+      a__5DFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TG + a__5DFH) & (__UINTEGER_32)(~ a__5DFH));
+      ptr_table__4QIH=((__POINTER )(&(table_type[(t__AEFH)])));
+      lab_type__ARIH=(__UINTEGER_32)(t__AEFH |  1);
+      next__3QIH=((__POINTER )(NULL));
+      result__5QIH=((__POINTER *)ptr_table__4QIH)[ 0];
+      if ((result__5QIH == (void *)NULL)) {
+        result__5QIH=new_lab__MRJ(lab_type__ARIH);
+        next__3QIH=(void *)((unsigned long)result__5QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRIH)));
+        ((__POINTER *)next__3QIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4QIH)[ 0]=next__3QIH;
+      } else {
+        next__3QIH=((__POINTER *)result__5QIH)[ 0];
+        if ((next__3QIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5QIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BRIH <<  1)) <=  4096)) {
+            next__3QIH=(void *)((unsigned long)result__5QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRIH)));
+          } else {
+            next__3QIH=new_lab__MRJ(lab_type__ARIH);
+          };
+          ((__POINTER *)next__3QIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4QIH)[ 0]=next__3QIH;
+        } else {
+          ((__POINTER *)result__5QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3QIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5QIH=next__3QIH;
+        };
+      };
+      ptr__2TG=result__5QIH;
+    };
+    result__1TG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__2TG);
+    *(result__1TG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
+  };
+  Self__YIT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__1TG);
+  new_capacity__DKY=prime_number_ceiling__X41( 193);
+  Self__YIT->buckets__F1S=create__XB4(new_capacity__DKY);
+  Self__YIT->capacity__A1S=new_capacity__DKY;
+  Self__YIT->count__G2S= 0;
+  alias__EFD=result__1TG;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__R1S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__31S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__0SOB=NULL;
+  string_tmp2__Z0AC=create__NBB( 255);
+  string_tmp3__50AC=create__NBB( 255);
+  ITM_OBJECT__->position__NDJ=((__POSITION ) 0);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
-  NAMED__->style__VDU='\0';
+  NAMED__->style__BEU='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__JNBC=NULL;
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__ENBC= 0;
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__JOBC= 0;
-  result__W3DB=NULL;
-  ptr__X3DB=((__POINTER )(NULL));
-  typ_id__23DB= 0;
-  sz__Z3DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
-  if ((sz__Z3DB ==  0)) {
-    result__W3DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__VNBC=NULL;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__QNBC= 0;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__VOBC= 0;
+  result__C4DB=NULL;
+  ptr__D4DB=((__POINTER )(NULL));
+  typ_id__I4DB= 0;
+  sz__F4DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
+  if ((sz__F4DB ==  0)) {
+    result__C4DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
   } else {
-    typ_id__23DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__Z3DB);
-    if ((typ_id__23DB == (__INTEGER)(-  1))) {
-      a__OY4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__PY4G=(__UINTEGER_32)((__UINTEGER_32)(sz__Z3DB + a__OY4G) & (__UINTEGER_32)(~ a__OY4G));
-      ptr_table__PECH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PY4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__OECH=((__POINTER )(NULL));
-      result__QECH=((__POINTER *)ptr_table__PECH)[ 0];
-      if ((result__QECH == (void *)NULL)) {
-        result__QECH=new_lab__ARJ(new_size__PY4G);
-        next__OECH=(void *)((unsigned long)result__QECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PY4G)));
-        ((__POINTER *)next__OECH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PECH)[ 0]=next__OECH;
-      } else {
-        next__OECH=((__POINTER *)result__QECH)[ 0];
-        if ((next__OECH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PY4G <<  1)) <=  4096)) {
-            next__OECH=(void *)((unsigned long)result__QECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PY4G)));
-          } else {
-            next__OECH=new_lab__ARJ(new_size__PY4G);
-          };
-          ((__POINTER *)next__OECH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PECH)[ 0]=next__OECH;
-        } else {
-          ((__POINTER *)result__QECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OECH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QECH=next__OECH;
-        };
-      };
-      ptr__X3DB=result__QECH;
-    } else {
-      t__TY4G=((__UINTEGER_32 )typ_id__23DB);
-      a__SY4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__XECH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z3DB + a__SY4G) & (__UINTEGER_32)(~ a__SY4G));
-      ptr_table__UECH=((__POINTER )(&(table_type[(t__TY4G)])));
-      lab_type__WECH=(__UINTEGER_32)(t__TY4G |  1);
-      next__TECH=((__POINTER )(NULL));
-      result__VECH=((__POINTER *)ptr_table__UECH)[ 0];
-      if ((result__VECH == (void *)NULL)) {
-        result__VECH=new_lab__ARJ(lab_type__WECH);
-        next__TECH=(void *)((unsigned long)result__VECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XECH)));
-        ((__POINTER *)next__TECH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UECH)[ 0]=next__TECH;
-      } else {
-        next__TECH=((__POINTER *)result__VECH)[ 0];
-        if ((next__TECH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XECH <<  1)) <=  4096)) {
-            next__TECH=(void *)((unsigned long)result__VECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XECH)));
-          } else {
-            next__TECH=new_lab__ARJ(lab_type__WECH);
-          };
-          ((__POINTER *)next__TECH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UECH)[ 0]=next__TECH;
-        } else {
-          ((__POINTER *)result__VECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TECH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VECH=next__TECH;
-        };
-      };
-      ptr__X3DB=result__VECH;
-    };
-    result__W3DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__X3DB);
-    *(result__W3DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
-  };
-  Self__OMCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__W3DB);
-  new_capacity__4UJC=prime_number_ceiling__L41( 193);
-  Self__OMCC->buckets__JNBC=create__1HTC(new_capacity__4UJC);
-  Self__OMCC->capacity__ENBC=new_capacity__4UJC;
-  Self__OMCC->count__JOBC= 0;
-  prototype_dico__DTS=result__W3DB;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__VNBC=NULL;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__AOBC=NULL;
-  PROTOTYPE__->filename__IPG=NULL;
-  PROTOTYPE__->shortname__ZHE=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__KBBC= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__MBBC= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__ICBC=NULL;
-  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__HME=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
-  ITM_TYPE_SIMPLE__->name__4XP=NULL;
-  ITM_TYPE_PARAMETER__->parent_itm_type__RDE=(*ITM_TYPE_SIMPLE__);
-  PROTOTYPE__->idf_generic_list__IME=NULL;
+    typ_id__I4DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__F4DB);
+    if ((typ_id__I4DB == (__INTEGER)(-  1))) {
+      a__DEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__F4DB + a__DEFH) & (__UINTEGER_32)(~ a__DEFH));
+      ptr_table__DRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__CRIH=((__POINTER )(NULL));
+      result__ERIH=((__POINTER *)ptr_table__DRIH)[ 0];
+      if ((result__ERIH == (void *)NULL)) {
+        result__ERIH=new_lab__MRJ(new_size__EEFH);
+        next__CRIH=(void *)((unsigned long)result__ERIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EEFH)));
+        ((__POINTER *)next__CRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DRIH)[ 0]=next__CRIH;
+      } else {
+        next__CRIH=((__POINTER *)result__ERIH)[ 0];
+        if ((next__CRIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ERIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EEFH <<  1)) <=  4096)) {
+            next__CRIH=(void *)((unsigned long)result__ERIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EEFH)));
+          } else {
+            next__CRIH=new_lab__MRJ(new_size__EEFH);
+          };
+          ((__POINTER *)next__CRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DRIH)[ 0]=next__CRIH;
+        } else {
+          ((__POINTER *)result__ERIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ERIH=next__CRIH;
+        };
+      };
+      ptr__D4DB=result__ERIH;
+    } else {
+      t__IEFH=((__UINTEGER_32 )typ_id__I4DB);
+      a__HEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__F4DB + a__HEFH) & (__UINTEGER_32)(~ a__HEFH));
+      ptr_table__IRIH=((__POINTER )(&(table_type[(t__IEFH)])));
+      lab_type__KRIH=(__UINTEGER_32)(t__IEFH |  1);
+      next__HRIH=((__POINTER )(NULL));
+      result__JRIH=((__POINTER *)ptr_table__IRIH)[ 0];
+      if ((result__JRIH == (void *)NULL)) {
+        result__JRIH=new_lab__MRJ(lab_type__KRIH);
+        next__HRIH=(void *)((unsigned long)result__JRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRIH)));
+        ((__POINTER *)next__HRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IRIH)[ 0]=next__HRIH;
+      } else {
+        next__HRIH=((__POINTER *)result__JRIH)[ 0];
+        if ((next__HRIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JRIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LRIH <<  1)) <=  4096)) {
+            next__HRIH=(void *)((unsigned long)result__JRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRIH)));
+          } else {
+            next__HRIH=new_lab__MRJ(lab_type__KRIH);
+          };
+          ((__POINTER *)next__HRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IRIH)[ 0]=next__HRIH;
+        } else {
+          ((__POINTER *)result__JRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JRIH=next__HRIH;
+        };
+      };
+      ptr__D4DB=result__JRIH;
+    };
+    result__C4DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__D4DB);
+    *(result__C4DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
+  };
+  Self__0MCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__C4DB);
+  new_capacity__KVJC=prime_number_ceiling__X41( 193);
+  Self__0MCC->buckets__VNBC=create__HITC(new_capacity__KVJC);
+  Self__0MCC->capacity__QNBC=new_capacity__KVJC;
+  Self__0MCC->count__VOBC= 0;
+  prototype_dico__PTS=result__C4DB;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__BOBC=NULL;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__MOBC=NULL;
+  PROTOTYPE__->filename__UPG=NULL;
+  PROTOTYPE__->shortname__FIE=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__WBBC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__YBBC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__UCBC=NULL;
+  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__TME=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
+  ITM_TYPE_SIMPLE__->name__KYP=NULL;
+  ITM_TYPE_PARAMETER__->parent_itm_type__3DE=(*ITM_TYPE_SIMPLE__);
+  PROTOTYPE__->idf_generic_list__UME=NULL;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__4ST=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__RCU= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__KTT=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__3CU= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  result__YMJ=NULL;
-  ptr__ZMJ=((__POINTER )(NULL));
-  typ_id__4MJ= 0;
-  sz__1MJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
-  if ((sz__1MJ ==  0)) {
-    result__YMJ=FAST_ARRAYoPROTOTYPEo__;
+  result__ENJ=NULL;
+  ptr__FNJ=((__POINTER )(NULL));
+  typ_id__KNJ= 0;
+  sz__HNJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
+  if ((sz__HNJ ==  0)) {
+    result__ENJ=FAST_ARRAYoPROTOTYPEo__;
   } else {
-    typ_id__4MJ=__FAST_ARRAYoPROTOTYPEo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__1MJ);
-    if ((typ_id__4MJ == (__INTEGER)(-  1))) {
-      a__WY4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__XY4G=(__UINTEGER_32)((__UINTEGER_32)(sz__1MJ + a__WY4G) & (__UINTEGER_32)(~ a__WY4G));
-      ptr_table__ZECH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XY4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__YECH=((__POINTER )(NULL));
-      result__0ECH=((__POINTER *)ptr_table__ZECH)[ 0];
-      if ((result__0ECH == (void *)NULL)) {
-        result__0ECH=new_lab__ARJ(new_size__XY4G);
-        next__YECH=(void *)((unsigned long)result__0ECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XY4G)));
-        ((__POINTER *)next__YECH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZECH)[ 0]=next__YECH;
-      } else {
-        next__YECH=((__POINTER *)result__0ECH)[ 0];
-        if ((next__YECH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0ECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XY4G <<  1)) <=  4096)) {
-            next__YECH=(void *)((unsigned long)result__0ECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XY4G)));
-          } else {
-            next__YECH=new_lab__ARJ(new_size__XY4G);
-          };
-          ((__POINTER *)next__YECH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZECH)[ 0]=next__YECH;
-        } else {
-          ((__POINTER *)result__0ECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YECH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0ECH=next__YECH;
-        };
-      };
-      ptr__ZMJ=result__0ECH;
-    } else {
-      t__1Y4G=((__UINTEGER_32 )typ_id__4MJ);
-      a__0Y4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__BFCH=(__UINTEGER_32)((__UINTEGER_32)(sz__1MJ + a__0Y4G) & (__UINTEGER_32)(~ a__0Y4G));
-      ptr_table__4ECH=((__POINTER )(&(table_type[(t__1Y4G)])));
-      lab_type__AFCH=(__UINTEGER_32)(t__1Y4G |  1);
-      next__3ECH=((__POINTER )(NULL));
-      result__5ECH=((__POINTER *)ptr_table__4ECH)[ 0];
-      if ((result__5ECH == (void *)NULL)) {
-        result__5ECH=new_lab__ARJ(lab_type__AFCH);
-        next__3ECH=(void *)((unsigned long)result__5ECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BFCH)));
-        ((__POINTER *)next__3ECH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4ECH)[ 0]=next__3ECH;
-      } else {
-        next__3ECH=((__POINTER *)result__5ECH)[ 0];
-        if ((next__3ECH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5ECH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BFCH <<  1)) <=  4096)) {
-            next__3ECH=(void *)((unsigned long)result__5ECH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BFCH)));
-          } else {
-            next__3ECH=new_lab__ARJ(lab_type__AFCH);
-          };
-          ((__POINTER *)next__3ECH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4ECH)[ 0]=next__3ECH;
-        } else {
-          ((__POINTER *)result__5ECH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3ECH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5ECH=next__3ECH;
-        };
-      };
-      ptr__ZMJ=result__5ECH;
-    };
-    result__YMJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__ZMJ);
-    *(result__YMJ) = *(FAST_ARRAYoPROTOTYPEo__);
-  };
-  Self__ICU=((__FAST_ARRAYoPROTOTYPEo *)result__YMJ);
-  if ((Self__ICU->parent_arrayed_collection__AJ.capacity__RCU <  512)) {
-    Self__ICU->parent_arrayed_collection__AJ.storage__4ST=create__0ESB( 512);
-    Self__ICU->parent_arrayed_collection__AJ.capacity__RCU= 512;
-  };
-  Self__ICU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
-  prototype_list__BJ=result__YMJ;
-  PROTOTYPE__->index__JMG= 0;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__I3GD=NULL;
-  string_tmp__4VX=create__EBB( 128);
-  PROTOTYPE__->source__BBC=NULL;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__XAGC=NULL;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__Q4BC= 0;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__CPGC= 0;
-  PROTOTYPE__->slot_list__QUS=NULL;
-  object__3AC=NULL;
-  source__DBC=NULL;
-  position__GBC= 0;
-  pos_cur__JBC= 0;
-  pos_line__KBC= 0;
-  pos_col__LBC= 0;
-  key_comment_default__UBC=NULL;
-  is_catch_comment__UWC=FALSE__;
-  is_active_short__SBC=FALSE__;
-  output_code__SI=create__EBB( 4000000);
-  short_derive__VBC= 0;
-  last_comment__O0D=create__EBB( 256);
-  last_slot__E2D=NULL;
-  ITM_SLOT__->comment__KJJD=NULL;
-  ITM_SLOT__->parent_named__G5=(*NAMED__);
-  ITM_SLOT__->id_section__M1C=NULL;
-  ITM_SLOT__->result_type__O4FC=NULL;
-  ITM_SLOT__->affect__35FC='\0';
-  ITM_SLOT__->argument_list__0DHC=NULL;
-  ITM_SLOT__->next__CHHC=NULL;
-  ITM_SLOT_OPERATOR__->parent_itm_slot__CU5B=(*ITM_SLOT__);
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__TCT=NULL;
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__OCT= 0;
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__2LY= 0;
-  result__5MH=NULL;
-  ptr__ANH=((__POINTER )(NULL));
-  typ_id__FNH= 0;
-  sz__CNH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
-  if ((sz__CNH ==  0)) {
-    result__5MH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    typ_id__KNJ=__FAST_ARRAYoPROTOTYPEo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HNJ);
+    if ((typ_id__KNJ == (__INTEGER)(-  1))) {
+      a__LEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HNJ + a__LEFH) & (__UINTEGER_32)(~ a__LEFH));
+      ptr_table__NRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MRIH=((__POINTER )(NULL));
+      result__ORIH=((__POINTER *)ptr_table__NRIH)[ 0];
+      if ((result__ORIH == (void *)NULL)) {
+        result__ORIH=new_lab__MRJ(new_size__MEFH);
+        next__MRIH=(void *)((unsigned long)result__ORIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEFH)));
+        ((__POINTER *)next__MRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NRIH)[ 0]=next__MRIH;
+      } else {
+        next__MRIH=((__POINTER *)result__ORIH)[ 0];
+        if ((next__MRIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ORIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MEFH <<  1)) <=  4096)) {
+            next__MRIH=(void *)((unsigned long)result__ORIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEFH)));
+          } else {
+            next__MRIH=new_lab__MRJ(new_size__MEFH);
+          };
+          ((__POINTER *)next__MRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NRIH)[ 0]=next__MRIH;
+        } else {
+          ((__POINTER *)result__ORIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ORIH=next__MRIH;
+        };
+      };
+      ptr__FNJ=result__ORIH;
+    } else {
+      t__QEFH=((__UINTEGER_32 )typ_id__KNJ);
+      a__PEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HNJ + a__PEFH) & (__UINTEGER_32)(~ a__PEFH));
+      ptr_table__SRIH=((__POINTER )(&(table_type[(t__QEFH)])));
+      lab_type__URIH=(__UINTEGER_32)(t__QEFH |  1);
+      next__RRIH=((__POINTER )(NULL));
+      result__TRIH=((__POINTER *)ptr_table__SRIH)[ 0];
+      if ((result__TRIH == (void *)NULL)) {
+        result__TRIH=new_lab__MRJ(lab_type__URIH);
+        next__RRIH=(void *)((unsigned long)result__TRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VRIH)));
+        ((__POINTER *)next__RRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SRIH)[ 0]=next__RRIH;
+      } else {
+        next__RRIH=((__POINTER *)result__TRIH)[ 0];
+        if ((next__RRIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TRIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VRIH <<  1)) <=  4096)) {
+            next__RRIH=(void *)((unsigned long)result__TRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VRIH)));
+          } else {
+            next__RRIH=new_lab__MRJ(lab_type__URIH);
+          };
+          ((__POINTER *)next__RRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SRIH)[ 0]=next__RRIH;
+        } else {
+          ((__POINTER *)result__TRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TRIH=next__RRIH;
+        };
+      };
+      ptr__FNJ=result__TRIH;
+    };
+    result__ENJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__FNJ);
+    *(result__ENJ) = *(FAST_ARRAYoPROTOTYPEo__);
+  };
+  Self__UCU=((__FAST_ARRAYoPROTOTYPEo *)result__ENJ);
+  if ((Self__UCU->parent_arrayed_collection__AJ.capacity__3CU <  512)) {
+    Self__UCU->parent_arrayed_collection__AJ.storage__KTT=create__GFSB( 512);
+    Self__UCU->parent_arrayed_collection__AJ.capacity__3CU= 512;
+  };
+  Self__UCU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
+  prototype_list__BJ=result__ENJ;
+  PROTOTYPE__->index__VMG= 0;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__U3GD=NULL;
+  string_tmp__KWX=create__NBB( 128);
+  PROTOTYPE__->source__NBC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__DBGC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__24BC= 0;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__OPGC= 0;
+  PROTOTYPE__->slot_list__2US=NULL;
+  object__JBC=NULL;
+  source__PBC=NULL;
+  position__SBC= 0;
+  pos_cur__VBC= 0;
+  pos_line__WBC= 0;
+  pos_col__XBC= 0;
+  key_comment_default__ACC=NULL;
+  is_catch_comment__AXC=FALSE__;
+  is_active_short__4BC=FALSE__;
+  output_code__SI=create__NBB( 4000000);
+  short_derive__BCC= 0;
+  last_comment__00D=create__NBB( 256);
+  last_slot__Q2D=NULL;
+  ITM_SLOT__->comment__WJJD=NULL;
+  ITM_SLOT__->parent_named__P5=(*NAMED__);
+  ITM_SLOT__->id_section__Y1C=NULL;
+  ITM_SLOT__->result_type__04FC=NULL;
+  ITM_SLOT__->affect__JAGC='\0';
+  ITM_SLOT__->argument_list__GEHC=NULL;
+  ITM_SLOT__->next__OHHC=NULL;
+  ITM_SLOT_OPERATOR__->parent_itm_slot__OU5B=(*ITM_SLOT__);
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__5CT=NULL;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__0CT= 0;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__IMY= 0;
+  result__LNH=NULL;
+  ptr__MNH=((__POINTER )(NULL));
+  typ_id__RNH= 0;
+  sz__ONH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+  if ((sz__ONH ==  0)) {
+    result__LNH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
   } else {
-    typ_id__FNH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__CNH);
-    if ((typ_id__FNH == (__INTEGER)(-  1))) {
-      a__4Y4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__5Y4G=(__UINTEGER_32)((__UINTEGER_32)(sz__CNH + a__4Y4G) & (__UINTEGER_32)(~ a__4Y4G));
-      ptr_table__DFCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5Y4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__CFCH=((__POINTER )(NULL));
-      result__EFCH=((__POINTER *)ptr_table__DFCH)[ 0];
-      if ((result__EFCH == (void *)NULL)) {
-        result__EFCH=new_lab__ARJ(new_size__5Y4G);
-        next__CFCH=(void *)((unsigned long)result__EFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5Y4G)));
-        ((__POINTER *)next__CFCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DFCH)[ 0]=next__CFCH;
-      } else {
-        next__CFCH=((__POINTER *)result__EFCH)[ 0];
-        if ((next__CFCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EFCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5Y4G <<  1)) <=  4096)) {
-            next__CFCH=(void *)((unsigned long)result__EFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5Y4G)));
-          } else {
-            next__CFCH=new_lab__ARJ(new_size__5Y4G);
-          };
-          ((__POINTER *)next__CFCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DFCH)[ 0]=next__CFCH;
-        } else {
-          ((__POINTER *)result__EFCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EFCH=next__CFCH;
-        };
-      };
-      ptr__ANH=result__EFCH;
-    } else {
-      t__DZ4G=((__UINTEGER_32 )typ_id__FNH);
-      a__CZ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LFCH=(__UINTEGER_32)((__UINTEGER_32)(sz__CNH + a__CZ4G) & (__UINTEGER_32)(~ a__CZ4G));
-      ptr_table__IFCH=((__POINTER )(&(table_type[(t__DZ4G)])));
-      lab_type__KFCH=(__UINTEGER_32)(t__DZ4G |  1);
-      next__HFCH=((__POINTER )(NULL));
-      result__JFCH=((__POINTER *)ptr_table__IFCH)[ 0];
-      if ((result__JFCH == (void *)NULL)) {
-        result__JFCH=new_lab__ARJ(lab_type__KFCH);
-        next__HFCH=(void *)((unsigned long)result__JFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LFCH)));
-        ((__POINTER *)next__HFCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IFCH)[ 0]=next__HFCH;
-      } else {
-        next__HFCH=((__POINTER *)result__JFCH)[ 0];
-        if ((next__HFCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JFCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LFCH <<  1)) <=  4096)) {
-            next__HFCH=(void *)((unsigned long)result__JFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LFCH)));
-          } else {
-            next__HFCH=new_lab__ARJ(lab_type__KFCH);
-          };
-          ((__POINTER *)next__HFCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IFCH)[ 0]=next__HFCH;
-        } else {
-          ((__POINTER *)result__JFCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HFCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JFCH=next__HFCH;
-        };
-      };
-      ptr__ANH=result__JFCH;
-    };
-    result__5MH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__ANH);
-    *(result__5MH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
-  };
-  Self__TMT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-  new_capacity__XLY=prime_number_ceiling__L41( 193);
-  Self__TMT->buckets__TCT=create__VF4(new_capacity__XLY);
-  Self__TMT->capacity__OCT=new_capacity__XLY;
-  Self__TMT->count__2LY= 0;
-  short_dico__QD=result__5MH;
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__5CT=NULL;
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__KDT=NULL;
-  token__0BD=create__EBB( 100);
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__1X3=NULL;
-  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__TCD= 0;
+    typ_id__RNH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ONH);
+    if ((typ_id__RNH == (__INTEGER)(-  1))) {
+      a__TEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ONH + a__TEFH) & (__UINTEGER_32)(~ a__TEFH));
+      ptr_table__XRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WRIH=((__POINTER )(NULL));
+      result__YRIH=((__POINTER *)ptr_table__XRIH)[ 0];
+      if ((result__YRIH == (void *)NULL)) {
+        result__YRIH=new_lab__MRJ(new_size__UEFH);
+        next__WRIH=(void *)((unsigned long)result__YRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEFH)));
+        ((__POINTER *)next__WRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XRIH)[ 0]=next__WRIH;
+      } else {
+        next__WRIH=((__POINTER *)result__YRIH)[ 0];
+        if ((next__WRIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YRIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UEFH <<  1)) <=  4096)) {
+            next__WRIH=(void *)((unsigned long)result__YRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEFH)));
+          } else {
+            next__WRIH=new_lab__MRJ(new_size__UEFH);
+          };
+          ((__POINTER *)next__WRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XRIH)[ 0]=next__WRIH;
+        } else {
+          ((__POINTER *)result__YRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YRIH=next__WRIH;
+        };
+      };
+      ptr__MNH=result__YRIH;
+    } else {
+      t__YEFH=((__UINTEGER_32 )typ_id__RNH);
+      a__XEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5RIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ONH + a__XEFH) & (__UINTEGER_32)(~ a__XEFH));
+      ptr_table__2RIH=((__POINTER )(&(table_type[(t__YEFH)])));
+      lab_type__4RIH=(__UINTEGER_32)(t__YEFH |  1);
+      next__1RIH=((__POINTER )(NULL));
+      result__3RIH=((__POINTER *)ptr_table__2RIH)[ 0];
+      if ((result__3RIH == (void *)NULL)) {
+        result__3RIH=new_lab__MRJ(lab_type__4RIH);
+        next__1RIH=(void *)((unsigned long)result__3RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RIH)));
+        ((__POINTER *)next__1RIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2RIH)[ 0]=next__1RIH;
+      } else {
+        next__1RIH=((__POINTER *)result__3RIH)[ 0];
+        if ((next__1RIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3RIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5RIH <<  1)) <=  4096)) {
+            next__1RIH=(void *)((unsigned long)result__3RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RIH)));
+          } else {
+            next__1RIH=new_lab__MRJ(lab_type__4RIH);
+          };
+          ((__POINTER *)next__1RIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2RIH)[ 0]=next__1RIH;
+        } else {
+          ((__POINTER *)result__3RIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1RIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3RIH=next__1RIH;
+        };
+      };
+      ptr__MNH=result__3RIH;
+    };
+    result__LNH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__MNH);
+    *(result__LNH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+  };
+  Self__5MT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+  new_capacity__DMY=prime_number_ceiling__X41( 193);
+  Self__5MT->buckets__5CT=create__BG4(new_capacity__DMY);
+  Self__5MT->capacity__0CT=new_capacity__DMY;
+  Self__5MT->count__IMY= 0;
+  short_dico__QD=result__LNH;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__LDT=NULL;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__WDT=NULL;
+  token__GCD=create__NBB( 100);
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__HY3=NULL;
+  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__5CD= 0;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_CONSTANTo__);
-  LINKED_LISToSTRING_CONSTANTo__->mem_idx__CUEC= 0;
-  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__EUEC=NULL;
-  LINKED_LISToSTRING_CONSTANTo__->first_link__YTEC=NULL;
-  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__AOOD=NULL;
-  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__OVHD=NULL;
-  type_error__CNG= 0;
-  msg_err__DNG=create__EBB( 256);
-  begin_position__5AE= 0;
-  last_string__2ZC=NULL;
-  string_tmp2__V5I=create__EBB( 256);
-  last_integer__NRO= 0;
-  LINKED_LISToSTRING_CONSTANTo__->last_link__BUEC=NULL;
-  index_count__04= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__B2R=NULL;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__21R= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__B3R= 0;
-  result__BOC=NULL;
-  ptr__COC=((__POINTER )(NULL));
-  typ_id__HOC= 0;
-  sz__EOC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
-  if ((sz__EOC ==  0)) {
-    result__BOC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+  LINKED_LISToSTRING_CONSTANTo__->mem_idx__OUEC= 0;
+  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__QUEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->first_link__EUEC=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__MOOD=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__0VHD=NULL;
+  type_error__ONG= 0;
+  msg_err__PNG=create__NBB( 256);
+  begin_position__LBE= 0;
+  last_string__I0C=NULL;
+  string_tmp2__BAJ=create__NBB( 256);
+  last_integer__ZRO= 0;
+  LINKED_LISToSTRING_CONSTANTo__->last_link__NUEC=NULL;
+  index_count__D5= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__N2R=NULL;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__I2R= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__N3R= 0;
+  result__NOC=NULL;
+  ptr__OOC=((__POINTER )(NULL));
+  typ_id__TOC= 0;
+  sz__QOC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
+  if ((sz__QOC ==  0)) {
+    result__NOC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
   } else {
-    typ_id__HOC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__EOC);
-    if ((typ_id__HOC == (__INTEGER)(-  1))) {
-      a__GZ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__HZ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__EOC + a__GZ4G) & (__UINTEGER_32)(~ a__GZ4G));
-      ptr_table__NFCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HZ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__MFCH=((__POINTER )(NULL));
-      result__OFCH=((__POINTER *)ptr_table__NFCH)[ 0];
-      if ((result__OFCH == (void *)NULL)) {
-        result__OFCH=new_lab__ARJ(new_size__HZ4G);
-        next__MFCH=(void *)((unsigned long)result__OFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZ4G)));
-        ((__POINTER *)next__MFCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NFCH)[ 0]=next__MFCH;
-      } else {
-        next__MFCH=((__POINTER *)result__OFCH)[ 0];
-        if ((next__MFCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OFCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HZ4G <<  1)) <=  4096)) {
-            next__MFCH=(void *)((unsigned long)result__OFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZ4G)));
-          } else {
-            next__MFCH=new_lab__ARJ(new_size__HZ4G);
-          };
-          ((__POINTER *)next__MFCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NFCH)[ 0]=next__MFCH;
-        } else {
-          ((__POINTER *)result__OFCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MFCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OFCH=next__MFCH;
-        };
-      };
-      ptr__COC=result__OFCH;
-    } else {
-      t__LZ4G=((__UINTEGER_32 )typ_id__HOC);
-      a__KZ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__VFCH=(__UINTEGER_32)((__UINTEGER_32)(sz__EOC + a__KZ4G) & (__UINTEGER_32)(~ a__KZ4G));
-      ptr_table__SFCH=((__POINTER )(&(table_type[(t__LZ4G)])));
-      lab_type__UFCH=(__UINTEGER_32)(t__LZ4G |  1);
-      next__RFCH=((__POINTER )(NULL));
-      result__TFCH=((__POINTER *)ptr_table__SFCH)[ 0];
-      if ((result__TFCH == (void *)NULL)) {
-        result__TFCH=new_lab__ARJ(lab_type__UFCH);
-        next__RFCH=(void *)((unsigned long)result__TFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFCH)));
-        ((__POINTER *)next__RFCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SFCH)[ 0]=next__RFCH;
-      } else {
-        next__RFCH=((__POINTER *)result__TFCH)[ 0];
-        if ((next__RFCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TFCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VFCH <<  1)) <=  4096)) {
-            next__RFCH=(void *)((unsigned long)result__TFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFCH)));
-          } else {
-            next__RFCH=new_lab__ARJ(lab_type__UFCH);
-          };
-          ((__POINTER *)next__RFCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SFCH)[ 0]=next__RFCH;
-        } else {
-          ((__POINTER *)result__TFCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RFCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TFCH=next__RFCH;
-        };
-      };
-      ptr__COC=result__TFCH;
-    };
-    result__BOC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__COC);
-    *(result__BOC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
-  };
-  Self__CPS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__BOC);
-  new_capacity__UKX=prime_number_ceiling__L41( 193);
-  Self__CPS->buckets__B2R=create__AZ2(new_capacity__UKX);
-  Self__CPS->capacity__21R=new_capacity__UKX;
-  Self__CPS->count__B3R= 0;
-  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__N2R=NULL;
-  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__Y2R=NULL;
-  ARRAYED_COLLECTIONoSLOTo__->capacity__IES= 0;
-  FAST_ARRAYoSLOTo__->parent_arrayed_collection__M5=(*ARRAYED_COLLECTIONoSLOTo__);
-  TYPE_FULL__->flag__MFS= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->upper__G4R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__I4R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->storage__E5R=NULL;
-  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__LAB=(*ARRAYED_COLLECTIONoTYPE_IDo__);
-  list_id__NAB=NULL;
+    typ_id__TOC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QOC);
+    if ((typ_id__TOC == (__INTEGER)(-  1))) {
+      a__1EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2EFH=(__UINTEGER_32)((__UINTEGER_32)(sz__QOC + a__1EFH) & (__UINTEGER_32)(~ a__1EFH));
+      ptr_table__BSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2EFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ASIH=((__POINTER )(NULL));
+      result__CSIH=((__POINTER *)ptr_table__BSIH)[ 0];
+      if ((result__CSIH == (void *)NULL)) {
+        result__CSIH=new_lab__MRJ(new_size__2EFH);
+        next__ASIH=(void *)((unsigned long)result__CSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EFH)));
+        ((__POINTER *)next__ASIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BSIH)[ 0]=next__ASIH;
+      } else {
+        next__ASIH=((__POINTER *)result__CSIH)[ 0];
+        if ((next__ASIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2EFH <<  1)) <=  4096)) {
+            next__ASIH=(void *)((unsigned long)result__CSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EFH)));
+          } else {
+            next__ASIH=new_lab__MRJ(new_size__2EFH);
+          };
+          ((__POINTER *)next__ASIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BSIH)[ 0]=next__ASIH;
+        } else {
+          ((__POINTER *)result__CSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ASIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CSIH=next__ASIH;
+        };
+      };
+      ptr__OOC=result__CSIH;
+    } else {
+      t__AFFH=((__UINTEGER_32 )typ_id__TOC);
+      a__5EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QOC + a__5EFH) & (__UINTEGER_32)(~ a__5EFH));
+      ptr_table__GSIH=((__POINTER )(&(table_type[(t__AFFH)])));
+      lab_type__ISIH=(__UINTEGER_32)(t__AFFH |  1);
+      next__FSIH=((__POINTER )(NULL));
+      result__HSIH=((__POINTER *)ptr_table__GSIH)[ 0];
+      if ((result__HSIH == (void *)NULL)) {
+        result__HSIH=new_lab__MRJ(lab_type__ISIH);
+        next__FSIH=(void *)((unsigned long)result__HSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JSIH)));
+        ((__POINTER *)next__FSIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GSIH)[ 0]=next__FSIH;
+      } else {
+        next__FSIH=((__POINTER *)result__HSIH)[ 0];
+        if ((next__FSIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JSIH <<  1)) <=  4096)) {
+            next__FSIH=(void *)((unsigned long)result__HSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JSIH)));
+          } else {
+            next__FSIH=new_lab__MRJ(lab_type__ISIH);
+          };
+          ((__POINTER *)next__FSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GSIH)[ 0]=next__FSIH;
+        } else {
+          ((__POINTER *)result__HSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HSIH=next__FSIH;
+        };
+      };
+      ptr__OOC=result__HSIH;
+    };
+    result__NOC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__OOC);
+    *(result__NOC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
+  };
+  Self__OPS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__NOC);
+  new_capacity__ALX=prime_number_ceiling__X41( 193);
+  Self__OPS->buckets__N2R=create__MZ2(new_capacity__ALX);
+  Self__OPS->capacity__I2R=new_capacity__ALX;
+  Self__OPS->count__N3R= 0;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__Z2R=NULL;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__E3R=NULL;
+  ARRAYED_COLLECTIONoSLOTo__->capacity__UES= 0;
+  FAST_ARRAYoSLOTo__->parent_arrayed_collection__V5=(*ARRAYED_COLLECTIONoSLOTo__);
+  TYPE_FULL__->flag__YFS= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->upper__S4R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__U4R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->storage__Q5R=NULL;
+  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__UAB=(*ARRAYED_COLLECTIONoTYPE_IDo__);
+  list_id__WAB=NULL;
   directory_list__YB=NULL;
   file_list__0B=NULL;
   current_list__2B=NULL;
-  LINKED_COLLECTIONoENTRYo__->upper__C32D= 0;
-  LINKED_LISToENTRYo__->parent_linked_collection__1ERD=(*LINKED_COLLECTIONoENTRYo__);
-  LINKED_LISToENTRYo__->first_link__YHVE=NULL;
-  LINKED_LISToENTRYo__->mem_idx__5HVE= 0;
-  LINKED_LISToENTRYo__->mem_lnk__AIVE=NULL;
-  LINKED_LISToENTRYo__->last_link__BIVE=NULL;
-  LINKED_LIST_NODEoENTRYo__->item__TZVE=NULL;
-  LINKED_LIST_NODEoENTRYo__->next__GGEF=NULL;
-  FILE_UNIX__->stream__YIRD=((__POINTER )(NULL));
+  LINKED_COLLECTIONoENTRYo__->upper__TI3D= 0;
+  LINKED_LISToENTRYo__->parent_linked_collection__HFRD=(*LINKED_COLLECTIONoENTRYo__);
+  LINKED_LISToENTRYo__->first_link__OWVE=NULL;
+  LINKED_LISToENTRYo__->mem_idx__VWVE= 0;
+  LINKED_LISToENTRYo__->mem_lnk__WWVE=NULL;
+  LINKED_LISToENTRYo__->last_link__XWVE=NULL;
+  LINKED_LIST_NODEoENTRYo__->item__OJWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->next__V0EF=NULL;
+  FILE_UNIX__->stream__EJRD=((__POINTER )(NULL));
   proto_input__BI=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->buckets__DEV=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->capacity__4HT= 0;
-  HASHED_SEToSTRING_CONSTANTo__->count__MHY= 0;
-  short_local__3BC=NULL;
-  output_decl__RFE=create__EBB( 60000);
-  PROTOTYPE__->type_style__L2C=NULL;
-  is_parameter_type__2JE=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__3TP=(*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__NXC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
-  result__VZQ=NULL;
-  ptr__WZQ=((__POINTER )(NULL));
-  typ_id__1ZQ= 0;
-  sz__YZQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__YZQ ==  0)) {
-    result__VZQ=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+  HASHED_SEToSTRING_CONSTANTo__->buckets__PEV=NULL;
+  HASHED_SEToSTRING_CONSTANTo__->capacity__KIT= 0;
+  HASHED_SEToSTRING_CONSTANTo__->count__YHY= 0;
+  short_local__JCC=NULL;
+  output_decl__3FE=create__NBB( 60000);
+  PROTOTYPE__->type_style__X2C=NULL;
+  is_parameter_type__IKE=FALSE__;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__FVV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__AZV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__1ZV=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__JUP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__KIV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__RMV=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__5NV= 0;
+  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__ZXC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
+  result__B0Q=NULL;
+  ptr__C0Q=((__POINTER )(NULL));
+  typ_id__H0Q= 0;
+  sz__E0Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__E0Q ==  0)) {
+    result__B0Q=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    typ_id__1ZQ=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__YZQ);
-    if ((typ_id__1ZQ == (__INTEGER)(-  1))) {
-      a__OZ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__PZ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__YZQ + a__OZ4G) & (__UINTEGER_32)(~ a__OZ4G));
-      ptr_table__XFCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PZ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__WFCH=((__POINTER )(NULL));
-      result__YFCH=((__POINTER *)ptr_table__XFCH)[ 0];
-      if ((result__YFCH == (void *)NULL)) {
-        result__YFCH=new_lab__ARJ(new_size__PZ4G);
-        next__WFCH=(void *)((unsigned long)result__YFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZ4G)));
-        ((__POINTER *)next__WFCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XFCH)[ 0]=next__WFCH;
-      } else {
-        next__WFCH=((__POINTER *)result__YFCH)[ 0];
-        if ((next__WFCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YFCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PZ4G <<  1)) <=  4096)) {
-            next__WFCH=(void *)((unsigned long)result__YFCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZ4G)));
-          } else {
-            next__WFCH=new_lab__ARJ(new_size__PZ4G);
-          };
-          ((__POINTER *)next__WFCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XFCH)[ 0]=next__WFCH;
-        } else {
-          ((__POINTER *)result__YFCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YFCH=next__WFCH;
-        };
-      };
-      ptr__WZQ=result__YFCH;
-    } else {
-      t__TZ4G=((__UINTEGER_32 )typ_id__1ZQ);
-      a__SZ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__5FCH=(__UINTEGER_32)((__UINTEGER_32)(sz__YZQ + a__SZ4G) & (__UINTEGER_32)(~ a__SZ4G));
-      ptr_table__2FCH=((__POINTER )(&(table_type[(t__TZ4G)])));
-      lab_type__4FCH=(__UINTEGER_32)(t__TZ4G |  1);
-      next__1FCH=((__POINTER )(NULL));
-      result__3FCH=((__POINTER *)ptr_table__2FCH)[ 0];
-      if ((result__3FCH == (void *)NULL)) {
-        result__3FCH=new_lab__ARJ(lab_type__4FCH);
-        next__1FCH=(void *)((unsigned long)result__3FCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FCH)));
-        ((__POINTER *)next__1FCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2FCH)[ 0]=next__1FCH;
-      } else {
-        next__1FCH=((__POINTER *)result__3FCH)[ 0];
-        if ((next__1FCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3FCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5FCH <<  1)) <=  4096)) {
-            next__1FCH=(void *)((unsigned long)result__3FCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FCH)));
-          } else {
-            next__1FCH=new_lab__ARJ(lab_type__4FCH);
-          };
-          ((__POINTER *)next__1FCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2FCH)[ 0]=next__1FCH;
-        } else {
-          ((__POINTER *)result__3FCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3FCH=next__1FCH;
-        };
-      };
-      ptr__WZQ=result__3FCH;
-    };
-    result__VZQ=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__WZQ);
-    *(result__VZQ) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__L3V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__VZQ);
-  if ((Self__L3V->parent_arrayed_collection__3TP.capacity__UYV <  5)) {
-    Self__L3V->parent_arrayed_collection__3TP.storage__PZV=create__AJRB( 5);
-    Self__L3V->parent_arrayed_collection__3TP.capacity__UYV= 5;
-  };
-  Self__L3V->parent_arrayed_collection__3TP.upper__ZUV=(__INTEGER)(-  1);
-  free_list__4TP=result__VZQ;
-  empty_list__FVP=create_with_capacity__2ER( 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__SDR=NULL;
-  ptr__TDR=((__POINTER )(NULL));
-  typ_id__YDR= 0;
-  sz__VDR=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__VDR ==  0)) {
-    result__SDR=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    typ_id__H0Q=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__E0Q);
+    if ((typ_id__H0Q == (__INTEGER)(-  1))) {
+      a__DFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0Q + a__DFFH) & (__UINTEGER_32)(~ a__DFFH));
+      ptr_table__LSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KSIH=((__POINTER )(NULL));
+      result__MSIH=((__POINTER *)ptr_table__LSIH)[ 0];
+      if ((result__MSIH == (void *)NULL)) {
+        result__MSIH=new_lab__MRJ(new_size__EFFH);
+        next__KSIH=(void *)((unsigned long)result__MSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EFFH)));
+        ((__POINTER *)next__KSIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LSIH)[ 0]=next__KSIH;
+      } else {
+        next__KSIH=((__POINTER *)result__MSIH)[ 0];
+        if ((next__KSIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EFFH <<  1)) <=  4096)) {
+            next__KSIH=(void *)((unsigned long)result__MSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EFFH)));
+          } else {
+            next__KSIH=new_lab__MRJ(new_size__EFFH);
+          };
+          ((__POINTER *)next__KSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LSIH)[ 0]=next__KSIH;
+        } else {
+          ((__POINTER *)result__MSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MSIH=next__KSIH;
+        };
+      };
+      ptr__C0Q=result__MSIH;
+    } else {
+      t__IFFH=((__UINTEGER_32 )typ_id__H0Q);
+      a__HFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0Q + a__HFFH) & (__UINTEGER_32)(~ a__HFFH));
+      ptr_table__QSIH=((__POINTER )(&(table_type[(t__IFFH)])));
+      lab_type__SSIH=(__UINTEGER_32)(t__IFFH |  1);
+      next__PSIH=((__POINTER )(NULL));
+      result__RSIH=((__POINTER *)ptr_table__QSIH)[ 0];
+      if ((result__RSIH == (void *)NULL)) {
+        result__RSIH=new_lab__MRJ(lab_type__SSIH);
+        next__PSIH=(void *)((unsigned long)result__RSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSIH)));
+        ((__POINTER *)next__PSIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QSIH)[ 0]=next__PSIH;
+      } else {
+        next__PSIH=((__POINTER *)result__RSIH)[ 0];
+        if ((next__PSIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TSIH <<  1)) <=  4096)) {
+            next__PSIH=(void *)((unsigned long)result__RSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSIH)));
+          } else {
+            next__PSIH=new_lab__MRJ(lab_type__SSIH);
+          };
+          ((__POINTER *)next__PSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QSIH)[ 0]=next__PSIH;
+        } else {
+          ((__POINTER *)result__RSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RSIH=next__PSIH;
+        };
+      };
+      ptr__C0Q=result__RSIH;
+    };
+    result__B0Q=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__C0Q);
+    *(result__B0Q) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__X3V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__B0Q);
+  if ((Self__X3V->parent_arrayed_collection__JUP.capacity__AZV <  5)) {
+    Self__X3V->parent_arrayed_collection__JUP.storage__1ZV=create__MJRB( 5);
+    Self__X3V->parent_arrayed_collection__JUP.capacity__AZV= 5;
+  };
+  Self__X3V->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(-  1);
+  free_list__KUP=result__B0Q;
+  empty_list__RVP=create_with_capacity__IFR( 0);
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__W5V=NULL;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__R5V= 0;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__FIW= 0;
+  result__4DR=NULL;
+  ptr__5DR=((__POINTER )(NULL));
+  typ_id__EER= 0;
+  sz__BER=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__BER ==  0)) {
+    result__4DR=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    typ_id__YDR=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__VDR);
-    if ((typ_id__YDR == (__INTEGER)(-  1))) {
-      a__WZ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__XZ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__VDR + a__WZ4G) & (__UINTEGER_32)(~ a__WZ4G));
-      ptr_table__BGCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XZ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__AGCH=((__POINTER )(NULL));
-      result__CGCH=((__POINTER *)ptr_table__BGCH)[ 0];
-      if ((result__CGCH == (void *)NULL)) {
-        result__CGCH=new_lab__ARJ(new_size__XZ4G);
-        next__AGCH=(void *)((unsigned long)result__CGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XZ4G)));
-        ((__POINTER *)next__AGCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BGCH)[ 0]=next__AGCH;
-      } else {
-        next__AGCH=((__POINTER *)result__CGCH)[ 0];
-        if ((next__AGCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CGCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XZ4G <<  1)) <=  4096)) {
-            next__AGCH=(void *)((unsigned long)result__CGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XZ4G)));
-          } else {
-            next__AGCH=new_lab__ARJ(new_size__XZ4G);
-          };
-          ((__POINTER *)next__AGCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BGCH)[ 0]=next__AGCH;
-        } else {
-          ((__POINTER *)result__CGCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AGCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CGCH=next__AGCH;
-        };
-      };
-      ptr__TDR=result__CGCH;
-    } else {
-      t__1Z4G=((__UINTEGER_32 )typ_id__YDR);
-      a__0Z4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__JGCH=(__UINTEGER_32)((__UINTEGER_32)(sz__VDR + a__0Z4G) & (__UINTEGER_32)(~ a__0Z4G));
-      ptr_table__GGCH=((__POINTER )(&(table_type[(t__1Z4G)])));
-      lab_type__IGCH=(__UINTEGER_32)(t__1Z4G |  1);
-      next__FGCH=((__POINTER )(NULL));
-      result__HGCH=((__POINTER *)ptr_table__GGCH)[ 0];
-      if ((result__HGCH == (void *)NULL)) {
-        result__HGCH=new_lab__ARJ(lab_type__IGCH);
-        next__FGCH=(void *)((unsigned long)result__HGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGCH)));
-        ((__POINTER *)next__FGCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GGCH)[ 0]=next__FGCH;
-      } else {
-        next__FGCH=((__POINTER *)result__HGCH)[ 0];
-        if ((next__FGCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HGCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JGCH <<  1)) <=  4096)) {
-            next__FGCH=(void *)((unsigned long)result__HGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGCH)));
-          } else {
-            next__FGCH=new_lab__ARJ(lab_type__IGCH);
-          };
-          ((__POINTER *)next__FGCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GGCH)[ 0]=next__FGCH;
-        } else {
-          ((__POINTER *)result__HGCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FGCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HGCH=next__FGCH;
-        };
-      };
-      ptr__TDR=result__HGCH;
-    };
-    result__SDR=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__TDR);
-    *(result__SDR) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__3EW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__SDR);
-  new_capacity__OI1=prime_number_ceiling__L41( 53);
-  Self__3EW->buckets__K5V=create__PZBB(new_capacity__OI1);
-  Self__3EW->capacity__F5V=new_capacity__OI1;
-  Self__3EW->count__ZHW= 0;
-  bucket__QVP=result__SDR;
-  ITM_TYPE_STYLE__->parent_itm_type_simple__VRN=(*ITM_TYPE_SIMPLE__);
-  ITM_TYPE_STYLE__->style__HYP=NULL;
-  ITM_TYPE_GENERIC__->parent_itm_type_style__WRN=(*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__KJP= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__R1V= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__21V=NULL;
-  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__AJP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
-  result__CSQ=NULL;
-  ptr__DSQ=((__POINTER )(NULL));
-  typ_id__ISQ= 0;
-  sz__FSQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
-  if ((sz__FSQ ==  0)) {
-    result__CSQ=FAST_ARRAYoITM_TYPE_MULTIo__;
+    typ_id__EER=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BER);
+    if ((typ_id__EER == (__INTEGER)(-  1))) {
+      a__LFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BER + a__LFFH) & (__UINTEGER_32)(~ a__LFFH));
+      ptr_table__VSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__USIH=((__POINTER )(NULL));
+      result__WSIH=((__POINTER *)ptr_table__VSIH)[ 0];
+      if ((result__WSIH == (void *)NULL)) {
+        result__WSIH=new_lab__MRJ(new_size__MFFH);
+        next__USIH=(void *)((unsigned long)result__WSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MFFH)));
+        ((__POINTER *)next__USIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VSIH)[ 0]=next__USIH;
+      } else {
+        next__USIH=((__POINTER *)result__WSIH)[ 0];
+        if ((next__USIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MFFH <<  1)) <=  4096)) {
+            next__USIH=(void *)((unsigned long)result__WSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MFFH)));
+          } else {
+            next__USIH=new_lab__MRJ(new_size__MFFH);
+          };
+          ((__POINTER *)next__USIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VSIH)[ 0]=next__USIH;
+        } else {
+          ((__POINTER *)result__WSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WSIH=next__USIH;
+        };
+      };
+      ptr__5DR=result__WSIH;
+    } else {
+      t__QFFH=((__UINTEGER_32 )typ_id__EER);
+      a__PFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3SIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BER + a__PFFH) & (__UINTEGER_32)(~ a__PFFH));
+      ptr_table__0SIH=((__POINTER )(&(table_type[(t__QFFH)])));
+      lab_type__2SIH=(__UINTEGER_32)(t__QFFH |  1);
+      next__ZSIH=((__POINTER )(NULL));
+      result__1SIH=((__POINTER *)ptr_table__0SIH)[ 0];
+      if ((result__1SIH == (void *)NULL)) {
+        result__1SIH=new_lab__MRJ(lab_type__2SIH);
+        next__ZSIH=(void *)((unsigned long)result__1SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SIH)));
+        ((__POINTER *)next__ZSIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0SIH)[ 0]=next__ZSIH;
+      } else {
+        next__ZSIH=((__POINTER *)result__1SIH)[ 0];
+        if ((next__ZSIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1SIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3SIH <<  1)) <=  4096)) {
+            next__ZSIH=(void *)((unsigned long)result__1SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SIH)));
+          } else {
+            next__ZSIH=new_lab__MRJ(lab_type__2SIH);
+          };
+          ((__POINTER *)next__ZSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0SIH)[ 0]=next__ZSIH;
+        } else {
+          ((__POINTER *)result__1SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1SIH=next__ZSIH;
+        };
+      };
+      ptr__5DR=result__1SIH;
+    };
+    result__4DR=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__5DR);
+    *(result__4DR) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__JFW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__4DR);
+  new_capacity__0I1=prime_number_ceiling__X41( 53);
+  Self__JFW->buckets__W5V=create__1ZBB(new_capacity__0I1);
+  Self__JFW->capacity__R5V=new_capacity__0I1;
+  Self__JFW->count__FIW= 0;
+  bucket__2VP=result__4DR;
+  ITM_TYPE_STYLE__->parent_itm_type_simple__BSN=(*ITM_TYPE_SIMPLE__);
+  ITM_TYPE_STYLE__->style__TYP=NULL;
+  ITM_TYPE_GENERIC__->parent_itm_type_style__CSN=(*ITM_TYPE_STYLE__);
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__CAW=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__OAW=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__WJP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__31V= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__I2V=NULL;
+  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__MJP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
+  result__OSQ=NULL;
+  ptr__PSQ=((__POINTER )(NULL));
+  typ_id__USQ= 0;
+  sz__RSQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
+  if ((sz__RSQ ==  0)) {
+    result__OSQ=FAST_ARRAYoITM_TYPE_MULTIo__;
   } else {
-    typ_id__ISQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__FSQ);
-    if ((typ_id__ISQ == (__INTEGER)(-  1))) {
-      a__4Z4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__5Z4G=(__UINTEGER_32)((__UINTEGER_32)(sz__FSQ + a__4Z4G) & (__UINTEGER_32)(~ a__4Z4G));
-      ptr_table__LGCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5Z4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__KGCH=((__POINTER )(NULL));
-      result__MGCH=((__POINTER *)ptr_table__LGCH)[ 0];
-      if ((result__MGCH == (void *)NULL)) {
-        result__MGCH=new_lab__ARJ(new_size__5Z4G);
-        next__KGCH=(void *)((unsigned long)result__MGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5Z4G)));
-        ((__POINTER *)next__KGCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LGCH)[ 0]=next__KGCH;
-      } else {
-        next__KGCH=((__POINTER *)result__MGCH)[ 0];
-        if ((next__KGCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MGCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5Z4G <<  1)) <=  4096)) {
-            next__KGCH=(void *)((unsigned long)result__MGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5Z4G)));
-          } else {
-            next__KGCH=new_lab__ARJ(new_size__5Z4G);
-          };
-          ((__POINTER *)next__KGCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LGCH)[ 0]=next__KGCH;
-        } else {
-          ((__POINTER *)result__MGCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KGCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MGCH=next__KGCH;
-        };
-      };
-      ptr__DSQ=result__MGCH;
-    } else {
-      t__D04G=((__UINTEGER_32 )typ_id__ISQ);
-      a__C04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TGCH=(__UINTEGER_32)((__UINTEGER_32)(sz__FSQ + a__C04G) & (__UINTEGER_32)(~ a__C04G));
-      ptr_table__QGCH=((__POINTER )(&(table_type[(t__D04G)])));
-      lab_type__SGCH=(__UINTEGER_32)(t__D04G |  1);
-      next__PGCH=((__POINTER )(NULL));
-      result__RGCH=((__POINTER *)ptr_table__QGCH)[ 0];
-      if ((result__RGCH == (void *)NULL)) {
-        result__RGCH=new_lab__ARJ(lab_type__SGCH);
-        next__PGCH=(void *)((unsigned long)result__RGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TGCH)));
-        ((__POINTER *)next__PGCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QGCH)[ 0]=next__PGCH;
-      } else {
-        next__PGCH=((__POINTER *)result__RGCH)[ 0];
-        if ((next__PGCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RGCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TGCH <<  1)) <=  4096)) {
-            next__PGCH=(void *)((unsigned long)result__RGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TGCH)));
-          } else {
-            next__PGCH=new_lab__ARJ(lab_type__SGCH);
-          };
-          ((__POINTER *)next__PGCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QGCH)[ 0]=next__PGCH;
-        } else {
-          ((__POINTER *)result__RGCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PGCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RGCH=next__PGCH;
-        };
-      };
-      ptr__DSQ=result__RGCH;
-    };
-    result__CSQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__DSQ);
-    *(result__CSQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
-  };
-  Self__I1V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__CSQ);
-  if ((Self__I1V->parent_arrayed_collection__AJP.capacity__R1V <  32)) {
-    Self__I1V->parent_arrayed_collection__AJP.storage__21V=create__JLXB( 32);
-    Self__I1V->parent_arrayed_collection__AJP.capacity__R1V= 32;
-  };
-  Self__I1V->parent_arrayed_collection__AJP.upper__KJP=(__INTEGER)(-  1);
-  dico__BJP=result__CSQ;
-  ITM_TYPE_MULTI__->list_type__UJP=NULL;
-  ITM_TYPE_BLOCK__->type_argument__KMN=NULL;
-  ITM_TYPE_GENERIC__->list_type__RYP=NULL;
-  ITM_TYPE_BLOCK__->type_result__UMN=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__2LN= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__0JV= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__FKV=NULL;
-  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__SLN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
-  result__I0O=NULL;
-  ptr__J0O=((__POINTER )(NULL));
-  typ_id__O0O= 0;
-  sz__L0O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
-  if ((sz__L0O ==  0)) {
-    result__I0O=FAST_ARRAYoITM_TYPE_BLOCKo__;
+    typ_id__USQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__RSQ);
+    if ((typ_id__USQ == (__INTEGER)(-  1))) {
+      a__TFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSQ + a__TFFH) & (__UINTEGER_32)(~ a__TFFH));
+      ptr_table__5SIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4SIH=((__POINTER )(NULL));
+      result__ATIH=((__POINTER *)ptr_table__5SIH)[ 0];
+      if ((result__ATIH == (void *)NULL)) {
+        result__ATIH=new_lab__MRJ(new_size__UFFH);
+        next__4SIH=(void *)((unsigned long)result__ATIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UFFH)));
+        ((__POINTER *)next__4SIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5SIH)[ 0]=next__4SIH;
+      } else {
+        next__4SIH=((__POINTER *)result__ATIH)[ 0];
+        if ((next__4SIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ATIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UFFH <<  1)) <=  4096)) {
+            next__4SIH=(void *)((unsigned long)result__ATIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UFFH)));
+          } else {
+            next__4SIH=new_lab__MRJ(new_size__UFFH);
+          };
+          ((__POINTER *)next__4SIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5SIH)[ 0]=next__4SIH;
+        } else {
+          ((__POINTER *)result__ATIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4SIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ATIH=next__4SIH;
+        };
+      };
+      ptr__PSQ=result__ATIH;
+    } else {
+      t__YFFH=((__UINTEGER_32 )typ_id__USQ);
+      a__XFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSQ + a__XFFH) & (__UINTEGER_32)(~ a__XFFH));
+      ptr_table__ETIH=((__POINTER )(&(table_type[(t__YFFH)])));
+      lab_type__GTIH=(__UINTEGER_32)(t__YFFH |  1);
+      next__DTIH=((__POINTER )(NULL));
+      result__FTIH=((__POINTER *)ptr_table__ETIH)[ 0];
+      if ((result__FTIH == (void *)NULL)) {
+        result__FTIH=new_lab__MRJ(lab_type__GTIH);
+        next__DTIH=(void *)((unsigned long)result__FTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HTIH)));
+        ((__POINTER *)next__DTIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ETIH)[ 0]=next__DTIH;
+      } else {
+        next__DTIH=((__POINTER *)result__FTIH)[ 0];
+        if ((next__DTIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FTIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HTIH <<  1)) <=  4096)) {
+            next__DTIH=(void *)((unsigned long)result__FTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HTIH)));
+          } else {
+            next__DTIH=new_lab__MRJ(lab_type__GTIH);
+          };
+          ((__POINTER *)next__DTIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ETIH)[ 0]=next__DTIH;
+        } else {
+          ((__POINTER *)result__FTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FTIH=next__DTIH;
+        };
+      };
+      ptr__PSQ=result__FTIH;
+    };
+    result__OSQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__PSQ);
+    *(result__OSQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
+  };
+  Self__U1V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__OSQ);
+  if ((Self__U1V->parent_arrayed_collection__MJP.capacity__31V <  32)) {
+    Self__U1V->parent_arrayed_collection__MJP.storage__I2V=create__VLXB( 32);
+    Self__U1V->parent_arrayed_collection__MJP.capacity__31V= 32;
+  };
+  Self__U1V->parent_arrayed_collection__MJP.upper__WJP=(__INTEGER)(-  1);
+  dico__NJP=result__OSQ;
+  ITM_TYPE_MULTI__->list_type__AKP=NULL;
+  ITM_TYPE_BLOCK__->type_argument__WMN=NULL;
+  ITM_TYPE_GENERIC__->list_type__3YP=NULL;
+  ITM_TYPE_BLOCK__->type_result__ANN=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__IMN= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__GKV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__RKV=NULL;
+  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__4LN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
+  result__U0O=NULL;
+  ptr__V0O=((__POINTER )(NULL));
+  typ_id__00O= 0;
+  sz__X0O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
+  if ((sz__X0O ==  0)) {
+    result__U0O=FAST_ARRAYoITM_TYPE_BLOCKo__;
   } else {
-    typ_id__O0O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__L0O);
-    if ((typ_id__O0O == (__INTEGER)(-  1))) {
-      a__G04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__H04G=(__UINTEGER_32)((__UINTEGER_32)(sz__L0O + a__G04G) & (__UINTEGER_32)(~ a__G04G));
-      ptr_table__VGCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H04G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__UGCH=((__POINTER )(NULL));
-      result__WGCH=((__POINTER *)ptr_table__VGCH)[ 0];
-      if ((result__WGCH == (void *)NULL)) {
-        result__WGCH=new_lab__ARJ(new_size__H04G);
-        next__UGCH=(void *)((unsigned long)result__WGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H04G)));
-        ((__POINTER *)next__UGCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VGCH)[ 0]=next__UGCH;
-      } else {
-        next__UGCH=((__POINTER *)result__WGCH)[ 0];
-        if ((next__UGCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WGCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__H04G <<  1)) <=  4096)) {
-            next__UGCH=(void *)((unsigned long)result__WGCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H04G)));
-          } else {
-            next__UGCH=new_lab__ARJ(new_size__H04G);
-          };
-          ((__POINTER *)next__UGCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VGCH)[ 0]=next__UGCH;
-        } else {
-          ((__POINTER *)result__WGCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UGCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WGCH=next__UGCH;
-        };
-      };
-      ptr__J0O=result__WGCH;
-    } else {
-      t__L04G=((__UINTEGER_32 )typ_id__O0O);
-      a__K04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__3GCH=(__UINTEGER_32)((__UINTEGER_32)(sz__L0O + a__K04G) & (__UINTEGER_32)(~ a__K04G));
-      ptr_table__0GCH=((__POINTER )(&(table_type[(t__L04G)])));
-      lab_type__2GCH=(__UINTEGER_32)(t__L04G |  1);
-      next__ZGCH=((__POINTER )(NULL));
-      result__1GCH=((__POINTER *)ptr_table__0GCH)[ 0];
-      if ((result__1GCH == (void *)NULL)) {
-        result__1GCH=new_lab__ARJ(lab_type__2GCH);
-        next__ZGCH=(void *)((unsigned long)result__1GCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GCH)));
-        ((__POINTER *)next__ZGCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0GCH)[ 0]=next__ZGCH;
-      } else {
-        next__ZGCH=((__POINTER *)result__1GCH)[ 0];
-        if ((next__ZGCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1GCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3GCH <<  1)) <=  4096)) {
-            next__ZGCH=(void *)((unsigned long)result__1GCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GCH)));
-          } else {
-            next__ZGCH=new_lab__ARJ(lab_type__2GCH);
-          };
-          ((__POINTER *)next__ZGCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0GCH)[ 0]=next__ZGCH;
-        } else {
-          ((__POINTER *)result__1GCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZGCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1GCH=next__ZGCH;
-        };
-      };
-      ptr__J0O=result__1GCH;
-    };
-    result__I0O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__J0O);
-    *(result__I0O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
-  };
-  Self__RJV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__I0O);
-  if ((Self__RJV->parent_arrayed_collection__SLN.capacity__0JV <  32)) {
-    Self__RJV->parent_arrayed_collection__SLN.storage__FKV=create__EUWB( 32);
-    Self__RJV->parent_arrayed_collection__SLN.capacity__0JV= 32;
-  };
-  Self__RJV->parent_arrayed_collection__SLN.upper__2LN=(__INTEGER)(-  1);
-  dico__TLN=result__I0O;
-  ITM_CODE__->parent_itm_object__LDE=(*ITM_OBJECT__);
-  ITM_CONSTANT__->parent_itm_code__PVF=(*ITM_CODE__);
-  ITM_REAL__->parent_itm_constant__ZQO=(*ITM_CONSTANT__);
-  ITM_NUMBER__->parent_itm_constant__LRO=(*ITM_CONSTANT__);
-  ITM_CHARACTER__->parent_itm_constant__3RO=(*ITM_CONSTANT__);
-  ITM_STRING__->parent_itm_constant__OSO=(*ITM_CONSTANT__);
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__UXP= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__HBW= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__SBW=NULL;
-  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__KXP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
-  result__P2Q=NULL;
-  ptr__Q2Q=((__POINTER )(NULL));
-  typ_id__V2Q= 0;
-  sz__S2Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
-  if ((sz__S2Q ==  0)) {
-    result__P2Q=FAST_ARRAYoITM_TYPE_GENERICo__;
+    typ_id__00O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__X0O);
+    if ((typ_id__00O == (__INTEGER)(-  1))) {
+      a__1FFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2FFH=(__UINTEGER_32)((__UINTEGER_32)(sz__X0O + a__1FFH) & (__UINTEGER_32)(~ a__1FFH));
+      ptr_table__JTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2FFH / ((__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__MRJ(new_size__2FFH);
+        next__ITIH=(void *)((unsigned long)result__KTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2FFH <<  1)) <=  4096)) {
+            next__ITIH=(void *)((unsigned long)result__KTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FFH)));
+          } else {
+            next__ITIH=new_lab__MRJ(new_size__2FFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__V0O=result__KTIH;
+    } else {
+      t__AGFH=((__UINTEGER_32 )typ_id__00O);
+      a__5FFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__X0O + a__5FFH) & (__UINTEGER_32)(~ a__5FFH));
+      ptr_table__OTIH=((__POINTER )(&(table_type[(t__AGFH)])));
+      lab_type__QTIH=(__UINTEGER_32)(t__AGFH |  1);
+      next__NTIH=((__POINTER )(NULL));
+      result__PTIH=((__POINTER *)ptr_table__OTIH)[ 0];
+      if ((result__PTIH == (void *)NULL)) {
+        result__PTIH=new_lab__MRJ(lab_type__QTIH);
+        next__NTIH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RTIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RTIH <<  1)) <=  4096)) {
+            next__NTIH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RTIH)));
+          } else {
+            next__NTIH=new_lab__MRJ(lab_type__QTIH);
+          };
+          ((__POINTER *)next__NTIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OTIH)[ 0]=next__NTIH;
+        } else {
+          ((__POINTER *)result__PTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PTIH=next__NTIH;
+        };
+      };
+      ptr__V0O=result__PTIH;
+    };
+    result__U0O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__V0O);
+    *(result__U0O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
+  };
+  Self__3JV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__U0O);
+  if ((Self__3JV->parent_arrayed_collection__4LN.capacity__GKV <  32)) {
+    Self__3JV->parent_arrayed_collection__4LN.storage__RKV=create__QUWB( 32);
+    Self__3JV->parent_arrayed_collection__4LN.capacity__GKV= 32;
+  };
+  Self__3JV->parent_arrayed_collection__4LN.upper__IMN=(__INTEGER)(-  1);
+  dico__5LN=result__U0O;
+  ITM_CODE__->parent_itm_object__XDE=(*ITM_OBJECT__);
+  ITM_CONSTANT__->parent_itm_code__1VF=(*ITM_CODE__);
+  ITM_REAL__->parent_itm_constant__FRO=(*ITM_CONSTANT__);
+  ITM_NUMBER__->parent_itm_constant__XRO=(*ITM_CONSTANT__);
+  ITM_CHARACTER__->parent_itm_constant__JSO=(*ITM_CONSTANT__);
+  ITM_STRING__->parent_itm_constant__0SO=(*ITM_CONSTANT__);
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__AYP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__TBW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__4BW=NULL;
+  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__WXP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
+  result__12Q=NULL;
+  ptr__22Q=((__POINTER )(NULL));
+  typ_id__B3Q= 0;
+  sz__42Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
+  if ((sz__42Q ==  0)) {
+    result__12Q=FAST_ARRAYoITM_TYPE_GENERICo__;
   } else {
-    typ_id__V2Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__S2Q);
-    if ((typ_id__V2Q == (__INTEGER)(-  1))) {
-      a__O04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__P04G=(__UINTEGER_32)((__UINTEGER_32)(sz__S2Q + a__O04G) & (__UINTEGER_32)(~ a__O04G));
-      ptr_table__5GCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P04G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__4GCH=((__POINTER )(NULL));
-      result__AHCH=((__POINTER *)ptr_table__5GCH)[ 0];
-      if ((result__AHCH == (void *)NULL)) {
-        result__AHCH=new_lab__ARJ(new_size__P04G);
-        next__4GCH=(void *)((unsigned long)result__AHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P04G)));
-        ((__POINTER *)next__4GCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5GCH)[ 0]=next__4GCH;
-      } else {
-        next__4GCH=((__POINTER *)result__AHCH)[ 0];
-        if ((next__4GCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AHCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__P04G <<  1)) <=  4096)) {
-            next__4GCH=(void *)((unsigned long)result__AHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P04G)));
-          } else {
-            next__4GCH=new_lab__ARJ(new_size__P04G);
-          };
-          ((__POINTER *)next__4GCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5GCH)[ 0]=next__4GCH;
-        } else {
-          ((__POINTER *)result__AHCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4GCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__AHCH=next__4GCH;
-        };
-      };
-      ptr__Q2Q=result__AHCH;
-    } else {
-      t__T04G=((__UINTEGER_32 )typ_id__V2Q);
-      a__S04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__HHCH=(__UINTEGER_32)((__UINTEGER_32)(sz__S2Q + a__S04G) & (__UINTEGER_32)(~ a__S04G));
-      ptr_table__EHCH=((__POINTER )(&(table_type[(t__T04G)])));
-      lab_type__GHCH=(__UINTEGER_32)(t__T04G |  1);
-      next__DHCH=((__POINTER )(NULL));
-      result__FHCH=((__POINTER *)ptr_table__EHCH)[ 0];
-      if ((result__FHCH == (void *)NULL)) {
-        result__FHCH=new_lab__ARJ(lab_type__GHCH);
-        next__DHCH=(void *)((unsigned long)result__FHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HHCH)));
-        ((__POINTER *)next__DHCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EHCH)[ 0]=next__DHCH;
-      } else {
-        next__DHCH=((__POINTER *)result__FHCH)[ 0];
-        if ((next__DHCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FHCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HHCH <<  1)) <=  4096)) {
-            next__DHCH=(void *)((unsigned long)result__FHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HHCH)));
-          } else {
-            next__DHCH=new_lab__ARJ(lab_type__GHCH);
-          };
-          ((__POINTER *)next__DHCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EHCH)[ 0]=next__DHCH;
-        } else {
-          ((__POINTER *)result__FHCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DHCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FHCH=next__DHCH;
-        };
-      };
-      ptr__Q2Q=result__FHCH;
-    };
-    result__P2Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__Q2Q);
-    *(result__P2Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
-  };
-  Self__4AW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__P2Q);
-  if ((Self__4AW->parent_arrayed_collection__KXP.capacity__HBW <  32)) {
-    Self__4AW->parent_arrayed_collection__KXP.storage__SBW=create__DSXB( 32);
-    Self__4AW->parent_arrayed_collection__KXP.capacity__HBW= 32;
-  };
-  Self__4AW->parent_arrayed_collection__KXP.upper__UXP=(__INTEGER)(-  1);
-  dico__LXP=result__P2Q;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__A2T=NULL;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__11T= 0;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__AFZ= 0;
-  result__3KK=NULL;
-  ptr__4KK=((__POINTER )(NULL));
-  typ_id__DLK= 0;
-  sz__ALK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
-  if ((sz__ALK ==  0)) {
-    result__3KK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    typ_id__B3Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__42Q);
+    if ((typ_id__B3Q == (__INTEGER)(-  1))) {
+      a__DGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EGFH=(__UINTEGER_32)((__UINTEGER_32)(sz__42Q + a__DGFH) & (__UINTEGER_32)(~ a__DGFH));
+      ptr_table__TTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EGFH / ((__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__MRJ(new_size__EGFH);
+        next__STIH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EGFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EGFH <<  1)) <=  4096)) {
+            next__STIH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EGFH)));
+          } else {
+            next__STIH=new_lab__MRJ(new_size__EGFH);
+          };
+          ((__POINTER *)next__STIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TTIH)[ 0]=next__STIH;
+        } else {
+          ((__POINTER *)result__UTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UTIH=next__STIH;
+        };
+      };
+      ptr__22Q=result__UTIH;
+    } else {
+      t__IGFH=((__UINTEGER_32 )typ_id__B3Q);
+      a__HGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1TIH=(__UINTEGER_32)((__UINTEGER_32)(sz__42Q + a__HGFH) & (__UINTEGER_32)(~ a__HGFH));
+      ptr_table__YTIH=((__POINTER )(&(table_type[(t__IGFH)])));
+      lab_type__0TIH=(__UINTEGER_32)(t__IGFH |  1);
+      next__XTIH=((__POINTER )(NULL));
+      result__ZTIH=((__POINTER *)ptr_table__YTIH)[ 0];
+      if ((result__ZTIH == (void *)NULL)) {
+        result__ZTIH=new_lab__MRJ(lab_type__0TIH);
+        next__XTIH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1TIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1TIH <<  1)) <=  4096)) {
+            next__XTIH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1TIH)));
+          } else {
+            next__XTIH=new_lab__MRJ(lab_type__0TIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__22Q=result__ZTIH;
+    };
+    result__12Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__22Q);
+    *(result__12Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
+  };
+  Self__KBW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__12Q);
+  if ((Self__KBW->parent_arrayed_collection__WXP.capacity__TBW <  32)) {
+    Self__KBW->parent_arrayed_collection__WXP.storage__4BW=create__PSXB( 32);
+    Self__KBW->parent_arrayed_collection__WXP.capacity__TBW= 32;
+  };
+  Self__KBW->parent_arrayed_collection__WXP.upper__AYP=(__INTEGER)(-  1);
+  dico__XXP=result__12Q;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__M2T=NULL;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__H2T= 0;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__MFZ= 0;
+  result__JLK=NULL;
+  ptr__KLK=((__POINTER )(NULL));
+  typ_id__PLK= 0;
+  sz__MLK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+  if ((sz__MLK ==  0)) {
+    result__JLK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
   } else {
-    typ_id__DLK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ALK);
-    if ((typ_id__DLK == (__INTEGER)(-  1))) {
-      a__W04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__X04G=(__UINTEGER_32)((__UINTEGER_32)(sz__ALK + a__W04G) & (__UINTEGER_32)(~ a__W04G));
-      ptr_table__JHCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X04G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__IHCH=((__POINTER )(NULL));
-      result__KHCH=((__POINTER *)ptr_table__JHCH)[ 0];
-      if ((result__KHCH == (void *)NULL)) {
-        result__KHCH=new_lab__ARJ(new_size__X04G);
-        next__IHCH=(void *)((unsigned long)result__KHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X04G)));
-        ((__POINTER *)next__IHCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JHCH)[ 0]=next__IHCH;
-      } else {
-        next__IHCH=((__POINTER *)result__KHCH)[ 0];
-        if ((next__IHCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KHCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__X04G <<  1)) <=  4096)) {
-            next__IHCH=(void *)((unsigned long)result__KHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X04G)));
-          } else {
-            next__IHCH=new_lab__ARJ(new_size__X04G);
-          };
-          ((__POINTER *)next__IHCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JHCH)[ 0]=next__IHCH;
-        } else {
-          ((__POINTER *)result__KHCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IHCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KHCH=next__IHCH;
-        };
-      };
-      ptr__4KK=result__KHCH;
-    } else {
-      t__104G=((__UINTEGER_32 )typ_id__DLK);
-      a__004G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__RHCH=(__UINTEGER_32)((__UINTEGER_32)(sz__ALK + a__004G) & (__UINTEGER_32)(~ a__004G));
-      ptr_table__OHCH=((__POINTER )(&(table_type[(t__104G)])));
-      lab_type__QHCH=(__UINTEGER_32)(t__104G |  1);
-      next__NHCH=((__POINTER )(NULL));
-      result__PHCH=((__POINTER *)ptr_table__OHCH)[ 0];
-      if ((result__PHCH == (void *)NULL)) {
-        result__PHCH=new_lab__ARJ(lab_type__QHCH);
-        next__NHCH=(void *)((unsigned long)result__PHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RHCH)));
-        ((__POINTER *)next__NHCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OHCH)[ 0]=next__NHCH;
-      } else {
-        next__NHCH=((__POINTER *)result__PHCH)[ 0];
-        if ((next__NHCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PHCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RHCH <<  1)) <=  4096)) {
-            next__NHCH=(void *)((unsigned long)result__PHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RHCH)));
-          } else {
-            next__NHCH=new_lab__ARJ(lab_type__QHCH);
-          };
-          ((__POINTER *)next__NHCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OHCH)[ 0]=next__NHCH;
-        } else {
-          ((__POINTER *)result__PHCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NHCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PHCH=next__NHCH;
-        };
-      };
-      ptr__4KK=result__PHCH;
-    };
-    result__3KK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__4KK);
-    *(result__3KK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
-  };
-  Self__DLU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__3KK);
-  new_capacity__1EZ=prime_number_ceiling__L41( 193);
-  Self__DLU->buckets__A2T=create__JH5(new_capacity__1EZ);
-  Self__DLU->capacity__11T=new_capacity__1EZ;
-  Self__DLU->count__AFZ= 0;
-  dico__GTI=result__3KK;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__M2T=NULL;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__X2T=NULL;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__52T=NULL;
-  result__5VQ=NULL;
-  ptr__AWQ=((__POINTER )(NULL));
-  typ_id__FWQ= 0;
-  sz__CWQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-  if ((sz__CWQ ==  0)) {
-    result__5VQ=ITM_TYPE_PARAMETER__;
+    typ_id__PLK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MLK);
+    if ((typ_id__PLK == (__INTEGER)(-  1))) {
+      a__LGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MGFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLK + a__LGFH) & (__UINTEGER_32)(~ a__LGFH));
+      ptr_table__3TIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MGFH / ((__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__MRJ(new_size__MGFH);
+        next__2TIH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MGFH <<  1)) <=  4096)) {
+            next__2TIH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGFH)));
+          } else {
+            next__2TIH=new_lab__MRJ(new_size__MGFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__KLK=result__4TIH;
+    } else {
+      t__QGFH=((__UINTEGER_32 )typ_id__PLK);
+      a__PGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLK + a__PGFH) & (__UINTEGER_32)(~ a__PGFH));
+      ptr_table__CUIH=((__POINTER )(&(table_type[(t__QGFH)])));
+      lab_type__EUIH=(__UINTEGER_32)(t__QGFH |  1);
+      next__BUIH=((__POINTER )(NULL));
+      result__DUIH=((__POINTER *)ptr_table__CUIH)[ 0];
+      if ((result__DUIH == (void *)NULL)) {
+        result__DUIH=new_lab__MRJ(lab_type__EUIH);
+        next__BUIH=(void *)((unsigned long)result__DUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FUIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FUIH <<  1)) <=  4096)) {
+            next__BUIH=(void *)((unsigned long)result__DUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FUIH)));
+          } else {
+            next__BUIH=new_lab__MRJ(lab_type__EUIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__KLK=result__DUIH;
+    };
+    result__JLK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__KLK);
+    *(result__JLK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+  };
+  Self__PLU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__JLK);
+  new_capacity__HFZ=prime_number_ceiling__X41( 193);
+  Self__PLU->buckets__M2T=create__VH5(new_capacity__HFZ);
+  Self__PLU->capacity__H2T=new_capacity__HFZ;
+  Self__PLU->count__MFZ= 0;
+  dico__STI=result__JLK;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__Y2T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__D3T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__L3T=NULL;
+  result__LWQ=NULL;
+  ptr__MWQ=((__POINTER )(NULL));
+  typ_id__RWQ= 0;
+  sz__OWQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+  if ((sz__OWQ ==  0)) {
+    result__LWQ=ITM_TYPE_PARAMETER__;
   } else {
-    typ_id__FWQ=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__CWQ);
-    if ((typ_id__FWQ == (__INTEGER)(-  1))) {
-      a__P52G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__Q52G=(__UINTEGER_32)((__UINTEGER_32)(sz__CWQ + a__P52G) & (__UINTEGER_32)(~ a__P52G));
-      ptr_table__THCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q52G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__SHCH=((__POINTER )(NULL));
-      result__UHCH=((__POINTER *)ptr_table__THCH)[ 0];
-      if ((result__UHCH == (void *)NULL)) {
-        result__UHCH=new_lab__ARJ(new_size__Q52G);
-        next__SHCH=(void *)((unsigned long)result__UHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q52G)));
-        ((__POINTER *)next__SHCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__THCH)[ 0]=next__SHCH;
-      } else {
-        next__SHCH=((__POINTER *)result__UHCH)[ 0];
-        if ((next__SHCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UHCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__Q52G <<  1)) <=  4096)) {
-            next__SHCH=(void *)((unsigned long)result__UHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q52G)));
-          } else {
-            next__SHCH=new_lab__ARJ(new_size__Q52G);
-          };
-          ((__POINTER *)next__SHCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__THCH)[ 0]=next__SHCH;
-        } else {
-          ((__POINTER *)result__UHCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SHCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UHCH=next__SHCH;
-        };
-      };
-      ptr__AWQ=result__UHCH;
-    } else {
-      t__U52G=((__UINTEGER_32 )typ_id__FWQ);
-      a__T52G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1HCH=(__UINTEGER_32)((__UINTEGER_32)(sz__CWQ + a__T52G) & (__UINTEGER_32)(~ a__T52G));
-      ptr_table__YHCH=((__POINTER )(&(table_type[(t__U52G)])));
-      lab_type__0HCH=(__UINTEGER_32)(t__U52G |  1);
-      next__XHCH=((__POINTER )(NULL));
-      result__ZHCH=((__POINTER *)ptr_table__YHCH)[ 0];
-      if ((result__ZHCH == (void *)NULL)) {
-        result__ZHCH=new_lab__ARJ(lab_type__0HCH);
-        next__XHCH=(void *)((unsigned long)result__ZHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1HCH)));
-        ((__POINTER *)next__XHCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YHCH)[ 0]=next__XHCH;
-      } else {
-        next__XHCH=((__POINTER *)result__ZHCH)[ 0];
-        if ((next__XHCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZHCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1HCH <<  1)) <=  4096)) {
-            next__XHCH=(void *)((unsigned long)result__ZHCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1HCH)));
-          } else {
-            next__XHCH=new_lab__ARJ(lab_type__0HCH);
-          };
-          ((__POINTER *)next__XHCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YHCH)[ 0]=next__XHCH;
-        } else {
-          ((__POINTER *)result__ZHCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XHCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZHCH=next__XHCH;
-        };
-      };
-      ptr__AWQ=result__ZHCH;
-    };
-    result__5VQ=((__ITM_TYPE_PARAMETER *)ptr__AWQ);
-    *(result__5VQ) = *(ITM_TYPE_PARAMETER__);
-  };
-  Self__52V=((__ITM_TYPE_PARAMETER *)result__5VQ);
-  Self__52V->parent_itm_type__RDE.name__4XP=(&__string_1);
-  fast_put__to__HOZ(result__3KK,Self__52V,(&__string_1));
-  type_self__1TN=result__5VQ;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__DOR= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__PLW= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__0LW=NULL;
-  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__ZNR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
-  result__1UR=NULL;
-  ptr__2UR=((__POINTER )(NULL));
-  typ_id__BVR= 0;
-  sz__4UR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
-  if ((sz__4UR ==  0)) {
-    result__1UR=FAST_ARRAYoITM_TYPE_STYLEo__;
+    typ_id__RWQ=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OWQ);
+    if ((typ_id__RWQ == (__INTEGER)(-  1))) {
+      a__BMDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CMDH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWQ + a__BMDH) & (__UINTEGER_32)(~ a__BMDH));
+      ptr_table__HUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CMDH / ((__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__MRJ(new_size__CMDH);
+        next__GUIH=(void *)((unsigned long)result__IUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CMDH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CMDH <<  1)) <=  4096)) {
+            next__GUIH=(void *)((unsigned long)result__IUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CMDH)));
+          } else {
+            next__GUIH=new_lab__MRJ(new_size__CMDH);
+          };
+          ((__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__MWQ=result__IUIH;
+    } else {
+      t__GMDH=((__UINTEGER_32 )typ_id__RWQ);
+      a__FMDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWQ + a__FMDH) & (__UINTEGER_32)(~ a__FMDH));
+      ptr_table__MUIH=((__POINTER )(&(table_type[(t__GMDH)])));
+      lab_type__OUIH=(__UINTEGER_32)(t__GMDH |  1);
+      next__LUIH=((__POINTER )(NULL));
+      result__NUIH=((__POINTER *)ptr_table__MUIH)[ 0];
+      if ((result__NUIH == (void *)NULL)) {
+        result__NUIH=new_lab__MRJ(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__PVH)))) &  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__MRJ(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__MWQ=result__NUIH;
+    };
+    result__LWQ=((__ITM_TYPE_PARAMETER *)ptr__MWQ);
+    *(result__LWQ) = *(ITM_TYPE_PARAMETER__);
+  };
+  Self__L3V=((__ITM_TYPE_PARAMETER *)result__LWQ);
+  Self__L3V->parent_itm_type__3DE.name__KYP=(&__string_1);
+  fast_put__to__TOZ(result__JLK,Self__L3V,(&__string_1));
+  type_self__HUN=result__LWQ;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__POR= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__1LW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__GMW=NULL;
+  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__FOR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
+  result__HVR=NULL;
+  ptr__IVR=((__POINTER )(NULL));
+  typ_id__NVR= 0;
+  sz__KVR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
+  if ((sz__KVR ==  0)) {
+    result__HVR=FAST_ARRAYoITM_TYPE_STYLEo__;
   } else {
-    typ_id__BVR=__FAST_ARRAYoITM_TYPE_STYLEo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__4UR);
-    if ((typ_id__BVR == (__INTEGER)(-  1))) {
-      a__404G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__504G=(__UINTEGER_32)((__UINTEGER_32)(sz__4UR + a__404G) & (__UINTEGER_32)(~ a__404G));
-      ptr_table__3HCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__504G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__2HCH=((__POINTER )(NULL));
-      result__4HCH=((__POINTER *)ptr_table__3HCH)[ 0];
-      if ((result__4HCH == (void *)NULL)) {
-        result__4HCH=new_lab__ARJ(new_size__504G);
-        next__2HCH=(void *)((unsigned long)result__4HCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__504G)));
-        ((__POINTER *)next__2HCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3HCH)[ 0]=next__2HCH;
-      } else {
-        next__2HCH=((__POINTER *)result__4HCH)[ 0];
-        if ((next__2HCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4HCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__504G <<  1)) <=  4096)) {
-            next__2HCH=(void *)((unsigned long)result__4HCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__504G)));
-          } else {
-            next__2HCH=new_lab__ARJ(new_size__504G);
-          };
-          ((__POINTER *)next__2HCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3HCH)[ 0]=next__2HCH;
-        } else {
-          ((__POINTER *)result__4HCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2HCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4HCH=next__2HCH;
-        };
-      };
-      ptr__2UR=result__4HCH;
-    } else {
-      t__D14G=((__UINTEGER_32 )typ_id__BVR);
-      a__C14G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__FICH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UR + a__C14G) & (__UINTEGER_32)(~ a__C14G));
-      ptr_table__CICH=((__POINTER )(&(table_type[(t__D14G)])));
-      lab_type__EICH=(__UINTEGER_32)(t__D14G |  1);
-      next__BICH=((__POINTER )(NULL));
-      result__DICH=((__POINTER *)ptr_table__CICH)[ 0];
-      if ((result__DICH == (void *)NULL)) {
-        result__DICH=new_lab__ARJ(lab_type__EICH);
-        next__BICH=(void *)((unsigned long)result__DICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FICH)));
-        ((__POINTER *)next__BICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CICH)[ 0]=next__BICH;
-      } else {
-        next__BICH=((__POINTER *)result__DICH)[ 0];
-        if ((next__BICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DICH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FICH <<  1)) <=  4096)) {
-            next__BICH=(void *)((unsigned long)result__DICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FICH)));
-          } else {
-            next__BICH=new_lab__ARJ(lab_type__EICH);
-          };
-          ((__POINTER *)next__BICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CICH)[ 0]=next__BICH;
-        } else {
-          ((__POINTER *)result__DICH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DICH=next__BICH;
-        };
-      };
-      ptr__2UR=result__DICH;
-    };
-    result__1UR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__2UR);
-    *(result__1UR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
-  };
-  Self__GLW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__1UR);
-  if ((Self__GLW->parent_arrayed_collection__ZNR.capacity__PLW <  32)) {
-    Self__GLW->parent_arrayed_collection__ZNR.storage__0LW=create__PHYB( 32);
-    Self__GLW->parent_arrayed_collection__ZNR.capacity__PLW= 32;
-  };
-  Self__GLW->parent_arrayed_collection__ZNR.upper__DOR=(__INTEGER)(-  1);
-  dico__0NR=result__1UR;
-  type_null__TUN=get__XSI((&__string_2));
-  ITM_LIST__->parent_itm_code__44E=(*ITM_CODE__);
-  last_group__PTF=NULL;
-  old_position__XQI= 0;
-  old_pos_cur__ZQI= 0;
-  old_pos_line__1QI= 0;
-  old_pos_col__3QI= 0;
-  old_short_derive__5QI= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__30T= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__QIU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__1IU=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__IRI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
-  ARRAYED_COLLECTIONoITM_LOCALo__->upper__P0K= 0;
-  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__LKU= 0;
-  ARRAYED_COLLECTIONoITM_LOCALo__->storage__WKU=NULL;
-  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__Y0H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
-  result__0HK=NULL;
-  ptr__1HK=((__POINTER )(NULL));
-  typ_id__AIK= 0;
-  sz__3HK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
-  if ((sz__3HK ==  0)) {
-    result__0HK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    typ_id__NVR=__FAST_ARRAYoITM_TYPE_STYLEo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KVR);
+    if ((typ_id__NVR == (__INTEGER)(-  1))) {
+      a__TGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UGFH=(__UINTEGER_32)((__UINTEGER_32)(sz__KVR + a__TGFH) & (__UINTEGER_32)(~ a__TGFH));
+      ptr_table__RUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UGFH / ((__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__MRJ(new_size__UGFH);
+        next__QUIH=(void *)((unsigned long)result__SUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UGFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UGFH <<  1)) <=  4096)) {
+            next__QUIH=(void *)((unsigned long)result__SUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UGFH)));
+          } else {
+            next__QUIH=new_lab__MRJ(new_size__UGFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__IVR=result__SUIH;
+    } else {
+      t__YGFH=((__UINTEGER_32 )typ_id__NVR);
+      a__XGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__KVR + a__XGFH) & (__UINTEGER_32)(~ a__XGFH));
+      ptr_table__WUIH=((__POINTER )(&(table_type[(t__YGFH)])));
+      lab_type__YUIH=(__UINTEGER_32)(t__YGFH |  1);
+      next__VUIH=((__POINTER )(NULL));
+      result__XUIH=((__POINTER *)ptr_table__WUIH)[ 0];
+      if ((result__XUIH == (void *)NULL)) {
+        result__XUIH=new_lab__MRJ(lab_type__YUIH);
+        next__VUIH=(void *)((unsigned long)result__XUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZUIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZUIH <<  1)) <=  4096)) {
+            next__VUIH=(void *)((unsigned long)result__XUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZUIH)));
+          } else {
+            next__VUIH=new_lab__MRJ(lab_type__YUIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__IVR=result__XUIH;
+    };
+    result__HVR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__IVR);
+    *(result__HVR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
+  };
+  Self__SLW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__HVR);
+  if ((Self__SLW->parent_arrayed_collection__FOR.capacity__1LW <  32)) {
+    Self__SLW->parent_arrayed_collection__FOR.storage__GMW=create__1HYB( 32);
+    Self__SLW->parent_arrayed_collection__FOR.capacity__1LW= 32;
+  };
+  Self__SLW->parent_arrayed_collection__FOR.upper__POR=(__INTEGER)(-  1);
+  dico__GOR=result__HVR;
+  type_null__5UN=get__DTI((&__string_2));
+  ITM_LIST__->parent_itm_code__K5E=(*ITM_CODE__);
+  last_group__1TF=NULL;
+  old_position__DRI= 0;
+  old_pos_cur__FRI= 0;
+  old_pos_line__HRI= 0;
+  old_pos_col__JRI= 0;
+  old_short_derive__LRI= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__J1T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__2IU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__HJU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__URI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
+  ARRAYED_COLLECTIONoITM_LOCALo__->upper__10K= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__XKU= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->storage__CLU=NULL;
+  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__E1H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
+  result__GIK=NULL;
+  ptr__HIK=((__POINTER )(NULL));
+  typ_id__MIK= 0;
+  sz__JIK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
+  if ((sz__JIK ==  0)) {
+    result__GIK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
   } else {
-    typ_id__AIK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__3HK);
-    if ((typ_id__AIK == (__INTEGER)(-  1))) {
-      a__G14G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__H14G=(__UINTEGER_32)((__UINTEGER_32)(sz__3HK + a__G14G) & (__UINTEGER_32)(~ a__G14G));
-      ptr_table__HICH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H14G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__GICH=((__POINTER )(NULL));
-      result__IICH=((__POINTER *)ptr_table__HICH)[ 0];
-      if ((result__IICH == (void *)NULL)) {
-        result__IICH=new_lab__ARJ(new_size__H14G);
-        next__GICH=(void *)((unsigned long)result__IICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H14G)));
-        ((__POINTER *)next__GICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HICH)[ 0]=next__GICH;
-      } else {
-        next__GICH=((__POINTER *)result__IICH)[ 0];
-        if ((next__GICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IICH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__H14G <<  1)) <=  4096)) {
-            next__GICH=(void *)((unsigned long)result__IICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H14G)));
-          } else {
-            next__GICH=new_lab__ARJ(new_size__H14G);
-          };
-          ((__POINTER *)next__GICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HICH)[ 0]=next__GICH;
-        } else {
-          ((__POINTER *)result__IICH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__IICH=next__GICH;
-        };
-      };
-      ptr__1HK=result__IICH;
-    } else {
-      t__L14G=((__UINTEGER_32 )typ_id__AIK);
-      a__K14G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__PICH=(__UINTEGER_32)((__UINTEGER_32)(sz__3HK + a__K14G) & (__UINTEGER_32)(~ a__K14G));
-      ptr_table__MICH=((__POINTER )(&(table_type[(t__L14G)])));
-      lab_type__OICH=(__UINTEGER_32)(t__L14G |  1);
-      next__LICH=((__POINTER )(NULL));
-      result__NICH=((__POINTER *)ptr_table__MICH)[ 0];
-      if ((result__NICH == (void *)NULL)) {
-        result__NICH=new_lab__ARJ(lab_type__OICH);
-        next__LICH=(void *)((unsigned long)result__NICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PICH)));
-        ((__POINTER *)next__LICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MICH)[ 0]=next__LICH;
-      } else {
-        next__LICH=((__POINTER *)result__NICH)[ 0];
-        if ((next__LICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NICH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PICH <<  1)) <=  4096)) {
-            next__LICH=(void *)((unsigned long)result__NICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PICH)));
-          } else {
-            next__LICH=new_lab__ARJ(lab_type__OICH);
-          };
-          ((__POINTER *)next__LICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MICH)[ 0]=next__LICH;
-        } else {
-          ((__POINTER *)result__NICH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NICH=next__LICH;
-        };
-      };
-      ptr__1HK=result__NICH;
-    };
-    result__0HK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__1HK);
-    *(result__0HK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
-  };
-  Self__HIU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__0HK);
-  if ((Self__HIU->parent_arrayed_collection__IRI.capacity__QIU <  5)) {
-    Self__HIU->parent_arrayed_collection__IRI.storage__1IU=create__YGQB( 5);
-    Self__HIU->parent_arrayed_collection__IRI.capacity__QIU= 5;
-  };
-  Self__HIU->parent_arrayed_collection__IRI.upper__30T=(__INTEGER)(-  1);
-  free_list__JRI=result__0HK;
-  ITM_LOCAL__->parent_itm_object__T0H=(*ITM_OBJECT__);
-  ITM_LOCAL__->name__S2K=NULL;
-  HASHED_SET_NODEoSTRING_CONSTANTo__->item__PEV=NULL;
-  HASHED_SET_NODEoSTRING_CONSTANTo__->next__0EV=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__2VT= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__O5T= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__KAU=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__U3H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
-  ARRAYED_COLLECTIONoITM_CODEo__->upper__QHL= 0;
-  ARRAYED_COLLECTIONoITM_CODEo__->capacity__OXT= 0;
-  ARRAYED_COLLECTIONoITM_CODEo__->storage__ZXT=NULL;
-  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__FTF=(*ARRAYED_COLLECTIONoITM_CODEo__);
-  result__D4J=NULL;
-  ptr__E4J=((__POINTER )(NULL));
-  typ_id__J4J= 0;
-  sz__G4J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
-  if ((sz__G4J ==  0)) {
-    result__D4J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    typ_id__MIK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JIK);
+    if ((typ_id__MIK == (__INTEGER)(-  1))) {
+      a__1GFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2GFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JIK + a__1GFH) & (__UINTEGER_32)(~ a__1GFH));
+      ptr_table__1UIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2GFH / ((__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__MRJ(new_size__2GFH);
+        next__0UIH=(void *)((unsigned long)result__2UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2GFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2GFH <<  1)) <=  4096)) {
+            next__0UIH=(void *)((unsigned long)result__2UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2GFH)));
+          } else {
+            next__0UIH=new_lab__MRJ(new_size__2GFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__HIK=result__2UIH;
+    } else {
+      t__AHFH=((__UINTEGER_32 )typ_id__MIK);
+      a__5GFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JIK + a__5GFH) & (__UINTEGER_32)(~ a__5GFH));
+      ptr_table__AVIH=((__POINTER )(&(table_type[(t__AHFH)])));
+      lab_type__CVIH=(__UINTEGER_32)(t__AHFH |  1);
+      next__5UIH=((__POINTER )(NULL));
+      result__BVIH=((__POINTER *)ptr_table__AVIH)[ 0];
+      if ((result__BVIH == (void *)NULL)) {
+        result__BVIH=new_lab__MRJ(lab_type__CVIH);
+        next__5UIH=(void *)((unsigned long)result__BVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DVIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DVIH <<  1)) <=  4096)) {
+            next__5UIH=(void *)((unsigned long)result__BVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DVIH)));
+          } else {
+            next__5UIH=new_lab__MRJ(lab_type__CVIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__HIK=result__BVIH;
+    };
+    result__GIK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__HIK);
+    *(result__GIK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
+  };
+  Self__TIU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__GIK);
+  if ((Self__TIU->parent_arrayed_collection__URI.capacity__2IU <  5)) {
+    Self__TIU->parent_arrayed_collection__URI.storage__HJU=create__EHQB( 5);
+    Self__TIU->parent_arrayed_collection__URI.capacity__2IU= 5;
+  };
+  Self__TIU->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(-  1);
+  free_list__VRI=result__GIK;
+  ITM_LOCAL__->parent_itm_object__50H=(*ITM_OBJECT__);
+  ITM_LOCAL__->name__42K=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->item__1EV=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->next__GFV=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__IWT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__05T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__WAU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__A4H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
+  ARRAYED_COLLECTIONoITM_CODEo__->upper__2HL= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->capacity__0XT= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->storage__FYT=NULL;
+  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__RTF=(*ARRAYED_COLLECTIONoITM_CODEo__);
+  result__P4J=NULL;
+  ptr__Q4J=((__POINTER )(NULL));
+  typ_id__V4J= 0;
+  sz__S4J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
+  if ((sz__S4J ==  0)) {
+    result__P4J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
   } else {
-    typ_id__J4J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__G4J);
-    if ((typ_id__J4J == (__INTEGER)(-  1))) {
-      a__O14G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__P14G=(__UINTEGER_32)((__UINTEGER_32)(sz__G4J + a__O14G) & (__UINTEGER_32)(~ a__O14G));
-      ptr_table__RICH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P14G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__QICH=((__POINTER )(NULL));
-      result__SICH=((__POINTER *)ptr_table__RICH)[ 0];
-      if ((result__SICH == (void *)NULL)) {
-        result__SICH=new_lab__ARJ(new_size__P14G);
-        next__QICH=(void *)((unsigned long)result__SICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P14G)));
-        ((__POINTER *)next__QICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__RICH)[ 0]=next__QICH;
-      } else {
-        next__QICH=((__POINTER *)result__SICH)[ 0];
-        if ((next__QICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SICH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__P14G <<  1)) <=  4096)) {
-            next__QICH=(void *)((unsigned long)result__SICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P14G)));
-          } else {
-            next__QICH=new_lab__ARJ(new_size__P14G);
-          };
-          ((__POINTER *)next__QICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RICH)[ 0]=next__QICH;
-        } else {
-          ((__POINTER *)result__SICH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SICH=next__QICH;
-        };
-      };
-      ptr__E4J=result__SICH;
-    } else {
-      t__T14G=((__UINTEGER_32 )typ_id__J4J);
-      a__S14G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ZICH=(__UINTEGER_32)((__UINTEGER_32)(sz__G4J + a__S14G) & (__UINTEGER_32)(~ a__S14G));
-      ptr_table__WICH=((__POINTER )(&(table_type[(t__T14G)])));
-      lab_type__YICH=(__UINTEGER_32)(t__T14G |  1);
-      next__VICH=((__POINTER )(NULL));
-      result__XICH=((__POINTER *)ptr_table__WICH)[ 0];
-      if ((result__XICH == (void *)NULL)) {
-        result__XICH=new_lab__ARJ(lab_type__YICH);
-        next__VICH=(void *)((unsigned long)result__XICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZICH)));
-        ((__POINTER *)next__VICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WICH)[ 0]=next__VICH;
-      } else {
-        next__VICH=((__POINTER *)result__XICH)[ 0];
-        if ((next__VICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XICH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZICH <<  1)) <=  4096)) {
-            next__VICH=(void *)((unsigned long)result__XICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZICH)));
-          } else {
-            next__VICH=new_lab__ARJ(lab_type__YICH);
-          };
-          ((__POINTER *)next__VICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WICH)[ 0]=next__VICH;
-        } else {
-          ((__POINTER *)result__XICH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XICH=next__VICH;
-        };
-      };
-      ptr__E4J=result__XICH;
-    };
-    result__D4J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__E4J);
-    *(result__D4J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
-  };
-  Self__2EU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__D4J);
-  if ((Self__2EU->parent_arrayed_collection__U3H.capacity__O5T <  5)) {
-    Self__2EU->parent_arrayed_collection__U3H.storage__KAU=create__I1PB( 5);
-    Self__2EU->parent_arrayed_collection__U3H.capacity__O5T= 5;
-  };
-  Self__2EU->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(-  1);
-  free_list__V3H=result__D4J;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__OSU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__TUU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__4UU=NULL;
-  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__34K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__P5OD= 0;
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__KBPD= 0;
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__FCPD=NULL;
-  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__14I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
-  result__ZKM=NULL;
-  ptr__0KM=((__POINTER )(NULL));
-  typ_id__5KM= 0;
-  sz__2KM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
-  if ((sz__2KM ==  0)) {
-    result__ZKM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    typ_id__V4J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__S4J);
+    if ((typ_id__V4J == (__INTEGER)(-  1))) {
+      a__DHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EHFH=(__UINTEGER_32)((__UINTEGER_32)(sz__S4J + a__DHFH) & (__UINTEGER_32)(~ a__DHFH));
+      ptr_table__FVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EHFH / ((__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__MRJ(new_size__EHFH);
+        next__EVIH=(void *)((unsigned long)result__GVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EHFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EHFH <<  1)) <=  4096)) {
+            next__EVIH=(void *)((unsigned long)result__GVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EHFH)));
+          } else {
+            next__EVIH=new_lab__MRJ(new_size__EHFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__Q4J=result__GVIH;
+    } else {
+      t__IHFH=((__UINTEGER_32 )typ_id__V4J);
+      a__HHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__S4J + a__HHFH) & (__UINTEGER_32)(~ a__HHFH));
+      ptr_table__KVIH=((__POINTER )(&(table_type[(t__IHFH)])));
+      lab_type__MVIH=(__UINTEGER_32)(t__IHFH |  1);
+      next__JVIH=((__POINTER )(NULL));
+      result__LVIH=((__POINTER *)ptr_table__KVIH)[ 0];
+      if ((result__LVIH == (void *)NULL)) {
+        result__LVIH=new_lab__MRJ(lab_type__MVIH);
+        next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NVIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NVIH <<  1)) <=  4096)) {
+            next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NVIH)));
+          } else {
+            next__JVIH=new_lab__MRJ(lab_type__MVIH);
+          };
+          ((__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__Q4J=result__LVIH;
+    };
+    result__P4J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__Q4J);
+    *(result__P4J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
+  };
+  Self__IFU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__P4J);
+  if ((Self__IFU->parent_arrayed_collection__A4H.capacity__05T <  5)) {
+    Self__IFU->parent_arrayed_collection__A4H.storage__WAU=create__U1PB( 5);
+    Self__IFU->parent_arrayed_collection__A4H.capacity__05T= 5;
+  };
+  Self__IFU->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(-  1);
+  free_list__B4H=result__P4J;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__0SU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__5UU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__KVU=NULL;
+  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__J5K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__15OD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__WBPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__RCPD=NULL;
+  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__H5I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
+  result__FLM=NULL;
+  ptr__GLM=((__POINTER )(NULL));
+  typ_id__LLM= 0;
+  sz__ILM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__ILM ==  0)) {
+    result__FLM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
   } else {
-    typ_id__5KM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__2KM);
-    if ((typ_id__5KM == (__INTEGER)(-  1))) {
-      a__W14G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__X14G=(__UINTEGER_32)((__UINTEGER_32)(sz__2KM + a__W14G) & (__UINTEGER_32)(~ a__W14G));
-      ptr_table__1ICH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X14G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__0ICH=((__POINTER )(NULL));
-      result__2ICH=((__POINTER *)ptr_table__1ICH)[ 0];
-      if ((result__2ICH == (void *)NULL)) {
-        result__2ICH=new_lab__ARJ(new_size__X14G);
-        next__0ICH=(void *)((unsigned long)result__2ICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X14G)));
-        ((__POINTER *)next__0ICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1ICH)[ 0]=next__0ICH;
-      } else {
-        next__0ICH=((__POINTER *)result__2ICH)[ 0];
-        if ((next__0ICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2ICH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__X14G <<  1)) <=  4096)) {
-            next__0ICH=(void *)((unsigned long)result__2ICH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X14G)));
-          } else {
-            next__0ICH=new_lab__ARJ(new_size__X14G);
-          };
-          ((__POINTER *)next__0ICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1ICH)[ 0]=next__0ICH;
-        } else {
-          ((__POINTER *)result__2ICH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2ICH=next__0ICH;
-        };
-      };
-      ptr__0KM=result__2ICH;
-    } else {
-      t__114G=((__UINTEGER_32 )typ_id__5KM);
-      a__014G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DJCH=(__UINTEGER_32)((__UINTEGER_32)(sz__2KM + a__014G) & (__UINTEGER_32)(~ a__014G));
-      ptr_table__AJCH=((__POINTER )(&(table_type[(t__114G)])));
-      lab_type__CJCH=(__UINTEGER_32)(t__114G |  1);
-      next__5ICH=((__POINTER )(NULL));
-      result__BJCH=((__POINTER *)ptr_table__AJCH)[ 0];
-      if ((result__BJCH == (void *)NULL)) {
-        result__BJCH=new_lab__ARJ(lab_type__CJCH);
-        next__5ICH=(void *)((unsigned long)result__BJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJCH)));
-        ((__POINTER *)next__5ICH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AJCH)[ 0]=next__5ICH;
-      } else {
-        next__5ICH=((__POINTER *)result__BJCH)[ 0];
-        if ((next__5ICH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BJCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DJCH <<  1)) <=  4096)) {
-            next__5ICH=(void *)((unsigned long)result__BJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJCH)));
-          } else {
-            next__5ICH=new_lab__ARJ(lab_type__CJCH);
-          };
-          ((__POINTER *)next__5ICH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AJCH)[ 0]=next__5ICH;
-        } else {
-          ((__POINTER *)result__BJCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ICH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BJCH=next__5ICH;
-        };
-      };
-      ptr__0KM=result__BJCH;
-    };
-    result__ZKM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__0KM);
-    *(result__ZKM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
-  };
-  Self__KUU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__ZKM);
-  if ((Self__KUU->parent_arrayed_collection__34K.capacity__TUU <  5)) {
-    Self__KUU->parent_arrayed_collection__34K.storage__4UU=create__T3ZB( 5);
-    Self__KUU->parent_arrayed_collection__34K.capacity__TUU= 5;
-  };
-  Self__KUU->parent_arrayed_collection__34K.upper__OSU=(__INTEGER)(-  1);
-  free_list__44K=result__ZKM;
-  ITM_LIST_IDF__->parent_itm_code__KCJ=(*ITM_CODE__);
-  ITM_LDOTS__->parent_itm_constant__EUF=(*ITM_CODE__);
-  ITM_PROTOTYPE__->parent_itm_constant__QVF=(*ITM_CONSTANT__);
-  ITM_WRITE__->parent_itm_code__5CJ=(*ITM_CODE__);
-  ITM_WRITE_VALUE__->parent_itm_write__ADJ=(*ITM_WRITE__);
-  ITM_WRITE_CAST__->parent_itm_write__XDJ=(*ITM_WRITE__);
-  ITM_READ__->parent_itm_code__EGJ=(*ITM_CODE__);
-  ITM_WRITE_CODE__->parent_itm_write__CHJ=(*ITM_WRITE__);
-  ITM_OPERATOR__->parent_itm_code__YEL=(*ITM_CODE__);
-  ITM_READ_ARG1__->parent_itm_read__4HL=(*ITM_READ__);
-  ITM_READ_ARG2__->parent_itm_read__LKL=(*ITM_READ__);
-  ITM_EXPRESSION__->value_list__PJV=NULL;
-  ITM_OLD__->parent_itm_code__B2L=(*ITM_CODE__);
-  ITM_EXTERN__->parent_itm_code__C4M=(*ITM_CODE__);
-  ITM_EXTERNAL_TYPE__->parent_itm_extern__D4M=(*ITM_EXTERN__);
-  ITM_BLOCK__->list__UMDC=NULL;
-  ITM_EXTERNAL__->parent_itm_extern__IFN=(*ITM_EXTERN__);
-  ITM_READ_ARGS__->parent_itm_read__4CO=(*ITM_READ__);
-  ITM_RESULT__->value__ALFC=NULL;
-  ITM_OPERATOR__->name__DIL=NULL;
-  ITM_ARGUMENT__->parent_itm_code__G4M=(*ITM_OBJECT__);
-  ITM_ARG__->parent_itm_argument__NHHB=(*ITM_ARGUMENT__);
-  ITM_ARG__->name__P0HC=NULL;
-  ITM_ARG__->type__Q0HC=NULL;
-  empty_list__GUKF=create_with_capacity__VGRC( 0);
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__55OF=NULL;
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__05OF= 0;
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__REPF= 0;
-  result__V2MF=NULL;
-  ptr__W2MF=((__POINTER )(NULL));
-  typ_id__12MF= 0;
-  sz__Y2MF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
-  if ((sz__Y2MF ==  0)) {
-    result__V2MF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    typ_id__LLM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ILM);
+    if ((typ_id__LLM == (__INTEGER)(-  1))) {
+      a__LHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MHFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILM + a__LHFH) & (__UINTEGER_32)(~ a__LHFH));
+      ptr_table__PVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MHFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__OVIH=((__POINTER )(NULL));
+      result__QVIH=((__POINTER *)ptr_table__PVIH)[ 0];
+      if ((result__QVIH == (void *)NULL)) {
+        result__QVIH=new_lab__MRJ(new_size__MHFH);
+        next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MHFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MHFH <<  1)) <=  4096)) {
+            next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MHFH)));
+          } else {
+            next__OVIH=new_lab__MRJ(new_size__MHFH);
+          };
+          ((__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__GLM=result__QVIH;
+    } else {
+      t__QHFH=((__UINTEGER_32 )typ_id__LLM);
+      a__PHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILM + a__PHFH) & (__UINTEGER_32)(~ a__PHFH));
+      ptr_table__UVIH=((__POINTER )(&(table_type[(t__QHFH)])));
+      lab_type__WVIH=(__UINTEGER_32)(t__QHFH |  1);
+      next__TVIH=((__POINTER )(NULL));
+      result__VVIH=((__POINTER *)ptr_table__UVIH)[ 0];
+      if ((result__VVIH == (void *)NULL)) {
+        result__VVIH=new_lab__MRJ(lab_type__WVIH);
+        next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVIH)));
+        ((__POINTER *)next__TVIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
+      } else {
+        next__TVIH=((__POINTER *)result__VVIH)[ 0];
+        if ((next__TVIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VVIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XVIH <<  1)) <=  4096)) {
+            next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVIH)));
+          } else {
+            next__TVIH=new_lab__MRJ(lab_type__WVIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__GLM=result__VVIH;
+    };
+    result__FLM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__GLM);
+    *(result__FLM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__WUU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__FLM);
+  if ((Self__WUU->parent_arrayed_collection__J5K.capacity__5UU <  5)) {
+    Self__WUU->parent_arrayed_collection__J5K.storage__KVU=create__53ZB( 5);
+    Self__WUU->parent_arrayed_collection__J5K.capacity__5UU= 5;
+  };
+  Self__WUU->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(-  1);
+  free_list__K5K=result__FLM;
+  ITM_LIST_IDF__->parent_itm_code__WCJ=(*ITM_CODE__);
+  ITM_LDOTS__->parent_itm_constant__QUF=(*ITM_CODE__);
+  ITM_PROTOTYPE__->parent_itm_constant__2VF=(*ITM_CONSTANT__);
+  ITM_WRITE__->parent_itm_code__LDJ=(*ITM_CODE__);
+  ITM_WRITE_VALUE__->parent_itm_write__MDJ=(*ITM_WRITE__);
+  ITM_WRITE_CAST__->parent_itm_write__DEJ=(*ITM_WRITE__);
+  ITM_READ__->parent_itm_code__QGJ=(*ITM_CODE__);
+  ITM_WRITE_CODE__->parent_itm_write__OHJ=(*ITM_WRITE__);
+  ITM_OPERATOR__->parent_itm_code__EFL=(*ITM_CODE__);
+  ITM_READ_ARG1__->parent_itm_read__KIL=(*ITM_READ__);
+  ITM_READ_ARG2__->parent_itm_read__XKL=(*ITM_READ__);
+  ITM_EXPRESSION__->value_list__1JV=NULL;
+  ITM_OLD__->parent_itm_code__N2L=(*ITM_CODE__);
+  ITM_EXTERN__->parent_itm_code__O4M=(*ITM_CODE__);
+  ITM_EXTERNAL_TYPE__->parent_itm_extern__P4M=(*ITM_EXTERN__);
+  ITM_BLOCK__->list__ANDC=NULL;
+  ITM_EXTERNAL__->parent_itm_extern__UFN=(*ITM_EXTERN__);
+  ITM_READ_ARGS__->parent_itm_read__KDO=(*ITM_READ__);
+  ITM_RESULT__->value__MLFC=NULL;
+  ITM_OPERATOR__->name__PIL=NULL;
+  ITM_ARGUMENT__->parent_itm_code__S4M=(*ITM_OBJECT__);
+  ITM_ARG__->parent_itm_argument__ZHHB=(*ITM_ARGUMENT__);
+  ITM_ARG__->name__10HC=NULL;
+  ITM_ARG__->type__20HC=NULL;
+  empty_list__WHLF=create_with_capacity__BHRC( 0);
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__HDPF=NULL;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__CDPF= 0;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__ZHPF= 0;
+  result__ZBNF=NULL;
+  ptr__0BNF=((__POINTER )(NULL));
+  typ_id__5BNF= 0;
+  sz__2BNF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__2BNF ==  0)) {
+    result__ZBNF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
   } else {
-    typ_id__12MF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__Y2MF);
-    if ((typ_id__12MF == (__INTEGER)(-  1))) {
-      a__414G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__514G=(__UINTEGER_32)((__UINTEGER_32)(sz__Y2MF + a__414G) & (__UINTEGER_32)(~ a__414G));
-      ptr_table__FJCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__514G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__EJCH=((__POINTER )(NULL));
-      result__GJCH=((__POINTER *)ptr_table__FJCH)[ 0];
-      if ((result__GJCH == (void *)NULL)) {
-        result__GJCH=new_lab__ARJ(new_size__514G);
-        next__EJCH=(void *)((unsigned long)result__GJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__514G)));
-        ((__POINTER *)next__EJCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FJCH)[ 0]=next__EJCH;
-      } else {
-        next__EJCH=((__POINTER *)result__GJCH)[ 0];
-        if ((next__EJCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GJCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__514G <<  1)) <=  4096)) {
-            next__EJCH=(void *)((unsigned long)result__GJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__514G)));
-          } else {
-            next__EJCH=new_lab__ARJ(new_size__514G);
-          };
-          ((__POINTER *)next__EJCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FJCH)[ 0]=next__EJCH;
-        } else {
-          ((__POINTER *)result__GJCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GJCH=next__EJCH;
-        };
-      };
-      ptr__W2MF=result__GJCH;
-    } else {
-      t__D24G=((__UINTEGER_32 )typ_id__12MF);
-      a__C24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NJCH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y2MF + a__C24G) & (__UINTEGER_32)(~ a__C24G));
-      ptr_table__KJCH=((__POINTER )(&(table_type[(t__D24G)])));
-      lab_type__MJCH=(__UINTEGER_32)(t__D24G |  1);
-      next__JJCH=((__POINTER )(NULL));
-      result__LJCH=((__POINTER *)ptr_table__KJCH)[ 0];
-      if ((result__LJCH == (void *)NULL)) {
-        result__LJCH=new_lab__ARJ(lab_type__MJCH);
-        next__JJCH=(void *)((unsigned long)result__LJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJCH)));
-        ((__POINTER *)next__JJCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KJCH)[ 0]=next__JJCH;
-      } else {
-        next__JJCH=((__POINTER *)result__LJCH)[ 0];
-        if ((next__JJCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LJCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NJCH <<  1)) <=  4096)) {
-            next__JJCH=(void *)((unsigned long)result__LJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJCH)));
-          } else {
-            next__JJCH=new_lab__ARJ(lab_type__MJCH);
-          };
-          ((__POINTER *)next__JJCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KJCH)[ 0]=next__JJCH;
-        } else {
-          ((__POINTER *)result__LJCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JJCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LJCH=next__JJCH;
-        };
-      };
-      ptr__W2MF=result__LJCH;
-    };
-    result__V2MF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__W2MF);
-    *(result__V2MF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
-  };
-  Self__RCPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__V2MF);
-  new_capacity__3HQF=prime_number_ceiling__L41( 53);
-  Self__RCPF->buckets__55OF=create__DPSF(new_capacity__3HQF);
-  Self__RCPF->capacity__05OF=new_capacity__3HQF;
-  Self__RCPF->count__REPF= 0;
-  bucket__QUKF=result__V2MF;
-  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__LAPF=NULL;
-  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__XAPF=NULL;
-  ITM_ARGS__->parent_itm_argument__YREE=(*ITM_ARGUMENT__);
-  ITM_ARGS__->name__QPOF=NULL;
-  ITM_ARGS__->type__VQOF=NULL;
-  ITM_EXTERNAL_TYPE__->is_persistant__AHN=FALSE__;
-  result__V3F=NULL;
-  ptr__W3F=((__POINTER )(NULL));
-  typ_id__13F= 0;
-  sz__Y3F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
-  if ((sz__Y3F ==  0)) {
-    result__V3F=FAST_ARRAYoSTRINGo__;
+    typ_id__5BNF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2BNF);
+    if ((typ_id__5BNF == (__INTEGER)(-  1))) {
+      a__THFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UHFH=(__UINTEGER_32)((__UINTEGER_32)(sz__2BNF + a__THFH) & (__UINTEGER_32)(~ a__THFH));
+      ptr_table__ZVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UHFH / ((__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__MRJ(new_size__UHFH);
+        next__YVIH=(void *)((unsigned long)result__0VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UHFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UHFH <<  1)) <=  4096)) {
+            next__YVIH=(void *)((unsigned long)result__0VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UHFH)));
+          } else {
+            next__YVIH=new_lab__MRJ(new_size__UHFH);
+          };
+          ((__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__0BNF=result__0VIH;
+    } else {
+      t__YHFH=((__UINTEGER_32 )typ_id__5BNF);
+      a__XHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2BNF + a__XHFH) & (__UINTEGER_32)(~ a__XHFH));
+      ptr_table__4VIH=((__POINTER )(&(table_type[(t__YHFH)])));
+      lab_type__AWIH=(__UINTEGER_32)(t__YHFH |  1);
+      next__3VIH=((__POINTER )(NULL));
+      result__5VIH=((__POINTER *)ptr_table__4VIH)[ 0];
+      if ((result__5VIH == (void *)NULL)) {
+        result__5VIH=new_lab__MRJ(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__PVH)))) &  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__MRJ(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__0BNF=result__5VIH;
+    };
+    result__ZBNF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__0BNF);
+    *(result__ZBNF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__ZFPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__ZBNF);
+  new_capacity__KSQF=prime_number_ceiling__X41( 53);
+  Self__ZFPF->buckets__HDPF=create__KDTF(new_capacity__KSQF);
+  Self__ZFPF->capacity__CDPF=new_capacity__KSQF;
+  Self__ZFPF->count__ZHPF= 0;
+  bucket__AILF=result__ZBNF;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__TDPF=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__5DPF=NULL;
+  ITM_ARGS__->parent_itm_argument__B5EE=(*ITM_ARGUMENT__);
+  ITM_ARGS__->name__N1OF=NULL;
+  ITM_ARGS__->type__O1OF=NULL;
+  ITM_EXTERNAL_TYPE__->is_persistant__MHN=FALSE__;
+  result__B4F=NULL;
+  ptr__C4F=((__POINTER )(NULL));
+  typ_id__H4F= 0;
+  sz__E4F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__E4F ==  0)) {
+    result__B4F=FAST_ARRAYoSTRINGo__;
   } else {
-    typ_id__13F=__FAST_ARRAYoSTRINGo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__Y3F);
-    if ((typ_id__13F == (__INTEGER)(-  1))) {
-      a__Z02G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OXG=(__UINTEGER_32)((__UINTEGER_32)(sz__Y3F + a__Z02G) & (__UINTEGER_32)(~ a__Z02G));
-      ptr_table__PJCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OXG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__OJCH=((__POINTER )(NULL));
-      result__QJCH=((__POINTER *)ptr_table__PJCH)[ 0];
-      if ((result__QJCH == (void *)NULL)) {
-        result__QJCH=new_lab__ARJ(new_size__OXG);
-        next__OJCH=(void *)((unsigned long)result__QJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OXG)));
-        ((__POINTER *)next__OJCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PJCH)[ 0]=next__OJCH;
-      } else {
-        next__OJCH=((__POINTER *)result__QJCH)[ 0];
-        if ((next__OJCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QJCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__OXG <<  1)) <=  4096)) {
-            next__OJCH=(void *)((unsigned long)result__QJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OXG)));
-          } else {
-            next__OJCH=new_lab__ARJ(new_size__OXG);
-          };
-          ((__POINTER *)next__OJCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PJCH)[ 0]=next__OJCH;
-        } else {
-          ((__POINTER *)result__QJCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OJCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QJCH=next__OJCH;
-        };
-      };
-      ptr__W3F=result__QJCH;
-    } else {
-      t__XYG=((__UINTEGER_32 )typ_id__13F);
-      a__502G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__XJCH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y3F + a__502G) & (__UINTEGER_32)(~ a__502G));
-      ptr_table__UJCH=((__POINTER )(&(table_type[(t__XYG)])));
-      lab_type__WJCH=(__UINTEGER_32)(t__XYG |  1);
-      next__TJCH=((__POINTER )(NULL));
-      result__VJCH=((__POINTER *)ptr_table__UJCH)[ 0];
-      if ((result__VJCH == (void *)NULL)) {
-        result__VJCH=new_lab__ARJ(lab_type__WJCH);
-        next__TJCH=(void *)((unsigned long)result__VJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJCH)));
-        ((__POINTER *)next__TJCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UJCH)[ 0]=next__TJCH;
-      } else {
-        next__TJCH=((__POINTER *)result__VJCH)[ 0];
-        if ((next__TJCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VJCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XJCH <<  1)) <=  4096)) {
-            next__TJCH=(void *)((unsigned long)result__VJCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJCH)));
-          } else {
-            next__TJCH=new_lab__ARJ(lab_type__WJCH);
-          };
-          ((__POINTER *)next__TJCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UJCH)[ 0]=next__TJCH;
-        } else {
-          ((__POINTER *)result__VJCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TJCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VJCH=next__TJCH;
-        };
-      };
-      ptr__W3F=result__VJCH;
-    };
-    result__V3F=((__FAST_ARRAYoSTRINGo *)ptr__W3F);
-    *(result__V3F) = *(FAST_ARRAYoSTRINGo__);
-  };
-  Self__XFT=((__FAST_ARRAYoSTRINGo *)result__V3F);
-  if ((Self__XFT->parent_arrayed_collection__XJC.capacity__AGT <  5)) {
-    Self__XFT->parent_arrayed_collection__XJC.storage__LGT=create__NFRB( 5);
-    Self__XFT->parent_arrayed_collection__XJC.capacity__AGT= 5;
-  };
-  Self__XFT->parent_arrayed_collection__XJC.upper__0JC=(__INTEGER)(-  1);
-  free__VNP=result__V3F;
-  type_void__SVF=get__XSI((&__string_3));
-  PROTOTYPE__->default_value__HUE=NULL;
-  PROTOTYPE__->type_c__CWE=NULL;
-  LIP_CODE__->parent_itm_object__TDE=(*ITM_OBJECT__);
-  LIP_UNARY__->parent_lip_code__504B=(*LIP_CODE__);
-  LIP_UNARY__->operator__A2QD='\0';
-  LIP_UNARY__->value__31QD=NULL;
-  LIP_CALL__->parent_lip_code__R14B=(*LIP_CODE__);
-  LIP_CALL__->name__YNTE=NULL;
-  LIP_CALL__->argument__NNTE=NULL;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__SBWE= 0;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__HDWE= 0;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__SDWE=NULL;
-  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__RWRE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
-  result__OSSE=NULL;
-  ptr__PSSE=((__POINTER )(NULL));
-  typ_id__USSE= 0;
-  sz__RSSE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
-  if ((sz__RSSE ==  0)) {
-    result__OSSE=FAST_ARRAYoLIP_INTEGERo__;
+    typ_id__H4F=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__E4F);
+    if ((typ_id__H4F == (__INTEGER)(-  1))) {
+      a__LHDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0XG=(__UINTEGER_32)((__UINTEGER_32)(sz__E4F + a__LHDH) & (__UINTEGER_32)(~ a__LHDH));
+      ptr_table__DWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0XG / ((__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__MRJ(new_size__0XG);
+        next__CWIH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XG)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0XG <<  1)) <=  4096)) {
+            next__CWIH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XG)));
+          } else {
+            next__CWIH=new_lab__MRJ(new_size__0XG);
+          };
+          ((__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;
+        };
+      };
+      ptr__C4F=result__EWIH;
+    } else {
+      t__DZG=((__UINTEGER_32 )typ_id__H4F);
+      a__RHDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__E4F + a__RHDH) & (__UINTEGER_32)(~ a__RHDH));
+      ptr_table__IWIH=((__POINTER )(&(table_type[(t__DZG)])));
+      lab_type__KWIH=(__UINTEGER_32)(t__DZG |  1);
+      next__HWIH=((__POINTER )(NULL));
+      result__JWIH=((__POINTER *)ptr_table__IWIH)[ 0];
+      if ((result__JWIH == (void *)NULL)) {
+        result__JWIH=new_lab__MRJ(lab_type__KWIH);
+        next__HWIH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LWIH)));
+        ((__POINTER *)next__HWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IWIH)[ 0]=next__HWIH;
+      } else {
+        next__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LWIH <<  1)) <=  4096)) {
+            next__HWIH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LWIH)));
+          } else {
+            next__HWIH=new_lab__MRJ(lab_type__KWIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__C4F=result__JWIH;
+    };
+    result__B4F=((__FAST_ARRAYoSTRINGo *)ptr__C4F);
+    *(result__B4F) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__DGT=((__FAST_ARRAYoSTRINGo *)result__B4F);
+  if ((Self__DGT->parent_arrayed_collection__DKC.capacity__MGT <  5)) {
+    Self__DGT->parent_arrayed_collection__DKC.storage__XGT=create__ZFRB( 5);
+    Self__DGT->parent_arrayed_collection__DKC.capacity__MGT= 5;
+  };
+  Self__DGT->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(-  1);
+  free__BOP=result__B4F;
+  type_void__4VF=get__DTI((&__string_3));
+  PROTOTYPE__->default_value__TUE=NULL;
+  PROTOTYPE__->type_c__OWE=NULL;
+  LIP_CODE__->parent_itm_object__5DE=(*ITM_OBJECT__);
+  LIP_UNARY__->parent_lip_code__L14B=(*LIP_CODE__);
+  LIP_UNARY__->operator__M2QD='\0';
+  LIP_UNARY__->value__J2QD=NULL;
+  LIP_CALL__->parent_lip_code__314B=(*LIP_CODE__);
+  LIP_CALL__->name__S1TE=NULL;
+  LIP_CALL__->argument__H1TE=NULL;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__4TWE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__LVWE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__WVWE=NULL;
+  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__ZFSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
+  result__UATE=NULL;
+  ptr__VATE=((__POINTER )(NULL));
+  typ_id__0ATE= 0;
+  sz__XATE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
+  if ((sz__XATE ==  0)) {
+    result__UATE=FAST_ARRAYoLIP_INTEGERo__;
   } else {
-    typ_id__USSE=__FAST_ARRAYoLIP_INTEGERo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__RSSE);
-    if ((typ_id__USSE == (__INTEGER)(-  1))) {
-      a__G24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__H24G=(__UINTEGER_32)((__UINTEGER_32)(sz__RSSE + a__G24G) & (__UINTEGER_32)(~ a__G24G));
-      ptr_table__ZJCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H24G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__YJCH=((__POINTER )(NULL));
-      result__0JCH=((__POINTER *)ptr_table__ZJCH)[ 0];
-      if ((result__0JCH == (void *)NULL)) {
-        result__0JCH=new_lab__ARJ(new_size__H24G);
-        next__YJCH=(void *)((unsigned long)result__0JCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H24G)));
-        ((__POINTER *)next__YJCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZJCH)[ 0]=next__YJCH;
-      } else {
-        next__YJCH=((__POINTER *)result__0JCH)[ 0];
-        if ((next__YJCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0JCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__H24G <<  1)) <=  4096)) {
-            next__YJCH=(void *)((unsigned long)result__0JCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H24G)));
-          } else {
-            next__YJCH=new_lab__ARJ(new_size__H24G);
-          };
-          ((__POINTER *)next__YJCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZJCH)[ 0]=next__YJCH;
-        } else {
-          ((__POINTER *)result__0JCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0JCH=next__YJCH;
-        };
-      };
-      ptr__PSSE=result__0JCH;
-    } else {
-      t__L24G=((__UINTEGER_32 )typ_id__USSE);
-      a__K24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__BKCH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSSE + a__K24G) & (__UINTEGER_32)(~ a__K24G));
-      ptr_table__4JCH=((__POINTER )(&(table_type[(t__L24G)])));
-      lab_type__AKCH=(__UINTEGER_32)(t__L24G |  1);
-      next__3JCH=((__POINTER )(NULL));
-      result__5JCH=((__POINTER *)ptr_table__4JCH)[ 0];
-      if ((result__5JCH == (void *)NULL)) {
-        result__5JCH=new_lab__ARJ(lab_type__AKCH);
-        next__3JCH=(void *)((unsigned long)result__5JCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKCH)));
-        ((__POINTER *)next__3JCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4JCH)[ 0]=next__3JCH;
-      } else {
-        next__3JCH=((__POINTER *)result__5JCH)[ 0];
-        if ((next__3JCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5JCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BKCH <<  1)) <=  4096)) {
-            next__3JCH=(void *)((unsigned long)result__5JCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKCH)));
-          } else {
-            next__3JCH=new_lab__ARJ(lab_type__AKCH);
-          };
-          ((__POINTER *)next__3JCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4JCH)[ 0]=next__3JCH;
-        } else {
-          ((__POINTER *)result__5JCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5JCH=next__3JCH;
-        };
-      };
-      ptr__PSSE=result__5JCH;
-    };
-    result__OSSE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__PSSE);
-    *(result__OSSE) = *(FAST_ARRAYoLIP_INTEGERo__);
-  };
-  Self__4CWE=((__FAST_ARRAYoLIP_INTEGERo *)result__OSSE);
-  if ((Self__4CWE->parent_arrayed_collection__RWRE.capacity__HDWE <  10)) {
-    Self__4CWE->parent_arrayed_collection__RWRE.storage__SDWE=create__4XEF( 10);
-    Self__4CWE->parent_arrayed_collection__RWRE.capacity__HDWE= 10;
-  };
-  Self__4CWE->parent_arrayed_collection__RWRE.upper__SBWE=(__INTEGER)(-  1);
-  storage__SWRE=result__OSSE;
-  LIP_INTEGER__->value__G31F= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__DSOF= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__4WOF= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__JXOF=NULL;
-  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__GIEF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
-  result__55KF=NULL;
-  ptr__AALF=((__POINTER )(NULL));
-  typ_id__FALF= 0;
-  sz__CALF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
-  if ((sz__CALF ==  0)) {
-    result__55KF=FAST_ARRAYoLIP_STRINGo__;
+    typ_id__0ATE=__FAST_ARRAYoLIP_INTEGERo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XATE);
+    if ((typ_id__0ATE == (__INTEGER)(-  1))) {
+      a__1HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2HFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XATE + a__1HFH) & (__UINTEGER_32)(~ a__1HFH));
+      ptr_table__NWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2HFH / ((__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__MRJ(new_size__2HFH);
+        next__MWIH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2HFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2HFH <<  1)) <=  4096)) {
+            next__MWIH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2HFH)));
+          } else {
+            next__MWIH=new_lab__MRJ(new_size__2HFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__VATE=result__OWIH;
+    } else {
+      t__AIFH=((__UINTEGER_32 )typ_id__0ATE);
+      a__5HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XATE + a__5HFH) & (__UINTEGER_32)(~ a__5HFH));
+      ptr_table__SWIH=((__POINTER )(&(table_type[(t__AIFH)])));
+      lab_type__UWIH=(__UINTEGER_32)(t__AIFH |  1);
+      next__RWIH=((__POINTER )(NULL));
+      result__TWIH=((__POINTER *)ptr_table__SWIH)[ 0];
+      if ((result__TWIH == (void *)NULL)) {
+        result__TWIH=new_lab__MRJ(lab_type__UWIH);
+        next__RWIH=(void *)((unsigned long)result__TWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VWIH)));
+        ((__POINTER *)next__RWIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SWIH)[ 0]=next__RWIH;
+      } else {
+        next__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VWIH <<  1)) <=  4096)) {
+            next__RWIH=(void *)((unsigned long)result__TWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VWIH)));
+          } else {
+            next__RWIH=new_lab__MRJ(lab_type__UWIH);
+          };
+          ((__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__VATE=result__TWIH;
+    };
+    result__UATE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__VATE);
+    *(result__UATE) = *(FAST_ARRAYoLIP_INTEGERo__);
+  };
+  Self__CVWE=((__FAST_ARRAYoLIP_INTEGERo *)result__UATE);
+  if ((Self__CVWE->parent_arrayed_collection__ZFSE.capacity__LVWE <  10)) {
+    Self__CVWE->parent_arrayed_collection__ZFSE.storage__WVWE=create__YMFF( 10);
+    Self__CVWE->parent_arrayed_collection__ZFSE.capacity__LVWE= 10;
+  };
+  Self__CVWE->parent_arrayed_collection__ZFSE.upper__4TWE=(__INTEGER)(-  1);
+  storage__0FSE=result__UATE;
+  LIP_INTEGER__->value__1X2F= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__NSOF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__UYOF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__5YOF=NULL;
+  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__W2EF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
+  result__UMLF=NULL;
+  ptr__VMLF=((__POINTER )(NULL));
+  typ_id__0MLF= 0;
+  sz__XMLF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
+  if ((sz__XMLF ==  0)) {
+    result__UMLF=FAST_ARRAYoLIP_STRINGo__;
   } else {
-    typ_id__FALF=__FAST_ARRAYoLIP_STRINGo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__CALF);
-    if ((typ_id__FALF == (__INTEGER)(-  1))) {
-      a__O24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__P24G=(__UINTEGER_32)((__UINTEGER_32)(sz__CALF + a__O24G) & (__UINTEGER_32)(~ a__O24G));
-      ptr_table__DKCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P24G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__CKCH=((__POINTER )(NULL));
-      result__EKCH=((__POINTER *)ptr_table__DKCH)[ 0];
-      if ((result__EKCH == (void *)NULL)) {
-        result__EKCH=new_lab__ARJ(new_size__P24G);
-        next__CKCH=(void *)((unsigned long)result__EKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P24G)));
-        ((__POINTER *)next__CKCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DKCH)[ 0]=next__CKCH;
-      } else {
-        next__CKCH=((__POINTER *)result__EKCH)[ 0];
-        if ((next__CKCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EKCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__P24G <<  1)) <=  4096)) {
-            next__CKCH=(void *)((unsigned long)result__EKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P24G)));
-          } else {
-            next__CKCH=new_lab__ARJ(new_size__P24G);
-          };
-          ((__POINTER *)next__CKCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DKCH)[ 0]=next__CKCH;
-        } else {
-          ((__POINTER *)result__EKCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CKCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EKCH=next__CKCH;
-        };
-      };
-      ptr__AALF=result__EKCH;
-    } else {
-      t__T24G=((__UINTEGER_32 )typ_id__FALF);
-      a__S24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LKCH=(__UINTEGER_32)((__UINTEGER_32)(sz__CALF + a__S24G) & (__UINTEGER_32)(~ a__S24G));
-      ptr_table__IKCH=((__POINTER )(&(table_type[(t__T24G)])));
-      lab_type__KKCH=(__UINTEGER_32)(t__T24G |  1);
-      next__HKCH=((__POINTER )(NULL));
-      result__JKCH=((__POINTER *)ptr_table__IKCH)[ 0];
-      if ((result__JKCH == (void *)NULL)) {
-        result__JKCH=new_lab__ARJ(lab_type__KKCH);
-        next__HKCH=(void *)((unsigned long)result__JKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LKCH)));
-        ((__POINTER *)next__HKCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IKCH)[ 0]=next__HKCH;
-      } else {
-        next__HKCH=((__POINTER *)result__JKCH)[ 0];
-        if ((next__HKCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JKCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LKCH <<  1)) <=  4096)) {
-            next__HKCH=(void *)((unsigned long)result__JKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LKCH)));
-          } else {
-            next__HKCH=new_lab__ARJ(lab_type__KKCH);
-          };
-          ((__POINTER *)next__HKCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IKCH)[ 0]=next__HKCH;
-        } else {
-          ((__POINTER *)result__JKCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HKCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JKCH=next__HKCH;
-        };
-      };
-      ptr__AALF=result__JKCH;
-    };
-    result__55KF=((__FAST_ARRAYoLIP_STRINGo *)ptr__AALF);
-    *(result__55KF) = *(FAST_ARRAYoLIP_STRINGo__);
-  };
-  Self__VWOF=((__FAST_ARRAYoLIP_STRINGo *)result__55KF);
-  if ((Self__VWOF->parent_arrayed_collection__GIEF.capacity__4WOF <  10)) {
-    Self__VWOF->parent_arrayed_collection__GIEF.storage__JXOF=create__RNWF( 10);
-    Self__VWOF->parent_arrayed_collection__GIEF.capacity__4WOF= 10;
-  };
-  Self__VWOF->parent_arrayed_collection__GIEF.upper__DSOF=(__INTEGER)(-  1);
-  storage__HIEF=result__55KF;
-  LIP_STRING__->value__FPTE=NULL;
-  LIP_BOOLEAN__->value__DDQD=FALSE__;
-  result__LRMF=NULL;
-  ptr__MRMF=((__POINTER )(NULL));
-  typ_id__RRMF= 0;
-  sz__ORMF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
-  if ((sz__ORMF ==  0)) {
-    result__LRMF=LIP_BOOLEAN__;
+    typ_id__0MLF=__FAST_ARRAYoLIP_STRINGo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XMLF);
+    if ((typ_id__0MLF == (__INTEGER)(-  1))) {
+      a__DIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMLF + a__DIFH) & (__UINTEGER_32)(~ a__DIFH));
+      ptr_table__XWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WWIH=((__POINTER )(NULL));
+      result__YWIH=((__POINTER *)ptr_table__XWIH)[ 0];
+      if ((result__YWIH == (void *)NULL)) {
+        result__YWIH=new_lab__MRJ(new_size__EIFH);
+        next__WWIH=(void *)((unsigned long)result__YWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EIFH <<  1)) <=  4096)) {
+            next__WWIH=(void *)((unsigned long)result__YWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIFH)));
+          } else {
+            next__WWIH=new_lab__MRJ(new_size__EIFH);
+          };
+          ((__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__VMLF=result__YWIH;
+    } else {
+      t__IIFH=((__UINTEGER_32 )typ_id__0MLF);
+      a__HIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5WIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMLF + a__HIFH) & (__UINTEGER_32)(~ a__HIFH));
+      ptr_table__2WIH=((__POINTER )(&(table_type[(t__IIFH)])));
+      lab_type__4WIH=(__UINTEGER_32)(t__IIFH |  1);
+      next__1WIH=((__POINTER )(NULL));
+      result__3WIH=((__POINTER *)ptr_table__2WIH)[ 0];
+      if ((result__3WIH == (void *)NULL)) {
+        result__3WIH=new_lab__MRJ(lab_type__4WIH);
+        next__1WIH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5WIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5WIH <<  1)) <=  4096)) {
+            next__1WIH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5WIH)));
+          } else {
+            next__1WIH=new_lab__MRJ(lab_type__4WIH);
+          };
+          ((__POINTER *)next__1WIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2WIH)[ 0]=next__1WIH;
+        } else {
+          ((__POINTER *)result__3WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1WIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3WIH=next__1WIH;
+        };
+      };
+      ptr__VMLF=result__3WIH;
+    };
+    result__UMLF=((__FAST_ARRAYoLIP_STRINGo *)ptr__VMLF);
+    *(result__UMLF) = *(FAST_ARRAYoLIP_STRINGo__);
+  };
+  Self__LYOF=((__FAST_ARRAYoLIP_STRINGo *)result__UMLF);
+  if ((Self__LYOF->parent_arrayed_collection__W2EF.capacity__UYOF <  10)) {
+    Self__LYOF->parent_arrayed_collection__W2EF.storage__5YOF=create__CFXF( 10);
+    Self__LYOF->parent_arrayed_collection__W2EF.capacity__UYOF= 10;
+  };
+  Self__LYOF->parent_arrayed_collection__W2EF.upper__NSOF=(__INTEGER)(-  1);
+  storage__X2EF=result__UMLF;
+  LIP_STRING__->value__52TE=NULL;
+  LIP_BOOLEAN__->value__PDQD=FALSE__;
+  result__0XMF=NULL;
+  ptr__1XMF=((__POINTER )(NULL));
+  typ_id__AYMF= 0;
+  sz__3XMF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
+  if ((sz__3XMF ==  0)) {
+    result__0XMF=LIP_BOOLEAN__;
   } else {
-    typ_id__RRMF=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ORMF);
-    if ((typ_id__RRMF == (__INTEGER)(-  1))) {
-      a__W24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__X24G=(__UINTEGER_32)((__UINTEGER_32)(sz__ORMF + a__W24G) & (__UINTEGER_32)(~ a__W24G));
-      ptr_table__NKCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X24G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__MKCH=((__POINTER )(NULL));
-      result__OKCH=((__POINTER *)ptr_table__NKCH)[ 0];
-      if ((result__OKCH == (void *)NULL)) {
-        result__OKCH=new_lab__ARJ(new_size__X24G);
-        next__MKCH=(void *)((unsigned long)result__OKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X24G)));
-        ((__POINTER *)next__MKCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NKCH)[ 0]=next__MKCH;
-      } else {
-        next__MKCH=((__POINTER *)result__OKCH)[ 0];
-        if ((next__MKCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OKCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__X24G <<  1)) <=  4096)) {
-            next__MKCH=(void *)((unsigned long)result__OKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X24G)));
-          } else {
-            next__MKCH=new_lab__ARJ(new_size__X24G);
-          };
-          ((__POINTER *)next__MKCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NKCH)[ 0]=next__MKCH;
-        } else {
-          ((__POINTER *)result__OKCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MKCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OKCH=next__MKCH;
-        };
-      };
-      ptr__MRMF=result__OKCH;
-    } else {
-      t__124G=((__UINTEGER_32 )typ_id__RRMF);
-      a__024G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__VKCH=(__UINTEGER_32)((__UINTEGER_32)(sz__ORMF + a__024G) & (__UINTEGER_32)(~ a__024G));
-      ptr_table__SKCH=((__POINTER )(&(table_type[(t__124G)])));
-      lab_type__UKCH=(__UINTEGER_32)(t__124G |  1);
-      next__RKCH=((__POINTER )(NULL));
-      result__TKCH=((__POINTER *)ptr_table__SKCH)[ 0];
-      if ((result__TKCH == (void *)NULL)) {
-        result__TKCH=new_lab__ARJ(lab_type__UKCH);
-        next__RKCH=(void *)((unsigned long)result__TKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKCH)));
-        ((__POINTER *)next__RKCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SKCH)[ 0]=next__RKCH;
-      } else {
-        next__RKCH=((__POINTER *)result__TKCH)[ 0];
-        if ((next__RKCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TKCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VKCH <<  1)) <=  4096)) {
-            next__RKCH=(void *)((unsigned long)result__TKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKCH)));
-          } else {
-            next__RKCH=new_lab__ARJ(lab_type__UKCH);
-          };
-          ((__POINTER *)next__RKCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SKCH)[ 0]=next__RKCH;
-        } else {
-          ((__POINTER *)result__TKCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RKCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TKCH=next__RKCH;
-        };
-      };
-      ptr__MRMF=result__TKCH;
-    };
-    result__LRMF=((__LIP_BOOLEAN *)ptr__MRMF);
-    *(result__LRMF) = *(LIP_BOOLEAN__);
-  };
-  ((__LIP_BOOLEAN *)result__LRMF)->value__DDQD=TRUE__;
-  true__VDKF=result__LRMF;
-  LIP_VALUE__->parent_lip_code__RWEE=(*LIP_CODE__);
-  LIP_VALUE__->value__XXTE=NULL;
-  LIP_BINARY__->parent_lip_code__QPZB=(*LIP_CODE__);
-  LIP_BINARY__->left__AZQD=NULL;
-  LIP_BINARY__->right__DZQD=NULL;
-  LIP_BINARY__->operator__GZQD='\0';
-  LIP_AFFECT__->parent_lip_code__3TPB=(*LIP_CODE__);
-  LIP_AFFECT__->name__KGFC=NULL;
-  LIP_AFFECT__->value__2GFC=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__WNTD= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__X5TD= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__TAUD=NULL;
-  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__ZJID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
-  ARRAYED_COLLECTIONoLIP_CODEo__->upper__QDQD= 0;
-  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__CPTD= 0;
-  ARRAYED_COLLECTIONoLIP_CODEo__->storage__NPTD=NULL;
-  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__BLYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
-  result__NUMD=NULL;
-  ptr__OUMD=((__POINTER )(NULL));
-  typ_id__TUMD= 0;
-  sz__QUMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
-  if ((sz__QUMD ==  0)) {
-    result__NUMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    typ_id__AYMF=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__3XMF);
+    if ((typ_id__AYMF == (__INTEGER)(-  1))) {
+      a__LIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__3XMF + a__LIFH) & (__UINTEGER_32)(~ a__LIFH));
+      ptr_table__BXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MIFH / ((__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__MRJ(new_size__MIFH);
+        next__AXIH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MIFH <<  1)) <=  4096)) {
+            next__AXIH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIFH)));
+          } else {
+            next__AXIH=new_lab__MRJ(new_size__MIFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__1XMF=result__CXIH;
+    } else {
+      t__QIFH=((__UINTEGER_32 )typ_id__AYMF);
+      a__PIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3XMF + a__PIFH) & (__UINTEGER_32)(~ a__PIFH));
+      ptr_table__GXIH=((__POINTER )(&(table_type[(t__QIFH)])));
+      lab_type__IXIH=(__UINTEGER_32)(t__QIFH |  1);
+      next__FXIH=((__POINTER )(NULL));
+      result__HXIH=((__POINTER *)ptr_table__GXIH)[ 0];
+      if ((result__HXIH == (void *)NULL)) {
+        result__HXIH=new_lab__MRJ(lab_type__IXIH);
+        next__FXIH=(void *)((unsigned long)result__HXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JXIH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JXIH <<  1)) <=  4096)) {
+            next__FXIH=(void *)((unsigned long)result__HXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JXIH)));
+          } else {
+            next__FXIH=new_lab__MRJ(lab_type__IXIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__1XMF=result__HXIH;
+    };
+    result__0XMF=((__LIP_BOOLEAN *)ptr__1XMF);
+    *(result__0XMF) = *(LIP_BOOLEAN__);
+  };
+  ((__LIP_BOOLEAN *)result__0XMF)->value__PDQD=TRUE__;
+  true__5TKF=result__0XMF;
+  LIP_VALUE__->parent_lip_code__0DFE=(*LIP_CODE__);
+  LIP_VALUE__->value__RFUE=NULL;
+  LIP_BINARY__->parent_lip_code__2PZB=(*LIP_CODE__);
+  LIP_BINARY__->left__MZQD=NULL;
+  LIP_BINARY__->right__PZQD=NULL;
+  LIP_BINARY__->operator__SZQD='\0';
+  LIP_AFFECT__->parent_lip_code__JUPB=(*LIP_CODE__);
+  LIP_AFFECT__->name__WGFC=NULL;
+  LIP_AFFECT__->value__IHFC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__POTD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__QAUD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__MBUD=NULL;
+  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__FKID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
+  ARRAYED_COLLECTIONoLIP_CODEo__->upper__2DQD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__1PTD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->storage__GQTD=NULL;
+  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__NLYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
+  result__ZUMD=NULL;
+  ptr__0UMD=((__POINTER )(NULL));
+  typ_id__5UMD= 0;
+  sz__2UMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
+  if ((sz__2UMD ==  0)) {
+    result__ZUMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
   } else {
-    typ_id__TUMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__QUMD);
-    if ((typ_id__TUMD == (__INTEGER)(-  1))) {
-      a__424G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__524G=(__UINTEGER_32)((__UINTEGER_32)(sz__QUMD + a__424G) & (__UINTEGER_32)(~ a__424G));
-      ptr_table__XKCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__524G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__WKCH=((__POINTER )(NULL));
-      result__YKCH=((__POINTER *)ptr_table__XKCH)[ 0];
-      if ((result__YKCH == (void *)NULL)) {
-        result__YKCH=new_lab__ARJ(new_size__524G);
-        next__WKCH=(void *)((unsigned long)result__YKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__524G)));
-        ((__POINTER *)next__WKCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XKCH)[ 0]=next__WKCH;
-      } else {
-        next__WKCH=((__POINTER *)result__YKCH)[ 0];
-        if ((next__WKCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YKCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__524G <<  1)) <=  4096)) {
-            next__WKCH=(void *)((unsigned long)result__YKCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__524G)));
-          } else {
-            next__WKCH=new_lab__ARJ(new_size__524G);
-          };
-          ((__POINTER *)next__WKCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XKCH)[ 0]=next__WKCH;
-        } else {
-          ((__POINTER *)result__YKCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WKCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YKCH=next__WKCH;
-        };
-      };
-      ptr__OUMD=result__YKCH;
-    } else {
-      t__D34G=((__UINTEGER_32 )typ_id__TUMD);
-      a__C34G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__5KCH=(__UINTEGER_32)((__UINTEGER_32)(sz__QUMD + a__C34G) & (__UINTEGER_32)(~ a__C34G));
-      ptr_table__2KCH=((__POINTER )(&(table_type[(t__D34G)])));
-      lab_type__4KCH=(__UINTEGER_32)(t__D34G |  1);
-      next__1KCH=((__POINTER )(NULL));
-      result__3KCH=((__POINTER *)ptr_table__2KCH)[ 0];
-      if ((result__3KCH == (void *)NULL)) {
-        result__3KCH=new_lab__ARJ(lab_type__4KCH);
-        next__1KCH=(void *)((unsigned long)result__3KCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KCH)));
-        ((__POINTER *)next__1KCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2KCH)[ 0]=next__1KCH;
-      } else {
-        next__1KCH=((__POINTER *)result__3KCH)[ 0];
-        if ((next__1KCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3KCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5KCH <<  1)) <=  4096)) {
-            next__1KCH=(void *)((unsigned long)result__3KCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KCH)));
-          } else {
-            next__1KCH=new_lab__ARJ(lab_type__4KCH);
-          };
-          ((__POINTER *)next__1KCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2KCH)[ 0]=next__1KCH;
-        } else {
-          ((__POINTER *)result__3KCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1KCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3KCH=next__1KCH;
-        };
-      };
-      ptr__OUMD=result__3KCH;
-    };
-    result__NUMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__OUMD);
-    *(result__NUMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
-  };
-  Self__REUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__NUMD);
-  if ((Self__REUD->parent_arrayed_collection__ZJID.capacity__X5TD <  5)) {
-    Self__REUD->parent_arrayed_collection__ZJID.storage__TAUD=create__5KIE( 5);
-    Self__REUD->parent_arrayed_collection__ZJID.capacity__X5TD= 5;
-  };
-  Self__REUD->parent_arrayed_collection__ZJID.upper__WNTD=(__INTEGER)(-  1);
-  free_list__0JID=result__NUMD;
-  LIP_IF__->parent_lip_code__SOYC=(*LIP_CODE__);
-  LIP_IF__->condition__UCQD=NULL;
-  LIP_IF__->then__KDQD=NULL;
-  LIP_IF__->else__BEQD=NULL;
-  LIP_PRINT__->parent_lip_code__EPYC=(*LIP_CODE__);
-  LIP_PRINT__->message__2RTE=NULL;
-  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__WURD=NULL;
-  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__RURD= 0;
-  result__4UED=NULL;
-  ptr__5UED=((__POINTER )(NULL));
-  typ_id__EVED= 0;
-  sz__BVED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
-  if ((sz__BVED ==  0)) {
-    result__4UED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    typ_id__5UMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2UMD);
+    if ((typ_id__5UMD == (__INTEGER)(-  1))) {
+      a__TIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__2UMD + a__TIFH) & (__UINTEGER_32)(~ a__TIFH));
+      ptr_table__LXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UIFH / ((__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__MRJ(new_size__UIFH);
+        next__KXIH=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UIFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UIFH <<  1)) <=  4096)) {
+            next__KXIH=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UIFH)));
+          } else {
+            next__KXIH=new_lab__MRJ(new_size__UIFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__0UMD=result__MXIH;
+    } else {
+      t__YIFH=((__UINTEGER_32 )typ_id__5UMD);
+      a__XIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2UMD + a__XIFH) & (__UINTEGER_32)(~ a__XIFH));
+      ptr_table__QXIH=((__POINTER )(&(table_type[(t__YIFH)])));
+      lab_type__SXIH=(__UINTEGER_32)(t__YIFH |  1);
+      next__PXIH=((__POINTER )(NULL));
+      result__RXIH=((__POINTER *)ptr_table__QXIH)[ 0];
+      if ((result__RXIH == (void *)NULL)) {
+        result__RXIH=new_lab__MRJ(lab_type__SXIH);
+        next__PXIH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TXIH)));
+        ((__POINTER *)next__PXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QXIH)[ 0]=next__PXIH;
+      } else {
+        next__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TXIH <<  1)) <=  4096)) {
+            next__PXIH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TXIH)));
+          } else {
+            next__PXIH=new_lab__MRJ(lab_type__SXIH);
+          };
+          ((__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;
+        };
+      };
+      ptr__0UMD=result__RXIH;
+    };
+    result__ZUMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__0UMD);
+    *(result__ZUMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
+  };
+  Self__KFUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__ZUMD);
+  if ((Self__KFUD->parent_arrayed_collection__FKID.capacity__QAUD <  5)) {
+    Self__KFUD->parent_arrayed_collection__FKID.storage__MBUD=create__I0IE( 5);
+    Self__KFUD->parent_arrayed_collection__FKID.capacity__QAUD= 5;
+  };
+  Self__KFUD->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(-  1);
+  free_list__GKID=result__ZUMD;
+  LIP_IF__->parent_lip_code__4OYC=(*LIP_CODE__);
+  LIP_IF__->condition__ADQD=NULL;
+  LIP_IF__->then__WDQD=NULL;
+  LIP_IF__->else__NEQD=NULL;
+  LIP_PRINT__->parent_lip_code__QPYC=(*LIP_CODE__);
+  LIP_PRINT__->message__W5TE=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__CVRD=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__3URD= 0;
+  result__KVED=NULL;
+  ptr__LVED=((__POINTER )(NULL));
+  typ_id__QVED= 0;
+  sz__NVED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
+  if ((sz__NVED ==  0)) {
+    result__KVED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
   } else {
-    typ_id__EVED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BVED);
-    if ((typ_id__EVED == (__INTEGER)(-  1))) {
-      a__G34G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__H34G=(__UINTEGER_32)((__UINTEGER_32)(sz__BVED + a__G34G) & (__UINTEGER_32)(~ a__G34G));
-      ptr_table__BLCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H34G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ALCH=((__POINTER )(NULL));
-      result__CLCH=((__POINTER *)ptr_table__BLCH)[ 0];
-      if ((result__CLCH == (void *)NULL)) {
-        result__CLCH=new_lab__ARJ(new_size__H34G);
-        next__ALCH=(void *)((unsigned long)result__CLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H34G)));
-        ((__POINTER *)next__ALCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BLCH)[ 0]=next__ALCH;
-      } else {
-        next__ALCH=((__POINTER *)result__CLCH)[ 0];
-        if ((next__ALCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CLCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__H34G <<  1)) <=  4096)) {
-            next__ALCH=(void *)((unsigned long)result__CLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H34G)));
-          } else {
-            next__ALCH=new_lab__ARJ(new_size__H34G);
-          };
-          ((__POINTER *)next__ALCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BLCH)[ 0]=next__ALCH;
-        } else {
-          ((__POINTER *)result__CLCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ALCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CLCH=next__ALCH;
-        };
-      };
-      ptr__5UED=result__CLCH;
-    } else {
-      t__L34G=((__UINTEGER_32 )typ_id__EVED);
-      a__K34G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__JLCH=(__UINTEGER_32)((__UINTEGER_32)(sz__BVED + a__K34G) & (__UINTEGER_32)(~ a__K34G));
-      ptr_table__GLCH=((__POINTER )(&(table_type[(t__L34G)])));
-      lab_type__ILCH=(__UINTEGER_32)(t__L34G |  1);
-      next__FLCH=((__POINTER )(NULL));
-      result__HLCH=((__POINTER *)ptr_table__GLCH)[ 0];
-      if ((result__HLCH == (void *)NULL)) {
-        result__HLCH=new_lab__ARJ(lab_type__ILCH);
-        next__FLCH=(void *)((unsigned long)result__HLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLCH)));
-        ((__POINTER *)next__FLCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GLCH)[ 0]=next__FLCH;
-      } else {
-        next__FLCH=((__POINTER *)result__HLCH)[ 0];
-        if ((next__FLCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HLCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JLCH <<  1)) <=  4096)) {
-            next__FLCH=(void *)((unsigned long)result__HLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLCH)));
-          } else {
-            next__FLCH=new_lab__ARJ(lab_type__ILCH);
-          };
-          ((__POINTER *)next__FLCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GLCH)[ 0]=next__FLCH;
-        } else {
-          ((__POINTER *)result__HLCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FLCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HLCH=next__FLCH;
-        };
-      };
-      ptr__5UED=result__HLCH;
-    };
-    result__4UED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__5UED);
-    *(result__4UED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
-  };
-  Self__GLSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__4UED);
-  new_capacity__05WD=prime_number_ceiling__L41( 193);
-  sz__IW2G=((__UINTEGER_32 )(__INTEGER)(new_capacity__05WD * ((__INTEGER )(sizeof(void *)))));
-  result__HW2G=((__POINTER )(NULL));
-  a__NW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__JW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__IW2G + a__NW2G) & (__UINTEGER_32)(~ a__NW2G));
-  new_size2__KW2G=(__UINTEGER_32)(new_size__JW2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__KW2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__O34G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__P34G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KW2G + a__O34G) & (__UINTEGER_32)(~ a__O34G));
-    ptr_table__LLCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P34G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__KLCH=((__POINTER )(NULL));
-    result__MLCH=((__POINTER *)ptr_table__LLCH)[ 0];
-    if ((result__MLCH == (void *)NULL)) {
-      result__MLCH=new_lab__ARJ(new_size__P34G);
-      next__KLCH=(void *)((unsigned long)result__MLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P34G)));
-      ((__POINTER *)next__KLCH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__LLCH)[ 0]=next__KLCH;
-    } else {
-      next__KLCH=((__POINTER *)result__MLCH)[ 0];
-      if ((next__KLCH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MLCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__P34G <<  1)) <=  4096)) {
-          next__KLCH=(void *)((unsigned long)result__MLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P34G)));
-        } else {
-          next__KLCH=new_lab__ARJ(new_size__P34G);
-        };
-        ((__POINTER *)next__KLCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LLCH)[ 0]=next__KLCH;
-      } else {
-        ((__POINTER *)result__MLCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KLCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__MLCH=next__KLCH;
-      };
-    };
-    ((__POINTER *)result__MLCH)[ 0]=((__POINTER ) 3);
-    result__HW2G=(void *)((unsigned long)result__MLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    typ_id__QVED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NVED);
+    if ((typ_id__QVED == (__INTEGER)(-  1))) {
+      a__1IFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2IFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NVED + a__1IFH) & (__UINTEGER_32)(~ a__1IFH));
+      ptr_table__VXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2IFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UXIH=((__POINTER )(NULL));
+      result__WXIH=((__POINTER *)ptr_table__VXIH)[ 0];
+      if ((result__WXIH == (void *)NULL)) {
+        result__WXIH=new_lab__MRJ(new_size__2IFH);
+        next__UXIH=(void *)((unsigned long)result__WXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2IFH)));
+        ((__POINTER *)next__UXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VXIH)[ 0]=next__UXIH;
+      } else {
+        next__UXIH=((__POINTER *)result__WXIH)[ 0];
+        if ((next__UXIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WXIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2IFH <<  1)) <=  4096)) {
+            next__UXIH=(void *)((unsigned long)result__WXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2IFH)));
+          } else {
+            next__UXIH=new_lab__MRJ(new_size__2IFH);
+          };
+          ((__POINTER *)next__UXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VXIH)[ 0]=next__UXIH;
+        } else {
+          ((__POINTER *)result__WXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WXIH=next__UXIH;
+        };
+      };
+      ptr__LVED=result__WXIH;
+    } else {
+      t__AJFH=((__UINTEGER_32 )typ_id__QVED);
+      a__5IFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3XIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NVED + a__5IFH) & (__UINTEGER_32)(~ a__5IFH));
+      ptr_table__0XIH=((__POINTER )(&(table_type[(t__AJFH)])));
+      lab_type__2XIH=(__UINTEGER_32)(t__AJFH |  1);
+      next__ZXIH=((__POINTER )(NULL));
+      result__1XIH=((__POINTER *)ptr_table__0XIH)[ 0];
+      if ((result__1XIH == (void *)NULL)) {
+        result__1XIH=new_lab__MRJ(lab_type__2XIH);
+        next__ZXIH=(void *)((unsigned long)result__1XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3XIH)));
+        ((__POINTER *)next__ZXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0XIH)[ 0]=next__ZXIH;
+      } else {
+        next__ZXIH=((__POINTER *)result__1XIH)[ 0];
+        if ((next__ZXIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1XIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3XIH <<  1)) <=  4096)) {
+            next__ZXIH=(void *)((unsigned long)result__1XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3XIH)));
+          } else {
+            next__ZXIH=new_lab__MRJ(lab_type__2XIH);
+          };
+          ((__POINTER *)next__ZXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0XIH)[ 0]=next__ZXIH;
+        } else {
+          ((__POINTER *)result__1XIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1XIH=next__ZXIH;
+        };
+      };
+      ptr__LVED=result__1XIH;
+    };
+    result__KVED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__LVED);
+    *(result__KVED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
+  };
+  Self__SLSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__KVED);
+  new_capacity__TAXD=prime_number_ceiling__X41( 193);
+  sz__GBDH=((__UINTEGER_32 )(__INTEGER)(new_capacity__TAXD * ((__INTEGER )(sizeof(void *)))));
+  result__FBDH=((__POINTER )(NULL));
+  a__LBDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HBDH=(__UINTEGER_32)((__UINTEGER_32)(sz__GBDH + a__LBDH) & (__UINTEGER_32)(~ a__LBDH));
+  new_size2__IBDH=(__UINTEGER_32)(new_size__HBDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__IBDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__DJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__EJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IBDH + a__DJFH) & (__UINTEGER_32)(~ a__DJFH));
+    ptr_table__5XIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__4XIH=((__POINTER )(NULL));
+    result__AYIH=((__POINTER *)ptr_table__5XIH)[ 0];
+    if ((result__AYIH == (void *)NULL)) {
+      result__AYIH=new_lab__MRJ(new_size__EJFH);
+      next__4XIH=(void *)((unsigned long)result__AYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJFH)));
+      ((__POINTER *)next__4XIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__5XIH)[ 0]=next__4XIH;
+    } else {
+      next__4XIH=((__POINTER *)result__AYIH)[ 0];
+      if ((next__4XIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EJFH <<  1)) <=  4096)) {
+          next__4XIH=(void *)((unsigned long)result__AYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJFH)));
+        } else {
+          next__4XIH=new_lab__MRJ(new_size__EJFH);
+        };
+        ((__POINTER *)next__4XIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5XIH)[ 0]=next__4XIH;
+      } else {
+        ((__POINTER *)result__AYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4XIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__AYIH=next__4XIH;
+      };
+    };
+    ((__POINTER *)result__AYIH)[ 0]=((__POINTER ) 3);
+    result__FBDH=(void *)((unsigned long)result__AYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__PLCH=first_free__LDVB;
-    while ((((void *)result__PLCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PLCH)->map_size_and_id__2SB &  4294967292LU) < new_size__JW2G))) {
-      result__PLCH=((__MEMORY *)result__PLCH)->map_next_free__3SB;
-    };
-    if (((void *)result__PLCH == (void *)NULL)) {
-      result__PLCH=new_page__CA5();
-    };
-    to_busy__index__HTFC(result__PLCH,new_size__JW2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PLCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__HW2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PLCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-  };
-  Result__KEHE=((void **)result__HW2G);
-  Self__2EXE=(__INTEGER)(new_capacity__05WD -  1);
-  while ((Self__2EXE >=  0)) {
-    Result__KEHE[Self__2EXE]=NULL;
-    Self__2EXE=(__INTEGER)(Self__2EXE -  1);
-  };
-  Self__GLSD->buckets__WURD=Result__KEHE;
-  Self__GLSD->capacity__RURD=new_capacity__05WD;
-  list_data__CONC=result__4UED;
-  push_back_flag__2FLF=FALSE__;
-  memory__LPKF='\0';
-  last_integer__PVTE= 0;
-  last_string__BWTE=create__EBB( 1024);
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__AZOF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__V3OF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__A4OF=NULL;
-  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__WWTE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
-  result__DKMF=NULL;
-  ptr__EKMF=((__POINTER )(NULL));
-  typ_id__JKMF= 0;
-  sz__GKMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
-  if ((sz__GKMF ==  0)) {
-    result__DKMF=FAST_ARRAYoLIP_SLOT_DATAo__;
+    result__DYIH=first_free__XDVB;
+    while ((((void *)result__DYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DYIH)->map_size_and_id__ITB &  4294967292LU) < new_size__HBDH))) {
+      result__DYIH=((__MEMORY *)result__DYIH)->map_next_free__JTB;
+    };
+    if (((void *)result__DYIH == (void *)NULL)) {
+      result__DYIH=new_page__OA5();
+    };
+    to_busy__index__TTFC(result__DYIH,new_size__HBDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DYIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__FBDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__TRHE=((void **)result__FBDH);
+  Self__5XXE=(__INTEGER)(new_capacity__TAXD -  1);
+  while ((Self__5XXE >=  0)) {
+    Result__TRHE[Self__5XXE]=NULL;
+    Self__5XXE=(__INTEGER)(Self__5XXE -  1);
+  };
+  Self__SLSD->buckets__CVRD=Result__TRHE;
+  Self__SLSD->capacity__3URD=new_capacity__TAXD;
+  list_data__OONC=result__KVED;
+  push_back_flag__NTLF=FALSE__;
+  memory__0ALF='\0';
+  last_integer__JDUE= 0;
+  last_string__1DUE=create__NBB( 1024);
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__W0OF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__3APF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__IBPF=NULL;
+  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__QEUE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
+  result__WSMF=NULL;
+  ptr__XSMF=((__POINTER )(NULL));
+  typ_id__2SMF= 0;
+  sz__ZSMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
+  if ((sz__ZSMF ==  0)) {
+    result__WSMF=FAST_ARRAYoLIP_SLOT_DATAo__;
   } else {
-    typ_id__JKMF=__FAST_ARRAYoLIP_SLOT_DATAo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__GKMF);
-    if ((typ_id__JKMF == (__INTEGER)(-  1))) {
-      a__V34G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__W34G=(__UINTEGER_32)((__UINTEGER_32)(sz__GKMF + a__V34G) & (__UINTEGER_32)(~ a__V34G));
-      ptr_table__TLCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W34G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__SLCH=((__POINTER )(NULL));
-      result__ULCH=((__POINTER *)ptr_table__TLCH)[ 0];
-      if ((result__ULCH == (void *)NULL)) {
-        result__ULCH=new_lab__ARJ(new_size__W34G);
-        next__SLCH=(void *)((unsigned long)result__ULCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W34G)));
-        ((__POINTER *)next__SLCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TLCH)[ 0]=next__SLCH;
-      } else {
-        next__SLCH=((__POINTER *)result__ULCH)[ 0];
-        if ((next__SLCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ULCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__W34G <<  1)) <=  4096)) {
-            next__SLCH=(void *)((unsigned long)result__ULCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W34G)));
-          } else {
-            next__SLCH=new_lab__ARJ(new_size__W34G);
-          };
-          ((__POINTER *)next__SLCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TLCH)[ 0]=next__SLCH;
-        } else {
-          ((__POINTER *)result__ULCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SLCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ULCH=next__SLCH;
-        };
-      };
-      ptr__EKMF=result__ULCH;
-    } else {
-      t__034G=((__UINTEGER_32 )typ_id__JKMF);
-      a__Z34G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1LCH=(__UINTEGER_32)((__UINTEGER_32)(sz__GKMF + a__Z34G) & (__UINTEGER_32)(~ a__Z34G));
-      ptr_table__YLCH=((__POINTER )(&(table_type[(t__034G)])));
-      lab_type__0LCH=(__UINTEGER_32)(t__034G |  1);
-      next__XLCH=((__POINTER )(NULL));
-      result__ZLCH=((__POINTER *)ptr_table__YLCH)[ 0];
-      if ((result__ZLCH == (void *)NULL)) {
-        result__ZLCH=new_lab__ARJ(lab_type__0LCH);
-        next__XLCH=(void *)((unsigned long)result__ZLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LCH)));
-        ((__POINTER *)next__XLCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YLCH)[ 0]=next__XLCH;
-      } else {
-        next__XLCH=((__POINTER *)result__ZLCH)[ 0];
-        if ((next__XLCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZLCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1LCH <<  1)) <=  4096)) {
-            next__XLCH=(void *)((unsigned long)result__ZLCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LCH)));
-          } else {
-            next__XLCH=new_lab__ARJ(lab_type__0LCH);
-          };
-          ((__POINTER *)next__XLCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YLCH)[ 0]=next__XLCH;
-        } else {
-          ((__POINTER *)result__ZLCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XLCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZLCH=next__XLCH;
-        };
-      };
-      ptr__EKMF=result__ZLCH;
-    };
-    result__DKMF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__EKMF);
-    *(result__DKMF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
-  };
-  Self__M3OF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__DKMF);
-  if ((Self__M3OF->parent_arrayed_collection__WWTE.capacity__V3OF <  8)) {
-    sz__QW2G=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
-    result__PW2G=((__POINTER )(NULL));
-    a__VW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__RW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__QW2G + a__VW2G) & (__UINTEGER_32)(~ a__VW2G));
-    new_size2__SW2G=(__UINTEGER_32)(new_size__RW2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__SW2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__334G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__434G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SW2G + a__334G) & (__UINTEGER_32)(~ a__334G));
-      ptr_table__3LCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__434G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__2LCH=((__POINTER )(NULL));
-      result__4LCH=((__POINTER *)ptr_table__3LCH)[ 0];
-      if ((result__4LCH == (void *)NULL)) {
-        result__4LCH=new_lab__ARJ(new_size__434G);
-        next__2LCH=(void *)((unsigned long)result__4LCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__434G)));
-        ((__POINTER *)next__2LCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3LCH)[ 0]=next__2LCH;
-      } else {
-        next__2LCH=((__POINTER *)result__4LCH)[ 0];
-        if ((next__2LCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4LCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__434G <<  1)) <=  4096)) {
-            next__2LCH=(void *)((unsigned long)result__4LCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__434G)));
-          } else {
-            next__2LCH=new_lab__ARJ(new_size__434G);
-          };
-          ((__POINTER *)next__2LCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3LCH)[ 0]=next__2LCH;
-        } else {
-          ((__POINTER *)result__4LCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2LCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4LCH=next__2LCH;
-        };
-      };
-      ((__POINTER *)result__4LCH)[ 0]=((__POINTER ) 3);
-      result__PW2G=(void *)((unsigned long)result__4LCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__BMCH=first_free__LDVB;
-      while ((((void *)result__BMCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BMCH)->map_size_and_id__2SB &  4294967292LU) < new_size__RW2G))) {
-        result__BMCH=((__MEMORY *)result__BMCH)->map_next_free__3SB;
-      };
-      if (((void *)result__BMCH == (void *)NULL)) {
-        result__BMCH=new_page__CA5();
-      };
-      to_busy__index__HTFC(result__BMCH,new_size__RW2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BMCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-      result__PW2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BMCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__EBZF=((void **)result__PW2G);
-    Self__WK3F= 7;
-    while ((Self__WK3F >=  0)) {
-      Result__EBZF[Self__WK3F]=NULL;
-      Self__WK3F=(__INTEGER)(Self__WK3F -  1);
-    };
-    Self__M3OF->parent_arrayed_collection__WWTE.storage__A4OF=Result__EBZF;
-    Self__M3OF->parent_arrayed_collection__WWTE.capacity__V3OF= 8;
-  };
-  Self__M3OF->parent_arrayed_collection__WWTE.upper__AZOF=(__INTEGER)(-  1);
-  stack__XWTE=result__DKMF;
-  path_file__DHVF=create_with_capacity__VGRC( 3000);
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__1EJF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__G0OF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__R0OF=NULL;
-  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__REJF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
-  result__PWLF=NULL;
-  ptr__QWLF=((__POINTER )(NULL));
-  typ_id__VWLF= 0;
-  sz__SWLF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
-  if ((sz__SWLF ==  0)) {
-    result__PWLF=FAST_ARRAYoLIP_SLOT_CODEo__;
+    typ_id__2SMF=__FAST_ARRAYoLIP_SLOT_DATAo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZSMF);
+    if ((typ_id__2SMF == (__INTEGER)(-  1))) {
+      a__KJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSMF + a__KJFH) & (__UINTEGER_32)(~ a__KJFH));
+      ptr_table__HYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GYIH=((__POINTER )(NULL));
+      result__IYIH=((__POINTER *)ptr_table__HYIH)[ 0];
+      if ((result__IYIH == (void *)NULL)) {
+        result__IYIH=new_lab__MRJ(new_size__LJFH);
+        next__GYIH=(void *)((unsigned long)result__IYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJFH)));
+        ((__POINTER *)next__GYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HYIH)[ 0]=next__GYIH;
+      } else {
+        next__GYIH=((__POINTER *)result__IYIH)[ 0];
+        if ((next__GYIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LJFH <<  1)) <=  4096)) {
+            next__GYIH=(void *)((unsigned long)result__IYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJFH)));
+          } else {
+            next__GYIH=new_lab__MRJ(new_size__LJFH);
+          };
+          ((__POINTER *)next__GYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HYIH)[ 0]=next__GYIH;
+        } else {
+          ((__POINTER *)result__IYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IYIH=next__GYIH;
+        };
+      };
+      ptr__XSMF=result__IYIH;
+    } else {
+      t__PJFH=((__UINTEGER_32 )typ_id__2SMF);
+      a__OJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSMF + a__OJFH) & (__UINTEGER_32)(~ a__OJFH));
+      ptr_table__MYIH=((__POINTER )(&(table_type[(t__PJFH)])));
+      lab_type__OYIH=(__UINTEGER_32)(t__PJFH |  1);
+      next__LYIH=((__POINTER )(NULL));
+      result__NYIH=((__POINTER *)ptr_table__MYIH)[ 0];
+      if ((result__NYIH == (void *)NULL)) {
+        result__NYIH=new_lab__MRJ(lab_type__OYIH);
+        next__LYIH=(void *)((unsigned long)result__NYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PYIH)));
+        ((__POINTER *)next__LYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MYIH)[ 0]=next__LYIH;
+      } else {
+        next__LYIH=((__POINTER *)result__NYIH)[ 0];
+        if ((next__LYIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PYIH <<  1)) <=  4096)) {
+            next__LYIH=(void *)((unsigned long)result__NYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PYIH)));
+          } else {
+            next__LYIH=new_lab__MRJ(lab_type__OYIH);
+          };
+          ((__POINTER *)next__LYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MYIH)[ 0]=next__LYIH;
+        } else {
+          ((__POINTER *)result__NYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NYIH=next__LYIH;
+        };
+      };
+      ptr__XSMF=result__NYIH;
+    };
+    result__WSMF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__XSMF);
+    *(result__WSMF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
+  };
+  Self__UAPF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__WSMF);
+  if ((Self__UAPF->parent_arrayed_collection__QEUE.capacity__3APF <  8)) {
+    sz__OBDH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
+    result__NBDH=((__POINTER )(NULL));
+    a__TBDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PBDH=(__UINTEGER_32)((__UINTEGER_32)(sz__OBDH + a__TBDH) & (__UINTEGER_32)(~ a__TBDH));
+    new_size2__QBDH=(__UINTEGER_32)(new_size__PBDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__QBDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__SJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QBDH + a__SJFH) & (__UINTEGER_32)(~ a__SJFH));
+      ptr_table__RYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QYIH=((__POINTER )(NULL));
+      result__SYIH=((__POINTER *)ptr_table__RYIH)[ 0];
+      if ((result__SYIH == (void *)NULL)) {
+        result__SYIH=new_lab__MRJ(new_size__TJFH);
+        next__QYIH=(void *)((unsigned long)result__SYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJFH)));
+        ((__POINTER *)next__QYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RYIH)[ 0]=next__QYIH;
+      } else {
+        next__QYIH=((__POINTER *)result__SYIH)[ 0];
+        if ((next__QYIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TJFH <<  1)) <=  4096)) {
+            next__QYIH=(void *)((unsigned long)result__SYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJFH)));
+          } else {
+            next__QYIH=new_lab__MRJ(new_size__TJFH);
+          };
+          ((__POINTER *)next__QYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RYIH)[ 0]=next__QYIH;
+        } else {
+          ((__POINTER *)result__SYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SYIH=next__QYIH;
+        };
+      };
+      ((__POINTER *)result__SYIH)[ 0]=((__POINTER ) 3);
+      result__NBDH=(void *)((unsigned long)result__SYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__VYIH=first_free__XDVB;
+      while ((((void *)result__VYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VYIH)->map_size_and_id__ITB &  4294967292LU) < new_size__PBDH))) {
+        result__VYIH=((__MEMORY *)result__VYIH)->map_next_free__JTB;
+      };
+      if (((void *)result__VYIH == (void *)NULL)) {
+        result__VYIH=new_page__OA5();
+      };
+      to_busy__index__TTFC(result__VYIH,new_size__PBDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VYIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+      result__NBDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__42ZF=((void **)result__NBDH);
+    Self__QY4F= 7;
+    while ((Self__QY4F >=  0)) {
+      Result__42ZF[Self__QY4F]=NULL;
+      Self__QY4F=(__INTEGER)(Self__QY4F -  1);
+    };
+    Self__UAPF->parent_arrayed_collection__QEUE.storage__IBPF=Result__42ZF;
+    Self__UAPF->parent_arrayed_collection__QEUE.capacity__3APF= 8;
+  };
+  Self__UAPF->parent_arrayed_collection__QEUE.upper__W0OF=(__INTEGER)(-  1);
+  stack__REUE=result__WSMF;
+  path_file__A2VF=create_with_capacity__BHRC( 3000);
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__3XJF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__41OF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__J2OF=NULL;
+  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__TXJF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
+  result__XDMF=NULL;
+  ptr__YDMF=((__POINTER )(NULL));
+  typ_id__3DMF= 0;
+  sz__0DMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
+  if ((sz__0DMF ==  0)) {
+    result__XDMF=FAST_ARRAYoLIP_SLOT_CODEo__;
   } else {
-    typ_id__VWLF=__FAST_ARRAYoLIP_SLOT_CODEo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__SWLF);
-    if ((typ_id__VWLF == (__INTEGER)(-  1))) {
-      a__E44G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__F44G=(__UINTEGER_32)((__UINTEGER_32)(sz__SWLF + a__E44G) & (__UINTEGER_32)(~ a__E44G));
-      ptr_table__FMCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F44G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__EMCH=((__POINTER )(NULL));
-      result__GMCH=((__POINTER *)ptr_table__FMCH)[ 0];
-      if ((result__GMCH == (void *)NULL)) {
-        result__GMCH=new_lab__ARJ(new_size__F44G);
-        next__EMCH=(void *)((unsigned long)result__GMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F44G)));
-        ((__POINTER *)next__EMCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FMCH)[ 0]=next__EMCH;
-      } else {
-        next__EMCH=((__POINTER *)result__GMCH)[ 0];
-        if ((next__EMCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GMCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__F44G <<  1)) <=  4096)) {
-            next__EMCH=(void *)((unsigned long)result__GMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F44G)));
-          } else {
-            next__EMCH=new_lab__ARJ(new_size__F44G);
-          };
-          ((__POINTER *)next__EMCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FMCH)[ 0]=next__EMCH;
-        } else {
-          ((__POINTER *)result__GMCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EMCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GMCH=next__EMCH;
-        };
-      };
-      ptr__QWLF=result__GMCH;
-    } else {
-      t__J44G=((__UINTEGER_32 )typ_id__VWLF);
-      a__I44G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NMCH=(__UINTEGER_32)((__UINTEGER_32)(sz__SWLF + a__I44G) & (__UINTEGER_32)(~ a__I44G));
-      ptr_table__KMCH=((__POINTER )(&(table_type[(t__J44G)])));
-      lab_type__MMCH=(__UINTEGER_32)(t__J44G |  1);
-      next__JMCH=((__POINTER )(NULL));
-      result__LMCH=((__POINTER *)ptr_table__KMCH)[ 0];
-      if ((result__LMCH == (void *)NULL)) {
-        result__LMCH=new_lab__ARJ(lab_type__MMCH);
-        next__JMCH=(void *)((unsigned long)result__LMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NMCH)));
-        ((__POINTER *)next__JMCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KMCH)[ 0]=next__JMCH;
-      } else {
-        next__JMCH=((__POINTER *)result__LMCH)[ 0];
-        if ((next__JMCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LMCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NMCH <<  1)) <=  4096)) {
-            next__JMCH=(void *)((unsigned long)result__LMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NMCH)));
-          } else {
-            next__JMCH=new_lab__ARJ(lab_type__MMCH);
-          };
-          ((__POINTER *)next__JMCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KMCH)[ 0]=next__JMCH;
-        } else {
-          ((__POINTER *)result__LMCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JMCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LMCH=next__JMCH;
-        };
-      };
-      ptr__QWLF=result__LMCH;
-    };
-    result__PWLF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__QWLF);
-    *(result__PWLF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
-  };
-  Self__3ZOF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__PWLF);
-  if ((Self__3ZOF->parent_arrayed_collection__REJF.capacity__G0OF <  32)) {
-    sz__YW2G=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
-    result__XW2G=((__POINTER )(NULL));
-    a__3W2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__ZW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__YW2G + a__3W2G) & (__UINTEGER_32)(~ a__3W2G));
-    new_size2__0W2G=(__UINTEGER_32)(new_size__ZW2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__0W2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__M44G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__N44G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0W2G + a__M44G) & (__UINTEGER_32)(~ a__M44G));
-      ptr_table__PMCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N44G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__OMCH=((__POINTER )(NULL));
-      result__QMCH=((__POINTER *)ptr_table__PMCH)[ 0];
-      if ((result__QMCH == (void *)NULL)) {
-        result__QMCH=new_lab__ARJ(new_size__N44G);
-        next__OMCH=(void *)((unsigned long)result__QMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N44G)));
-        ((__POINTER *)next__OMCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PMCH)[ 0]=next__OMCH;
-      } else {
-        next__OMCH=((__POINTER *)result__QMCH)[ 0];
-        if ((next__OMCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QMCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__N44G <<  1)) <=  4096)) {
-            next__OMCH=(void *)((unsigned long)result__QMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N44G)));
-          } else {
-            next__OMCH=new_lab__ARJ(new_size__N44G);
-          };
-          ((__POINTER *)next__OMCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PMCH)[ 0]=next__OMCH;
-        } else {
-          ((__POINTER *)result__QMCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OMCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QMCH=next__OMCH;
-        };
-      };
-      ((__POINTER *)result__QMCH)[ 0]=((__POINTER ) 3);
-      result__XW2G=(void *)((unsigned long)result__QMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__TMCH=first_free__LDVB;
-      while ((((void *)result__TMCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__TMCH)->map_size_and_id__2SB &  4294967292LU) < new_size__ZW2G))) {
-        result__TMCH=((__MEMORY *)result__TMCH)->map_next_free__3SB;
-      };
-      if (((void *)result__TMCH == (void *)NULL)) {
-        result__TMCH=new_page__CA5();
-      };
-      to_busy__index__HTFC(result__TMCH,new_size__ZW2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__TMCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-      result__XW2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__TMCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__I3YF=((void **)result__XW2G);
-    Self__PJ3F= 31;
-    while ((Self__PJ3F >=  0)) {
-      Result__I3YF[Self__PJ3F]=NULL;
-      Self__PJ3F=(__INTEGER)(Self__PJ3F -  1);
-    };
-    Self__3ZOF->parent_arrayed_collection__REJF.storage__R0OF=Result__I3YF;
-    Self__3ZOF->parent_arrayed_collection__REJF.capacity__G0OF= 32;
-  };
-  Self__3ZOF->parent_arrayed_collection__REJF.upper__1EJF=(__INTEGER)(-  1);
-  list_method__SEJF=result__PWLF;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__WOEC=NULL;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__ROEC= 0;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__TYFC= 0;
-  result__Y2YB=NULL;
-  ptr__Z2YB=((__POINTER )(NULL));
-  typ_id__42YB= 0;
-  sz__12YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
-  if ((sz__12YB ==  0)) {
-    result__Y2YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    typ_id__3DMF=__FAST_ARRAYoLIP_SLOT_CODEo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0DMF);
+    if ((typ_id__3DMF == (__INTEGER)(-  1))) {
+      a__ZJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0JFH=(__UINTEGER_32)((__UINTEGER_32)(sz__0DMF + a__ZJFH) & (__UINTEGER_32)(~ a__ZJFH));
+      ptr_table__ZYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0JFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YYIH=((__POINTER )(NULL));
+      result__0YIH=((__POINTER *)ptr_table__ZYIH)[ 0];
+      if ((result__0YIH == (void *)NULL)) {
+        result__0YIH=new_lab__MRJ(new_size__0JFH);
+        next__YYIH=(void *)((unsigned long)result__0YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JFH)));
+        ((__POINTER *)next__YYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZYIH)[ 0]=next__YYIH;
+      } else {
+        next__YYIH=((__POINTER *)result__0YIH)[ 0];
+        if ((next__YYIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0YIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0JFH <<  1)) <=  4096)) {
+            next__YYIH=(void *)((unsigned long)result__0YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JFH)));
+          } else {
+            next__YYIH=new_lab__MRJ(new_size__0JFH);
+          };
+          ((__POINTER *)next__YYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZYIH)[ 0]=next__YYIH;
+        } else {
+          ((__POINTER *)result__0YIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0YIH=next__YYIH;
+        };
+      };
+      ptr__YDMF=result__0YIH;
+    } else {
+      t__4JFH=((__UINTEGER_32 )typ_id__3DMF);
+      a__3JFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__0DMF + a__3JFH) & (__UINTEGER_32)(~ a__3JFH));
+      ptr_table__4YIH=((__POINTER )(&(table_type[(t__4JFH)])));
+      lab_type__AZIH=(__UINTEGER_32)(t__4JFH |  1);
+      next__3YIH=((__POINTER )(NULL));
+      result__5YIH=((__POINTER *)ptr_table__4YIH)[ 0];
+      if ((result__5YIH == (void *)NULL)) {
+        result__5YIH=new_lab__MRJ(lab_type__AZIH);
+        next__3YIH=(void *)((unsigned long)result__5YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BZIH)));
+        ((__POINTER *)next__3YIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4YIH)[ 0]=next__3YIH;
+      } else {
+        next__3YIH=((__POINTER *)result__5YIH)[ 0];
+        if ((next__3YIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5YIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BZIH <<  1)) <=  4096)) {
+            next__3YIH=(void *)((unsigned long)result__5YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BZIH)));
+          } else {
+            next__3YIH=new_lab__MRJ(lab_type__AZIH);
+          };
+          ((__POINTER *)next__3YIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4YIH)[ 0]=next__3YIH;
+        } else {
+          ((__POINTER *)result__5YIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3YIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5YIH=next__3YIH;
+        };
+      };
+      ptr__YDMF=result__5YIH;
+    };
+    result__XDMF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__YDMF);
+    *(result__XDMF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
+  };
+  Self__V1OF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__XDMF);
+  if ((Self__V1OF->parent_arrayed_collection__TXJF.capacity__41OF <  32)) {
+    sz__WBDH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
+    result__VBDH=((__POINTER )(NULL));
+    a__1BDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XBDH=(__UINTEGER_32)((__UINTEGER_32)(sz__WBDH + a__1BDH) & (__UINTEGER_32)(~ a__1BDH));
+    new_size2__YBDH=(__UINTEGER_32)(new_size__XBDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__YBDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__BKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__YBDH + a__BKFH) & (__UINTEGER_32)(~ a__BKFH));
+      ptr_table__DZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__CZIH=((__POINTER )(NULL));
+      result__EZIH=((__POINTER *)ptr_table__DZIH)[ 0];
+      if ((result__EZIH == (void *)NULL)) {
+        result__EZIH=new_lab__MRJ(new_size__CKFH);
+        next__CZIH=(void *)((unsigned long)result__EZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CKFH)));
+        ((__POINTER *)next__CZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DZIH)[ 0]=next__CZIH;
+      } else {
+        next__CZIH=((__POINTER *)result__EZIH)[ 0];
+        if ((next__CZIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CKFH <<  1)) <=  4096)) {
+            next__CZIH=(void *)((unsigned long)result__EZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CKFH)));
+          } else {
+            next__CZIH=new_lab__MRJ(new_size__CKFH);
+          };
+          ((__POINTER *)next__CZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DZIH)[ 0]=next__CZIH;
+        } else {
+          ((__POINTER *)result__EZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EZIH=next__CZIH;
+        };
+      };
+      ((__POINTER *)result__EZIH)[ 0]=((__POINTER ) 3);
+      result__VBDH=(void *)((unsigned long)result__EZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__HZIH=first_free__XDVB;
+      while ((((void *)result__HZIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HZIH)->map_size_and_id__ITB &  4294967292LU) < new_size__XBDH))) {
+        result__HZIH=((__MEMORY *)result__HZIH)->map_next_free__JTB;
+      };
+      if (((void *)result__HZIH == (void *)NULL)) {
+        result__HZIH=new_page__OA5();
+      };
+      to_busy__index__TTFC(result__HZIH,new_size__XBDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HZIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+      result__VBDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HZIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__FYZF=((void **)result__VBDH);
+    Self__JX4F= 31;
+    while ((Self__JX4F >=  0)) {
+      Result__FYZF[Self__JX4F]=NULL;
+      Self__JX4F=(__INTEGER)(Self__JX4F -  1);
+    };
+    Self__V1OF->parent_arrayed_collection__TXJF.storage__J2OF=Result__FYZF;
+    Self__V1OF->parent_arrayed_collection__TXJF.capacity__41OF= 32;
+  };
+  Self__V1OF->parent_arrayed_collection__TXJF.upper__3XJF=(__INTEGER)(-  1);
+  list_method__UXJF=result__XDMF;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__CPEC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__3OEC= 0;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__5YFC= 0;
+  result__E3YB=NULL;
+  ptr__F3YB=((__POINTER )(NULL));
+  typ_id__K3YB= 0;
+  sz__H3YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
+  if ((sz__H3YB ==  0)) {
+    result__E3YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
   } else {
-    typ_id__42YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__12YB);
-    if ((typ_id__42YB == (__INTEGER)(-  1))) {
-      a__T44G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__U44G=(__UINTEGER_32)((__UINTEGER_32)(sz__12YB + a__T44G) & (__UINTEGER_32)(~ a__T44G));
-      ptr_table__XMCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__U44G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__WMCH=((__POINTER )(NULL));
-      result__YMCH=((__POINTER *)ptr_table__XMCH)[ 0];
-      if ((result__YMCH == (void *)NULL)) {
-        result__YMCH=new_lab__ARJ(new_size__U44G);
-        next__WMCH=(void *)((unsigned long)result__YMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U44G)));
-        ((__POINTER *)next__WMCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XMCH)[ 0]=next__WMCH;
-      } else {
-        next__WMCH=((__POINTER *)result__YMCH)[ 0];
-        if ((next__WMCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YMCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__U44G <<  1)) <=  4096)) {
-            next__WMCH=(void *)((unsigned long)result__YMCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U44G)));
-          } else {
-            next__WMCH=new_lab__ARJ(new_size__U44G);
-          };
-          ((__POINTER *)next__WMCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XMCH)[ 0]=next__WMCH;
-        } else {
-          ((__POINTER *)result__YMCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WMCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YMCH=next__WMCH;
-        };
-      };
-      ptr__Z2YB=result__YMCH;
-    } else {
-      t__Y44G=((__UINTEGER_32 )typ_id__42YB);
-      a__X44G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__5MCH=(__UINTEGER_32)((__UINTEGER_32)(sz__12YB + a__X44G) & (__UINTEGER_32)(~ a__X44G));
-      ptr_table__2MCH=((__POINTER )(&(table_type[(t__Y44G)])));
-      lab_type__4MCH=(__UINTEGER_32)(t__Y44G |  1);
-      next__1MCH=((__POINTER )(NULL));
-      result__3MCH=((__POINTER *)ptr_table__2MCH)[ 0];
-      if ((result__3MCH == (void *)NULL)) {
-        result__3MCH=new_lab__ARJ(lab_type__4MCH);
-        next__1MCH=(void *)((unsigned long)result__3MCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MCH)));
-        ((__POINTER *)next__1MCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2MCH)[ 0]=next__1MCH;
-      } else {
-        next__1MCH=((__POINTER *)result__3MCH)[ 0];
-        if ((next__1MCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3MCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5MCH <<  1)) <=  4096)) {
-            next__1MCH=(void *)((unsigned long)result__3MCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5MCH)));
-          } else {
-            next__1MCH=new_lab__ARJ(lab_type__4MCH);
-          };
-          ((__POINTER *)next__1MCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2MCH)[ 0]=next__1MCH;
-        } else {
-          ((__POINTER *)result__3MCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1MCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3MCH=next__1MCH;
-        };
-      };
-      ptr__Z2YB=result__3MCH;
-    };
-    result__Y2YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__Z2YB);
-    *(result__Y2YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
-  };
-  Self__WWFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__Y2YB);
-  new_capacity__UFOC=prime_number_ceiling__L41( 193);
-  Self__WWFC->buckets__WOEC=create__R1XC(new_capacity__UFOC);
-  Self__WWFC->capacity__ROEC=new_capacity__UFOC;
-  Self__WWFC->count__TYFC= 0;
-  bucket_name__XUOB=result__Y2YB;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__CPEC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__NPEC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__VPEC=NULL;
-  SECTION___->name__WYDC=NULL;
-  last_section__L0C=NULL;
-  PROTOTYPE__->last_slot__C1C=NULL;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__2QEC=NULL;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__XQEC= 0;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__N1FC= 0;
-  result__35YB=NULL;
-  ptr__45YB=((__POINTER )(NULL));
-  typ_id__DAZB= 0;
-  sz__AAZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__AAZB ==  0)) {
-    result__35YB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    typ_id__K3YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__H3YB);
+    if ((typ_id__K3YB == (__INTEGER)(-  1))) {
+      a__IKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__H3YB + a__IKFH) & (__UINTEGER_32)(~ a__IKFH));
+      ptr_table__LZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KZIH=((__POINTER )(NULL));
+      result__MZIH=((__POINTER *)ptr_table__LZIH)[ 0];
+      if ((result__MZIH == (void *)NULL)) {
+        result__MZIH=new_lab__MRJ(new_size__JKFH);
+        next__KZIH=(void *)((unsigned long)result__MZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKFH)));
+        ((__POINTER *)next__KZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
+      } else {
+        next__KZIH=((__POINTER *)result__MZIH)[ 0];
+        if ((next__KZIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JKFH <<  1)) <=  4096)) {
+            next__KZIH=(void *)((unsigned long)result__MZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKFH)));
+          } else {
+            next__KZIH=new_lab__MRJ(new_size__JKFH);
+          };
+          ((__POINTER *)next__KZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
+        } else {
+          ((__POINTER *)result__MZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MZIH=next__KZIH;
+        };
+      };
+      ptr__F3YB=result__MZIH;
+    } else {
+      t__NKFH=((__UINTEGER_32 )typ_id__K3YB);
+      a__MKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__H3YB + a__MKFH) & (__UINTEGER_32)(~ a__MKFH));
+      ptr_table__QZIH=((__POINTER )(&(table_type[(t__NKFH)])));
+      lab_type__SZIH=(__UINTEGER_32)(t__NKFH |  1);
+      next__PZIH=((__POINTER )(NULL));
+      result__RZIH=((__POINTER *)ptr_table__QZIH)[ 0];
+      if ((result__RZIH == (void *)NULL)) {
+        result__RZIH=new_lab__MRJ(lab_type__SZIH);
+        next__PZIH=(void *)((unsigned long)result__RZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TZIH)));
+        ((__POINTER *)next__PZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
+      } else {
+        next__PZIH=((__POINTER *)result__RZIH)[ 0];
+        if ((next__PZIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TZIH <<  1)) <=  4096)) {
+            next__PZIH=(void *)((unsigned long)result__RZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TZIH)));
+          } else {
+            next__PZIH=new_lab__MRJ(lab_type__SZIH);
+          };
+          ((__POINTER *)next__PZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
+        } else {
+          ((__POINTER *)result__RZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RZIH=next__PZIH;
+        };
+      };
+      ptr__F3YB=result__RZIH;
+    };
+    result__E3YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__F3YB);
+    *(result__E3YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
+  };
+  Self__CXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__E3YB);
+  new_capacity__AGOC=prime_number_ceiling__X41( 193);
+  Self__CXFC->buckets__CPEC=create__31XC(new_capacity__AGOC);
+  Self__CXFC->capacity__3OEC=new_capacity__AGOC;
+  Self__CXFC->count__5YFC= 0;
+  bucket_name__DVOB=result__E3YB;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__OPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__ZPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__BQEC=NULL;
+  SECTION___->name__CZDC=NULL;
+  last_section__X0C=NULL;
+  PROTOTYPE__->last_slot__O1C=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__IREC=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__DREC= 0;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__Z1FC= 0;
+  result__JAZB=NULL;
+  ptr__KAZB=((__POINTER )(NULL));
+  typ_id__PAZB= 0;
+  sz__MAZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__MAZB ==  0)) {
+    result__JAZB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    typ_id__DAZB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__AAZB);
-    if ((typ_id__DAZB == (__INTEGER)(-  1))) {
-      a__144G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__244G=(__UINTEGER_32)((__UINTEGER_32)(sz__AAZB + a__144G) & (__UINTEGER_32)(~ a__144G));
-      ptr_table__BNCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__244G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ANCH=((__POINTER )(NULL));
-      result__CNCH=((__POINTER *)ptr_table__BNCH)[ 0];
-      if ((result__CNCH == (void *)NULL)) {
-        result__CNCH=new_lab__ARJ(new_size__244G);
-        next__ANCH=(void *)((unsigned long)result__CNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__244G)));
-        ((__POINTER *)next__ANCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BNCH)[ 0]=next__ANCH;
-      } else {
-        next__ANCH=((__POINTER *)result__CNCH)[ 0];
-        if ((next__ANCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CNCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__244G <<  1)) <=  4096)) {
-            next__ANCH=(void *)((unsigned long)result__CNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__244G)));
-          } else {
-            next__ANCH=new_lab__ARJ(new_size__244G);
-          };
-          ((__POINTER *)next__ANCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BNCH)[ 0]=next__ANCH;
-        } else {
-          ((__POINTER *)result__CNCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CNCH=next__ANCH;
-        };
-      };
-      ptr__45YB=result__CNCH;
-    } else {
-      t__A54G=((__UINTEGER_32 )typ_id__DAZB);
-      a__544G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__JNCH=(__UINTEGER_32)((__UINTEGER_32)(sz__AAZB + a__544G) & (__UINTEGER_32)(~ a__544G));
-      ptr_table__GNCH=((__POINTER )(&(table_type[(t__A54G)])));
-      lab_type__INCH=(__UINTEGER_32)(t__A54G |  1);
-      next__FNCH=((__POINTER )(NULL));
-      result__HNCH=((__POINTER *)ptr_table__GNCH)[ 0];
-      if ((result__HNCH == (void *)NULL)) {
-        result__HNCH=new_lab__ARJ(lab_type__INCH);
-        next__FNCH=(void *)((unsigned long)result__HNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNCH)));
-        ((__POINTER *)next__FNCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GNCH)[ 0]=next__FNCH;
-      } else {
-        next__FNCH=((__POINTER *)result__HNCH)[ 0];
-        if ((next__FNCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HNCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JNCH <<  1)) <=  4096)) {
-            next__FNCH=(void *)((unsigned long)result__HNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNCH)));
-          } else {
-            next__FNCH=new_lab__ARJ(lab_type__INCH);
-          };
-          ((__POINTER *)next__FNCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GNCH)[ 0]=next__FNCH;
-        } else {
-          ((__POINTER *)result__HNCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FNCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HNCH=next__FNCH;
-        };
-      };
-      ptr__45YB=result__HNCH;
-    };
-    result__35YB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__45YB);
-    *(result__35YB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__VZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__35YB);
-  new_capacity__PJOC=prime_number_ceiling__L41( 193);
-  Self__VZFC->buckets__2QEC=create__UAYC(new_capacity__PJOC);
-  Self__VZFC->capacity__XQEC=new_capacity__PJOC;
-  Self__VZFC->count__N1FC= 0;
-  bucket_list__SWOB=result__35YB;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__IREC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__TREC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__1REC=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__ETGC= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__MKHC= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__XKHC=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__JU1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__S5GC= 0;
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__U5GC= 0;
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__QAHC=NULL;
-  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__ZBZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
-  result__XJ5B=NULL;
-  ptr__YJ5B=((__POINTER )(NULL));
-  typ_id__3J5B= 0;
-  sz__0J5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
-  if ((sz__0J5B ==  0)) {
-    result__XJ5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    typ_id__PAZB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MAZB);
+    if ((typ_id__PAZB == (__INTEGER)(-  1))) {
+      a__QKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAZB + a__QKFH) & (__UINTEGER_32)(~ a__QKFH));
+      ptr_table__VZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UZIH=((__POINTER )(NULL));
+      result__WZIH=((__POINTER *)ptr_table__VZIH)[ 0];
+      if ((result__WZIH == (void *)NULL)) {
+        result__WZIH=new_lab__MRJ(new_size__RKFH);
+        next__UZIH=(void *)((unsigned long)result__WZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RKFH)));
+        ((__POINTER *)next__UZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VZIH)[ 0]=next__UZIH;
+      } else {
+        next__UZIH=((__POINTER *)result__WZIH)[ 0];
+        if ((next__UZIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RKFH <<  1)) <=  4096)) {
+            next__UZIH=(void *)((unsigned long)result__WZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RKFH)));
+          } else {
+            next__UZIH=new_lab__MRJ(new_size__RKFH);
+          };
+          ((__POINTER *)next__UZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VZIH)[ 0]=next__UZIH;
+        } else {
+          ((__POINTER *)result__WZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WZIH=next__UZIH;
+        };
+      };
+      ptr__KAZB=result__WZIH;
+    } else {
+      t__VKFH=((__UINTEGER_32 )typ_id__PAZB);
+      a__UKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3ZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAZB + a__UKFH) & (__UINTEGER_32)(~ a__UKFH));
+      ptr_table__0ZIH=((__POINTER )(&(table_type[(t__VKFH)])));
+      lab_type__2ZIH=(__UINTEGER_32)(t__VKFH |  1);
+      next__ZZIH=((__POINTER )(NULL));
+      result__1ZIH=((__POINTER *)ptr_table__0ZIH)[ 0];
+      if ((result__1ZIH == (void *)NULL)) {
+        result__1ZIH=new_lab__MRJ(lab_type__2ZIH);
+        next__ZZIH=(void *)((unsigned long)result__1ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZIH)));
+        ((__POINTER *)next__ZZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0ZIH)[ 0]=next__ZZIH;
+      } else {
+        next__ZZIH=((__POINTER *)result__1ZIH)[ 0];
+        if ((next__ZZIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1ZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3ZIH <<  1)) <=  4096)) {
+            next__ZZIH=(void *)((unsigned long)result__1ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZIH)));
+          } else {
+            next__ZZIH=new_lab__MRJ(lab_type__2ZIH);
+          };
+          ((__POINTER *)next__ZZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0ZIH)[ 0]=next__ZZIH;
+        } else {
+          ((__POINTER *)result__1ZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1ZIH=next__ZZIH;
+        };
+      };
+      ptr__KAZB=result__1ZIH;
+    };
+    result__JAZB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__KAZB);
+    *(result__JAZB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__B0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__JAZB);
+  new_capacity__1JOC=prime_number_ceiling__X41( 193);
+  Self__B0FC->buckets__IREC=create__ABYC(new_capacity__1JOC);
+  Self__B0FC->capacity__DREC=new_capacity__1JOC;
+  Self__B0FC->count__Z1FC= 0;
+  bucket_list__4WOB=result__JAZB;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__UREC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__5REC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__HSEC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__QTGC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__YKHC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__DLHC=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__VU1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__45GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__AAHC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__2AHC=NULL;
+  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__FCZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
+  result__DK5B=NULL;
+  ptr__EK5B=((__POINTER )(NULL));
+  typ_id__JK5B= 0;
+  sz__GK5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
+  if ((sz__GK5B ==  0)) {
+    result__DK5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
   } else {
-    typ_id__3J5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__0J5B);
-    if ((typ_id__3J5B == (__INTEGER)(-  1))) {
-      a__D54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__E54G=(__UINTEGER_32)((__UINTEGER_32)(sz__0J5B + a__D54G) & (__UINTEGER_32)(~ a__D54G));
-      ptr_table__LNCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E54G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__KNCH=((__POINTER )(NULL));
-      result__MNCH=((__POINTER *)ptr_table__LNCH)[ 0];
-      if ((result__MNCH == (void *)NULL)) {
-        result__MNCH=new_lab__ARJ(new_size__E54G);
-        next__KNCH=(void *)((unsigned long)result__MNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E54G)));
-        ((__POINTER *)next__KNCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LNCH)[ 0]=next__KNCH;
-      } else {
-        next__KNCH=((__POINTER *)result__MNCH)[ 0];
-        if ((next__KNCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MNCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__E54G <<  1)) <=  4096)) {
-            next__KNCH=(void *)((unsigned long)result__MNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E54G)));
-          } else {
-            next__KNCH=new_lab__ARJ(new_size__E54G);
-          };
-          ((__POINTER *)next__KNCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LNCH)[ 0]=next__KNCH;
-        } else {
-          ((__POINTER *)result__MNCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KNCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MNCH=next__KNCH;
-        };
-      };
-      ptr__YJ5B=result__MNCH;
-    } else {
-      t__I54G=((__UINTEGER_32 )typ_id__3J5B);
-      a__H54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TNCH=(__UINTEGER_32)((__UINTEGER_32)(sz__0J5B + a__H54G) & (__UINTEGER_32)(~ a__H54G));
-      ptr_table__QNCH=((__POINTER )(&(table_type[(t__I54G)])));
-      lab_type__SNCH=(__UINTEGER_32)(t__I54G |  1);
-      next__PNCH=((__POINTER )(NULL));
-      result__RNCH=((__POINTER *)ptr_table__QNCH)[ 0];
-      if ((result__RNCH == (void *)NULL)) {
-        result__RNCH=new_lab__ARJ(lab_type__SNCH);
-        next__PNCH=(void *)((unsigned long)result__RNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNCH)));
-        ((__POINTER *)next__PNCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QNCH)[ 0]=next__PNCH;
-      } else {
-        next__PNCH=((__POINTER *)result__RNCH)[ 0];
-        if ((next__PNCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RNCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TNCH <<  1)) <=  4096)) {
-            next__PNCH=(void *)((unsigned long)result__RNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNCH)));
-          } else {
-            next__PNCH=new_lab__ARJ(lab_type__SNCH);
-          };
-          ((__POINTER *)next__PNCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QNCH)[ 0]=next__PNCH;
-        } else {
-          ((__POINTER *)result__RNCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PNCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RNCH=next__PNCH;
-        };
-      };
-      ptr__YJ5B=result__RNCH;
-    };
-    result__XJ5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__YJ5B);
-    *(result__XJ5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
-  };
-  Self__DKHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__XJ5B);
-  if ((Self__DKHC->parent_arrayed_collection__JU1B.capacity__MKHC <  5)) {
-    Self__DKHC->parent_arrayed_collection__JU1B.storage__XKHC=create__YKBD( 5);
-    Self__DKHC->parent_arrayed_collection__JU1B.capacity__MKHC= 5;
-  };
-  Self__DKHC->parent_arrayed_collection__JU1B.upper__ETGC=(__INTEGER)(-  1);
-  free_list__KU1B=result__XJ5B;
-  ITM_SLOT_OPERATOR__->pretty_name__J0HC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__DBGC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__OBGC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__WBGC=NULL;
-  PROTOTYPE__->first_slot__WFZB=NULL;
+    typ_id__JK5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GK5B);
+    if ((typ_id__JK5B == (__INTEGER)(-  1))) {
+      a__YKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GK5B + a__YKFH) & (__UINTEGER_32)(~ a__YKFH));
+      ptr_table__5ZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4ZIH=((__POINTER )(NULL));
+      result__A0IH=((__POINTER *)ptr_table__5ZIH)[ 0];
+      if ((result__A0IH == (void *)NULL)) {
+        result__A0IH=new_lab__MRJ(new_size__ZKFH);
+        next__4ZIH=(void *)((unsigned long)result__A0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZKFH)));
+        ((__POINTER *)next__4ZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5ZIH)[ 0]=next__4ZIH;
+      } else {
+        next__4ZIH=((__POINTER *)result__A0IH)[ 0];
+        if ((next__4ZIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZKFH <<  1)) <=  4096)) {
+            next__4ZIH=(void *)((unsigned long)result__A0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZKFH)));
+          } else {
+            next__4ZIH=new_lab__MRJ(new_size__ZKFH);
+          };
+          ((__POINTER *)next__4ZIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5ZIH)[ 0]=next__4ZIH;
+        } else {
+          ((__POINTER *)result__A0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4ZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__A0IH=next__4ZIH;
+        };
+      };
+      ptr__EK5B=result__A0IH;
+    } else {
+      t__3KFH=((__UINTEGER_32 )typ_id__JK5B);
+      a__2KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__H0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__GK5B + a__2KFH) & (__UINTEGER_32)(~ a__2KFH));
+      ptr_table__E0IH=((__POINTER )(&(table_type[(t__3KFH)])));
+      lab_type__G0IH=(__UINTEGER_32)(t__3KFH |  1);
+      next__D0IH=((__POINTER )(NULL));
+      result__F0IH=((__POINTER *)ptr_table__E0IH)[ 0];
+      if ((result__F0IH == (void *)NULL)) {
+        result__F0IH=new_lab__MRJ(lab_type__G0IH);
+        next__D0IH=(void *)((unsigned long)result__F0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H0IH)));
+        ((__POINTER *)next__D0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__E0IH)[ 0]=next__D0IH;
+      } else {
+        next__D0IH=((__POINTER *)result__F0IH)[ 0];
+        if ((next__D0IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__H0IH <<  1)) <=  4096)) {
+            next__D0IH=(void *)((unsigned long)result__F0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H0IH)));
+          } else {
+            next__D0IH=new_lab__MRJ(lab_type__G0IH);
+          };
+          ((__POINTER *)next__D0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__E0IH)[ 0]=next__D0IH;
+        } else {
+          ((__POINTER *)result__F0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__F0IH=next__D0IH;
+        };
+      };
+      ptr__EK5B=result__F0IH;
+    };
+    result__DK5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__EK5B);
+    *(result__DK5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
+  };
+  Self__PKHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__DK5B);
+  if ((Self__PKHC->parent_arrayed_collection__VU1B.capacity__YKHC <  5)) {
+    Self__PKHC->parent_arrayed_collection__VU1B.storage__DLHC=create__ELBD( 5);
+    Self__PKHC->parent_arrayed_collection__VU1B.capacity__YKHC= 5;
+  };
+  Self__PKHC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(-  1);
+  free_list__WU1B=result__DK5B;
+  ITM_SLOT_OPERATOR__->priority_and_level__K0HC= 0;
+  ITM_SLOT_OPERATOR__->pretty_name__V0HC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__PBGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__0BGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__CCGC=NULL;
+  PROTOTYPE__->first_slot__CGZB=NULL;
+  ARRAYED_COLLECTIONoITM_SLOTo__->upper__21XD= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__SMVE= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->storage__MZVE=NULL;
+  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__4JTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
+  result__25HE=NULL;
+  ptr__35HE=((__POINTER )(NULL));
+  typ_id__CAIE= 0;
+  sz__55HE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
+  if ((sz__55HE ==  0)) {
+    result__25HE=FAST_ARRAYoITM_SLOTo__;
+  } else {
+    typ_id__CAIE=__FAST_ARRAYoITM_SLOTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__55HE);
+    if ((typ_id__CAIE == (__INTEGER)(-  1))) {
+      a__ALFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__55HE + a__ALFH) & (__UINTEGER_32)(~ a__ALFH));
+      ptr_table__J0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__I0IH=((__POINTER )(NULL));
+      result__K0IH=((__POINTER *)ptr_table__J0IH)[ 0];
+      if ((result__K0IH == (void *)NULL)) {
+        result__K0IH=new_lab__MRJ(new_size__BLFH);
+        next__I0IH=(void *)((unsigned long)result__K0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BLFH)));
+        ((__POINTER *)next__I0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__J0IH)[ 0]=next__I0IH;
+      } else {
+        next__I0IH=((__POINTER *)result__K0IH)[ 0];
+        if ((next__I0IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BLFH <<  1)) <=  4096)) {
+            next__I0IH=(void *)((unsigned long)result__K0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BLFH)));
+          } else {
+            next__I0IH=new_lab__MRJ(new_size__BLFH);
+          };
+          ((__POINTER *)next__I0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__J0IH)[ 0]=next__I0IH;
+        } else {
+          ((__POINTER *)result__K0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__K0IH=next__I0IH;
+        };
+      };
+      ptr__35HE=result__K0IH;
+    } else {
+      t__FLFH=((__UINTEGER_32 )typ_id__CAIE);
+      a__ELFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__R0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__55HE + a__ELFH) & (__UINTEGER_32)(~ a__ELFH));
+      ptr_table__O0IH=((__POINTER )(&(table_type[(t__FLFH)])));
+      lab_type__Q0IH=(__UINTEGER_32)(t__FLFH |  1);
+      next__N0IH=((__POINTER )(NULL));
+      result__P0IH=((__POINTER *)ptr_table__O0IH)[ 0];
+      if ((result__P0IH == (void *)NULL)) {
+        result__P0IH=new_lab__MRJ(lab_type__Q0IH);
+        next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0IH)));
+        ((__POINTER *)next__N0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
+      } else {
+        next__N0IH=((__POINTER *)result__P0IH)[ 0];
+        if ((next__N0IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__R0IH <<  1)) <=  4096)) {
+            next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0IH)));
+          } else {
+            next__N0IH=new_lab__MRJ(lab_type__Q0IH);
+          };
+          ((__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__35HE=result__P0IH;
+    };
+    result__25HE=((__FAST_ARRAYoITM_SLOTo *)ptr__35HE);
+    *(result__25HE) = *(FAST_ARRAYoITM_SLOTo__);
+  };
+  Self__ZYVE=((__FAST_ARRAYoITM_SLOTo *)result__25HE);
+  if ((Self__ZYVE->parent_arrayed_collection__4JTD.capacity__SMVE <  256)) {
+    Self__ZYVE->parent_arrayed_collection__4JTD.storage__MZVE=create__5FEF( 256);
+    Self__ZYVE->parent_arrayed_collection__4JTD.capacity__SMVE= 256;
+  };
+  Self__ZYVE->parent_arrayed_collection__4JTD.upper__21XD=(__INTEGER)(-  1);
+  list_tmp__5JTD=result__25HE;
   txt__1=NULL;
   p__AB=NULL;
-  create__EBB( 255);
-  result__XTB=NULL;
-  ptr__YTB=((__POINTER )(NULL));
-  typ_id__3TB= 0;
-  sz__0TB=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
-  if ((sz__0TB ==  0)) {
-    result__XTB=HASHED_SEToABSTRACT_STRINGo__;
+  create__NBB( 255);
+  result__DUB=NULL;
+  ptr__EUB=((__POINTER )(NULL));
+  typ_id__JUB= 0;
+  sz__GUB=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
+  if ((sz__GUB ==  0)) {
+    result__DUB=HASHED_SEToABSTRACT_STRINGo__;
   } else {
-    typ_id__3TB=__HASHED_SEToABSTRACT_STRINGo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__0TB);
-    if ((typ_id__3TB == (__INTEGER)(-  1))) {
-      a__L54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__M54G=(__UINTEGER_32)((__UINTEGER_32)(sz__0TB + a__L54G) & (__UINTEGER_32)(~ a__L54G));
-      ptr_table__VNCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M54G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__UNCH=((__POINTER )(NULL));
-      result__WNCH=((__POINTER *)ptr_table__VNCH)[ 0];
-      if ((result__WNCH == (void *)NULL)) {
-        result__WNCH=new_lab__ARJ(new_size__M54G);
-        next__UNCH=(void *)((unsigned long)result__WNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M54G)));
-        ((__POINTER *)next__UNCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VNCH)[ 0]=next__UNCH;
-      } else {
-        next__UNCH=((__POINTER *)result__WNCH)[ 0];
-        if ((next__UNCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WNCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__M54G <<  1)) <=  4096)) {
-            next__UNCH=(void *)((unsigned long)result__WNCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M54G)));
-          } else {
-            next__UNCH=new_lab__ARJ(new_size__M54G);
-          };
-          ((__POINTER *)next__UNCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VNCH)[ 0]=next__UNCH;
-        } else {
-          ((__POINTER *)result__WNCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UNCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WNCH=next__UNCH;
-        };
-      };
-      ptr__YTB=result__WNCH;
-    } else {
-      t__Q54G=((__UINTEGER_32 )typ_id__3TB);
-      a__P54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__3NCH=(__UINTEGER_32)((__UINTEGER_32)(sz__0TB + a__P54G) & (__UINTEGER_32)(~ a__P54G));
-      ptr_table__0NCH=((__POINTER )(&(table_type[(t__Q54G)])));
-      lab_type__2NCH=(__UINTEGER_32)(t__Q54G |  1);
-      next__ZNCH=((__POINTER )(NULL));
-      result__1NCH=((__POINTER *)ptr_table__0NCH)[ 0];
-      if ((result__1NCH == (void *)NULL)) {
-        result__1NCH=new_lab__ARJ(lab_type__2NCH);
-        next__ZNCH=(void *)((unsigned long)result__1NCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NCH)));
-        ((__POINTER *)next__ZNCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0NCH)[ 0]=next__ZNCH;
-      } else {
-        next__ZNCH=((__POINTER *)result__1NCH)[ 0];
-        if ((next__ZNCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1NCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3NCH <<  1)) <=  4096)) {
-            next__ZNCH=(void *)((unsigned long)result__1NCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NCH)));
-          } else {
-            next__ZNCH=new_lab__ARJ(lab_type__2NCH);
-          };
-          ((__POINTER *)next__ZNCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0NCH)[ 0]=next__ZNCH;
-        } else {
-          ((__POINTER *)result__1NCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZNCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1NCH=next__ZNCH;
-        };
-      };
-      ptr__YTB=result__1NCH;
-    };
-    result__XTB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__YTB);
-    *(result__XTB) = *(HASHED_SEToABSTRACT_STRINGo__);
-  };
-  Self__1BS=((__HASHED_SEToABSTRACT_STRINGo *)result__XTB);
-  new_capacity__QZW=prime_number_ceiling__L41( 53);
-  Self__1BS->buckets__SYR=create__VJ2(new_capacity__QZW);
-  Self__1BS->capacity__NYR=new_capacity__QZW;
-  Self__1BS->count__TZR= 0;
-  list__FK=result__XTB;
-  add__2XR(result__XTB,(&__string_4));
-  add__2XR(list__FK,(&__string_5));
-  add__2XR(list__FK,(&__string_6));
-  add__2XR(list__FK,(&__string_7));
-  add__2XR(list__FK,(&__string_8));
-  add__2XR(list__FK,(&__string_9));
-  add__2XR(list__FK,(&__string_10));
-  add__2XR(list__FK,(&__string_11));
-  add__2XR(list__FK,(&__string_12));
-  add__2XR(list__FK,(&__string_13));
-  add__2XR(list__FK,(&__string_14));
-  add__2XR(list__FK,(&__string_15));
-  add__2XR(list__FK,(&__string_16));
-  add__2XR(list__FK,(&__string_17));
-  add__2XR(list__FK,(&__string_18));
-  add__2XR(list__FK,(&__string_19));
-  add__2XR(list__FK,(&__string_20));
-  add__2XR(list__FK,(&__string_21));
-  add__2XR(list__FK,(&__string_22));
-  add__2XR(list__FK,(&__string_23));
-  add__2XR(list__FK,(&__string_24));
-  add__2XR(list__FK,(&__string_25));
-  add__2XR(list__FK,(&__string_26));
-  add__2XR(list__FK,(&__string_27));
-  add__2XR(list__FK,(&__string_28));
-  add__2XR(list__FK,(&__string_29));
-  add__2XR(list__FK,(&__string_30));
-  add__2XR(list__FK,(&__string_31));
-  add__2XR(list__FK,(&__string_32));
-  add__2XR(list__FK,(&__string_33));
-  add__2XR(list__FK,(&__string_34));
-  add__2XR(list__FK,(&__string_35));
-  add__2XR(list__FK,(&__string_36));
-  add__2XR(list__FK,(&__string_37));
-  add__2XR(list__FK,(&__string_38));
-  add__2XR(list__FK,(&__string_39));
-  add__2XR(list__FK,(&__string_40));
-  add__2XR(list__FK,(&__string_41));
-  add__2XR(list__FK,(&__string_42));
-  add__2XR(list__FK,(&__string_43));
-  add__2XR(list__FK,(&__string_44));
-  add__2XR(list__FK,(&__string_45));
-  add__2XR(list__FK,(&__string_46));
-  add__2XR(list__FK,(&__string_47));
-  add__2XR(list__FK,(&__string_1));
-  add__2XR(list__FK,(&__string_48));
-  add__2XR(list__FK,(&__string_49));
-  add__2XR(list__FK,(&__string_50));
-  add__2XR(list__FK,(&__string_51));
-  add__2XR(list__FK,(&__string_52));
-  add__2XR(list__FK,(&__string_53));
-  add__2XR(list__FK,(&__string_54));
-  add__2XR(list__FK,(&__string_55));
-  add__2XR(list__FK,(&__string_56));
-  add__2XR(list__FK,(&__string_57));
-  add__2XR(list__FK,(&__string_58));
-  add__2XR(list__FK,(&__string_59));
-  add__2XR(list__FK,(&__string_2));
-  add__2XR(list__FK,(&__string_3));
-  add__2XR(list__FK,(&__string_60));
-  add__2XR(list__FK,(&__string_61));
-  add__2XR(list__FK,(&__string_62));
-  add__2XR(list__FK,(&__string_63));
-  add__2XR(list__FK,(&__string_64));
-  add__2XR(list__FK,(&__string_65));
-  add__2XR(list__FK,(&__string_66));
-  add__2XR(list__FK,(&__string_67));
-  add__2XR(list__FK,(&__string_68));
-  add__2XR(list__FK,(&__string_69));
-  add__2XR(list__FK,(&__string_70));
-  add__2XR(list__FK,(&__string_71));
-  add__2XR(list__FK,(&__string_72));
-  add__2XR(list__FK,(&__string_73));
-  add__2XR(list__FK,(&__string_74));
-  add__2XR(list__FK,(&__string_75));
-  add__2XR(list__FK,(&__string_76));
-  add__2XR(list__FK,(&__string_77));
-  add__2XR(list__FK,(&__string_78));
-  add__2XR(list__FK,(&__string_79));
-  add__2XR(list__FK,(&__string_80));
-  add__2XR(list__FK,(&__string_81));
-  add__2XR(list__FK,(&__string_82));
-  add__2XR(list__FK,(&__string_83));
-  add__2XR(list__FK,(&__string_84));
-  add__2XR(list__FK,(&__string_85));
-  add__2XR(list__FK,(&__string_86));
-  add__2XR(list__FK,(&__string_87));
-  add__2XR(list__FK,(&__string_88));
-  add__2XR(list__FK,(&__string_89));
-  add__2XR(list__FK,(&__string_90));
-  add__2XR(list__FK,(&__string_91));
-  add__2XR(list__FK,(&__string_92));
-  add__2XR(list__FK,(&__string_93));
-  add__2XR(list__FK,(&__string_94));
-  add__2XR(list__FK,(&__string_95));
-  add__2XR(list__FK,(&__string_96));
-  add__2XR(list__FK,(&__string_97));
-  add__2XR(list__FK,(&__string_98));
-  add__2XR(list__FK,(&__string_99));
-  add__2XR(list__FK,(&__string_100));
-  add__2XR(list__FK,(&__string_101));
-  add__2XR(list__FK,(&__string_102));
-  add__2XR(list__FK,(&__string_103));
-  add__2XR(list__FK,(&__string_104));
-  add__2XR(list__FK,(&__string_105));
-  add__2XR(list__FK,(&__string_106));
-  add__2XR(list__FK,(&__string_107));
-  add__2XR(list__FK,(&__string_108));
-  add__2XR(list__FK,(&__string_109));
-  add__2XR(list__FK,(&__string_110));
-  add__2XR(list__FK,(&__string_111));
-  add__2XR(list__FK,(&__string_112));
-  add__2XR(list__FK,(&__string_113));
-  add__2XR(list__FK,(&__string_114));
-  add__2XR(list__FK,(&__string_115));
-  add__2XR(list__FK,(&__string_116));
-  add__2XR(list__FK,(&__string_117));
-  add__2XR(list__FK,(&__string_118));
-  add__2XR(list__FK,(&__string_119));
-  add__2XR(list__FK,(&__string_120));
-  add__2XR(list__FK,(&__string_121));
-  add__2XR(list__FK,(&__string_122));
-  add__2XR(list__FK,(&__string_123));
-  add__2XR(list__FK,(&__string_124));
-  add__2XR(list__FK,(&__string_125));
-  add__2XR(list__FK,(&__string_126));
-  add__2XR(list__FK,(&__string_127));
-  add__2XR(list__FK,(&__string_128));
-  add__2XR(list__FK,(&__string_129));
-  add__2XR(list__FK,(&__string_70));
-  add__2XR(list__FK,(&__string_130));
-  add__2XR(list__FK,(&__string_131));
-  add__2XR(list__FK,(&__string_132));
-  add__2XR(list__FK,(&__string_133));
-  add__2XR(list__FK,(&__string_65));
-  add__2XR(list__FK,(&__string_134));
-  add__2XR(list__FK,(&__string_135));
-  add__2XR(list__FK,(&__string_136));
-  add__2XR(list__FK,(&__string_137));
-  add__2XR(list__FK,(&__string_138));
-  add__2XR(list__FK,(&__string_139));
-  add__2XR(list__FK,(&__string_140));
-  add__2XR(list__FK,(&__string_141));
-  add__2XR(list__FK,(&__string_142));
-  add__2XR(list__FK,(&__string_143));
-  add__2XR(list__FK,(&__string_66));
-  add__2XR(list__FK,(&__string_144));
-  add__2XR(list__FK,(&__string_145));
-  add__2XR(list__FK,(&__string_146));
-  add__2XR(list__FK,(&__string_147));
-  add__2XR(list__FK,(&__string_148));
-  add__2XR(list__FK,(&__string_149));
-  operator__name__KGB((&__string_16));
-  operator__name__KGB((&__string_17));
-  cmd__SY=NULL;
-  path__VY=NULL;
-  is_shorter__WY=TRUE__;
-  j__TY= 1;
-  while ((j__TY <= ((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.upper__0JC)) {
-    cmd__SY=((void **)((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.storage__LGT)[j__TY];
-    if ((((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 0] == '-')) {
-      if ((((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'o')) {
-        j__TY=(__INTEGER)(j__TY +  1);
-        if ((j__TY > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.upper__0JC +  1))) {
-          print__KHD((&__string_150));
+    typ_id__JUB=__HASHED_SEToABSTRACT_STRINGo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GUB);
+    if ((typ_id__JUB == (__INTEGER)(-  1))) {
+      a__ILFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUB + a__ILFH) & (__UINTEGER_32)(~ a__ILFH));
+      ptr_table__T0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__S0IH=((__POINTER )(NULL));
+      result__U0IH=((__POINTER *)ptr_table__T0IH)[ 0];
+      if ((result__U0IH == (void *)NULL)) {
+        result__U0IH=new_lab__MRJ(new_size__JLFH);
+        next__S0IH=(void *)((unsigned long)result__U0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLFH)));
+        ((__POINTER *)next__S0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
+      } else {
+        next__S0IH=((__POINTER *)result__U0IH)[ 0];
+        if ((next__S0IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JLFH <<  1)) <=  4096)) {
+            next__S0IH=(void *)((unsigned long)result__U0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLFH)));
+          } else {
+            next__S0IH=new_lab__MRJ(new_size__JLFH);
+          };
+          ((__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__EUB=result__U0IH;
+    } else {
+      t__NLFH=((__UINTEGER_32 )typ_id__JUB);
+      a__MLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__10IH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUB + a__MLFH) & (__UINTEGER_32)(~ a__MLFH));
+      ptr_table__Y0IH=((__POINTER )(&(table_type[(t__NLFH)])));
+      lab_type__00IH=(__UINTEGER_32)(t__NLFH |  1);
+      next__X0IH=((__POINTER )(NULL));
+      result__Z0IH=((__POINTER *)ptr_table__Y0IH)[ 0];
+      if ((result__Z0IH == (void *)NULL)) {
+        result__Z0IH=new_lab__MRJ(lab_type__00IH);
+        next__X0IH=(void *)((unsigned long)result__Z0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__10IH)));
+        ((__POINTER *)next__X0IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Y0IH)[ 0]=next__X0IH;
+      } else {
+        next__X0IH=((__POINTER *)result__Z0IH)[ 0];
+        if ((next__X0IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__10IH <<  1)) <=  4096)) {
+            next__X0IH=(void *)((unsigned long)result__Z0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__10IH)));
+          } else {
+            next__X0IH=new_lab__MRJ(lab_type__00IH);
+          };
+          ((__POINTER *)next__X0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Y0IH)[ 0]=next__X0IH;
+        } else {
+          ((__POINTER *)result__Z0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Z0IH=next__X0IH;
+        };
+      };
+      ptr__EUB=result__Z0IH;
+    };
+    result__DUB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__EUB);
+    *(result__DUB) = *(HASHED_SEToABSTRACT_STRINGo__);
+  };
+  Self__HCS=((__HASHED_SEToABSTRACT_STRINGo *)result__DUB);
+  new_capacity__2ZW=prime_number_ceiling__X41( 53);
+  Self__HCS->buckets__4YR=create__BK2(new_capacity__2ZW);
+  Self__HCS->capacity__ZYR=new_capacity__2ZW;
+  Self__HCS->count__5ZR= 0;
+  list__FK=result__DUB;
+  add__IYR(result__DUB,(&__string_4));
+  add__IYR(list__FK,(&__string_5));
+  add__IYR(list__FK,(&__string_6));
+  add__IYR(list__FK,(&__string_7));
+  add__IYR(list__FK,(&__string_8));
+  add__IYR(list__FK,(&__string_9));
+  add__IYR(list__FK,(&__string_10));
+  add__IYR(list__FK,(&__string_11));
+  add__IYR(list__FK,(&__string_12));
+  add__IYR(list__FK,(&__string_13));
+  add__IYR(list__FK,(&__string_14));
+  add__IYR(list__FK,(&__string_15));
+  add__IYR(list__FK,(&__string_16));
+  add__IYR(list__FK,(&__string_17));
+  add__IYR(list__FK,(&__string_18));
+  add__IYR(list__FK,(&__string_19));
+  add__IYR(list__FK,(&__string_20));
+  add__IYR(list__FK,(&__string_21));
+  add__IYR(list__FK,(&__string_22));
+  add__IYR(list__FK,(&__string_23));
+  add__IYR(list__FK,(&__string_24));
+  add__IYR(list__FK,(&__string_25));
+  add__IYR(list__FK,(&__string_26));
+  add__IYR(list__FK,(&__string_27));
+  add__IYR(list__FK,(&__string_28));
+  add__IYR(list__FK,(&__string_29));
+  add__IYR(list__FK,(&__string_30));
+  add__IYR(list__FK,(&__string_31));
+  add__IYR(list__FK,(&__string_32));
+  add__IYR(list__FK,(&__string_33));
+  add__IYR(list__FK,(&__string_34));
+  add__IYR(list__FK,(&__string_35));
+  add__IYR(list__FK,(&__string_36));
+  add__IYR(list__FK,(&__string_37));
+  add__IYR(list__FK,(&__string_38));
+  add__IYR(list__FK,(&__string_39));
+  add__IYR(list__FK,(&__string_40));
+  add__IYR(list__FK,(&__string_41));
+  add__IYR(list__FK,(&__string_42));
+  add__IYR(list__FK,(&__string_43));
+  add__IYR(list__FK,(&__string_44));
+  add__IYR(list__FK,(&__string_45));
+  add__IYR(list__FK,(&__string_46));
+  add__IYR(list__FK,(&__string_47));
+  add__IYR(list__FK,(&__string_1));
+  add__IYR(list__FK,(&__string_48));
+  add__IYR(list__FK,(&__string_49));
+  add__IYR(list__FK,(&__string_50));
+  add__IYR(list__FK,(&__string_51));
+  add__IYR(list__FK,(&__string_52));
+  add__IYR(list__FK,(&__string_53));
+  add__IYR(list__FK,(&__string_54));
+  add__IYR(list__FK,(&__string_55));
+  add__IYR(list__FK,(&__string_56));
+  add__IYR(list__FK,(&__string_57));
+  add__IYR(list__FK,(&__string_58));
+  add__IYR(list__FK,(&__string_59));
+  add__IYR(list__FK,(&__string_2));
+  add__IYR(list__FK,(&__string_3));
+  add__IYR(list__FK,(&__string_60));
+  add__IYR(list__FK,(&__string_61));
+  add__IYR(list__FK,(&__string_62));
+  add__IYR(list__FK,(&__string_63));
+  add__IYR(list__FK,(&__string_64));
+  add__IYR(list__FK,(&__string_65));
+  add__IYR(list__FK,(&__string_66));
+  add__IYR(list__FK,(&__string_67));
+  add__IYR(list__FK,(&__string_68));
+  add__IYR(list__FK,(&__string_69));
+  add__IYR(list__FK,(&__string_70));
+  add__IYR(list__FK,(&__string_71));
+  add__IYR(list__FK,(&__string_72));
+  add__IYR(list__FK,(&__string_73));
+  add__IYR(list__FK,(&__string_74));
+  add__IYR(list__FK,(&__string_75));
+  add__IYR(list__FK,(&__string_76));
+  add__IYR(list__FK,(&__string_77));
+  add__IYR(list__FK,(&__string_78));
+  add__IYR(list__FK,(&__string_79));
+  add__IYR(list__FK,(&__string_80));
+  add__IYR(list__FK,(&__string_81));
+  add__IYR(list__FK,(&__string_82));
+  add__IYR(list__FK,(&__string_83));
+  add__IYR(list__FK,(&__string_84));
+  add__IYR(list__FK,(&__string_85));
+  add__IYR(list__FK,(&__string_86));
+  add__IYR(list__FK,(&__string_87));
+  add__IYR(list__FK,(&__string_88));
+  add__IYR(list__FK,(&__string_89));
+  add__IYR(list__FK,(&__string_90));
+  add__IYR(list__FK,(&__string_91));
+  add__IYR(list__FK,(&__string_92));
+  add__IYR(list__FK,(&__string_93));
+  add__IYR(list__FK,(&__string_94));
+  add__IYR(list__FK,(&__string_95));
+  add__IYR(list__FK,(&__string_96));
+  add__IYR(list__FK,(&__string_97));
+  add__IYR(list__FK,(&__string_98));
+  add__IYR(list__FK,(&__string_99));
+  add__IYR(list__FK,(&__string_100));
+  add__IYR(list__FK,(&__string_101));
+  add__IYR(list__FK,(&__string_102));
+  add__IYR(list__FK,(&__string_103));
+  add__IYR(list__FK,(&__string_104));
+  add__IYR(list__FK,(&__string_105));
+  add__IYR(list__FK,(&__string_106));
+  add__IYR(list__FK,(&__string_107));
+  add__IYR(list__FK,(&__string_108));
+  add__IYR(list__FK,(&__string_109));
+  add__IYR(list__FK,(&__string_110));
+  add__IYR(list__FK,(&__string_111));
+  add__IYR(list__FK,(&__string_112));
+  add__IYR(list__FK,(&__string_113));
+  add__IYR(list__FK,(&__string_114));
+  add__IYR(list__FK,(&__string_115));
+  add__IYR(list__FK,(&__string_116));
+  add__IYR(list__FK,(&__string_117));
+  add__IYR(list__FK,(&__string_118));
+  add__IYR(list__FK,(&__string_119));
+  add__IYR(list__FK,(&__string_120));
+  add__IYR(list__FK,(&__string_121));
+  add__IYR(list__FK,(&__string_122));
+  add__IYR(list__FK,(&__string_123));
+  add__IYR(list__FK,(&__string_124));
+  add__IYR(list__FK,(&__string_125));
+  add__IYR(list__FK,(&__string_126));
+  add__IYR(list__FK,(&__string_127));
+  add__IYR(list__FK,(&__string_128));
+  add__IYR(list__FK,(&__string_129));
+  add__IYR(list__FK,(&__string_70));
+  add__IYR(list__FK,(&__string_130));
+  add__IYR(list__FK,(&__string_131));
+  add__IYR(list__FK,(&__string_132));
+  add__IYR(list__FK,(&__string_133));
+  add__IYR(list__FK,(&__string_65));
+  add__IYR(list__FK,(&__string_134));
+  add__IYR(list__FK,(&__string_135));
+  add__IYR(list__FK,(&__string_136));
+  add__IYR(list__FK,(&__string_137));
+  add__IYR(list__FK,(&__string_138));
+  add__IYR(list__FK,(&__string_139));
+  add__IYR(list__FK,(&__string_140));
+  add__IYR(list__FK,(&__string_141));
+  add__IYR(list__FK,(&__string_142));
+  add__IYR(list__FK,(&__string_143));
+  add__IYR(list__FK,(&__string_144));
+  add__IYR(list__FK,(&__string_145));
+  add__IYR(list__FK,(&__string_146));
+  add__IYR(list__FK,(&__string_66));
+  add__IYR(list__FK,(&__string_147));
+  add__IYR(list__FK,(&__string_148));
+  add__IYR(list__FK,(&__string_149));
+  add__IYR(list__FK,(&__string_150));
+  add__IYR(list__FK,(&__string_151));
+  add__IYR(list__FK,(&__string_152));
+  operator__name__WGB((&__string_16));
+  operator__name__WGB((&__string_17));
+  cmd__1Y=NULL;
+  path__4Y=NULL;
+  is_shorter__5Y=TRUE__;
+  j__2Y= 1;
+  while ((j__2Y <= ((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.upper__GKC)) {
+    cmd__1Y=((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y];
+    if ((((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 0] == '-')) {
+      if ((((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'o')) {
+        j__2Y=(__INTEGER)(j__2Y +  1);
+        if ((j__2Y > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.upper__GKC +  1))) {
+          print__WHD((&__string_153));
           exit(( 1));
         };
-        output_name__DI=get__2VB(((void **)((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.storage__LGT)[j__TY]);
-        __tmp__5Z=TRUE__;
+        output_name__DI=get__IWB(((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y]);
+        __tmp__I0=TRUE__;
       } else {
-        __tmp__5Z=FALSE__;
+        __tmp__I0=FALSE__;
       };
-      if (__tmp__5Z) {
-        __tmp__00=TRUE__;
+      if (__tmp__I0) {
+        __tmp__D1=TRUE__;
       } else {
-        result__T5NB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'f');
-        if (result__T5NB) {
-          j__TY=(__INTEGER)(j__TY +  1);
-          if ((j__TY > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.upper__0JC +  1))) {
-            print__KHD((&__string_150));
+        result__55NB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'f');
+        if (result__55NB) {
+          j__2Y=(__INTEGER)(j__2Y +  1);
+          if ((j__2Y > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.upper__GKC +  1))) {
+            print__WHD((&__string_153));
             exit(( 1));
           };
-          format_name__Y0=get__2VB(((void **)((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.storage__LGT)[j__TY]);
+          format_name__B1=get__IWB(((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y]);
         };
-        __tmp__00=result__T5NB;
+        __tmp__D1=result__55NB;
       };
-      if (__tmp__00) {
-        __tmp__I1=TRUE__;
+      if (__tmp__D1) {
+        __tmp__R1=TRUE__;
       } else {
-        result__FAOB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'c');
-        if (result__FAOB) {
-          is_short_code__G1=TRUE__;
+        result__RAOB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'c');
+        if (result__RAOB) {
+          is_short_code__P1=TRUE__;
         };
-        __tmp__I1=result__FAOB;
+        __tmp__R1=result__RAOB;
       };
-      if (__tmp__I1) {
-        __tmp__W1=TRUE__;
+      if (__tmp__R1) {
+        __tmp__51=TRUE__;
       } else {
-        result__XAOB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'p');
-        if (result__XAOB) {
-          is_short_private__U1=TRUE__;
+        result__DBOB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'p');
+        if (result__DBOB) {
+          is_short_private__31=TRUE__;
         };
-        __tmp__W1=result__XAOB;
+        __tmp__51=result__DBOB;
       };
-      if (__tmp__W1) {
-        __tmp__D2=TRUE__;
+      if (__tmp__51) {
+        __tmp__M2=TRUE__;
       } else {
-        result__JBOB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'r');
-        if (result__JBOB) {
+        result__VBOB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'r');
+        if (result__VBOB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__D2=result__JBOB;
+        __tmp__M2=result__VBOB;
       };
-      if ((! __tmp__D2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'd')) {
-          is_shorter__WY=FALSE__;
+      if ((! __tmp__M2)) {
+        if ((((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'd')) {
+          is_shorter__5Y=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
         } else {
-          print__KHD((&__string_150));
+          print__WHD((&__string_153));
           exit(( 1));
         };
       };
     } else {
       if (((void *)input_name__3B != (void *)NULL)) {
-        print__KHD((&__string_150));
+        print__WHD((&__string_153));
         exit(( 1));
       };
-      copy__NCS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.storage__LGT)[j__TY]);
-      input_name__3B=get__2VB(string_tmp__VH);
+      copy__ZCS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y]);
+      input_name__3B=get__IWB(string_tmp__VH);
     };
-    j__TY=(__INTEGER)(j__TY +  1);
+    j__2Y=(__INTEGER)(j__2Y +  1);
   };
   if (((void *)input_name__3B == (void *)NULL)) {
-    print__KHD((&__string_150));
+    print__WHD((&__string_153));
     exit(( 1));
   };
-  if (((void *)format_name__Y0 != (void *)NULL)) {
-    path__VY=((__CHARACTER *)(LISAAC_DIRECTORY));
-    Self__HKC=((__CHARACTER *)path__VY);
-    idx__TKC= 0;
-    while ((! ((idx__TKC >  1024) || ('\0' == Self__HKC[idx__TKC])))) {
-      idx__TKC=(__INTEGER)(idx__TKC +  1);
-    };
-    result__XAAH=NULL;
-    ptr__YAAH=((__POINTER )(NULL));
-    typ_id__ZAAH= 0;
-    sz__0AAH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__0AAH ==  0)) {
-      result__XAAH=STRING_CONSTANT__;
-    } else {
-      typ_id__ZAAH=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__0AAH);
-      if ((typ_id__ZAAH == (__INTEGER)(-  1))) {
-        a__1AAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__2AAH=(__UINTEGER_32)((__UINTEGER_32)(sz__0AAH + a__1AAH) & (__UINTEGER_32)(~ a__1AAH));
-        ptr_table__5NCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2AAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__4NCH=((__POINTER )(NULL));
-        result__AOCH=((__POINTER *)ptr_table__5NCH)[ 0];
-        if ((result__AOCH == (void *)NULL)) {
-          result__AOCH=new_lab__ARJ(new_size__2AAH);
-          next__4NCH=(void *)((unsigned long)result__AOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2AAH)));
-          ((__POINTER *)next__4NCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5NCH)[ 0]=next__4NCH;
-        } else {
-          next__4NCH=((__POINTER *)result__AOCH)[ 0];
-          if ((next__4NCH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AOCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__2AAH <<  1)) <=  4096)) {
-              next__4NCH=(void *)((unsigned long)result__AOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2AAH)));
+  if (((void *)format_name__B1 != (void *)NULL)) {
+    path__4Y=((__CHARACTER *)(LISAAC_DIRECTORY));
+    Self__TKC=((__CHARACTER *)path__4Y);
+    idx__5KC= 0;
+    while ((! ((idx__5KC >  1024) || ('\0' == Self__TKC[idx__5KC])))) {
+      idx__5KC=(__INTEGER)(idx__5KC +  1);
+    };
+    result__DNGH=NULL;
+    ptr__ENGH=((__POINTER )(NULL));
+    typ_id__FNGH= 0;
+    sz__GNGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__GNGH ==  0)) {
+      result__DNGH=STRING_CONSTANT__;
+    } else {
+      typ_id__FNGH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GNGH);
+      if ((typ_id__FNGH == (__INTEGER)(-  1))) {
+        a__HNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__INGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GNGH + a__HNGH) & (__UINTEGER_32)(~ a__HNGH));
+        ptr_table__30IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__INGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__20IH=((__POINTER )(NULL));
+        result__40IH=((__POINTER *)ptr_table__30IH)[ 0];
+        if ((result__40IH == (void *)NULL)) {
+          result__40IH=new_lab__MRJ(new_size__INGH);
+          next__20IH=(void *)((unsigned long)result__40IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__INGH)));
+          ((__POINTER *)next__20IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__30IH)[ 0]=next__20IH;
+        } else {
+          next__20IH=((__POINTER *)result__40IH)[ 0];
+          if ((next__20IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__40IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__INGH <<  1)) <=  4096)) {
+              next__20IH=(void *)((unsigned long)result__40IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__INGH)));
             } else {
-              next__4NCH=new_lab__ARJ(new_size__2AAH);
-            };
-            ((__POINTER *)next__4NCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5NCH)[ 0]=next__4NCH;
-          } else {
-            ((__POINTER *)result__AOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4NCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__AOCH=next__4NCH;
-          };
-        };
-        ptr__YAAH=result__AOCH;
-      } else {
-        t__3AAH=((__UINTEGER_32 )typ_id__ZAAH);
-        a__4AAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__HOCH=(__UINTEGER_32)((__UINTEGER_32)(sz__0AAH + a__4AAH) & (__UINTEGER_32)(~ a__4AAH));
-        ptr_table__EOCH=((__POINTER )(&(table_type[(t__3AAH)])));
-        lab_type__GOCH=(__UINTEGER_32)(t__3AAH |  1);
-        next__DOCH=((__POINTER )(NULL));
-        result__FOCH=((__POINTER *)ptr_table__EOCH)[ 0];
-        if ((result__FOCH == (void *)NULL)) {
-          result__FOCH=new_lab__ARJ(lab_type__GOCH);
-          next__DOCH=(void *)((unsigned long)result__FOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOCH)));
-          ((__POINTER *)next__DOCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EOCH)[ 0]=next__DOCH;
-        } else {
-          next__DOCH=((__POINTER *)result__FOCH)[ 0];
-          if ((next__DOCH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FOCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HOCH <<  1)) <=  4096)) {
-              next__DOCH=(void *)((unsigned long)result__FOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOCH)));
+              next__20IH=new_lab__MRJ(new_size__INGH);
+            };
+            ((__POINTER *)next__20IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__30IH)[ 0]=next__20IH;
+          } else {
+            ((__POINTER *)result__40IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__20IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__40IH=next__20IH;
+          };
+        };
+        ptr__ENGH=result__40IH;
+      } else {
+        t__JNGH=((__UINTEGER_32 )typ_id__FNGH);
+        a__KNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__F1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__GNGH + a__KNGH) & (__UINTEGER_32)(~ a__KNGH));
+        ptr_table__C1IH=((__POINTER )(&(table_type[(t__JNGH)])));
+        lab_type__E1IH=(__UINTEGER_32)(t__JNGH |  1);
+        next__B1IH=((__POINTER )(NULL));
+        result__D1IH=((__POINTER *)ptr_table__C1IH)[ 0];
+        if ((result__D1IH == (void *)NULL)) {
+          result__D1IH=new_lab__MRJ(lab_type__E1IH);
+          next__B1IH=(void *)((unsigned long)result__D1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F1IH)));
+          ((__POINTER *)next__B1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__C1IH)[ 0]=next__B1IH;
+        } else {
+          next__B1IH=((__POINTER *)result__D1IH)[ 0];
+          if ((next__B1IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__F1IH <<  1)) <=  4096)) {
+              next__B1IH=(void *)((unsigned long)result__D1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F1IH)));
             } else {
-              next__DOCH=new_lab__ARJ(lab_type__GOCH);
+              next__B1IH=new_lab__MRJ(lab_type__E1IH);
             };
-            ((__POINTER *)next__DOCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EOCH)[ 0]=next__DOCH;
+            ((__POINTER *)next__B1IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__C1IH)[ 0]=next__B1IH;
           } else {
-            ((__POINTER *)result__FOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FOCH=next__DOCH;
+            ((__POINTER *)result__D1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__D1IH=next__B1IH;
           };
         };
-        ptr__YAAH=result__FOCH;
+        ptr__ENGH=result__D1IH;
       };
-      result__XAAH=((__STRING_CONSTANT *)ptr__YAAH);
-      *(result__XAAH) = *(STRING_CONSTANT__);
+      result__DNGH=((__STRING_CONSTANT *)ptr__ENGH);
+      *(result__DNGH) = *(STRING_CONSTANT__);
     };
-    Self__BWS=((__STRING_CONSTANT *)result__XAAH);
-    Self__BWS->storage__JQO=path__VY;
-    Self__BWS->count__DD=idx__TKC;
-    copy__NCS(string_tmp__VH,result__XAAH);
-    Self__R54G=((__STRING_CONSTANT *)result__XAAH);
-    if ((((__CHARACTER *)Self__R54G->storage__JQO)[(__INTEGER)(Self__R54G->count__DD -  1)] != '/')) {
-      Self__YMS=((__STRING_CONSTANT *)result__XAAH);
-      __tmp__G4=(((__CHARACTER *)Self__YMS->storage__JQO)[(__INTEGER)(Self__YMS->count__DD -  1)] != '\\');
+    Self__NWS=((__STRING_CONSTANT *)result__DNGH);
+    Self__NWS->storage__VQO=path__4Y;
+    Self__NWS->count__DD=idx__5KC;
+    copy__ZCS(string_tmp__VH,result__DNGH);
+    Self__OLFH=((__STRING_CONSTANT *)result__DNGH);
+    if ((((__CHARACTER *)Self__OLFH->storage__VQO)[(__INTEGER)(Self__OLFH->count__DD -  1)] != '/')) {
+      Self__ENS=((__STRING_CONSTANT *)result__DNGH);
+      __tmp__P4=(((__CHARACTER *)Self__ENS->storage__VQO)[(__INTEGER)(Self__ENS->count__DD -  1)] != '\\');
     } else {
-      __tmp__G4=FALSE__;
+      __tmp__P4=FALSE__;
     };
-    if (__tmp__G4) {
-      add_last__NLT(string_tmp__VH,'/');
+    if (__tmp__P4) {
+      add_last__ZLT(string_tmp__VH,'/');
     };
-    append__VNS(string_tmp__VH,(&__string_151));
-    append__VNS(string_tmp__VH,format_name__Y0);
-    append__VNS(string_tmp__VH,(&__string_152));
-    fmt_name__4MC=get__2VB(string_tmp__VH);
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    append__BOS(string_tmp__VH,(&__string_154));
+    append__BOS(string_tmp__VH,format_name__B1);
+    append__BOS(string_tmp__VH,(&__string_155));
+    fmt_name__KNC=get__IWB(string_tmp__VH);
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    if (((void *)get_entry__H0AC(fmt_name__4MC) == (void *)NULL)) {
-      put_string__I1F((&__string_153));
-      put_string__I1F(fmt_name__4MC);
-      put_string__I1F((&__string_154));
+    if (((void *)get_entry__T0AC(fmt_name__KNC) == (void *)NULL)) {
+      put_string__U1F((&__string_156));
+      put_string__U1F(fmt_name__KNC);
+      put_string__U1F((&__string_157));
       exit(( 1));
     };
-    object__3AC=create__name__generic_count__NAC(fmt_name__4MC,(&__string_114));
-    source__DBC=((__PROTOTYPE *)object__3AC)->source__BBC;
-    position__GBC= 1;
-    pos_cur__JBC= 1;
-    pos_line__KBC= 1;
-    pos_col__LBC= 0;
-    while_do__XJF:
+    object__JBC=create__name__generic_count__ZAC(fmt_name__KNC,(&__string_114));
+    source__PBC=((__PROTOTYPE *)object__JBC)->source__NBC;
+    position__SBC= 1;
+    pos_cur__VBC= 1;
+    pos_line__WBC= 1;
+    pos_col__XBC= 0;
+    while_do__DKF:
     {
-      result__IOCH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__IOCH=FALSE__;
+      result__G1IH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__G1IH=FALSE__;
       } else {
-        result__JOCH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__JOCH=((__CHARACTER )(( 0)));
+        result__H1IH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__H1IH=((__CHARACTER )(( 0)));
         } else {
-          result__JOCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__H1IH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__JOCH == '-')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__IOCH=TRUE__;
+        if ((result__H1IH == '-')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__G1IH=TRUE__;
         };
       };
-      if (result__IOCH) {
-        if ((! read_identifier__55K())) {
-          pos__55TG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_155));
-          put_position__IOG(pos__55TG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (result__G1IH) {
+        if ((! read_identifier__LAL())) {
+          pos__ISZG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_158));
+          put_position__UOG(pos__ISZG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__YGKB=NULL;
-        ptr__ZGKB=((__POINTER )(NULL));
-        typ_id__4GKB= 0;
-        sz__1GKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
-        if ((sz__1GKB ==  0)) {
-          result__YGKB=LINKED_LISToSTRING_CONSTANTo__;
-        } else {
-          typ_id__4GKB=__LINKED_LISToSTRING_CONSTANTo__;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__1GKB);
-          if ((typ_id__4GKB == (__INTEGER)(-  1))) {
-            a__U54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__V54G=(__UINTEGER_32)((__UINTEGER_32)(sz__1GKB + a__U54G) & (__UINTEGER_32)(~ a__U54G));
-            ptr_table__MOCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V54G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__LOCH=((__POINTER )(NULL));
-            result__NOCH=((__POINTER *)ptr_table__MOCH)[ 0];
-            if ((result__NOCH == (void *)NULL)) {
-              result__NOCH=new_lab__ARJ(new_size__V54G);
-              next__LOCH=(void *)((unsigned long)result__NOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V54G)));
-              ((__POINTER *)next__LOCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MOCH)[ 0]=next__LOCH;
+        result__EHKB=NULL;
+        ptr__FHKB=((__POINTER )(NULL));
+        typ_id__KHKB= 0;
+        sz__HHKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
+        if ((sz__HHKB ==  0)) {
+          result__EHKB=LINKED_LISToSTRING_CONSTANTo__;
+        } else {
+          typ_id__KHKB=__LINKED_LISToSTRING_CONSTANTo__;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HHKB);
+          if ((typ_id__KHKB == (__INTEGER)(-  1))) {
+            a__RLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__SLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HHKB + a__RLFH) & (__UINTEGER_32)(~ a__RLFH));
+            ptr_table__K1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SLFH / ((__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__MRJ(new_size__SLFH);
+              next__J1IH=(void *)((unsigned long)result__L1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLFH)));
+              ((__POINTER *)next__J1IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__K1IH)[ 0]=next__J1IH;
             } else {
-              next__LOCH=((__POINTER *)result__NOCH)[ 0];
-              if ((next__LOCH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NOCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__V54G <<  1)) <=  4096)) {
-                  next__LOCH=(void *)((unsigned long)result__NOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V54G)));
+              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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SLFH <<  1)) <=  4096)) {
+                  next__J1IH=(void *)((unsigned long)result__L1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLFH)));
                 } else {
-                  next__LOCH=new_lab__ARJ(new_size__V54G);
+                  next__J1IH=new_lab__MRJ(new_size__SLFH);
                 };
-                ((__POINTER *)next__LOCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MOCH)[ 0]=next__LOCH;
+                ((__POINTER *)next__J1IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__K1IH)[ 0]=next__J1IH;
               } else {
-                ((__POINTER *)result__NOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NOCH=next__LOCH;
+                ((__POINTER *)result__L1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__L1IH=next__J1IH;
               };
             };
-            ptr__ZGKB=result__NOCH;
-          } else {
-            t__Z54G=((__UINTEGER_32 )typ_id__4GKB);
-            a__Y54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__UOCH=(__UINTEGER_32)((__UINTEGER_32)(sz__1GKB + a__Y54G) & (__UINTEGER_32)(~ a__Y54G));
-            ptr_table__ROCH=((__POINTER )(&(table_type[(t__Z54G)])));
-            lab_type__TOCH=(__UINTEGER_32)(t__Z54G |  1);
-            next__QOCH=((__POINTER )(NULL));
-            result__SOCH=((__POINTER *)ptr_table__ROCH)[ 0];
-            if ((result__SOCH == (void *)NULL)) {
-              result__SOCH=new_lab__ARJ(lab_type__TOCH);
-              next__QOCH=(void *)((unsigned long)result__SOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UOCH)));
-              ((__POINTER *)next__QOCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ROCH)[ 0]=next__QOCH;
+            ptr__FHKB=result__L1IH;
+          } else {
+            t__WLFH=((__UINTEGER_32 )typ_id__KHKB);
+            a__VLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__S1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__HHKB + a__VLFH) & (__UINTEGER_32)(~ a__VLFH));
+            ptr_table__P1IH=((__POINTER )(&(table_type[(t__WLFH)])));
+            lab_type__R1IH=(__UINTEGER_32)(t__WLFH |  1);
+            next__O1IH=((__POINTER )(NULL));
+            result__Q1IH=((__POINTER *)ptr_table__P1IH)[ 0];
+            if ((result__Q1IH == (void *)NULL)) {
+              result__Q1IH=new_lab__MRJ(lab_type__R1IH);
+              next__O1IH=(void *)((unsigned long)result__Q1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S1IH)));
+              ((__POINTER *)next__O1IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__P1IH)[ 0]=next__O1IH;
             } else {
-              next__QOCH=((__POINTER *)result__SOCH)[ 0];
-              if ((next__QOCH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SOCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UOCH <<  1)) <=  4096)) {
-                  next__QOCH=(void *)((unsigned long)result__SOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UOCH)));
+              next__O1IH=((__POINTER *)result__Q1IH)[ 0];
+              if ((next__O1IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__S1IH <<  1)) <=  4096)) {
+                  next__O1IH=(void *)((unsigned long)result__Q1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S1IH)));
                 } else {
-                  next__QOCH=new_lab__ARJ(lab_type__TOCH);
+                  next__O1IH=new_lab__MRJ(lab_type__R1IH);
                 };
-                ((__POINTER *)next__QOCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ROCH)[ 0]=next__QOCH;
+                ((__POINTER *)next__O1IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__P1IH)[ 0]=next__O1IH;
               } else {
-                ((__POINTER *)result__SOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__SOCH=next__QOCH;
+                ((__POINTER *)result__Q1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__Q1IH=next__O1IH;
               };
             };
-            ptr__ZGKB=result__SOCH;
-          };
-          result__YGKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__ZGKB);
-          *(result__YGKB) = *(LINKED_LISToSTRING_CONSTANTo__);
-        };
-        Self__5AAH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        k__ABAH=last_string__2ZC;
-        Self__EBAH=((__STRING_CONSTANT *)last_string__2ZC);
-        result__DBAH= 0;
-        __tmp__FBAH=Self__EBAH->count__DD;
-        Self__GBAH= 1;
-        while ((Self__GBAH <= __tmp__FBAH)) {
-          result__DBAH=(__INTEGER)((__INTEGER)( 5 * result__DBAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EBAH->storage__JQO)[(__INTEGER)(Self__GBAH -  1)])));
-          Self__GBAH=(__INTEGER)(Self__GBAH +  1);
-        };
-        if ((result__DBAH <  0)) {
-          result__DBAH=(__INTEGER)(~ result__DBAH);
-        };
-        node__BBAH=((void **)Self__5AAH->buckets__TCT)[(__INTEGER)(result__DBAH % Self__5AAH->capacity__OCT)];
-        while ((! (((void *)node__BBAH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BBAH)->key__5CT == (void *)k__ABAH)))) {
-          node__BBAH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BBAH)->next__KDT;
-        };
-        if (((void *)node__BBAH != (void *)NULL)) {
-          pos__JAUG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_156));
-          put_position__IOG(pos__JAUG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+            ptr__FHKB=result__Q1IH;
+          };
+          result__EHKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__FHKB);
+          *(result__EHKB) = *(LINKED_LISToSTRING_CONSTANTo__);
+        };
+        Self__LNGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__MNGH=last_string__I0C;
+        Self__QNGH=((__STRING_CONSTANT *)last_string__I0C);
+        result__PNGH= 0;
+        __tmp__RNGH=Self__QNGH->count__DD;
+        Self__SNGH= 1;
+        while ((Self__SNGH <= __tmp__RNGH)) {
+          result__PNGH=(__INTEGER)((__INTEGER)( 5 * result__PNGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QNGH->storage__VQO)[(__INTEGER)(Self__SNGH -  1)])));
+          Self__SNGH=(__INTEGER)(Self__SNGH +  1);
+        };
+        if ((result__PNGH <  0)) {
+          result__PNGH=(__INTEGER)(~ result__PNGH);
+        };
+        node__NNGH=((void **)Self__LNGH->buckets__5CT)[(__INTEGER)(result__PNGH % Self__LNGH->capacity__0CT)];
+        while ((! (((void *)node__NNGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NNGH)->key__LDT == (void *)k__MNGH)))) {
+          node__NNGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NNGH)->next__WDT;
+        };
+        if (((void *)node__NNGH != (void *)NULL)) {
+          pos__SSZG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_159));
+          put_position__UOG(pos__SSZG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        __tmp__QND=last_string__2ZC;
-        Self__KPEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        k__MPEB=last_string__2ZC;
-        Self__JBAH=((__STRING_CONSTANT *)last_string__2ZC);
-        result__IBAH= 0;
-        __tmp__KBAH=Self__JBAH->count__DD;
-        Self__LBAH= 1;
-        while ((Self__LBAH <= __tmp__KBAH)) {
-          result__IBAH=(__INTEGER)((__INTEGER)( 5 * result__IBAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JBAH->storage__JQO)[(__INTEGER)(Self__LBAH -  1)])));
-          Self__LBAH=(__INTEGER)(Self__LBAH +  1);
-        };
-        if ((result__IBAH <  0)) {
-          result__IBAH=(__INTEGER)(~ result__IBAH);
-        };
-        idx__UPEB=(__INTEGER)(result__IBAH % Self__KPEB->capacity__OCT);
-        node__VPEB=((void **)Self__KPEB->buckets__TCT)[idx__UPEB];
-        while ((! (((void *)node__VPEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VPEB)->key__5CT == (void *)k__MPEB)))) {
-          node__VPEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VPEB)->next__KDT;
-        };
-        if (((void *)node__VPEB == (void *)NULL)) {
-          if ((Self__KPEB->capacity__OCT == Self__KPEB->count__2LY)) {
-            idx__SHZB= 0;
-            node1__WHZB=NULL;
-            node2__XHZB=NULL;
-            old_buckets__VHZB=Self__KPEB->buckets__TCT;
-            new_capacity__THZB=prime_number_ceiling__L41((__INTEGER)(Self__KPEB->capacity__OCT +  1));
-            Self__KPEB->buckets__TCT=create__VF4(new_capacity__THZB);
-            i__UHZB=(__INTEGER)(Self__KPEB->capacity__OCT -  1);
-            Self__KPEB->capacity__OCT=new_capacity__THZB;
-            while ((i__UHZB >=  0)) {
-              node1__WHZB=((void **)old_buckets__VHZB)[i__UHZB];
-              while (((void *)node1__WHZB != (void *)NULL)) {
-                node2__XHZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__WHZB)->next__KDT;
-                Self__OBAH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__WHZB)->key__5CT);
-                result__NBAH= 0;
-                __tmp__PBAH=Self__OBAH->count__DD;
-                Self__QBAH= 1;
-                while ((Self__QBAH <= __tmp__PBAH)) {
-                  result__NBAH=(__INTEGER)((__INTEGER)( 5 * result__NBAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OBAH->storage__JQO)[(__INTEGER)(Self__QBAH -  1)])));
-                  Self__QBAH=(__INTEGER)(Self__QBAH +  1);
+        __tmp__2ND=last_string__I0C;
+        Self__WPEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__YPEB=last_string__I0C;
+        Self__VNGH=((__STRING_CONSTANT *)last_string__I0C);
+        result__UNGH= 0;
+        __tmp__WNGH=Self__VNGH->count__DD;
+        Self__XNGH= 1;
+        while ((Self__XNGH <= __tmp__WNGH)) {
+          result__UNGH=(__INTEGER)((__INTEGER)( 5 * result__UNGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__VNGH->storage__VQO)[(__INTEGER)(Self__XNGH -  1)])));
+          Self__XNGH=(__INTEGER)(Self__XNGH +  1);
+        };
+        if ((result__UNGH <  0)) {
+          result__UNGH=(__INTEGER)(~ result__UNGH);
+        };
+        idx__AQEB=(__INTEGER)(result__UNGH % Self__WPEB->capacity__0CT);
+        node__BQEB=((void **)Self__WPEB->buckets__5CT)[idx__AQEB];
+        while ((! (((void *)node__BQEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BQEB)->key__LDT == (void *)k__YPEB)))) {
+          node__BQEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BQEB)->next__WDT;
+        };
+        if (((void *)node__BQEB == (void *)NULL)) {
+          if ((Self__WPEB->capacity__0CT == Self__WPEB->count__IMY)) {
+            idx__4HZB= 0;
+            node1__CIZB=NULL;
+            node2__DIZB=NULL;
+            old_buckets__BIZB=Self__WPEB->buckets__5CT;
+            new_capacity__5HZB=prime_number_ceiling__X41((__INTEGER)(Self__WPEB->capacity__0CT +  1));
+            Self__WPEB->buckets__5CT=create__BG4(new_capacity__5HZB);
+            i__AIZB=(__INTEGER)(Self__WPEB->capacity__0CT -  1);
+            Self__WPEB->capacity__0CT=new_capacity__5HZB;
+            while ((i__AIZB >=  0)) {
+              node1__CIZB=((void **)old_buckets__BIZB)[i__AIZB];
+              while (((void *)node1__CIZB != (void *)NULL)) {
+                node2__DIZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__CIZB)->next__WDT;
+                Self__0NGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__CIZB)->key__LDT);
+                result__ZNGH= 0;
+                __tmp__1NGH=Self__0NGH->count__DD;
+                Self__2NGH= 1;
+                while ((Self__2NGH <= __tmp__1NGH)) {
+                  result__ZNGH=(__INTEGER)((__INTEGER)( 5 * result__ZNGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__0NGH->storage__VQO)[(__INTEGER)(Self__2NGH -  1)])));
+                  Self__2NGH=(__INTEGER)(Self__2NGH +  1);
                 };
-                if ((result__NBAH <  0)) {
-                  result__NBAH=(__INTEGER)(~ result__NBAH);
+                if ((result__ZNGH <  0)) {
+                  result__ZNGH=(__INTEGER)(~ result__ZNGH);
                 };
-                idx__SHZB=(__INTEGER)(result__NBAH % Self__KPEB->capacity__OCT);
-                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__WHZB)->next__KDT=((void **)Self__KPEB->buckets__TCT)[idx__SHZB];
-                ((void **)Self__KPEB->buckets__TCT)[idx__SHZB]=node1__WHZB;
-                node1__WHZB=node2__XHZB;
+                idx__4HZB=(__INTEGER)(result__ZNGH % Self__WPEB->capacity__0CT);
+                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__CIZB)->next__WDT=((void **)Self__WPEB->buckets__5CT)[idx__4HZB];
+                ((void **)Self__WPEB->buckets__5CT)[idx__4HZB]=node1__CIZB;
+                node1__CIZB=node2__DIZB;
               };
-              i__UHZB=(__INTEGER)(i__UHZB -  1);
-            };
-            idx__UPEB=(__INTEGER)(result__IBAH % new_capacity__THZB);
-          };
-          __tmp__CREB=((void **)Self__KPEB->buckets__TCT)[idx__UPEB];
-          result__1JZB=NULL;
-          ptr__2JZB=((__POINTER )(NULL));
-          typ_id__BKZB= 0;
-          sz__4JZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
-          if ((sz__4JZB ==  0)) {
-            result__1JZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-          } else {
-            typ_id__BKZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__4JZB);
-            if ((typ_id__BKZB == (__INTEGER)(-  1))) {
-              a__554G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__AA5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4JZB + a__554G) & (__UINTEGER_32)(~ a__554G));
-              ptr_table__WOCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AA5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__VOCH=((__POINTER )(NULL));
-              result__XOCH=((__POINTER *)ptr_table__WOCH)[ 0];
-              if ((result__XOCH == (void *)NULL)) {
-                result__XOCH=new_lab__ARJ(new_size__AA5G);
-                next__VOCH=(void *)((unsigned long)result__XOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AA5G)));
-                ((__POINTER *)next__VOCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WOCH)[ 0]=next__VOCH;
+              i__AIZB=(__INTEGER)(i__AIZB -  1);
+            };
+            idx__AQEB=(__INTEGER)(result__UNGH % new_capacity__5HZB);
+          };
+          __tmp__OREB=((void **)Self__WPEB->buckets__5CT)[idx__AQEB];
+          result__HKZB=NULL;
+          ptr__IKZB=((__POINTER )(NULL));
+          typ_id__NKZB= 0;
+          sz__KKZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+          if ((sz__KKZB ==  0)) {
+            result__HKZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+          } else {
+            typ_id__NKZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KKZB);
+            if ((typ_id__NKZB == (__INTEGER)(-  1))) {
+              a__2LFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3LFH=(__UINTEGER_32)((__UINTEGER_32)(sz__KKZB + a__2LFH) & (__UINTEGER_32)(~ a__2LFH));
+              ptr_table__U1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3LFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__T1IH=((__POINTER )(NULL));
+              result__V1IH=((__POINTER *)ptr_table__U1IH)[ 0];
+              if ((result__V1IH == (void *)NULL)) {
+                result__V1IH=new_lab__MRJ(new_size__3LFH);
+                next__T1IH=(void *)((unsigned long)result__V1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3LFH)));
+                ((__POINTER *)next__T1IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__U1IH)[ 0]=next__T1IH;
               } else {
-                next__VOCH=((__POINTER *)result__XOCH)[ 0];
-                if ((next__VOCH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XOCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AA5G <<  1)) <=  4096)) {
-                    next__VOCH=(void *)((unsigned long)result__XOCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AA5G)));
+                next__T1IH=((__POINTER *)result__V1IH)[ 0];
+                if ((next__T1IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3LFH <<  1)) <=  4096)) {
+                    next__T1IH=(void *)((unsigned long)result__V1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3LFH)));
                   } else {
-                    next__VOCH=new_lab__ARJ(new_size__AA5G);
+                    next__T1IH=new_lab__MRJ(new_size__3LFH);
                   };
-                  ((__POINTER *)next__VOCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WOCH)[ 0]=next__VOCH;
+                  ((__POINTER *)next__T1IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__U1IH)[ 0]=next__T1IH;
                 } else {
-                  ((__POINTER *)result__XOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XOCH=next__VOCH;
+                  ((__POINTER *)result__V1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__V1IH=next__T1IH;
                 };
               };
-              ptr__2JZB=result__XOCH;
+              ptr__IKZB=result__V1IH;
             } else {
-              t__EA5G=((__UINTEGER_32 )typ_id__BKZB);
-              a__DA5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__4OCH=(__UINTEGER_32)((__UINTEGER_32)(sz__4JZB + a__DA5G) & (__UINTEGER_32)(~ a__DA5G));
-              ptr_table__1OCH=((__POINTER )(&(table_type[(t__EA5G)])));
-              lab_type__3OCH=(__UINTEGER_32)(t__EA5G |  1);
-              next__0OCH=((__POINTER )(NULL));
-              result__2OCH=((__POINTER *)ptr_table__1OCH)[ 0];
-              if ((result__2OCH == (void *)NULL)) {
-                result__2OCH=new_lab__ARJ(lab_type__3OCH);
-                next__0OCH=(void *)((unsigned long)result__2OCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4OCH)));
-                ((__POINTER *)next__0OCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1OCH)[ 0]=next__0OCH;
+              t__BMFH=((__UINTEGER_32 )typ_id__NKZB);
+              a__AMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__21IH=(__UINTEGER_32)((__UINTEGER_32)(sz__KKZB + a__AMFH) & (__UINTEGER_32)(~ a__AMFH));
+              ptr_table__Z1IH=((__POINTER )(&(table_type[(t__BMFH)])));
+              lab_type__11IH=(__UINTEGER_32)(t__BMFH |  1);
+              next__Y1IH=((__POINTER )(NULL));
+              result__01IH=((__POINTER *)ptr_table__Z1IH)[ 0];
+              if ((result__01IH == (void *)NULL)) {
+                result__01IH=new_lab__MRJ(lab_type__11IH);
+                next__Y1IH=(void *)((unsigned long)result__01IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21IH)));
+                ((__POINTER *)next__Y1IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__Z1IH)[ 0]=next__Y1IH;
               } else {
-                next__0OCH=((__POINTER *)result__2OCH)[ 0];
-                if ((next__0OCH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2OCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4OCH <<  1)) <=  4096)) {
-                    next__0OCH=(void *)((unsigned long)result__2OCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4OCH)));
+                next__Y1IH=((__POINTER *)result__01IH)[ 0];
+                if ((next__Y1IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__01IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__21IH <<  1)) <=  4096)) {
+                    next__Y1IH=(void *)((unsigned long)result__01IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21IH)));
                   } else {
-                    next__0OCH=new_lab__ARJ(lab_type__3OCH);
+                    next__Y1IH=new_lab__MRJ(lab_type__11IH);
                   };
-                  ((__POINTER *)next__0OCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1OCH)[ 0]=next__0OCH;
+                  ((__POINTER *)next__Y1IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__Z1IH)[ 0]=next__Y1IH;
                 } else {
-                  ((__POINTER *)result__2OCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2OCH=next__0OCH;
+                  ((__POINTER *)result__01IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__01IH=next__Y1IH;
                 };
               };
-              ptr__2JZB=result__2OCH;
-            };
-            result__1JZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__2JZB);
-            *(result__1JZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
-          };
-          Self__PDGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1JZB);
-          Self__PDGC->item__1X3=result__YGKB;
-          Self__PDGC->key__5CT=__tmp__QND;
-          Self__PDGC->next__KDT=__tmp__CREB;
-          node__VPEB=result__1JZB;
-          ((void **)Self__KPEB->buckets__TCT)[idx__UPEB]=result__1JZB;
-          Self__KPEB->count__2LY=(__INTEGER)(Self__KPEB->count__2LY +  1);
-        } else {
-          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VPEB)->item__1X3=result__YGKB;
-        };
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__1BUG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_157));
-          put_position__IOG(pos__1BUG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+              ptr__IKZB=result__01IH;
+            };
+            result__HKZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__IKZB);
+            *(result__HKZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+          };
+          Self__1DGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__HKZB);
+          Self__1DGC->item__HY3=result__EHKB;
+          Self__1DGC->key__LDT=__tmp__2ND;
+          Self__1DGC->next__WDT=__tmp__OREB;
+          node__BQEB=result__HKZB;
+          ((void **)Self__WPEB->buckets__5CT)[idx__AQEB]=result__HKZB;
+          Self__WPEB->count__IMY=(__INTEGER)(Self__WPEB->count__IMY +  1);
+        } else {
+          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BQEB)->item__HY3=result__EHKB;
+        };
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__EUZG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_160));
+          put_position__UOG(pos__EUZG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        def__0REB=result__YGKB;
-        result__2REB=FALSE__;
-        if (read_short_elt__5KKB()) {
-          result__2REB=TRUE__;
-          Self__KA5G=((__LINKED_LISToSTRING_CONSTANTo *)result__YGKB);
-          element__JA5G=last_string__2ZC;
-          if (((void *)Self__KA5G->first_link__YTEC == (void *)NULL)) {
-            i__1BAH=last_string__2ZC;
-            result__SBAH=NULL;
-            ptr__TBAH=((__POINTER )(NULL));
-            typ_id__UBAH= 0;
-            sz__VBAH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-            if ((sz__VBAH ==  0)) {
-              result__SBAH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+        def__GSEB=result__EHKB;
+        result__ISEB=FALSE__;
+        if (read_short_elt__LLKB()) {
+          result__ISEB=TRUE__;
+          Self__HMFH=((__LINKED_LISToSTRING_CONSTANTo *)result__EHKB);
+          element__GMFH=last_string__I0C;
+          if (((void *)Self__HMFH->first_link__EUEC == (void *)NULL)) {
+            i__HOGH=last_string__I0C;
+            result__4NGH=NULL;
+            ptr__5NGH=((__POINTER )(NULL));
+            typ_id__AOGH= 0;
+            sz__BOGH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__BOGH ==  0)) {
+              result__4NGH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              typ_id__UBAH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-              clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__VBAH);
-              if ((typ_id__UBAH == (__INTEGER)(-  1))) {
-                a__WBAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__XBAH=(__UINTEGER_32)((__UINTEGER_32)(sz__VBAH + a__WBAH) & (__UINTEGER_32)(~ a__WBAH));
-                ptr_table__APCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XBAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__5OCH=((__POINTER )(NULL));
-                result__BPCH=((__POINTER *)ptr_table__APCH)[ 0];
-                if ((result__BPCH == (void *)NULL)) {
-                  result__BPCH=new_lab__ARJ(new_size__XBAH);
-                  next__5OCH=(void *)((unsigned long)result__BPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBAH)));
-                  ((__POINTER *)next__5OCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__APCH)[ 0]=next__5OCH;
+              typ_id__AOGH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BOGH);
+              if ((typ_id__AOGH == (__INTEGER)(-  1))) {
+                a__COGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__DOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BOGH + a__COGH) & (__UINTEGER_32)(~ a__COGH));
+                ptr_table__41IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__31IH=((__POINTER )(NULL));
+                result__51IH=((__POINTER *)ptr_table__41IH)[ 0];
+                if ((result__51IH == (void *)NULL)) {
+                  result__51IH=new_lab__MRJ(new_size__DOGH);
+                  next__31IH=(void *)((unsigned long)result__51IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOGH)));
+                  ((__POINTER *)next__31IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__41IH)[ 0]=next__31IH;
                 } else {
-                  next__5OCH=((__POINTER *)result__BPCH)[ 0];
-                  if ((next__5OCH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BPCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XBAH <<  1)) <=  4096)) {
-                      next__5OCH=(void *)((unsigned long)result__BPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBAH)));
+                  next__31IH=((__POINTER *)result__51IH)[ 0];
+                  if ((next__31IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__51IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DOGH <<  1)) <=  4096)) {
+                      next__31IH=(void *)((unsigned long)result__51IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOGH)));
                     } else {
-                      next__5OCH=new_lab__ARJ(new_size__XBAH);
+                      next__31IH=new_lab__MRJ(new_size__DOGH);
                     };
-                    ((__POINTER *)next__5OCH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__APCH)[ 0]=next__5OCH;
+                    ((__POINTER *)next__31IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__41IH)[ 0]=next__31IH;
                   } else {
-                    ((__POINTER *)result__BPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BPCH=next__5OCH;
+                    ((__POINTER *)result__51IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__31IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__51IH=next__31IH;
                   };
                 };
-                ptr__TBAH=result__BPCH;
+                ptr__5NGH=result__51IH;
               } else {
-                t__YBAH=((__UINTEGER_32 )typ_id__UBAH);
-                a__ZBAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__IPCH=(__UINTEGER_32)((__UINTEGER_32)(sz__VBAH + a__ZBAH) & (__UINTEGER_32)(~ a__ZBAH));
-                ptr_table__FPCH=((__POINTER )(&(table_type[(t__YBAH)])));
-                lab_type__HPCH=(__UINTEGER_32)(t__YBAH |  1);
-                next__EPCH=((__POINTER )(NULL));
-                result__GPCH=((__POINTER *)ptr_table__FPCH)[ 0];
-                if ((result__GPCH == (void *)NULL)) {
-                  result__GPCH=new_lab__ARJ(lab_type__HPCH);
-                  next__EPCH=(void *)((unsigned long)result__GPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IPCH)));
-                  ((__POINTER *)next__EPCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__FPCH)[ 0]=next__EPCH;
+                t__EOGH=((__UINTEGER_32 )typ_id__AOGH);
+                a__FOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__G2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__BOGH + a__FOGH) & (__UINTEGER_32)(~ a__FOGH));
+                ptr_table__D2IH=((__POINTER )(&(table_type[(t__EOGH)])));
+                lab_type__F2IH=(__UINTEGER_32)(t__EOGH |  1);
+                next__C2IH=((__POINTER )(NULL));
+                result__E2IH=((__POINTER *)ptr_table__D2IH)[ 0];
+                if ((result__E2IH == (void *)NULL)) {
+                  result__E2IH=new_lab__MRJ(lab_type__F2IH);
+                  next__C2IH=(void *)((unsigned long)result__E2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2IH)));
+                  ((__POINTER *)next__C2IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__D2IH)[ 0]=next__C2IH;
                 } else {
-                  next__EPCH=((__POINTER *)result__GPCH)[ 0];
-                  if ((next__EPCH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GPCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__IPCH <<  1)) <=  4096)) {
-                      next__EPCH=(void *)((unsigned long)result__GPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IPCH)));
+                  next__C2IH=((__POINTER *)result__E2IH)[ 0];
+                  if ((next__C2IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__G2IH <<  1)) <=  4096)) {
+                      next__C2IH=(void *)((unsigned long)result__E2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2IH)));
                     } else {
-                      next__EPCH=new_lab__ARJ(lab_type__HPCH);
+                      next__C2IH=new_lab__MRJ(lab_type__F2IH);
                     };
-                    ((__POINTER *)next__EPCH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__FPCH)[ 0]=next__EPCH;
+                    ((__POINTER *)next__C2IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__D2IH)[ 0]=next__C2IH;
                   } else {
-                    ((__POINTER *)result__GPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__GPCH=next__EPCH;
+                    ((__POINTER *)result__E2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__E2IH=next__C2IH;
                   };
                 };
-                ptr__TBAH=result__GPCH;
+                ptr__5NGH=result__E2IH;
               };
-              result__SBAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__TBAH);
-              *(result__SBAH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
-            };
-            Self__0BAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__SBAH);
-            Self__0BAH->item__OVHD=i__1BAH;
-            Self__0BAH->next__AOOD=NULL;
-            Self__KA5G->first_link__YTEC=result__SBAH;
-            Self__KA5G->parent_linked_collection__LD.upper__TCD= 1;
-            Self__KA5G->last_link__BUEC=result__SBAH;
-            Self__KA5G->mem_idx__CUEC= 1;
-            Self__KA5G->mem_lnk__EUEC=result__SBAH;
-          } else {
-            result__2BAH=NULL;
-            ptr__3BAH=((__POINTER )(NULL));
-            typ_id__4BAH= 0;
-            sz__5BAH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-            if ((sz__5BAH ==  0)) {
-              result__2BAH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              result__4NGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__5NGH);
+              *(result__4NGH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+            };
+            Self__GOGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__4NGH);
+            Self__GOGH->item__0VHD=i__HOGH;
+            Self__GOGH->next__MOOD=NULL;
+            Self__HMFH->first_link__EUEC=result__4NGH;
+            Self__HMFH->parent_linked_collection__LD.upper__5CD= 1;
+            Self__HMFH->last_link__NUEC=result__4NGH;
+            Self__HMFH->mem_idx__OUEC= 1;
+            Self__HMFH->mem_lnk__QUEC=result__4NGH;
+          } else {
+            result__IOGH=NULL;
+            ptr__JOGH=((__POINTER )(NULL));
+            typ_id__KOGH= 0;
+            sz__LOGH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__LOGH ==  0)) {
+              result__IOGH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              typ_id__4BAH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-              clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__5BAH);
-              if ((typ_id__4BAH == (__INTEGER)(-  1))) {
-                a__ACAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__BCAH=(__UINTEGER_32)((__UINTEGER_32)(sz__5BAH + a__ACAH) & (__UINTEGER_32)(~ a__ACAH));
-                ptr_table__KPCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BCAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__JPCH=((__POINTER )(NULL));
-                result__LPCH=((__POINTER *)ptr_table__KPCH)[ 0];
-                if ((result__LPCH == (void *)NULL)) {
-                  result__LPCH=new_lab__ARJ(new_size__BCAH);
-                  next__JPCH=(void *)((unsigned long)result__LPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCAH)));
-                  ((__POINTER *)next__JPCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KPCH)[ 0]=next__JPCH;
+              typ_id__KOGH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__LOGH);
+              if ((typ_id__KOGH == (__INTEGER)(-  1))) {
+                a__MOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__NOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__LOGH + a__MOGH) & (__UINTEGER_32)(~ a__MOGH));
+                ptr_table__I2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__H2IH=((__POINTER )(NULL));
+                result__J2IH=((__POINTER *)ptr_table__I2IH)[ 0];
+                if ((result__J2IH == (void *)NULL)) {
+                  result__J2IH=new_lab__MRJ(new_size__NOGH);
+                  next__H2IH=(void *)((unsigned long)result__J2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NOGH)));
+                  ((__POINTER *)next__H2IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__I2IH)[ 0]=next__H2IH;
                 } else {
-                  next__JPCH=((__POINTER *)result__LPCH)[ 0];
-                  if ((next__JPCH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LPCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BCAH <<  1)) <=  4096)) {
-                      next__JPCH=(void *)((unsigned long)result__LPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCAH)));
+                  next__H2IH=((__POINTER *)result__J2IH)[ 0];
+                  if ((next__H2IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NOGH <<  1)) <=  4096)) {
+                      next__H2IH=(void *)((unsigned long)result__J2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NOGH)));
                     } else {
-                      next__JPCH=new_lab__ARJ(new_size__BCAH);
+                      next__H2IH=new_lab__MRJ(new_size__NOGH);
                     };
-                    ((__POINTER *)next__JPCH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__KPCH)[ 0]=next__JPCH;
+                    ((__POINTER *)next__H2IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__I2IH)[ 0]=next__H2IH;
                   } else {
-                    ((__POINTER *)result__LPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__LPCH=next__JPCH;
+                    ((__POINTER *)result__J2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__J2IH=next__H2IH;
                   };
                 };
-                ptr__3BAH=result__LPCH;
+                ptr__JOGH=result__J2IH;
               } else {
-                t__CCAH=((__UINTEGER_32 )typ_id__4BAH);
-                a__DCAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__SPCH=(__UINTEGER_32)((__UINTEGER_32)(sz__5BAH + a__DCAH) & (__UINTEGER_32)(~ a__DCAH));
-                ptr_table__PPCH=((__POINTER )(&(table_type[(t__CCAH)])));
-                lab_type__RPCH=(__UINTEGER_32)(t__CCAH |  1);
-                next__OPCH=((__POINTER )(NULL));
-                result__QPCH=((__POINTER *)ptr_table__PPCH)[ 0];
-                if ((result__QPCH == (void *)NULL)) {
-                  result__QPCH=new_lab__ARJ(lab_type__RPCH);
-                  next__OPCH=(void *)((unsigned long)result__QPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SPCH)));
-                  ((__POINTER *)next__OPCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PPCH)[ 0]=next__OPCH;
+                t__OOGH=((__UINTEGER_32 )typ_id__KOGH);
+                a__POGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__Q2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__LOGH + a__POGH) & (__UINTEGER_32)(~ a__POGH));
+                ptr_table__N2IH=((__POINTER )(&(table_type[(t__OOGH)])));
+                lab_type__P2IH=(__UINTEGER_32)(t__OOGH |  1);
+                next__M2IH=((__POINTER )(NULL));
+                result__O2IH=((__POINTER *)ptr_table__N2IH)[ 0];
+                if ((result__O2IH == (void *)NULL)) {
+                  result__O2IH=new_lab__MRJ(lab_type__P2IH);
+                  next__M2IH=(void *)((unsigned long)result__O2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2IH)));
+                  ((__POINTER *)next__M2IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__N2IH)[ 0]=next__M2IH;
                 } else {
-                  next__OPCH=((__POINTER *)result__QPCH)[ 0];
-                  if ((next__OPCH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QPCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SPCH <<  1)) <=  4096)) {
-                      next__OPCH=(void *)((unsigned long)result__QPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SPCH)));
+                  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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q2IH <<  1)) <=  4096)) {
+                      next__M2IH=(void *)((unsigned long)result__O2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2IH)));
                     } else {
-                      next__OPCH=new_lab__ARJ(lab_type__RPCH);
+                      next__M2IH=new_lab__MRJ(lab_type__P2IH);
                     };
-                    ((__POINTER *)next__OPCH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__PPCH)[ 0]=next__OPCH;
+                    ((__POINTER *)next__M2IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__N2IH)[ 0]=next__M2IH;
                   } else {
-                    ((__POINTER *)result__QPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__QPCH=next__OPCH;
+                    ((__POINTER *)result__O2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__O2IH=next__M2IH;
                   };
                 };
-                ptr__3BAH=result__QPCH;
+                ptr__JOGH=result__O2IH;
               };
-              result__2BAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__3BAH);
-              *(result__2BAH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__IOGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__JOGH);
+              *(result__IOGH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            Self__ECAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__2BAH);
-            Self__ECAH->item__OVHD=element__JA5G;
-            Self__ECAH->next__AOOD=NULL;
-            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__KA5G->last_link__BUEC)->next__AOOD=result__2BAH;
-            Self__KA5G->parent_linked_collection__LD.upper__TCD=(__INTEGER)(Self__KA5G->parent_linked_collection__LD.upper__TCD +  1);
-            Self__KA5G->last_link__BUEC=result__2BAH;
+            Self__QOGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__IOGH);
+            Self__QOGH->item__0VHD=element__GMFH;
+            Self__QOGH->next__MOOD=NULL;
+            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__HMFH->last_link__NUEC)->next__MOOD=result__IOGH;
+            Self__HMFH->parent_linked_collection__LD.upper__5CD=(__INTEGER)(Self__HMFH->parent_linked_collection__LD.upper__5CD +  1);
+            Self__HMFH->last_link__NUEC=result__IOGH;
           };
-          while_do__WRSB:
+          while_do__CSSB:
           {
-            result__TPCH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__TPCH=FALSE__;
+            result__R2IH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__R2IH=FALSE__;
             } else {
-              result__UPCH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__UPCH=((__CHARACTER )(( 0)));
+              result__S2IH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__S2IH=((__CHARACTER )(( 0)));
               } else {
-                result__UPCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__S2IH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__UPCH == '+')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__TPCH=TRUE__;
+              if ((result__S2IH == '+')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__R2IH=TRUE__;
               };
             };
-            if (result__TPCH) {
-              if ((! read_short_elt__5KKB())) {
-                pos__3BUG=current_position__3WF();
-                put_error__text__4MG( 0,(&__string_158));
-                put_position__IOG(pos__3BUG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+            if (result__R2IH) {
+              if ((! read_short_elt__LLKB())) {
+                pos__GUZG=current_position__JXF();
+                put_error__text__KNG( 0,(&__string_161));
+                put_position__UOG(pos__GUZG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
-              Self__TTEC=((__LINKED_LISToSTRING_CONSTANTo *)def__0REB);
-              element__UTEC=last_string__2ZC;
-              if (((void *)Self__TTEC->first_link__YTEC == (void *)NULL)) {
-                i__PCAH=last_string__2ZC;
-                result__GCAH=NULL;
-                ptr__HCAH=((__POINTER )(NULL));
-                typ_id__ICAH= 0;
-                sz__JCAH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-                if ((sz__JCAH ==  0)) {
-                  result__GCAH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              Self__5TEC=((__LINKED_LISToSTRING_CONSTANTo *)def__GSEB);
+              element__AUEC=last_string__I0C;
+              if (((void *)Self__5TEC->first_link__EUEC == (void *)NULL)) {
+                i__1OGH=last_string__I0C;
+                result__SOGH=NULL;
+                ptr__TOGH=((__POINTER )(NULL));
+                typ_id__UOGH= 0;
+                sz__VOGH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__VOGH ==  0)) {
+                  result__SOGH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  typ_id__ICAH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__JCAH);
-                  if ((typ_id__ICAH == (__INTEGER)(-  1))) {
-                    a__KCAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__LCAH=(__UINTEGER_32)((__UINTEGER_32)(sz__JCAH + a__KCAH) & (__UINTEGER_32)(~ a__KCAH));
-                    ptr_table__XPCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LCAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__WPCH=((__POINTER )(NULL));
-                    result__YPCH=((__POINTER *)ptr_table__XPCH)[ 0];
-                    if ((result__YPCH == (void *)NULL)) {
-                      result__YPCH=new_lab__ARJ(new_size__LCAH);
-                      next__WPCH=(void *)((unsigned long)result__YPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCAH)));
-                      ((__POINTER *)next__WPCH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__XPCH)[ 0]=next__WPCH;
+                  typ_id__UOGH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__VOGH);
+                  if ((typ_id__UOGH == (__INTEGER)(-  1))) {
+                    a__WOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__XOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VOGH + a__WOGH) & (__UINTEGER_32)(~ a__WOGH));
+                    ptr_table__V2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__U2IH=((__POINTER )(NULL));
+                    result__W2IH=((__POINTER *)ptr_table__V2IH)[ 0];
+                    if ((result__W2IH == (void *)NULL)) {
+                      result__W2IH=new_lab__MRJ(new_size__XOGH);
+                      next__U2IH=(void *)((unsigned long)result__W2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOGH)));
+                      ((__POINTER *)next__U2IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__V2IH)[ 0]=next__U2IH;
                     } else {
-                      next__WPCH=((__POINTER *)result__YPCH)[ 0];
-                      if ((next__WPCH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YPCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LCAH <<  1)) <=  4096)) {
-                          next__WPCH=(void *)((unsigned long)result__YPCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCAH)));
+                      next__U2IH=((__POINTER *)result__W2IH)[ 0];
+                      if ((next__U2IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XOGH <<  1)) <=  4096)) {
+                          next__U2IH=(void *)((unsigned long)result__W2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOGH)));
                         } else {
-                          next__WPCH=new_lab__ARJ(new_size__LCAH);
+                          next__U2IH=new_lab__MRJ(new_size__XOGH);
                         };
-                        ((__POINTER *)next__WPCH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__XPCH)[ 0]=next__WPCH;
+                        ((__POINTER *)next__U2IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__V2IH)[ 0]=next__U2IH;
                       } else {
-                        ((__POINTER *)result__YPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__YPCH=next__WPCH;
+                        ((__POINTER *)result__W2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__W2IH=next__U2IH;
                       };
                     };
-                    ptr__HCAH=result__YPCH;
+                    ptr__TOGH=result__W2IH;
                   } else {
-                    t__MCAH=((__UINTEGER_32 )typ_id__ICAH);
-                    a__NCAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__5PCH=(__UINTEGER_32)((__UINTEGER_32)(sz__JCAH + a__NCAH) & (__UINTEGER_32)(~ a__NCAH));
-                    ptr_table__2PCH=((__POINTER )(&(table_type[(t__MCAH)])));
-                    lab_type__4PCH=(__UINTEGER_32)(t__MCAH |  1);
-                    next__1PCH=((__POINTER )(NULL));
-                    result__3PCH=((__POINTER *)ptr_table__2PCH)[ 0];
-                    if ((result__3PCH == (void *)NULL)) {
-                      result__3PCH=new_lab__ARJ(lab_type__4PCH);
-                      next__1PCH=(void *)((unsigned long)result__3PCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5PCH)));
-                      ((__POINTER *)next__1PCH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__2PCH)[ 0]=next__1PCH;
+                    t__YOGH=((__UINTEGER_32 )typ_id__UOGH);
+                    a__ZOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__32IH=(__UINTEGER_32)((__UINTEGER_32)(sz__VOGH + a__ZOGH) & (__UINTEGER_32)(~ a__ZOGH));
+                    ptr_table__02IH=((__POINTER )(&(table_type[(t__YOGH)])));
+                    lab_type__22IH=(__UINTEGER_32)(t__YOGH |  1);
+                    next__Z2IH=((__POINTER )(NULL));
+                    result__12IH=((__POINTER *)ptr_table__02IH)[ 0];
+                    if ((result__12IH == (void *)NULL)) {
+                      result__12IH=new_lab__MRJ(lab_type__22IH);
+                      next__Z2IH=(void *)((unsigned long)result__12IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__32IH)));
+                      ((__POINTER *)next__Z2IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__02IH)[ 0]=next__Z2IH;
                     } else {
-                      next__1PCH=((__POINTER *)result__3PCH)[ 0];
-                      if ((next__1PCH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3PCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5PCH <<  1)) <=  4096)) {
-                          next__1PCH=(void *)((unsigned long)result__3PCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5PCH)));
+                      next__Z2IH=((__POINTER *)result__12IH)[ 0];
+                      if ((next__Z2IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__12IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__32IH <<  1)) <=  4096)) {
+                          next__Z2IH=(void *)((unsigned long)result__12IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__32IH)));
                         } else {
-                          next__1PCH=new_lab__ARJ(lab_type__4PCH);
+                          next__Z2IH=new_lab__MRJ(lab_type__22IH);
                         };
-                        ((__POINTER *)next__1PCH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__2PCH)[ 0]=next__1PCH;
+                        ((__POINTER *)next__Z2IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__02IH)[ 0]=next__Z2IH;
                       } else {
-                        ((__POINTER *)result__3PCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__3PCH=next__1PCH;
+                        ((__POINTER *)result__12IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__12IH=next__Z2IH;
                       };
                     };
-                    ptr__HCAH=result__3PCH;
+                    ptr__TOGH=result__12IH;
                   };
-                  result__GCAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__HCAH);
-                  *(result__GCAH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__SOGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__TOGH);
+                  *(result__SOGH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                Self__OCAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__GCAH);
-                Self__OCAH->item__OVHD=i__PCAH;
-                Self__OCAH->next__AOOD=NULL;
-                Self__TTEC->first_link__YTEC=result__GCAH;
-                Self__TTEC->parent_linked_collection__LD.upper__TCD= 1;
-                Self__TTEC->last_link__BUEC=result__GCAH;
-                Self__TTEC->mem_idx__CUEC= 1;
-                Self__TTEC->mem_lnk__EUEC=result__GCAH;
+                Self__0OGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__SOGH);
+                Self__0OGH->item__0VHD=i__1OGH;
+                Self__0OGH->next__MOOD=NULL;
+                Self__5TEC->first_link__EUEC=result__SOGH;
+                Self__5TEC->parent_linked_collection__LD.upper__5CD= 1;
+                Self__5TEC->last_link__NUEC=result__SOGH;
+                Self__5TEC->mem_idx__OUEC= 1;
+                Self__5TEC->mem_lnk__QUEC=result__SOGH;
               } else {
-                result__UOED=NULL;
-                ptr__VOED=((__POINTER )(NULL));
-                typ_id__0OED= 0;
-                sz__XOED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-                if ((sz__XOED ==  0)) {
-                  result__UOED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                result__APED=NULL;
+                ptr__BPED=((__POINTER )(NULL));
+                typ_id__GPED= 0;
+                sz__DPED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__DPED ==  0)) {
+                  result__APED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  typ_id__0OED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__XOED);
-                  if ((typ_id__0OED == (__INTEGER)(-  1))) {
-                    a__YW3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__ZW3G=(__UINTEGER_32)((__UINTEGER_32)(sz__XOED + a__YW3G) & (__UINTEGER_32)(~ a__YW3G));
-                    ptr_table__BQCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZW3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__AQCH=((__POINTER )(NULL));
-                    result__CQCH=((__POINTER *)ptr_table__BQCH)[ 0];
-                    if ((result__CQCH == (void *)NULL)) {
-                      result__CQCH=new_lab__ARJ(new_size__ZW3G);
-                      next__AQCH=(void *)((unsigned long)result__CQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZW3G)));
-                      ((__POINTER *)next__AQCH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__BQCH)[ 0]=next__AQCH;
+                  typ_id__GPED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__DPED);
+                  if ((typ_id__GPED == (__INTEGER)(-  1))) {
+                    a__HCEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ICEH=(__UINTEGER_32)((__UINTEGER_32)(sz__DPED + a__HCEH) & (__UINTEGER_32)(~ a__HCEH));
+                    ptr_table__52IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ICEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__42IH=((__POINTER )(NULL));
+                    result__A3IH=((__POINTER *)ptr_table__52IH)[ 0];
+                    if ((result__A3IH == (void *)NULL)) {
+                      result__A3IH=new_lab__MRJ(new_size__ICEH);
+                      next__42IH=(void *)((unsigned long)result__A3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ICEH)));
+                      ((__POINTER *)next__42IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__52IH)[ 0]=next__42IH;
                     } else {
-                      next__AQCH=((__POINTER *)result__CQCH)[ 0];
-                      if ((next__AQCH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CQCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZW3G <<  1)) <=  4096)) {
-                          next__AQCH=(void *)((unsigned long)result__CQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZW3G)));
+                      next__42IH=((__POINTER *)result__A3IH)[ 0];
+                      if ((next__42IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ICEH <<  1)) <=  4096)) {
+                          next__42IH=(void *)((unsigned long)result__A3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ICEH)));
                         } else {
-                          next__AQCH=new_lab__ARJ(new_size__ZW3G);
+                          next__42IH=new_lab__MRJ(new_size__ICEH);
                         };
-                        ((__POINTER *)next__AQCH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__BQCH)[ 0]=next__AQCH;
+                        ((__POINTER *)next__42IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__52IH)[ 0]=next__42IH;
                       } else {
-                        ((__POINTER *)result__CQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__CQCH=next__AQCH;
+                        ((__POINTER *)result__A3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__42IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__A3IH=next__42IH;
                       };
                     };
-                    ptr__VOED=result__CQCH;
+                    ptr__BPED=result__A3IH;
                   } else {
-                    t__3W3G=((__UINTEGER_32 )typ_id__0OED);
-                    a__2W3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__JQCH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOED + a__2W3G) & (__UINTEGER_32)(~ a__2W3G));
-                    ptr_table__GQCH=((__POINTER )(&(table_type[(t__3W3G)])));
-                    lab_type__IQCH=(__UINTEGER_32)(t__3W3G |  1);
-                    next__FQCH=((__POINTER )(NULL));
-                    result__HQCH=((__POINTER *)ptr_table__GQCH)[ 0];
-                    if ((result__HQCH == (void *)NULL)) {
-                      result__HQCH=new_lab__ARJ(lab_type__IQCH);
-                      next__FQCH=(void *)((unsigned long)result__HQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQCH)));
-                      ((__POINTER *)next__FQCH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__GQCH)[ 0]=next__FQCH;
+                    t__MCEH=((__UINTEGER_32 )typ_id__GPED);
+                    a__LCEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__H3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__DPED + a__LCEH) & (__UINTEGER_32)(~ a__LCEH));
+                    ptr_table__E3IH=((__POINTER )(&(table_type[(t__MCEH)])));
+                    lab_type__G3IH=(__UINTEGER_32)(t__MCEH |  1);
+                    next__D3IH=((__POINTER )(NULL));
+                    result__F3IH=((__POINTER *)ptr_table__E3IH)[ 0];
+                    if ((result__F3IH == (void *)NULL)) {
+                      result__F3IH=new_lab__MRJ(lab_type__G3IH);
+                      next__D3IH=(void *)((unsigned long)result__F3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H3IH)));
+                      ((__POINTER *)next__D3IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__E3IH)[ 0]=next__D3IH;
                     } else {
-                      next__FQCH=((__POINTER *)result__HQCH)[ 0];
-                      if ((next__FQCH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HQCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JQCH <<  1)) <=  4096)) {
-                          next__FQCH=(void *)((unsigned long)result__HQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQCH)));
+                      next__D3IH=((__POINTER *)result__F3IH)[ 0];
+                      if ((next__D3IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__H3IH <<  1)) <=  4096)) {
+                          next__D3IH=(void *)((unsigned long)result__F3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H3IH)));
                         } else {
-                          next__FQCH=new_lab__ARJ(lab_type__IQCH);
+                          next__D3IH=new_lab__MRJ(lab_type__G3IH);
                         };
-                        ((__POINTER *)next__FQCH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__GQCH)[ 0]=next__FQCH;
+                        ((__POINTER *)next__D3IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__E3IH)[ 0]=next__D3IH;
                       } else {
-                        ((__POINTER *)result__HQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__HQCH=next__FQCH;
+                        ((__POINTER *)result__F3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__F3IH=next__D3IH;
                       };
                     };
-                    ptr__VOED=result__HQCH;
+                    ptr__BPED=result__F3IH;
                   };
-                  result__UOED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__VOED);
-                  *(result__UOED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__APED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__BPED);
+                  *(result__APED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                Self__UKSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__UOED);
-                Self__UKSD->item__OVHD=element__UTEC;
-                Self__UKSD->next__AOOD=NULL;
-                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__TTEC->last_link__BUEC)->next__AOOD=result__UOED;
-                Self__TTEC->parent_linked_collection__LD.upper__TCD=(__INTEGER)(Self__TTEC->parent_linked_collection__LD.upper__TCD +  1);
-                Self__TTEC->last_link__BUEC=result__UOED;
+                Self__ALSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__APED);
+                Self__ALSD->item__0VHD=element__AUEC;
+                Self__ALSD->next__MOOD=NULL;
+                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__5TEC->last_link__NUEC)->next__MOOD=result__APED;
+                Self__5TEC->parent_linked_collection__LD.upper__5CD=(__INTEGER)(Self__5TEC->parent_linked_collection__LD.upper__5CD +  1);
+                Self__5TEC->last_link__NUEC=result__APED;
               };
-              goto while_do__WRSB;
+              goto while_do__CSSB;
             };
           };
         };
-        if ((! result__2REB)) {
-          pos__5BUG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_159));
-          put_position__IOG(pos__5BUG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__ISEB)) {
+          pos__IUZG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_162));
+          put_position__UOG(pos__IUZG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__PGG=FALSE__;
-        if ((! read_space__RRD())) {
-          result__PGG=FALSE__;
+        result__1GG=FALSE__;
+        if ((! read_space__3RD())) {
+          result__1GG=FALSE__;
         } else {
-          result__TJ1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__TJ1G=((__CHARACTER )(( 0)));
+          result__3SBH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__3SBH=((__CHARACTER )(( 0)));
           } else {
-            result__TJ1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__3SBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__TJ1G == ';')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__PGG=TRUE__;
+          if ((result__3SBH == ';')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__1GG=TRUE__;
           };
         };
-        if ((! result__PGG)) {
-          pos__BCUG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_160));
-          put_position__IOG(pos__BCUG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__1GG)) {
+          pos__KUZG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_163));
+          put_position__UOG(pos__KUZG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__XJF;
+        goto while_do__DKF;
       };
     };
-    read_space__RRD();
-    result__OB1G='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__OB1G=((__CHARACTER )(( 0)));
+    read_space__3RD();
+    result__GKBH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__GKBH=((__CHARACTER )(( 0)));
     } else {
-      result__OB1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__GKBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__OB1G != ((__CHARACTER )(( 0))))) {
-      pos__DCUG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_161));
-      put_position__IOG(pos__DCUG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    if ((result__GKBH != ((__CHARACTER )(( 0))))) {
+      pos__MUZG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_164));
+      put_position__UOG(pos__MUZG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    object__3AC=NULL;
+    object__JBC=NULL;
   };
-  index_count__04=(__INTEGER)(index_count__04 +  1);
-  fast_put__to__M1R(result__BOC,(&__string_2));
-  result__AYB=NULL;
-  ptr__BYB=((__POINTER )(NULL));
-  typ_id__GYB= 0;
-  sz__DYB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
-  if ((sz__DYB ==  0)) {
-    result__AYB=FAST_ARRAYoSLOTo__;
+  index_count__D5=(__INTEGER)(index_count__D5 +  1);
+  fast_put__to__Y1R(result__NOC,(&__string_2));
+  result__MYB=NULL;
+  ptr__NYB=((__POINTER )(NULL));
+  typ_id__SYB= 0;
+  sz__PYB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
+  if ((sz__PYB ==  0)) {
+    result__MYB=FAST_ARRAYoSLOTo__;
   } else {
-    typ_id__GYB=__FAST_ARRAYoSLOTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__DYB);
-    if ((typ_id__GYB == (__INTEGER)(-  1))) {
-      a__NA5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OA5G=(__UINTEGER_32)((__UINTEGER_32)(sz__DYB + a__NA5G) & (__UINTEGER_32)(~ a__NA5G));
-      ptr_table__LQCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OA5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__KQCH=((__POINTER )(NULL));
-      result__MQCH=((__POINTER *)ptr_table__LQCH)[ 0];
-      if ((result__MQCH == (void *)NULL)) {
-        result__MQCH=new_lab__ARJ(new_size__OA5G);
-        next__KQCH=(void *)((unsigned long)result__MQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OA5G)));
-        ((__POINTER *)next__KQCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LQCH)[ 0]=next__KQCH;
-      } else {
-        next__KQCH=((__POINTER *)result__MQCH)[ 0];
-        if ((next__KQCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MQCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__OA5G <<  1)) <=  4096)) {
-            next__KQCH=(void *)((unsigned long)result__MQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OA5G)));
-          } else {
-            next__KQCH=new_lab__ARJ(new_size__OA5G);
-          };
-          ((__POINTER *)next__KQCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LQCH)[ 0]=next__KQCH;
-        } else {
-          ((__POINTER *)result__MQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MQCH=next__KQCH;
-        };
-      };
-      ptr__BYB=result__MQCH;
-    } else {
-      t__SA5G=((__UINTEGER_32 )typ_id__GYB);
-      a__RA5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TQCH=(__UINTEGER_32)((__UINTEGER_32)(sz__DYB + a__RA5G) & (__UINTEGER_32)(~ a__RA5G));
-      ptr_table__QQCH=((__POINTER )(&(table_type[(t__SA5G)])));
-      lab_type__SQCH=(__UINTEGER_32)(t__SA5G |  1);
-      next__PQCH=((__POINTER )(NULL));
-      result__RQCH=((__POINTER *)ptr_table__QQCH)[ 0];
-      if ((result__RQCH == (void *)NULL)) {
-        result__RQCH=new_lab__ARJ(lab_type__SQCH);
-        next__PQCH=(void *)((unsigned long)result__RQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQCH)));
-        ((__POINTER *)next__PQCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QQCH)[ 0]=next__PQCH;
-      } else {
-        next__PQCH=((__POINTER *)result__RQCH)[ 0];
-        if ((next__PQCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RQCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TQCH <<  1)) <=  4096)) {
-            next__PQCH=(void *)((unsigned long)result__RQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQCH)));
-          } else {
-            next__PQCH=new_lab__ARJ(lab_type__SQCH);
-          };
-          ((__POINTER *)next__PQCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QQCH)[ 0]=next__PQCH;
-        } else {
-          ((__POINTER *)result__RQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RQCH=next__PQCH;
-        };
-      };
-      ptr__BYB=result__RQCH;
-    };
-    result__AYB=((__FAST_ARRAYoSLOTo *)ptr__BYB);
-    *(result__AYB) = *(FAST_ARRAYoSLOTo__);
-  };
-  Self__5DS=((__FAST_ARRAYoSLOTo *)result__AYB);
-  if ((Self__5DS->parent_arrayed_collection__M5.capacity__IES <  1)) {
-    sz__CZ2G=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
-    result__BZ2G=((__POINTER )(NULL));
-    a__HZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__DZ2G=(__UINTEGER_32)((__UINTEGER_32)(sz__CZ2G + a__HZ2G) & (__UINTEGER_32)(~ a__HZ2G));
-    new_size2__EZ2G=(__UINTEGER_32)(new_size__DZ2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__EZ2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__VA5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__WA5G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EZ2G + a__VA5G) & (__UINTEGER_32)(~ a__VA5G));
-      ptr_table__VQCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WA5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__UQCH=((__POINTER )(NULL));
-      result__WQCH=((__POINTER *)ptr_table__VQCH)[ 0];
-      if ((result__WQCH == (void *)NULL)) {
-        result__WQCH=new_lab__ARJ(new_size__WA5G);
-        next__UQCH=(void *)((unsigned long)result__WQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WA5G)));
-        ((__POINTER *)next__UQCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VQCH)[ 0]=next__UQCH;
-      } else {
-        next__UQCH=((__POINTER *)result__WQCH)[ 0];
-        if ((next__UQCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WQCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WA5G <<  1)) <=  4096)) {
-            next__UQCH=(void *)((unsigned long)result__WQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WA5G)));
-          } else {
-            next__UQCH=new_lab__ARJ(new_size__WA5G);
-          };
-          ((__POINTER *)next__UQCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VQCH)[ 0]=next__UQCH;
-        } else {
-          ((__POINTER *)result__WQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WQCH=next__UQCH;
-        };
-      };
-      ((__POINTER *)result__WQCH)[ 0]=((__POINTER ) 3);
-      result__BZ2G=(void *)((unsigned long)result__WQCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__ZQCH=first_free__LDVB;
-      while ((((void *)result__ZQCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ZQCH)->map_size_and_id__2SB &  4294967292LU) < new_size__DZ2G))) {
-        result__ZQCH=((__MEMORY *)result__ZQCH)->map_next_free__3SB;
-      };
-      if (((void *)result__ZQCH == (void *)NULL)) {
-        result__ZQCH=new_page__CA5();
-      };
-      to_busy__index__HTFC(result__ZQCH,new_size__DZ2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZQCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-      result__BZ2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZQCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__AI1C=((void **)result__BZ2G);
-    Self__MKWD= 0;
-    while ((Self__MKWD >=  0)) {
-      Result__AI1C[Self__MKWD]=NULL;
-      Self__MKWD=(__INTEGER)(Self__MKWD -  1);
-    };
-    Self__5DS->parent_arrayed_collection__M5.capacity__IES= 1;
-  };
-  create__with__GQB(TYPE_NULL__, 0);
-  fast_put__to__M1R(result__BOC,(&__string_3));
-  create__with__GQB(TYPE_VOID__, 0);
-  fast_put__to__M1R(result__BOC,(&__string_45));
-  create__with__GQB(TYPE_CONTEXT__, 1);
-  result__C2B=NULL;
-  ptr__D2B=((__POINTER )(NULL));
-  typ_id__I2B= 0;
-  sz__F2B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
-  if ((sz__F2B ==  0)) {
-    result__C2B=FAST_ARRAYoTYPE_IDo__;
+    typ_id__SYB=__FAST_ARRAYoSLOTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PYB);
+    if ((typ_id__SYB == (__INTEGER)(-  1))) {
+      a__KMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYB + a__KMFH) & (__UINTEGER_32)(~ a__KMFH));
+      ptr_table__J3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LMFH / ((__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__MRJ(new_size__LMFH);
+        next__I3IH=(void *)((unsigned long)result__K3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LMFH <<  1)) <=  4096)) {
+            next__I3IH=(void *)((unsigned long)result__K3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMFH)));
+          } else {
+            next__I3IH=new_lab__MRJ(new_size__LMFH);
+          };
+          ((__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__NYB=result__K3IH;
+    } else {
+      t__PMFH=((__UINTEGER_32 )typ_id__SYB);
+      a__OMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__R3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYB + a__OMFH) & (__UINTEGER_32)(~ a__OMFH));
+      ptr_table__O3IH=((__POINTER )(&(table_type[(t__PMFH)])));
+      lab_type__Q3IH=(__UINTEGER_32)(t__PMFH |  1);
+      next__N3IH=((__POINTER )(NULL));
+      result__P3IH=((__POINTER *)ptr_table__O3IH)[ 0];
+      if ((result__P3IH == (void *)NULL)) {
+        result__P3IH=new_lab__MRJ(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__PVH)))) &  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__MRJ(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__NYB=result__P3IH;
+    };
+    result__MYB=((__FAST_ARRAYoSLOTo *)ptr__NYB);
+    *(result__MYB) = *(FAST_ARRAYoSLOTo__);
+  };
+  Self__LES=((__FAST_ARRAYoSLOTo *)result__MYB);
+  if ((Self__LES->parent_arrayed_collection__V5.capacity__UES <  1)) {
+    sz__4DDH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
+    result__3DDH=((__POINTER )(NULL));
+    a__DEDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__5DDH=(__UINTEGER_32)((__UINTEGER_32)(sz__4DDH + a__DEDH) & (__UINTEGER_32)(~ a__DEDH));
+    new_size2__AEDH=(__UINTEGER_32)(new_size__5DDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__AEDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__SMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TMFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__AEDH + a__SMFH) & (__UINTEGER_32)(~ a__SMFH));
+      ptr_table__T3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__S3IH=((__POINTER )(NULL));
+      result__U3IH=((__POINTER *)ptr_table__T3IH)[ 0];
+      if ((result__U3IH == (void *)NULL)) {
+        result__U3IH=new_lab__MRJ(new_size__TMFH);
+        next__S3IH=(void *)((unsigned long)result__U3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TMFH)));
+        ((__POINTER *)next__S3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__T3IH)[ 0]=next__S3IH;
+      } else {
+        next__S3IH=((__POINTER *)result__U3IH)[ 0];
+        if ((next__S3IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TMFH <<  1)) <=  4096)) {
+            next__S3IH=(void *)((unsigned long)result__U3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TMFH)));
+          } else {
+            next__S3IH=new_lab__MRJ(new_size__TMFH);
+          };
+          ((__POINTER *)next__S3IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__T3IH)[ 0]=next__S3IH;
+        } else {
+          ((__POINTER *)result__U3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__U3IH=next__S3IH;
+        };
+      };
+      ((__POINTER *)result__U3IH)[ 0]=((__POINTER ) 3);
+      result__3DDH=(void *)((unsigned long)result__U3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__X3IH=first_free__XDVB;
+      while ((((void *)result__X3IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__X3IH)->map_size_and_id__ITB &  4294967292LU) < new_size__5DDH))) {
+        result__X3IH=((__MEMORY *)result__X3IH)->map_next_free__JTB;
+      };
+      if (((void *)result__X3IH == (void *)NULL)) {
+        result__X3IH=new_page__OA5();
+      };
+      to_busy__index__TTFC(result__X3IH,new_size__5DDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__X3IH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+      result__3DDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__X3IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__MI1C=((void **)result__3DDH);
+    Self__FLWD= 0;
+    while ((Self__FLWD >=  0)) {
+      Result__MI1C[Self__FLWD]=NULL;
+      Self__FLWD=(__INTEGER)(Self__FLWD -  1);
+    };
+    Self__LES->parent_arrayed_collection__V5.capacity__UES= 1;
+  };
+  create__with__SQB(TYPE_NULL__, 0);
+  fast_put__to__Y1R(result__NOC,(&__string_3));
+  create__with__SQB(TYPE_VOID__, 0);
+  fast_put__to__Y1R(result__NOC,(&__string_45));
+  create__with__SQB(TYPE_CONTEXT__, 1);
+  result__O2B=NULL;
+  ptr__P2B=((__POINTER )(NULL));
+  typ_id__U2B= 0;
+  sz__R2B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
+  if ((sz__R2B ==  0)) {
+    result__O2B=FAST_ARRAYoTYPE_IDo__;
   } else {
-    typ_id__I2B=__FAST_ARRAYoTYPE_IDo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__F2B);
-    if ((typ_id__I2B == (__INTEGER)(-  1))) {
-      a__2A5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__3A5G=(__UINTEGER_32)((__UINTEGER_32)(sz__F2B + a__2A5G) & (__UINTEGER_32)(~ a__2A5G));
-      ptr_table__3QCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3A5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__2QCH=((__POINTER )(NULL));
-      result__4QCH=((__POINTER *)ptr_table__3QCH)[ 0];
-      if ((result__4QCH == (void *)NULL)) {
-        result__4QCH=new_lab__ARJ(new_size__3A5G);
-        next__2QCH=(void *)((unsigned long)result__4QCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3A5G)));
-        ((__POINTER *)next__2QCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3QCH)[ 0]=next__2QCH;
-      } else {
-        next__2QCH=((__POINTER *)result__4QCH)[ 0];
-        if ((next__2QCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4QCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3A5G <<  1)) <=  4096)) {
-            next__2QCH=(void *)((unsigned long)result__4QCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3A5G)));
-          } else {
-            next__2QCH=new_lab__ARJ(new_size__3A5G);
-          };
-          ((__POINTER *)next__2QCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3QCH)[ 0]=next__2QCH;
-        } else {
-          ((__POINTER *)result__4QCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2QCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4QCH=next__2QCH;
-        };
-      };
-      ptr__D2B=result__4QCH;
-    } else {
-      t__BB5G=((__UINTEGER_32 )typ_id__I2B);
-      a__AB5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__FRCH=(__UINTEGER_32)((__UINTEGER_32)(sz__F2B + a__AB5G) & (__UINTEGER_32)(~ a__AB5G));
-      ptr_table__CRCH=((__POINTER )(&(table_type[(t__BB5G)])));
-      lab_type__ERCH=(__UINTEGER_32)(t__BB5G |  1);
-      next__BRCH=((__POINTER )(NULL));
-      result__DRCH=((__POINTER *)ptr_table__CRCH)[ 0];
-      if ((result__DRCH == (void *)NULL)) {
-        result__DRCH=new_lab__ARJ(lab_type__ERCH);
-        next__BRCH=(void *)((unsigned long)result__DRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FRCH)));
-        ((__POINTER *)next__BRCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CRCH)[ 0]=next__BRCH;
-      } else {
-        next__BRCH=((__POINTER *)result__DRCH)[ 0];
-        if ((next__BRCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DRCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FRCH <<  1)) <=  4096)) {
-            next__BRCH=(void *)((unsigned long)result__DRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FRCH)));
-          } else {
-            next__BRCH=new_lab__ARJ(lab_type__ERCH);
-          };
-          ((__POINTER *)next__BRCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CRCH)[ 0]=next__BRCH;
-        } else {
-          ((__POINTER *)result__DRCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DRCH=next__BRCH;
-        };
-      };
-      ptr__D2B=result__DRCH;
-    };
-    result__C2B=((__FAST_ARRAYoTYPE_IDo *)ptr__D2B);
-    *(result__C2B) = *(FAST_ARRAYoTYPE_IDo__);
-  };
-  Self__4GS=((__FAST_ARRAYoTYPE_IDo *)result__C2B);
-  if ((Self__4GS->parent_arrayed_collection__LAB.capacity__I4R <  3)) {
-    Self__4GS->parent_arrayed_collection__LAB.storage__E5R=create__WYNB( 3);
-    Self__4GS->parent_arrayed_collection__LAB.capacity__I4R= 3;
-  };
-  Self__4GS->parent_arrayed_collection__LAB.upper__G4R=(__INTEGER)(-  1);
-  list_id__NAB=result__C2B;
-  result__QCAH=NULL;
-  ptr__RCAH=((__POINTER )(NULL));
-  typ_id__SCAH= 0;
-  sz__TCAH=((__UINTEGER_32 )sizeof(__TYPE_ID));
-  if ((sz__TCAH ==  0)) {
-    result__QCAH=TYPE_ID__;
+    typ_id__U2B=__FAST_ARRAYoTYPE_IDo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__R2B);
+    if ((typ_id__U2B == (__INTEGER)(-  1))) {
+      a__ZMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0MFH=(__UINTEGER_32)((__UINTEGER_32)(sz__R2B + a__ZMFH) & (__UINTEGER_32)(~ a__ZMFH));
+      ptr_table__13IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0MFH / ((__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__MRJ(new_size__0MFH);
+        next__03IH=(void *)((unsigned long)result__23IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MFH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0MFH <<  1)) <=  4096)) {
+            next__03IH=(void *)((unsigned long)result__23IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MFH)));
+          } else {
+            next__03IH=new_lab__MRJ(new_size__0MFH);
+          };
+          ((__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__P2B=result__23IH;
+    } else {
+      t__4MFH=((__UINTEGER_32 )typ_id__U2B);
+      a__3MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__D4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__R2B + a__3MFH) & (__UINTEGER_32)(~ a__3MFH));
+      ptr_table__A4IH=((__POINTER )(&(table_type[(t__4MFH)])));
+      lab_type__C4IH=(__UINTEGER_32)(t__4MFH |  1);
+      next__53IH=((__POINTER )(NULL));
+      result__B4IH=((__POINTER *)ptr_table__A4IH)[ 0];
+      if ((result__B4IH == (void *)NULL)) {
+        result__B4IH=new_lab__MRJ(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__PVH)))) &  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__MRJ(lab_type__C4IH);
+          };
+          ((__POINTER *)next__53IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A4IH)[ 0]=next__53IH;
+        } else {
+          ((__POINTER *)result__B4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__53IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__B4IH=next__53IH;
+        };
+      };
+      ptr__P2B=result__B4IH;
+    };
+    result__O2B=((__FAST_ARRAYoTYPE_IDo *)ptr__P2B);
+    *(result__O2B) = *(FAST_ARRAYoTYPE_IDo__);
+  };
+  Self__KHS=((__FAST_ARRAYoTYPE_IDo *)result__O2B);
+  if ((Self__KHS->parent_arrayed_collection__UAB.capacity__U4R <  3)) {
+    Self__KHS->parent_arrayed_collection__UAB.storage__Q5R=create__CZNB( 3);
+    Self__KHS->parent_arrayed_collection__UAB.capacity__U4R= 3;
+  };
+  Self__KHS->parent_arrayed_collection__UAB.upper__S4R=(__INTEGER)(-  1);
+  list_id__WAB=result__O2B;
+  result__2OGH=NULL;
+  ptr__3OGH=((__POINTER )(NULL));
+  typ_id__4OGH= 0;
+  sz__5OGH=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__5OGH ==  0)) {
+    result__2OGH=TYPE_ID__;
   } else {
-    typ_id__SCAH=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__TCAH);
-    if ((typ_id__SCAH == (__INTEGER)(-  1))) {
-      a__UCAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__VCAH=(__UINTEGER_32)((__UINTEGER_32)(sz__TCAH + a__UCAH) & (__UINTEGER_32)(~ a__UCAH));
-      ptr_table__HRCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VCAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__GRCH=((__POINTER )(NULL));
-      result__IRCH=((__POINTER *)ptr_table__HRCH)[ 0];
-      if ((result__IRCH == (void *)NULL)) {
-        result__IRCH=new_lab__ARJ(new_size__VCAH);
-        next__GRCH=(void *)((unsigned long)result__IRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCAH)));
-        ((__POINTER *)next__GRCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HRCH)[ 0]=next__GRCH;
-      } else {
-        next__GRCH=((__POINTER *)result__IRCH)[ 0];
-        if ((next__GRCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IRCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VCAH <<  1)) <=  4096)) {
-            next__GRCH=(void *)((unsigned long)result__IRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCAH)));
-          } else {
-            next__GRCH=new_lab__ARJ(new_size__VCAH);
-          };
-          ((__POINTER *)next__GRCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HRCH)[ 0]=next__GRCH;
-        } else {
-          ((__POINTER *)result__IRCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GRCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__IRCH=next__GRCH;
-        };
-      };
-      ptr__RCAH=result__IRCH;
-    } else {
-      t__WCAH=((__UINTEGER_32 )typ_id__SCAH);
-      a__XCAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__PRCH=(__UINTEGER_32)((__UINTEGER_32)(sz__TCAH + a__XCAH) & (__UINTEGER_32)(~ a__XCAH));
-      ptr_table__MRCH=((__POINTER )(&(table_type[(t__WCAH)])));
-      lab_type__ORCH=(__UINTEGER_32)(t__WCAH |  1);
-      next__LRCH=((__POINTER )(NULL));
-      result__NRCH=((__POINTER *)ptr_table__MRCH)[ 0];
-      if ((result__NRCH == (void *)NULL)) {
-        result__NRCH=new_lab__ARJ(lab_type__ORCH);
-        next__LRCH=(void *)((unsigned long)result__NRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PRCH)));
-        ((__POINTER *)next__LRCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MRCH)[ 0]=next__LRCH;
-      } else {
-        next__LRCH=((__POINTER *)result__NRCH)[ 0];
-        if ((next__LRCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NRCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PRCH <<  1)) <=  4096)) {
-            next__LRCH=(void *)((unsigned long)result__NRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PRCH)));
-          } else {
-            next__LRCH=new_lab__ARJ(lab_type__ORCH);
-          };
-          ((__POINTER *)next__LRCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MRCH)[ 0]=next__LRCH;
-        } else {
-          ((__POINTER *)result__NRCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LRCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NRCH=next__LRCH;
-        };
-      };
-      ptr__RCAH=result__NRCH;
-    };
-    result__QCAH=((__TYPE_ID *)ptr__RCAH);
-    *(result__QCAH) = *(TYPE_ID__);
-  };
-  create__with__GQB(((__TYPE_ID *)result__QCAH), 0);
-  add_last__C4R(result__C2B,result__QCAH);
-  result__U3B=NULL;
-  ptr__V3B=((__POINTER )(NULL));
-  typ_id__03B= 0;
-  sz__X3B=((__UINTEGER_32 )sizeof(__TYPE_ID));
-  if ((sz__X3B ==  0)) {
-    result__U3B=TYPE_ID__;
+    typ_id__4OGH=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5OGH);
+    if ((typ_id__4OGH == (__INTEGER)(-  1))) {
+      a__APGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5OGH + a__APGH) & (__UINTEGER_32)(~ a__APGH));
+      ptr_table__F4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__E4IH=((__POINTER )(NULL));
+      result__G4IH=((__POINTER *)ptr_table__F4IH)[ 0];
+      if ((result__G4IH == (void *)NULL)) {
+        result__G4IH=new_lab__MRJ(new_size__BPGH);
+        next__E4IH=(void *)((unsigned long)result__G4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPGH)));
+        ((__POINTER *)next__E4IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F4IH)[ 0]=next__E4IH;
+      } else {
+        next__E4IH=((__POINTER *)result__G4IH)[ 0];
+        if ((next__E4IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BPGH <<  1)) <=  4096)) {
+            next__E4IH=(void *)((unsigned long)result__G4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPGH)));
+          } else {
+            next__E4IH=new_lab__MRJ(new_size__BPGH);
+          };
+          ((__POINTER *)next__E4IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F4IH)[ 0]=next__E4IH;
+        } else {
+          ((__POINTER *)result__G4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__G4IH=next__E4IH;
+        };
+      };
+      ptr__3OGH=result__G4IH;
+    } else {
+      t__CPGH=((__UINTEGER_32 )typ_id__4OGH);
+      a__DPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__N4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__5OGH + a__DPGH) & (__UINTEGER_32)(~ a__DPGH));
+      ptr_table__K4IH=((__POINTER )(&(table_type[(t__CPGH)])));
+      lab_type__M4IH=(__UINTEGER_32)(t__CPGH |  1);
+      next__J4IH=((__POINTER )(NULL));
+      result__L4IH=((__POINTER *)ptr_table__K4IH)[ 0];
+      if ((result__L4IH == (void *)NULL)) {
+        result__L4IH=new_lab__MRJ(lab_type__M4IH);
+        next__J4IH=(void *)((unsigned long)result__L4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N4IH)));
+        ((__POINTER *)next__J4IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__K4IH)[ 0]=next__J4IH;
+      } else {
+        next__J4IH=((__POINTER *)result__L4IH)[ 0];
+        if ((next__J4IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__N4IH <<  1)) <=  4096)) {
+            next__J4IH=(void *)((unsigned long)result__L4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N4IH)));
+          } else {
+            next__J4IH=new_lab__MRJ(lab_type__M4IH);
+          };
+          ((__POINTER *)next__J4IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K4IH)[ 0]=next__J4IH;
+        } else {
+          ((__POINTER *)result__L4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__L4IH=next__J4IH;
+        };
+      };
+      ptr__3OGH=result__L4IH;
+    };
+    result__2OGH=((__TYPE_ID *)ptr__3OGH);
+    *(result__2OGH) = *(TYPE_ID__);
+  };
+  create__with__SQB(((__TYPE_ID *)result__2OGH), 0);
+  add_last__O4R(result__O2B,result__2OGH);
+  result__A4B=NULL;
+  ptr__B4B=((__POINTER )(NULL));
+  typ_id__G4B= 0;
+  sz__D4B=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__D4B ==  0)) {
+    result__A4B=TYPE_ID__;
   } else {
-    typ_id__03B=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__X3B);
-    if ((typ_id__03B == (__INTEGER)(-  1))) {
-      a__ZK3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0K3G=(__UINTEGER_32)((__UINTEGER_32)(sz__X3B + a__ZK3G) & (__UINTEGER_32)(~ a__ZK3G));
-      ptr_table__RRCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0K3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__QRCH=((__POINTER )(NULL));
-      result__SRCH=((__POINTER *)ptr_table__RRCH)[ 0];
-      if ((result__SRCH == (void *)NULL)) {
-        result__SRCH=new_lab__ARJ(new_size__0K3G);
-        next__QRCH=(void *)((unsigned long)result__SRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0K3G)));
-        ((__POINTER *)next__QRCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__RRCH)[ 0]=next__QRCH;
-      } else {
-        next__QRCH=((__POINTER *)result__SRCH)[ 0];
-        if ((next__QRCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SRCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0K3G <<  1)) <=  4096)) {
-            next__QRCH=(void *)((unsigned long)result__SRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0K3G)));
-          } else {
-            next__QRCH=new_lab__ARJ(new_size__0K3G);
-          };
-          ((__POINTER *)next__QRCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RRCH)[ 0]=next__QRCH;
-        } else {
-          ((__POINTER *)result__SRCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QRCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SRCH=next__QRCH;
-        };
-      };
-      ptr__V3B=result__SRCH;
-    } else {
-      t__4K3G=((__UINTEGER_32 )typ_id__03B);
-      a__3K3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ZRCH=(__UINTEGER_32)((__UINTEGER_32)(sz__X3B + a__3K3G) & (__UINTEGER_32)(~ a__3K3G));
-      ptr_table__WRCH=((__POINTER )(&(table_type[(t__4K3G)])));
-      lab_type__YRCH=(__UINTEGER_32)(t__4K3G |  1);
-      next__VRCH=((__POINTER )(NULL));
-      result__XRCH=((__POINTER *)ptr_table__WRCH)[ 0];
-      if ((result__XRCH == (void *)NULL)) {
-        result__XRCH=new_lab__ARJ(lab_type__YRCH);
-        next__VRCH=(void *)((unsigned long)result__XRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZRCH)));
-        ((__POINTER *)next__VRCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WRCH)[ 0]=next__VRCH;
-      } else {
-        next__VRCH=((__POINTER *)result__XRCH)[ 0];
-        if ((next__VRCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XRCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZRCH <<  1)) <=  4096)) {
-            next__VRCH=(void *)((unsigned long)result__XRCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZRCH)));
-          } else {
-            next__VRCH=new_lab__ARJ(lab_type__YRCH);
-          };
-          ((__POINTER *)next__VRCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WRCH)[ 0]=next__VRCH;
-        } else {
-          ((__POINTER *)result__XRCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VRCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XRCH=next__VRCH;
-        };
-      };
-      ptr__V3B=result__XRCH;
-    };
-    result__U3B=((__TYPE_ID *)ptr__V3B);
-    *(result__U3B) = *(TYPE_ID__);
-  };
-  create__with__GQB(((__TYPE_ID *)result__U3B), 0);
-  add_last__C4R(list_id__NAB,result__U3B);
+    typ_id__G4B=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__D4B);
+    if ((typ_id__G4B == (__INTEGER)(-  1))) {
+      a__SWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TWDH=(__UINTEGER_32)((__UINTEGER_32)(sz__D4B + a__SWDH) & (__UINTEGER_32)(~ a__SWDH));
+      ptr_table__P4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TWDH / ((__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__MRJ(new_size__TWDH);
+        next__O4IH=(void *)((unsigned long)result__Q4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWDH)));
+        ((__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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TWDH <<  1)) <=  4096)) {
+            next__O4IH=(void *)((unsigned long)result__Q4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWDH)));
+          } else {
+            next__O4IH=new_lab__MRJ(new_size__TWDH);
+          };
+          ((__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__B4B=result__Q4IH;
+    } else {
+      t__XWDH=((__UINTEGER_32 )typ_id__G4B);
+      a__WWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__D4B + a__WWDH) & (__UINTEGER_32)(~ a__WWDH));
+      ptr_table__U4IH=((__POINTER )(&(table_type[(t__XWDH)])));
+      lab_type__W4IH=(__UINTEGER_32)(t__XWDH |  1);
+      next__T4IH=((__POINTER )(NULL));
+      result__V4IH=((__POINTER *)ptr_table__U4IH)[ 0];
+      if ((result__V4IH == (void *)NULL)) {
+        result__V4IH=new_lab__MRJ(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__PVH)))) &  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__MRJ(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__B4B=result__V4IH;
+    };
+    result__A4B=((__TYPE_ID *)ptr__B4B);
+    *(result__A4B) = *(TYPE_ID__);
+  };
+  create__with__SQB(((__TYPE_ID *)result__A4B), 0);
+  add_last__O4R(list_id__WAB,result__A4B);
   if (is_short_recursive__JB) {
-    directory_list__YB=create__EBB( 100);
-    file_list__0B=create__EBB( 100);
-    current_list__2B=create__EBB( 100);
+    directory_list__YB=create__NBB( 100);
+    file_list__0B=create__NBB( 100);
+    current_list__2B=create__NBB( 100);
     __tmp__4B=input_name__3B;
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    ent__TB=get_entry__H0AC(__tmp__4B);
+    ent__TB=get_entry__T0AC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__2HSD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__4HSD=Self__2HSD;
-        __tmp__FC=((void *)Self__2HSD != (void *)NULL);
+        Self__IISD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__KISD=Self__IISD;
+        __tmp__FC=((void *)Self__IISD != (void *)NULL);
       } else {
-        dir__GISD=NULL;
+        dir__SISD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
     };
     if (__tmp__JC) {
-      print__KHD((&__string_162));
-      print__KHD(input_name__3B);
-      print__KHD((&__string_163));
+      print__WHD((&__string_165));
+      print__WHD(input_name__3B);
+      print__WHD((&__string_166));
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__NERD(ent__TB);
+      __tmp__UC=open__ZERD(ent__TB);
     } else {
-      Self__SIRD=((__FILE_UNIX *)ent__TB);
-      Self__SIRD->stream__YIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__SIRD->parent_entry_unix__QCF.parent_entry__MED.path__BD)->storage__JQO),"r+b")));
-      __tmp__UC=(Self__SIRD->stream__YIRD != (void *)NULL);
+      Self__4IRD=((__FILE_UNIX *)ent__TB);
+      Self__4IRD->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__4IRD->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
+      __tmp__UC=(Self__4IRD->stream__EJRD != (void *)NULL);
     };
     if ((! __tmp__UC)) {
-      print__KHD((&__string_162));
-      print__KHD(input_name__3B);
-      print__KHD((&__string_164));
+      print__WHD((&__string_165));
+      print__WHD(input_name__3B);
+      print__WHD((&__string_167));
       exit(( 1));
     };
     if (ent__TB==NULL) {
@@ -7106,18728 +7243,19316 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    check_in__begin__SQQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__NED.parent_entry__MED.path__BD)->count__DD +  1));
-    Self__YCAH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-    result__2CAH= 0;
-    __tmp__4CAH=((__STRING_CONSTANT *)(&__string_143))->count__DD;
-    Self__5CAH= 1;
-    while ((Self__5CAH <= __tmp__4CAH)) {
-      result__2CAH=(__INTEGER)((__INTEGER)( 5 * result__2CAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_143))->storage__JQO)[(__INTEGER)(Self__5CAH -  1)])));
-      Self__5CAH=(__INTEGER)(Self__5CAH +  1);
-    };
-    if ((result__2CAH <  0)) {
-      result__2CAH=(__INTEGER)(~ result__2CAH);
-    };
-    node__0CAH=((void **)Self__YCAH->buckets__TCT)[(__INTEGER)(result__2CAH % Self__YCAH->capacity__OCT)];
-    while ((! (((void *)node__0CAH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0CAH)->key__5CT == (void *)(&__string_143))))) {
-      node__0CAH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0CAH)->next__KDT;
-    };
-    if (((void *)node__0CAH != (void *)NULL)) {
-      Self__CB5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-      result__BDAH= 0;
-      __tmp__DDAH=((__STRING_CONSTANT *)(&__string_143))->count__DD;
-      Self__EDAH= 1;
-      while ((Self__EDAH <= __tmp__DDAH)) {
-        result__BDAH=(__INTEGER)((__INTEGER)( 5 * result__BDAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_143))->storage__JQO)[(__INTEGER)(Self__EDAH -  1)])));
-        Self__EDAH=(__INTEGER)(Self__EDAH +  1);
-      };
-      if ((result__BDAH <  0)) {
-        result__BDAH=(__INTEGER)(~ result__BDAH);
-      };
-      node__EB5G=((void **)Self__CB5G->buckets__TCT)[(__INTEGER)(result__BDAH % Self__CB5G->capacity__OCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EB5G)->key__5CT != (void *)(&__string_143))) {
-        node__EB5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EB5G)->next__KDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EB5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-      Self__KEUG=((__STRING_CONSTANT *)txt__1);
-      new__LEUG=create__EBB(Self__KEUG->count__DD);
-      copy__NCS(new__LEUG,Self__KEUG);
-      save_file__with__DDC(add_ext__YAF((&__string_143)),new__LEUG);
-    };
-    Self__GDAH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-    result__KDAH= 0;
-    __tmp__MDAH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
-    Self__NDAH= 1;
-    while ((Self__NDAH <= __tmp__MDAH)) {
-      result__KDAH=(__INTEGER)((__INTEGER)( 5 * result__KDAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__JQO)[(__INTEGER)(Self__NDAH -  1)])));
-      Self__NDAH=(__INTEGER)(Self__NDAH +  1);
-    };
-    if ((result__KDAH <  0)) {
-      result__KDAH=(__INTEGER)(~ result__KDAH);
-    };
-    node__IDAH=((void **)Self__GDAH->buckets__TCT)[(__INTEGER)(result__KDAH % Self__GDAH->capacity__OCT)];
-    while ((! (((void *)node__IDAH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IDAH)->key__5CT == (void *)(&__string_66))))) {
-      node__IDAH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IDAH)->next__KDT;
-    };
-    if (((void *)node__IDAH != (void *)NULL)) {
-      Self__GB5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-      result__PDAH= 0;
-      __tmp__RDAH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
-      Self__SDAH= 1;
-      while ((Self__SDAH <= __tmp__RDAH)) {
-        result__PDAH=(__INTEGER)((__INTEGER)( 5 * result__PDAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__JQO)[(__INTEGER)(Self__SDAH -  1)])));
-        Self__SDAH=(__INTEGER)(Self__SDAH +  1);
-      };
-      if ((result__PDAH <  0)) {
-        result__PDAH=(__INTEGER)(~ result__PDAH);
-      };
-      node__IB5G=((void **)Self__GB5G->buckets__TCT)[(__INTEGER)(result__PDAH % Self__GB5G->capacity__OCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IB5G)->key__5CT != (void *)(&__string_66))) {
-        node__IB5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IB5G)->next__KDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IB5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-      Self__MEUG=((__STRING_CONSTANT *)txt__1);
-      new__NEUG=create__EBB(Self__MEUG->count__DD);
-      copy__NCS(new__NEUG,Self__MEUG);
-      save_file__with__DDC(add_ext__YAF((&__string_66)),new__NEUG);
-    };
-    Self__UDAH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-    result__YDAH= 0;
-    __tmp__0DAH=((__STRING_CONSTANT *)(&__string_144))->count__DD;
-    Self__1DAH= 1;
-    while ((Self__1DAH <= __tmp__0DAH)) {
-      result__YDAH=(__INTEGER)((__INTEGER)( 5 * result__YDAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_144))->storage__JQO)[(__INTEGER)(Self__1DAH -  1)])));
-      Self__1DAH=(__INTEGER)(Self__1DAH +  1);
-    };
-    if ((result__YDAH <  0)) {
-      result__YDAH=(__INTEGER)(~ result__YDAH);
-    };
-    node__WDAH=((void **)Self__UDAH->buckets__TCT)[(__INTEGER)(result__YDAH % Self__UDAH->capacity__OCT)];
-    while ((! (((void *)node__WDAH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WDAH)->key__5CT == (void *)(&__string_144))))) {
-      node__WDAH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WDAH)->next__KDT;
-    };
-    if (((void *)node__WDAH != (void *)NULL)) {
-      Self__KB5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-      result__3DAH= 0;
-      __tmp__5DAH=((__STRING_CONSTANT *)(&__string_144))->count__DD;
-      Self__AEAH= 1;
-      while ((Self__AEAH <= __tmp__5DAH)) {
-        result__3DAH=(__INTEGER)((__INTEGER)( 5 * result__3DAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_144))->storage__JQO)[(__INTEGER)(Self__AEAH -  1)])));
-        Self__AEAH=(__INTEGER)(Self__AEAH +  1);
-      };
-      if ((result__3DAH <  0)) {
-        result__3DAH=(__INTEGER)(~ result__3DAH);
-      };
-      node__MB5G=((void **)Self__KB5G->buckets__TCT)[(__INTEGER)(result__3DAH % Self__KB5G->capacity__OCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MB5G)->key__5CT != (void *)(&__string_144))) {
-        node__MB5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MB5G)->next__KDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MB5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-      Self__VZ2G=((__STRING *)directory_list__YB);
-      i__WZ2G=Self__VZ2G->count__KFC;
-      j__YZ2G=((__STRING_CONSTANT *)txt__1)->count__DD;
-      resize__MXZ(Self__VZ2G,(__INTEGER)(i__WZ2G + j__YZ2G));
-      if (((i__WZ2G >  0) && (j__YZ2G >  0))) {
-        move__to__by__VVCC(Self__VZ2G->storage__VBS, 0,(__INTEGER)(i__WZ2G -  1),j__YZ2G);
-      };
-      Self__QB5G=((__CHARACTER *)Self__VZ2G->storage__VBS);
-      model__RB5G=((__STRING_CONSTANT *)txt__1)->storage__JQO;
-      Self__PB5G=(__INTEGER)(j__YZ2G -  1);
-      while ((Self__PB5G >=  0)) {
-        Self__QB5G[Self__PB5G]=((__CHARACTER *)model__RB5G)[Self__PB5G];
-        Self__PB5G=(__INTEGER)(Self__PB5G -  1);
-      };
-    };
-    Self__RVVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-    result__CEAH= 0;
-    __tmp__EEAH=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-    Self__FEAH= 1;
-    while ((Self__FEAH <= __tmp__EEAH)) {
-      result__CEAH=(__INTEGER)((__INTEGER)( 5 * result__CEAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__JQO)[(__INTEGER)(Self__FEAH -  1)])));
-      Self__FEAH=(__INTEGER)(Self__FEAH +  1);
-    };
-    if ((result__CEAH <  0)) {
-      result__CEAH=(__INTEGER)(~ result__CEAH);
-    };
-    node__1VVB=((void **)Self__RVVB->buckets__TCT)[(__INTEGER)(result__CEAH % Self__RVVB->capacity__OCT)];
-    while ((! (((void *)node__1VVB == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__1VVB)->key__5CT,(&__string_146))))) {
-      node__1VVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__1VVB)->next__KDT;
-    };
-    if (((void *)node__1VVB != (void *)NULL)) {
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__EL4(result__5MH,(&__string_146)))->first_link__YTEC)->item__OVHD;
-      append__VNS(directory_list__YB,txt__1);
-    };
-    save_file__with__DDC(add_ext__YAF((&__string_165)),directory_list__YB);
-    Self__HEAH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-    result__LEAH= 0;
-    __tmp__NEAH=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-    Self__OEAH= 1;
-    while ((Self__OEAH <= __tmp__NEAH)) {
-      result__LEAH=(__INTEGER)((__INTEGER)( 5 * result__LEAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__JQO)[(__INTEGER)(Self__OEAH -  1)])));
-      Self__OEAH=(__INTEGER)(Self__OEAH +  1);
-    };
-    if ((result__LEAH <  0)) {
-      result__LEAH=(__INTEGER)(~ result__LEAH);
-    };
-    node__JEAH=((void **)Self__HEAH->buckets__TCT)[(__INTEGER)(result__LEAH % Self__HEAH->capacity__OCT)];
-    while ((! (((void *)node__JEAH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JEAH)->key__5CT == (void *)(&__string_147))))) {
-      node__JEAH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JEAH)->next__KDT;
-    };
-    if (((void *)node__JEAH != (void *)NULL)) {
-      Self__WB5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-      result__QEAH= 0;
-      __tmp__SEAH=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-      Self__TEAH= 1;
-      while ((Self__TEAH <= __tmp__SEAH)) {
-        result__QEAH=(__INTEGER)((__INTEGER)( 5 * result__QEAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__JQO)[(__INTEGER)(Self__TEAH -  1)])));
-        Self__TEAH=(__INTEGER)(Self__TEAH +  1);
-      };
-      if ((result__QEAH <  0)) {
-        result__QEAH=(__INTEGER)(~ result__QEAH);
-      };
-      node__YB5G=((void **)Self__WB5G->buckets__TCT)[(__INTEGER)(result__QEAH % Self__WB5G->capacity__OCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YB5G)->key__5CT != (void *)(&__string_147))) {
-        node__YB5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YB5G)->next__KDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YB5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-      Self__B02G=((__STRING *)file_list__0B);
-      i__C02G=Self__B02G->count__KFC;
-      j__E02G=((__STRING_CONSTANT *)txt__1)->count__DD;
-      resize__MXZ(Self__B02G,(__INTEGER)(i__C02G + j__E02G));
-      if (((i__C02G >  0) && (j__E02G >  0))) {
-        move__to__by__VVCC(Self__B02G->storage__VBS, 0,(__INTEGER)(i__C02G -  1),j__E02G);
-      };
-      Self__2B5G=((__CHARACTER *)Self__B02G->storage__VBS);
-      model__3B5G=((__STRING_CONSTANT *)txt__1)->storage__JQO;
-      Self__1B5G=(__INTEGER)(j__E02G -  1);
-      while ((Self__1B5G >=  0)) {
-        Self__2B5G[Self__1B5G]=((__CHARACTER *)model__3B5G)[Self__1B5G];
-        Self__1B5G=(__INTEGER)(Self__1B5G -  1);
-      };
-    };
-    Self__BCT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-    result__VEAH= 0;
-    __tmp__XEAH=((__STRING_CONSTANT *)(&__string_149))->count__DD;
-    Self__YEAH= 1;
-    while ((Self__YEAH <= __tmp__XEAH)) {
-      result__VEAH=(__INTEGER)((__INTEGER)( 5 * result__VEAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__JQO)[(__INTEGER)(Self__YEAH -  1)])));
-      Self__YEAH=(__INTEGER)(Self__YEAH +  1);
-    };
-    if ((result__VEAH <  0)) {
-      result__VEAH=(__INTEGER)(~ result__VEAH);
-    };
-    node__MCT=((void **)Self__BCT->buckets__TCT)[(__INTEGER)(result__VEAH % Self__BCT->capacity__OCT)];
-    while ((! (((void *)node__MCT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MCT)->key__5CT == (void *)(&__string_149))))) {
-      node__MCT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MCT)->next__KDT;
-    };
-    if (((void *)node__MCT != (void *)NULL)) {
-      Self__CC5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__5MH);
-      result__0EAH= 0;
-      __tmp__2EAH=((__STRING_CONSTANT *)(&__string_149))->count__DD;
-      Self__3EAH= 1;
-      while ((Self__3EAH <= __tmp__2EAH)) {
-        result__0EAH=(__INTEGER)((__INTEGER)( 5 * result__0EAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__JQO)[(__INTEGER)(Self__3EAH -  1)])));
-        Self__3EAH=(__INTEGER)(Self__3EAH +  1);
-      };
-      if ((result__0EAH <  0)) {
-        result__0EAH=(__INTEGER)(~ result__0EAH);
-      };
-      node__EC5G=((void **)Self__CC5G->buckets__TCT)[(__INTEGER)(result__0EAH % Self__CC5G->capacity__OCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EC5G)->key__5CT != (void *)(&__string_149))) {
-        node__EC5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EC5G)->next__KDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EC5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-      append__VNS(file_list__0B,txt__1);
-    };
-    save_file__with__DDC(add_ext__YAF((&__string_166)),file_list__0B);
+    check_in__begin__4QQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__ZED.parent_entry__YED.path__BD)->count__DD +  1));
+    Self__EPGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+    result__IPGH= 0;
+    __tmp__KPGH=((__STRING_CONSTANT *)(&__string_146))->count__DD;
+    Self__LPGH= 1;
+    while ((Self__LPGH <= __tmp__KPGH)) {
+      result__IPGH=(__INTEGER)((__INTEGER)( 5 * result__IPGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__VQO)[(__INTEGER)(Self__LPGH -  1)])));
+      Self__LPGH=(__INTEGER)(Self__LPGH +  1);
+    };
+    if ((result__IPGH <  0)) {
+      result__IPGH=(__INTEGER)(~ result__IPGH);
+    };
+    node__GPGH=((void **)Self__EPGH->buckets__5CT)[(__INTEGER)(result__IPGH % Self__EPGH->capacity__0CT)];
+    while ((! (((void *)node__GPGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GPGH)->key__LDT == (void *)(&__string_146))))) {
+      node__GPGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GPGH)->next__WDT;
+    };
+    if (((void *)node__GPGH != (void *)NULL)) {
+      Self__5MFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+      result__NPGH= 0;
+      __tmp__PPGH=((__STRING_CONSTANT *)(&__string_146))->count__DD;
+      Self__QPGH= 1;
+      while ((Self__QPGH <= __tmp__PPGH)) {
+        result__NPGH=(__INTEGER)((__INTEGER)( 5 * result__NPGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__VQO)[(__INTEGER)(Self__QPGH -  1)])));
+        Self__QPGH=(__INTEGER)(Self__QPGH +  1);
+      };
+      if ((result__NPGH <  0)) {
+        result__NPGH=(__INTEGER)(~ result__NPGH);
+      };
+      node__BNFH=((void **)Self__5MFH->buckets__5CT)[(__INTEGER)(result__NPGH % Self__5MFH->capacity__0CT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BNFH)->key__LDT != (void *)(&__string_146))) {
+        node__BNFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BNFH)->next__WDT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BNFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+      Self__TWZG=((__STRING_CONSTANT *)txt__1);
+      new__UWZG=create__NBB(Self__TWZG->count__DD);
+      copy__ZCS(new__UWZG,Self__TWZG);
+      save_file__with__PDC(add_ext__EBF((&__string_146)),new__UWZG);
+    };
+    Self__SPGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+    result__WPGH= 0;
+    __tmp__YPGH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+    Self__ZPGH= 1;
+    while ((Self__ZPGH <= __tmp__YPGH)) {
+      result__WPGH=(__INTEGER)((__INTEGER)( 5 * result__WPGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__VQO)[(__INTEGER)(Self__ZPGH -  1)])));
+      Self__ZPGH=(__INTEGER)(Self__ZPGH +  1);
+    };
+    if ((result__WPGH <  0)) {
+      result__WPGH=(__INTEGER)(~ result__WPGH);
+    };
+    node__UPGH=((void **)Self__SPGH->buckets__5CT)[(__INTEGER)(result__WPGH % Self__SPGH->capacity__0CT)];
+    while ((! (((void *)node__UPGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UPGH)->key__LDT == (void *)(&__string_66))))) {
+      node__UPGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UPGH)->next__WDT;
+    };
+    if (((void *)node__UPGH != (void *)NULL)) {
+      Self__DNFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+      result__1PGH= 0;
+      __tmp__3PGH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+      Self__4PGH= 1;
+      while ((Self__4PGH <= __tmp__3PGH)) {
+        result__1PGH=(__INTEGER)((__INTEGER)( 5 * result__1PGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__VQO)[(__INTEGER)(Self__4PGH -  1)])));
+        Self__4PGH=(__INTEGER)(Self__4PGH +  1);
+      };
+      if ((result__1PGH <  0)) {
+        result__1PGH=(__INTEGER)(~ result__1PGH);
+      };
+      node__FNFH=((void **)Self__DNFH->buckets__5CT)[(__INTEGER)(result__1PGH % Self__DNFH->capacity__0CT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FNFH)->key__LDT != (void *)(&__string_66))) {
+        node__FNFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FNFH)->next__WDT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FNFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+      Self__VWZG=((__STRING_CONSTANT *)txt__1);
+      new__WWZG=create__NBB(Self__VWZG->count__DD);
+      copy__ZCS(new__WWZG,Self__VWZG);
+      save_file__with__PDC(add_ext__EBF((&__string_66)),new__WWZG);
+    };
+    Self__AQGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+    result__EQGH= 0;
+    __tmp__GQGH=((__STRING_CONSTANT *)(&__string_147))->count__DD;
+    Self__HQGH= 1;
+    while ((Self__HQGH <= __tmp__GQGH)) {
+      result__EQGH=(__INTEGER)((__INTEGER)( 5 * result__EQGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__VQO)[(__INTEGER)(Self__HQGH -  1)])));
+      Self__HQGH=(__INTEGER)(Self__HQGH +  1);
+    };
+    if ((result__EQGH <  0)) {
+      result__EQGH=(__INTEGER)(~ result__EQGH);
+    };
+    node__CQGH=((void **)Self__AQGH->buckets__5CT)[(__INTEGER)(result__EQGH % Self__AQGH->capacity__0CT)];
+    while ((! (((void *)node__CQGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__CQGH)->key__LDT == (void *)(&__string_147))))) {
+      node__CQGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__CQGH)->next__WDT;
+    };
+    if (((void *)node__CQGH != (void *)NULL)) {
+      Self__HNFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+      result__JQGH= 0;
+      __tmp__LQGH=((__STRING_CONSTANT *)(&__string_147))->count__DD;
+      Self__MQGH= 1;
+      while ((Self__MQGH <= __tmp__LQGH)) {
+        result__JQGH=(__INTEGER)((__INTEGER)( 5 * result__JQGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__VQO)[(__INTEGER)(Self__MQGH -  1)])));
+        Self__MQGH=(__INTEGER)(Self__MQGH +  1);
+      };
+      if ((result__JQGH <  0)) {
+        result__JQGH=(__INTEGER)(~ result__JQGH);
+      };
+      node__JNFH=((void **)Self__HNFH->buckets__5CT)[(__INTEGER)(result__JQGH % Self__HNFH->capacity__0CT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JNFH)->key__LDT != (void *)(&__string_147))) {
+        node__JNFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JNFH)->next__WDT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JNFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+      Self__REDH=((__STRING *)directory_list__YB);
+      i__SEDH=Self__REDH->count__WFC;
+      j__UEDH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__YXZ(Self__REDH,(__INTEGER)(i__SEDH + j__UEDH));
+      if (((i__SEDH >  0) && (j__UEDH >  0))) {
+        move__to__by__BWCC(Self__REDH->storage__BCS, 0,(__INTEGER)(i__SEDH -  1),j__UEDH);
+      };
+      Self__NNFH=((__CHARACTER *)Self__REDH->storage__BCS);
+      model__ONFH=((__STRING_CONSTANT *)txt__1)->storage__VQO;
+      Self__MNFH=(__INTEGER)(j__UEDH -  1);
+      while ((Self__MNFH >=  0)) {
+        Self__NNFH[Self__MNFH]=((__CHARACTER *)model__ONFH)[Self__MNFH];
+        Self__MNFH=(__INTEGER)(Self__MNFH -  1);
+      };
+    };
+    Self__3VVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+    result__OQGH= 0;
+    __tmp__QQGH=((__STRING_CONSTANT *)(&__string_149))->count__DD;
+    Self__RQGH= 1;
+    while ((Self__RQGH <= __tmp__QQGH)) {
+      result__OQGH=(__INTEGER)((__INTEGER)( 5 * result__OQGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__VQO)[(__INTEGER)(Self__RQGH -  1)])));
+      Self__RQGH=(__INTEGER)(Self__RQGH +  1);
+    };
+    if ((result__OQGH <  0)) {
+      result__OQGH=(__INTEGER)(~ result__OQGH);
+    };
+    node__HWVB=((void **)Self__3VVB->buckets__5CT)[(__INTEGER)(result__OQGH % Self__3VVB->capacity__0CT)];
+    while ((! (((void *)node__HWVB == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HWVB)->key__LDT,(&__string_149))))) {
+      node__HWVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HWVB)->next__WDT;
+    };
+    if (((void *)node__HWVB != (void *)NULL)) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__QL4(result__LNH,(&__string_149)))->first_link__EUEC)->item__0VHD;
+      append__BOS(directory_list__YB,txt__1);
+    };
+    save_file__with__PDC(add_ext__EBF((&__string_168)),directory_list__YB);
+    Self__TQGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+    result__XQGH= 0;
+    __tmp__ZQGH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+    Self__0QGH= 1;
+    while ((Self__0QGH <= __tmp__ZQGH)) {
+      result__XQGH=(__INTEGER)((__INTEGER)( 5 * result__XQGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__0QGH -  1)])));
+      Self__0QGH=(__INTEGER)(Self__0QGH +  1);
+    };
+    if ((result__XQGH <  0)) {
+      result__XQGH=(__INTEGER)(~ result__XQGH);
+    };
+    node__VQGH=((void **)Self__TQGH->buckets__5CT)[(__INTEGER)(result__XQGH % Self__TQGH->capacity__0CT)];
+    while ((! (((void *)node__VQGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VQGH)->key__LDT == (void *)(&__string_150))))) {
+      node__VQGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VQGH)->next__WDT;
+    };
+    if (((void *)node__VQGH != (void *)NULL)) {
+      Self__TNFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+      result__2QGH= 0;
+      __tmp__4QGH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+      Self__5QGH= 1;
+      while ((Self__5QGH <= __tmp__4QGH)) {
+        result__2QGH=(__INTEGER)((__INTEGER)( 5 * result__2QGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__5QGH -  1)])));
+        Self__5QGH=(__INTEGER)(Self__5QGH +  1);
+      };
+      if ((result__2QGH <  0)) {
+        result__2QGH=(__INTEGER)(~ result__2QGH);
+      };
+      node__VNFH=((void **)Self__TNFH->buckets__5CT)[(__INTEGER)(result__2QGH % Self__TNFH->capacity__0CT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VNFH)->key__LDT != (void *)(&__string_150))) {
+        node__VNFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VNFH)->next__WDT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VNFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+      Self__3EDH=((__STRING *)file_list__0B);
+      i__4EDH=Self__3EDH->count__WFC;
+      j__AFDH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__YXZ(Self__3EDH,(__INTEGER)(i__4EDH + j__AFDH));
+      if (((i__4EDH >  0) && (j__AFDH >  0))) {
+        move__to__by__BWCC(Self__3EDH->storage__BCS, 0,(__INTEGER)(i__4EDH -  1),j__AFDH);
+      };
+      Self__ZNFH=((__CHARACTER *)Self__3EDH->storage__BCS);
+      model__0NFH=((__STRING_CONSTANT *)txt__1)->storage__VQO;
+      Self__YNFH=(__INTEGER)(j__AFDH -  1);
+      while ((Self__YNFH >=  0)) {
+        Self__ZNFH[Self__YNFH]=((__CHARACTER *)model__0NFH)[Self__YNFH];
+        Self__YNFH=(__INTEGER)(Self__YNFH -  1);
+      };
+    };
+    Self__NCT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+    result__BRGH= 0;
+    __tmp__DRGH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+    Self__ERGH= 1;
+    while ((Self__ERGH <= __tmp__DRGH)) {
+      result__BRGH=(__INTEGER)((__INTEGER)( 5 * result__BRGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__ERGH -  1)])));
+      Self__ERGH=(__INTEGER)(Self__ERGH +  1);
+    };
+    if ((result__BRGH <  0)) {
+      result__BRGH=(__INTEGER)(~ result__BRGH);
+    };
+    node__YCT=((void **)Self__NCT->buckets__5CT)[(__INTEGER)(result__BRGH % Self__NCT->capacity__0CT)];
+    while ((! (((void *)node__YCT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YCT)->key__LDT == (void *)(&__string_152))))) {
+      node__YCT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YCT)->next__WDT;
+    };
+    if (((void *)node__YCT != (void *)NULL)) {
+      Self__5NFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
+      result__GRGH= 0;
+      __tmp__IRGH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+      Self__JRGH= 1;
+      while ((Self__JRGH <= __tmp__IRGH)) {
+        result__GRGH=(__INTEGER)((__INTEGER)( 5 * result__GRGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__JRGH -  1)])));
+        Self__JRGH=(__INTEGER)(Self__JRGH +  1);
+      };
+      if ((result__GRGH <  0)) {
+        result__GRGH=(__INTEGER)(~ result__GRGH);
+      };
+      node__BOFH=((void **)Self__5NFH->buckets__5CT)[(__INTEGER)(result__GRGH % Self__5NFH->capacity__0CT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BOFH)->key__LDT != (void *)(&__string_152))) {
+        node__BOFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BOFH)->next__WDT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BOFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+      append__BOS(file_list__0B,txt__1);
+    };
+    save_file__with__PDC(add_ext__EBF((&__string_169)),file_list__0B);
   } else {
-    Self__3RCH=((__STRING_CONSTANT *)input_name__3B);
-    result__0RCH=FALSE__;
-    i1__1RCH= 0;
-    i2__2RCH= 0;
-    if ((((__STRING_CONSTANT *)(&__string_152))->count__DD <= Self__3RCH->count__DD)) {
-      i1__1RCH=(__INTEGER)((__INTEGER)(Self__3RCH->count__DD - ((__STRING_CONSTANT *)(&__string_152))->count__DD) +  1);
-      i2__2RCH= 1;
-      while ((! (((i1__1RCH > Self__3RCH->count__DD) || (i2__2RCH > ((__STRING_CONSTANT *)(&__string_152))->count__DD)) || (((__CHARACTER *)Self__3RCH->storage__JQO)[(__INTEGER)(i1__1RCH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__JQO)[(__INTEGER)(i2__2RCH -  1)])))) {
-        i1__1RCH=(__INTEGER)(i1__1RCH +  1);
-        i2__2RCH=(__INTEGER)(i2__2RCH +  1);
-      };
-      result__0RCH=(i1__1RCH > Self__3RCH->count__DD);
-    };
-    if ((! result__0RCH)) {
-      copy__NCS(string_tmp__VH,input_name__3B);
-      append__VNS(string_tmp__VH,(&__string_152));
-      input_name__3B=get__2VB(string_tmp__VH);
+    Self__14IH=((__STRING_CONSTANT *)input_name__3B);
+    result__Y4IH=FALSE__;
+    i1__Z4IH= 0;
+    i2__04IH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_155))->count__DD <= Self__14IH->count__DD)) {
+      i1__Z4IH=(__INTEGER)((__INTEGER)(Self__14IH->count__DD - ((__STRING_CONSTANT *)(&__string_155))->count__DD) +  1);
+      i2__04IH= 1;
+      while ((! (((i1__Z4IH > Self__14IH->count__DD) || (i2__04IH > ((__STRING_CONSTANT *)(&__string_155))->count__DD)) || (((__CHARACTER *)Self__14IH->storage__VQO)[(__INTEGER)(i1__Z4IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__VQO)[(__INTEGER)(i2__04IH -  1)])))) {
+        i1__Z4IH=(__INTEGER)(i1__Z4IH +  1);
+        i2__04IH=(__INTEGER)(i2__04IH +  1);
+      };
+      result__Y4IH=(i1__Z4IH > Self__14IH->count__DD);
+    };
+    if ((! result__Y4IH)) {
+      copy__ZCS(string_tmp__VH,input_name__3B);
+      append__BOS(string_tmp__VH,(&__string_155));
+      input_name__3B=get__IWB(string_tmp__VH);
     };
     __tmp__2H=input_name__3B;
-    copy__NCS(string_tmp__VH,input_name__3B);
-    Self__5EAH=((__STRING *)string_tmp__VH);
-    __tmp__AFAH=Self__5EAH->storage__VBS;
-    __tmp__BFAH=(__INTEGER)(Self__5EAH->count__KFC -  1);
-    Self__CFAH=((__CHARACTER *)__tmp__AFAH);
-    Self__DFAH=__tmp__BFAH;
-    while ((Self__DFAH >=  0)) {
-      if (('\\' == Self__CFAH[Self__DFAH])) {
-        Self__CFAH[Self__DFAH]='/';
+    copy__ZCS(string_tmp__VH,input_name__3B);
+    Self__LRGH=((__STRING *)string_tmp__VH);
+    __tmp__MRGH=Self__LRGH->storage__BCS;
+    __tmp__NRGH=(__INTEGER)(Self__LRGH->count__WFC -  1);
+    Self__ORGH=((__CHARACTER *)__tmp__MRGH);
+    Self__PRGH=__tmp__NRGH;
+    while ((Self__PRGH >=  0)) {
+      if (('\\' == Self__ORGH[Self__PRGH])) {
+        Self__ORGH[Self__PRGH]='/';
       };
-      Self__DFAH=(__INTEGER)(Self__DFAH -  1);
+      Self__PRGH=(__INTEGER)(Self__PRGH -  1);
     };
-    result__IFAH=((__STRING *)string_tmp__VH)->count__KFC;
-    while ((! ((result__IFAH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__VBS)[(__INTEGER)(result__IFAH -  1)] == '/')))) {
-      result__IFAH=(__INTEGER)(result__IFAH -  1);
+    result__URGH=((__STRING *)string_tmp__VH)->count__WFC;
+    while ((! ((result__URGH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__BCS)[(__INTEGER)(result__URGH -  1)] == '/')))) {
+      result__URGH=(__INTEGER)(result__URGH -  1);
     };
-    if ((result__IFAH >=  1)) {
-      Self__GC5G=((__STRING *)string_tmp__VH);
-      if ((result__IFAH > Self__GC5G->count__KFC)) {
-        Self__GC5G->count__KFC= 0;
+    if ((result__URGH >=  1)) {
+      Self__DOFH=((__STRING *)string_tmp__VH);
+      if ((result__URGH > Self__DOFH->count__WFC)) {
+        Self__DOFH->count__WFC= 0;
       } else {
-        if ((result__IFAH >  0)) {
-          len__NFAH=(__INTEGER)((__INTEGER)(result__IFAH -  1) +  1);
-          if ((len__NFAH >  0)) {
-            __tmp__OFAH=(__INTEGER)(result__IFAH +  1);
-            __tmp__QFAH=Self__GC5G->count__KFC;
-            Self__RFAH=__tmp__OFAH;
-            while ((Self__RFAH <= __tmp__QFAH)) {
-              ((__CHARACTER *)Self__GC5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__RFAH - len__NFAH) -  1)]=((__CHARACTER *)Self__GC5G->storage__VBS)[(__INTEGER)(Self__RFAH -  1)];
-              Self__RFAH=(__INTEGER)(Self__RFAH +  1);
+        if ((result__URGH >  0)) {
+          len__ZRGH=(__INTEGER)((__INTEGER)(result__URGH -  1) +  1);
+          if ((len__ZRGH >  0)) {
+            __tmp__0RGH=(__INTEGER)(result__URGH +  1);
+            __tmp__2RGH=Self__DOFH->count__WFC;
+            Self__3RGH=__tmp__0RGH;
+            while ((Self__3RGH <= __tmp__2RGH)) {
+              ((__CHARACTER *)Self__DOFH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__3RGH - len__ZRGH) -  1)]=((__CHARACTER *)Self__DOFH->storage__BCS)[(__INTEGER)(Self__3RGH -  1)];
+              Self__3RGH=(__INTEGER)(Self__3RGH +  1);
             };
-            Self__GC5G->count__KFC=(__INTEGER)(Self__GC5G->count__KFC - len__NFAH);
+            Self__DOFH->count__WFC=(__INTEGER)(Self__DOFH->count__WFC - len__ZRGH);
           };
         };
       };
     };
-    result__KSC=((__STRING *)string_tmp__VH)->count__KFC;
-    while ((! ((result__KSC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__VBS)[(__INTEGER)(result__KSC -  1)] == '.')))) {
-      result__KSC=(__INTEGER)(result__KSC -  1);
+    result__WSC=((__STRING *)string_tmp__VH)->count__WFC;
+    while ((! ((result__WSC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__BCS)[(__INTEGER)(result__WSC -  1)] == '.')))) {
+      result__WSC=(__INTEGER)(result__WSC -  1);
     };
-    Self__IC5G=((__STRING *)string_tmp__VH);
-    n__JC5G=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__KFC - result__KSC) +  1);
-    if ((n__JC5G > Self__IC5G->count__KFC)) {
-      Self__IC5G->count__KFC= 0;
+    Self__FOFH=((__STRING *)string_tmp__VH);
+    n__GOFH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__WFC - result__WSC) +  1);
+    if ((n__GOFH > Self__FOFH->count__WFC)) {
+      Self__FOFH->count__WFC= 0;
     } else {
-      Self__IC5G->count__KFC=(__INTEGER)(Self__IC5G->count__KFC - n__JC5G);
+      Self__FOFH->count__WFC=(__INTEGER)(Self__FOFH->count__WFC - n__GOFH);
     };
-    Self__5RCH=((__STRING *)string_tmp__VH);
-    Self__ASCH=Self__5RCH->count__KFC;
-    while ((Self__ASCH >=  1)) {
-      Self__BSCH=((__CHARACTER *)Self__5RCH->storage__VBS)[(__INTEGER)(Self__ASCH -  1)];
-      result__CSCH='\0';
-      if (((((__INTEGER_8 )Self__BSCH) <  97) || (((__INTEGER_8 )Self__BSCH) >  122))) {
-        result__CSCH=Self__BSCH;
+    Self__34IH=((__STRING *)string_tmp__VH);
+    Self__44IH=Self__34IH->count__WFC;
+    while ((Self__44IH >=  1)) {
+      Self__54IH=((__CHARACTER *)Self__34IH->storage__BCS)[(__INTEGER)(Self__44IH -  1)];
+      result__A5IH='\0';
+      if (((((__INTEGER_8 )Self__54IH) <  97) || (((__INTEGER_8 )Self__54IH) >  122))) {
+        result__A5IH=Self__54IH;
       } else {
-        result__CSCH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__BSCH) -  32))));
+        result__A5IH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__54IH) -  32))));
       };
-      ((__CHARACTER *)Self__5RCH->storage__VBS)[(__INTEGER)(Self__ASCH -  1)]=result__CSCH;
-      Self__ASCH=(__INTEGER)(Self__ASCH -  1);
+      ((__CHARACTER *)Self__34IH->storage__BCS)[(__INTEGER)(Self__44IH -  1)]=result__A5IH;
+      Self__44IH=(__INTEGER)(Self__44IH -  1);
     };
-    proto_input__BI=create__name__generic_count__NAC(__tmp__2H,get__2VB(string_tmp__VH));
-    go_on__WAC(proto_input__BI);
+    proto_input__BI=create__name__generic_count__ZAC(__tmp__2H,get__IWB(string_tmp__VH));
+    go_on__CBC(proto_input__BI);
     if (((void *)output_name__DI == (void *)NULL)) {
-      output_name__DI=add_ext__YAF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      output_name__DI=add_ext__EBF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
     };
-    save_file__with__DDC(output_name__DI,output_code__SI);
+    save_file__with__PDC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    Self__W0QC= 0;
-    limit_up__X0QC=result__YMJ->parent_arrayed_collection__AJ.upper__HJ;
-    while ((Self__W0QC <= limit_up__X0QC)) {
-      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[Self__W0QC];
-      ((__STRING *)output_code__SI)->count__KFC= 0;
-      Self__KJTD=((__PROTOTYPE *)p__AB);
-      put__to__like__CZXD(Self__KJTD->parent_named__5.name__LI,output_code__SI,(&__string_135));
-      is_first__O0XD=TRUE__;
-      s__P0XD=Self__KJTD->first_slot__WFZB;
-      while (((void *)s__P0XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__P0XD)->__id==__ITM_SLOT__) {
-          __tmp__UJTD=((__ITM_SLOT *)s__P0XD)->id_section__M1C;
-        } else {
-          __tmp__UJTD=((__ITM_SLOT_OPERATOR *)s__P0XD)->parent_itm_slot__CU5B.id_section__M1C;
-        };
-        Self__EXUG=((__SECTION_ *)__tmp__UJTD);
-        if ((((void *)Self__EXUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__EXUG->name__WYDC == (void *)(&__string_24)))) {
-          if (is_first__O0XD) {
-            put__to__like__CZXD((&__string_167),output_code__SI,(&__string_136));
-            is_first__O0XD=FALSE__;
-          };
-          ((__STRING *)string_tmp__VH)->count__KFC= 0;
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__P0XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DW1E(s__P0XD,string_tmp2__V5I);
+    Self__C1QC= 0;
+    limit_up__D1QC=result__ENJ->parent_arrayed_collection__AJ.upper__HJ;
+    while ((Self__C1QC <= limit_up__D1QC)) {
+      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[Self__C1QC];
+      ((__STRING *)output_code__SI)->count__WFC= 0;
+      Self__WJTD=((__PROTOTYPE *)p__AB);
+      put__to__like__1ZXD(Self__WJTD->parent_named__5.name__LI,output_code__SI,(&__string_136));
+      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD=(__INTEGER)(-  1);
+      shorter_get_all_slot_in__E1XD(Self__WJTD,list_tmp__5JTD);
+      s__EAYD=NULL;
+      is_first_cur__DAYD=TRUE__;
+      __tmp__IAYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD;
+      Self__GA5D= 0;
+      while ((Self__GA5D <= __tmp__IAYD)) {
+        s__EAYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__MZVE)[Self__GA5D];
+        if (((struct ___OBJ *)s__EAYD)->__id==__ITM_SLOT__) {
+          __tmp__IKTD=((__ITM_SLOT *)s__EAYD)->id_section__Y1C;
+        } else {
+          __tmp__IKTD=((__ITM_SLOT_OPERATOR *)s__EAYD)->parent_itm_slot__OU5B.id_section__Y1C;
+        };
+        Self__HK0G=((__SECTION_ *)__tmp__IKTD);
+        if ((((void *)Self__HK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__HK0G->name__CZDC == (void *)(&__string_24)))) {
+          if (is_first_cur__DAYD) {
+            put__to__like__1ZXD((&__string_170),output_code__SI,(&__string_137));
+            is_first_cur__DAYD=FALSE__;
+          };
+          ((__STRING *)string_tmp__VH)->count__WFC= 0;
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__EAYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__IA3F(s__EAYD,string_tmp2__BAJ);
+          } else {
+            pretty_name_in__3B3F(s__EAYD,string_tmp2__BAJ);
+          };
+          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_139));
+          if (((struct ___OBJ *)s__EAYD)->__id==__ITM_SLOT__) {
+            __tmp__FBYD=((__ITM_SLOT *)s__EAYD)->id_section__Y1C;
+          } else {
+            __tmp__FBYD=((__ITM_SLOT_OPERATOR *)s__EAYD)->parent_itm_slot__OU5B.id_section__Y1C;
+          };
+          Self__IK0G=((__SECTION_ *)__tmp__FBYD);
+          if ((((void *)Self__IK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__IK0G->name__CZDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__EAYD)->__id==__ITM_SLOT__) {
+              __tmp__MBYD=((__ITM_SLOT *)s__EAYD)->parent_named__P5.style__BEU;
+            } else {
+              __tmp__MBYD=((__ITM_SLOT_OPERATOR *)s__EAYD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+            };
+            if ((__tmp__MBYD != '+')) {
+              __tmp__CCYD=TRUE__;
+            } else {
+              if (((struct ___OBJ *)s__EAYD)->__id==__ITM_SLOT__) {
+                __tmp__TBYD=((__ITM_SLOT *)s__EAYD)->result_type__04FC;
+              } else {
+                __tmp__TBYD=((__ITM_SLOT_OPERATOR *)s__EAYD)->parent_itm_slot__OU5B.result_type__04FC;
+              };
+              if (__tmp__TBYD==NULL) {
+                __tmp__VBYD=NULL;
+              } else {
+                switch (((struct ___OBJ *)__tmp__TBYD)->__id) {
+                case __ITM_TYPE_PARAMETER__: {
+                  __tmp__VBYD=((void *)__tmp__TBYD);
+                } break;
+                case __ITM_TYPE_SIMPLE__: {
+                  __tmp__VBYD=((void *)__tmp__TBYD);
+                } break;
+                case __ITM_TYPE_MULTI__: {
+                  __tmp__VBYD=NULL;
+                } break;
+                case __ITM_TYPE_BLOCK__: {
+                  __tmp__VBYD=NULL;
+                } break;
+                case __ITM_TYPE_GENERIC__: {
+                  __tmp__VBYD=((void *)__tmp__TBYD);
+                } break;
+                case __ITM_TYPE_STYLE__: {
+                  __tmp__VBYD=((void *)__tmp__TBYD);
+                } break;
+                }
+              };
+              ts__SBYD=__tmp__VBYD;
+              if (((void *)__tmp__VBYD == (void *)NULL)) {
+                __tmp__5BYD=TRUE__;
+              } else {
+                switch (((struct ___OBJ *)__tmp__VBYD)->__id) {
+                case __ITM_TYPE_PARAMETER__: {
+                  __tmp__1BYD=NULL;
+                } break;
+                case __ITM_TYPE_SIMPLE__: {
+                  __tmp__1BYD=NULL;
+                } break;
+                case __ITM_TYPE_GENERIC__: {
+                  __tmp__1BYD=((__ITM_TYPE_GENERIC *)__tmp__VBYD)->parent_itm_type_style__CSN.style__TYP;
+                } break;
+                case __ITM_TYPE_STYLE__: {
+                  __tmp__1BYD=((__ITM_TYPE_STYLE *)__tmp__VBYD)->style__TYP;
+                } break;
+                };
+                __tmp__5BYD=((void *)__tmp__1BYD != (void *)(&__string_9));
+              };
+              __tmp__CCYD=__tmp__5BYD;
+            };
+            __tmp__FCYD=__tmp__CCYD;
           } else {
-            pretty_name_in__YX1E(s__P0XD,string_tmp2__V5I);
+            __tmp__FCYD=FALSE__;
           };
-          put__to__like__CZXD(string_tmp2__V5I,string_tmp__VH,(&__string_138));
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__P0XD)->__id==__ITM_SLOT__) {
-            __tmp__S1XD=((__ITM_SLOT *)s__P0XD)->parent_named__G5.name__LI;
+          if (__tmp__FCYD) {
+            put__to__like__1ZXD((&__string_171),string_tmp__VH,(&__string_135));
+          };
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__EAYD)->__id==__ITM_SLOT__) {
+            __tmp__RCYD=((__ITM_SLOT *)s__EAYD)->parent_named__P5.name__LI;
           } else {
-            __tmp__S1XD=((__ITM_SLOT_OPERATOR *)s__P0XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__RCYD=((__ITM_SLOT_OPERATOR *)s__EAYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
           };
-          get_all_comment_slot__in__OZ1E(Self__KJTD,__tmp__S1XD,string_tmp2__V5I);
-          put__to__like__CZXD(string_tmp2__V5I,string_tmp__VH,(&__string_139));
-          put__to__like__CZXD(string_tmp__VH,output_code__SI,(&__string_137));
-        };
-        if (((struct ___OBJ *)s__P0XD)->__id==__ITM_SLOT__) {
-          __tmp__41XD=((__ITM_SLOT *)s__P0XD)->next__CHHC;
-        } else {
-          __tmp__41XD=((__ITM_SLOT_OPERATOR *)s__P0XD)->parent_itm_slot__CU5B.next__CHHC;
+          get_all_comment_slot__in__FW2E(Self__WJTD,__tmp__RCYD,string_tmp2__BAJ);
+          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_140));
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_138));
         };
-        s__P0XD=__tmp__41XD;
+        Self__GA5D=(__INTEGER)(Self__GA5D +  1);
       };
-      if ((! is_first__O0XD)) {
-        put__to__like__CZXD(NULL,output_code__SI,(&__string_140));
+      if ((! is_first_cur__DAYD)) {
+        put__to__like__1ZXD(NULL,output_code__SI,(&__string_141));
       };
-      is_first__N2XD=TRUE__;
-      s__O2XD=Self__KJTD->first_slot__WFZB;
-      while (((void *)s__O2XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__O2XD)->__id==__ITM_SLOT__) {
-          __tmp__3JTD=((__ITM_SLOT *)s__O2XD)->parent_named__G5.name__LI;
+      s__NDYD=NULL;
+      is_first_cur__MDYD=TRUE__;
+      __tmp__RDYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD;
+      Self__YA5D= 0;
+      while ((Self__YA5D <= __tmp__RDYD)) {
+        s__NDYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__MZVE)[Self__YA5D];
+        if (((struct ___OBJ *)s__NDYD)->__id==__ITM_SLOT__) {
+          __tmp__SKTD=((__ITM_SLOT *)s__NDYD)->parent_named__P5.name__LI;
         } else {
-          __tmp__3JTD=((__ITM_SLOT_OPERATOR *)s__O2XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+          __tmp__SKTD=((__ITM_SLOT_OPERATOR *)s__NDYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
         };
-        Self__HSCH=((__STRING_CONSTANT *)__tmp__3JTD);
-        result__ESCH=FALSE__;
-        i__FSCH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_168))->count__DD <= Self__HSCH->count__DD)) {
-          i__FSCH=((__STRING_CONSTANT *)(&__string_168))->count__DD;
-          while ((! ((i__FSCH ==  0) || (((__CHARACTER *)Self__HSCH->storage__JQO)[(__INTEGER)(i__FSCH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_168))->storage__JQO)[(__INTEGER)(i__FSCH -  1)])))) {
-            i__FSCH=(__INTEGER)(i__FSCH -  1);
+        Self__F5IH=((__STRING_CONSTANT *)__tmp__SKTD);
+        result__C5IH=FALSE__;
+        i__D5IH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__F5IH->count__DD)) {
+          i__D5IH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
+          while ((! ((i__D5IH ==  0) || (((__CHARACTER *)Self__F5IH->storage__VQO)[(__INTEGER)(i__D5IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__D5IH -  1)])))) {
+            i__D5IH=(__INTEGER)(i__D5IH -  1);
           };
-          result__ESCH=(i__FSCH ==  0);
+          result__C5IH=(i__D5IH ==  0);
         };
-        if (result__ESCH) {
-          if (is_first__N2XD) {
-            put__to__like__CZXD((&__string_169),output_code__SI,(&__string_136));
-            is_first__N2XD=FALSE__;
+        if (result__C5IH) {
+          if (is_first_cur__MDYD) {
+            put__to__like__1ZXD((&__string_173),output_code__SI,(&__string_137));
+            is_first_cur__MDYD=FALSE__;
           };
-          ((__STRING *)string_tmp__VH)->count__KFC= 0;
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__O2XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DW1E(s__O2XD,string_tmp2__V5I);
+          ((__STRING *)string_tmp__VH)->count__WFC= 0;
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__NDYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__IA3F(s__NDYD,string_tmp2__BAJ);
           } else {
-            pretty_name_in__YX1E(s__O2XD,string_tmp2__V5I);
+            pretty_name_in__3B3F(s__NDYD,string_tmp2__BAJ);
           };
-          put__to__like__CZXD(string_tmp2__V5I,string_tmp__VH,(&__string_138));
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__O2XD)->__id==__ITM_SLOT__) {
-            __tmp__R3XD=((__ITM_SLOT *)s__O2XD)->parent_named__G5.name__LI;
+          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_139));
+          if (((struct ___OBJ *)s__NDYD)->__id==__ITM_SLOT__) {
+            __tmp__OEYD=((__ITM_SLOT *)s__NDYD)->id_section__Y1C;
           } else {
-            __tmp__R3XD=((__ITM_SLOT_OPERATOR *)s__O2XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__OEYD=((__ITM_SLOT_OPERATOR *)s__NDYD)->parent_itm_slot__OU5B.id_section__Y1C;
           };
-          get_all_comment_slot__in__OZ1E(Self__KJTD,__tmp__R3XD,string_tmp2__V5I);
-          put__to__like__CZXD(string_tmp2__V5I,string_tmp__VH,(&__string_139));
-          put__to__like__CZXD(string_tmp__VH,output_code__SI,(&__string_137));
-        };
-        if (((struct ___OBJ *)s__O2XD)->__id==__ITM_SLOT__) {
-          __tmp__33XD=((__ITM_SLOT *)s__O2XD)->next__CHHC;
-        } else {
-          __tmp__33XD=((__ITM_SLOT_OPERATOR *)s__O2XD)->parent_itm_slot__CU5B.next__CHHC;
+          Self__JK0G=((__SECTION_ *)__tmp__OEYD);
+          if ((((void *)Self__JK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__JK0G->name__CZDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__NDYD)->__id==__ITM_SLOT__) {
+              __tmp__VEYD=((__ITM_SLOT *)s__NDYD)->parent_named__P5.style__BEU;
+            } else {
+              __tmp__VEYD=((__ITM_SLOT_OPERATOR *)s__NDYD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+            };
+            if ((__tmp__VEYD != '+')) {
+              __tmp__LFYD=TRUE__;
+            } else {
+              if (((struct ___OBJ *)s__NDYD)->__id==__ITM_SLOT__) {
+                __tmp__2EYD=((__ITM_SLOT *)s__NDYD)->result_type__04FC;
+              } else {
+                __tmp__2EYD=((__ITM_SLOT_OPERATOR *)s__NDYD)->parent_itm_slot__OU5B.result_type__04FC;
+              };
+              if (__tmp__2EYD==NULL) {
+                __tmp__4EYD=NULL;
+              } else {
+                switch (((struct ___OBJ *)__tmp__2EYD)->__id) {
+                case __ITM_TYPE_PARAMETER__: {
+                  __tmp__4EYD=((void *)__tmp__2EYD);
+                } break;
+                case __ITM_TYPE_SIMPLE__: {
+                  __tmp__4EYD=((void *)__tmp__2EYD);
+                } break;
+                case __ITM_TYPE_MULTI__: {
+                  __tmp__4EYD=NULL;
+                } break;
+                case __ITM_TYPE_BLOCK__: {
+                  __tmp__4EYD=NULL;
+                } break;
+                case __ITM_TYPE_GENERIC__: {
+                  __tmp__4EYD=((void *)__tmp__2EYD);
+                } break;
+                case __ITM_TYPE_STYLE__: {
+                  __tmp__4EYD=((void *)__tmp__2EYD);
+                } break;
+                }
+              };
+              ts__1EYD=__tmp__4EYD;
+              if (((void *)__tmp__4EYD == (void *)NULL)) {
+                __tmp__IFYD=TRUE__;
+              } else {
+                switch (((struct ___OBJ *)__tmp__4EYD)->__id) {
+                case __ITM_TYPE_PARAMETER__: {
+                  __tmp__EFYD=NULL;
+                } break;
+                case __ITM_TYPE_SIMPLE__: {
+                  __tmp__EFYD=NULL;
+                } break;
+                case __ITM_TYPE_GENERIC__: {
+                  __tmp__EFYD=((__ITM_TYPE_GENERIC *)__tmp__4EYD)->parent_itm_type_style__CSN.style__TYP;
+                } break;
+                case __ITM_TYPE_STYLE__: {
+                  __tmp__EFYD=((__ITM_TYPE_STYLE *)__tmp__4EYD)->style__TYP;
+                } break;
+                };
+                __tmp__IFYD=((void *)__tmp__EFYD != (void *)(&__string_9));
+              };
+              __tmp__LFYD=__tmp__IFYD;
+            };
+            __tmp__OFYD=__tmp__LFYD;
+          } else {
+            __tmp__OFYD=FALSE__;
+          };
+          if (__tmp__OFYD) {
+            put__to__like__1ZXD((&__string_171),string_tmp__VH,(&__string_135));
+          };
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__NDYD)->__id==__ITM_SLOT__) {
+            __tmp__0FYD=((__ITM_SLOT *)s__NDYD)->parent_named__P5.name__LI;
+          } else {
+            __tmp__0FYD=((__ITM_SLOT_OPERATOR *)s__NDYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          };
+          get_all_comment_slot__in__FW2E(Self__WJTD,__tmp__0FYD,string_tmp2__BAJ);
+          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_140));
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_138));
         };
-        s__O2XD=__tmp__33XD;
+        Self__YA5D=(__INTEGER)(Self__YA5D +  1);
       };
-      if ((! is_first__N2XD)) {
-        put__to__like__CZXD(NULL,output_code__SI,(&__string_140));
+      if ((! is_first_cur__MDYD)) {
+        put__to__like__1ZXD(NULL,output_code__SI,(&__string_141));
       };
-      is_first__M4XD=TRUE__;
-      s__N4XD=Self__KJTD->first_slot__WFZB;
-      while (((void *)s__N4XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
-          __tmp__GKTD=((__ITM_SLOT *)s__N4XD)->parent_named__G5.name__LI;
+      s__WGYD=NULL;
+      is_first_cur__VGYD=TRUE__;
+      __tmp__0GYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD;
+      Self__KB5D= 0;
+      while ((Self__KB5D <= __tmp__0GYD)) {
+        s__WGYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__MZVE)[Self__KB5D];
+        if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+          __tmp__2KTD=((__ITM_SLOT *)s__WGYD)->parent_named__P5.name__LI;
         } else {
-          __tmp__GKTD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+          __tmp__2KTD=((__ITM_SLOT_OPERATOR *)s__WGYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
         };
-        Self__MSCH=((__STRING_CONSTANT *)__tmp__GKTD);
-        result__JSCH=FALSE__;
-        i__KSCH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_168))->count__DD <= Self__MSCH->count__DD)) {
-          i__KSCH=((__STRING_CONSTANT *)(&__string_168))->count__DD;
-          while ((! ((i__KSCH ==  0) || (((__CHARACTER *)Self__MSCH->storage__JQO)[(__INTEGER)(i__KSCH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_168))->storage__JQO)[(__INTEGER)(i__KSCH -  1)])))) {
-            i__KSCH=(__INTEGER)(i__KSCH -  1);
+        Self__K5IH=((__STRING_CONSTANT *)__tmp__2KTD);
+        result__H5IH=FALSE__;
+        i__I5IH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__K5IH->count__DD)) {
+          i__I5IH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
+          while ((! ((i__I5IH ==  0) || (((__CHARACTER *)Self__K5IH->storage__VQO)[(__INTEGER)(i__I5IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__I5IH -  1)])))) {
+            i__I5IH=(__INTEGER)(i__I5IH -  1);
           };
-          result__JSCH=(i__KSCH ==  0);
+          result__H5IH=(i__I5IH ==  0);
         };
-        if ((! result__JSCH)) {
-          if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
-            __tmp__OKTD=((__ITM_SLOT *)s__N4XD)->id_section__M1C;
+        if ((! result__H5IH)) {
+          if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+            __tmp__ELTD=((__ITM_SLOT *)s__WGYD)->id_section__Y1C;
           } else {
-            __tmp__OKTD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.id_section__M1C;
+            __tmp__ELTD=((__ITM_SLOT_OPERATOR *)s__WGYD)->parent_itm_slot__OU5B.id_section__Y1C;
           };
-          Self__FXUG=((__SECTION_ *)__tmp__OKTD);
-          __tmp__TKTD=(! (((void *)Self__FXUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__FXUG->name__WYDC == (void *)(&__string_24))));
+          Self__KK0G=((__SECTION_ *)__tmp__ELTD);
+          __tmp__JLTD=(! (((void *)Self__KK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__KK0G->name__CZDC == (void *)(&__string_24))));
         } else {
-          __tmp__TKTD=FALSE__;
+          __tmp__JLTD=FALSE__;
         };
-        if (__tmp__TKTD) {
-          if (is_first__M4XD) {
-            put__to__like__CZXD((&__string_170),output_code__SI,(&__string_136));
-            is_first__M4XD=FALSE__;
+        if (__tmp__JLTD) {
+          if (is_first_cur__VGYD) {
+            put__to__like__1ZXD((&__string_174),output_code__SI,(&__string_137));
+            is_first_cur__VGYD=FALSE__;
           };
-          ((__STRING *)string_tmp__VH)->count__KFC= 0;
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DW1E(s__N4XD,string_tmp2__V5I);
+          ((__STRING *)string_tmp__VH)->count__WFC= 0;
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__IA3F(s__WGYD,string_tmp2__BAJ);
           } else {
-            pretty_name_in__YX1E(s__N4XD,string_tmp2__V5I);
+            pretty_name_in__3B3F(s__WGYD,string_tmp2__BAJ);
           };
-          put__to__like__CZXD(string_tmp2__V5I,string_tmp__VH,(&__string_138));
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
-            __tmp__Q5XD=((__ITM_SLOT *)s__N4XD)->parent_named__G5.name__LI;
+          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_139));
+          if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+            __tmp__XHYD=((__ITM_SLOT *)s__WGYD)->id_section__Y1C;
           } else {
-            __tmp__Q5XD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__XHYD=((__ITM_SLOT_OPERATOR *)s__WGYD)->parent_itm_slot__OU5B.id_section__Y1C;
           };
-          get_all_comment_slot__in__OZ1E(Self__KJTD,__tmp__Q5XD,string_tmp2__V5I);
-          put__to__like__CZXD(string_tmp2__V5I,string_tmp__VH,(&__string_139));
-          put__to__like__CZXD(string_tmp__VH,output_code__SI,(&__string_137));
-        };
-        if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
-          __tmp__25XD=((__ITM_SLOT *)s__N4XD)->next__CHHC;
-        } else {
-          __tmp__25XD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.next__CHHC;
+          Self__LK0G=((__SECTION_ *)__tmp__XHYD);
+          if ((((void *)Self__LK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__LK0G->name__CZDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+              __tmp__4HYD=((__ITM_SLOT *)s__WGYD)->parent_named__P5.style__BEU;
+            } else {
+              __tmp__4HYD=((__ITM_SLOT_OPERATOR *)s__WGYD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+            };
+            if ((__tmp__4HYD != '+')) {
+              __tmp__UIYD=TRUE__;
+            } else {
+              if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+                __tmp__FIYD=((__ITM_SLOT *)s__WGYD)->result_type__04FC;
+              } else {
+                __tmp__FIYD=((__ITM_SLOT_OPERATOR *)s__WGYD)->parent_itm_slot__OU5B.result_type__04FC;
+              };
+              if (__tmp__FIYD==NULL) {
+                __tmp__HIYD=NULL;
+              } else {
+                switch (((struct ___OBJ *)__tmp__FIYD)->__id) {
+                case __ITM_TYPE_PARAMETER__: {
+                  __tmp__HIYD=((void *)__tmp__FIYD);
+                } break;
+                case __ITM_TYPE_SIMPLE__: {
+                  __tmp__HIYD=((void *)__tmp__FIYD);
+                } break;
+                case __ITM_TYPE_MULTI__: {
+                  __tmp__HIYD=NULL;
+                } break;
+                case __ITM_TYPE_BLOCK__: {
+                  __tmp__HIYD=NULL;
+                } break;
+                case __ITM_TYPE_GENERIC__: {
+                  __tmp__HIYD=((void *)__tmp__FIYD);
+                } break;
+                case __ITM_TYPE_STYLE__: {
+                  __tmp__HIYD=((void *)__tmp__FIYD);
+                } break;
+                }
+              };
+              ts__EIYD=__tmp__HIYD;
+              if (((void *)__tmp__HIYD == (void *)NULL)) {
+                __tmp__RIYD=TRUE__;
+              } else {
+                switch (((struct ___OBJ *)__tmp__HIYD)->__id) {
+                case __ITM_TYPE_PARAMETER__: {
+                  __tmp__NIYD=NULL;
+                } break;
+                case __ITM_TYPE_SIMPLE__: {
+                  __tmp__NIYD=NULL;
+                } break;
+                case __ITM_TYPE_GENERIC__: {
+                  __tmp__NIYD=((__ITM_TYPE_GENERIC *)__tmp__HIYD)->parent_itm_type_style__CSN.style__TYP;
+                } break;
+                case __ITM_TYPE_STYLE__: {
+                  __tmp__NIYD=((__ITM_TYPE_STYLE *)__tmp__HIYD)->style__TYP;
+                } break;
+                };
+                __tmp__RIYD=((void *)__tmp__NIYD != (void *)(&__string_9));
+              };
+              __tmp__UIYD=__tmp__RIYD;
+            };
+            __tmp__XIYD=__tmp__UIYD;
+          } else {
+            __tmp__XIYD=FALSE__;
+          };
+          if (__tmp__XIYD) {
+            put__to__like__1ZXD((&__string_171),string_tmp__VH,(&__string_135));
+          };
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__WGYD)->__id==__ITM_SLOT__) {
+            __tmp__DJYD=((__ITM_SLOT *)s__WGYD)->parent_named__P5.name__LI;
+          } else {
+            __tmp__DJYD=((__ITM_SLOT_OPERATOR *)s__WGYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          };
+          get_all_comment_slot__in__FW2E(Self__WJTD,__tmp__DJYD,string_tmp2__BAJ);
+          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_140));
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_138));
         };
-        s__N4XD=__tmp__25XD;
+        Self__KB5D=(__INTEGER)(Self__KB5D +  1);
       };
-      if ((! is_first__M4XD)) {
-        put__to__like__CZXD(NULL,output_code__SI,(&__string_140));
+      if ((! is_first_cur__VGYD)) {
+        put__to__like__1ZXD(NULL,output_code__SI,(&__string_141));
       };
-      is_first__LAYD=TRUE__;
-      s__MAYD=Self__KJTD->first_slot__WFZB;
-      while (((void *)s__MAYD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__MAYD)->__id==__ITM_SLOT__) {
-          __tmp__1KTD=((__ITM_SLOT *)s__MAYD)->id_section__M1C;
+      s__5JYD=NULL;
+      is_first__4JYD=TRUE__;
+      __tmp__DKYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD;
+      Self__2B5D= 0;
+      while ((Self__2B5D <= __tmp__DKYD)) {
+        s__5JYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__MZVE)[Self__2B5D];
+        if (((struct ___OBJ *)s__5JYD)->__id==__ITM_SLOT__) {
+          __tmp__SLTD=((__ITM_SLOT *)s__5JYD)->id_section__Y1C;
         } else {
-          __tmp__1KTD=((__ITM_SLOT_OPERATOR *)s__MAYD)->parent_itm_slot__CU5B.id_section__M1C;
+          __tmp__SLTD=((__ITM_SLOT_OPERATOR *)s__5JYD)->parent_itm_slot__OU5B.id_section__Y1C;
         };
-        Self__GXUG=((__SECTION_ *)__tmp__1KTD);
-        if ((((void *)Self__GXUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__GXUG->name__WYDC == (void *)(&__string_24)))) {
-          if (is_first__LAYD) {
-            put__to__like__CZXD((&__string_171),output_code__SI,(&__string_141));
-            is_first__LAYD=FALSE__;
+        Self__MK0G=((__SECTION_ *)__tmp__SLTD);
+        if ((((void *)Self__MK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__MK0G->name__CZDC == (void *)(&__string_24)))) {
+          if (is_first__4JYD) {
+            put__to__like__1ZXD((&__string_175),output_code__SI,(&__string_142));
+            is_first__4JYD=FALSE__;
           };
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__MAYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DW1E(s__MAYD,string_tmp2__V5I);
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__5JYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__IA3F(s__5JYD,string_tmp2__BAJ);
           } else {
-            pretty_name_in__YX1E(s__MAYD,string_tmp2__V5I);
+            pretty_name_in__3B3F(s__5JYD,string_tmp2__BAJ);
           };
-          put__to__like__CZXD(string_tmp2__V5I,output_code__SI,(&__string_142));
-          if (((struct ___OBJ *)s__MAYD)->__id==__ITM_SLOT__) {
-            shorter_profile_in__JB2E(s__MAYD,output_code__SI);
+          put__to__like__1ZXD(string_tmp2__BAJ,output_code__SI,(&__string_143));
+          if (((struct ___OBJ *)s__5JYD)->__id==__ITM_SLOT__) {
+            __tmp__5KYD=((__ITM_SLOT *)s__5JYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
           } else {
-            shorter_profile_in__GC2E(s__MAYD,output_code__SI);
+            __tmp__5KYD=((__ITM_SLOT_OPERATOR *)s__5JYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
           };
-          ((__STRING *)string_tmp__VH)->count__KFC= 0;
-          if (((struct ___OBJ *)s__MAYD)->__id==__ITM_SLOT__) {
-            __tmp__NBYD=((__ITM_SLOT *)s__MAYD)->parent_named__G5.name__LI;
+          copy__ZCS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__5KYD)) &  511)])->filename__UPG);
+          append__BOS(string_tmp__VH,(&__string_176));
+          if (((struct ___OBJ *)s__5JYD)->__id==__ITM_SLOT__) {
+            __tmp__ELYD=((__ITM_SLOT *)s__5JYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
           } else {
-            __tmp__NBYD=((__ITM_SLOT_OPERATOR *)s__MAYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__ELYD=((__ITM_SLOT_OPERATOR *)s__5JYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
           };
-          get_all_comment_slot__in__OZ1E(Self__KJTD,__tmp__NBYD,string_tmp__VH);
-          put__to__like__CZXD(string_tmp__VH,output_code__SI,(&__string_139));
-        };
-        if (((struct ___OBJ *)s__MAYD)->__id==__ITM_SLOT__) {
-          __tmp__VBYD=((__ITM_SLOT *)s__MAYD)->next__CHHC;
-        } else {
-          __tmp__VBYD=((__ITM_SLOT_OPERATOR *)s__MAYD)->parent_itm_slot__CU5B.next__CHHC;
+          append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__ELYD) >>  17),string_tmp__VH);
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_145));
+          put__to__like__1ZXD((&__string_177),output_code__SI,(&__string_144));
+          if (((struct ___OBJ *)s__5JYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__UD3F(s__5JYD,output_code__SI);
+          } else {
+            shorter_profile_in__RE3F(s__5JYD,output_code__SI);
+          };
+          put__to__like__1ZXD((&__string_178),output_code__SI,(&__string_144));
+          ((__STRING *)string_tmp__VH)->count__WFC= 0;
+          if (((struct ___OBJ *)s__5JYD)->__id==__ITM_SLOT__) {
+            __tmp__PLYD=((__ITM_SLOT *)s__5JYD)->parent_named__P5.name__LI;
+          } else {
+            __tmp__PLYD=((__ITM_SLOT_OPERATOR *)s__5JYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          };
+          get_all_comment_slot__in__FW2E(Self__WJTD,__tmp__PLYD,string_tmp__VH);
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_128));
+          put__to__like__1ZXD((&__string_179),output_code__SI,(&__string_144));
+          put__to__like__1ZXD((&__string_180),output_code__SI,(&__string_144));
+          put__to__like__1ZXD((&__string_181),output_code__SI,(&__string_144));
         };
-        s__MAYD=__tmp__VBYD;
+        Self__2B5D=(__INTEGER)(Self__2B5D +  1);
       };
-      is_first__2BYD=TRUE__;
-      s__3BYD=Self__KJTD->first_slot__WFZB;
-      while (((void *)s__3BYD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__3BYD)->__id==__ITM_SLOT__) {
-          __tmp__ELTD=((__ITM_SLOT *)s__3BYD)->parent_named__G5.name__LI;
+      s__FMYD=NULL;
+      is_first__EMYD=TRUE__;
+      __tmp__JMYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD;
+      Self__LC5D= 0;
+      while ((Self__LC5D <= __tmp__JMYD)) {
+        s__FMYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__MZVE)[Self__LC5D];
+        if (((struct ___OBJ *)s__FMYD)->__id==__ITM_SLOT__) {
+          __tmp__2LTD=((__ITM_SLOT *)s__FMYD)->parent_named__P5.name__LI;
         } else {
-          __tmp__ELTD=((__ITM_SLOT_OPERATOR *)s__3BYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+          __tmp__2LTD=((__ITM_SLOT_OPERATOR *)s__FMYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
         };
-        Self__RSCH=((__STRING_CONSTANT *)__tmp__ELTD);
-        result__OSCH=FALSE__;
-        i__PSCH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_168))->count__DD <= Self__RSCH->count__DD)) {
-          i__PSCH=((__STRING_CONSTANT *)(&__string_168))->count__DD;
-          while ((! ((i__PSCH ==  0) || (((__CHARACTER *)Self__RSCH->storage__JQO)[(__INTEGER)(i__PSCH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_168))->storage__JQO)[(__INTEGER)(i__PSCH -  1)])))) {
-            i__PSCH=(__INTEGER)(i__PSCH -  1);
+        Self__P5IH=((__STRING_CONSTANT *)__tmp__2LTD);
+        result__M5IH=FALSE__;
+        i__N5IH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__P5IH->count__DD)) {
+          i__N5IH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
+          while ((! ((i__N5IH ==  0) || (((__CHARACTER *)Self__P5IH->storage__VQO)[(__INTEGER)(i__N5IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__N5IH -  1)])))) {
+            i__N5IH=(__INTEGER)(i__N5IH -  1);
           };
-          result__OSCH=(i__PSCH ==  0);
+          result__M5IH=(i__N5IH ==  0);
         };
-        if (result__OSCH) {
-          if (is_first__2BYD) {
-            put__to__like__CZXD((&__string_172),output_code__SI,(&__string_141));
-            is_first__2BYD=FALSE__;
+        if (result__M5IH) {
+          if (is_first__EMYD) {
+            put__to__like__1ZXD((&__string_182),output_code__SI,(&__string_142));
+            is_first__EMYD=FALSE__;
           };
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__3BYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DW1E(s__3BYD,string_tmp2__V5I);
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__FMYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__IA3F(s__FMYD,string_tmp2__BAJ);
           } else {
-            pretty_name_in__YX1E(s__3BYD,string_tmp2__V5I);
+            pretty_name_in__3B3F(s__FMYD,string_tmp2__BAJ);
           };
-          put__to__like__CZXD(string_tmp2__V5I,output_code__SI,(&__string_142));
-          if (((struct ___OBJ *)s__3BYD)->__id==__ITM_SLOT__) {
-            shorter_profile_in__JB2E(s__3BYD,output_code__SI);
+          put__to__like__1ZXD(string_tmp2__BAJ,output_code__SI,(&__string_143));
+          if (((struct ___OBJ *)s__FMYD)->__id==__ITM_SLOT__) {
+            __tmp__FNYD=((__ITM_SLOT *)s__FMYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
           } else {
-            shorter_profile_in__GC2E(s__3BYD,output_code__SI);
+            __tmp__FNYD=((__ITM_SLOT_OPERATOR *)s__FMYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
           };
-          ((__STRING *)string_tmp__VH)->count__KFC= 0;
-          if (((struct ___OBJ *)s__3BYD)->__id==__ITM_SLOT__) {
-            __tmp__4CYD=((__ITM_SLOT *)s__3BYD)->parent_named__G5.name__LI;
+          copy__ZCS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__FNYD)) &  511)])->filename__UPG);
+          append__BOS(string_tmp__VH,(&__string_176));
+          if (((struct ___OBJ *)s__FMYD)->__id==__ITM_SLOT__) {
+            __tmp__KNYD=((__ITM_SLOT *)s__FMYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
           } else {
-            __tmp__4CYD=((__ITM_SLOT_OPERATOR *)s__3BYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__KNYD=((__ITM_SLOT_OPERATOR *)s__FMYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
           };
-          get_all_comment_slot__in__OZ1E(Self__KJTD,__tmp__4CYD,string_tmp__VH);
-          put__to__like__CZXD(string_tmp__VH,output_code__SI,(&__string_139));
-        };
-        if (((struct ___OBJ *)s__3BYD)->__id==__ITM_SLOT__) {
-          __tmp__GDYD=((__ITM_SLOT *)s__3BYD)->next__CHHC;
-        } else {
-          __tmp__GDYD=((__ITM_SLOT_OPERATOR *)s__3BYD)->parent_itm_slot__CU5B.next__CHHC;
+          append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__KNYD) >>  17),string_tmp__VH);
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_145));
+          put__to__like__1ZXD((&__string_177),output_code__SI,(&__string_144));
+          if (((struct ___OBJ *)s__FMYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__UD3F(s__FMYD,output_code__SI);
+          } else {
+            shorter_profile_in__RE3F(s__FMYD,output_code__SI);
+          };
+          put__to__like__1ZXD((&__string_178),output_code__SI,(&__string_144));
+          ((__STRING *)string_tmp__VH)->count__WFC= 0;
+          if (((struct ___OBJ *)s__FMYD)->__id==__ITM_SLOT__) {
+            __tmp__VNYD=((__ITM_SLOT *)s__FMYD)->parent_named__P5.name__LI;
+          } else {
+            __tmp__VNYD=((__ITM_SLOT_OPERATOR *)s__FMYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          };
+          get_all_comment_slot__in__FW2E(Self__WJTD,__tmp__VNYD,string_tmp__VH);
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_128));
+          put__to__like__1ZXD((&__string_179),output_code__SI,(&__string_144));
+          put__to__like__1ZXD((&__string_180),output_code__SI,(&__string_144));
+          put__to__like__1ZXD((&__string_181),output_code__SI,(&__string_144));
         };
-        s__3BYD=__tmp__GDYD;
+        Self__LC5D=(__INTEGER)(Self__LC5D +  1);
       };
-      is_first__NDYD=TRUE__;
-      s__ODYD=Self__KJTD->first_slot__WFZB;
-      while (((void *)s__ODYD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
-          __tmp__NLTD=((__ITM_SLOT *)s__ODYD)->parent_named__G5.name__LI;
+      s__LOYD=NULL;
+      is_first__KOYD=TRUE__;
+      __tmp__POYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__21XD;
+      Self__0C5D= 0;
+      while ((Self__0C5D <= __tmp__POYD)) {
+        s__LOYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__MZVE)[Self__0C5D];
+        if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+          __tmp__GMTD=((__ITM_SLOT *)s__LOYD)->parent_named__P5.name__LI;
         } else {
-          __tmp__NLTD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+          __tmp__GMTD=((__ITM_SLOT_OPERATOR *)s__LOYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
         };
-        Self__WSCH=((__STRING_CONSTANT *)__tmp__NLTD);
-        result__TSCH=FALSE__;
-        i__USCH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_168))->count__DD <= Self__WSCH->count__DD)) {
-          i__USCH=((__STRING_CONSTANT *)(&__string_168))->count__DD;
-          while ((! ((i__USCH ==  0) || (((__CHARACTER *)Self__WSCH->storage__JQO)[(__INTEGER)(i__USCH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_168))->storage__JQO)[(__INTEGER)(i__USCH -  1)])))) {
-            i__USCH=(__INTEGER)(i__USCH -  1);
+        Self__U5IH=((__STRING_CONSTANT *)__tmp__GMTD);
+        result__R5IH=FALSE__;
+        i__S5IH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__U5IH->count__DD)) {
+          i__S5IH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
+          while ((! ((i__S5IH ==  0) || (((__CHARACTER *)Self__U5IH->storage__VQO)[(__INTEGER)(i__S5IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__S5IH -  1)])))) {
+            i__S5IH=(__INTEGER)(i__S5IH -  1);
           };
-          result__TSCH=(i__USCH ==  0);
+          result__R5IH=(i__S5IH ==  0);
         };
-        if ((! result__TSCH)) {
-          if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
-            __tmp__VLTD=((__ITM_SLOT *)s__ODYD)->id_section__M1C;
+        if ((! result__R5IH)) {
+          if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+            __tmp__OMTD=((__ITM_SLOT *)s__LOYD)->id_section__Y1C;
           } else {
-            __tmp__VLTD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.id_section__M1C;
+            __tmp__OMTD=((__ITM_SLOT_OPERATOR *)s__LOYD)->parent_itm_slot__OU5B.id_section__Y1C;
           };
-          Self__HXUG=((__SECTION_ *)__tmp__VLTD);
-          __tmp__0LTD=(! (((void *)Self__HXUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__HXUG->name__WYDC == (void *)(&__string_24))));
+          Self__PK0G=((__SECTION_ *)__tmp__OMTD);
+          __tmp__TMTD=(! (((void *)Self__PK0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__PK0G->name__CZDC == (void *)(&__string_24))));
         } else {
-          __tmp__0LTD=FALSE__;
+          __tmp__TMTD=FALSE__;
         };
-        if (__tmp__0LTD) {
-          if (is_first__NDYD) {
-            put__to__like__CZXD((&__string_173),output_code__SI,(&__string_141));
-            is_first__NDYD=FALSE__;
+        if (__tmp__TMTD) {
+          if (is_first__KOYD) {
+            put__to__like__1ZXD((&__string_183),output_code__SI,(&__string_142));
+            is_first__KOYD=FALSE__;
           };
-          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
-          if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DW1E(s__ODYD,string_tmp2__V5I);
+          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
+          if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__IA3F(s__LOYD,string_tmp2__BAJ);
           } else {
-            pretty_name_in__YX1E(s__ODYD,string_tmp2__V5I);
+            pretty_name_in__3B3F(s__LOYD,string_tmp2__BAJ);
           };
-          put__to__like__CZXD(string_tmp2__V5I,output_code__SI,(&__string_142));
-          if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
-            shorter_profile_in__JB2E(s__ODYD,output_code__SI);
+          put__to__like__1ZXD(string_tmp2__BAJ,output_code__SI,(&__string_143));
+          if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+            __tmp__LPYD=((__ITM_SLOT *)s__LOYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
           } else {
-            shorter_profile_in__GC2E(s__ODYD,output_code__SI);
+            __tmp__LPYD=((__ITM_SLOT_OPERATOR *)s__LOYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
           };
-          ((__STRING *)string_tmp__VH)->count__KFC= 0;
-          if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
-            __tmp__PEYD=((__ITM_SLOT *)s__ODYD)->parent_named__G5.name__LI;
+          copy__ZCS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__LPYD)) &  511)])->filename__UPG);
+          append__BOS(string_tmp__VH,(&__string_176));
+          if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+            __tmp__QPYD=((__ITM_SLOT *)s__LOYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
           } else {
-            __tmp__PEYD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__QPYD=((__ITM_SLOT_OPERATOR *)s__LOYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
           };
-          get_all_comment_slot__in__OZ1E(Self__KJTD,__tmp__PEYD,string_tmp__VH);
-          put__to__like__CZXD(string_tmp__VH,output_code__SI,(&__string_139));
-        };
-        if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
-          __tmp__XEYD=((__ITM_SLOT *)s__ODYD)->next__CHHC;
-        } else {
-          __tmp__XEYD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.next__CHHC;
+          append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__QPYD) >>  17),string_tmp__VH);
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_145));
+          put__to__like__1ZXD((&__string_177),output_code__SI,(&__string_144));
+          if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__UD3F(s__LOYD,output_code__SI);
+          } else {
+            shorter_profile_in__RE3F(s__LOYD,output_code__SI);
+          };
+          put__to__like__1ZXD((&__string_178),output_code__SI,(&__string_144));
+          ((__STRING *)string_tmp__VH)->count__WFC= 0;
+          if (((struct ___OBJ *)s__LOYD)->__id==__ITM_SLOT__) {
+            __tmp__1PYD=((__ITM_SLOT *)s__LOYD)->parent_named__P5.name__LI;
+          } else {
+            __tmp__1PYD=((__ITM_SLOT_OPERATOR *)s__LOYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          };
+          get_all_comment_slot__in__FW2E(Self__WJTD,__tmp__1PYD,string_tmp__VH);
+          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_128));
+          put__to__like__1ZXD((&__string_179),output_code__SI,(&__string_144));
+          put__to__like__1ZXD((&__string_180),output_code__SI,(&__string_144));
+          put__to__like__1ZXD((&__string_181),output_code__SI,(&__string_144));
         };
-        s__ODYD=__tmp__XEYD;
+        Self__0C5D=(__INTEGER)(Self__0C5D +  1);
       };
-      save_file__with__DDC(add_ext__YAF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
-      Self__W0QC=(__INTEGER)(Self__W0QC +  1);
+      save_file__with__PDC(add_ext__EBF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
+      Self__C1QC=(__INTEGER)(Self__C1QC +  1);
     };
   };
   return( 0);
 }
 
-static __STRING* create__EBB(__INTEGER needed_capacity__GBB)
+static __STRING* create__NBB(__INTEGER needed_capacity__PBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __STRING *result__2RB,*Self__3AS;
-  __POINTER ptr__3RB,ptr_table__ZSCH,next__YSCH,result__0SCH;
-  __POINTER ptr_table__JTH,next__OTH,result__MTH;
-  __INTEGER typ_id__DSB;
-  __UINTEGER_32 sz__ASB,a__MC5G,new_size__NC5G,t__RC5G,a__QC5G;
-  __UINTEGER_32 new_size__ITH,lab_type__KTH;
-  result__2RB=NULL;
-  ptr__3RB=((__POINTER )(NULL));
-  typ_id__DSB= 0;
-  sz__ASB=((__UINTEGER_32 )sizeof(__STRING));
-  if ((sz__ASB ==  0)) {
-    result__2RB=STRING__;
+  __STRING *result__ISB,*Self__JBS;
+  __POINTER ptr__JSB,ptr_table__X5IH,next__W5IH,result__Y5IH;
+  __POINTER ptr_table__VTH,next__0TH,result__YTH;
+  __INTEGER typ_id__PSB;
+  __UINTEGER_32 sz__MSB,a__JOFH,new_size__KOFH,t__OOFH,a__NOFH;
+  __UINTEGER_32 new_size__UTH,lab_type__WTH;
+  result__ISB=NULL;
+  ptr__JSB=((__POINTER )(NULL));
+  typ_id__PSB= 0;
+  sz__MSB=((__UINTEGER_32 )sizeof(__STRING));
+  if ((sz__MSB ==  0)) {
+    result__ISB=STRING__;
   } else {
-    typ_id__DSB=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ASB);
-    if ((typ_id__DSB == (__INTEGER)(-  1))) {
-      a__MC5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NC5G=(__UINTEGER_32)((__UINTEGER_32)(sz__ASB + a__MC5G) & (__UINTEGER_32)(~ a__MC5G));
-      ptr_table__ZSCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NC5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__YSCH=((__POINTER )(NULL));
-      result__0SCH=((__POINTER *)ptr_table__ZSCH)[ 0];
-      if ((result__0SCH == (void *)NULL)) {
-        result__0SCH=new_lab__ARJ(new_size__NC5G);
-        next__YSCH=(void *)((unsigned long)result__0SCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NC5G)));
-        ((__POINTER *)next__YSCH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZSCH)[ 0]=next__YSCH;
+    typ_id__PSB=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MSB);
+    if ((typ_id__PSB == (__INTEGER)(-  1))) {
+      a__JOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MSB + a__JOFH) & (__UINTEGER_32)(~ a__JOFH));
+      ptr_table__X5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KOFH / ((__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__MRJ(new_size__KOFH);
+        next__W5IH=(void *)((unsigned long)result__Y5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOFH)));
+        ((__POINTER *)next__W5IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X5IH)[ 0]=next__W5IH;
       } else {
-        next__YSCH=((__POINTER *)result__0SCH)[ 0];
-        if ((next__YSCH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0SCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NC5G <<  1)) <=  4096)) {
-            next__YSCH=(void *)((unsigned long)result__0SCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NC5G)));
+        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__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KOFH <<  1)) <=  4096)) {
+            next__W5IH=(void *)((unsigned long)result__Y5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOFH)));
           } else {
-            next__YSCH=new_lab__ARJ(new_size__NC5G);
+            next__W5IH=new_lab__MRJ(new_size__KOFH);
           };
-          ((__POINTER *)next__YSCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZSCH)[ 0]=next__YSCH;
+          ((__POINTER *)next__W5IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X5IH)[ 0]=next__W5IH;
         } else {
-          ((__POINTER *)result__0SCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YSCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0SCH=next__YSCH;
+          ((__POINTER *)result__Y5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y5IH=next__W5IH;
         };
       };
-      ptr__3RB=result__0SCH;
+      ptr__JSB=result__Y5IH;
     } else {
-      t__RC5G=((__UINTEGER_32 )typ_id__DSB);
-      a__QC5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ITH=(__UINTEGER_32)((__UINTEGER_32)(sz__ASB + a__QC5G) & (__UINTEGER_32)(~ a__QC5G));
-      ptr_table__JTH=((__POINTER )(&(table_type[(t__RC5G)])));
-      lab_type__KTH=(__UINTEGER_32)(t__RC5G |  1);
-      next__OTH=((__POINTER )(NULL));
-      result__MTH=((__POINTER *)ptr_table__JTH)[ 0];
-      if ((result__MTH == (void *)NULL)) {
-        result__MTH=new_lab__ARJ(lab_type__KTH);
-        next__OTH=(void *)((unsigned long)result__MTH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ITH)));
-        ((__POINTER *)next__OTH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JTH)[ 0]=next__OTH;
+      t__OOFH=((__UINTEGER_32 )typ_id__PSB);
+      a__NOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UTH=(__UINTEGER_32)((__UINTEGER_32)(sz__MSB + a__NOFH) & (__UINTEGER_32)(~ a__NOFH));
+      ptr_table__VTH=((__POINTER )(&(table_type[(t__OOFH)])));
+      lab_type__WTH=(__UINTEGER_32)(t__OOFH |  1);
+      next__0TH=((__POINTER )(NULL));
+      result__YTH=((__POINTER *)ptr_table__VTH)[ 0];
+      if ((result__YTH == (void *)NULL)) {
+        result__YTH=new_lab__MRJ(lab_type__WTH);
+        next__0TH=(void *)((unsigned long)result__YTH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTH)));
+        ((__POINTER *)next__0TH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VTH)[ 0]=next__0TH;
       } else {
-        next__OTH=((__POINTER *)result__MTH)[ 0];
-        if ((next__OTH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MTH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ITH <<  1)) <=  4096)) {
-            next__OTH=(void *)((unsigned long)result__MTH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ITH)));
+        next__0TH=((__POINTER *)result__YTH)[ 0];
+        if ((next__0TH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YTH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UTH <<  1)) <=  4096)) {
+            next__0TH=(void *)((unsigned long)result__YTH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTH)));
           } else {
-            next__OTH=new_lab__ARJ(lab_type__KTH);
+            next__0TH=new_lab__MRJ(lab_type__WTH);
           };
-          ((__POINTER *)next__OTH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JTH)[ 0]=next__OTH;
+          ((__POINTER *)next__0TH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VTH)[ 0]=next__0TH;
         } else {
-          ((__POINTER *)result__MTH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OTH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MTH=next__OTH;
+          ((__POINTER *)result__YTH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0TH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YTH=next__0TH;
         };
       };
-      ptr__3RB=result__MTH;
+      ptr__JSB=result__YTH;
     };
-    result__2RB=((__STRING *)ptr__3RB);
-    *(result__2RB) = *(STRING__);
+    result__ISB=((__STRING *)ptr__JSB);
+    *(result__ISB) = *(STRING__);
   };
-  Self__3AS=((__STRING *)result__2RB);
-  if ((needed_capacity__GBB >  0)) {
-    if ((Self__3AS->capacity__MBS < needed_capacity__GBB)) {
-      Self__3AS->storage__VBS=create__VLEB(needed_capacity__GBB);
-      Self__3AS->capacity__MBS=needed_capacity__GBB;
+  Self__JBS=((__STRING *)result__ISB);
+  if ((needed_capacity__PBB >  0)) {
+    if ((Self__JBS->capacity__YBS < needed_capacity__PBB)) {
+      Self__JBS->storage__BCS=create__BMEB(needed_capacity__PBB);
+      Self__JBS->capacity__YBS=needed_capacity__PBB;
     };
   };
-  Self__3AS->count__KFC= 0;
-  return(result__2RB);
+  Self__JBS->count__WFC= 0;
+  return(result__ISB);
 }
 
-static __POINTER new_lab__ARJ(__UINTEGER_32 t__CRJ)
+static __POINTER new_lab__MRJ(__UINTEGER_32 t__ORJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 idx__ERJ,pv__LRJ;
-  void *blc__HRJ,*prev__IRJ,*prev__S31G,*next__T31G;
-  __MEMORY *Self__1NYG,*Self__R31G;
-  __POINTER result__JRJ;
-  __BOOLEAN __tmp__LSJ;
-  idx__ERJ= 0;
-  blc__HRJ=NULL;
-  prev__IRJ=NULL;
-  pv__LRJ= 0;
-  while_do__RCK:
+  __UINTEGER_32 idx__QRJ,pv__XRJ;
+  void *blc__TRJ,*prev__URJ,*prev__QLCH,*next__RLCH;
+  __MEMORY *Self__0K4G,*Self__PLCH;
+  __POINTER result__VRJ;
+  __BOOLEAN __tmp__XSJ;
+  idx__QRJ= 0;
+  blc__TRJ=NULL;
+  prev__URJ=NULL;
+  pv__XRJ= 0;
+  while_do__3CK:
   {
-    if ((idx__ERJ < nb_page__SRJ)) {
-      blc__HRJ=((void *)(last_block[(idx__ERJ)]));
-      __tmp__LSJ=(((__UINTEGER_32)(((__MEMORY *)blc__HRJ)->map_size_and_id__2SB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__HRJ)->map_size_and_id__2SB &  1) ==  1));
+    if ((idx__QRJ < nb_page__4RJ)) {
+      blc__TRJ=((void *)(last_block[(idx__QRJ)]));
+      __tmp__XSJ=(((__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB &  1) ==  1));
     } else {
-      __tmp__LSJ=FALSE__;
+      __tmp__XSJ=FALSE__;
     };
-    if (__tmp__LSJ) {
-      idx__ERJ=(__UINTEGER_32)(idx__ERJ +  1);
-      goto while_do__RCK;
+    if (__tmp__XSJ) {
+      idx__QRJ=(__UINTEGER_32)(idx__QRJ +  1);
+      goto while_do__3CK;
     };
   };
-  if ((idx__ERJ >= nb_page__SRJ)) {
-    blc__HRJ=new_page__CA5();
+  if ((idx__QRJ >= nb_page__4RJ)) {
+    blc__TRJ=new_page__OA5();
   };
-  ((__MEMORY *)blc__HRJ)->map_size_and_id__2SB=(__UINTEGER_32)(((__MEMORY *)blc__HRJ)->map_size_and_id__2SB -  4096);
-  Self__1NYG=((__MEMORY *)blc__HRJ);
-  result__JRJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__1NYG) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__1NYG->map_size_and_id__2SB &  4294967292LU))))));
-  if (((__UINTEGER_32)(((__MEMORY *)blc__HRJ)->map_size_and_id__2SB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    Self__R31G=((__MEMORY *)blc__HRJ);
-    prev__S31G=Self__R31G->map_previous_free__4SB;
-    next__T31G=Self__R31G->map_next_free__3SB;
-    if (((void *)prev__S31G == (void *)NULL)) {
-      first_free__LDVB=next__T31G;
+  ((__MEMORY *)blc__TRJ)->map_size_and_id__ITB=(__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB -  4096);
+  Self__0K4G=((__MEMORY *)blc__TRJ);
+  result__VRJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__0K4G) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__0K4G->map_size_and_id__ITB &  4294967292LU))))));
+  if (((__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    Self__PLCH=((__MEMORY *)blc__TRJ);
+    prev__QLCH=Self__PLCH->map_previous_free__KTB;
+    next__RLCH=Self__PLCH->map_next_free__JTB;
+    if (((void *)prev__QLCH == (void *)NULL)) {
+      first_free__XDVB=next__RLCH;
     } else {
-      ((__MEMORY *)prev__S31G)->map_next_free__3SB=next__T31G;
+      ((__MEMORY *)prev__QLCH)->map_next_free__JTB=next__RLCH;
     };
-    if (((void *)next__T31G != (void *)NULL)) {
-      ((__MEMORY *)next__T31G)->map_previous_free__4SB=prev__S31G;
+    if (((void *)next__RLCH != (void *)NULL)) {
+      ((__MEMORY *)next__RLCH)->map_previous_free__KTB=prev__QLCH;
     };
-    pv__LRJ=((__MEMORY *)blc__HRJ)->map_previous_linear__1SB;
-    if ((pv__LRJ !=  4294967295LU)) {
-      prev__IRJ=((void *)(void *)((unsigned long)begin_memory__DVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__LRJ))));
-      ((__MEMORY *)prev__IRJ)->map_size_and_id__2SB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__IRJ)->map_size_and_id__2SB + ((__MEMORY *)blc__HRJ)->map_size_and_id__2SB) +  8);
-      last_block[(idx__ERJ)] = (prev__IRJ);
+    pv__XRJ=((__MEMORY *)blc__TRJ)->map_previous_linear__HTB;
+    if ((pv__XRJ !=  4294967295LU)) {
+      prev__URJ=((void *)(void *)((unsigned long)begin_memory__PVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__XRJ))));
+      ((__MEMORY *)prev__URJ)->map_size_and_id__ITB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__URJ)->map_size_and_id__ITB + ((__MEMORY *)blc__TRJ)->map_size_and_id__ITB) +  8);
+      last_block[(idx__QRJ)] = (prev__URJ);
     };
   };
-  ((__POINTER *)result__JRJ)[ 0]=((__POINTER )t__CRJ);
-  return((void *)((unsigned long)result__JRJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
+  ((__POINTER *)result__VRJ)[ 0]=((__POINTER )t__ORJ);
+  return((void *)((unsigned long)result__VRJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
 }
 
-static void** create__NFRB(__INTEGER nb_elements__PFRB)
+static void** create__ZFRB(__INTEGER nb_elements__1FRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__4V1G,a__KQ3G,new_size__5V1G,new_size2__AW1G,a__OQ3G;
-  __UINTEGER_32 new_size__PQ3G;
-  __POINTER result__3V1G,ptr_table__4WAH,next__3WAH,result__5WAH;
-  void *result__CXAH;
-  __INTEGER Self__55MC;
-  void **Result__VDUB;
-  sz__4V1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__PFRB * ((__INTEGER )(sizeof(void *)))));
-  result__3V1G=((__POINTER )(NULL));
-  a__KQ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__5V1G=(__UINTEGER_32)((__UINTEGER_32)(sz__4V1G + a__KQ3G) & (__UINTEGER_32)(~ a__KQ3G));
-  new_size2__AW1G=(__UINTEGER_32)(new_size__5V1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__AW1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__OQ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__PQ3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__AW1G + a__OQ3G) & (__UINTEGER_32)(~ a__OQ3G));
-    ptr_table__4WAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PQ3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__3WAH=((__POINTER )(NULL));
-    result__5WAH=((__POINTER *)ptr_table__4WAH)[ 0];
-    if ((result__5WAH == (void *)NULL)) {
-      result__5WAH=new_lab__ARJ(new_size__PQ3G);
-      next__3WAH=(void *)((unsigned long)result__5WAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQ3G)));
-      ((__POINTER *)next__3WAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__4WAH)[ 0]=next__3WAH;
-    } else {
-      next__3WAH=((__POINTER *)result__5WAH)[ 0];
-      if ((next__3WAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5WAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PQ3G <<  1)) <=  4096)) {
-          next__3WAH=(void *)((unsigned long)result__5WAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQ3G)));
-        } else {
-          next__3WAH=new_lab__ARJ(new_size__PQ3G);
-        };
-        ((__POINTER *)next__3WAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4WAH)[ 0]=next__3WAH;
-      } else {
-        ((__POINTER *)result__5WAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3WAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__5WAH=next__3WAH;
-      };
-    };
-    ((__POINTER *)result__5WAH)[ 0]=((__POINTER ) 3);
-    result__3V1G=(void *)((unsigned long)result__5WAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__3DCH,a__J2DH,new_size__4DCH,new_size2__5DCH,a__N2DH;
+  __UINTEGER_32 new_size__O2DH;
+  __POINTER result__2DCH,ptr_table__SDHH,next__RDHH,result__TDHH;
+  void *result__WDHH;
+  __INTEGER Self__LANC;
+  void **Result__BEUB;
+  sz__3DCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__1FRB * ((__INTEGER )(sizeof(void *)))));
+  result__2DCH=((__POINTER )(NULL));
+  a__J2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4DCH=(__UINTEGER_32)((__UINTEGER_32)(sz__3DCH + a__J2DH) & (__UINTEGER_32)(~ a__J2DH));
+  new_size2__5DCH=(__UINTEGER_32)(new_size__4DCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5DCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__N2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__O2DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5DCH + a__N2DH) & (__UINTEGER_32)(~ a__N2DH));
+    ptr_table__SDHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O2DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__RDHH=((__POINTER )(NULL));
+    result__TDHH=((__POINTER *)ptr_table__SDHH)[ 0];
+    if ((result__TDHH == (void *)NULL)) {
+      result__TDHH=new_lab__MRJ(new_size__O2DH);
+      next__RDHH=(void *)((unsigned long)result__TDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O2DH)));
+      ((__POINTER *)next__RDHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__SDHH)[ 0]=next__RDHH;
+    } else {
+      next__RDHH=((__POINTER *)result__TDHH)[ 0];
+      if ((next__RDHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TDHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__O2DH <<  1)) <=  4096)) {
+          next__RDHH=(void *)((unsigned long)result__TDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O2DH)));
+        } else {
+          next__RDHH=new_lab__MRJ(new_size__O2DH);
+        };
+        ((__POINTER *)next__RDHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SDHH)[ 0]=next__RDHH;
+      } else {
+        ((__POINTER *)result__TDHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RDHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__TDHH=next__RDHH;
+      };
+    };
+    ((__POINTER *)result__TDHH)[ 0]=((__POINTER ) 3);
+    result__2DCH=(void *)((unsigned long)result__TDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__CXAH=first_free__LDVB;
-    while ((((void *)result__CXAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CXAH)->map_size_and_id__2SB &  4294967292LU) < new_size__5V1G))) {
-      result__CXAH=((__MEMORY *)result__CXAH)->map_next_free__3SB;
+    result__WDHH=first_free__XDVB;
+    while ((((void *)result__WDHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WDHH)->map_size_and_id__ITB &  4294967292LU) < new_size__4DCH))) {
+      result__WDHH=((__MEMORY *)result__WDHH)->map_next_free__JTB;
     };
-    if (((void *)result__CXAH == (void *)NULL)) {
-      result__CXAH=new_page__CA5();
+    if (((void *)result__WDHH == (void *)NULL)) {
+      result__WDHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__CXAH,new_size__5V1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CXAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__3V1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CXAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__WDHH,new_size__4DCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WDHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__2DCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WDHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__VDUB=((void **)result__3V1G);
-  Self__55MC=(__INTEGER)(nb_elements__PFRB -  1);
-  while ((Self__55MC >=  0)) {
-    Result__VDUB[Self__55MC]=NULL;
-    Self__55MC=(__INTEGER)(Self__55MC -  1);
+  Result__BEUB=((void **)result__2DCH);
+  Self__LANC=(__INTEGER)(nb_elements__1FRB -  1);
+  while ((Self__LANC >=  0)) {
+    Result__BEUB[Self__LANC]=NULL;
+    Self__LANC=(__INTEGER)(Self__LANC -  1);
   };
-  return(Result__VDUB);
+  return(Result__BEUB);
 }
 
-static void add_last__NLT(__STRING *Self__OLT,__CHARACTER ch__PLT)
+static void add_last__ZLT(__STRING *Self__0LT,__CHARACTER ch__1LT)
 // ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__QLT,old_nb_elts__U02G,upper__VC5G,Self__TC5G;
-  __CHARACTER *Self__T02G,*new__W02G;
-  new_capacity__QLT= 0;
-  if ((Self__OLT->capacity__MBS <= Self__OLT->count__KFC)) {
-    if ((Self__OLT->capacity__MBS ==  0)) {
-      Self__OLT->capacity__MBS= 32;
-      Self__OLT->storage__VBS=create__VLEB( 32);
-    } else {
-      new_capacity__QLT=(__INTEGER)(Self__OLT->capacity__MBS <<  1);
-      Self__T02G=((__CHARACTER *)Self__OLT->storage__VBS);
-      old_nb_elts__U02G=Self__OLT->capacity__MBS;
-      new__W02G=((__CHARACTER *)realloc_dynamic__old_size__new_size__FELC(((__POINTER )Self__T02G),((__UINTEGER_32 )old_nb_elts__U02G),((__UINTEGER_32 )new_capacity__QLT)));
-      upper__VC5G=(__INTEGER)(new_capacity__QLT -  1);
-      Self__TC5G=old_nb_elts__U02G;
-      while ((Self__TC5G <= upper__VC5G)) {
-        new__W02G[Self__TC5G]='\0';
-        Self__TC5G=(__INTEGER)(Self__TC5G +  1);
-      };
-      Self__OLT->storage__VBS=new__W02G;
-      Self__OLT->capacity__MBS=new_capacity__QLT;
-    };
-  };
-  ((__CHARACTER *)Self__OLT->storage__VBS)[Self__OLT->count__KFC]=ch__PLT;
-  Self__OLT->count__KFC=(__INTEGER)(Self__OLT->count__KFC +  1);
+  __INTEGER new_capacity__2LT,old_nb_elts__GHDH,upper__SOFH,Self__QOFH;
+  __CHARACTER *Self__FHDH,*new__IHDH;
+  new_capacity__2LT= 0;
+  if ((Self__0LT->capacity__YBS <= Self__0LT->count__WFC)) {
+    if ((Self__0LT->capacity__YBS ==  0)) {
+      Self__0LT->capacity__YBS= 32;
+      Self__0LT->storage__BCS=create__BMEB( 32);
+    } else {
+      new_capacity__2LT=(__INTEGER)(Self__0LT->capacity__YBS <<  1);
+      Self__FHDH=((__CHARACTER *)Self__0LT->storage__BCS);
+      old_nb_elts__GHDH=Self__0LT->capacity__YBS;
+      new__IHDH=((__CHARACTER *)realloc_dynamic__old_size__new_size__RELC(((__POINTER )Self__FHDH),((__UINTEGER_32 )old_nb_elts__GHDH),((__UINTEGER_32 )new_capacity__2LT)));
+      upper__SOFH=(__INTEGER)(new_capacity__2LT -  1);
+      Self__QOFH=old_nb_elts__GHDH;
+      while ((Self__QOFH <= upper__SOFH)) {
+        new__IHDH[Self__QOFH]='\0';
+        Self__QOFH=(__INTEGER)(Self__QOFH +  1);
+      };
+      Self__0LT->storage__BCS=new__IHDH;
+      Self__0LT->capacity__YBS=new_capacity__2LT;
+    };
+  };
+  ((__CHARACTER *)Self__0LT->storage__BCS)[Self__0LT->count__WFC]=ch__1LT;
+  Self__0LT->count__WFC=(__INTEGER)(Self__0LT->count__WFC +  1);
 }
 
-static void add_last__URV(__FAST_ARRAYoSTRINGo *Self__VRV,void *element__WRV)
+static void add_last__ASV(__FAST_ARRAYoSTRINGo *Self__BSV,void *element__CSV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__XRV,__tmp__1SV,__tmp__BIEC,Self__SKVD;
-  __BOOLEAN __tmp__FSV;
-  void **__tmp__0SV,**new__NHEC;
-  new_capacity__XRV= 0;
-  if (((__INTEGER)(Self__VRV->parent_arrayed_collection__XJC.upper__0JC +  1) <= (__INTEGER)(Self__VRV->parent_arrayed_collection__XJC.capacity__AGT -  1))) {
-    Self__VRV->parent_arrayed_collection__XJC.upper__0JC=(__INTEGER)(Self__VRV->parent_arrayed_collection__XJC.upper__0JC +  1);
-    __tmp__FSV=TRUE__;
+  __INTEGER new_capacity__DSV,__tmp__HTV,__tmp__NIEC,Self__LLVD;
+  __BOOLEAN __tmp__RSV;
+  void **__tmp__GTV,**new__ZHEC;
+  new_capacity__DSV= 0;
+  if (((__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.upper__GKC +  1) <= (__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.capacity__MGT -  1))) {
+    Self__BSV->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.upper__GKC +  1);
+    __tmp__RSV=TRUE__;
   } else {
-    __tmp__FSV=FALSE__;
-  };
-  if ((! __tmp__FSV)) {
-    if ((Self__VRV->parent_arrayed_collection__XJC.capacity__AGT ==  0)) {
-      Self__VRV->parent_arrayed_collection__XJC.storage__LGT=create__NFRB( 2);
-      Self__VRV->parent_arrayed_collection__XJC.capacity__AGT= 2;
-      Self__VRV->parent_arrayed_collection__XJC.upper__0JC= 0;
-    } else {
-      new_capacity__XRV=(__INTEGER)(Self__VRV->parent_arrayed_collection__XJC.capacity__AGT <<  1);
-      __tmp__0SV=Self__VRV->parent_arrayed_collection__XJC.storage__LGT;
-      __tmp__1SV=Self__VRV->parent_arrayed_collection__XJC.capacity__AGT;
-      new__NHEC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__0SV)),((__UINTEGER_32 )(__INTEGER)(__tmp__1SV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__XRV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__BIEC=(__INTEGER)(new_capacity__XRV -  1);
-      Self__SKVD=__tmp__1SV;
-      while ((Self__SKVD <= __tmp__BIEC)) {
-        new__NHEC[Self__SKVD]=NULL;
-        Self__SKVD=(__INTEGER)(Self__SKVD +  1);
-      };
-      Self__VRV->parent_arrayed_collection__XJC.storage__LGT=new__NHEC;
-      Self__VRV->parent_arrayed_collection__XJC.capacity__AGT=new_capacity__XRV;
-      Self__VRV->parent_arrayed_collection__XJC.upper__0JC=(__INTEGER)(Self__VRV->parent_arrayed_collection__XJC.upper__0JC +  1);
-    };
-  };
-  ((void **)Self__VRV->parent_arrayed_collection__XJC.storage__LGT)[Self__VRV->parent_arrayed_collection__XJC.upper__0JC]=element__WRV;
+    __tmp__RSV=FALSE__;
+  };
+  if ((! __tmp__RSV)) {
+    if ((Self__BSV->parent_arrayed_collection__DKC.capacity__MGT ==  0)) {
+      Self__BSV->parent_arrayed_collection__DKC.storage__XGT=create__ZFRB( 2);
+      Self__BSV->parent_arrayed_collection__DKC.capacity__MGT= 2;
+      Self__BSV->parent_arrayed_collection__DKC.upper__GKC= 0;
+    } else {
+      new_capacity__DSV=(__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.capacity__MGT <<  1);
+      __tmp__GTV=Self__BSV->parent_arrayed_collection__DKC.storage__XGT;
+      __tmp__HTV=Self__BSV->parent_arrayed_collection__DKC.capacity__MGT;
+      new__ZHEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__GTV)),((__UINTEGER_32 )(__INTEGER)(__tmp__HTV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__DSV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__NIEC=(__INTEGER)(new_capacity__DSV -  1);
+      Self__LLVD=__tmp__HTV;
+      while ((Self__LLVD <= __tmp__NIEC)) {
+        new__ZHEC[Self__LLVD]=NULL;
+        Self__LLVD=(__INTEGER)(Self__LLVD +  1);
+      };
+      Self__BSV->parent_arrayed_collection__DKC.storage__XGT=new__ZHEC;
+      Self__BSV->parent_arrayed_collection__DKC.capacity__MGT=new_capacity__DSV;
+      Self__BSV->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.upper__GKC +  1);
+    };
+  };
+  ((void **)Self__BSV->parent_arrayed_collection__DKC.storage__XGT)[Self__BSV->parent_arrayed_collection__DKC.upper__GKC]=element__CSV;
 }
 
-static __INTEGER prime_number_ceiling__L41(__INTEGER integer__N41)
+static __INTEGER prime_number_ceiling__X41(__INTEGER integer__Z41)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__P41;
-  __BOOLEAN __tmp__X41,__tmp__E51,result__QQCB,__tmp__R51,result__CRCB;
-  __BOOLEAN __tmp__451,result__URCB,__tmp__LA2,result__GSCB,__tmp__YA2;
-  __BOOLEAN result__YSCB,__tmp__FB2,result__KTCB,__tmp__SB2;
-  __BOOLEAN result__2TCB,__tmp__5B2,result__OUCB,__tmp__MC2;
-  __BOOLEAN result__AVCB,__tmp__ZC2,result__SVCB,__tmp__GD2;
-  __BOOLEAN result__EWCB,__tmp__TD2,result__WWCB,__tmp__AE2;
-  __BOOLEAN result__IXCB,__tmp__NE2,result__0XCB,__tmp__0E2;
-  __BOOLEAN result__MYCB,__tmp__HF2,result__4YCB,__tmp__UF2;
-  __BOOLEAN result__QZCB,__tmp__BG2,result__C0CB,__tmp__OG2;
-  __BOOLEAN result__U0CB,__tmp__1G2,result__G1CB,__tmp__IH2;
-  __BOOLEAN result__Y1CB,__tmp__VH2,result__K2CB,__tmp__CI2;
-  __BOOLEAN result__22CB,__tmp__PI2,result__O3CB,__tmp__2I2;
-  __BOOLEAN result__A4CB;
-  result__P41= 0;
-  if ((integer__N41 <=  11)) {
-    result__P41= 11;
-    __tmp__X41=TRUE__;
+  __INTEGER result__141;
+  __BOOLEAN __tmp__D51,__tmp__Q51,result__2QCB,__tmp__351,result__ORCB;
+  __BOOLEAN __tmp__KA2,result__ASCB,__tmp__XA2,result__SSCB,__tmp__EB2;
+  __BOOLEAN result__ETCB,__tmp__RB2,result__WTCB,__tmp__4B2;
+  __BOOLEAN result__IUCB,__tmp__LC2,result__0UCB,__tmp__YC2;
+  __BOOLEAN result__MVCB,__tmp__FD2,result__4VCB,__tmp__SD2;
+  __BOOLEAN result__QWCB,__tmp__5D2,result__CXCB,__tmp__ME2;
+  __BOOLEAN result__UXCB,__tmp__ZE2,result__GYCB,__tmp__GF2;
+  __BOOLEAN result__YYCB,__tmp__TF2,result__KZCB,__tmp__AG2;
+  __BOOLEAN result__2ZCB,__tmp__NG2,result__O0CB,__tmp__0G2;
+  __BOOLEAN result__A1CB,__tmp__HH2,result__S1CB,__tmp__UH2;
+  __BOOLEAN result__E2CB,__tmp__BI2,result__W2CB,__tmp__OI2;
+  __BOOLEAN result__I3CB,__tmp__1I2,result__03CB,__tmp__IJ2;
+  __BOOLEAN result__M4CB;
+  result__141= 0;
+  if ((integer__Z41 <=  11)) {
+    result__141= 11;
+    __tmp__D51=TRUE__;
   } else {
-    __tmp__X41=FALSE__;
+    __tmp__D51=FALSE__;
   };
-  if (__tmp__X41) {
-    __tmp__E51=TRUE__;
+  if (__tmp__D51) {
+    __tmp__Q51=TRUE__;
   } else {
-    result__QQCB=(integer__N41 <=  23);
-    if (result__QQCB) {
-      result__P41= 23;
+    result__2QCB=(integer__Z41 <=  23);
+    if (result__2QCB) {
+      result__141= 23;
     };
-    __tmp__E51=result__QQCB;
+    __tmp__Q51=result__2QCB;
   };
-  if (__tmp__E51) {
-    __tmp__R51=TRUE__;
+  if (__tmp__Q51) {
+    __tmp__351=TRUE__;
   } else {
-    result__CRCB=(integer__N41 <=  53);
-    if (result__CRCB) {
-      result__P41= 53;
+    result__ORCB=(integer__Z41 <=  53);
+    if (result__ORCB) {
+      result__141= 53;
     };
-    __tmp__R51=result__CRCB;
+    __tmp__351=result__ORCB;
   };
-  if (__tmp__R51) {
-    __tmp__451=TRUE__;
+  if (__tmp__351) {
+    __tmp__KA2=TRUE__;
   } else {
-    result__URCB=(integer__N41 <=  97);
-    if (result__URCB) {
-      result__P41= 97;
+    result__ASCB=(integer__Z41 <=  97);
+    if (result__ASCB) {
+      result__141= 97;
     };
-    __tmp__451=result__URCB;
+    __tmp__KA2=result__ASCB;
   };
-  if (__tmp__451) {
-    __tmp__LA2=TRUE__;
+  if (__tmp__KA2) {
+    __tmp__XA2=TRUE__;
   } else {
-    result__GSCB=(integer__N41 <=  193);
-    if (result__GSCB) {
-      result__P41= 193;
+    result__SSCB=(integer__Z41 <=  193);
+    if (result__SSCB) {
+      result__141= 193;
     };
-    __tmp__LA2=result__GSCB;
+    __tmp__XA2=result__SSCB;
   };
-  if (__tmp__LA2) {
-    __tmp__YA2=TRUE__;
+  if (__tmp__XA2) {
+    __tmp__EB2=TRUE__;
   } else {
-    result__YSCB=(integer__N41 <=  389);
-    if (result__YSCB) {
-      result__P41= 389;
+    result__ETCB=(integer__Z41 <=  389);
+    if (result__ETCB) {
+      result__141= 389;
     };
-    __tmp__YA2=result__YSCB;
+    __tmp__EB2=result__ETCB;
   };
-  if (__tmp__YA2) {
-    __tmp__FB2=TRUE__;
+  if (__tmp__EB2) {
+    __tmp__RB2=TRUE__;
   } else {
-    result__KTCB=(integer__N41 <=  769);
-    if (result__KTCB) {
-      result__P41= 769;
+    result__WTCB=(integer__Z41 <=  769);
+    if (result__WTCB) {
+      result__141= 769;
     };
-    __tmp__FB2=result__KTCB;
+    __tmp__RB2=result__WTCB;
   };
-  if (__tmp__FB2) {
-    __tmp__SB2=TRUE__;
+  if (__tmp__RB2) {
+    __tmp__4B2=TRUE__;
   } else {
-    result__2TCB=(integer__N41 <=  1543);
-    if (result__2TCB) {
-      result__P41= 1543;
+    result__IUCB=(integer__Z41 <=  1543);
+    if (result__IUCB) {
+      result__141= 1543;
     };
-    __tmp__SB2=result__2TCB;
+    __tmp__4B2=result__IUCB;
   };
-  if (__tmp__SB2) {
-    __tmp__5B2=TRUE__;
+  if (__tmp__4B2) {
+    __tmp__LC2=TRUE__;
   } else {
-    result__OUCB=(integer__N41 <=  3079);
-    if (result__OUCB) {
-      result__P41= 3079;
+    result__0UCB=(integer__Z41 <=  3079);
+    if (result__0UCB) {
+      result__141= 3079;
     };
-    __tmp__5B2=result__OUCB;
+    __tmp__LC2=result__0UCB;
   };
-  if (__tmp__5B2) {
-    __tmp__MC2=TRUE__;
+  if (__tmp__LC2) {
+    __tmp__YC2=TRUE__;
   } else {
-    result__AVCB=(integer__N41 <=  6151);
-    if (result__AVCB) {
-      result__P41= 6151;
+    result__MVCB=(integer__Z41 <=  6151);
+    if (result__MVCB) {
+      result__141= 6151;
     };
-    __tmp__MC2=result__AVCB;
+    __tmp__YC2=result__MVCB;
   };
-  if (__tmp__MC2) {
-    __tmp__ZC2=TRUE__;
+  if (__tmp__YC2) {
+    __tmp__FD2=TRUE__;
   } else {
-    result__SVCB=(integer__N41 <=  12289);
-    if (result__SVCB) {
-      result__P41= 12289;
+    result__4VCB=(integer__Z41 <=  12289);
+    if (result__4VCB) {
+      result__141= 12289;
     };
-    __tmp__ZC2=result__SVCB;
+    __tmp__FD2=result__4VCB;
   };
-  if (__tmp__ZC2) {
-    __tmp__GD2=TRUE__;
+  if (__tmp__FD2) {
+    __tmp__SD2=TRUE__;
   } else {
-    result__EWCB=(integer__N41 <=  24593);
-    if (result__EWCB) {
-      result__P41= 24593;
+    result__QWCB=(integer__Z41 <=  24593);
+    if (result__QWCB) {
+      result__141= 24593;
     };
-    __tmp__GD2=result__EWCB;
+    __tmp__SD2=result__QWCB;
   };
-  if (__tmp__GD2) {
-    __tmp__TD2=TRUE__;
+  if (__tmp__SD2) {
+    __tmp__5D2=TRUE__;
   } else {
-    result__WWCB=(integer__N41 <=  49157);
-    if (result__WWCB) {
-      result__P41= 49157;
+    result__CXCB=(integer__Z41 <=  49157);
+    if (result__CXCB) {
+      result__141= 49157;
     };
-    __tmp__TD2=result__WWCB;
+    __tmp__5D2=result__CXCB;
   };
-  if (__tmp__TD2) {
-    __tmp__AE2=TRUE__;
+  if (__tmp__5D2) {
+    __tmp__ME2=TRUE__;
   } else {
-    result__IXCB=(integer__N41 <=  98317);
-    if (result__IXCB) {
-      result__P41= 98317;
+    result__UXCB=(integer__Z41 <=  98317);
+    if (result__UXCB) {
+      result__141= 98317;
     };
-    __tmp__AE2=result__IXCB;
+    __tmp__ME2=result__UXCB;
   };
-  if (__tmp__AE2) {
-    __tmp__NE2=TRUE__;
+  if (__tmp__ME2) {
+    __tmp__ZE2=TRUE__;
   } else {
-    result__0XCB=(integer__N41 <=  196613);
-    if (result__0XCB) {
-      result__P41= 196613;
+    result__GYCB=(integer__Z41 <=  196613);
+    if (result__GYCB) {
+      result__141= 196613;
     };
-    __tmp__NE2=result__0XCB;
+    __tmp__ZE2=result__GYCB;
   };
-  if (__tmp__NE2) {
-    __tmp__0E2=TRUE__;
+  if (__tmp__ZE2) {
+    __tmp__GF2=TRUE__;
   } else {
-    result__MYCB=(integer__N41 <=  393241);
-    if (result__MYCB) {
-      result__P41= 393241;
+    result__YYCB=(integer__Z41 <=  393241);
+    if (result__YYCB) {
+      result__141= 393241;
     };
-    __tmp__0E2=result__MYCB;
+    __tmp__GF2=result__YYCB;
   };
-  if (__tmp__0E2) {
-    __tmp__HF2=TRUE__;
+  if (__tmp__GF2) {
+    __tmp__TF2=TRUE__;
   } else {
-    result__4YCB=(integer__N41 <=  786433);
-    if (result__4YCB) {
-      result__P41= 786433;
+    result__KZCB=(integer__Z41 <=  786433);
+    if (result__KZCB) {
+      result__141= 786433;
     };
-    __tmp__HF2=result__4YCB;
+    __tmp__TF2=result__KZCB;
   };
-  if (__tmp__HF2) {
-    __tmp__UF2=TRUE__;
+  if (__tmp__TF2) {
+    __tmp__AG2=TRUE__;
   } else {
-    result__QZCB=(integer__N41 <=  1572869);
-    if (result__QZCB) {
-      result__P41= 1572869;
+    result__2ZCB=(integer__Z41 <=  1572869);
+    if (result__2ZCB) {
+      result__141= 1572869;
     };
-    __tmp__UF2=result__QZCB;
+    __tmp__AG2=result__2ZCB;
   };
-  if (__tmp__UF2) {
-    __tmp__BG2=TRUE__;
+  if (__tmp__AG2) {
+    __tmp__NG2=TRUE__;
   } else {
-    result__C0CB=(integer__N41 <=  3145739);
-    if (result__C0CB) {
-      result__P41= 3145739;
+    result__O0CB=(integer__Z41 <=  3145739);
+    if (result__O0CB) {
+      result__141= 3145739;
     };
-    __tmp__BG2=result__C0CB;
+    __tmp__NG2=result__O0CB;
   };
-  if (__tmp__BG2) {
-    __tmp__OG2=TRUE__;
+  if (__tmp__NG2) {
+    __tmp__0G2=TRUE__;
   } else {
-    result__U0CB=(integer__N41 <=  6291469);
-    if (result__U0CB) {
-      result__P41= 6291469;
+    result__A1CB=(integer__Z41 <=  6291469);
+    if (result__A1CB) {
+      result__141= 6291469;
     };
-    __tmp__OG2=result__U0CB;
+    __tmp__0G2=result__A1CB;
   };
-  if (__tmp__OG2) {
-    __tmp__1G2=TRUE__;
+  if (__tmp__0G2) {
+    __tmp__HH2=TRUE__;
   } else {
-    result__G1CB=(integer__N41 <=  12582917);
-    if (result__G1CB) {
-      result__P41= 12582917;
+    result__S1CB=(integer__Z41 <=  12582917);
+    if (result__S1CB) {
+      result__141= 12582917;
     };
-    __tmp__1G2=result__G1CB;
+    __tmp__HH2=result__S1CB;
   };
-  if (__tmp__1G2) {
-    __tmp__IH2=TRUE__;
+  if (__tmp__HH2) {
+    __tmp__UH2=TRUE__;
   } else {
-    result__Y1CB=(integer__N41 <=  25165843);
-    if (result__Y1CB) {
-      result__P41= 25165843;
+    result__E2CB=(integer__Z41 <=  25165843);
+    if (result__E2CB) {
+      result__141= 25165843;
     };
-    __tmp__IH2=result__Y1CB;
+    __tmp__UH2=result__E2CB;
   };
-  if (__tmp__IH2) {
-    __tmp__VH2=TRUE__;
+  if (__tmp__UH2) {
+    __tmp__BI2=TRUE__;
   } else {
-    result__K2CB=(integer__N41 <=  50331653);
-    if (result__K2CB) {
-      result__P41= 50331653;
+    result__W2CB=(integer__Z41 <=  50331653);
+    if (result__W2CB) {
+      result__141= 50331653;
     };
-    __tmp__VH2=result__K2CB;
+    __tmp__BI2=result__W2CB;
   };
-  if (__tmp__VH2) {
-    __tmp__CI2=TRUE__;
+  if (__tmp__BI2) {
+    __tmp__OI2=TRUE__;
   } else {
-    result__22CB=(integer__N41 <=  100663319);
-    if (result__22CB) {
-      result__P41= 100663319;
+    result__I3CB=(integer__Z41 <=  100663319);
+    if (result__I3CB) {
+      result__141= 100663319;
     };
-    __tmp__CI2=result__22CB;
+    __tmp__OI2=result__I3CB;
   };
-  if (__tmp__CI2) {
-    __tmp__PI2=TRUE__;
+  if (__tmp__OI2) {
+    __tmp__1I2=TRUE__;
   } else {
-    result__O3CB=(integer__N41 <=  201326611);
-    if (result__O3CB) {
-      result__P41= 201326611;
+    result__03CB=(integer__Z41 <=  201326611);
+    if (result__03CB) {
+      result__141= 201326611;
     };
-    __tmp__PI2=result__O3CB;
+    __tmp__1I2=result__03CB;
   };
-  if (__tmp__PI2) {
-    __tmp__2I2=TRUE__;
+  if (__tmp__1I2) {
+    __tmp__IJ2=TRUE__;
   } else {
-    result__A4CB=(integer__N41 <=  402653189);
-    if (result__A4CB) {
-      result__P41= 402653189;
+    result__M4CB=(integer__Z41 <=  402653189);
+    if (result__M4CB) {
+      result__141= 402653189;
     };
-    __tmp__2I2=result__A4CB;
+    __tmp__IJ2=result__M4CB;
   };
-  if ((! __tmp__2I2)) {
-    if ((integer__N41 <=  805306457)) {
-      result__P41= 805306457;
+  if ((! __tmp__IJ2)) {
+    if ((integer__Z41 <=  805306457)) {
+      result__141= 805306457;
     } else {
-      result__P41= 1610612741;
+      result__141= 1610612741;
     };
   };
-  return(result__P41);
+  return(result__141);
 }
 
-static void** create__LB4(__INTEGER nb_elements__NB4)
+static void** create__XB4(__INTEGER nb_elements__ZB4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__C12G,a__H12G,new_size__D12G,new_size2__E12G,a__L12G;
-  __UINTEGER_32 new_size__M12G;
-  __POINTER result__B12G,ptr_table__VFAH,next__UFAH,result__WFAH;
-  void *result__3SCH;
-  __INTEGER Self__30JC;
-  void **Result__CZEB;
-  sz__C12G=((__UINTEGER_32 )(__INTEGER)(nb_elements__NB4 * ((__INTEGER )(sizeof(void *)))));
-  result__B12G=((__POINTER )(NULL));
-  a__H12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__D12G=(__UINTEGER_32)((__UINTEGER_32)(sz__C12G + a__H12G) & (__UINTEGER_32)(~ a__H12G));
-  new_size2__E12G=(__UINTEGER_32)(new_size__D12G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__E12G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__L12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__M12G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__E12G + a__L12G) & (__UINTEGER_32)(~ a__L12G));
-    ptr_table__VFAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M12G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__UFAH=((__POINTER )(NULL));
-    result__WFAH=((__POINTER *)ptr_table__VFAH)[ 0];
-    if ((result__WFAH == (void *)NULL)) {
-      result__WFAH=new_lab__ARJ(new_size__M12G);
-      next__UFAH=(void *)((unsigned long)result__WFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M12G)));
-      ((__POINTER *)next__UFAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__VFAH)[ 0]=next__UFAH;
-    } else {
-      next__UFAH=((__POINTER *)result__WFAH)[ 0];
-      if ((next__UFAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WFAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__M12G <<  1)) <=  4096)) {
-          next__UFAH=(void *)((unsigned long)result__WFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M12G)));
-        } else {
-          next__UFAH=new_lab__ARJ(new_size__M12G);
-        };
-        ((__POINTER *)next__UFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VFAH)[ 0]=next__UFAH;
-      } else {
-        ((__POINTER *)result__WFAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__WFAH=next__UFAH;
-      };
-    };
-    ((__POINTER *)result__WFAH)[ 0]=((__POINTER ) 3);
-    result__B12G=(void *)((unsigned long)result__WFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__UHDH,a__ZHDH,new_size__VHDH,new_size2__WHDH,a__3HDH;
+  __UINTEGER_32 new_size__4HDH;
+  __POINTER result__THDH,ptr_table__BSGH,next__ASGH,result__CSGH;
+  void *result__15IH;
+  __INTEGER Self__J1JC;
+  void **Result__OZEB;
+  sz__UHDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZB4 * ((__INTEGER )(sizeof(void *)))));
+  result__THDH=((__POINTER )(NULL));
+  a__ZHDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VHDH=(__UINTEGER_32)((__UINTEGER_32)(sz__UHDH + a__ZHDH) & (__UINTEGER_32)(~ a__ZHDH));
+  new_size2__WHDH=(__UINTEGER_32)(new_size__VHDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WHDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3HDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4HDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WHDH + a__3HDH) & (__UINTEGER_32)(~ a__3HDH));
+    ptr_table__BSGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4HDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ASGH=((__POINTER )(NULL));
+    result__CSGH=((__POINTER *)ptr_table__BSGH)[ 0];
+    if ((result__CSGH == (void *)NULL)) {
+      result__CSGH=new_lab__MRJ(new_size__4HDH);
+      next__ASGH=(void *)((unsigned long)result__CSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HDH)));
+      ((__POINTER *)next__ASGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__BSGH)[ 0]=next__ASGH;
+    } else {
+      next__ASGH=((__POINTER *)result__CSGH)[ 0];
+      if ((next__ASGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CSGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4HDH <<  1)) <=  4096)) {
+          next__ASGH=(void *)((unsigned long)result__CSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HDH)));
+        } else {
+          next__ASGH=new_lab__MRJ(new_size__4HDH);
+        };
+        ((__POINTER *)next__ASGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BSGH)[ 0]=next__ASGH;
+      } else {
+        ((__POINTER *)result__CSGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ASGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__CSGH=next__ASGH;
+      };
+    };
+    ((__POINTER *)result__CSGH)[ 0]=((__POINTER ) 3);
+    result__THDH=(void *)((unsigned long)result__CSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__3SCH=first_free__LDVB;
-    while ((((void *)result__3SCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3SCH)->map_size_and_id__2SB &  4294967292LU) < new_size__D12G))) {
-      result__3SCH=((__MEMORY *)result__3SCH)->map_next_free__3SB;
+    result__15IH=first_free__XDVB;
+    while ((((void *)result__15IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__15IH)->map_size_and_id__ITB &  4294967292LU) < new_size__VHDH))) {
+      result__15IH=((__MEMORY *)result__15IH)->map_next_free__JTB;
     };
-    if (((void *)result__3SCH == (void *)NULL)) {
-      result__3SCH=new_page__CA5();
+    if (((void *)result__15IH == (void *)NULL)) {
+      result__15IH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__3SCH,new_size__D12G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3SCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__B12G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3SCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__15IH,new_size__VHDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__15IH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__THDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__15IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__CZEB=((void **)result__B12G);
-  Self__30JC=(__INTEGER)(nb_elements__NB4 -  1);
-  while ((Self__30JC >=  0)) {
-    Result__CZEB[Self__30JC]=NULL;
-    Self__30JC=(__INTEGER)(Self__30JC -  1);
+  Result__OZEB=((void **)result__THDH);
+  Self__J1JC=(__INTEGER)(nb_elements__ZB4 -  1);
+  while ((Self__J1JC >=  0)) {
+    Result__OZEB[Self__J1JC]=NULL;
+    Self__J1JC=(__INTEGER)(Self__J1JC -  1);
   };
-  return(Result__CZEB);
+  return(Result__OZEB);
 }
 
-static void** create__1HTC(__INTEGER nb_elements__3HTC)
+static void** create__HITC(__INTEGER nb_elements__JITC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__O12G,a__T12G,new_size__P12G,new_size2__Q12G,a__X12G;
-  __UINTEGER_32 new_size__Y12G;
-  __POINTER result__N12G,ptr_table__0FAH,next__ZFAH,result__1FAH;
-  void *result__ATCH;
-  __INTEGER Self__NPWD;
-  void **Result__HD3C;
-  sz__O12G=((__UINTEGER_32 )(__INTEGER)(nb_elements__3HTC * ((__INTEGER )(sizeof(void *)))));
-  result__N12G=((__POINTER )(NULL));
-  a__T12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__P12G=(__UINTEGER_32)((__UINTEGER_32)(sz__O12G + a__T12G) & (__UINTEGER_32)(~ a__T12G));
-  new_size2__Q12G=(__UINTEGER_32)(new_size__P12G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__Q12G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__X12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__Y12G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Q12G + a__X12G) & (__UINTEGER_32)(~ a__X12G));
-    ptr_table__0FAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y12G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__ZFAH=((__POINTER )(NULL));
-    result__1FAH=((__POINTER *)ptr_table__0FAH)[ 0];
-    if ((result__1FAH == (void *)NULL)) {
-      result__1FAH=new_lab__ARJ(new_size__Y12G);
-      next__ZFAH=(void *)((unsigned long)result__1FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y12G)));
-      ((__POINTER *)next__ZFAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__0FAH)[ 0]=next__ZFAH;
-    } else {
-      next__ZFAH=((__POINTER *)result__1FAH)[ 0];
-      if ((next__ZFAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1FAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__Y12G <<  1)) <=  4096)) {
-          next__ZFAH=(void *)((unsigned long)result__1FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y12G)));
-        } else {
-          next__ZFAH=new_lab__ARJ(new_size__Y12G);
-        };
-        ((__POINTER *)next__ZFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0FAH)[ 0]=next__ZFAH;
-      } else {
-        ((__POINTER *)result__1FAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__1FAH=next__ZFAH;
-      };
-    };
-    ((__POINTER *)result__1FAH)[ 0]=((__POINTER ) 3);
-    result__N12G=(void *)((unsigned long)result__1FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__AIDH,a__FIDH,new_size__BIDH,new_size2__CIDH,a__JIDH;
+  __UINTEGER_32 new_size__KIDH;
+  __POINTER result__5HDH,ptr_table__GSGH,next__FSGH,result__HSGH;
+  void *result__45IH;
+  __INTEGER Self__GQWD;
+  void **Result__TD3C;
+  sz__AIDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JITC * ((__INTEGER )(sizeof(void *)))));
+  result__5HDH=((__POINTER )(NULL));
+  a__FIDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__BIDH=(__UINTEGER_32)((__UINTEGER_32)(sz__AIDH + a__FIDH) & (__UINTEGER_32)(~ a__FIDH));
+  new_size2__CIDH=(__UINTEGER_32)(new_size__BIDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__CIDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__JIDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KIDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CIDH + a__JIDH) & (__UINTEGER_32)(~ a__JIDH));
+    ptr_table__GSGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KIDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__FSGH=((__POINTER )(NULL));
+    result__HSGH=((__POINTER *)ptr_table__GSGH)[ 0];
+    if ((result__HSGH == (void *)NULL)) {
+      result__HSGH=new_lab__MRJ(new_size__KIDH);
+      next__FSGH=(void *)((unsigned long)result__HSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KIDH)));
+      ((__POINTER *)next__FSGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__GSGH)[ 0]=next__FSGH;
+    } else {
+      next__FSGH=((__POINTER *)result__HSGH)[ 0];
+      if ((next__FSGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HSGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KIDH <<  1)) <=  4096)) {
+          next__FSGH=(void *)((unsigned long)result__HSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KIDH)));
+        } else {
+          next__FSGH=new_lab__MRJ(new_size__KIDH);
+        };
+        ((__POINTER *)next__FSGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GSGH)[ 0]=next__FSGH;
+      } else {
+        ((__POINTER *)result__HSGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FSGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__HSGH=next__FSGH;
+      };
+    };
+    ((__POINTER *)result__HSGH)[ 0]=((__POINTER ) 3);
+    result__5HDH=(void *)((unsigned long)result__HSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__ATCH=first_free__LDVB;
-    while ((((void *)result__ATCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ATCH)->map_size_and_id__2SB &  4294967292LU) < new_size__P12G))) {
-      result__ATCH=((__MEMORY *)result__ATCH)->map_next_free__3SB;
+    result__45IH=first_free__XDVB;
+    while ((((void *)result__45IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__45IH)->map_size_and_id__ITB &  4294967292LU) < new_size__BIDH))) {
+      result__45IH=((__MEMORY *)result__45IH)->map_next_free__JTB;
     };
-    if (((void *)result__ATCH == (void *)NULL)) {
-      result__ATCH=new_page__CA5();
+    if (((void *)result__45IH == (void *)NULL)) {
+      result__45IH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__ATCH,new_size__P12G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ATCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__N12G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ATCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__45IH,new_size__BIDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__45IH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__5HDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__45IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__HD3C=((void **)result__N12G);
-  Self__NPWD=(__INTEGER)(nb_elements__3HTC -  1);
-  while ((Self__NPWD >=  0)) {
-    Result__HD3C[Self__NPWD]=NULL;
-    Self__NPWD=(__INTEGER)(Self__NPWD -  1);
+  Result__TD3C=((void **)result__5HDH);
+  Self__GQWD=(__INTEGER)(nb_elements__JITC -  1);
+  while ((Self__GQWD >=  0)) {
+    Result__TD3C[Self__GQWD]=NULL;
+    Self__GQWD=(__INTEGER)(Self__GQWD -  1);
   };
-  return(Result__HD3C);
+  return(Result__TD3C);
 }
 
-static void** create__0ESB(__INTEGER nb_elements__2ESB)
+static void** create__GFSB(__INTEGER nb_elements__IFSB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__012G,a__512G,new_size__112G,new_size2__212G,a__D22G;
-  __UINTEGER_32 new_size__E22G;
-  __POINTER result__Z12G,ptr_table__5FAH,next__4FAH,result__AGAH;
-  void *result__DTCH;
-  __INTEGER Self__FHNC;
-  void **Result__TJVB;
-  sz__012G=((__UINTEGER_32 )(__INTEGER)(nb_elements__2ESB * ((__INTEGER )(sizeof(void *)))));
-  result__Z12G=((__POINTER )(NULL));
-  a__512G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__112G=(__UINTEGER_32)((__UINTEGER_32)(sz__012G + a__512G) & (__UINTEGER_32)(~ a__512G));
-  new_size2__212G=(__UINTEGER_32)(new_size__112G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__212G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__D22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__E22G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__212G + a__D22G) & (__UINTEGER_32)(~ a__D22G));
-    ptr_table__5FAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E22G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__4FAH=((__POINTER )(NULL));
-    result__AGAH=((__POINTER *)ptr_table__5FAH)[ 0];
-    if ((result__AGAH == (void *)NULL)) {
-      result__AGAH=new_lab__ARJ(new_size__E22G);
-      next__4FAH=(void *)((unsigned long)result__AGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E22G)));
-      ((__POINTER *)next__4FAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__5FAH)[ 0]=next__4FAH;
-    } else {
-      next__4FAH=((__POINTER *)result__AGAH)[ 0];
-      if ((next__4FAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AGAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__E22G <<  1)) <=  4096)) {
-          next__4FAH=(void *)((unsigned long)result__AGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E22G)));
-        } else {
-          next__4FAH=new_lab__ARJ(new_size__E22G);
-        };
-        ((__POINTER *)next__4FAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5FAH)[ 0]=next__4FAH;
-      } else {
-        ((__POINTER *)result__AGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__AGAH=next__4FAH;
-      };
-    };
-    ((__POINTER *)result__AGAH)[ 0]=((__POINTER ) 3);
-    result__Z12G=(void *)((unsigned long)result__AGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__MIDH,a__RIDH,new_size__NIDH,new_size2__OIDH,a__VIDH;
+  __UINTEGER_32 new_size__WIDH;
+  __POINTER result__LIDH,ptr_table__LSGH,next__KSGH,result__MSGH;
+  void *result__BAJH;
+  __INTEGER Self__RHNC;
+  void **Result__5JVB;
+  sz__MIDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__IFSB * ((__INTEGER )(sizeof(void *)))));
+  result__LIDH=((__POINTER )(NULL));
+  a__RIDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__NIDH=(__UINTEGER_32)((__UINTEGER_32)(sz__MIDH + a__RIDH) & (__UINTEGER_32)(~ a__RIDH));
+  new_size2__OIDH=(__UINTEGER_32)(new_size__NIDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__OIDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__VIDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__WIDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OIDH + a__VIDH) & (__UINTEGER_32)(~ a__VIDH));
+    ptr_table__LSGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WIDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KSGH=((__POINTER )(NULL));
+    result__MSGH=((__POINTER *)ptr_table__LSGH)[ 0];
+    if ((result__MSGH == (void *)NULL)) {
+      result__MSGH=new_lab__MRJ(new_size__WIDH);
+      next__KSGH=(void *)((unsigned long)result__MSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WIDH)));
+      ((__POINTER *)next__KSGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LSGH)[ 0]=next__KSGH;
+    } else {
+      next__KSGH=((__POINTER *)result__MSGH)[ 0];
+      if ((next__KSGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MSGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WIDH <<  1)) <=  4096)) {
+          next__KSGH=(void *)((unsigned long)result__MSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WIDH)));
+        } else {
+          next__KSGH=new_lab__MRJ(new_size__WIDH);
+        };
+        ((__POINTER *)next__KSGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LSGH)[ 0]=next__KSGH;
+      } else {
+        ((__POINTER *)result__MSGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KSGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MSGH=next__KSGH;
+      };
+    };
+    ((__POINTER *)result__MSGH)[ 0]=((__POINTER ) 3);
+    result__LIDH=(void *)((unsigned long)result__MSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__DTCH=first_free__LDVB;
-    while ((((void *)result__DTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__112G))) {
-      result__DTCH=((__MEMORY *)result__DTCH)->map_next_free__3SB;
+    result__BAJH=first_free__XDVB;
+    while ((((void *)result__BAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__NIDH))) {
+      result__BAJH=((__MEMORY *)result__BAJH)->map_next_free__JTB;
     };
-    if (((void *)result__DTCH == (void *)NULL)) {
-      result__DTCH=new_page__CA5();
+    if (((void *)result__BAJH == (void *)NULL)) {
+      result__BAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__DTCH,new_size__112G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__Z12G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__BAJH,new_size__NIDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__LIDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__TJVB=((void **)result__Z12G);
-  Self__FHNC=(__INTEGER)(nb_elements__2ESB -  1);
-  while ((Self__FHNC >=  0)) {
-    Result__TJVB[Self__FHNC]=NULL;
-    Self__FHNC=(__INTEGER)(Self__FHNC -  1);
+  Result__5JVB=((void **)result__LIDH);
+  Self__RHNC=(__INTEGER)(nb_elements__IFSB -  1);
+  while ((Self__RHNC >=  0)) {
+    Result__5JVB[Self__RHNC]=NULL;
+    Self__RHNC=(__INTEGER)(Self__RHNC -  1);
   };
-  return(Result__TJVB);
+  return(Result__5JVB);
 }
 
-static void** create__VF4(__INTEGER nb_elements__XF4)
+static void** create__BG4(__INTEGER nb_elements__DG4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__G22G,a__L22G,new_size__H22G,new_size2__I22G,a__P22G;
-  __UINTEGER_32 new_size__Q22G;
-  __POINTER result__F22G,ptr_table__EGAH,next__DGAH,result__FGAH;
-  void *result__GTCH;
-  __INTEGER Self__E2JC;
-  void **Result__D5EB;
-  sz__G22G=((__UINTEGER_32 )(__INTEGER)(nb_elements__XF4 * ((__INTEGER )(sizeof(void *)))));
-  result__F22G=((__POINTER )(NULL));
-  a__L22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__H22G=(__UINTEGER_32)((__UINTEGER_32)(sz__G22G + a__L22G) & (__UINTEGER_32)(~ a__L22G));
-  new_size2__I22G=(__UINTEGER_32)(new_size__H22G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__I22G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__P22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__Q22G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__I22G + a__P22G) & (__UINTEGER_32)(~ a__P22G));
-    ptr_table__EGAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q22G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__DGAH=((__POINTER )(NULL));
-    result__FGAH=((__POINTER *)ptr_table__EGAH)[ 0];
-    if ((result__FGAH == (void *)NULL)) {
-      result__FGAH=new_lab__ARJ(new_size__Q22G);
-      next__DGAH=(void *)((unsigned long)result__FGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q22G)));
-      ((__POINTER *)next__DGAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__EGAH)[ 0]=next__DGAH;
-    } else {
-      next__DGAH=((__POINTER *)result__FGAH)[ 0];
-      if ((next__DGAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FGAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__Q22G <<  1)) <=  4096)) {
-          next__DGAH=(void *)((unsigned long)result__FGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q22G)));
-        } else {
-          next__DGAH=new_lab__ARJ(new_size__Q22G);
-        };
-        ((__POINTER *)next__DGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EGAH)[ 0]=next__DGAH;
-      } else {
-        ((__POINTER *)result__FGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__FGAH=next__DGAH;
-      };
-    };
-    ((__POINTER *)result__FGAH)[ 0]=((__POINTER ) 3);
-    result__F22G=(void *)((unsigned long)result__FGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__YIDH,a__3IDH,new_size__ZIDH,new_size2__0IDH,a__BJDH;
+  __UINTEGER_32 new_size__CJDH;
+  __POINTER result__XIDH,ptr_table__QSGH,next__PSGH,result__RSGH;
+  void *result__EAJH;
+  __INTEGER Self__Q2JC;
+  void **Result__P5EB;
+  sz__YIDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DG4 * ((__INTEGER )(sizeof(void *)))));
+  result__XIDH=((__POINTER )(NULL));
+  a__3IDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ZIDH=(__UINTEGER_32)((__UINTEGER_32)(sz__YIDH + a__3IDH) & (__UINTEGER_32)(~ a__3IDH));
+  new_size2__0IDH=(__UINTEGER_32)(new_size__ZIDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__0IDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BJDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CJDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0IDH + a__BJDH) & (__UINTEGER_32)(~ a__BJDH));
+    ptr_table__QSGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CJDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PSGH=((__POINTER )(NULL));
+    result__RSGH=((__POINTER *)ptr_table__QSGH)[ 0];
+    if ((result__RSGH == (void *)NULL)) {
+      result__RSGH=new_lab__MRJ(new_size__CJDH);
+      next__PSGH=(void *)((unsigned long)result__RSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJDH)));
+      ((__POINTER *)next__PSGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QSGH)[ 0]=next__PSGH;
+    } else {
+      next__PSGH=((__POINTER *)result__RSGH)[ 0];
+      if ((next__PSGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RSGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CJDH <<  1)) <=  4096)) {
+          next__PSGH=(void *)((unsigned long)result__RSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJDH)));
+        } else {
+          next__PSGH=new_lab__MRJ(new_size__CJDH);
+        };
+        ((__POINTER *)next__PSGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QSGH)[ 0]=next__PSGH;
+      } else {
+        ((__POINTER *)result__RSGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PSGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RSGH=next__PSGH;
+      };
+    };
+    ((__POINTER *)result__RSGH)[ 0]=((__POINTER ) 3);
+    result__XIDH=(void *)((unsigned long)result__RSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__GTCH=first_free__LDVB;
-    while ((((void *)result__GTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__H22G))) {
-      result__GTCH=((__MEMORY *)result__GTCH)->map_next_free__3SB;
+    result__EAJH=first_free__XDVB;
+    while ((((void *)result__EAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZIDH))) {
+      result__EAJH=((__MEMORY *)result__EAJH)->map_next_free__JTB;
     };
-    if (((void *)result__GTCH == (void *)NULL)) {
-      result__GTCH=new_page__CA5();
+    if (((void *)result__EAJH == (void *)NULL)) {
+      result__EAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__GTCH,new_size__H22G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__F22G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__EAJH,new_size__ZIDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__XIDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__D5EB=((void **)result__F22G);
-  Self__E2JC=(__INTEGER)(nb_elements__XF4 -  1);
-  while ((Self__E2JC >=  0)) {
-    Result__D5EB[Self__E2JC]=NULL;
-    Self__E2JC=(__INTEGER)(Self__E2JC -  1);
+  Result__P5EB=((void **)result__XIDH);
+  Self__Q2JC=(__INTEGER)(nb_elements__DG4 -  1);
+  while ((Self__Q2JC >=  0)) {
+    Result__P5EB[Self__Q2JC]=NULL;
+    Self__Q2JC=(__INTEGER)(Self__Q2JC -  1);
   };
-  return(Result__D5EB);
+  return(Result__P5EB);
 }
 
-static void** create__AZ2(__INTEGER nb_elements__CZ2)
+static void** create__MZ2(__INTEGER nb_elements__OZ2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__S22G,a__X22G,new_size__T22G,new_size2__U22G,a__122G;
-  __UINTEGER_32 new_size__222G;
-  __POINTER result__R22G,ptr_table__JGAH,next__IGAH,result__KGAH;
-  void *result__JTCH;
-  __INTEGER Self__GUJC;
-  void **Result__XQDB;
-  sz__S22G=((__UINTEGER_32 )(__INTEGER)(nb_elements__CZ2 * ((__INTEGER )(sizeof(void *)))));
-  result__R22G=((__POINTER )(NULL));
-  a__X22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__T22G=(__UINTEGER_32)((__UINTEGER_32)(sz__S22G + a__X22G) & (__UINTEGER_32)(~ a__X22G));
-  new_size2__U22G=(__UINTEGER_32)(new_size__T22G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__U22G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__122G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__222G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__U22G + a__122G) & (__UINTEGER_32)(~ a__122G));
-    ptr_table__JGAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__222G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__IGAH=((__POINTER )(NULL));
-    result__KGAH=((__POINTER *)ptr_table__JGAH)[ 0];
-    if ((result__KGAH == (void *)NULL)) {
-      result__KGAH=new_lab__ARJ(new_size__222G);
-      next__IGAH=(void *)((unsigned long)result__KGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__222G)));
-      ((__POINTER *)next__IGAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__JGAH)[ 0]=next__IGAH;
-    } else {
-      next__IGAH=((__POINTER *)result__KGAH)[ 0];
-      if ((next__IGAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KGAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__222G <<  1)) <=  4096)) {
-          next__IGAH=(void *)((unsigned long)result__KGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__222G)));
-        } else {
-          next__IGAH=new_lab__ARJ(new_size__222G);
-        };
-        ((__POINTER *)next__IGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JGAH)[ 0]=next__IGAH;
-      } else {
-        ((__POINTER *)result__KGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__KGAH=next__IGAH;
-      };
-    };
-    ((__POINTER *)result__KGAH)[ 0]=((__POINTER ) 3);
-    result__R22G=(void *)((unsigned long)result__KGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EJDH,a__JJDH,new_size__FJDH,new_size2__GJDH,a__NJDH;
+  __UINTEGER_32 new_size__OJDH;
+  __POINTER result__DJDH,ptr_table__VSGH,next__USGH,result__WSGH;
+  void *result__HAJH;
+  __INTEGER Self__SUJC;
+  void **Result__DRDB;
+  sz__EJDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OZ2 * ((__INTEGER )(sizeof(void *)))));
+  result__DJDH=((__POINTER )(NULL));
+  a__JJDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FJDH=(__UINTEGER_32)((__UINTEGER_32)(sz__EJDH + a__JJDH) & (__UINTEGER_32)(~ a__JJDH));
+  new_size2__GJDH=(__UINTEGER_32)(new_size__FJDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GJDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NJDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OJDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GJDH + a__NJDH) & (__UINTEGER_32)(~ a__NJDH));
+    ptr_table__VSGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OJDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__USGH=((__POINTER )(NULL));
+    result__WSGH=((__POINTER *)ptr_table__VSGH)[ 0];
+    if ((result__WSGH == (void *)NULL)) {
+      result__WSGH=new_lab__MRJ(new_size__OJDH);
+      next__USGH=(void *)((unsigned long)result__WSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJDH)));
+      ((__POINTER *)next__USGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__VSGH)[ 0]=next__USGH;
+    } else {
+      next__USGH=((__POINTER *)result__WSGH)[ 0];
+      if ((next__USGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WSGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OJDH <<  1)) <=  4096)) {
+          next__USGH=(void *)((unsigned long)result__WSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJDH)));
+        } else {
+          next__USGH=new_lab__MRJ(new_size__OJDH);
+        };
+        ((__POINTER *)next__USGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VSGH)[ 0]=next__USGH;
+      } else {
+        ((__POINTER *)result__WSGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__WSGH=next__USGH;
+      };
+    };
+    ((__POINTER *)result__WSGH)[ 0]=((__POINTER ) 3);
+    result__DJDH=(void *)((unsigned long)result__WSGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__JTCH=first_free__LDVB;
-    while ((((void *)result__JTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__T22G))) {
-      result__JTCH=((__MEMORY *)result__JTCH)->map_next_free__3SB;
+    result__HAJH=first_free__XDVB;
+    while ((((void *)result__HAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__FJDH))) {
+      result__HAJH=((__MEMORY *)result__HAJH)->map_next_free__JTB;
     };
-    if (((void *)result__JTCH == (void *)NULL)) {
-      result__JTCH=new_page__CA5();
+    if (((void *)result__HAJH == (void *)NULL)) {
+      result__HAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__JTCH,new_size__T22G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__R22G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__HAJH,new_size__FJDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__DJDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__XQDB=((void **)result__R22G);
-  Self__GUJC=(__INTEGER)(nb_elements__CZ2 -  1);
-  while ((Self__GUJC >=  0)) {
-    Result__XQDB[Self__GUJC]=NULL;
-    Self__GUJC=(__INTEGER)(Self__GUJC -  1);
+  Result__DRDB=((void **)result__DJDH);
+  Self__SUJC=(__INTEGER)(nb_elements__OZ2 -  1);
+  while ((Self__SUJC >=  0)) {
+    Result__DRDB[Self__SUJC]=NULL;
+    Self__SUJC=(__INTEGER)(Self__SUJC -  1);
   };
-  return(Result__XQDB);
+  return(Result__DRDB);
 }
 
-static void** create__AJRB(__INTEGER nb_elements__CJRB)
+static void** create__MJRB(__INTEGER nb_elements__OJRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__422G,a__D32G,new_size__522G,new_size2__A32G,a__H32G;
-  __UINTEGER_32 new_size__I32G;
-  __POINTER result__322G,ptr_table__OGAH,next__NGAH,result__PGAH;
-  void *result__MTCH;
-  __INTEGER Self__GBNC;
-  void **Result__KIUB;
-  sz__422G=((__UINTEGER_32 )(__INTEGER)(nb_elements__CJRB * ((__INTEGER )(sizeof(void *)))));
-  result__322G=((__POINTER )(NULL));
-  a__D32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__522G=(__UINTEGER_32)((__UINTEGER_32)(sz__422G + a__D32G) & (__UINTEGER_32)(~ a__D32G));
-  new_size2__A32G=(__UINTEGER_32)(new_size__522G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__A32G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__H32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__I32G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__A32G + a__H32G) & (__UINTEGER_32)(~ a__H32G));
-    ptr_table__OGAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__I32G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__NGAH=((__POINTER )(NULL));
-    result__PGAH=((__POINTER *)ptr_table__OGAH)[ 0];
-    if ((result__PGAH == (void *)NULL)) {
-      result__PGAH=new_lab__ARJ(new_size__I32G);
-      next__NGAH=(void *)((unsigned long)result__PGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I32G)));
-      ((__POINTER *)next__NGAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__OGAH)[ 0]=next__NGAH;
-    } else {
-      next__NGAH=((__POINTER *)result__PGAH)[ 0];
-      if ((next__NGAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PGAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__I32G <<  1)) <=  4096)) {
-          next__NGAH=(void *)((unsigned long)result__PGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I32G)));
-        } else {
-          next__NGAH=new_lab__ARJ(new_size__I32G);
-        };
-        ((__POINTER *)next__NGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OGAH)[ 0]=next__NGAH;
-      } else {
-        ((__POINTER *)result__PGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__PGAH=next__NGAH;
-      };
-    };
-    ((__POINTER *)result__PGAH)[ 0]=((__POINTER ) 3);
-    result__322G=(void *)((unsigned long)result__PGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QJDH,a__VJDH,new_size__RJDH,new_size2__SJDH,a__ZJDH;
+  __UINTEGER_32 new_size__0JDH;
+  __POINTER result__PJDH,ptr_table__0SGH,next__ZSGH,result__1SGH;
+  void *result__KAJH;
+  __INTEGER Self__SBNC;
+  void **Result__WIUB;
+  sz__QJDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OJRB * ((__INTEGER )(sizeof(void *)))));
+  result__PJDH=((__POINTER )(NULL));
+  a__VJDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RJDH=(__UINTEGER_32)((__UINTEGER_32)(sz__QJDH + a__VJDH) & (__UINTEGER_32)(~ a__VJDH));
+  new_size2__SJDH=(__UINTEGER_32)(new_size__RJDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SJDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZJDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0JDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SJDH + a__ZJDH) & (__UINTEGER_32)(~ a__ZJDH));
+    ptr_table__0SGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0JDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZSGH=((__POINTER )(NULL));
+    result__1SGH=((__POINTER *)ptr_table__0SGH)[ 0];
+    if ((result__1SGH == (void *)NULL)) {
+      result__1SGH=new_lab__MRJ(new_size__0JDH);
+      next__ZSGH=(void *)((unsigned long)result__1SGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JDH)));
+      ((__POINTER *)next__ZSGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0SGH)[ 0]=next__ZSGH;
+    } else {
+      next__ZSGH=((__POINTER *)result__1SGH)[ 0];
+      if ((next__ZSGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1SGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0JDH <<  1)) <=  4096)) {
+          next__ZSGH=(void *)((unsigned long)result__1SGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JDH)));
+        } else {
+          next__ZSGH=new_lab__MRJ(new_size__0JDH);
+        };
+        ((__POINTER *)next__ZSGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0SGH)[ 0]=next__ZSGH;
+      } else {
+        ((__POINTER *)result__1SGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZSGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1SGH=next__ZSGH;
+      };
+    };
+    ((__POINTER *)result__1SGH)[ 0]=((__POINTER ) 3);
+    result__PJDH=(void *)((unsigned long)result__1SGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__MTCH=first_free__LDVB;
-    while ((((void *)result__MTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__522G))) {
-      result__MTCH=((__MEMORY *)result__MTCH)->map_next_free__3SB;
+    result__KAJH=first_free__XDVB;
+    while ((((void *)result__KAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__RJDH))) {
+      result__KAJH=((__MEMORY *)result__KAJH)->map_next_free__JTB;
     };
-    if (((void *)result__MTCH == (void *)NULL)) {
-      result__MTCH=new_page__CA5();
+    if (((void *)result__KAJH == (void *)NULL)) {
+      result__KAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__MTCH,new_size__522G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__322G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__KAJH,new_size__RJDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__PJDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__KIUB=((void **)result__322G);
-  Self__GBNC=(__INTEGER)(nb_elements__CJRB -  1);
-  while ((Self__GBNC >=  0)) {
-    Result__KIUB[Self__GBNC]=NULL;
-    Self__GBNC=(__INTEGER)(Self__GBNC -  1);
+  Result__WIUB=((void **)result__PJDH);
+  Self__SBNC=(__INTEGER)(nb_elements__OJRB -  1);
+  while ((Self__SBNC >=  0)) {
+    Result__WIUB[Self__SBNC]=NULL;
+    Self__SBNC=(__INTEGER)(Self__SBNC -  1);
   };
-  return(Result__KIUB);
+  return(Result__WIUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__2ER(__INTEGER new_count__4ER)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__IFR(__INTEGER new_count__KFR)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__0KR,ptr_table__TGAH,next__SGAH,result__UGAH;
-  __POINTER ptr_table__YGAH,next__XGAH,result__ZGAH;
-  __INTEGER typ_id__5KR;
-  __UINTEGER_32 sz__2KR,a__L32G,new_size__M32G,t__Q32G,a__P32G;
-  __UINTEGER_32 new_size__1GAH,lab_type__0GAH;
-  __FAST_ARRAYoITM_TYPE_MONOo *result__ZKR,*Self__TJW;
-  result__ZKR=NULL;
-  ptr__0KR=((__POINTER )(NULL));
-  typ_id__5KR= 0;
-  sz__2KR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
-  if ((sz__2KR ==  0)) {
-    result__ZKR=FAST_ARRAYoITM_TYPE_MONOo__;
+  __POINTER ptr__GLR,ptr_table__5SGH,next__4SGH,result__ATGH;
+  __POINTER ptr_table__ETGH,next__DTGH,result__FTGH;
+  __INTEGER typ_id__LLR;
+  __UINTEGER_32 sz__ILR,a__3JDH,new_size__4JDH,t__CKDH,a__BKDH;
+  __UINTEGER_32 new_size__HTGH,lab_type__GTGH;
+  __FAST_ARRAYoITM_TYPE_MONOo *result__FLR,*Self__5JW;
+  result__FLR=NULL;
+  ptr__GLR=((__POINTER )(NULL));
+  typ_id__LLR= 0;
+  sz__ILR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
+  if ((sz__ILR ==  0)) {
+    result__FLR=FAST_ARRAYoITM_TYPE_MONOo__;
   } else {
-    typ_id__5KR=__FAST_ARRAYoITM_TYPE_MONOo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__2KR);
-    if ((typ_id__5KR == (__INTEGER)(-  1))) {
-      a__L32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__M32G=(__UINTEGER_32)((__UINTEGER_32)(sz__2KR + a__L32G) & (__UINTEGER_32)(~ a__L32G));
-      ptr_table__TGAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M32G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__SGAH=((__POINTER )(NULL));
-      result__UGAH=((__POINTER *)ptr_table__TGAH)[ 0];
-      if ((result__UGAH == (void *)NULL)) {
-        result__UGAH=new_lab__ARJ(new_size__M32G);
-        next__SGAH=(void *)((unsigned long)result__UGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M32G)));
-        ((__POINTER *)next__SGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TGAH)[ 0]=next__SGAH;
-      } else {
-        next__SGAH=((__POINTER *)result__UGAH)[ 0];
-        if ((next__SGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UGAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__M32G <<  1)) <=  4096)) {
-            next__SGAH=(void *)((unsigned long)result__UGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M32G)));
-          } else {
-            next__SGAH=new_lab__ARJ(new_size__M32G);
-          };
-          ((__POINTER *)next__SGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TGAH)[ 0]=next__SGAH;
-        } else {
-          ((__POINTER *)result__UGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UGAH=next__SGAH;
-        };
-      };
-      ptr__0KR=result__UGAH;
-    } else {
-      t__Q32G=((__UINTEGER_32 )typ_id__5KR);
-      a__P32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1GAH=(__UINTEGER_32)((__UINTEGER_32)(sz__2KR + a__P32G) & (__UINTEGER_32)(~ a__P32G));
-      ptr_table__YGAH=((__POINTER )(&(table_type[(t__Q32G)])));
-      lab_type__0GAH=(__UINTEGER_32)(t__Q32G |  1);
-      next__XGAH=((__POINTER )(NULL));
-      result__ZGAH=((__POINTER *)ptr_table__YGAH)[ 0];
-      if ((result__ZGAH == (void *)NULL)) {
-        result__ZGAH=new_lab__ARJ(lab_type__0GAH);
-        next__XGAH=(void *)((unsigned long)result__ZGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1GAH)));
-        ((__POINTER *)next__XGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YGAH)[ 0]=next__XGAH;
-      } else {
-        next__XGAH=((__POINTER *)result__ZGAH)[ 0];
-        if ((next__XGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZGAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1GAH <<  1)) <=  4096)) {
-            next__XGAH=(void *)((unsigned long)result__ZGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1GAH)));
-          } else {
-            next__XGAH=new_lab__ARJ(lab_type__0GAH);
-          };
-          ((__POINTER *)next__XGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YGAH)[ 0]=next__XGAH;
-        } else {
-          ((__POINTER *)result__ZGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZGAH=next__XGAH;
-        };
-      };
-      ptr__0KR=result__ZGAH;
-    };
-    result__ZKR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__0KR);
-    *(result__ZKR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
-  };
-  Self__TJW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__ZKR);
-  if ((Self__TJW->parent_arrayed_collection__NXC.capacity__TNV < new_count__4ER)) {
-    Self__TJW->parent_arrayed_collection__NXC.storage__FMV=create__HBRB(new_count__4ER);
-    Self__TJW->parent_arrayed_collection__NXC.capacity__TNV=new_count__4ER;
-  };
-  Self__TJW->parent_arrayed_collection__NXC.upper__4HV=(__INTEGER)(-  1);
-  return(result__ZKR);
+    typ_id__LLR=__FAST_ARRAYoITM_TYPE_MONOo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ILR);
+    if ((typ_id__LLR == (__INTEGER)(-  1))) {
+      a__3JDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4JDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILR + a__3JDH) & (__UINTEGER_32)(~ a__3JDH));
+      ptr_table__5SGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4JDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4SGH=((__POINTER )(NULL));
+      result__ATGH=((__POINTER *)ptr_table__5SGH)[ 0];
+      if ((result__ATGH == (void *)NULL)) {
+        result__ATGH=new_lab__MRJ(new_size__4JDH);
+        next__4SGH=(void *)((unsigned long)result__ATGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4JDH)));
+        ((__POINTER *)next__4SGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5SGH)[ 0]=next__4SGH;
+      } else {
+        next__4SGH=((__POINTER *)result__ATGH)[ 0];
+        if ((next__4SGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ATGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4JDH <<  1)) <=  4096)) {
+            next__4SGH=(void *)((unsigned long)result__ATGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4JDH)));
+          } else {
+            next__4SGH=new_lab__MRJ(new_size__4JDH);
+          };
+          ((__POINTER *)next__4SGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5SGH)[ 0]=next__4SGH;
+        } else {
+          ((__POINTER *)result__ATGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4SGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ATGH=next__4SGH;
+        };
+      };
+      ptr__GLR=result__ATGH;
+    } else {
+      t__CKDH=((__UINTEGER_32 )typ_id__LLR);
+      a__BKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILR + a__BKDH) & (__UINTEGER_32)(~ a__BKDH));
+      ptr_table__ETGH=((__POINTER )(&(table_type[(t__CKDH)])));
+      lab_type__GTGH=(__UINTEGER_32)(t__CKDH |  1);
+      next__DTGH=((__POINTER )(NULL));
+      result__FTGH=((__POINTER *)ptr_table__ETGH)[ 0];
+      if ((result__FTGH == (void *)NULL)) {
+        result__FTGH=new_lab__MRJ(lab_type__GTGH);
+        next__DTGH=(void *)((unsigned long)result__FTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HTGH)));
+        ((__POINTER *)next__DTGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ETGH)[ 0]=next__DTGH;
+      } else {
+        next__DTGH=((__POINTER *)result__FTGH)[ 0];
+        if ((next__DTGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FTGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HTGH <<  1)) <=  4096)) {
+            next__DTGH=(void *)((unsigned long)result__FTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HTGH)));
+          } else {
+            next__DTGH=new_lab__MRJ(lab_type__GTGH);
+          };
+          ((__POINTER *)next__DTGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ETGH)[ 0]=next__DTGH;
+        } else {
+          ((__POINTER *)result__FTGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DTGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FTGH=next__DTGH;
+        };
+      };
+      ptr__GLR=result__FTGH;
+    };
+    result__FLR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__GLR);
+    *(result__FLR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
+  };
+  Self__5JW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__FLR);
+  if ((Self__5JW->parent_arrayed_collection__ZXC.capacity__5NV < new_count__KFR)) {
+    Self__5JW->parent_arrayed_collection__ZXC.storage__RMV=create__TBRB(new_count__KFR);
+    Self__5JW->parent_arrayed_collection__ZXC.capacity__5NV=new_count__KFR;
+  };
+  Self__5JW->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(-  1);
+  return(result__FLR);
 }
 
-static void** create__PZBB(__INTEGER nb_elements__RZBB)
+static void** create__1ZBB(__INTEGER nb_elements__3ZBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__S32G,a__X32G,new_size__T32G,new_size2__U32G,a__132G;
-  __UINTEGER_32 new_size__232G;
-  __POINTER result__R32G,ptr_table__3GAH,next__2GAH,result__4GAH;
-  void *result__PTCH;
-  __INTEGER Self__YLKC;
-  void **Result__1XIB;
-  sz__S32G=((__UINTEGER_32 )(__INTEGER)(nb_elements__RZBB * ((__INTEGER )(sizeof(void *)))));
-  result__R32G=((__POINTER )(NULL));
-  a__X32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__T32G=(__UINTEGER_32)((__UINTEGER_32)(sz__S32G + a__X32G) & (__UINTEGER_32)(~ a__X32G));
-  new_size2__U32G=(__UINTEGER_32)(new_size__T32G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__U32G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__132G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__232G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__U32G + a__132G) & (__UINTEGER_32)(~ a__132G));
-    ptr_table__3GAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__232G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__2GAH=((__POINTER )(NULL));
-    result__4GAH=((__POINTER *)ptr_table__3GAH)[ 0];
-    if ((result__4GAH == (void *)NULL)) {
-      result__4GAH=new_lab__ARJ(new_size__232G);
-      next__2GAH=(void *)((unsigned long)result__4GAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__232G)));
-      ((__POINTER *)next__2GAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__3GAH)[ 0]=next__2GAH;
-    } else {
-      next__2GAH=((__POINTER *)result__4GAH)[ 0];
-      if ((next__2GAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4GAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__232G <<  1)) <=  4096)) {
-          next__2GAH=(void *)((unsigned long)result__4GAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__232G)));
-        } else {
-          next__2GAH=new_lab__ARJ(new_size__232G);
-        };
-        ((__POINTER *)next__2GAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3GAH)[ 0]=next__2GAH;
-      } else {
-        ((__POINTER *)result__4GAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__4GAH=next__2GAH;
-      };
-    };
-    ((__POINTER *)result__4GAH)[ 0]=((__POINTER ) 3);
-    result__R32G=(void *)((unsigned long)result__4GAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EKDH,a__JKDH,new_size__FKDH,new_size2__GKDH,a__NKDH;
+  __UINTEGER_32 new_size__OKDH;
+  __POINTER result__DKDH,ptr_table__JTGH,next__ITGH,result__KTGH;
+  void *result__NAJH;
+  __INTEGER Self__EMKC;
+  void **Result__HYIB;
+  sz__EKDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3ZBB * ((__INTEGER )(sizeof(void *)))));
+  result__DKDH=((__POINTER )(NULL));
+  a__JKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FKDH=(__UINTEGER_32)((__UINTEGER_32)(sz__EKDH + a__JKDH) & (__UINTEGER_32)(~ a__JKDH));
+  new_size2__GKDH=(__UINTEGER_32)(new_size__FKDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GKDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OKDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GKDH + a__NKDH) & (__UINTEGER_32)(~ a__NKDH));
+    ptr_table__JTGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OKDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ITGH=((__POINTER )(NULL));
+    result__KTGH=((__POINTER *)ptr_table__JTGH)[ 0];
+    if ((result__KTGH == (void *)NULL)) {
+      result__KTGH=new_lab__MRJ(new_size__OKDH);
+      next__ITGH=(void *)((unsigned long)result__KTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OKDH)));
+      ((__POINTER *)next__ITGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__JTGH)[ 0]=next__ITGH;
+    } else {
+      next__ITGH=((__POINTER *)result__KTGH)[ 0];
+      if ((next__ITGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KTGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OKDH <<  1)) <=  4096)) {
+          next__ITGH=(void *)((unsigned long)result__KTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OKDH)));
+        } else {
+          next__ITGH=new_lab__MRJ(new_size__OKDH);
+        };
+        ((__POINTER *)next__ITGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JTGH)[ 0]=next__ITGH;
+      } else {
+        ((__POINTER *)result__KTGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__KTGH=next__ITGH;
+      };
+    };
+    ((__POINTER *)result__KTGH)[ 0]=((__POINTER ) 3);
+    result__DKDH=(void *)((unsigned long)result__KTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__PTCH=first_free__LDVB;
-    while ((((void *)result__PTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__T32G))) {
-      result__PTCH=((__MEMORY *)result__PTCH)->map_next_free__3SB;
+    result__NAJH=first_free__XDVB;
+    while ((((void *)result__NAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__NAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__FKDH))) {
+      result__NAJH=((__MEMORY *)result__NAJH)->map_next_free__JTB;
     };
-    if (((void *)result__PTCH == (void *)NULL)) {
-      result__PTCH=new_page__CA5();
+    if (((void *)result__NAJH == (void *)NULL)) {
+      result__NAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__PTCH,new_size__T32G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__R32G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__NAJH,new_size__FKDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__NAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__DKDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__1XIB=((void **)result__R32G);
-  Self__YLKC=(__INTEGER)(nb_elements__RZBB -  1);
-  while ((Self__YLKC >=  0)) {
-    Result__1XIB[Self__YLKC]=NULL;
-    Self__YLKC=(__INTEGER)(Self__YLKC -  1);
+  Result__HYIB=((void **)result__DKDH);
+  Self__EMKC=(__INTEGER)(nb_elements__3ZBB -  1);
+  while ((Self__EMKC >=  0)) {
+    Result__HYIB[Self__EMKC]=NULL;
+    Self__EMKC=(__INTEGER)(Self__EMKC -  1);
   };
-  return(Result__1XIB);
+  return(Result__HYIB);
 }
 
-static void** create__JLXB(__INTEGER nb_elements__LLXB)
+static void** create__VLXB(__INTEGER nb_elements__XLXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__432G,a__D42G,new_size__532G,new_size2__A42G,a__H42G;
-  __UINTEGER_32 new_size__I42G;
-  __POINTER result__332G,ptr_table__CHAH,next__BHAH,result__DHAH;
-  void *result__STCH;
-  __INTEGER Self__FZOC;
-  void **Result__2W0B;
-  sz__432G=((__UINTEGER_32 )(__INTEGER)(nb_elements__LLXB * ((__INTEGER )(sizeof(void *)))));
-  result__332G=((__POINTER )(NULL));
-  a__D42G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__532G=(__UINTEGER_32)((__UINTEGER_32)(sz__432G + a__D42G) & (__UINTEGER_32)(~ a__D42G));
-  new_size2__A42G=(__UINTEGER_32)(new_size__532G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__A42G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__H42G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__I42G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__A42G + a__H42G) & (__UINTEGER_32)(~ a__H42G));
-    ptr_table__CHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__I42G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__BHAH=((__POINTER )(NULL));
-    result__DHAH=((__POINTER *)ptr_table__CHAH)[ 0];
-    if ((result__DHAH == (void *)NULL)) {
-      result__DHAH=new_lab__ARJ(new_size__I42G);
-      next__BHAH=(void *)((unsigned long)result__DHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I42G)));
-      ((__POINTER *)next__BHAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__CHAH)[ 0]=next__BHAH;
-    } else {
-      next__BHAH=((__POINTER *)result__DHAH)[ 0];
-      if ((next__BHAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DHAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__I42G <<  1)) <=  4096)) {
-          next__BHAH=(void *)((unsigned long)result__DHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I42G)));
-        } else {
-          next__BHAH=new_lab__ARJ(new_size__I42G);
-        };
-        ((__POINTER *)next__BHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CHAH)[ 0]=next__BHAH;
-      } else {
-        ((__POINTER *)result__DHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__DHAH=next__BHAH;
-      };
-    };
-    ((__POINTER *)result__DHAH)[ 0]=((__POINTER ) 3);
-    result__332G=(void *)((unsigned long)result__DHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QKDH,a__VKDH,new_size__RKDH,new_size2__SKDH,a__ZKDH;
+  __UINTEGER_32 new_size__0KDH;
+  __POINTER result__PKDH,ptr_table__OTGH,next__NTGH,result__PTGH;
+  void *result__QAJH;
+  __INTEGER Self__RZOC;
+  void **Result__IX0B;
+  sz__QKDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XLXB * ((__INTEGER )(sizeof(void *)))));
+  result__PKDH=((__POINTER )(NULL));
+  a__VKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RKDH=(__UINTEGER_32)((__UINTEGER_32)(sz__QKDH + a__VKDH) & (__UINTEGER_32)(~ a__VKDH));
+  new_size2__SKDH=(__UINTEGER_32)(new_size__RKDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SKDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0KDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SKDH + a__ZKDH) & (__UINTEGER_32)(~ a__ZKDH));
+    ptr_table__OTGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0KDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__NTGH=((__POINTER )(NULL));
+    result__PTGH=((__POINTER *)ptr_table__OTGH)[ 0];
+    if ((result__PTGH == (void *)NULL)) {
+      result__PTGH=new_lab__MRJ(new_size__0KDH);
+      next__NTGH=(void *)((unsigned long)result__PTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0KDH)));
+      ((__POINTER *)next__NTGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__OTGH)[ 0]=next__NTGH;
+    } else {
+      next__NTGH=((__POINTER *)result__PTGH)[ 0];
+      if ((next__NTGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PTGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0KDH <<  1)) <=  4096)) {
+          next__NTGH=(void *)((unsigned long)result__PTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0KDH)));
+        } else {
+          next__NTGH=new_lab__MRJ(new_size__0KDH);
+        };
+        ((__POINTER *)next__NTGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OTGH)[ 0]=next__NTGH;
+      } else {
+        ((__POINTER *)result__PTGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__PTGH=next__NTGH;
+      };
+    };
+    ((__POINTER *)result__PTGH)[ 0]=((__POINTER ) 3);
+    result__PKDH=(void *)((unsigned long)result__PTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__STCH=first_free__LDVB;
-    while ((((void *)result__STCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__STCH)->map_size_and_id__2SB &  4294967292LU) < new_size__532G))) {
-      result__STCH=((__MEMORY *)result__STCH)->map_next_free__3SB;
+    result__QAJH=first_free__XDVB;
+    while ((((void *)result__QAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__RKDH))) {
+      result__QAJH=((__MEMORY *)result__QAJH)->map_next_free__JTB;
     };
-    if (((void *)result__STCH == (void *)NULL)) {
-      result__STCH=new_page__CA5();
+    if (((void *)result__QAJH == (void *)NULL)) {
+      result__QAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__STCH,new_size__532G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__STCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__332G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__STCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__QAJH,new_size__RKDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__PKDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__2W0B=((void **)result__332G);
-  Self__FZOC=(__INTEGER)(nb_elements__LLXB -  1);
-  while ((Self__FZOC >=  0)) {
-    Result__2W0B[Self__FZOC]=NULL;
-    Self__FZOC=(__INTEGER)(Self__FZOC -  1);
+  Result__IX0B=((void **)result__PKDH);
+  Self__RZOC=(__INTEGER)(nb_elements__XLXB -  1);
+  while ((Self__RZOC >=  0)) {
+    Result__IX0B[Self__RZOC]=NULL;
+    Self__RZOC=(__INTEGER)(Self__RZOC -  1);
   };
-  return(Result__2W0B);
+  return(Result__IX0B);
 }
 
-static void** create__EUWB(__INTEGER nb_elements__GUWB)
+static void** create__QUWB(__INTEGER nb_elements__SUWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__K42G,a__P42G,new_size__L42G,new_size2__M42G,a__T42G;
-  __UINTEGER_32 new_size__U42G;
-  __POINTER result__J42G,ptr_table__HHAH,next__GHAH,result__IHAH;
-  void *result__VTCH;
-  __INTEGER Self__4XOC;
-  void **Result__FJ0B;
-  sz__K42G=((__UINTEGER_32 )(__INTEGER)(nb_elements__GUWB * ((__INTEGER )(sizeof(void *)))));
-  result__J42G=((__POINTER )(NULL));
-  a__P42G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__L42G=(__UINTEGER_32)((__UINTEGER_32)(sz__K42G + a__P42G) & (__UINTEGER_32)(~ a__P42G));
-  new_size2__M42G=(__UINTEGER_32)(new_size__L42G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__M42G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__T42G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__U42G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__M42G + a__T42G) & (__UINTEGER_32)(~ a__T42G));
-    ptr_table__HHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__U42G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__GHAH=((__POINTER )(NULL));
-    result__IHAH=((__POINTER *)ptr_table__HHAH)[ 0];
-    if ((result__IHAH == (void *)NULL)) {
-      result__IHAH=new_lab__ARJ(new_size__U42G);
-      next__GHAH=(void *)((unsigned long)result__IHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U42G)));
-      ((__POINTER *)next__GHAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__HHAH)[ 0]=next__GHAH;
-    } else {
-      next__GHAH=((__POINTER *)result__IHAH)[ 0];
-      if ((next__GHAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IHAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__U42G <<  1)) <=  4096)) {
-          next__GHAH=(void *)((unsigned long)result__IHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U42G)));
-        } else {
-          next__GHAH=new_lab__ARJ(new_size__U42G);
-        };
-        ((__POINTER *)next__GHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HHAH)[ 0]=next__GHAH;
-      } else {
-        ((__POINTER *)result__IHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__IHAH=next__GHAH;
-      };
-    };
-    ((__POINTER *)result__IHAH)[ 0]=((__POINTER ) 3);
-    result__J42G=(void *)((unsigned long)result__IHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__2KDH,a__BLDH,new_size__3KDH,new_size2__4KDH,a__FLDH;
+  __UINTEGER_32 new_size__GLDH;
+  __POINTER result__1KDH,ptr_table__TTGH,next__STGH,result__UTGH;
+  void *result__TAJH;
+  __INTEGER Self__KYOC;
+  void **Result__RJ0B;
+  sz__2KDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SUWB * ((__INTEGER )(sizeof(void *)))));
+  result__1KDH=((__POINTER )(NULL));
+  a__BLDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3KDH=(__UINTEGER_32)((__UINTEGER_32)(sz__2KDH + a__BLDH) & (__UINTEGER_32)(~ a__BLDH));
+  new_size2__4KDH=(__UINTEGER_32)(new_size__3KDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4KDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FLDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GLDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4KDH + a__FLDH) & (__UINTEGER_32)(~ a__FLDH));
+    ptr_table__TTGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GLDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__STGH=((__POINTER )(NULL));
+    result__UTGH=((__POINTER *)ptr_table__TTGH)[ 0];
+    if ((result__UTGH == (void *)NULL)) {
+      result__UTGH=new_lab__MRJ(new_size__GLDH);
+      next__STGH=(void *)((unsigned long)result__UTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GLDH)));
+      ((__POINTER *)next__STGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TTGH)[ 0]=next__STGH;
+    } else {
+      next__STGH=((__POINTER *)result__UTGH)[ 0];
+      if ((next__STGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UTGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GLDH <<  1)) <=  4096)) {
+          next__STGH=(void *)((unsigned long)result__UTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GLDH)));
+        } else {
+          next__STGH=new_lab__MRJ(new_size__GLDH);
+        };
+        ((__POINTER *)next__STGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TTGH)[ 0]=next__STGH;
+      } else {
+        ((__POINTER *)result__UTGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UTGH=next__STGH;
+      };
+    };
+    ((__POINTER *)result__UTGH)[ 0]=((__POINTER ) 3);
+    result__1KDH=(void *)((unsigned long)result__UTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__VTCH=first_free__LDVB;
-    while ((((void *)result__VTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__L42G))) {
-      result__VTCH=((__MEMORY *)result__VTCH)->map_next_free__3SB;
+    result__TAJH=first_free__XDVB;
+    while ((((void *)result__TAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__TAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__3KDH))) {
+      result__TAJH=((__MEMORY *)result__TAJH)->map_next_free__JTB;
     };
-    if (((void *)result__VTCH == (void *)NULL)) {
-      result__VTCH=new_page__CA5();
+    if (((void *)result__TAJH == (void *)NULL)) {
+      result__TAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__VTCH,new_size__L42G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__J42G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__TAJH,new_size__3KDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__TAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__1KDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__TAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__FJ0B=((void **)result__J42G);
-  Self__4XOC=(__INTEGER)(nb_elements__GUWB -  1);
-  while ((Self__4XOC >=  0)) {
-    Result__FJ0B[Self__4XOC]=NULL;
-    Self__4XOC=(__INTEGER)(Self__4XOC -  1);
+  Result__RJ0B=((void **)result__1KDH);
+  Self__KYOC=(__INTEGER)(nb_elements__SUWB -  1);
+  while ((Self__KYOC >=  0)) {
+    Result__RJ0B[Self__KYOC]=NULL;
+    Self__KYOC=(__INTEGER)(Self__KYOC -  1);
   };
-  return(Result__FJ0B);
+  return(Result__RJ0B);
 }
 
-static void** create__DSXB(__INTEGER nb_elements__FSXB)
+static void** create__PSXB(__INTEGER nb_elements__RSXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__W42G,a__142G,new_size__X42G,new_size2__Y42G,a__542G;
-  __UINTEGER_32 new_size__A52G;
-  __POINTER result__V42G,ptr_table__MHAH,next__LHAH,result__NHAH;
-  void *result__YTCH;
-  __INTEGER Self__M0OC;
-  void **Result__S40B;
-  sz__W42G=((__UINTEGER_32 )(__INTEGER)(nb_elements__FSXB * ((__INTEGER )(sizeof(void *)))));
-  result__V42G=((__POINTER )(NULL));
-  a__142G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__X42G=(__UINTEGER_32)((__UINTEGER_32)(sz__W42G + a__142G) & (__UINTEGER_32)(~ a__142G));
-  new_size2__Y42G=(__UINTEGER_32)(new_size__X42G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__Y42G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__542G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__A52G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Y42G + a__542G) & (__UINTEGER_32)(~ a__542G));
-    ptr_table__MHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A52G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__LHAH=((__POINTER )(NULL));
-    result__NHAH=((__POINTER *)ptr_table__MHAH)[ 0];
-    if ((result__NHAH == (void *)NULL)) {
-      result__NHAH=new_lab__ARJ(new_size__A52G);
-      next__LHAH=(void *)((unsigned long)result__NHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A52G)));
-      ((__POINTER *)next__LHAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__MHAH)[ 0]=next__LHAH;
-    } else {
-      next__LHAH=((__POINTER *)result__NHAH)[ 0];
-      if ((next__LHAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NHAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__A52G <<  1)) <=  4096)) {
-          next__LHAH=(void *)((unsigned long)result__NHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A52G)));
-        } else {
-          next__LHAH=new_lab__ARJ(new_size__A52G);
-        };
-        ((__POINTER *)next__LHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MHAH)[ 0]=next__LHAH;
-      } else {
-        ((__POINTER *)result__NHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__NHAH=next__LHAH;
-      };
-    };
-    ((__POINTER *)result__NHAH)[ 0]=((__POINTER ) 3);
-    result__V42G=(void *)((unsigned long)result__NHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__ILDH,a__NLDH,new_size__JLDH,new_size2__KLDH,a__RLDH;
+  __UINTEGER_32 new_size__SLDH;
+  __POINTER result__HLDH,ptr_table__YTGH,next__XTGH,result__ZTGH;
+  void *result__WAJH;
+  __INTEGER Self__Y0OC;
+  void **Result__440B;
+  sz__ILDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RSXB * ((__INTEGER )(sizeof(void *)))));
+  result__HLDH=((__POINTER )(NULL));
+  a__NLDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JLDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILDH + a__NLDH) & (__UINTEGER_32)(~ a__NLDH));
+  new_size2__KLDH=(__UINTEGER_32)(new_size__JLDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KLDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RLDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SLDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KLDH + a__RLDH) & (__UINTEGER_32)(~ a__RLDH));
+    ptr_table__YTGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SLDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XTGH=((__POINTER )(NULL));
+    result__ZTGH=((__POINTER *)ptr_table__YTGH)[ 0];
+    if ((result__ZTGH == (void *)NULL)) {
+      result__ZTGH=new_lab__MRJ(new_size__SLDH);
+      next__XTGH=(void *)((unsigned long)result__ZTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLDH)));
+      ((__POINTER *)next__XTGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YTGH)[ 0]=next__XTGH;
+    } else {
+      next__XTGH=((__POINTER *)result__ZTGH)[ 0];
+      if ((next__XTGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZTGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SLDH <<  1)) <=  4096)) {
+          next__XTGH=(void *)((unsigned long)result__ZTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLDH)));
+        } else {
+          next__XTGH=new_lab__MRJ(new_size__SLDH);
+        };
+        ((__POINTER *)next__XTGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YTGH)[ 0]=next__XTGH;
+      } else {
+        ((__POINTER *)result__ZTGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XTGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZTGH=next__XTGH;
+      };
+    };
+    ((__POINTER *)result__ZTGH)[ 0]=((__POINTER ) 3);
+    result__HLDH=(void *)((unsigned long)result__ZTGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__YTCH=first_free__LDVB;
-    while ((((void *)result__YTCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YTCH)->map_size_and_id__2SB &  4294967292LU) < new_size__X42G))) {
-      result__YTCH=((__MEMORY *)result__YTCH)->map_next_free__3SB;
+    result__WAJH=first_free__XDVB;
+    while ((((void *)result__WAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__JLDH))) {
+      result__WAJH=((__MEMORY *)result__WAJH)->map_next_free__JTB;
     };
-    if (((void *)result__YTCH == (void *)NULL)) {
-      result__YTCH=new_page__CA5();
+    if (((void *)result__WAJH == (void *)NULL)) {
+      result__WAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__YTCH,new_size__X42G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YTCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__V42G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YTCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__WAJH,new_size__JLDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__HLDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__S40B=((void **)result__V42G);
-  Self__M0OC=(__INTEGER)(nb_elements__FSXB -  1);
-  while ((Self__M0OC >=  0)) {
-    Result__S40B[Self__M0OC]=NULL;
-    Self__M0OC=(__INTEGER)(Self__M0OC -  1);
+  Result__440B=((void **)result__HLDH);
+  Self__Y0OC=(__INTEGER)(nb_elements__RSXB -  1);
+  while ((Self__Y0OC >=  0)) {
+    Result__440B[Self__Y0OC]=NULL;
+    Self__Y0OC=(__INTEGER)(Self__Y0OC -  1);
   };
-  return(Result__S40B);
+  return(Result__440B);
 }
 
-static void** create__JH5(__INTEGER nb_elements__LH5)
+static void** create__VH5(__INTEGER nb_elements__XH5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__C52G,a__H52G,new_size__D52G,new_size2__E52G,a__L52G;
-  __UINTEGER_32 new_size__M52G;
-  __POINTER result__B52G,ptr_table__RHAH,next__QHAH,result__SHAH;
-  void *result__1TCH;
-  __INTEGER Self__BAKC;
-  void **Result__CBGB;
-  sz__C52G=((__UINTEGER_32 )(__INTEGER)(nb_elements__LH5 * ((__INTEGER )(sizeof(void *)))));
-  result__B52G=((__POINTER )(NULL));
-  a__H52G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__D52G=(__UINTEGER_32)((__UINTEGER_32)(sz__C52G + a__H52G) & (__UINTEGER_32)(~ a__H52G));
-  new_size2__E52G=(__UINTEGER_32)(new_size__D52G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__E52G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__L52G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__M52G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__E52G + a__L52G) & (__UINTEGER_32)(~ a__L52G));
-    ptr_table__RHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M52G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__QHAH=((__POINTER )(NULL));
-    result__SHAH=((__POINTER *)ptr_table__RHAH)[ 0];
-    if ((result__SHAH == (void *)NULL)) {
-      result__SHAH=new_lab__ARJ(new_size__M52G);
-      next__QHAH=(void *)((unsigned long)result__SHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M52G)));
-      ((__POINTER *)next__QHAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__RHAH)[ 0]=next__QHAH;
-    } else {
-      next__QHAH=((__POINTER *)result__SHAH)[ 0];
-      if ((next__QHAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SHAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__M52G <<  1)) <=  4096)) {
-          next__QHAH=(void *)((unsigned long)result__SHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M52G)));
-        } else {
-          next__QHAH=new_lab__ARJ(new_size__M52G);
-        };
-        ((__POINTER *)next__QHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__RHAH)[ 0]=next__QHAH;
-      } else {
-        ((__POINTER *)result__SHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__SHAH=next__QHAH;
-      };
-    };
-    ((__POINTER *)result__SHAH)[ 0]=((__POINTER ) 3);
-    result__B52G=(void *)((unsigned long)result__SHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__ULDH,a__ZLDH,new_size__VLDH,new_size2__WLDH,a__3LDH;
+  __UINTEGER_32 new_size__4LDH;
+  __POINTER result__TLDH,ptr_table__3TGH,next__2TGH,result__4TGH;
+  void *result__ZAJH;
+  __INTEGER Self__NAKC;
+  void **Result__OBGB;
+  sz__ULDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XH5 * ((__INTEGER )(sizeof(void *)))));
+  result__TLDH=((__POINTER )(NULL));
+  a__ZLDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VLDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ULDH + a__ZLDH) & (__UINTEGER_32)(~ a__ZLDH));
+  new_size2__WLDH=(__UINTEGER_32)(new_size__VLDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WLDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3LDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4LDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WLDH + a__3LDH) & (__UINTEGER_32)(~ a__3LDH));
+    ptr_table__3TGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4LDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__2TGH=((__POINTER )(NULL));
+    result__4TGH=((__POINTER *)ptr_table__3TGH)[ 0];
+    if ((result__4TGH == (void *)NULL)) {
+      result__4TGH=new_lab__MRJ(new_size__4LDH);
+      next__2TGH=(void *)((unsigned long)result__4TGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LDH)));
+      ((__POINTER *)next__2TGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__3TGH)[ 0]=next__2TGH;
+    } else {
+      next__2TGH=((__POINTER *)result__4TGH)[ 0];
+      if ((next__2TGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4TGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4LDH <<  1)) <=  4096)) {
+          next__2TGH=(void *)((unsigned long)result__4TGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LDH)));
+        } else {
+          next__2TGH=new_lab__MRJ(new_size__4LDH);
+        };
+        ((__POINTER *)next__2TGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3TGH)[ 0]=next__2TGH;
+      } else {
+        ((__POINTER *)result__4TGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2TGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__4TGH=next__2TGH;
+      };
+    };
+    ((__POINTER *)result__4TGH)[ 0]=((__POINTER ) 3);
+    result__TLDH=(void *)((unsigned long)result__4TGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__1TCH=first_free__LDVB;
-    while ((((void *)result__1TCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1TCH)->map_size_and_id__2SB &  4294967292LU) < new_size__D52G))) {
-      result__1TCH=((__MEMORY *)result__1TCH)->map_next_free__3SB;
+    result__ZAJH=first_free__XDVB;
+    while ((((void *)result__ZAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ZAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__VLDH))) {
+      result__ZAJH=((__MEMORY *)result__ZAJH)->map_next_free__JTB;
     };
-    if (((void *)result__1TCH == (void *)NULL)) {
-      result__1TCH=new_page__CA5();
+    if (((void *)result__ZAJH == (void *)NULL)) {
+      result__ZAJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__1TCH,new_size__D52G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1TCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__B52G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1TCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__ZAJH,new_size__VLDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__TLDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__CBGB=((void **)result__B52G);
-  Self__BAKC=(__INTEGER)(nb_elements__LH5 -  1);
-  while ((Self__BAKC >=  0)) {
-    Result__CBGB[Self__BAKC]=NULL;
-    Self__BAKC=(__INTEGER)(Self__BAKC -  1);
+  Result__OBGB=((void **)result__TLDH);
+  Self__NAKC=(__INTEGER)(nb_elements__XH5 -  1);
+  while ((Self__NAKC >=  0)) {
+    Result__OBGB[Self__NAKC]=NULL;
+    Self__NAKC=(__INTEGER)(Self__NAKC -  1);
   };
-  return(Result__CBGB);
+  return(Result__OBGB);
 }
 
-static void fast_put__to__HOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__IOZ,void *v__JOZ,void *k__KOZ)
+static void fast_put__to__TOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UOZ,void *v__VOZ,void *k__WOZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__LR5G,*Self__QR5G;
-  __INTEGER result__KR5G,__tmp__MR5G,Self__NR5G,idx__SOZ,idx__FCTB;
-  __INTEGER new_capacity__GCTB,i__HCTB,result__PR5G,__tmp__RR5G;
-  __INTEGER Self__SR5G,typ_id__UETB;
-  __POINTER ptr__PETB,ptr_table__WHAH,next__VHAH,result__XHAH;
-  __POINTER ptr_table__1HAH,next__0HAH,result__2HAH;
-  __UINTEGER_32 sz__RETB,a__LT3G,new_size__MT3G,t__QT3G,a__PT3G;
-  __UINTEGER_32 new_size__4HAH,lab_type__3HAH;
-  void *node__TOZ,*node1__JCTB,*node2__KCTB,*__tmp__AQZ;
-  void **old_buckets__ICTB;
-  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__OETB;
-  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__AXEC;
-  Self__LR5G=((__STRING_CONSTANT *)k__KOZ);
-  result__KR5G= 0;
-  __tmp__MR5G=Self__LR5G->count__DD;
-  Self__NR5G= 1;
-  while ((Self__NR5G <= __tmp__MR5G)) {
-    result__KR5G=(__INTEGER)((__INTEGER)( 5 * result__KR5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LR5G->storage__JQO)[(__INTEGER)(Self__NR5G -  1)])));
-    Self__NR5G=(__INTEGER)(Self__NR5G +  1);
-  };
-  if ((result__KR5G <  0)) {
-    result__KR5G=(__INTEGER)(~ result__KR5G);
-  };
-  idx__SOZ=(__INTEGER)(result__KR5G % Self__IOZ->capacity__11T);
-  node__TOZ=((void **)Self__IOZ->buckets__A2T)[idx__SOZ];
-  while ((! (((void *)node__TOZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__TOZ)->key__M2T == (void *)k__KOZ)))) {
-    node__TOZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__TOZ)->next__X2T;
-  };
-  if (((void *)node__TOZ == (void *)NULL)) {
-    if ((Self__IOZ->capacity__11T == Self__IOZ->count__AFZ)) {
-      idx__FCTB= 0;
-      node1__JCTB=NULL;
-      node2__KCTB=NULL;
-      old_buckets__ICTB=Self__IOZ->buckets__A2T;
-      new_capacity__GCTB=prime_number_ceiling__L41((__INTEGER)(Self__IOZ->capacity__11T +  1));
-      Self__IOZ->buckets__A2T=create__JH5(new_capacity__GCTB);
-      i__HCTB=(__INTEGER)(Self__IOZ->capacity__11T -  1);
-      Self__IOZ->capacity__11T=new_capacity__GCTB;
-      while ((i__HCTB >=  0)) {
-        node1__JCTB=((void **)old_buckets__ICTB)[i__HCTB];
-        while (((void *)node1__JCTB != (void *)NULL)) {
-          node2__KCTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__JCTB)->next__X2T;
-          Self__QR5G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__JCTB)->key__M2T);
-          result__PR5G= 0;
-          __tmp__RR5G=Self__QR5G->count__DD;
-          Self__SR5G= 1;
-          while ((Self__SR5G <= __tmp__RR5G)) {
-            result__PR5G=(__INTEGER)((__INTEGER)( 5 * result__PR5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QR5G->storage__JQO)[(__INTEGER)(Self__SR5G -  1)])));
-            Self__SR5G=(__INTEGER)(Self__SR5G +  1);
-          };
-          if ((result__PR5G <  0)) {
-            result__PR5G=(__INTEGER)(~ result__PR5G);
-          };
-          idx__FCTB=(__INTEGER)(result__PR5G % Self__IOZ->capacity__11T);
-          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__JCTB)->next__X2T=((void **)Self__IOZ->buckets__A2T)[idx__FCTB];
-          ((void **)Self__IOZ->buckets__A2T)[idx__FCTB]=node1__JCTB;
-          node1__JCTB=node2__KCTB;
-        };
-        i__HCTB=(__INTEGER)(i__HCTB -  1);
-      };
-      idx__SOZ=(__INTEGER)(result__KR5G % new_capacity__GCTB);
-    };
-    __tmp__AQZ=((void **)Self__IOZ->buckets__A2T)[idx__SOZ];
-    result__OETB=NULL;
-    ptr__PETB=((__POINTER )(NULL));
-    typ_id__UETB= 0;
-    sz__RETB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
-    if ((sz__RETB ==  0)) {
-      result__OETB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-    } else {
-      typ_id__UETB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__RETB);
-      if ((typ_id__UETB == (__INTEGER)(-  1))) {
-        a__LT3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__MT3G=(__UINTEGER_32)((__UINTEGER_32)(sz__RETB + a__LT3G) & (__UINTEGER_32)(~ a__LT3G));
-        ptr_table__WHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MT3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__VHAH=((__POINTER )(NULL));
-        result__XHAH=((__POINTER *)ptr_table__WHAH)[ 0];
-        if ((result__XHAH == (void *)NULL)) {
-          result__XHAH=new_lab__ARJ(new_size__MT3G);
-          next__VHAH=(void *)((unsigned long)result__XHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MT3G)));
-          ((__POINTER *)next__VHAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WHAH)[ 0]=next__VHAH;
-        } else {
-          next__VHAH=((__POINTER *)result__XHAH)[ 0];
-          if ((next__VHAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XHAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MT3G <<  1)) <=  4096)) {
-              next__VHAH=(void *)((unsigned long)result__XHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MT3G)));
+  __STRING_CONSTANT *Self__X3FH,*Self__23FH;
+  __INTEGER result__W3FH,__tmp__Y3FH,Self__Z3FH,idx__4OZ,idx__RCTB;
+  __INTEGER new_capacity__SCTB,i__TCTB,result__13FH,__tmp__33FH;
+  __INTEGER Self__43FH,typ_id__AFTB;
+  __POINTER ptr__1ETB,ptr_table__CUGH,next__BUGH,result__DUGH;
+  __POINTER ptr_table__HUGH,next__GUGH,result__IUGH;
+  __UINTEGER_32 sz__3ETB,a__K5DH,new_size__L5DH,t__P5DH,a__O5DH;
+  __UINTEGER_32 new_size__KUGH,lab_type__JUGH;
+  void *node__5OZ,*node1__VCTB,*node2__WCTB,*__tmp__MQZ;
+  void **old_buckets__UCTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__0ETB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__MXEC;
+  Self__X3FH=((__STRING_CONSTANT *)k__WOZ);
+  result__W3FH= 0;
+  __tmp__Y3FH=Self__X3FH->count__DD;
+  Self__Z3FH= 1;
+  while ((Self__Z3FH <= __tmp__Y3FH)) {
+    result__W3FH=(__INTEGER)((__INTEGER)( 5 * result__W3FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__X3FH->storage__VQO)[(__INTEGER)(Self__Z3FH -  1)])));
+    Self__Z3FH=(__INTEGER)(Self__Z3FH +  1);
+  };
+  if ((result__W3FH <  0)) {
+    result__W3FH=(__INTEGER)(~ result__W3FH);
+  };
+  idx__4OZ=(__INTEGER)(result__W3FH % Self__UOZ->capacity__H2T);
+  node__5OZ=((void **)Self__UOZ->buckets__M2T)[idx__4OZ];
+  while ((! (((void *)node__5OZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5OZ)->key__Y2T == (void *)k__WOZ)))) {
+    node__5OZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5OZ)->next__D3T;
+  };
+  if (((void *)node__5OZ == (void *)NULL)) {
+    if ((Self__UOZ->capacity__H2T == Self__UOZ->count__MFZ)) {
+      idx__RCTB= 0;
+      node1__VCTB=NULL;
+      node2__WCTB=NULL;
+      old_buckets__UCTB=Self__UOZ->buckets__M2T;
+      new_capacity__SCTB=prime_number_ceiling__X41((__INTEGER)(Self__UOZ->capacity__H2T +  1));
+      Self__UOZ->buckets__M2T=create__VH5(new_capacity__SCTB);
+      i__TCTB=(__INTEGER)(Self__UOZ->capacity__H2T -  1);
+      Self__UOZ->capacity__H2T=new_capacity__SCTB;
+      while ((i__TCTB >=  0)) {
+        node1__VCTB=((void **)old_buckets__UCTB)[i__TCTB];
+        while (((void *)node1__VCTB != (void *)NULL)) {
+          node2__WCTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__VCTB)->next__D3T;
+          Self__23FH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__VCTB)->key__Y2T);
+          result__13FH= 0;
+          __tmp__33FH=Self__23FH->count__DD;
+          Self__43FH= 1;
+          while ((Self__43FH <= __tmp__33FH)) {
+            result__13FH=(__INTEGER)((__INTEGER)( 5 * result__13FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__23FH->storage__VQO)[(__INTEGER)(Self__43FH -  1)])));
+            Self__43FH=(__INTEGER)(Self__43FH +  1);
+          };
+          if ((result__13FH <  0)) {
+            result__13FH=(__INTEGER)(~ result__13FH);
+          };
+          idx__RCTB=(__INTEGER)(result__13FH % Self__UOZ->capacity__H2T);
+          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__VCTB)->next__D3T=((void **)Self__UOZ->buckets__M2T)[idx__RCTB];
+          ((void **)Self__UOZ->buckets__M2T)[idx__RCTB]=node1__VCTB;
+          node1__VCTB=node2__WCTB;
+        };
+        i__TCTB=(__INTEGER)(i__TCTB -  1);
+      };
+      idx__4OZ=(__INTEGER)(result__W3FH % new_capacity__SCTB);
+    };
+    __tmp__MQZ=((void **)Self__UOZ->buckets__M2T)[idx__4OZ];
+    result__0ETB=NULL;
+    ptr__1ETB=((__POINTER )(NULL));
+    typ_id__AFTB= 0;
+    sz__3ETB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+    if ((sz__3ETB ==  0)) {
+      result__0ETB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    } else {
+      typ_id__AFTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__3ETB);
+      if ((typ_id__AFTB == (__INTEGER)(-  1))) {
+        a__K5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__L5DH=(__UINTEGER_32)((__UINTEGER_32)(sz__3ETB + a__K5DH) & (__UINTEGER_32)(~ a__K5DH));
+        ptr_table__CUGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__L5DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__BUGH=((__POINTER )(NULL));
+        result__DUGH=((__POINTER *)ptr_table__CUGH)[ 0];
+        if ((result__DUGH == (void *)NULL)) {
+          result__DUGH=new_lab__MRJ(new_size__L5DH);
+          next__BUGH=(void *)((unsigned long)result__DUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L5DH)));
+          ((__POINTER *)next__BUGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CUGH)[ 0]=next__BUGH;
+        } else {
+          next__BUGH=((__POINTER *)result__DUGH)[ 0];
+          if ((next__BUGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DUGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__L5DH <<  1)) <=  4096)) {
+              next__BUGH=(void *)((unsigned long)result__DUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L5DH)));
             } else {
-              next__VHAH=new_lab__ARJ(new_size__MT3G);
-            };
-            ((__POINTER *)next__VHAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WHAH)[ 0]=next__VHAH;
-          } else {
-            ((__POINTER *)result__XHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XHAH=next__VHAH;
-          };
-        };
-        ptr__PETB=result__XHAH;
-      } else {
-        t__QT3G=((__UINTEGER_32 )typ_id__UETB);
-        a__PT3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__4HAH=(__UINTEGER_32)((__UINTEGER_32)(sz__RETB + a__PT3G) & (__UINTEGER_32)(~ a__PT3G));
-        ptr_table__1HAH=((__POINTER )(&(table_type[(t__QT3G)])));
-        lab_type__3HAH=(__UINTEGER_32)(t__QT3G |  1);
-        next__0HAH=((__POINTER )(NULL));
-        result__2HAH=((__POINTER *)ptr_table__1HAH)[ 0];
-        if ((result__2HAH == (void *)NULL)) {
-          result__2HAH=new_lab__ARJ(lab_type__3HAH);
-          next__0HAH=(void *)((unsigned long)result__2HAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HAH)));
-          ((__POINTER *)next__0HAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1HAH)[ 0]=next__0HAH;
-        } else {
-          next__0HAH=((__POINTER *)result__2HAH)[ 0];
-          if ((next__0HAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2HAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4HAH <<  1)) <=  4096)) {
-              next__0HAH=(void *)((unsigned long)result__2HAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HAH)));
+              next__BUGH=new_lab__MRJ(new_size__L5DH);
+            };
+            ((__POINTER *)next__BUGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CUGH)[ 0]=next__BUGH;
+          } else {
+            ((__POINTER *)result__DUGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BUGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DUGH=next__BUGH;
+          };
+        };
+        ptr__1ETB=result__DUGH;
+      } else {
+        t__P5DH=((__UINTEGER_32 )typ_id__AFTB);
+        a__O5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__3ETB + a__O5DH) & (__UINTEGER_32)(~ a__O5DH));
+        ptr_table__HUGH=((__POINTER )(&(table_type[(t__P5DH)])));
+        lab_type__JUGH=(__UINTEGER_32)(t__P5DH |  1);
+        next__GUGH=((__POINTER )(NULL));
+        result__IUGH=((__POINTER *)ptr_table__HUGH)[ 0];
+        if ((result__IUGH == (void *)NULL)) {
+          result__IUGH=new_lab__MRJ(lab_type__JUGH);
+          next__GUGH=(void *)((unsigned long)result__IUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KUGH)));
+          ((__POINTER *)next__GUGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HUGH)[ 0]=next__GUGH;
+        } else {
+          next__GUGH=((__POINTER *)result__IUGH)[ 0];
+          if ((next__GUGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IUGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KUGH <<  1)) <=  4096)) {
+              next__GUGH=(void *)((unsigned long)result__IUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KUGH)));
             } else {
-              next__0HAH=new_lab__ARJ(lab_type__3HAH);
+              next__GUGH=new_lab__MRJ(lab_type__JUGH);
             };
-            ((__POINTER *)next__0HAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1HAH)[ 0]=next__0HAH;
+            ((__POINTER *)next__GUGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HUGH)[ 0]=next__GUGH;
           } else {
-            ((__POINTER *)result__2HAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0HAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2HAH=next__0HAH;
+            ((__POINTER *)result__IUGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GUGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IUGH=next__GUGH;
           };
         };
-        ptr__PETB=result__2HAH;
+        ptr__1ETB=result__IUGH;
       };
-      result__OETB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__PETB);
-      *(result__OETB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+      result__0ETB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__1ETB);
+      *(result__0ETB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
     };
-    Self__AXEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__OETB);
-    Self__AXEC->item__52T=v__JOZ;
-    Self__AXEC->key__M2T=k__KOZ;
-    Self__AXEC->next__X2T=__tmp__AQZ;
-    node__TOZ=result__OETB;
-    ((void **)Self__IOZ->buckets__A2T)[idx__SOZ]=result__OETB;
-    Self__IOZ->count__AFZ=(__INTEGER)(Self__IOZ->count__AFZ +  1);
+    Self__MXEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__0ETB);
+    Self__MXEC->item__L3T=v__VOZ;
+    Self__MXEC->key__Y2T=k__WOZ;
+    Self__MXEC->next__D3T=__tmp__MQZ;
+    node__5OZ=result__0ETB;
+    ((void **)Self__UOZ->buckets__M2T)[idx__4OZ]=result__0ETB;
+    Self__UOZ->count__MFZ=(__INTEGER)(Self__UOZ->count__MFZ +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__TOZ)->item__52T=v__JOZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5OZ)->item__L3T=v__VOZ;
   };
 }
 
-static void** create__PHYB(__INTEGER nb_elements__RHYB)
+static void** create__1HYB(__INTEGER nb_elements__3HYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__W52G,a__152G,new_size__X52G,new_size2__Y52G,a__552G;
-  __UINTEGER_32 new_size__AA3G;
-  __POINTER result__V52G,ptr_table__AIAH,next__5HAH,result__BIAH;
-  void *result__4TCH;
-  __INTEGER Self__T1OC;
-  void **Result__QI1B;
-  sz__W52G=((__UINTEGER_32 )(__INTEGER)(nb_elements__RHYB * ((__INTEGER )(sizeof(void *)))));
-  result__V52G=((__POINTER )(NULL));
-  a__152G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__X52G=(__UINTEGER_32)((__UINTEGER_32)(sz__W52G + a__152G) & (__UINTEGER_32)(~ a__152G));
-  new_size2__Y52G=(__UINTEGER_32)(new_size__X52G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__Y52G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__552G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__AA3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Y52G + a__552G) & (__UINTEGER_32)(~ a__552G));
-    ptr_table__AIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AA3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__5HAH=((__POINTER )(NULL));
-    result__BIAH=((__POINTER *)ptr_table__AIAH)[ 0];
-    if ((result__BIAH == (void *)NULL)) {
-      result__BIAH=new_lab__ARJ(new_size__AA3G);
-      next__5HAH=(void *)((unsigned long)result__BIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AA3G)));
-      ((__POINTER *)next__5HAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__AIAH)[ 0]=next__5HAH;
-    } else {
-      next__5HAH=((__POINTER *)result__BIAH)[ 0];
-      if ((next__5HAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BIAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AA3G <<  1)) <=  4096)) {
-          next__5HAH=(void *)((unsigned long)result__BIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AA3G)));
-        } else {
-          next__5HAH=new_lab__ARJ(new_size__AA3G);
-        };
-        ((__POINTER *)next__5HAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AIAH)[ 0]=next__5HAH;
-      } else {
-        ((__POINTER *)result__BIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5HAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__BIAH=next__5HAH;
-      };
-    };
-    ((__POINTER *)result__BIAH)[ 0]=((__POINTER ) 3);
-    result__V52G=(void *)((unsigned long)result__BIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__IMDH,a__NMDH,new_size__JMDH,new_size2__KMDH,a__RMDH;
+  __UINTEGER_32 new_size__SMDH;
+  __POINTER result__HMDH,ptr_table__MUGH,next__LUGH,result__NUGH;
+  void *result__2AJH;
+  __INTEGER Self__51OC;
+  void **Result__2I1B;
+  sz__IMDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3HYB * ((__INTEGER )(sizeof(void *)))));
+  result__HMDH=((__POINTER )(NULL));
+  a__NMDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JMDH=(__UINTEGER_32)((__UINTEGER_32)(sz__IMDH + a__NMDH) & (__UINTEGER_32)(~ a__NMDH));
+  new_size2__KMDH=(__UINTEGER_32)(new_size__JMDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KMDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RMDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SMDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KMDH + a__RMDH) & (__UINTEGER_32)(~ a__RMDH));
+    ptr_table__MUGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SMDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__LUGH=((__POINTER )(NULL));
+    result__NUGH=((__POINTER *)ptr_table__MUGH)[ 0];
+    if ((result__NUGH == (void *)NULL)) {
+      result__NUGH=new_lab__MRJ(new_size__SMDH);
+      next__LUGH=(void *)((unsigned long)result__NUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SMDH)));
+      ((__POINTER *)next__LUGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__MUGH)[ 0]=next__LUGH;
+    } else {
+      next__LUGH=((__POINTER *)result__NUGH)[ 0];
+      if ((next__LUGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NUGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SMDH <<  1)) <=  4096)) {
+          next__LUGH=(void *)((unsigned long)result__NUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SMDH)));
+        } else {
+          next__LUGH=new_lab__MRJ(new_size__SMDH);
+        };
+        ((__POINTER *)next__LUGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MUGH)[ 0]=next__LUGH;
+      } else {
+        ((__POINTER *)result__NUGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LUGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__NUGH=next__LUGH;
+      };
+    };
+    ((__POINTER *)result__NUGH)[ 0]=((__POINTER ) 3);
+    result__HMDH=(void *)((unsigned long)result__NUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__4TCH=first_free__LDVB;
-    while ((((void *)result__4TCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4TCH)->map_size_and_id__2SB &  4294967292LU) < new_size__X52G))) {
-      result__4TCH=((__MEMORY *)result__4TCH)->map_next_free__3SB;
+    result__2AJH=first_free__XDVB;
+    while ((((void *)result__2AJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2AJH)->map_size_and_id__ITB &  4294967292LU) < new_size__JMDH))) {
+      result__2AJH=((__MEMORY *)result__2AJH)->map_next_free__JTB;
     };
-    if (((void *)result__4TCH == (void *)NULL)) {
-      result__4TCH=new_page__CA5();
+    if (((void *)result__2AJH == (void *)NULL)) {
+      result__2AJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__4TCH,new_size__X52G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4TCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__V52G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4TCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__2AJH,new_size__JMDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2AJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__HMDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2AJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__QI1B=((void **)result__V52G);
-  Self__T1OC=(__INTEGER)(nb_elements__RHYB -  1);
-  while ((Self__T1OC >=  0)) {
-    Result__QI1B[Self__T1OC]=NULL;
-    Self__T1OC=(__INTEGER)(Self__T1OC -  1);
+  Result__2I1B=((void **)result__HMDH);
+  Self__51OC=(__INTEGER)(nb_elements__3HYB -  1);
+  while ((Self__51OC >=  0)) {
+    Result__2I1B[Self__51OC]=NULL;
+    Self__51OC=(__INTEGER)(Self__51OC -  1);
   };
-  return(Result__QI1B);
+  return(Result__2I1B);
 }
 
-static void* get__XSI(void *n__ZSI)
+static void* get__DTI(void *n__FTI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__BTI;
-  __ITM_TYPE_SIMPLE *result__5LL,*Self__GRU;
-  __POINTER ptr__AML,ptr_table__FIAH,next__EIAH,result__GIAH;
-  __POINTER ptr_table__KIAH,next__JIAH,result__LIAH;
-  __INTEGER typ_id__FML;
-  __UINTEGER_32 sz__CML,a__DA3G,new_size__EA3G,t__IA3G,a__HA3G;
-  __UINTEGER_32 new_size__NIAH,lab_type__MIAH;
-  result__BTI=fast_reference_at__M1T(dico__GTI,n__ZSI);
-  if (((void *)result__BTI == (void *)NULL)) {
-    result__5LL=NULL;
-    ptr__AML=((__POINTER )(NULL));
-    typ_id__FML= 0;
-    sz__CML=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
-    if ((sz__CML ==  0)) {
-      result__5LL=ITM_TYPE_SIMPLE__;
-    } else {
-      typ_id__FML=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__CML);
-      if ((typ_id__FML == (__INTEGER)(-  1))) {
-        a__DA3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__EA3G=(__UINTEGER_32)((__UINTEGER_32)(sz__CML + a__DA3G) & (__UINTEGER_32)(~ a__DA3G));
-        ptr_table__FIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EA3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__EIAH=((__POINTER )(NULL));
-        result__GIAH=((__POINTER *)ptr_table__FIAH)[ 0];
-        if ((result__GIAH == (void *)NULL)) {
-          result__GIAH=new_lab__ARJ(new_size__EA3G);
-          next__EIAH=(void *)((unsigned long)result__GIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EA3G)));
-          ((__POINTER *)next__EIAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FIAH)[ 0]=next__EIAH;
-        } else {
-          next__EIAH=((__POINTER *)result__GIAH)[ 0];
-          if ((next__EIAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GIAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__EA3G <<  1)) <=  4096)) {
-              next__EIAH=(void *)((unsigned long)result__GIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EA3G)));
+  void *result__NTI;
+  __ITM_TYPE_SIMPLE *result__LML,*Self__SRU;
+  __POINTER ptr__MML,ptr_table__RUGH,next__QUGH,result__SUGH;
+  __POINTER ptr_table__WUGH,next__VUGH,result__XUGH;
+  __INTEGER typ_id__RML;
+  __UINTEGER_32 sz__OML,a__VMDH,new_size__WMDH,t__0MDH,a__ZMDH;
+  __UINTEGER_32 new_size__ZUGH,lab_type__YUGH;
+  result__NTI=fast_reference_at__Y1T(dico__STI,n__FTI);
+  if (((void *)result__NTI == (void *)NULL)) {
+    result__LML=NULL;
+    ptr__MML=((__POINTER )(NULL));
+    typ_id__RML= 0;
+    sz__OML=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
+    if ((sz__OML ==  0)) {
+      result__LML=ITM_TYPE_SIMPLE__;
+    } else {
+      typ_id__RML=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OML);
+      if ((typ_id__RML == (__INTEGER)(-  1))) {
+        a__VMDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WMDH=(__UINTEGER_32)((__UINTEGER_32)(sz__OML + a__VMDH) & (__UINTEGER_32)(~ a__VMDH));
+        ptr_table__RUGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WMDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QUGH=((__POINTER )(NULL));
+        result__SUGH=((__POINTER *)ptr_table__RUGH)[ 0];
+        if ((result__SUGH == (void *)NULL)) {
+          result__SUGH=new_lab__MRJ(new_size__WMDH);
+          next__QUGH=(void *)((unsigned long)result__SUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMDH)));
+          ((__POINTER *)next__QUGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RUGH)[ 0]=next__QUGH;
+        } else {
+          next__QUGH=((__POINTER *)result__SUGH)[ 0];
+          if ((next__QUGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SUGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WMDH <<  1)) <=  4096)) {
+              next__QUGH=(void *)((unsigned long)result__SUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMDH)));
             } else {
-              next__EIAH=new_lab__ARJ(new_size__EA3G);
-            };
-            ((__POINTER *)next__EIAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FIAH)[ 0]=next__EIAH;
-          } else {
-            ((__POINTER *)result__GIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GIAH=next__EIAH;
-          };
-        };
-        ptr__AML=result__GIAH;
-      } else {
-        t__IA3G=((__UINTEGER_32 )typ_id__FML);
-        a__HA3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NIAH=(__UINTEGER_32)((__UINTEGER_32)(sz__CML + a__HA3G) & (__UINTEGER_32)(~ a__HA3G));
-        ptr_table__KIAH=((__POINTER )(&(table_type[(t__IA3G)])));
-        lab_type__MIAH=(__UINTEGER_32)(t__IA3G |  1);
-        next__JIAH=((__POINTER )(NULL));
-        result__LIAH=((__POINTER *)ptr_table__KIAH)[ 0];
-        if ((result__LIAH == (void *)NULL)) {
-          result__LIAH=new_lab__ARJ(lab_type__MIAH);
-          next__JIAH=(void *)((unsigned long)result__LIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIAH)));
-          ((__POINTER *)next__JIAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KIAH)[ 0]=next__JIAH;
-        } else {
-          next__JIAH=((__POINTER *)result__LIAH)[ 0];
-          if ((next__JIAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LIAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NIAH <<  1)) <=  4096)) {
-              next__JIAH=(void *)((unsigned long)result__LIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIAH)));
+              next__QUGH=new_lab__MRJ(new_size__WMDH);
+            };
+            ((__POINTER *)next__QUGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RUGH)[ 0]=next__QUGH;
+          } else {
+            ((__POINTER *)result__SUGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QUGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SUGH=next__QUGH;
+          };
+        };
+        ptr__MML=result__SUGH;
+      } else {
+        t__0MDH=((__UINTEGER_32 )typ_id__RML);
+        a__ZMDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OML + a__ZMDH) & (__UINTEGER_32)(~ a__ZMDH));
+        ptr_table__WUGH=((__POINTER )(&(table_type[(t__0MDH)])));
+        lab_type__YUGH=(__UINTEGER_32)(t__0MDH |  1);
+        next__VUGH=((__POINTER )(NULL));
+        result__XUGH=((__POINTER *)ptr_table__WUGH)[ 0];
+        if ((result__XUGH == (void *)NULL)) {
+          result__XUGH=new_lab__MRJ(lab_type__YUGH);
+          next__VUGH=(void *)((unsigned long)result__XUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZUGH)));
+          ((__POINTER *)next__VUGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WUGH)[ 0]=next__VUGH;
+        } else {
+          next__VUGH=((__POINTER *)result__XUGH)[ 0];
+          if ((next__VUGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XUGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZUGH <<  1)) <=  4096)) {
+              next__VUGH=(void *)((unsigned long)result__XUGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZUGH)));
             } else {
-              next__JIAH=new_lab__ARJ(lab_type__MIAH);
+              next__VUGH=new_lab__MRJ(lab_type__YUGH);
             };
-            ((__POINTER *)next__JIAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KIAH)[ 0]=next__JIAH;
+            ((__POINTER *)next__VUGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WUGH)[ 0]=next__VUGH;
           } else {
-            ((__POINTER *)result__LIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LIAH=next__JIAH;
+            ((__POINTER *)result__XUGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VUGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XUGH=next__VUGH;
           };
         };
-        ptr__AML=result__LIAH;
+        ptr__MML=result__XUGH;
       };
-      result__5LL=((__ITM_TYPE_SIMPLE *)ptr__AML);
-      *(result__5LL) = *(ITM_TYPE_SIMPLE__);
+      result__LML=((__ITM_TYPE_SIMPLE *)ptr__MML);
+      *(result__LML) = *(ITM_TYPE_SIMPLE__);
     };
-    Self__GRU=((__ITM_TYPE_SIMPLE *)result__5LL);
-    Self__GRU->name__4XP=n__ZSI;
-    fast_put__to__HOZ(dico__GTI,Self__GRU,n__ZSI);
-    result__BTI=result__5LL;
+    Self__SRU=((__ITM_TYPE_SIMPLE *)result__LML);
+    Self__SRU->name__KYP=n__FTI;
+    fast_put__to__TOZ(dico__STI,Self__SRU,n__FTI);
+    result__NTI=result__LML;
   };
-  return(result__BTI);
+  return(result__NTI);
 }
 
-static void** create__YGQB(__INTEGER nb_elements__0GQB)
+static void** create__EHQB(__INTEGER nb_elements__GHQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__KA3G,a__PA3G,new_size__LA3G,new_size2__MA3G,a__TA3G;
-  __UINTEGER_32 new_size__UA3G;
-  __POINTER result__JA3G,ptr_table__PIAH,next__OIAH,result__QIAH;
-  void *result__BUCH;
-  __INTEGER Self__YWMC;
-  void **Result__FATB;
-  sz__KA3G=((__UINTEGER_32 )(__INTEGER)(nb_elements__0GQB * ((__INTEGER )(sizeof(void *)))));
-  result__JA3G=((__POINTER )(NULL));
-  a__PA3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__LA3G=(__UINTEGER_32)((__UINTEGER_32)(sz__KA3G + a__PA3G) & (__UINTEGER_32)(~ a__PA3G));
-  new_size2__MA3G=(__UINTEGER_32)(new_size__LA3G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__MA3G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__TA3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__UA3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MA3G + a__TA3G) & (__UINTEGER_32)(~ a__TA3G));
-    ptr_table__PIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UA3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__OIAH=((__POINTER )(NULL));
-    result__QIAH=((__POINTER *)ptr_table__PIAH)[ 0];
-    if ((result__QIAH == (void *)NULL)) {
-      result__QIAH=new_lab__ARJ(new_size__UA3G);
-      next__OIAH=(void *)((unsigned long)result__QIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UA3G)));
-      ((__POINTER *)next__OIAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__PIAH)[ 0]=next__OIAH;
-    } else {
-      next__OIAH=((__POINTER *)result__QIAH)[ 0];
-      if ((next__OIAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QIAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UA3G <<  1)) <=  4096)) {
-          next__OIAH=(void *)((unsigned long)result__QIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UA3G)));
-        } else {
-          next__OIAH=new_lab__ARJ(new_size__UA3G);
-        };
-        ((__POINTER *)next__OIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PIAH)[ 0]=next__OIAH;
-      } else {
-        ((__POINTER *)result__QIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__QIAH=next__OIAH;
-      };
-    };
-    ((__POINTER *)result__QIAH)[ 0]=((__POINTER ) 3);
-    result__JA3G=(void *)((unsigned long)result__QIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__2MDH,a__BNDH,new_size__3MDH,new_size2__4MDH,a__FNDH;
+  __UINTEGER_32 new_size__GNDH;
+  __POINTER result__1MDH,ptr_table__1UGH,next__0UGH,result__2UGH;
+  void *result__5AJH;
+  __INTEGER Self__EXMC;
+  void **Result__RATB;
+  sz__2MDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GHQB * ((__INTEGER )(sizeof(void *)))));
+  result__1MDH=((__POINTER )(NULL));
+  a__BNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3MDH=(__UINTEGER_32)((__UINTEGER_32)(sz__2MDH + a__BNDH) & (__UINTEGER_32)(~ a__BNDH));
+  new_size2__4MDH=(__UINTEGER_32)(new_size__3MDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4MDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GNDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4MDH + a__FNDH) & (__UINTEGER_32)(~ a__FNDH));
+    ptr_table__1UGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GNDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__0UGH=((__POINTER )(NULL));
+    result__2UGH=((__POINTER *)ptr_table__1UGH)[ 0];
+    if ((result__2UGH == (void *)NULL)) {
+      result__2UGH=new_lab__MRJ(new_size__GNDH);
+      next__0UGH=(void *)((unsigned long)result__2UGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GNDH)));
+      ((__POINTER *)next__0UGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__1UGH)[ 0]=next__0UGH;
+    } else {
+      next__0UGH=((__POINTER *)result__2UGH)[ 0];
+      if ((next__0UGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2UGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GNDH <<  1)) <=  4096)) {
+          next__0UGH=(void *)((unsigned long)result__2UGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GNDH)));
+        } else {
+          next__0UGH=new_lab__MRJ(new_size__GNDH);
+        };
+        ((__POINTER *)next__0UGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1UGH)[ 0]=next__0UGH;
+      } else {
+        ((__POINTER *)result__2UGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0UGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__2UGH=next__0UGH;
+      };
+    };
+    ((__POINTER *)result__2UGH)[ 0]=((__POINTER ) 3);
+    result__1MDH=(void *)((unsigned long)result__2UGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__BUCH=first_free__LDVB;
-    while ((((void *)result__BUCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BUCH)->map_size_and_id__2SB &  4294967292LU) < new_size__LA3G))) {
-      result__BUCH=((__MEMORY *)result__BUCH)->map_next_free__3SB;
+    result__5AJH=first_free__XDVB;
+    while ((((void *)result__5AJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5AJH)->map_size_and_id__ITB &  4294967292LU) < new_size__3MDH))) {
+      result__5AJH=((__MEMORY *)result__5AJH)->map_next_free__JTB;
     };
-    if (((void *)result__BUCH == (void *)NULL)) {
-      result__BUCH=new_page__CA5();
+    if (((void *)result__5AJH == (void *)NULL)) {
+      result__5AJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__BUCH,new_size__LA3G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BUCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__JA3G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BUCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__5AJH,new_size__3MDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5AJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__1MDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5AJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__FATB=((void **)result__JA3G);
-  Self__YWMC=(__INTEGER)(nb_elements__0GQB -  1);
-  while ((Self__YWMC >=  0)) {
-    Result__FATB[Self__YWMC]=NULL;
-    Self__YWMC=(__INTEGER)(Self__YWMC -  1);
+  Result__RATB=((void **)result__1MDH);
+  Self__EXMC=(__INTEGER)(nb_elements__GHQB -  1);
+  while ((Self__EXMC >=  0)) {
+    Result__RATB[Self__EXMC]=NULL;
+    Self__EXMC=(__INTEGER)(Self__EXMC -  1);
   };
-  return(Result__FATB);
+  return(Result__RATB);
 }
 
-static void** create__I1PB(__INTEGER nb_elements__K1PB)
+static void** create__U1PB(__INTEGER nb_elements__W1PB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__WA3G,a__1A3G,new_size__XA3G,new_size2__YA3G,a__5A3G;
-  __UINTEGER_32 new_size__AB3G;
-  __POINTER result__VA3G,ptr_table__UIAH,next__TIAH,result__VIAH;
-  void *result__EUCH;
-  __INTEGER Self__RVMC;
-  void **Result__0XSB;
-  sz__WA3G=((__UINTEGER_32 )(__INTEGER)(nb_elements__K1PB * ((__INTEGER )(sizeof(void *)))));
-  result__VA3G=((__POINTER )(NULL));
-  a__1A3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__XA3G=(__UINTEGER_32)((__UINTEGER_32)(sz__WA3G + a__1A3G) & (__UINTEGER_32)(~ a__1A3G));
-  new_size2__YA3G=(__UINTEGER_32)(new_size__XA3G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__YA3G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__5A3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__AB3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__YA3G + a__5A3G) & (__UINTEGER_32)(~ a__5A3G));
-    ptr_table__UIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AB3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__TIAH=((__POINTER )(NULL));
-    result__VIAH=((__POINTER *)ptr_table__UIAH)[ 0];
-    if ((result__VIAH == (void *)NULL)) {
-      result__VIAH=new_lab__ARJ(new_size__AB3G);
-      next__TIAH=(void *)((unsigned long)result__VIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AB3G)));
-      ((__POINTER *)next__TIAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__UIAH)[ 0]=next__TIAH;
-    } else {
-      next__TIAH=((__POINTER *)result__VIAH)[ 0];
-      if ((next__TIAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VIAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AB3G <<  1)) <=  4096)) {
-          next__TIAH=(void *)((unsigned long)result__VIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AB3G)));
-        } else {
-          next__TIAH=new_lab__ARJ(new_size__AB3G);
-        };
-        ((__POINTER *)next__TIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UIAH)[ 0]=next__TIAH;
-      } else {
-        ((__POINTER *)result__VIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__VIAH=next__TIAH;
-      };
-    };
-    ((__POINTER *)result__VIAH)[ 0]=((__POINTER ) 3);
-    result__VA3G=(void *)((unsigned long)result__VIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__INDH,a__NNDH,new_size__JNDH,new_size2__KNDH,a__RNDH;
+  __UINTEGER_32 new_size__SNDH;
+  __POINTER result__HNDH,ptr_table__AVGH,next__5UGH,result__BVGH;
+  void *result__CBJH;
+  __INTEGER Self__3VMC;
+  void **Result__GYSB;
+  sz__INDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__W1PB * ((__INTEGER )(sizeof(void *)))));
+  result__HNDH=((__POINTER )(NULL));
+  a__NNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__INDH + a__NNDH) & (__UINTEGER_32)(~ a__NNDH));
+  new_size2__KNDH=(__UINTEGER_32)(new_size__JNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SNDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KNDH + a__RNDH) & (__UINTEGER_32)(~ a__RNDH));
+    ptr_table__AVGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SNDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__5UGH=((__POINTER )(NULL));
+    result__BVGH=((__POINTER *)ptr_table__AVGH)[ 0];
+    if ((result__BVGH == (void *)NULL)) {
+      result__BVGH=new_lab__MRJ(new_size__SNDH);
+      next__5UGH=(void *)((unsigned long)result__BVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SNDH)));
+      ((__POINTER *)next__5UGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__AVGH)[ 0]=next__5UGH;
+    } else {
+      next__5UGH=((__POINTER *)result__BVGH)[ 0];
+      if ((next__5UGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BVGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SNDH <<  1)) <=  4096)) {
+          next__5UGH=(void *)((unsigned long)result__BVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SNDH)));
+        } else {
+          next__5UGH=new_lab__MRJ(new_size__SNDH);
+        };
+        ((__POINTER *)next__5UGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AVGH)[ 0]=next__5UGH;
+      } else {
+        ((__POINTER *)result__BVGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5UGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__BVGH=next__5UGH;
+      };
+    };
+    ((__POINTER *)result__BVGH)[ 0]=((__POINTER ) 3);
+    result__HNDH=(void *)((unsigned long)result__BVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__EUCH=first_free__LDVB;
-    while ((((void *)result__EUCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EUCH)->map_size_and_id__2SB &  4294967292LU) < new_size__XA3G))) {
-      result__EUCH=((__MEMORY *)result__EUCH)->map_next_free__3SB;
+    result__CBJH=first_free__XDVB;
+    while ((((void *)result__CBJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CBJH)->map_size_and_id__ITB &  4294967292LU) < new_size__JNDH))) {
+      result__CBJH=((__MEMORY *)result__CBJH)->map_next_free__JTB;
     };
-    if (((void *)result__EUCH == (void *)NULL)) {
-      result__EUCH=new_page__CA5();
+    if (((void *)result__CBJH == (void *)NULL)) {
+      result__CBJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__EUCH,new_size__XA3G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EUCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__VA3G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EUCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__CBJH,new_size__JNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CBJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__HNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CBJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__0XSB=((void **)result__VA3G);
-  Self__RVMC=(__INTEGER)(nb_elements__K1PB -  1);
-  while ((Self__RVMC >=  0)) {
-    Result__0XSB[Self__RVMC]=NULL;
-    Self__RVMC=(__INTEGER)(Self__RVMC -  1);
+  Result__GYSB=((void **)result__HNDH);
+  Self__3VMC=(__INTEGER)(nb_elements__W1PB -  1);
+  while ((Self__3VMC >=  0)) {
+    Result__GYSB[Self__3VMC]=NULL;
+    Self__3VMC=(__INTEGER)(Self__3VMC -  1);
   };
-  return(Result__0XSB);
+  return(Result__GYSB);
 }
 
-static void** create__T3ZB(__INTEGER nb_elements__V3ZB)
+static void** create__53ZB(__INTEGER nb_elements__B4ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__CB3G,a__HB3G,new_size__DB3G,new_size2__EB3G,a__LB3G;
-  __UINTEGER_32 new_size__MB3G;
-  __POINTER result__BB3G,ptr_table__ZIAH,next__YIAH,result__0IAH;
-  void *result__HUCH;
-  __INTEGER Self__54OC;
-  void **Result__VE2B;
-  sz__CB3G=((__UINTEGER_32 )(__INTEGER)(nb_elements__V3ZB * ((__INTEGER )(sizeof(void *)))));
-  result__BB3G=((__POINTER )(NULL));
-  a__HB3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__DB3G=(__UINTEGER_32)((__UINTEGER_32)(sz__CB3G + a__HB3G) & (__UINTEGER_32)(~ a__HB3G));
-  new_size2__EB3G=(__UINTEGER_32)(new_size__DB3G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__EB3G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__LB3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__MB3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EB3G + a__LB3G) & (__UINTEGER_32)(~ a__LB3G));
-    ptr_table__ZIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MB3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__YIAH=((__POINTER )(NULL));
-    result__0IAH=((__POINTER *)ptr_table__ZIAH)[ 0];
-    if ((result__0IAH == (void *)NULL)) {
-      result__0IAH=new_lab__ARJ(new_size__MB3G);
-      next__YIAH=(void *)((unsigned long)result__0IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MB3G)));
-      ((__POINTER *)next__YIAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__ZIAH)[ 0]=next__YIAH;
-    } else {
-      next__YIAH=((__POINTER *)result__0IAH)[ 0];
-      if ((next__YIAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0IAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MB3G <<  1)) <=  4096)) {
-          next__YIAH=(void *)((unsigned long)result__0IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MB3G)));
-        } else {
-          next__YIAH=new_lab__ARJ(new_size__MB3G);
-        };
-        ((__POINTER *)next__YIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZIAH)[ 0]=next__YIAH;
-      } else {
-        ((__POINTER *)result__0IAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__0IAH=next__YIAH;
-      };
-    };
-    ((__POINTER *)result__0IAH)[ 0]=((__POINTER ) 3);
-    result__BB3G=(void *)((unsigned long)result__0IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__UNDH,a__ZNDH,new_size__VNDH,new_size2__WNDH,a__3NDH;
+  __UINTEGER_32 new_size__4NDH;
+  __POINTER result__TNDH,ptr_table__FVGH,next__EVGH,result__GVGH;
+  void *result__FBJH;
+  __INTEGER Self__L5OC;
+  void **Result__BF2B;
+  sz__UNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__B4ZB * ((__INTEGER )(sizeof(void *)))));
+  result__TNDH=((__POINTER )(NULL));
+  a__ZNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__UNDH + a__ZNDH) & (__UINTEGER_32)(~ a__ZNDH));
+  new_size2__WNDH=(__UINTEGER_32)(new_size__VNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3NDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4NDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WNDH + a__3NDH) & (__UINTEGER_32)(~ a__3NDH));
+    ptr_table__FVGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4NDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EVGH=((__POINTER )(NULL));
+    result__GVGH=((__POINTER *)ptr_table__FVGH)[ 0];
+    if ((result__GVGH == (void *)NULL)) {
+      result__GVGH=new_lab__MRJ(new_size__4NDH);
+      next__EVGH=(void *)((unsigned long)result__GVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4NDH)));
+      ((__POINTER *)next__EVGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FVGH)[ 0]=next__EVGH;
+    } else {
+      next__EVGH=((__POINTER *)result__GVGH)[ 0];
+      if ((next__EVGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GVGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4NDH <<  1)) <=  4096)) {
+          next__EVGH=(void *)((unsigned long)result__GVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4NDH)));
+        } else {
+          next__EVGH=new_lab__MRJ(new_size__4NDH);
+        };
+        ((__POINTER *)next__EVGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FVGH)[ 0]=next__EVGH;
+      } else {
+        ((__POINTER *)result__GVGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EVGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GVGH=next__EVGH;
+      };
+    };
+    ((__POINTER *)result__GVGH)[ 0]=((__POINTER ) 3);
+    result__TNDH=(void *)((unsigned long)result__GVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__HUCH=first_free__LDVB;
-    while ((((void *)result__HUCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HUCH)->map_size_and_id__2SB &  4294967292LU) < new_size__DB3G))) {
-      result__HUCH=((__MEMORY *)result__HUCH)->map_next_free__3SB;
+    result__FBJH=first_free__XDVB;
+    while ((((void *)result__FBJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FBJH)->map_size_and_id__ITB &  4294967292LU) < new_size__VNDH))) {
+      result__FBJH=((__MEMORY *)result__FBJH)->map_next_free__JTB;
     };
-    if (((void *)result__HUCH == (void *)NULL)) {
-      result__HUCH=new_page__CA5();
+    if (((void *)result__FBJH == (void *)NULL)) {
+      result__FBJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__HUCH,new_size__DB3G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HUCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__BB3G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HUCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__FBJH,new_size__VNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FBJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__TNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FBJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__VE2B=((void **)result__BB3G);
-  Self__54OC=(__INTEGER)(nb_elements__V3ZB -  1);
-  while ((Self__54OC >=  0)) {
-    Result__VE2B[Self__54OC]=NULL;
-    Self__54OC=(__INTEGER)(Self__54OC -  1);
+  Result__BF2B=((void **)result__TNDH);
+  Self__L5OC=(__INTEGER)(nb_elements__B4ZB -  1);
+  while ((Self__L5OC >=  0)) {
+    Result__BF2B[Self__L5OC]=NULL;
+    Self__L5OC=(__INTEGER)(Self__L5OC -  1);
   };
-  return(Result__VE2B);
+  return(Result__BF2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__VGRC(__INTEGER new_count__XGRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__BHRC(__INTEGER new_count__DHRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__2B1C,ptr_table__4IAH,next__3IAH,result__5IAH;
-  __POINTER ptr_table__DJAH,next__CJAH,result__EJAH;
-  __INTEGER typ_id__BC1C;
-  __UINTEGER_32 sz__4B1C,a__PB3G,new_size__QB3G,t__UB3G,a__TB3G;
-  __UINTEGER_32 new_size__GJAH,lab_type__FJAH;
-  __FAST_ARRAYoSTRING_CONSTANTo *result__1B1C,*Self__S3RD;
-  result__1B1C=NULL;
-  ptr__2B1C=((__POINTER )(NULL));
-  typ_id__BC1C= 0;
-  sz__4B1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
-  if ((sz__4B1C ==  0)) {
-    result__1B1C=FAST_ARRAYoSTRING_CONSTANTo__;
+  __POINTER ptr__IC1C,ptr_table__KVGH,next__JVGH,result__LVGH;
+  __POINTER ptr_table__PVGH,next__OVGH,result__QVGH;
+  __INTEGER typ_id__NC1C;
+  __UINTEGER_32 sz__KC1C,a__BODH,new_size__CODH,t__GODH,a__FODH;
+  __UINTEGER_32 new_size__SVGH,lab_type__RVGH;
+  __FAST_ARRAYoSTRING_CONSTANTo *result__HC1C,*Self__43RD;
+  result__HC1C=NULL;
+  ptr__IC1C=((__POINTER )(NULL));
+  typ_id__NC1C= 0;
+  sz__KC1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
+  if ((sz__KC1C ==  0)) {
+    result__HC1C=FAST_ARRAYoSTRING_CONSTANTo__;
   } else {
-    typ_id__BC1C=__FAST_ARRAYoSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__4B1C);
-    if ((typ_id__BC1C == (__INTEGER)(-  1))) {
-      a__PB3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QB3G=(__UINTEGER_32)((__UINTEGER_32)(sz__4B1C + a__PB3G) & (__UINTEGER_32)(~ a__PB3G));
-      ptr_table__4IAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QB3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__3IAH=((__POINTER )(NULL));
-      result__5IAH=((__POINTER *)ptr_table__4IAH)[ 0];
-      if ((result__5IAH == (void *)NULL)) {
-        result__5IAH=new_lab__ARJ(new_size__QB3G);
-        next__3IAH=(void *)((unsigned long)result__5IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QB3G)));
-        ((__POINTER *)next__3IAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4IAH)[ 0]=next__3IAH;
-      } else {
-        next__3IAH=((__POINTER *)result__5IAH)[ 0];
-        if ((next__3IAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5IAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__QB3G <<  1)) <=  4096)) {
-            next__3IAH=(void *)((unsigned long)result__5IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QB3G)));
-          } else {
-            next__3IAH=new_lab__ARJ(new_size__QB3G);
-          };
-          ((__POINTER *)next__3IAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4IAH)[ 0]=next__3IAH;
-        } else {
-          ((__POINTER *)result__5IAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3IAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5IAH=next__3IAH;
-        };
-      };
-      ptr__2B1C=result__5IAH;
-    } else {
-      t__UB3G=((__UINTEGER_32 )typ_id__BC1C);
-      a__TB3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GJAH=(__UINTEGER_32)((__UINTEGER_32)(sz__4B1C + a__TB3G) & (__UINTEGER_32)(~ a__TB3G));
-      ptr_table__DJAH=((__POINTER )(&(table_type[(t__UB3G)])));
-      lab_type__FJAH=(__UINTEGER_32)(t__UB3G |  1);
-      next__CJAH=((__POINTER )(NULL));
-      result__EJAH=((__POINTER *)ptr_table__DJAH)[ 0];
-      if ((result__EJAH == (void *)NULL)) {
-        result__EJAH=new_lab__ARJ(lab_type__FJAH);
-        next__CJAH=(void *)((unsigned long)result__EJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GJAH)));
-        ((__POINTER *)next__CJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DJAH)[ 0]=next__CJAH;
-      } else {
-        next__CJAH=((__POINTER *)result__EJAH)[ 0];
-        if ((next__CJAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EJAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__GJAH <<  1)) <=  4096)) {
-            next__CJAH=(void *)((unsigned long)result__EJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GJAH)));
-          } else {
-            next__CJAH=new_lab__ARJ(lab_type__FJAH);
-          };
-          ((__POINTER *)next__CJAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DJAH)[ 0]=next__CJAH;
-        } else {
-          ((__POINTER *)result__EJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EJAH=next__CJAH;
-        };
-      };
-      ptr__2B1C=result__EJAH;
-    };
-    result__1B1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__2B1C);
-    *(result__1B1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
-  };
-  Self__S3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__1B1C);
-  if ((Self__S3RD->parent_arrayed_collection__14I.capacity__KBPD < new_count__XGRC)) {
-    Self__S3RD->parent_arrayed_collection__14I.storage__FCPD=create__G0GE(new_count__XGRC);
-    Self__S3RD->parent_arrayed_collection__14I.capacity__KBPD=new_count__XGRC;
-  };
-  Self__S3RD->parent_arrayed_collection__14I.upper__P5OD=(__INTEGER)(-  1);
-  return(result__1B1C);
+    typ_id__NC1C=__FAST_ARRAYoSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KC1C);
+    if ((typ_id__NC1C == (__INTEGER)(-  1))) {
+      a__BODH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CODH=(__UINTEGER_32)((__UINTEGER_32)(sz__KC1C + a__BODH) & (__UINTEGER_32)(~ a__BODH));
+      ptr_table__KVGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CODH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JVGH=((__POINTER )(NULL));
+      result__LVGH=((__POINTER *)ptr_table__KVGH)[ 0];
+      if ((result__LVGH == (void *)NULL)) {
+        result__LVGH=new_lab__MRJ(new_size__CODH);
+        next__JVGH=(void *)((unsigned long)result__LVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CODH)));
+        ((__POINTER *)next__JVGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KVGH)[ 0]=next__JVGH;
+      } else {
+        next__JVGH=((__POINTER *)result__LVGH)[ 0];
+        if ((next__JVGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LVGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CODH <<  1)) <=  4096)) {
+            next__JVGH=(void *)((unsigned long)result__LVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CODH)));
+          } else {
+            next__JVGH=new_lab__MRJ(new_size__CODH);
+          };
+          ((__POINTER *)next__JVGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KVGH)[ 0]=next__JVGH;
+        } else {
+          ((__POINTER *)result__LVGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JVGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LVGH=next__JVGH;
+        };
+      };
+      ptr__IC1C=result__LVGH;
+    } else {
+      t__GODH=((__UINTEGER_32 )typ_id__NC1C);
+      a__FODH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__KC1C + a__FODH) & (__UINTEGER_32)(~ a__FODH));
+      ptr_table__PVGH=((__POINTER )(&(table_type[(t__GODH)])));
+      lab_type__RVGH=(__UINTEGER_32)(t__GODH |  1);
+      next__OVGH=((__POINTER )(NULL));
+      result__QVGH=((__POINTER *)ptr_table__PVGH)[ 0];
+      if ((result__QVGH == (void *)NULL)) {
+        result__QVGH=new_lab__MRJ(lab_type__RVGH);
+        next__OVGH=(void *)((unsigned long)result__QVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVGH)));
+        ((__POINTER *)next__OVGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PVGH)[ 0]=next__OVGH;
+      } else {
+        next__OVGH=((__POINTER *)result__QVGH)[ 0];
+        if ((next__OVGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QVGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SVGH <<  1)) <=  4096)) {
+            next__OVGH=(void *)((unsigned long)result__QVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVGH)));
+          } else {
+            next__OVGH=new_lab__MRJ(lab_type__RVGH);
+          };
+          ((__POINTER *)next__OVGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PVGH)[ 0]=next__OVGH;
+        } else {
+          ((__POINTER *)result__QVGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QVGH=next__OVGH;
+        };
+      };
+      ptr__IC1C=result__QVGH;
+    };
+    result__HC1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__IC1C);
+    *(result__HC1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
+  };
+  Self__43RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__HC1C);
+  if ((Self__43RD->parent_arrayed_collection__H5I.capacity__WBPD < new_count__DHRC)) {
+    Self__43RD->parent_arrayed_collection__H5I.storage__RCPD=create__PHHE(new_count__DHRC);
+    Self__43RD->parent_arrayed_collection__H5I.capacity__WBPD=new_count__DHRC;
+  };
+  Self__43RD->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(-  1);
+  return(result__HC1C);
 }
 
-static void** create__DPSF(__INTEGER nb_elements__FPSF)
+static void** create__KDTF(__INTEGER nb_elements__MDTF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__WB3G,a__1B3G,new_size__XB3G,new_size2__YB3G,a__5B3G;
-  __UINTEGER_32 new_size__AC3G;
-  __POINTER result__VB3G,ptr_table__IJAH,next__HJAH,result__JJAH;
-  void *result__KUCH;
-  __INTEGER Self__OE3F;
-  void **Result__KYWF;
-  sz__WB3G=((__UINTEGER_32 )(__INTEGER)(nb_elements__FPSF * ((__INTEGER )(sizeof(void *)))));
-  result__VB3G=((__POINTER )(NULL));
-  a__1B3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__XB3G=(__UINTEGER_32)((__UINTEGER_32)(sz__WB3G + a__1B3G) & (__UINTEGER_32)(~ a__1B3G));
-  new_size2__YB3G=(__UINTEGER_32)(new_size__XB3G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__YB3G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__5B3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__AC3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__YB3G + a__5B3G) & (__UINTEGER_32)(~ a__5B3G));
-    ptr_table__IJAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AC3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__HJAH=((__POINTER )(NULL));
-    result__JJAH=((__POINTER *)ptr_table__IJAH)[ 0];
-    if ((result__JJAH == (void *)NULL)) {
-      result__JJAH=new_lab__ARJ(new_size__AC3G);
-      next__HJAH=(void *)((unsigned long)result__JJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AC3G)));
-      ((__POINTER *)next__HJAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__IJAH)[ 0]=next__HJAH;
-    } else {
-      next__HJAH=((__POINTER *)result__JJAH)[ 0];
-      if ((next__HJAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JJAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AC3G <<  1)) <=  4096)) {
-          next__HJAH=(void *)((unsigned long)result__JJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AC3G)));
-        } else {
-          next__HJAH=new_lab__ARJ(new_size__AC3G);
-        };
-        ((__POINTER *)next__HJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IJAH)[ 0]=next__HJAH;
-      } else {
-        ((__POINTER *)result__JJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__JJAH=next__HJAH;
-      };
-    };
-    ((__POINTER *)result__JJAH)[ 0]=((__POINTER ) 3);
-    result__VB3G=(void *)((unsigned long)result__JJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__IODH,a__NODH,new_size__JODH,new_size2__KODH,a__RODH;
+  __UINTEGER_32 new_size__SODH;
+  __POINTER result__HODH,ptr_table__UVGH,next__TVGH,result__VVGH;
+  void *result__IBJH;
+  __INTEGER Self__IS4F;
+  void **Result__RRXF;
+  sz__IODH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MDTF * ((__INTEGER )(sizeof(void *)))));
+  result__HODH=((__POINTER )(NULL));
+  a__NODH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JODH=(__UINTEGER_32)((__UINTEGER_32)(sz__IODH + a__NODH) & (__UINTEGER_32)(~ a__NODH));
+  new_size2__KODH=(__UINTEGER_32)(new_size__JODH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KODH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RODH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SODH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KODH + a__RODH) & (__UINTEGER_32)(~ a__RODH));
+    ptr_table__UVGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SODH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__TVGH=((__POINTER )(NULL));
+    result__VVGH=((__POINTER *)ptr_table__UVGH)[ 0];
+    if ((result__VVGH == (void *)NULL)) {
+      result__VVGH=new_lab__MRJ(new_size__SODH);
+      next__TVGH=(void *)((unsigned long)result__VVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SODH)));
+      ((__POINTER *)next__TVGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__UVGH)[ 0]=next__TVGH;
+    } else {
+      next__TVGH=((__POINTER *)result__VVGH)[ 0];
+      if ((next__TVGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VVGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SODH <<  1)) <=  4096)) {
+          next__TVGH=(void *)((unsigned long)result__VVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SODH)));
+        } else {
+          next__TVGH=new_lab__MRJ(new_size__SODH);
+        };
+        ((__POINTER *)next__TVGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UVGH)[ 0]=next__TVGH;
+      } else {
+        ((__POINTER *)result__VVGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TVGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__VVGH=next__TVGH;
+      };
+    };
+    ((__POINTER *)result__VVGH)[ 0]=((__POINTER ) 3);
+    result__HODH=(void *)((unsigned long)result__VVGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__KUCH=first_free__LDVB;
-    while ((((void *)result__KUCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KUCH)->map_size_and_id__2SB &  4294967292LU) < new_size__XB3G))) {
-      result__KUCH=((__MEMORY *)result__KUCH)->map_next_free__3SB;
+    result__IBJH=first_free__XDVB;
+    while ((((void *)result__IBJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__IBJH)->map_size_and_id__ITB &  4294967292LU) < new_size__JODH))) {
+      result__IBJH=((__MEMORY *)result__IBJH)->map_next_free__JTB;
     };
-    if (((void *)result__KUCH == (void *)NULL)) {
-      result__KUCH=new_page__CA5();
+    if (((void *)result__IBJH == (void *)NULL)) {
+      result__IBJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__KUCH,new_size__XB3G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KUCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__VB3G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KUCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__IBJH,new_size__JODH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__IBJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__HODH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__IBJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__KYWF=((void **)result__VB3G);
-  Self__OE3F=(__INTEGER)(nb_elements__FPSF -  1);
-  while ((Self__OE3F >=  0)) {
-    Result__KYWF[Self__OE3F]=NULL;
-    Self__OE3F=(__INTEGER)(Self__OE3F -  1);
+  Result__RRXF=((void **)result__HODH);
+  Self__IS4F=(__INTEGER)(nb_elements__MDTF -  1);
+  while ((Self__IS4F >=  0)) {
+    Result__RRXF[Self__IS4F]=NULL;
+    Self__IS4F=(__INTEGER)(Self__IS4F -  1);
   };
-  return(Result__KYWF);
+  return(Result__RRXF);
 }
 
-static void** create__4XEF(__INTEGER nb_elements__AYEF)
+static void** create__YMFF(__INTEGER nb_elements__0MFF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__CC3G,a__HC3G,new_size__DC3G,new_size2__EC3G,a__LC3G;
-  __UINTEGER_32 new_size__MC3G;
-  __POINTER result__BC3G,ptr_table__NJAH,next__MJAH,result__OJAH;
-  void *result__NUCH;
-  __INTEGER Self__VUPF;
-  void **Result__B5IF;
-  sz__CC3G=((__UINTEGER_32 )(__INTEGER)(nb_elements__AYEF * ((__INTEGER )(sizeof(void *)))));
-  result__BC3G=((__POINTER )(NULL));
-  a__HC3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__DC3G=(__UINTEGER_32)((__UINTEGER_32)(sz__CC3G + a__HC3G) & (__UINTEGER_32)(~ a__HC3G));
-  new_size2__EC3G=(__UINTEGER_32)(new_size__DC3G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__EC3G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__LC3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__MC3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EC3G + a__LC3G) & (__UINTEGER_32)(~ a__LC3G));
-    ptr_table__NJAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MC3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__MJAH=((__POINTER )(NULL));
-    result__OJAH=((__POINTER *)ptr_table__NJAH)[ 0];
-    if ((result__OJAH == (void *)NULL)) {
-      result__OJAH=new_lab__ARJ(new_size__MC3G);
-      next__MJAH=(void *)((unsigned long)result__OJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MC3G)));
-      ((__POINTER *)next__MJAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__NJAH)[ 0]=next__MJAH;
-    } else {
-      next__MJAH=((__POINTER *)result__OJAH)[ 0];
-      if ((next__MJAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OJAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MC3G <<  1)) <=  4096)) {
-          next__MJAH=(void *)((unsigned long)result__OJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MC3G)));
-        } else {
-          next__MJAH=new_lab__ARJ(new_size__MC3G);
-        };
-        ((__POINTER *)next__MJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NJAH)[ 0]=next__MJAH;
-      } else {
-        ((__POINTER *)result__OJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__OJAH=next__MJAH;
-      };
-    };
-    ((__POINTER *)result__OJAH)[ 0]=((__POINTER ) 3);
-    result__BC3G=(void *)((unsigned long)result__OJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__UODH,a__ZODH,new_size__VODH,new_size2__WODH,a__3ODH;
+  __UINTEGER_32 new_size__4ODH;
+  __POINTER result__TODH,ptr_table__ZVGH,next__YVGH,result__0VGH;
+  void *result__LBJH;
+  __INTEGER Self__0ZPF;
+  void **Result__DSJF;
+  sz__UODH=((__UINTEGER_32 )(__INTEGER)(nb_elements__0MFF * ((__INTEGER )(sizeof(void *)))));
+  result__TODH=((__POINTER )(NULL));
+  a__ZODH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VODH=(__UINTEGER_32)((__UINTEGER_32)(sz__UODH + a__ZODH) & (__UINTEGER_32)(~ a__ZODH));
+  new_size2__WODH=(__UINTEGER_32)(new_size__VODH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WODH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3ODH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4ODH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WODH + a__3ODH) & (__UINTEGER_32)(~ a__3ODH));
+    ptr_table__ZVGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4ODH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__YVGH=((__POINTER )(NULL));
+    result__0VGH=((__POINTER *)ptr_table__ZVGH)[ 0];
+    if ((result__0VGH == (void *)NULL)) {
+      result__0VGH=new_lab__MRJ(new_size__4ODH);
+      next__YVGH=(void *)((unsigned long)result__0VGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4ODH)));
+      ((__POINTER *)next__YVGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ZVGH)[ 0]=next__YVGH;
+    } else {
+      next__YVGH=((__POINTER *)result__0VGH)[ 0];
+      if ((next__YVGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0VGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4ODH <<  1)) <=  4096)) {
+          next__YVGH=(void *)((unsigned long)result__0VGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4ODH)));
+        } else {
+          next__YVGH=new_lab__MRJ(new_size__4ODH);
+        };
+        ((__POINTER *)next__YVGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZVGH)[ 0]=next__YVGH;
+      } else {
+        ((__POINTER *)result__0VGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YVGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__0VGH=next__YVGH;
+      };
+    };
+    ((__POINTER *)result__0VGH)[ 0]=((__POINTER ) 3);
+    result__TODH=(void *)((unsigned long)result__0VGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__NUCH=first_free__LDVB;
-    while ((((void *)result__NUCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__NUCH)->map_size_and_id__2SB &  4294967292LU) < new_size__DC3G))) {
-      result__NUCH=((__MEMORY *)result__NUCH)->map_next_free__3SB;
+    result__LBJH=first_free__XDVB;
+    while ((((void *)result__LBJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__LBJH)->map_size_and_id__ITB &  4294967292LU) < new_size__VODH))) {
+      result__LBJH=((__MEMORY *)result__LBJH)->map_next_free__JTB;
     };
-    if (((void *)result__NUCH == (void *)NULL)) {
-      result__NUCH=new_page__CA5();
+    if (((void *)result__LBJH == (void *)NULL)) {
+      result__LBJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__NUCH,new_size__DC3G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__NUCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__BC3G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NUCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__LBJH,new_size__VODH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__LBJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__TODH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__LBJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__B5IF=((void **)result__BC3G);
-  Self__VUPF=(__INTEGER)(nb_elements__AYEF -  1);
-  while ((Self__VUPF >=  0)) {
-    Result__B5IF[Self__VUPF]=NULL;
-    Self__VUPF=(__INTEGER)(Self__VUPF -  1);
+  Result__DSJF=((void **)result__TODH);
+  Self__0ZPF=(__INTEGER)(nb_elements__0MFF -  1);
+  while ((Self__0ZPF >=  0)) {
+    Result__DSJF[Self__0ZPF]=NULL;
+    Self__0ZPF=(__INTEGER)(Self__0ZPF -  1);
   };
-  return(Result__B5IF);
+  return(Result__DSJF);
 }
 
-static void** create__RNWF(__INTEGER nb_elements__TNWF)
+static void** create__CFXF(__INTEGER nb_elements__EFXF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__OC3G,a__TC3G,new_size__PC3G,new_size2__QC3G,a__XC3G;
-  __UINTEGER_32 new_size__YC3G;
-  __POINTER result__NC3G,ptr_table__SJAH,next__RJAH,result__TJAH;
-  void *result__QUCH;
-  __INTEGER Self__II3F;
-  void **Result__VZYF;
-  sz__OC3G=((__UINTEGER_32 )(__INTEGER)(nb_elements__TNWF * ((__INTEGER )(sizeof(void *)))));
-  result__NC3G=((__POINTER )(NULL));
-  a__TC3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__PC3G=(__UINTEGER_32)((__UINTEGER_32)(sz__OC3G + a__TC3G) & (__UINTEGER_32)(~ a__TC3G));
-  new_size2__QC3G=(__UINTEGER_32)(new_size__PC3G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__QC3G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__XC3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__YC3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QC3G + a__XC3G) & (__UINTEGER_32)(~ a__XC3G));
-    ptr_table__SJAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YC3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__RJAH=((__POINTER )(NULL));
-    result__TJAH=((__POINTER *)ptr_table__SJAH)[ 0];
-    if ((result__TJAH == (void *)NULL)) {
-      result__TJAH=new_lab__ARJ(new_size__YC3G);
-      next__RJAH=(void *)((unsigned long)result__TJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YC3G)));
-      ((__POINTER *)next__RJAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__SJAH)[ 0]=next__RJAH;
-    } else {
-      next__RJAH=((__POINTER *)result__TJAH)[ 0];
-      if ((next__RJAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TJAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__YC3G <<  1)) <=  4096)) {
-          next__RJAH=(void *)((unsigned long)result__TJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YC3G)));
-        } else {
-          next__RJAH=new_lab__ARJ(new_size__YC3G);
-        };
-        ((__POINTER *)next__RJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SJAH)[ 0]=next__RJAH;
-      } else {
-        ((__POINTER *)result__TJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__TJAH=next__RJAH;
-      };
-    };
-    ((__POINTER *)result__TJAH)[ 0]=((__POINTER ) 3);
-    result__NC3G=(void *)((unsigned long)result__TJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__APDH,a__FPDH,new_size__BPDH,new_size2__CPDH,a__JPDH;
+  __UINTEGER_32 new_size__KPDH;
+  __POINTER result__5ODH,ptr_table__4VGH,next__3VGH,result__5VGH;
+  void *result__OBJH;
+  __INTEGER Self__CW4F;
+  void **Result__SUZF;
+  sz__APDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__EFXF * ((__INTEGER )(sizeof(void *)))));
+  result__5ODH=((__POINTER )(NULL));
+  a__FPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__BPDH=(__UINTEGER_32)((__UINTEGER_32)(sz__APDH + a__FPDH) & (__UINTEGER_32)(~ a__FPDH));
+  new_size2__CPDH=(__UINTEGER_32)(new_size__BPDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__CPDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__JPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KPDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CPDH + a__JPDH) & (__UINTEGER_32)(~ a__JPDH));
+    ptr_table__4VGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KPDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__3VGH=((__POINTER )(NULL));
+    result__5VGH=((__POINTER *)ptr_table__4VGH)[ 0];
+    if ((result__5VGH == (void *)NULL)) {
+      result__5VGH=new_lab__MRJ(new_size__KPDH);
+      next__3VGH=(void *)((unsigned long)result__5VGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPDH)));
+      ((__POINTER *)next__3VGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__4VGH)[ 0]=next__3VGH;
+    } else {
+      next__3VGH=((__POINTER *)result__5VGH)[ 0];
+      if ((next__3VGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5VGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KPDH <<  1)) <=  4096)) {
+          next__3VGH=(void *)((unsigned long)result__5VGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPDH)));
+        } else {
+          next__3VGH=new_lab__MRJ(new_size__KPDH);
+        };
+        ((__POINTER *)next__3VGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4VGH)[ 0]=next__3VGH;
+      } else {
+        ((__POINTER *)result__5VGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__5VGH=next__3VGH;
+      };
+    };
+    ((__POINTER *)result__5VGH)[ 0]=((__POINTER ) 3);
+    result__5ODH=(void *)((unsigned long)result__5VGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__QUCH=first_free__LDVB;
-    while ((((void *)result__QUCH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QUCH)->map_size_and_id__2SB &  4294967292LU) < new_size__PC3G))) {
-      result__QUCH=((__MEMORY *)result__QUCH)->map_next_free__3SB;
+    result__OBJH=first_free__XDVB;
+    while ((((void *)result__OBJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OBJH)->map_size_and_id__ITB &  4294967292LU) < new_size__BPDH))) {
+      result__OBJH=((__MEMORY *)result__OBJH)->map_next_free__JTB;
     };
-    if (((void *)result__QUCH == (void *)NULL)) {
-      result__QUCH=new_page__CA5();
+    if (((void *)result__OBJH == (void *)NULL)) {
+      result__OBJH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__QUCH,new_size__PC3G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QUCH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__NC3G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QUCH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__OBJH,new_size__BPDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OBJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__5ODH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OBJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__VZYF=((void **)result__NC3G);
-  Self__II3F=(__INTEGER)(nb_elements__TNWF -  1);
-  while ((Self__II3F >=  0)) {
-    Result__VZYF[Self__II3F]=NULL;
-    Self__II3F=(__INTEGER)(Self__II3F -  1);
+  Result__SUZF=((void **)result__5ODH);
+  Self__CW4F=(__INTEGER)(nb_elements__EFXF -  1);
+  while ((Self__CW4F >=  0)) {
+    Result__SUZF[Self__CW4F]=NULL;
+    Self__CW4F=(__INTEGER)(Self__CW4F -  1);
   };
-  return(Result__VZYF);
+  return(Result__SUZF);
 }
 
-static void** create__5KIE(__INTEGER nb_elements__BLIE)
+static void** create__I0IE(__INTEGER nb_elements__K0IE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__GOJB,a__1C3G,new_size__IOJB,new_size2__LOJB,a__5C3G;
-  __UINTEGER_32 new_size__AD3G;
-  __POINTER result__OOJB,ptr_table__XJAH,next__WJAH,result__YJAH;
-  void *result__MCVB;
-  __INTEGER Self__MLXE;
-  void **Result__ZKNE;
-  sz__GOJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__BLIE * ((__INTEGER )(sizeof(void *)))));
-  result__OOJB=((__POINTER )(NULL));
-  a__1C3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__IOJB=(__UINTEGER_32)((__UINTEGER_32)(sz__GOJB + a__1C3G) & (__UINTEGER_32)(~ a__1C3G));
-  new_size2__LOJB=(__UINTEGER_32)(new_size__IOJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__LOJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__5C3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__AD3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LOJB + a__5C3G) & (__UINTEGER_32)(~ a__5C3G));
-    ptr_table__XJAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AD3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__WJAH=((__POINTER )(NULL));
-    result__YJAH=((__POINTER *)ptr_table__XJAH)[ 0];
-    if ((result__YJAH == (void *)NULL)) {
-      result__YJAH=new_lab__ARJ(new_size__AD3G);
-      next__WJAH=(void *)((unsigned long)result__YJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AD3G)));
-      ((__POINTER *)next__WJAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__XJAH)[ 0]=next__WJAH;
-    } else {
-      next__WJAH=((__POINTER *)result__YJAH)[ 0];
-      if ((next__WJAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YJAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AD3G <<  1)) <=  4096)) {
-          next__WJAH=(void *)((unsigned long)result__YJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AD3G)));
-        } else {
-          next__WJAH=new_lab__ARJ(new_size__AD3G);
-        };
-        ((__POINTER *)next__WJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XJAH)[ 0]=next__WJAH;
-      } else {
-        ((__POINTER *)result__YJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__YJAH=next__WJAH;
-      };
-    };
-    ((__POINTER *)result__YJAH)[ 0]=((__POINTER ) 3);
-    result__OOJB=(void *)((unsigned long)result__YJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__SOJB,a__NPDH,new_size__UOJB,new_size2__XOJB,a__RPDH;
+  __UINTEGER_32 new_size__SPDH;
+  __POINTER result__0OJB,ptr_table__DWGH,next__CWGH,result__EWGH;
+  void *result__YCVB;
+  __INTEGER Self__DBYE;
+  void **Result__10NE;
+  sz__SOJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__K0IE * ((__INTEGER )(sizeof(void *)))));
+  result__0OJB=((__POINTER )(NULL));
+  a__NPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__UOJB=(__UINTEGER_32)((__UINTEGER_32)(sz__SOJB + a__NPDH) & (__UINTEGER_32)(~ a__NPDH));
+  new_size2__XOJB=(__UINTEGER_32)(new_size__UOJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__XOJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SPDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XOJB + a__RPDH) & (__UINTEGER_32)(~ a__RPDH));
+    ptr_table__DWGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SPDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__CWGH=((__POINTER )(NULL));
+    result__EWGH=((__POINTER *)ptr_table__DWGH)[ 0];
+    if ((result__EWGH == (void *)NULL)) {
+      result__EWGH=new_lab__MRJ(new_size__SPDH);
+      next__CWGH=(void *)((unsigned long)result__EWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SPDH)));
+      ((__POINTER *)next__CWGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DWGH)[ 0]=next__CWGH;
+    } else {
+      next__CWGH=((__POINTER *)result__EWGH)[ 0];
+      if ((next__CWGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EWGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SPDH <<  1)) <=  4096)) {
+          next__CWGH=(void *)((unsigned long)result__EWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SPDH)));
+        } else {
+          next__CWGH=new_lab__MRJ(new_size__SPDH);
+        };
+        ((__POINTER *)next__CWGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DWGH)[ 0]=next__CWGH;
+      } else {
+        ((__POINTER *)result__EWGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__EWGH=next__CWGH;
+      };
+    };
+    ((__POINTER *)result__EWGH)[ 0]=((__POINTER ) 3);
+    result__0OJB=(void *)((unsigned long)result__EWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__MCVB=first_free__LDVB;
-    while ((((void *)result__MCVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MCVB)->map_size_and_id__2SB &  4294967292LU) < new_size__IOJB))) {
-      result__MCVB=((__MEMORY *)result__MCVB)->map_next_free__3SB;
+    result__YCVB=first_free__XDVB;
+    while ((((void *)result__YCVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YCVB)->map_size_and_id__ITB &  4294967292LU) < new_size__UOJB))) {
+      result__YCVB=((__MEMORY *)result__YCVB)->map_next_free__JTB;
     };
-    if (((void *)result__MCVB == (void *)NULL)) {
-      result__MCVB=new_page__CA5();
+    if (((void *)result__YCVB == (void *)NULL)) {
+      result__YCVB=new_page__OA5();
     };
-    to_busy__index__HTFC(result__MCVB,new_size__IOJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MCVB)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__OOJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MCVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__YCVB,new_size__UOJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YCVB)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__0OJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YCVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__ZKNE=((void **)result__OOJB);
-  Self__MLXE=(__INTEGER)(nb_elements__BLIE -  1);
-  while ((Self__MLXE >=  0)) {
-    Result__ZKNE[Self__MLXE]=NULL;
-    Self__MLXE=(__INTEGER)(Self__MLXE -  1);
+  Result__10NE=((void **)result__0OJB);
+  Self__DBYE=(__INTEGER)(nb_elements__K0IE -  1);
+  while ((Self__DBYE >=  0)) {
+    Result__10NE[Self__DBYE]=NULL;
+    Self__DBYE=(__INTEGER)(Self__DBYE -  1);
   };
-  return(Result__ZKNE);
+  return(Result__10NE);
 }
 
-static void* new_page__CA5()
+static void* new_page__OA5()
 // () With resultNo recursive, No inlinable.
 {
-  __UINTEGER_64 cap__F1SB,old_size__FA5;
-  __POINTER mem__I1SB;
-  void *block__LA5;
-  if ((capacity_max__MA5 ==  0)) {
-    mem__I1SB=((__POINTER )(NULL));
-    cap__F1SB= 33554432;
+  __UINTEGER_64 cap__R1SB,old_size__RA5;
+  __POINTER mem__U1SB;
+  void *block__XA5;
+  if ((capacity_max__YA5 ==  0)) {
+    mem__U1SB=((__POINTER )(NULL));
+    cap__R1SB= 33554432;
     do {
-      cap__F1SB=(__UINTEGER_64)(cap__F1SB <<  1);
-      mem__I1SB=((__POINTER )(malloc((cap__F1SB))));
-      if ((mem__I1SB != (void *)NULL)) {
-        free((mem__I1SB));
-      };
-    } while ((! ((mem__I1SB == (void *)NULL) || (cap__F1SB == ((__UINTEGER_64 )(2048LU << 20))))));
-    if ((mem__I1SB == (void *)NULL)) {
-      cap__F1SB=(__UINTEGER_64)(cap__F1SB >>  1);
-    };
-    get_begin_memory__2BQB=((__POINTER )(malloc((cap__F1SB))));
-    capacity_max__MA5=cap__F1SB;
-    begin_memory__DVH=get_begin_memory__2BQB;
-  };
-  old_size__FA5=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__SRJ <<  26));
-  nb_page__SRJ=(__UINTEGER_32)(nb_page__SRJ +  1);
-  if (((__UINTEGER_64)(old_size__FA5 +  67108864) > capacity_max__MA5)) {
-    print__KHD((&__string_174));
+      cap__R1SB=(__UINTEGER_64)(cap__R1SB <<  1);
+      mem__U1SB=((__POINTER )(malloc((cap__R1SB))));
+      if ((mem__U1SB != (void *)NULL)) {
+        free((mem__U1SB));
+      };
+    } while ((! ((mem__U1SB == (void *)NULL) || (cap__R1SB == ((__UINTEGER_64 )(2048LU << 20))))));
+    if ((mem__U1SB == (void *)NULL)) {
+      cap__R1SB=(__UINTEGER_64)(cap__R1SB >>  1);
+    };
+    get_begin_memory__ICQB=((__POINTER )(malloc((cap__R1SB))));
+    capacity_max__YA5=cap__R1SB;
+    begin_memory__PVH=get_begin_memory__ICQB;
+  };
+  old_size__RA5=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__4RJ <<  26));
+  nb_page__4RJ=(__UINTEGER_32)(nb_page__4RJ +  1);
+  if (((__UINTEGER_64)(old_size__RA5 +  67108864) > capacity_max__YA5)) {
+    print__WHD((&__string_184));
     exit(( 1));
   };
-  block__LA5=((void *)(void *)((unsigned long)begin_memory__DVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__FA5)))));
-  ((__MEMORY *)block__LA5)->map_previous_linear__1SB= 4294967295LU;
-  ((__MEMORY *)block__LA5)->map_size_and_id__2SB= 67108858;
-  ((__MEMORY *)block__LA5)->map_next_free__3SB=first_free__LDVB;
-  ((__MEMORY *)block__LA5)->map_previous_free__4SB=NULL;
-  if (((void *)first_free__LDVB != (void *)NULL)) {
-    ((__MEMORY *)first_free__LDVB)->map_previous_free__4SB=block__LA5;
-  };
-  first_free__LDVB=block__LA5;
-  last_block[((__UINTEGER_32)(nb_page__SRJ -  1))] = (block__LA5);
-  return(block__LA5);
+  block__XA5=((void *)(void *)((unsigned long)begin_memory__PVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__RA5)))));
+  ((__MEMORY *)block__XA5)->map_previous_linear__HTB= 4294967295LU;
+  ((__MEMORY *)block__XA5)->map_size_and_id__ITB= 67108858;
+  ((__MEMORY *)block__XA5)->map_next_free__JTB=first_free__XDVB;
+  ((__MEMORY *)block__XA5)->map_previous_free__KTB=NULL;
+  if (((void *)first_free__XDVB != (void *)NULL)) {
+    ((__MEMORY *)first_free__XDVB)->map_previous_free__KTB=block__XA5;
+  };
+  first_free__XDVB=block__XA5;
+  last_block[((__UINTEGER_32)(nb_page__4RJ -  1))] = (block__XA5);
+  return(block__XA5);
 }
 
-static void to_busy__index__HTFC(__MEMORY *Self__ITFC,__UINTEGER_32 sz__JTFC,__UINTEGER_32 idx__KTFC)
+static void to_busy__index__TTFC(__MEMORY *Self__UTFC,__UINTEGER_32 sz__VTFC,__UINTEGER_32 idx__WTFC)
 // ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  void *new__RTFC,*prev__3COC,*next__4COC;
-  __UINTEGER_32 siz__LTFC,new_size__OTFC;
-  __MEMORY *Self__XRCC,*Self__QNYG;
-  new__RTFC=NULL;
-  prev__3COC=Self__ITFC->map_previous_free__4SB;
-  next__4COC=Self__ITFC->map_next_free__3SB;
-  if (((void *)prev__3COC == (void *)NULL)) {
-    first_free__LDVB=next__4COC;
+  void *new__3TFC,*prev__JDOC,*next__KDOC;
+  __UINTEGER_32 siz__XTFC,new_size__0TFC;
+  __MEMORY *Self__DSCC,*Self__PK4G;
+  new__3TFC=NULL;
+  prev__JDOC=Self__UTFC->map_previous_free__KTB;
+  next__KDOC=Self__UTFC->map_next_free__JTB;
+  if (((void *)prev__JDOC == (void *)NULL)) {
+    first_free__XDVB=next__KDOC;
   } else {
-    ((__MEMORY *)prev__3COC)->map_next_free__3SB=next__4COC;
+    ((__MEMORY *)prev__JDOC)->map_next_free__JTB=next__KDOC;
   };
-  if (((void *)next__4COC != (void *)NULL)) {
-    ((__MEMORY *)next__4COC)->map_previous_free__4SB=prev__3COC;
+  if (((void *)next__KDOC != (void *)NULL)) {
+    ((__MEMORY *)next__KDOC)->map_previous_free__KTB=prev__JDOC;
   };
-  siz__LTFC=Self__ITFC->map_size_and_id__2SB;
-  new_size__OTFC=(__UINTEGER_32)(siz__LTFC - sz__JTFC);
-  if ((new_size__OTFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
-    siz__LTFC=sz__JTFC;
-    new__RTFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ITFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__JTFC))));
-    ((__MEMORY *)new__RTFC)->map_previous_linear__1SB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__ITFC) - (unsigned long)begin_memory__DVH))));
-    ((__MEMORY *)new__RTFC)->map_size_and_id__2SB=(__UINTEGER_32)(new_size__OTFC -  8);
-    Self__XRCC=((__MEMORY *)new__RTFC);
-    Self__XRCC->map_next_free__3SB=first_free__LDVB;
-    Self__XRCC->map_previous_free__4SB=NULL;
-    if (((void *)first_free__LDVB != (void *)NULL)) {
-      ((__MEMORY *)first_free__LDVB)->map_previous_free__4SB=Self__XRCC;
+  siz__XTFC=Self__UTFC->map_size_and_id__ITB;
+  new_size__0TFC=(__UINTEGER_32)(siz__XTFC - sz__VTFC);
+  if ((new_size__0TFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
+    siz__XTFC=sz__VTFC;
+    new__3TFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__UTFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__VTFC))));
+    ((__MEMORY *)new__3TFC)->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__UTFC) - (unsigned long)begin_memory__PVH))));
+    ((__MEMORY *)new__3TFC)->map_size_and_id__ITB=(__UINTEGER_32)(new_size__0TFC -  8);
+    Self__DSCC=((__MEMORY *)new__3TFC);
+    Self__DSCC->map_next_free__JTB=first_free__XDVB;
+    Self__DSCC->map_previous_free__KTB=NULL;
+    if (((void *)first_free__XDVB != (void *)NULL)) {
+      ((__MEMORY *)first_free__XDVB)->map_previous_free__KTB=Self__DSCC;
     };
-    first_free__LDVB=Self__XRCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__RTFC)->map_size_and_id__2SB &  2) !=  0)) {
-      last_block[(idx__KTFC)] = (new__RTFC);
+    first_free__XDVB=Self__DSCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__3TFC)->map_size_and_id__ITB &  2) !=  0)) {
+      last_block[(idx__WTFC)] = (new__3TFC);
     } else {
-      Self__QNYG=((__MEMORY *)new__RTFC);
-      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__QNYG) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__QNYG->map_size_and_id__2SB &  4294967292LU))))))->map_previous_linear__1SB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__RTFC)) - (unsigned long)begin_memory__DVH))));
+      Self__PK4G=((__MEMORY *)new__3TFC);
+      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__PK4G) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__PK4G->map_size_and_id__ITB &  4294967292LU))))))->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__3TFC)) - (unsigned long)begin_memory__PVH))));
+    };
+  };
+  Self__UTFC->map_size_and_id__ITB=(__UINTEGER_32)(siz__XTFC |  1);
+}
+
+static void** create__31XC(__INTEGER nb_elements__51XC)
+// ({INTEGER}) With resultNo recursive, No inlinable.
+{
+  __UINTEGER_32 sz__WRBH,a__VPDH,new_size__XRBH,new_size2__YRBH,a__ZPDH;
+  __UINTEGER_32 new_size__0PDH;
+  __POINTER result__VRBH,ptr_table__IWGH,next__HWGH,result__JWGH;
+  void *result__MWGH;
+  __INTEGER Self__FSWD;
+  void **Result__5S5C;
+  sz__WRBH=((__UINTEGER_32 )(__INTEGER)(nb_elements__51XC * ((__INTEGER )(sizeof(void *)))));
+  result__VRBH=((__POINTER )(NULL));
+  a__VPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__XRBH=(__UINTEGER_32)((__UINTEGER_32)(sz__WRBH + a__VPDH) & (__UINTEGER_32)(~ a__VPDH));
+  new_size2__YRBH=(__UINTEGER_32)(new_size__XRBH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__YRBH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0PDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__YRBH + a__ZPDH) & (__UINTEGER_32)(~ a__ZPDH));
+    ptr_table__IWGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0PDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HWGH=((__POINTER )(NULL));
+    result__JWGH=((__POINTER *)ptr_table__IWGH)[ 0];
+    if ((result__JWGH == (void *)NULL)) {
+      result__JWGH=new_lab__MRJ(new_size__0PDH);
+      next__HWGH=(void *)((unsigned long)result__JWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0PDH)));
+      ((__POINTER *)next__HWGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IWGH)[ 0]=next__HWGH;
+    } else {
+      next__HWGH=((__POINTER *)result__JWGH)[ 0];
+      if ((next__HWGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JWGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0PDH <<  1)) <=  4096)) {
+          next__HWGH=(void *)((unsigned long)result__JWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0PDH)));
+        } else {
+          next__HWGH=new_lab__MRJ(new_size__0PDH);
+        };
+        ((__POINTER *)next__HWGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IWGH)[ 0]=next__HWGH;
+      } else {
+        ((__POINTER *)result__JWGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HWGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JWGH=next__HWGH;
+      };
+    };
+    ((__POINTER *)result__JWGH)[ 0]=((__POINTER ) 3);
+    result__VRBH=(void *)((unsigned long)result__JWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  } else {
+    result__MWGH=first_free__XDVB;
+    while ((((void *)result__MWGH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MWGH)->map_size_and_id__ITB &  4294967292LU) < new_size__XRBH))) {
+      result__MWGH=((__MEMORY *)result__MWGH)->map_next_free__JTB;
     };
+    if (((void *)result__MWGH == (void *)NULL)) {
+      result__MWGH=new_page__OA5();
+    };
+    to_busy__index__TTFC(result__MWGH,new_size__XRBH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MWGH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__VRBH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MWGH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__5S5C=((void **)result__VRBH);
+  Self__FSWD=(__INTEGER)(nb_elements__51XC -  1);
+  while ((Self__FSWD >=  0)) {
+    Result__5S5C[Self__FSWD]=NULL;
+    Self__FSWD=(__INTEGER)(Self__FSWD -  1);
   };
-  Self__ITFC->map_size_and_id__2SB=(__UINTEGER_32)(siz__LTFC |  1);
+  return(Result__5S5C);
 }
 
-static void** create__R1XC(__INTEGER nb_elements__T1XC)
+static void** create__ABYC(__INTEGER nb_elements__CBYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__QI1G,a__DD3G,new_size__RI1G,new_size2__SI1G,a__HD3G;
-  __UINTEGER_32 new_size__ID3G;
-  __POINTER result__PI1G,ptr_table__2JAH,next__1JAH,result__3JAH;
-  void *result__AKAH;
-  __INTEGER Self__MRWD;
-  void **Result__TS5C;
-  sz__QI1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__T1XC * ((__INTEGER )(sizeof(void *)))));
-  result__PI1G=((__POINTER )(NULL));
-  a__DD3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__RI1G=(__UINTEGER_32)((__UINTEGER_32)(sz__QI1G + a__DD3G) & (__UINTEGER_32)(~ a__DD3G));
-  new_size2__SI1G=(__UINTEGER_32)(new_size__RI1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__SI1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__HD3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__ID3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SI1G + a__HD3G) & (__UINTEGER_32)(~ a__HD3G));
-    ptr_table__2JAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ID3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__1JAH=((__POINTER )(NULL));
-    result__3JAH=((__POINTER *)ptr_table__2JAH)[ 0];
-    if ((result__3JAH == (void *)NULL)) {
-      result__3JAH=new_lab__ARJ(new_size__ID3G);
-      next__1JAH=(void *)((unsigned long)result__3JAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ID3G)));
-      ((__POINTER *)next__1JAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__2JAH)[ 0]=next__1JAH;
-    } else {
-      next__1JAH=((__POINTER *)result__3JAH)[ 0];
-      if ((next__1JAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3JAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ID3G <<  1)) <=  4096)) {
-          next__1JAH=(void *)((unsigned long)result__3JAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ID3G)));
-        } else {
-          next__1JAH=new_lab__ARJ(new_size__ID3G);
-        };
-        ((__POINTER *)next__1JAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2JAH)[ 0]=next__1JAH;
-      } else {
-        ((__POINTER *)result__3JAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1JAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__3JAH=next__1JAH;
-      };
-    };
-    ((__POINTER *)result__3JAH)[ 0]=((__POINTER ) 3);
-    result__PI1G=(void *)((unsigned long)result__3JAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__0RBH,a__AQDH,new_size__1RBH,new_size2__2RBH,a__EQDH;
+  __UINTEGER_32 new_size__FQDH;
+  __POINTER result__ZRBH,ptr_table__QWGH,next__PWGH,result__RWGH;
+  void *result__UWGH;
+  __INTEGER Self__5VWD;
+  void **Result__JY5C;
+  sz__0RBH=((__UINTEGER_32 )(__INTEGER)(nb_elements__CBYC * ((__INTEGER )(sizeof(void *)))));
+  result__ZRBH=((__POINTER )(NULL));
+  a__AQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__1RBH=(__UINTEGER_32)((__UINTEGER_32)(sz__0RBH + a__AQDH) & (__UINTEGER_32)(~ a__AQDH));
+  new_size2__2RBH=(__UINTEGER_32)(new_size__1RBH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__2RBH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FQDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2RBH + a__EQDH) & (__UINTEGER_32)(~ a__EQDH));
+    ptr_table__QWGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FQDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PWGH=((__POINTER )(NULL));
+    result__RWGH=((__POINTER *)ptr_table__QWGH)[ 0];
+    if ((result__RWGH == (void *)NULL)) {
+      result__RWGH=new_lab__MRJ(new_size__FQDH);
+      next__PWGH=(void *)((unsigned long)result__RWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FQDH)));
+      ((__POINTER *)next__PWGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QWGH)[ 0]=next__PWGH;
+    } else {
+      next__PWGH=((__POINTER *)result__RWGH)[ 0];
+      if ((next__PWGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RWGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FQDH <<  1)) <=  4096)) {
+          next__PWGH=(void *)((unsigned long)result__RWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FQDH)));
+        } else {
+          next__PWGH=new_lab__MRJ(new_size__FQDH);
+        };
+        ((__POINTER *)next__PWGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QWGH)[ 0]=next__PWGH;
+      } else {
+        ((__POINTER *)result__RWGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PWGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RWGH=next__PWGH;
+      };
+    };
+    ((__POINTER *)result__RWGH)[ 0]=((__POINTER ) 3);
+    result__ZRBH=(void *)((unsigned long)result__RWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__AKAH=first_free__LDVB;
-    while ((((void *)result__AKAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__AKAH)->map_size_and_id__2SB &  4294967292LU) < new_size__RI1G))) {
-      result__AKAH=((__MEMORY *)result__AKAH)->map_next_free__3SB;
+    result__UWGH=first_free__XDVB;
+    while ((((void *)result__UWGH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UWGH)->map_size_and_id__ITB &  4294967292LU) < new_size__1RBH))) {
+      result__UWGH=((__MEMORY *)result__UWGH)->map_next_free__JTB;
     };
-    if (((void *)result__AKAH == (void *)NULL)) {
-      result__AKAH=new_page__CA5();
+    if (((void *)result__UWGH == (void *)NULL)) {
+      result__UWGH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__AKAH,new_size__RI1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__AKAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__PI1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__AKAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__UWGH,new_size__1RBH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UWGH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__ZRBH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UWGH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__TS5C=((void **)result__PI1G);
-  Self__MRWD=(__INTEGER)(nb_elements__T1XC -  1);
-  while ((Self__MRWD >=  0)) {
-    Result__TS5C[Self__MRWD]=NULL;
-    Self__MRWD=(__INTEGER)(Self__MRWD -  1);
+  Result__JY5C=((void **)result__ZRBH);
+  Self__5VWD=(__INTEGER)(nb_elements__CBYC -  1);
+  while ((Self__5VWD >=  0)) {
+    Result__JY5C[Self__5VWD]=NULL;
+    Self__5VWD=(__INTEGER)(Self__5VWD -  1);
   };
-  return(Result__TS5C);
+  return(Result__JY5C);
 }
 
-static void** create__UAYC(__INTEGER nb_elements__WAYC)
+static void** create__ELBD(__INTEGER nb_elements__GLBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__UI1G,a__OD3G,new_size__VI1G,new_size2__WI1G,a__SD3G;
-  __UINTEGER_32 new_size__TD3G;
-  __POINTER result__TI1G,ptr_table__EKAH,next__DKAH,result__FKAH;
-  void *result__IKAH;
-  __INTEGER Self__GVWD;
-  void **Result__3X5C;
-  sz__UI1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__WAYC * ((__INTEGER )(sizeof(void *)))));
-  result__TI1G=((__POINTER )(NULL));
-  a__OD3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__VI1G=(__UINTEGER_32)((__UINTEGER_32)(sz__UI1G + a__OD3G) & (__UINTEGER_32)(~ a__OD3G));
-  new_size2__WI1G=(__UINTEGER_32)(new_size__VI1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__WI1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__SD3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__TD3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WI1G + a__SD3G) & (__UINTEGER_32)(~ a__SD3G));
-    ptr_table__EKAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TD3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__DKAH=((__POINTER )(NULL));
-    result__FKAH=((__POINTER *)ptr_table__EKAH)[ 0];
-    if ((result__FKAH == (void *)NULL)) {
-      result__FKAH=new_lab__ARJ(new_size__TD3G);
-      next__DKAH=(void *)((unsigned long)result__FKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TD3G)));
-      ((__POINTER *)next__DKAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__EKAH)[ 0]=next__DKAH;
-    } else {
-      next__DKAH=((__POINTER *)result__FKAH)[ 0];
-      if ((next__DKAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FKAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TD3G <<  1)) <=  4096)) {
-          next__DKAH=(void *)((unsigned long)result__FKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TD3G)));
-        } else {
-          next__DKAH=new_lab__ARJ(new_size__TD3G);
-        };
-        ((__POINTER *)next__DKAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EKAH)[ 0]=next__DKAH;
-      } else {
-        ((__POINTER *)result__FKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__FKAH=next__DKAH;
-      };
-    };
-    ((__POINTER *)result__FKAH)[ 0]=((__POINTER ) 3);
-    result__TI1G=(void *)((unsigned long)result__FKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__4RBH,a__LQDH,new_size__5RBH,new_size2__ASBH,a__PQDH;
+  __UINTEGER_32 new_size__QQDH;
+  __POINTER result__3RBH,ptr_table__YWGH,next__XWGH,result__ZWGH;
+  void *result__2WGH;
+  __INTEGER Self__KEXD;
+  void **Result__BAGD;
+  sz__4RBH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GLBD * ((__INTEGER )(sizeof(void *)))));
+  result__3RBH=((__POINTER )(NULL));
+  a__LQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__5RBH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RBH + a__LQDH) & (__UINTEGER_32)(~ a__LQDH));
+  new_size2__ASBH=(__UINTEGER_32)(new_size__5RBH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ASBH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QQDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ASBH + a__PQDH) & (__UINTEGER_32)(~ a__PQDH));
+    ptr_table__YWGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QQDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XWGH=((__POINTER )(NULL));
+    result__ZWGH=((__POINTER *)ptr_table__YWGH)[ 0];
+    if ((result__ZWGH == (void *)NULL)) {
+      result__ZWGH=new_lab__MRJ(new_size__QQDH);
+      next__XWGH=(void *)((unsigned long)result__ZWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QQDH)));
+      ((__POINTER *)next__XWGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YWGH)[ 0]=next__XWGH;
+    } else {
+      next__XWGH=((__POINTER *)result__ZWGH)[ 0];
+      if ((next__XWGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZWGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QQDH <<  1)) <=  4096)) {
+          next__XWGH=(void *)((unsigned long)result__ZWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QQDH)));
+        } else {
+          next__XWGH=new_lab__MRJ(new_size__QQDH);
+        };
+        ((__POINTER *)next__XWGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YWGH)[ 0]=next__XWGH;
+      } else {
+        ((__POINTER *)result__ZWGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XWGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZWGH=next__XWGH;
+      };
+    };
+    ((__POINTER *)result__ZWGH)[ 0]=((__POINTER ) 3);
+    result__3RBH=(void *)((unsigned long)result__ZWGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__IKAH=first_free__LDVB;
-    while ((((void *)result__IKAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__IKAH)->map_size_and_id__2SB &  4294967292LU) < new_size__VI1G))) {
-      result__IKAH=((__MEMORY *)result__IKAH)->map_next_free__3SB;
+    result__2WGH=first_free__XDVB;
+    while ((((void *)result__2WGH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2WGH)->map_size_and_id__ITB &  4294967292LU) < new_size__5RBH))) {
+      result__2WGH=((__MEMORY *)result__2WGH)->map_next_free__JTB;
     };
-    if (((void *)result__IKAH == (void *)NULL)) {
-      result__IKAH=new_page__CA5();
+    if (((void *)result__2WGH == (void *)NULL)) {
+      result__2WGH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__IKAH,new_size__VI1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__IKAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__TI1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__IKAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__2WGH,new_size__5RBH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2WGH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__3RBH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2WGH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__3X5C=((void **)result__TI1G);
-  Self__GVWD=(__INTEGER)(nb_elements__WAYC -  1);
-  while ((Self__GVWD >=  0)) {
-    Result__3X5C[Self__GVWD]=NULL;
-    Self__GVWD=(__INTEGER)(Self__GVWD -  1);
+  Result__BAGD=((void **)result__3RBH);
+  Self__KEXD=(__INTEGER)(nb_elements__GLBD -  1);
+  while ((Self__KEXD >=  0)) {
+    Result__BAGD[Self__KEXD]=NULL;
+    Self__KEXD=(__INTEGER)(Self__KEXD -  1);
   };
-  return(Result__3X5C);
+  return(Result__BAGD);
 }
 
-static void** create__YKBD(__INTEGER nb_elements__0KBD)
+static void** create__5FEF(__INTEGER nb_elements__BGEF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YI1G,a__ZD3G,new_size__ZI1G,new_size2__0I1G,a__3D3G;
-  __UINTEGER_32 new_size__4D3G;
-  __POINTER result__XI1G,ptr_table__MKAH,next__LKAH,result__NKAH;
-  void *result__QKAH;
-  __INTEGER Self__RDXD;
-  void **Result__V5FD;
-  sz__YI1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__0KBD * ((__INTEGER )(sizeof(void *)))));
-  result__XI1G=((__POINTER )(NULL));
-  a__ZD3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZI1G=(__UINTEGER_32)((__UINTEGER_32)(sz__YI1G + a__ZD3G) & (__UINTEGER_32)(~ a__ZD3G));
-  new_size2__0I1G=(__UINTEGER_32)(new_size__ZI1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0I1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__3D3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__4D3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0I1G + a__3D3G) & (__UINTEGER_32)(~ a__3D3G));
-    ptr_table__MKAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4D3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__LKAH=((__POINTER )(NULL));
-    result__NKAH=((__POINTER *)ptr_table__MKAH)[ 0];
-    if ((result__NKAH == (void *)NULL)) {
-      result__NKAH=new_lab__ARJ(new_size__4D3G);
-      next__LKAH=(void *)((unsigned long)result__NKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4D3G)));
-      ((__POINTER *)next__LKAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__MKAH)[ 0]=next__LKAH;
-    } else {
-      next__LKAH=((__POINTER *)result__NKAH)[ 0];
-      if ((next__LKAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NKAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4D3G <<  1)) <=  4096)) {
-          next__LKAH=(void *)((unsigned long)result__NKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4D3G)));
-        } else {
-          next__LKAH=new_lab__ARJ(new_size__4D3G);
-        };
-        ((__POINTER *)next__LKAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MKAH)[ 0]=next__LKAH;
-      } else {
-        ((__POINTER *)result__NKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__NKAH=next__LKAH;
-      };
-    };
-    ((__POINTER *)result__NKAH)[ 0]=((__POINTER ) 3);
-    result__XI1G=(void *)((unsigned long)result__NKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__CSBH,a__WQDH,new_size__DSBH,new_size2__ESBH,a__0QDH;
+  __UINTEGER_32 new_size__1QDH;
+  __POINTER result__BSBH,ptr_table__AXGH,next__5WGH,result__BXGH;
+  void *result__EXGH;
+  __INTEGER Self__VXPF;
+  void **Result__JVIF;
+  sz__CSBH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BGEF * ((__INTEGER )(sizeof(void *)))));
+  result__BSBH=((__POINTER )(NULL));
+  a__WQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__DSBH=(__UINTEGER_32)((__UINTEGER_32)(sz__CSBH + a__WQDH) & (__UINTEGER_32)(~ a__WQDH));
+  new_size2__ESBH=(__UINTEGER_32)(new_size__DSBH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ESBH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0QDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1QDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ESBH + a__0QDH) & (__UINTEGER_32)(~ a__0QDH));
+    ptr_table__AXGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1QDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__5WGH=((__POINTER )(NULL));
+    result__BXGH=((__POINTER *)ptr_table__AXGH)[ 0];
+    if ((result__BXGH == (void *)NULL)) {
+      result__BXGH=new_lab__MRJ(new_size__1QDH);
+      next__5WGH=(void *)((unsigned long)result__BXGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1QDH)));
+      ((__POINTER *)next__5WGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__AXGH)[ 0]=next__5WGH;
+    } else {
+      next__5WGH=((__POINTER *)result__BXGH)[ 0];
+      if ((next__5WGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BXGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1QDH <<  1)) <=  4096)) {
+          next__5WGH=(void *)((unsigned long)result__BXGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1QDH)));
+        } else {
+          next__5WGH=new_lab__MRJ(new_size__1QDH);
+        };
+        ((__POINTER *)next__5WGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AXGH)[ 0]=next__5WGH;
+      } else {
+        ((__POINTER *)result__BXGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5WGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__BXGH=next__5WGH;
+      };
+    };
+    ((__POINTER *)result__BXGH)[ 0]=((__POINTER ) 3);
+    result__BSBH=(void *)((unsigned long)result__BXGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__QKAH=first_free__LDVB;
-    while ((((void *)result__QKAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QKAH)->map_size_and_id__2SB &  4294967292LU) < new_size__ZI1G))) {
-      result__QKAH=((__MEMORY *)result__QKAH)->map_next_free__3SB;
+    result__EXGH=first_free__XDVB;
+    while ((((void *)result__EXGH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EXGH)->map_size_and_id__ITB &  4294967292LU) < new_size__DSBH))) {
+      result__EXGH=((__MEMORY *)result__EXGH)->map_next_free__JTB;
     };
-    if (((void *)result__QKAH == (void *)NULL)) {
-      result__QKAH=new_page__CA5();
+    if (((void *)result__EXGH == (void *)NULL)) {
+      result__EXGH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__QKAH,new_size__ZI1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QKAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__XI1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QKAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__EXGH,new_size__DSBH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EXGH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__BSBH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EXGH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__V5FD=((void **)result__XI1G);
-  Self__RDXD=(__INTEGER)(nb_elements__0KBD -  1);
-  while ((Self__RDXD >=  0)) {
-    Result__V5FD[Self__RDXD]=NULL;
-    Self__RDXD=(__INTEGER)(Self__RDXD -  1);
+  Result__JVIF=((void **)result__BSBH);
+  Self__VXPF=(__INTEGER)(nb_elements__BGEF -  1);
+  while ((Self__VXPF >=  0)) {
+    Result__JVIF[Self__VXPF]=NULL;
+    Self__VXPF=(__INTEGER)(Self__VXPF -  1);
   };
-  return(Result__V5FD);
+  return(Result__JVIF);
 }
 
-static void** create__VJ2(__INTEGER nb_elements__XJ2)
+static void** create__BK2(__INTEGER nb_elements__DK2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__2I1G,a__EE3G,new_size__3I1G,new_size2__4I1G,a__IE3G;
-  __UINTEGER_32 new_size__JE3G;
-  __POINTER result__1I1G,ptr_table__UKAH,next__TKAH,result__VKAH;
-  void *result__YKAH;
-  __INTEGER Self__5SJC;
-  void **Result__MADB;
-  sz__2I1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__XJ2 * ((__INTEGER )(sizeof(void *)))));
-  result__1I1G=((__POINTER )(NULL));
-  a__EE3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__3I1G=(__UINTEGER_32)((__UINTEGER_32)(sz__2I1G + a__EE3G) & (__UINTEGER_32)(~ a__EE3G));
-  new_size2__4I1G=(__UINTEGER_32)(new_size__3I1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__4I1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__IE3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__JE3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4I1G + a__IE3G) & (__UINTEGER_32)(~ a__IE3G));
-    ptr_table__UKAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JE3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__TKAH=((__POINTER )(NULL));
-    result__VKAH=((__POINTER *)ptr_table__UKAH)[ 0];
-    if ((result__VKAH == (void *)NULL)) {
-      result__VKAH=new_lab__ARJ(new_size__JE3G);
-      next__TKAH=(void *)((unsigned long)result__VKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JE3G)));
-      ((__POINTER *)next__TKAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__UKAH)[ 0]=next__TKAH;
-    } else {
-      next__TKAH=((__POINTER *)result__VKAH)[ 0];
-      if ((next__TKAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VKAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JE3G <<  1)) <=  4096)) {
-          next__TKAH=(void *)((unsigned long)result__VKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JE3G)));
-        } else {
-          next__TKAH=new_lab__ARJ(new_size__JE3G);
-        };
-        ((__POINTER *)next__TKAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UKAH)[ 0]=next__TKAH;
-      } else {
-        ((__POINTER *)result__VKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__VKAH=next__TKAH;
-      };
-    };
-    ((__POINTER *)result__VKAH)[ 0]=((__POINTER ) 3);
-    result__1I1G=(void *)((unsigned long)result__VKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__GSBH,a__BRDH,new_size__HSBH,new_size2__ISBH,a__FRDH;
+  __UINTEGER_32 new_size__GRDH;
+  __POINTER result__FSBH,ptr_table__IXGH,next__HXGH,result__JXGH;
+  void *result__MXGH;
+  __INTEGER Self__LTJC;
+  void **Result__YADB;
+  sz__GSBH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DK2 * ((__INTEGER )(sizeof(void *)))));
+  result__FSBH=((__POINTER )(NULL));
+  a__BRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HSBH=(__UINTEGER_32)((__UINTEGER_32)(sz__GSBH + a__BRDH) & (__UINTEGER_32)(~ a__BRDH));
+  new_size2__ISBH=(__UINTEGER_32)(new_size__HSBH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ISBH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GRDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ISBH + a__FRDH) & (__UINTEGER_32)(~ a__FRDH));
+    ptr_table__IXGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GRDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HXGH=((__POINTER )(NULL));
+    result__JXGH=((__POINTER *)ptr_table__IXGH)[ 0];
+    if ((result__JXGH == (void *)NULL)) {
+      result__JXGH=new_lab__MRJ(new_size__GRDH);
+      next__HXGH=(void *)((unsigned long)result__JXGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GRDH)));
+      ((__POINTER *)next__HXGH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IXGH)[ 0]=next__HXGH;
+    } else {
+      next__HXGH=((__POINTER *)result__JXGH)[ 0];
+      if ((next__HXGH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JXGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GRDH <<  1)) <=  4096)) {
+          next__HXGH=(void *)((unsigned long)result__JXGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GRDH)));
+        } else {
+          next__HXGH=new_lab__MRJ(new_size__GRDH);
+        };
+        ((__POINTER *)next__HXGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IXGH)[ 0]=next__HXGH;
+      } else {
+        ((__POINTER *)result__JXGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HXGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JXGH=next__HXGH;
+      };
+    };
+    ((__POINTER *)result__JXGH)[ 0]=((__POINTER ) 3);
+    result__FSBH=(void *)((unsigned long)result__JXGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__YKAH=first_free__LDVB;
-    while ((((void *)result__YKAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YKAH)->map_size_and_id__2SB &  4294967292LU) < new_size__3I1G))) {
-      result__YKAH=((__MEMORY *)result__YKAH)->map_next_free__3SB;
+    result__MXGH=first_free__XDVB;
+    while ((((void *)result__MXGH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MXGH)->map_size_and_id__ITB &  4294967292LU) < new_size__HSBH))) {
+      result__MXGH=((__MEMORY *)result__MXGH)->map_next_free__JTB;
     };
-    if (((void *)result__YKAH == (void *)NULL)) {
-      result__YKAH=new_page__CA5();
+    if (((void *)result__MXGH == (void *)NULL)) {
+      result__MXGH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__YKAH,new_size__3I1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YKAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__1I1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YKAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__MXGH,new_size__HSBH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MXGH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__FSBH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MXGH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__MADB=((void **)result__1I1G);
-  Self__5SJC=(__INTEGER)(nb_elements__XJ2 -  1);
-  while ((Self__5SJC >=  0)) {
-    Result__MADB[Self__5SJC]=NULL;
-    Self__5SJC=(__INTEGER)(Self__5SJC -  1);
+  Result__YADB=((void **)result__FSBH);
+  Self__LTJC=(__INTEGER)(nb_elements__DK2 -  1);
+  while ((Self__LTJC >=  0)) {
+    Result__YADB[Self__LTJC]=NULL;
+    Self__LTJC=(__INTEGER)(Self__LTJC -  1);
   };
-  return(Result__MADB);
+  return(Result__YADB);
 }
 
-static void add__2XR(__HASHED_SEToABSTRACT_STRINGo *Self__3XR,void *e__4XR)
+static void add__IYR(__HASHED_SEToABSTRACT_STRINGo *Self__JYR,void *e__KYR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__1KAH,__tmp__3KAH,Self__4KAH,idx__GYR,typ_id__CLAH;
-  __POINTER ptr__BLAH,ptr_table__MLAH,next__LLAH,result__NLAH;
-  __POINTER ptr_table__RLAH,next__QLAH,result__SLAH;
-  __UINTEGER_32 sz__DLAH,a__ELAH,new_size__FLAH,t__GLAH,a__HLAH;
-  __UINTEGER_32 new_size__ULAH,lab_type__TLAH;
-  void *node__JYR,*n__KLAH;
-  __HASHED_SET_NODEoABSTRACT_STRINGo *result__ALAH,*Self__ILAH;
-  has__PPW(Self__3XR,e__4XR);
-  has__PPW(Self__3XR,e__4XR);
-  result__1KAH= 0;
-  __tmp__3KAH=((__STRING_CONSTANT *)e__4XR)->count__DD;
-  Self__4KAH= 1;
-  while ((Self__4KAH <= __tmp__3KAH)) {
-    result__1KAH=(__INTEGER)((__INTEGER)( 5 * result__1KAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__4XR)->storage__JQO)[(__INTEGER)(Self__4KAH -  1)])));
-    Self__4KAH=(__INTEGER)(Self__4KAH +  1);
-  };
-  if ((result__1KAH <  0)) {
-    result__1KAH=(__INTEGER)(~ result__1KAH);
-  };
-  idx__GYR=(__INTEGER)(result__1KAH % Self__3XR->capacity__NYR);
-  node__JYR=((void **)Self__3XR->buckets__SYR)[idx__GYR];
-  while ((! (((void *)node__JYR == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JYR)->item__4YR,e__4XR)))) {
-    node__JYR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JYR)->next__KZR;
-  };
-  if (((void *)node__JYR == (void *)NULL)) {
-    if ((Self__3XR->capacity__NYR == Self__3XR->count__TZR)) {
-      increase_capacity__SRNB(Self__3XR);
-      idx__GYR=(__INTEGER)(result__1KAH % Self__3XR->capacity__NYR);
-    };
-    n__KLAH=((void **)Self__3XR->buckets__SYR)[idx__GYR];
-    result__ALAH=NULL;
-    ptr__BLAH=((__POINTER )(NULL));
-    typ_id__CLAH= 0;
-    sz__DLAH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
-    if ((sz__DLAH ==  0)) {
-      result__ALAH=HASHED_SET_NODEoABSTRACT_STRINGo__;
-    } else {
-      typ_id__CLAH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__DLAH);
-      if ((typ_id__CLAH == (__INTEGER)(-  1))) {
-        a__ELAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__FLAH=(__UINTEGER_32)((__UINTEGER_32)(sz__DLAH + a__ELAH) & (__UINTEGER_32)(~ a__ELAH));
-        ptr_table__MLAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FLAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__LLAH=((__POINTER )(NULL));
-        result__NLAH=((__POINTER *)ptr_table__MLAH)[ 0];
-        if ((result__NLAH == (void *)NULL)) {
-          result__NLAH=new_lab__ARJ(new_size__FLAH);
-          next__LLAH=(void *)((unsigned long)result__NLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLAH)));
-          ((__POINTER *)next__LLAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MLAH)[ 0]=next__LLAH;
-        } else {
-          next__LLAH=((__POINTER *)result__NLAH)[ 0];
-          if ((next__LLAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NLAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FLAH <<  1)) <=  4096)) {
-              next__LLAH=(void *)((unsigned long)result__NLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLAH)));
+  __INTEGER result__PXGH,__tmp__RXGH,Self__SXGH,idx__SYR,typ_id__WXGH;
+  __POINTER ptr__VXGH,ptr_table__AYGH,next__5XGH,result__BYGH;
+  __POINTER ptr_table__FYGH,next__EYGH,result__GYGH;
+  __UINTEGER_32 sz__XXGH,a__YXGH,new_size__ZXGH,t__0XGH,a__1XGH;
+  __UINTEGER_32 new_size__IYGH,lab_type__HYGH;
+  void *node__VYR,*n__4XGH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__UXGH,*Self__2XGH;
+  has__1PW(Self__JYR,e__KYR);
+  has__1PW(Self__JYR,e__KYR);
+  result__PXGH= 0;
+  __tmp__RXGH=((__STRING_CONSTANT *)e__KYR)->count__DD;
+  Self__SXGH= 1;
+  while ((Self__SXGH <= __tmp__RXGH)) {
+    result__PXGH=(__INTEGER)((__INTEGER)( 5 * result__PXGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__KYR)->storage__VQO)[(__INTEGER)(Self__SXGH -  1)])));
+    Self__SXGH=(__INTEGER)(Self__SXGH +  1);
+  };
+  if ((result__PXGH <  0)) {
+    result__PXGH=(__INTEGER)(~ result__PXGH);
+  };
+  idx__SYR=(__INTEGER)(result__PXGH % Self__JYR->capacity__ZYR);
+  node__VYR=((void **)Self__JYR->buckets__4YR)[idx__SYR];
+  while ((! (((void *)node__VYR == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__VYR)->item__KZR,e__KYR)))) {
+    node__VYR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__VYR)->next__WZR;
+  };
+  if (((void *)node__VYR == (void *)NULL)) {
+    if ((Self__JYR->capacity__ZYR == Self__JYR->count__5ZR)) {
+      increase_capacity__4RNB(Self__JYR);
+      idx__SYR=(__INTEGER)(result__PXGH % Self__JYR->capacity__ZYR);
+    };
+    n__4XGH=((void **)Self__JYR->buckets__4YR)[idx__SYR];
+    result__UXGH=NULL;
+    ptr__VXGH=((__POINTER )(NULL));
+    typ_id__WXGH= 0;
+    sz__XXGH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+    if ((sz__XXGH ==  0)) {
+      result__UXGH=HASHED_SET_NODEoABSTRACT_STRINGo__;
+    } else {
+      typ_id__WXGH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XXGH);
+      if ((typ_id__WXGH == (__INTEGER)(-  1))) {
+        a__YXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XXGH + a__YXGH) & (__UINTEGER_32)(~ a__YXGH));
+        ptr_table__AYGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__5XGH=((__POINTER )(NULL));
+        result__BYGH=((__POINTER *)ptr_table__AYGH)[ 0];
+        if ((result__BYGH == (void *)NULL)) {
+          result__BYGH=new_lab__MRJ(new_size__ZXGH);
+          next__5XGH=(void *)((unsigned long)result__BYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZXGH)));
+          ((__POINTER *)next__5XGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AYGH)[ 0]=next__5XGH;
+        } else {
+          next__5XGH=((__POINTER *)result__BYGH)[ 0];
+          if ((next__5XGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BYGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZXGH <<  1)) <=  4096)) {
+              next__5XGH=(void *)((unsigned long)result__BYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZXGH)));
             } else {
-              next__LLAH=new_lab__ARJ(new_size__FLAH);
-            };
-            ((__POINTER *)next__LLAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MLAH)[ 0]=next__LLAH;
-          } else {
-            ((__POINTER *)result__NLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NLAH=next__LLAH;
-          };
-        };
-        ptr__BLAH=result__NLAH;
-      } else {
-        t__GLAH=((__UINTEGER_32 )typ_id__CLAH);
-        a__HLAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__ULAH=(__UINTEGER_32)((__UINTEGER_32)(sz__DLAH + a__HLAH) & (__UINTEGER_32)(~ a__HLAH));
-        ptr_table__RLAH=((__POINTER )(&(table_type[(t__GLAH)])));
-        lab_type__TLAH=(__UINTEGER_32)(t__GLAH |  1);
-        next__QLAH=((__POINTER )(NULL));
-        result__SLAH=((__POINTER *)ptr_table__RLAH)[ 0];
-        if ((result__SLAH == (void *)NULL)) {
-          result__SLAH=new_lab__ARJ(lab_type__TLAH);
-          next__QLAH=(void *)((unsigned long)result__SLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ULAH)));
-          ((__POINTER *)next__QLAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RLAH)[ 0]=next__QLAH;
-        } else {
-          next__QLAH=((__POINTER *)result__SLAH)[ 0];
-          if ((next__QLAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SLAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ULAH <<  1)) <=  4096)) {
-              next__QLAH=(void *)((unsigned long)result__SLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ULAH)));
+              next__5XGH=new_lab__MRJ(new_size__ZXGH);
+            };
+            ((__POINTER *)next__5XGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AYGH)[ 0]=next__5XGH;
+          } else {
+            ((__POINTER *)result__BYGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5XGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BYGH=next__5XGH;
+          };
+        };
+        ptr__VXGH=result__BYGH;
+      } else {
+        t__0XGH=((__UINTEGER_32 )typ_id__WXGH);
+        a__1XGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__IYGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XXGH + a__1XGH) & (__UINTEGER_32)(~ a__1XGH));
+        ptr_table__FYGH=((__POINTER )(&(table_type[(t__0XGH)])));
+        lab_type__HYGH=(__UINTEGER_32)(t__0XGH |  1);
+        next__EYGH=((__POINTER )(NULL));
+        result__GYGH=((__POINTER *)ptr_table__FYGH)[ 0];
+        if ((result__GYGH == (void *)NULL)) {
+          result__GYGH=new_lab__MRJ(lab_type__HYGH);
+          next__EYGH=(void *)((unsigned long)result__GYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IYGH)));
+          ((__POINTER *)next__EYGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FYGH)[ 0]=next__EYGH;
+        } else {
+          next__EYGH=((__POINTER *)result__GYGH)[ 0];
+          if ((next__EYGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GYGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IYGH <<  1)) <=  4096)) {
+              next__EYGH=(void *)((unsigned long)result__GYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IYGH)));
             } else {
-              next__QLAH=new_lab__ARJ(lab_type__TLAH);
+              next__EYGH=new_lab__MRJ(lab_type__HYGH);
             };
-            ((__POINTER *)next__QLAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RLAH)[ 0]=next__QLAH;
+            ((__POINTER *)next__EYGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FYGH)[ 0]=next__EYGH;
           } else {
-            ((__POINTER *)result__SLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SLAH=next__QLAH;
+            ((__POINTER *)result__GYGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EYGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GYGH=next__EYGH;
           };
         };
-        ptr__BLAH=result__SLAH;
+        ptr__VXGH=result__GYGH;
       };
-      result__ALAH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__BLAH);
-      *(result__ALAH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+      result__UXGH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__VXGH);
+      *(result__UXGH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
     };
-    Self__ILAH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__ALAH);
-    Self__ILAH->item__4YR=e__4XR;
-    Self__ILAH->next__KZR=n__KLAH;
-    node__JYR=result__ALAH;
-    ((void **)Self__3XR->buckets__SYR)[idx__GYR]=result__ALAH;
-    Self__3XR->count__TZR=(__INTEGER)(Self__3XR->count__TZR +  1);
+    Self__2XGH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__UXGH);
+    Self__2XGH->item__KZR=e__KYR;
+    Self__2XGH->next__WZR=n__4XGH;
+    node__VYR=result__UXGH;
+    ((void **)Self__JYR->buckets__4YR)[idx__SYR]=result__UXGH;
+    Self__JYR->count__5ZR=(__INTEGER)(Self__JYR->count__5ZR +  1);
   };
 }
 
-static void* operator__name__KGB(void *op__NGB)
+static void* operator__name__WGB(void *op__ZGB)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__VGB,Self__OVB;
-  __CHARACTER c__PGB;
-  __BOOLEAN __tmp__DHB,__tmp__QHB,result__MFDB,__tmp__3HB,result__4FDB;
-  __BOOLEAN __tmp__KIB,result__QGDB,__tmp__XIB,result__CHDB,__tmp__EJB;
-  __BOOLEAN result__UHDB,__tmp__RJB,result__GIDB,__tmp__4JB;
-  __BOOLEAN result__YIDB,__tmp__LKB,result__KJDB,__tmp__YKB;
-  __BOOLEAN result__2JDB,__tmp__FLB,result__OKDB,__tmp__SLB;
-  __BOOLEAN result__ALDB,__tmp__5LB,result__SLDB,__tmp__MMB;
-  __BOOLEAN result__EMDB,__tmp__ZMB,result__WMDB,__tmp__GNB;
-  __BOOLEAN result__INDB,__tmp__TNB,result__0NDB;
-  c__PGB='\0';
-  copy__NCS(string_tmp__VH,(&__string_81));
-  __tmp__VGB=((__STRING_CONSTANT *)op__NGB)->count__DD;
-  Self__OVB= 1;
-  while ((Self__OVB <= __tmp__VGB)) {
-    c__PGB=((__CHARACTER *)((__STRING_CONSTANT *)op__NGB)->storage__JQO)[(__INTEGER)(Self__OVB -  1)];
-    if ((c__PGB == '+')) {
-      append__VNS(string_tmp__VH,(&__string_175));
-      __tmp__DHB=TRUE__;
+  __INTEGER __tmp__BHB,Self__0VB;
+  __CHARACTER c__1GB;
+  __BOOLEAN __tmp__PHB,__tmp__2HB,result__YFDB,__tmp__JIB,result__KGDB;
+  __BOOLEAN __tmp__WIB,result__2GDB,__tmp__DJB,result__OHDB,__tmp__QJB;
+  __BOOLEAN result__AIDB,__tmp__3JB,result__SIDB,__tmp__KKB;
+  __BOOLEAN result__EJDB,__tmp__XKB,result__WJDB,__tmp__ELB;
+  __BOOLEAN result__IKDB,__tmp__RLB,result__0KDB,__tmp__4LB;
+  __BOOLEAN result__MLDB,__tmp__LMB,result__4LDB,__tmp__YMB;
+  __BOOLEAN result__QMDB,__tmp__FNB,result__CNDB,__tmp__SNB;
+  __BOOLEAN result__UNDB,__tmp__5NB,result__GODB;
+  c__1GB='\0';
+  copy__ZCS(string_tmp__VH,(&__string_81));
+  __tmp__BHB=((__STRING_CONSTANT *)op__ZGB)->count__DD;
+  Self__0VB= 1;
+  while ((Self__0VB <= __tmp__BHB)) {
+    c__1GB=((__CHARACTER *)((__STRING_CONSTANT *)op__ZGB)->storage__VQO)[(__INTEGER)(Self__0VB -  1)];
+    if ((c__1GB == '+')) {
+      append__BOS(string_tmp__VH,(&__string_185));
+      __tmp__PHB=TRUE__;
     } else {
-      __tmp__DHB=FALSE__;
+      __tmp__PHB=FALSE__;
     };
-    if (__tmp__DHB) {
-      __tmp__QHB=TRUE__;
+    if (__tmp__PHB) {
+      __tmp__2HB=TRUE__;
     } else {
-      result__MFDB=(c__PGB == '-');
-      if (result__MFDB) {
-        append__VNS(string_tmp__VH,(&__string_176));
+      result__YFDB=(c__1GB == '-');
+      if (result__YFDB) {
+        append__BOS(string_tmp__VH,(&__string_186));
       };
-      __tmp__QHB=result__MFDB;
+      __tmp__2HB=result__YFDB;
     };
-    if (__tmp__QHB) {
-      __tmp__3HB=TRUE__;
+    if (__tmp__2HB) {
+      __tmp__JIB=TRUE__;
     } else {
-      result__4FDB=(c__PGB == '~');
-      if (result__4FDB) {
-        append__VNS(string_tmp__VH,(&__string_177));
+      result__KGDB=(c__1GB == '~');
+      if (result__KGDB) {
+        append__BOS(string_tmp__VH,(&__string_187));
       };
-      __tmp__3HB=result__4FDB;
+      __tmp__JIB=result__KGDB;
     };
-    if (__tmp__3HB) {
-      __tmp__KIB=TRUE__;
+    if (__tmp__JIB) {
+      __tmp__WIB=TRUE__;
     } else {
-      result__QGDB=(c__PGB == '!');
-      if (result__QGDB) {
-        append__VNS(string_tmp__VH,(&__string_178));
+      result__2GDB=(c__1GB == '!');
+      if (result__2GDB) {
+        append__BOS(string_tmp__VH,(&__string_188));
       };
-      __tmp__KIB=result__QGDB;
+      __tmp__WIB=result__2GDB;
     };
-    if (__tmp__KIB) {
-      __tmp__XIB=TRUE__;
+    if (__tmp__WIB) {
+      __tmp__DJB=TRUE__;
     } else {
-      result__CHDB=(c__PGB == '/');
-      if (result__CHDB) {
-        append__VNS(string_tmp__VH,(&__string_179));
+      result__OHDB=(c__1GB == '/');
+      if (result__OHDB) {
+        append__BOS(string_tmp__VH,(&__string_189));
       };
-      __tmp__XIB=result__CHDB;
+      __tmp__DJB=result__OHDB;
     };
-    if (__tmp__XIB) {
-      __tmp__EJB=TRUE__;
+    if (__tmp__DJB) {
+      __tmp__QJB=TRUE__;
     } else {
-      result__UHDB=(c__PGB == '*');
-      if (result__UHDB) {
-        append__VNS(string_tmp__VH,(&__string_180));
+      result__AIDB=(c__1GB == '*');
+      if (result__AIDB) {
+        append__BOS(string_tmp__VH,(&__string_190));
       };
-      __tmp__EJB=result__UHDB;
+      __tmp__QJB=result__AIDB;
     };
-    if (__tmp__EJB) {
-      __tmp__RJB=TRUE__;
+    if (__tmp__QJB) {
+      __tmp__3JB=TRUE__;
     } else {
-      result__GIDB=(c__PGB == '^');
-      if (result__GIDB) {
-        append__VNS(string_tmp__VH,(&__string_181));
+      result__SIDB=(c__1GB == '^');
+      if (result__SIDB) {
+        append__BOS(string_tmp__VH,(&__string_191));
       };
-      __tmp__RJB=result__GIDB;
+      __tmp__3JB=result__SIDB;
     };
-    if (__tmp__RJB) {
-      __tmp__4JB=TRUE__;
+    if (__tmp__3JB) {
+      __tmp__KKB=TRUE__;
     } else {
-      result__YIDB=(c__PGB == '%');
-      if (result__YIDB) {
-        append__VNS(string_tmp__VH,(&__string_182));
+      result__EJDB=(c__1GB == '%');
+      if (result__EJDB) {
+        append__BOS(string_tmp__VH,(&__string_192));
       };
-      __tmp__4JB=result__YIDB;
+      __tmp__KKB=result__EJDB;
     };
-    if (__tmp__4JB) {
-      __tmp__LKB=TRUE__;
+    if (__tmp__KKB) {
+      __tmp__XKB=TRUE__;
     } else {
-      result__KJDB=(c__PGB == '>');
-      if (result__KJDB) {
-        append__VNS(string_tmp__VH,(&__string_183));
+      result__WJDB=(c__1GB == '>');
+      if (result__WJDB) {
+        append__BOS(string_tmp__VH,(&__string_193));
       };
-      __tmp__LKB=result__KJDB;
+      __tmp__XKB=result__WJDB;
     };
-    if (__tmp__LKB) {
-      __tmp__YKB=TRUE__;
+    if (__tmp__XKB) {
+      __tmp__ELB=TRUE__;
     } else {
-      result__2JDB=(c__PGB == '<');
-      if (result__2JDB) {
-        append__VNS(string_tmp__VH,(&__string_184));
+      result__IKDB=(c__1GB == '<');
+      if (result__IKDB) {
+        append__BOS(string_tmp__VH,(&__string_194));
       };
-      __tmp__YKB=result__2JDB;
+      __tmp__ELB=result__IKDB;
     };
-    if (__tmp__YKB) {
-      __tmp__FLB=TRUE__;
+    if (__tmp__ELB) {
+      __tmp__RLB=TRUE__;
     } else {
-      result__OKDB=(c__PGB == '=');
-      if (result__OKDB) {
-        append__VNS(string_tmp__VH,(&__string_185));
+      result__0KDB=(c__1GB == '=');
+      if (result__0KDB) {
+        append__BOS(string_tmp__VH,(&__string_195));
       };
-      __tmp__FLB=result__OKDB;
+      __tmp__RLB=result__0KDB;
     };
-    if (__tmp__FLB) {
-      __tmp__SLB=TRUE__;
+    if (__tmp__RLB) {
+      __tmp__4LB=TRUE__;
     } else {
-      result__ALDB=(c__PGB == '\\');
-      if (result__ALDB) {
-        append__VNS(string_tmp__VH,(&__string_186));
+      result__MLDB=(c__1GB == '\\');
+      if (result__MLDB) {
+        append__BOS(string_tmp__VH,(&__string_196));
       };
-      __tmp__SLB=result__ALDB;
+      __tmp__4LB=result__MLDB;
     };
-    if (__tmp__SLB) {
-      __tmp__5LB=TRUE__;
+    if (__tmp__4LB) {
+      __tmp__LMB=TRUE__;
     } else {
-      result__SLDB=(c__PGB == '|');
-      if (result__SLDB) {
-        append__VNS(string_tmp__VH,(&__string_187));
+      result__4LDB=(c__1GB == '|');
+      if (result__4LDB) {
+        append__BOS(string_tmp__VH,(&__string_197));
       };
-      __tmp__5LB=result__SLDB;
+      __tmp__LMB=result__4LDB;
     };
-    if (__tmp__5LB) {
-      __tmp__MMB=TRUE__;
+    if (__tmp__LMB) {
+      __tmp__YMB=TRUE__;
     } else {
-      result__EMDB=(c__PGB == '&');
-      if (result__EMDB) {
-        append__VNS(string_tmp__VH,(&__string_188));
+      result__QMDB=(c__1GB == '&');
+      if (result__QMDB) {
+        append__BOS(string_tmp__VH,(&__string_198));
       };
-      __tmp__MMB=result__EMDB;
+      __tmp__YMB=result__QMDB;
     };
-    if (__tmp__MMB) {
-      __tmp__ZMB=TRUE__;
+    if (__tmp__YMB) {
+      __tmp__FNB=TRUE__;
     } else {
-      result__WMDB=(c__PGB == '$');
-      if (result__WMDB) {
-        append__VNS(string_tmp__VH,(&__string_189));
+      result__CNDB=(c__1GB == '$');
+      if (result__CNDB) {
+        append__BOS(string_tmp__VH,(&__string_199));
       };
-      __tmp__ZMB=result__WMDB;
+      __tmp__FNB=result__CNDB;
     };
-    if (__tmp__ZMB) {
-      __tmp__GNB=TRUE__;
+    if (__tmp__FNB) {
+      __tmp__SNB=TRUE__;
     } else {
-      result__INDB=(c__PGB == '#');
-      if (result__INDB) {
-        append__VNS(string_tmp__VH,(&__string_190));
+      result__UNDB=(c__1GB == '#');
+      if (result__UNDB) {
+        append__BOS(string_tmp__VH,(&__string_200));
       };
-      __tmp__GNB=result__INDB;
+      __tmp__SNB=result__UNDB;
     };
-    if (__tmp__GNB) {
-      __tmp__TNB=TRUE__;
+    if (__tmp__SNB) {
+      __tmp__5NB=TRUE__;
     } else {
-      result__0NDB=(c__PGB == '@');
-      if (result__0NDB) {
-        append__VNS(string_tmp__VH,(&__string_191));
+      result__GODB=(c__1GB == '@');
+      if (result__GODB) {
+        append__BOS(string_tmp__VH,(&__string_201));
       };
-      __tmp__TNB=result__0NDB;
+      __tmp__5NB=result__GODB;
     };
-    if ((! __tmp__TNB)) {
-      if ((c__PGB == '?')) {
-        append__VNS(string_tmp__VH,(&__string_192));
+    if ((! __tmp__5NB)) {
+      if ((c__1GB == '?')) {
+        append__BOS(string_tmp__VH,(&__string_202));
       };
     };
-    Self__OVB=(__INTEGER)(Self__OVB +  1);
+    Self__0VB=(__INTEGER)(Self__0VB +  1);
   };
-  return(get__2VB(string_tmp__VH));
+  return(get__IWB(string_tmp__VH));
 }
 
-static void print__KHD(__STRING_CONSTANT *Self__LHD)
+static void print__WHD(__STRING_CONSTANT *Self__XHD)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__MHF(Self__LHD);
+  put_string__YHF(Self__XHD);
 }
 
-static void* get__2VB(void *str__4VB)
+static void* get__IWB(void *str__KWB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__AWB,*__tmp__4WB;
-  void *result__DLS;
-  __STRING *Self__VFX;
-  __INTEGER result__XFX,__tmp__YFX,Self__BV2,typ_id__1KD,c__EFT;
-  __INTEGER Self__PF5G,result__5LAH,__tmp__BMAH,Self__CMAH,idx__F3S;
-  __INTEGER typ_id__2FJB;
-  __STRING_CONSTANT *result__VKD,*result__MGF,*Self__CFT,*Self__AMAH;
-  __POINTER ptr__WKD,ptr_table__WLAH,next__VLAH,result__XLAH;
-  __POINTER ptr_table__1LAH,next__0LAH,result__2LAH,ptr__XFJB;
-  __POINTER ptr_table__FMAH,next__EMAH,result__GMAH,ptr_table__KMAH;
-  __POINTER next__JMAH,result__LMAH;
-  __UINTEGER_32 sz__YKD,a__CF3G,new_size__DF3G,t__HF3G,a__GF3G;
-  __UINTEGER_32 new_size__4LAH,lab_type__3LAH,sz__ZFJB,a__AU3G;
-  __UINTEGER_32 new_size__BU3G,t__FU3G,a__EU3G,new_size__NMAH;
-  __UINTEGER_32 lab_type__MMAH;
-  __HASHED_SEToABSTRACT_STRINGo *Self__QKS,*Self__22S;
-  void *node__CLS,*node__G3S,*n__1JCB;
-  __CHARACTER *Self__QF5G,*model__RF5G;
-  __HASHED_SET_NODEoABSTRACT_STRINGo *result__WFJB,*Self__55CC;
-  result__AWB=NULL;
-  Self__QKS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
-  result__DLS=NULL;
-  Self__VFX=((__STRING *)str__4VB);
-  result__XFX= 0;
-  __tmp__YFX=Self__VFX->count__KFC;
-  Self__BV2= 1;
-  while ((Self__BV2 <= __tmp__YFX)) {
-    result__XFX=(__INTEGER)((__INTEGER)( 5 * result__XFX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__VFX->storage__VBS)[(__INTEGER)(Self__BV2 -  1)])));
-    Self__BV2=(__INTEGER)(Self__BV2 +  1);
-  };
-  if ((result__XFX <  0)) {
-    result__XFX=(__INTEGER)(~ result__XFX);
-  };
-  node__CLS=((void **)Self__QKS->buckets__SYR)[(__INTEGER)(result__XFX % Self__QKS->capacity__NYR)];
-  while ((! (((void *)node__CLS == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__CLS)->item__4YR,str__4VB)))) {
-    node__CLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__CLS)->next__KZR;
-  };
-  if (((void *)node__CLS != (void *)NULL)) {
-    result__DLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__CLS)->item__4YR;
-  };
-  if (((void *)result__DLS == (void *)NULL)) {
-    result__VKD=NULL;
-    ptr__WKD=((__POINTER )(NULL));
-    typ_id__1KD= 0;
-    sz__YKD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__YKD ==  0)) {
-      result__VKD=STRING_CONSTANT__;
-    } else {
-      typ_id__1KD=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__YKD);
-      if ((typ_id__1KD == (__INTEGER)(-  1))) {
-        a__CF3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__DF3G=(__UINTEGER_32)((__UINTEGER_32)(sz__YKD + a__CF3G) & (__UINTEGER_32)(~ a__CF3G));
-        ptr_table__WLAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DF3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__VLAH=((__POINTER )(NULL));
-        result__XLAH=((__POINTER *)ptr_table__WLAH)[ 0];
-        if ((result__XLAH == (void *)NULL)) {
-          result__XLAH=new_lab__ARJ(new_size__DF3G);
-          next__VLAH=(void *)((unsigned long)result__XLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DF3G)));
-          ((__POINTER *)next__VLAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WLAH)[ 0]=next__VLAH;
-        } else {
-          next__VLAH=((__POINTER *)result__XLAH)[ 0];
-          if ((next__VLAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XLAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DF3G <<  1)) <=  4096)) {
-              next__VLAH=(void *)((unsigned long)result__XLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DF3G)));
+  void *result__MWB,*__tmp__KXB;
+  void *result__PLS;
+  __STRING *Self__BGX;
+  __INTEGER result__DGX,__tmp__EGX,Self__NV2,typ_id__HLD,c__QFT;
+  __INTEGER Self__PRFH,result__TYGH,__tmp__VYGH,Self__WYGH,idx__R3S;
+  __INTEGER typ_id__IGJB;
+  __STRING_CONSTANT *result__BLD,*result__YGF,*Self__OFT,*Self__UYGH;
+  __POINTER ptr__CLD,ptr_table__KYGH,next__JYGH,result__LYGH;
+  __POINTER ptr_table__PYGH,next__OYGH,result__QYGH,ptr__DGJB;
+  __POINTER ptr_table__ZYGH,next__YYGH,result__0YGH,ptr_table__4YGH;
+  __POINTER next__3YGH,result__5YGH;
+  __UINTEGER_32 sz__ELD,a__5RDH,new_size__ASDH,t__ESDH,a__DSDH;
+  __UINTEGER_32 new_size__SYGH,lab_type__RYGH,sz__FGJB,a__55DH;
+  __UINTEGER_32 new_size__AAEH,t__EAEH,a__DAEH,new_size__BZGH;
+  __UINTEGER_32 lab_type__AZGH;
+  __HASHED_SEToABSTRACT_STRINGo *Self__2KS,*Self__I3S;
+  void *node__OLS,*node__S3S,*n__HKCB;
+  __CHARACTER *Self__QRFH,*model__RRFH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__CGJB,*Self__LADC;
+  result__MWB=NULL;
+  Self__2KS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+  result__PLS=NULL;
+  Self__BGX=((__STRING *)str__KWB);
+  result__DGX= 0;
+  __tmp__EGX=Self__BGX->count__WFC;
+  Self__NV2= 1;
+  while ((Self__NV2 <= __tmp__EGX)) {
+    result__DGX=(__INTEGER)((__INTEGER)( 5 * result__DGX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BGX->storage__BCS)[(__INTEGER)(Self__NV2 -  1)])));
+    Self__NV2=(__INTEGER)(Self__NV2 +  1);
+  };
+  if ((result__DGX <  0)) {
+    result__DGX=(__INTEGER)(~ result__DGX);
+  };
+  node__OLS=((void **)Self__2KS->buckets__4YR)[(__INTEGER)(result__DGX % Self__2KS->capacity__ZYR)];
+  while ((! (((void *)node__OLS == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OLS)->item__KZR,str__KWB)))) {
+    node__OLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OLS)->next__WZR;
+  };
+  if (((void *)node__OLS != (void *)NULL)) {
+    result__PLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OLS)->item__KZR;
+  };
+  if (((void *)result__PLS == (void *)NULL)) {
+    result__BLD=NULL;
+    ptr__CLD=((__POINTER )(NULL));
+    typ_id__HLD= 0;
+    sz__ELD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__ELD ==  0)) {
+      result__BLD=STRING_CONSTANT__;
+    } else {
+      typ_id__HLD=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ELD);
+      if ((typ_id__HLD == (__INTEGER)(-  1))) {
+        a__5RDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ASDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ELD + a__5RDH) & (__UINTEGER_32)(~ a__5RDH));
+        ptr_table__KYGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ASDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__JYGH=((__POINTER )(NULL));
+        result__LYGH=((__POINTER *)ptr_table__KYGH)[ 0];
+        if ((result__LYGH == (void *)NULL)) {
+          result__LYGH=new_lab__MRJ(new_size__ASDH);
+          next__JYGH=(void *)((unsigned long)result__LYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASDH)));
+          ((__POINTER *)next__JYGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KYGH)[ 0]=next__JYGH;
+        } else {
+          next__JYGH=((__POINTER *)result__LYGH)[ 0];
+          if ((next__JYGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LYGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ASDH <<  1)) <=  4096)) {
+              next__JYGH=(void *)((unsigned long)result__LYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASDH)));
             } else {
-              next__VLAH=new_lab__ARJ(new_size__DF3G);
-            };
-            ((__POINTER *)next__VLAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WLAH)[ 0]=next__VLAH;
-          } else {
-            ((__POINTER *)result__XLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XLAH=next__VLAH;
-          };
-        };
-        ptr__WKD=result__XLAH;
-      } else {
-        t__HF3G=((__UINTEGER_32 )typ_id__1KD);
-        a__GF3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__4LAH=(__UINTEGER_32)((__UINTEGER_32)(sz__YKD + a__GF3G) & (__UINTEGER_32)(~ a__GF3G));
-        ptr_table__1LAH=((__POINTER )(&(table_type[(t__HF3G)])));
-        lab_type__3LAH=(__UINTEGER_32)(t__HF3G |  1);
-        next__0LAH=((__POINTER )(NULL));
-        result__2LAH=((__POINTER *)ptr_table__1LAH)[ 0];
-        if ((result__2LAH == (void *)NULL)) {
-          result__2LAH=new_lab__ARJ(lab_type__3LAH);
-          next__0LAH=(void *)((unsigned long)result__2LAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LAH)));
-          ((__POINTER *)next__0LAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1LAH)[ 0]=next__0LAH;
-        } else {
-          next__0LAH=((__POINTER *)result__2LAH)[ 0];
-          if ((next__0LAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2LAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4LAH <<  1)) <=  4096)) {
-              next__0LAH=(void *)((unsigned long)result__2LAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LAH)));
+              next__JYGH=new_lab__MRJ(new_size__ASDH);
+            };
+            ((__POINTER *)next__JYGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KYGH)[ 0]=next__JYGH;
+          } else {
+            ((__POINTER *)result__LYGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JYGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LYGH=next__JYGH;
+          };
+        };
+        ptr__CLD=result__LYGH;
+      } else {
+        t__ESDH=((__UINTEGER_32 )typ_id__HLD);
+        a__DSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SYGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ELD + a__DSDH) & (__UINTEGER_32)(~ a__DSDH));
+        ptr_table__PYGH=((__POINTER )(&(table_type[(t__ESDH)])));
+        lab_type__RYGH=(__UINTEGER_32)(t__ESDH |  1);
+        next__OYGH=((__POINTER )(NULL));
+        result__QYGH=((__POINTER *)ptr_table__PYGH)[ 0];
+        if ((result__QYGH == (void *)NULL)) {
+          result__QYGH=new_lab__MRJ(lab_type__RYGH);
+          next__OYGH=(void *)((unsigned long)result__QYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SYGH)));
+          ((__POINTER *)next__OYGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PYGH)[ 0]=next__OYGH;
+        } else {
+          next__OYGH=((__POINTER *)result__QYGH)[ 0];
+          if ((next__OYGH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QYGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SYGH <<  1)) <=  4096)) {
+              next__OYGH=(void *)((unsigned long)result__QYGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SYGH)));
             } else {
-              next__0LAH=new_lab__ARJ(lab_type__3LAH);
-            };
-            ((__POINTER *)next__0LAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1LAH)[ 0]=next__0LAH;
-          } else {
-            ((__POINTER *)result__2LAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0LAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2LAH=next__0LAH;
-          };
-        };
-        ptr__WKD=result__2LAH;
-      };
-      result__VKD=((__STRING_CONSTANT *)ptr__WKD);
-      *(result__VKD) = *(STRING_CONSTANT__);
-    };
-    result__MGF=result__VKD;
-    Self__CFT=((__STRING_CONSTANT *)result__VKD);
-    c__EFT=((__STRING *)str__4VB)->count__KFC;
-    if ((c__EFT !=  0)) {
-      Self__CFT->storage__JQO=create__VLEB((__INTEGER)(c__EFT +  1));
-      Self__QF5G=((__CHARACTER *)Self__CFT->storage__JQO);
-      model__RF5G=((__STRING *)str__4VB)->storage__VBS;
-      Self__PF5G=(__INTEGER)(c__EFT -  1);
-      while ((Self__PF5G >=  0)) {
-        Self__QF5G[Self__PF5G]=((__CHARACTER *)model__RF5G)[Self__PF5G];
-        Self__PF5G=(__INTEGER)(Self__PF5G -  1);
-      };
-      ((__CHARACTER *)Self__CFT->storage__JQO)[c__EFT]='\0';
-      Self__CFT->count__DD=c__EFT;
-    };
-    result__AWB=result__VKD;
-    Self__22S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
-    fast_has__CAY(Self__22S,result__VKD);
-    fast_has__CAY(Self__22S,result__VKD);
-    Self__AMAH=((__STRING_CONSTANT *)result__VKD);
-    result__5LAH= 0;
-    __tmp__BMAH=Self__AMAH->count__DD;
-    Self__CMAH= 1;
-    while ((Self__CMAH <= __tmp__BMAH)) {
-      result__5LAH=(__INTEGER)((__INTEGER)( 5 * result__5LAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__AMAH->storage__JQO)[(__INTEGER)(Self__CMAH -  1)])));
-      Self__CMAH=(__INTEGER)(Self__CMAH +  1);
-    };
-    if ((result__5LAH <  0)) {
-      result__5LAH=(__INTEGER)(~ result__5LAH);
-    };
-    idx__F3S=(__INTEGER)(result__5LAH % Self__22S->capacity__NYR);
-    node__G3S=((void **)Self__22S->buckets__SYR)[idx__F3S];
-    while ((! (((void *)node__G3S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__G3S)->item__4YR == (void *)result__MGF)))) {
-      node__G3S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__G3S)->next__KZR;
-    };
-    if (((void *)node__G3S == (void *)NULL)) {
-      if ((Self__22S->capacity__NYR == Self__22S->count__TZR)) {
-        increase_capacity__SRNB(Self__22S);
-        idx__F3S=(__INTEGER)(result__5LAH % Self__22S->capacity__NYR);
-      };
-      n__1JCB=((void **)Self__22S->buckets__SYR)[idx__F3S];
-      result__WFJB=NULL;
-      ptr__XFJB=((__POINTER )(NULL));
-      typ_id__2FJB= 0;
-      sz__ZFJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
-      if ((sz__ZFJB ==  0)) {
-        result__WFJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
-      } else {
-        typ_id__2FJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ZFJB);
-        if ((typ_id__2FJB == (__INTEGER)(-  1))) {
-          a__AU3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__BU3G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZFJB + a__AU3G) & (__UINTEGER_32)(~ a__AU3G));
-          ptr_table__FMAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BU3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__EMAH=((__POINTER )(NULL));
-          result__GMAH=((__POINTER *)ptr_table__FMAH)[ 0];
-          if ((result__GMAH == (void *)NULL)) {
-            result__GMAH=new_lab__ARJ(new_size__BU3G);
-            next__EMAH=(void *)((unsigned long)result__GMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BU3G)));
-            ((__POINTER *)next__EMAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FMAH)[ 0]=next__EMAH;
-          } else {
-            next__EMAH=((__POINTER *)result__GMAH)[ 0];
-            if ((next__EMAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GMAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BU3G <<  1)) <=  4096)) {
-                next__EMAH=(void *)((unsigned long)result__GMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BU3G)));
+              next__OYGH=new_lab__MRJ(lab_type__RYGH);
+            };
+            ((__POINTER *)next__OYGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PYGH)[ 0]=next__OYGH;
+          } else {
+            ((__POINTER *)result__QYGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OYGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QYGH=next__OYGH;
+          };
+        };
+        ptr__CLD=result__QYGH;
+      };
+      result__BLD=((__STRING_CONSTANT *)ptr__CLD);
+      *(result__BLD) = *(STRING_CONSTANT__);
+    };
+    result__YGF=result__BLD;
+    Self__OFT=((__STRING_CONSTANT *)result__BLD);
+    c__QFT=((__STRING *)str__KWB)->count__WFC;
+    if ((c__QFT !=  0)) {
+      Self__OFT->storage__VQO=create__BMEB((__INTEGER)(c__QFT +  1));
+      Self__QRFH=((__CHARACTER *)Self__OFT->storage__VQO);
+      model__RRFH=((__STRING *)str__KWB)->storage__BCS;
+      Self__PRFH=(__INTEGER)(c__QFT -  1);
+      while ((Self__PRFH >=  0)) {
+        Self__QRFH[Self__PRFH]=((__CHARACTER *)model__RRFH)[Self__PRFH];
+        Self__PRFH=(__INTEGER)(Self__PRFH -  1);
+      };
+      ((__CHARACTER *)Self__OFT->storage__VQO)[c__QFT]='\0';
+      Self__OFT->count__DD=c__QFT;
+    };
+    result__MWB=result__BLD;
+    Self__I3S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+    fast_has__OAY(Self__I3S,result__BLD);
+    fast_has__OAY(Self__I3S,result__BLD);
+    Self__UYGH=((__STRING_CONSTANT *)result__BLD);
+    result__TYGH= 0;
+    __tmp__VYGH=Self__UYGH->count__DD;
+    Self__WYGH= 1;
+    while ((Self__WYGH <= __tmp__VYGH)) {
+      result__TYGH=(__INTEGER)((__INTEGER)( 5 * result__TYGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UYGH->storage__VQO)[(__INTEGER)(Self__WYGH -  1)])));
+      Self__WYGH=(__INTEGER)(Self__WYGH +  1);
+    };
+    if ((result__TYGH <  0)) {
+      result__TYGH=(__INTEGER)(~ result__TYGH);
+    };
+    idx__R3S=(__INTEGER)(result__TYGH % Self__I3S->capacity__ZYR);
+    node__S3S=((void **)Self__I3S->buckets__4YR)[idx__R3S];
+    while ((! (((void *)node__S3S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__S3S)->item__KZR == (void *)result__YGF)))) {
+      node__S3S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__S3S)->next__WZR;
+    };
+    if (((void *)node__S3S == (void *)NULL)) {
+      if ((Self__I3S->capacity__ZYR == Self__I3S->count__5ZR)) {
+        increase_capacity__4RNB(Self__I3S);
+        idx__R3S=(__INTEGER)(result__TYGH % Self__I3S->capacity__ZYR);
+      };
+      n__HKCB=((void **)Self__I3S->buckets__4YR)[idx__R3S];
+      result__CGJB=NULL;
+      ptr__DGJB=((__POINTER )(NULL));
+      typ_id__IGJB= 0;
+      sz__FGJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+      if ((sz__FGJB ==  0)) {
+        result__CGJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
+      } else {
+        typ_id__IGJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FGJB);
+        if ((typ_id__IGJB == (__INTEGER)(-  1))) {
+          a__55DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AAEH=(__UINTEGER_32)((__UINTEGER_32)(sz__FGJB + a__55DH) & (__UINTEGER_32)(~ a__55DH));
+          ptr_table__ZYGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AAEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__YYGH=((__POINTER )(NULL));
+          result__0YGH=((__POINTER *)ptr_table__ZYGH)[ 0];
+          if ((result__0YGH == (void *)NULL)) {
+            result__0YGH=new_lab__MRJ(new_size__AAEH);
+            next__YYGH=(void *)((unsigned long)result__0YGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AAEH)));
+            ((__POINTER *)next__YYGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZYGH)[ 0]=next__YYGH;
+          } else {
+            next__YYGH=((__POINTER *)result__0YGH)[ 0];
+            if ((next__YYGH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0YGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AAEH <<  1)) <=  4096)) {
+                next__YYGH=(void *)((unsigned long)result__0YGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AAEH)));
               } else {
-                next__EMAH=new_lab__ARJ(new_size__BU3G);
+                next__YYGH=new_lab__MRJ(new_size__AAEH);
               };
-              ((__POINTER *)next__EMAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FMAH)[ 0]=next__EMAH;
+              ((__POINTER *)next__YYGH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZYGH)[ 0]=next__YYGH;
             } else {
-              ((__POINTER *)result__GMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GMAH=next__EMAH;
-            };
-          };
-          ptr__XFJB=result__GMAH;
-        } else {
-          t__FU3G=((__UINTEGER_32 )typ_id__2FJB);
-          a__EU3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__NMAH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZFJB + a__EU3G) & (__UINTEGER_32)(~ a__EU3G));
-          ptr_table__KMAH=((__POINTER )(&(table_type[(t__FU3G)])));
-          lab_type__MMAH=(__UINTEGER_32)(t__FU3G |  1);
-          next__JMAH=((__POINTER )(NULL));
-          result__LMAH=((__POINTER *)ptr_table__KMAH)[ 0];
-          if ((result__LMAH == (void *)NULL)) {
-            result__LMAH=new_lab__ARJ(lab_type__MMAH);
-            next__JMAH=(void *)((unsigned long)result__LMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NMAH)));
-            ((__POINTER *)next__JMAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KMAH)[ 0]=next__JMAH;
-          } else {
-            next__JMAH=((__POINTER *)result__LMAH)[ 0];
-            if ((next__JMAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LMAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NMAH <<  1)) <=  4096)) {
-                next__JMAH=(void *)((unsigned long)result__LMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NMAH)));
+              ((__POINTER *)result__0YGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YYGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__0YGH=next__YYGH;
+            };
+          };
+          ptr__DGJB=result__0YGH;
+        } else {
+          t__EAEH=((__UINTEGER_32 )typ_id__IGJB);
+          a__DAEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FGJB + a__DAEH) & (__UINTEGER_32)(~ a__DAEH));
+          ptr_table__4YGH=((__POINTER )(&(table_type[(t__EAEH)])));
+          lab_type__AZGH=(__UINTEGER_32)(t__EAEH |  1);
+          next__3YGH=((__POINTER )(NULL));
+          result__5YGH=((__POINTER *)ptr_table__4YGH)[ 0];
+          if ((result__5YGH == (void *)NULL)) {
+            result__5YGH=new_lab__MRJ(lab_type__AZGH);
+            next__3YGH=(void *)((unsigned long)result__5YGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BZGH)));
+            ((__POINTER *)next__3YGH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4YGH)[ 0]=next__3YGH;
+          } else {
+            next__3YGH=((__POINTER *)result__5YGH)[ 0];
+            if ((next__3YGH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5YGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BZGH <<  1)) <=  4096)) {
+                next__3YGH=(void *)((unsigned long)result__5YGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BZGH)));
               } else {
-                next__JMAH=new_lab__ARJ(lab_type__MMAH);
+                next__3YGH=new_lab__MRJ(lab_type__AZGH);
               };
-              ((__POINTER *)next__JMAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KMAH)[ 0]=next__JMAH;
+              ((__POINTER *)next__3YGH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4YGH)[ 0]=next__3YGH;
             } else {
-              ((__POINTER *)result__LMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__LMAH=next__JMAH;
+              ((__POINTER *)result__5YGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3YGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5YGH=next__3YGH;
             };
           };
-          ptr__XFJB=result__LMAH;
+          ptr__DGJB=result__5YGH;
         };
-        result__WFJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__XFJB);
-        *(result__WFJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__CGJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__DGJB);
+        *(result__CGJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      Self__55CC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__WFJB);
-      Self__55CC->item__4YR=result__VKD;
-      Self__55CC->next__KZR=n__1JCB;
-      node__G3S=result__WFJB;
-      ((void **)Self__22S->buckets__SYR)[idx__F3S]=result__WFJB;
-      Self__22S->count__TZR=(__INTEGER)(Self__22S->count__TZR +  1);
+      Self__LADC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__CGJB);
+      Self__LADC->item__KZR=result__BLD;
+      Self__LADC->next__WZR=n__HKCB;
+      node__S3S=result__CGJB;
+      ((void **)Self__I3S->buckets__4YR)[idx__R3S]=result__CGJB;
+      Self__I3S->count__5ZR=(__INTEGER)(Self__I3S->count__5ZR +  1);
     };
   } else {
-    if (result__DLS==NULL) {
-      __tmp__4WB=NULL;
+    if (result__PLS==NULL) {
+      __tmp__KXB=NULL;
     } else {
-      __tmp__4WB=((void *)result__DLS);
+      __tmp__KXB=((void *)result__PLS);
     };
-    result__AWB=__tmp__4WB;
+    result__MWB=__tmp__KXB;
   };
-  return(result__AWB);
+  return(result__MWB);
 }
 
-static void copy__NCS(__STRING *Self__OCS,void *other__PCS)
+static void copy__ZCS(__STRING *Self__0CS,void *other__1CS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__QCS,Self__0F5G;
-  __CHARACTER *__tmp__FDS,*__tmp__HDS,*Self__1F5G,*model__2F5G;
-  if (((struct ___OBJ *)other__PCS)->__id==__STRING_CONSTANT__) {
-    __tmp__QCS=((__STRING_CONSTANT *)other__PCS)->count__DD;
+  __INTEGER __tmp__2CS,Self__0RFH;
+  __CHARACTER *__tmp__RDS,*__tmp__TDS,*Self__1RFH,*model__2RFH;
+  if (((struct ___OBJ *)other__1CS)->__id==__STRING_CONSTANT__) {
+    __tmp__2CS=((__STRING_CONSTANT *)other__1CS)->count__DD;
   } else {
-    __tmp__QCS=((__STRING *)other__PCS)->count__KFC;
+    __tmp__2CS=((__STRING *)other__1CS)->count__WFC;
   };
-  Self__OCS->count__KFC=__tmp__QCS;
-  if ((__tmp__QCS >  0)) {
-    if ((Self__OCS->capacity__MBS < __tmp__QCS)) {
-      Self__OCS->storage__VBS=create__VLEB(__tmp__QCS);
-      Self__OCS->capacity__MBS=Self__OCS->count__KFC;
+  Self__0CS->count__WFC=__tmp__2CS;
+  if ((__tmp__2CS >  0)) {
+    if ((Self__0CS->capacity__YBS < __tmp__2CS)) {
+      Self__0CS->storage__BCS=create__BMEB(__tmp__2CS);
+      Self__0CS->capacity__YBS=Self__0CS->count__WFC;
     };
-    __tmp__FDS=Self__OCS->storage__VBS;
-    if (((struct ___OBJ *)other__PCS)->__id==__STRING_CONSTANT__) {
-      __tmp__HDS=((__STRING_CONSTANT *)other__PCS)->storage__JQO;
+    __tmp__RDS=Self__0CS->storage__BCS;
+    if (((struct ___OBJ *)other__1CS)->__id==__STRING_CONSTANT__) {
+      __tmp__TDS=((__STRING_CONSTANT *)other__1CS)->storage__VQO;
     } else {
-      __tmp__HDS=((__STRING *)other__PCS)->storage__VBS;
+      __tmp__TDS=((__STRING *)other__1CS)->storage__BCS;
     };
-    Self__1F5G=((__CHARACTER *)__tmp__FDS);
-    model__2F5G=__tmp__HDS;
-    Self__0F5G=(__INTEGER)(Self__OCS->count__KFC -  1);
-    while ((Self__0F5G >=  0)) {
-      Self__1F5G[Self__0F5G]=((__CHARACTER *)model__2F5G)[Self__0F5G];
-      Self__0F5G=(__INTEGER)(Self__0F5G -  1);
+    Self__1RFH=((__CHARACTER *)__tmp__RDS);
+    model__2RFH=__tmp__TDS;
+    Self__0RFH=(__INTEGER)(Self__0CS->count__WFC -  1);
+    while ((Self__0RFH >=  0)) {
+      Self__1RFH[Self__0RFH]=((__CHARACTER *)model__2RFH)[Self__0RFH];
+      Self__0RFH=(__INTEGER)(Self__0RFH -  1);
     };
   };
 }
 
-static void append__VNS(__STRING *Self__WNS,void *other__XNS)
+static void append__BOS(__STRING *Self__COS,void *other__DOS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__AOS,needed_capacity__ZNS,old_nb_elts__N0DC;
-  __INTEGER upper__EG5G,Self__CG5G,dest__ZKBC,src_capacity__0KBC;
-  __INTEGER i2__KLBC,i1__JLBC;
-  __CHARACTER *Self__M0DC,*new__E1DC,*__tmp__3OS,*__tmp__4OS,*Self__XKBC;
-  __CHARACTER *src__YKBC;
-  if (((struct ___OBJ *)other__XNS)->__id==__STRING_CONSTANT__) {
-    __tmp__AOS=((__STRING_CONSTANT *)other__XNS)->count__DD;
+  __INTEGER __tmp__MOS,needed_capacity__FOS,old_nb_elts__Z0DC;
+  __INTEGER upper__ESFH,Self__CSFH,dest__FLBC,src_capacity__GLBC;
+  __INTEGER i2__WLBC,i1__VLBC;
+  __CHARACTER *Self__Y0DC,*new__Q1DC,*__tmp__JPS,*__tmp__KPS,*Self__DLBC;
+  __CHARACTER *src__ELBC;
+  if (((struct ___OBJ *)other__DOS)->__id==__STRING_CONSTANT__) {
+    __tmp__MOS=((__STRING_CONSTANT *)other__DOS)->count__DD;
   } else {
-    __tmp__AOS=((__STRING *)other__XNS)->count__KFC;
-  };
-  needed_capacity__ZNS=(__INTEGER)(Self__WNS->count__KFC + __tmp__AOS);
-  if ((Self__WNS->capacity__MBS < needed_capacity__ZNS)) {
-    if ((Self__WNS->capacity__MBS ==  0)) {
-      Self__WNS->capacity__MBS=needed_capacity__ZNS;
-      Self__WNS->storage__VBS=create__VLEB(needed_capacity__ZNS);
-    } else {
-      Self__M0DC=((__CHARACTER *)Self__WNS->storage__VBS);
-      old_nb_elts__N0DC=Self__WNS->capacity__MBS;
-      new__E1DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__FELC(((__POINTER )Self__M0DC),((__UINTEGER_32 )old_nb_elts__N0DC),((__UINTEGER_32 )needed_capacity__ZNS)));
-      upper__EG5G=(__INTEGER)(needed_capacity__ZNS -  1);
-      Self__CG5G=old_nb_elts__N0DC;
-      while ((Self__CG5G <= upper__EG5G)) {
-        new__E1DC[Self__CG5G]='\0';
-        Self__CG5G=(__INTEGER)(Self__CG5G +  1);
-      };
-      Self__WNS->storage__VBS=new__E1DC;
-      Self__WNS->capacity__MBS=needed_capacity__ZNS;
-    };
-  };
-  __tmp__3OS=Self__WNS->storage__VBS;
-  if (((struct ___OBJ *)other__XNS)->__id==__STRING_CONSTANT__) {
-    __tmp__4OS=((__STRING_CONSTANT *)other__XNS)->storage__JQO;
+    __tmp__MOS=((__STRING *)other__DOS)->count__WFC;
+  };
+  needed_capacity__FOS=(__INTEGER)(Self__COS->count__WFC + __tmp__MOS);
+  if ((Self__COS->capacity__YBS < needed_capacity__FOS)) {
+    if ((Self__COS->capacity__YBS ==  0)) {
+      Self__COS->capacity__YBS=needed_capacity__FOS;
+      Self__COS->storage__BCS=create__BMEB(needed_capacity__FOS);
+    } else {
+      Self__Y0DC=((__CHARACTER *)Self__COS->storage__BCS);
+      old_nb_elts__Z0DC=Self__COS->capacity__YBS;
+      new__Q1DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__RELC(((__POINTER )Self__Y0DC),((__UINTEGER_32 )old_nb_elts__Z0DC),((__UINTEGER_32 )needed_capacity__FOS)));
+      upper__ESFH=(__INTEGER)(needed_capacity__FOS -  1);
+      Self__CSFH=old_nb_elts__Z0DC;
+      while ((Self__CSFH <= upper__ESFH)) {
+        new__Q1DC[Self__CSFH]='\0';
+        Self__CSFH=(__INTEGER)(Self__CSFH +  1);
+      };
+      Self__COS->storage__BCS=new__Q1DC;
+      Self__COS->capacity__YBS=needed_capacity__FOS;
+    };
+  };
+  __tmp__JPS=Self__COS->storage__BCS;
+  if (((struct ___OBJ *)other__DOS)->__id==__STRING_CONSTANT__) {
+    __tmp__KPS=((__STRING_CONSTANT *)other__DOS)->storage__VQO;
   } else {
-    __tmp__4OS=((__STRING *)other__XNS)->storage__VBS;
-  };
-  Self__XKBC=((__CHARACTER *)__tmp__3OS);
-  src__YKBC=__tmp__4OS;
-  dest__ZKBC=Self__WNS->count__KFC;
-  src_capacity__0KBC=__tmp__AOS;
-  i2__KLBC= 0;
-  i1__JLBC=dest__ZKBC;
-  while ((i2__KLBC != src_capacity__0KBC)) {
-    Self__XKBC[i1__JLBC]=((__CHARACTER *)src__YKBC)[i2__KLBC];
-    i2__KLBC=(__INTEGER)(i2__KLBC +  1);
-    i1__JLBC=(__INTEGER)(i1__JLBC +  1);
-  };
-  Self__WNS->count__KFC=needed_capacity__ZNS;
+    __tmp__KPS=((__STRING *)other__DOS)->storage__BCS;
+  };
+  Self__DLBC=((__CHARACTER *)__tmp__JPS);
+  src__ELBC=__tmp__KPS;
+  dest__FLBC=Self__COS->count__WFC;
+  src_capacity__GLBC=__tmp__MOS;
+  i2__WLBC= 0;
+  i1__VLBC=dest__FLBC;
+  while ((i2__WLBC != src_capacity__GLBC)) {
+    Self__DLBC[i1__VLBC]=((__CHARACTER *)src__ELBC)[i2__WLBC];
+    i2__WLBC=(__INTEGER)(i2__WLBC +  1);
+    i1__VLBC=(__INTEGER)(i1__VLBC +  1);
+  };
+  Self__COS->count__WFC=needed_capacity__FOS;
 }
 
-static void* parent_directory__CED()
+static void* parent_directory__OED()
 // () With resultNo recursive, No inlinable.
 {
-  __STRING *Self__JG5G,*Self__OMAH;
-  void *__tmp__SED;
-  void *__tmp__TED,*result__GED;
-  __CHARACTER *cwd__FED;
-  ((__STRING *)string_tmp__HED)->count__KFC= 0;
-  Self__JG5G=((__STRING *)string_tmp__HED);
-  if ((Self__JG5G->capacity__MBS > Self__JG5G->count__KFC)) {
-    ((__CHARACTER *)Self__JG5G->storage__VBS)[Self__JG5G->count__KFC]='\0';
+  __STRING *Self__JSFH,*Self__CZGH;
+  void *__tmp__4ED;
+  void *__tmp__5ED,*result__SED;
+  __CHARACTER *cwd__RED;
+  ((__STRING *)string_tmp__TED)->count__WFC= 0;
+  Self__JSFH=((__STRING *)string_tmp__TED);
+  if ((Self__JSFH->capacity__YBS > Self__JSFH->count__WFC)) {
+    ((__CHARACTER *)Self__JSFH->storage__BCS)[Self__JSFH->count__WFC]='\0';
   } else {
-    add_last__NLT(Self__JG5G,'\0');
-    Self__JG5G->count__KFC=(__INTEGER)(Self__JG5G->count__KFC -  1);
-  };
-  cwd__FED=Self__JG5G->storage__VBS;
-  getcwd((cwd__FED),255);
-  Self__OMAH=((__STRING *)string_tmp__HED);
-  Self__OMAH->count__KFC= 0;
-  while ((((__CHARACTER *)cwd__FED)[Self__OMAH->count__KFC] != '\0')) {
-    Self__OMAH->count__KFC=(__INTEGER)(Self__OMAH->count__KFC +  1);
-  };
-  if (((void *)Self__OMAH->storage__VBS != (void *)cwd__FED)) {
-    Self__OMAH->storage__VBS=cwd__FED;
-    Self__OMAH->capacity__MBS=(__INTEGER)(Self__OMAH->count__KFC +  1);
-  };
-  __tmp__SED=physical_get_entry__3BF(string_tmp__HED);
-  if (__tmp__SED==NULL) {
-    __tmp__TED=NULL;
+    add_last__ZLT(Self__JSFH,'\0');
+    Self__JSFH->count__WFC=(__INTEGER)(Self__JSFH->count__WFC -  1);
+  };
+  cwd__RED=Self__JSFH->storage__BCS;
+  getcwd((cwd__RED),255);
+  Self__CZGH=((__STRING *)string_tmp__TED);
+  Self__CZGH->count__WFC= 0;
+  while ((((__CHARACTER *)cwd__RED)[Self__CZGH->count__WFC] != '\0')) {
+    Self__CZGH->count__WFC=(__INTEGER)(Self__CZGH->count__WFC +  1);
+  };
+  if (((void *)Self__CZGH->storage__BCS != (void *)cwd__RED)) {
+    Self__CZGH->storage__BCS=cwd__RED;
+    Self__CZGH->capacity__YBS=(__INTEGER)(Self__CZGH->count__WFC +  1);
+  };
+  __tmp__4ED=physical_get_entry__JCF(string_tmp__TED);
+  if (__tmp__4ED==NULL) {
+    __tmp__5ED=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__SED)->__id) {
+    switch (((struct ___OBJ *)__tmp__4ED)->__id) {
     case __DIRECTORY_UNIX__: {
-      __tmp__TED=((void *)__tmp__SED);
+      __tmp__5ED=((void *)__tmp__4ED);
     } break;
     case __FILE_UNIX__: {
-      __tmp__TED=NULL;
+      __tmp__5ED=NULL;
     } break;
     }
   };
-  result__GED=__tmp__TED;
-  put__to__F0S(alias__YED,__tmp__TED,((__DIRECTORY_UNIX *)__tmp__TED)->parent_entry_unix__NED.parent_entry__MED.path__BD);
-  FILE_SYSTEM__->parent_directory__CFD=__tmp__TED;
-  FILE_SYSTEM__->parent_directory__DFD=0;
-  return(__tmp__TED);
+  result__SED=__tmp__5ED;
+  put__to__R0S(alias__EFD,__tmp__5ED,((__DIRECTORY_UNIX *)__tmp__5ED)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
+  FILE_SYSTEM__->parent_directory__OFD=__tmp__5ED;
+  FILE_SYSTEM__->parent_directory__PFD=0;
+  return(__tmp__5ED);
 }
 
-static void* get_entry__H0AC(void *p__J0AC)
+static void* get_entry__T0AC(void *p__V0AC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__L0AC;
-  __INTEGER idx__M0AC,idx__FN5G,n__KN5G,n__LN5G,__tmp__W2AC;
-  void *__tmp__3EIC,*__tmp__B3AC,*dir__52AC;
-  __STRING *Self__IF3G,*Self__JN5G;
-  __CHARACTER *Self__HN5G;
-  __BOOLEAN __tmp__F2AC,__tmp__Q2AC;
-  result__L0AC=NULL;
-  idx__M0AC= 0;
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  void *result__X0AC;
+  __INTEGER idx__Y0AC,idx__RZFH,n__WZFH,n__XZFH,__tmp__C3AC;
+  void *__tmp__JFIC,*__tmp__N3AC,*dir__L3AC;
+  __STRING *Self__FSDH,*Self__VZFH;
+  __CHARACTER *Self__TZFH;
+  __BOOLEAN __tmp__R2AC,__tmp__22AC;
+  result__X0AC=NULL;
+  idx__Y0AC= 0;
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
-    __tmp__3EIC=FILE_SYSTEM__->parent_directory__CFD;
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    __tmp__JFIC=FILE_SYSTEM__->parent_directory__OFD;
   } else {
-    __tmp__3EIC=parent_directory__CED();
+    __tmp__JFIC=parent_directory__OED();
   };
-  copy__NCS(string_tmp2__N0AC,((__DIRECTORY_UNIX *)__tmp__3EIC)->parent_entry_unix__NED.parent_entry__MED.path__BD);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  copy__ZCS(string_tmp2__Z0AC,((__DIRECTORY_UNIX *)__tmp__JFIC)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  add_last__NLT(string_tmp2__N0AC,'/');
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  add_last__ZLT(string_tmp2__Z0AC,'/');
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  append__VNS(string_tmp2__N0AC,p__J0AC);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  append__BOS(string_tmp2__Z0AC,p__V0AC);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  reduce_path__E3HC(string_tmp2__N0AC);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  reduce_path__Q3HC(string_tmp2__Z0AC);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  copy__NCS(string_tmp3__T0AC,string_tmp2__N0AC);
+  copy__ZCS(string_tmp3__50AC,string_tmp2__Z0AC);
   do {
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    result__L0AC=reference_at__YT0C(alias__YED,string_tmp2__N0AC);
-    if (((void *)result__L0AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    result__X0AC=reference_at__EU0C(alias__EFD,string_tmp2__Z0AC);
+    if (((void *)result__X0AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__PFD==0) {
       } else {
-        parent_directory__CED();
+        parent_directory__OED();
       };
-      Self__IF3G=((__STRING *)string_tmp2__N0AC);
-      Self__HN5G=((__CHARACTER *)Self__IF3G->storage__VBS);
-      idx__FN5G=(__INTEGER)(Self__IF3G->count__KFC -  1);
-      while ((! ((idx__FN5G <  0) || ('/' == Self__HN5G[idx__FN5G])))) {
-        idx__FN5G=(__INTEGER)(idx__FN5G -  1);
+      Self__FSDH=((__STRING *)string_tmp2__Z0AC);
+      Self__TZFH=((__CHARACTER *)Self__FSDH->storage__BCS);
+      idx__RZFH=(__INTEGER)(Self__FSDH->count__WFC -  1);
+      while ((! ((idx__RZFH <  0) || ('/' == Self__TZFH[idx__RZFH])))) {
+        idx__RZFH=(__INTEGER)(idx__RZFH -  1);
       };
-      idx__M0AC=(__INTEGER)( 1 + idx__FN5G);
-      if ((idx__M0AC >  0)) {
-        if (FILE_SYSTEM__->parent_directory__DFD==0) {
+      idx__Y0AC=(__INTEGER)( 1 + idx__RZFH);
+      if ((idx__Y0AC >  0)) {
+        if (FILE_SYSTEM__->parent_directory__PFD==0) {
         } else {
-          parent_directory__CED();
+          parent_directory__OED();
         };
-        Self__JN5G=((__STRING *)string_tmp2__N0AC);
-        n__KN5G=(__INTEGER)(idx__M0AC -  1);
-        if ((n__KN5G < Self__JN5G->count__KFC)) {
-          n__LN5G=(__INTEGER)(Self__JN5G->count__KFC - n__KN5G);
-          if ((n__LN5G > Self__JN5G->count__KFC)) {
-            Self__JN5G->count__KFC= 0;
+        Self__VZFH=((__STRING *)string_tmp2__Z0AC);
+        n__WZFH=(__INTEGER)(idx__Y0AC -  1);
+        if ((n__WZFH < Self__VZFH->count__WFC)) {
+          n__XZFH=(__INTEGER)(Self__VZFH->count__WFC - n__WZFH);
+          if ((n__XZFH > Self__VZFH->count__WFC)) {
+            Self__VZFH->count__WFC= 0;
           } else {
-            Self__JN5G->count__KFC=(__INTEGER)(Self__JN5G->count__KFC - n__LN5G);
+            Self__VZFH->count__WFC=(__INTEGER)(Self__VZFH->count__WFC - n__XZFH);
           };
         };
       } else {
-        if (FILE_SYSTEM__->parent_directory__DFD==0) {
+        if (FILE_SYSTEM__->parent_directory__PFD==0) {
         } else {
-          parent_directory__CED();
+          parent_directory__OED();
         };
-        ((__STRING *)string_tmp2__N0AC)->count__KFC= 0;
+        ((__STRING *)string_tmp2__Z0AC)->count__WFC= 0;
       };
     };
-    if (((void *)result__L0AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (((void *)result__X0AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__PFD==0) {
       } else {
-        parent_directory__CED();
+        parent_directory__OED();
       };
-      __tmp__F2AC=(((__STRING *)string_tmp2__N0AC)->count__KFC !=  0);
+      __tmp__R2AC=(((__STRING *)string_tmp2__Z0AC)->count__WFC !=  0);
     } else {
-      __tmp__F2AC=FALSE__;
+      __tmp__R2AC=FALSE__;
     };
-  } while (__tmp__F2AC);
-  if (((void *)result__L0AC == (void *)NULL)) {
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  } while (__tmp__R2AC);
+  if (((void *)result__X0AC == (void *)NULL)) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    result__L0AC=physical_get_entry__MW0C(string_tmp3__T0AC);
-    __tmp__Q2AC=TRUE__;
+    result__X0AC=physical_get_entry__YW0C(string_tmp3__50AC);
+    __tmp__22AC=TRUE__;
   } else {
-    __tmp__Q2AC=FALSE__;
+    __tmp__22AC=FALSE__;
   };
-  if ((! __tmp__Q2AC)) {
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  if ((! __tmp__22AC)) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    __tmp__W2AC=((__STRING *)string_tmp3__T0AC)->count__KFC;
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    __tmp__C3AC=((__STRING *)string_tmp3__50AC)->count__WFC;
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    if ((__tmp__W2AC != ((__STRING *)string_tmp2__N0AC)->count__KFC)) {
-      if (result__L0AC==NULL) {
-        __tmp__B3AC=NULL;
+    if ((__tmp__C3AC != ((__STRING *)string_tmp2__Z0AC)->count__WFC)) {
+      if (result__X0AC==NULL) {
+        __tmp__N3AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__L0AC)->__id) {
+        switch (((struct ___OBJ *)result__X0AC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__B3AC=((void *)result__L0AC);
+          __tmp__N3AC=((void *)result__X0AC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__B3AC=NULL;
+          __tmp__N3AC=NULL;
         } break;
         }
       };
-      dir__52AC=__tmp__B3AC;
-      if (FILE_SYSTEM__->parent_directory__DFD==0) {
+      dir__L3AC=__tmp__N3AC;
+      if (FILE_SYSTEM__->parent_directory__PFD==0) {
       } else {
-        parent_directory__CED();
+        parent_directory__OED();
       };
-      result__L0AC=physical_get_entry__3BF(string_tmp3__T0AC);
+      result__X0AC=physical_get_entry__JCF(string_tmp3__50AC);
     };
   };
-  return(result__L0AC);
+  return(result__X0AC);
 }
 
-static void put_string__I1F(void *s__K1F)
+static void put_string__U1F(void *s__W1F)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__Z1F,__tmp__11F,Self__MWG,limit_up__NWG;
-  __CHARACTER __tmp__C2F;
-  if (((struct ___OBJ *)s__K1F)->__id==__STRING_CONSTANT__) {
-    __tmp__Z1F= 1;
+  __INTEGER __tmp__F2F,__tmp__H2F,Self__YWG,limit_up__ZWG;
+  __CHARACTER __tmp__O2F;
+  if (((struct ___OBJ *)s__W1F)->__id==__STRING_CONSTANT__) {
+    __tmp__F2F= 1;
   } else {
-    __tmp__Z1F= 1;
+    __tmp__F2F= 1;
   };
-  if (((struct ___OBJ *)s__K1F)->__id==__STRING_CONSTANT__) {
-    __tmp__11F=((__STRING_CONSTANT *)s__K1F)->count__DD;
+  if (((struct ___OBJ *)s__W1F)->__id==__STRING_CONSTANT__) {
+    __tmp__H2F=((__STRING_CONSTANT *)s__W1F)->count__DD;
   } else {
-    __tmp__11F=((__STRING *)s__K1F)->count__KFC;
+    __tmp__H2F=((__STRING *)s__W1F)->count__WFC;
   };
-  Self__MWG=__tmp__Z1F;
-  limit_up__NWG=__tmp__11F;
-  while ((Self__MWG <= limit_up__NWG)) {
-    if (((struct ___OBJ *)s__K1F)->__id==__STRING_CONSTANT__) {
-      __tmp__C2F=((__CHARACTER *)((__STRING_CONSTANT *)s__K1F)->storage__JQO)[(__INTEGER)(Self__MWG -  1)];
+  Self__YWG=__tmp__F2F;
+  limit_up__ZWG=__tmp__H2F;
+  while ((Self__YWG <= limit_up__ZWG)) {
+    if (((struct ___OBJ *)s__W1F)->__id==__STRING_CONSTANT__) {
+      __tmp__O2F=((__CHARACTER *)((__STRING_CONSTANT *)s__W1F)->storage__VQO)[(__INTEGER)(Self__YWG -  1)];
     } else {
-      __tmp__C2F=((__CHARACTER *)((__STRING *)s__K1F)->storage__VBS)[(__INTEGER)(Self__MWG -  1)];
+      __tmp__O2F=((__CHARACTER *)((__STRING *)s__W1F)->storage__BCS)[(__INTEGER)(Self__YWG -  1)];
     };
-    fputc((int)(__tmp__C2F),stderr);
-    Self__MWG=(__INTEGER)(Self__MWG +  1);
+    fputc((int)(__tmp__O2F),stderr);
+    Self__YWG=(__INTEGER)(Self__YWG +  1);
   };
 }
 
-static __PROTOTYPE* create__name__generic_count__NAC(void *f__PAC,void *n__QAC)
+static __PROTOTYPE* create__name__generic_count__ZAC(void *f__1AC,void *n__2AC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __PROTOTYPE *result__PUC,*Self__USS;
-  __POINTER ptr__QUC,ptr_table__SMAH,next__RMAH,result__TMAH;
-  __POINTER ptr_table__XMAH,next__WMAH,result__YMAH,ptr__0E3;
-  __POINTER ptr_table__FNAH,next__ENAH,result__GNAH,ptr_table__KNAH;
-  __POINTER next__JNAH,result__LNAH,ptr__50GD,ptr_table__UNAH;
-  __POINTER next__TNAH,result__VNAH,ptr_table__ZNAH,next__YNAH;
-  __POINTER result__0NAH,file__YSS,ptr__5K3,ptr_table__4NAH,next__3NAH;
-  __POINTER result__5NAH,ptr_table__DOAH,next__COAH,result__EOAH;
-  __INTEGER typ_id__VUC,idx__NN5G,idx__1SS,len__3MAH,__tmp__4MAH;
-  __INTEGER __tmp__ANAH,Self__BNAH,typ_id__5E3,new_capacity__GTX;
-  __INTEGER __tmp__KUX,__tmp__VNEC,Self__QOVD,result__ONAH,__tmp__QNAH;
-  __INTEGER Self__RNAH,idx__ANBC,idx__UYGD,new_capacity__VYGD,i__WYGD;
-  __INTEGER result__UNW,__tmp__VNW,Self__LT1,typ_id__E1GD,result__HWX;
-  __INTEGER typ_id__EL3,new_capacity__HMJC;
-  __UINTEGER_32 sz__SUC,a__RF3G,new_size__SF3G,t__WF3G,a__VF3G;
-  __UINTEGER_32 new_size__0MAH,lab_type__ZMAH,sz__2E3,a__ZF3G;
-  __UINTEGER_32 new_size__0F3G,t__4F3G,a__3F3G,new_size__NNAH;
-  __UINTEGER_32 lab_type__MNAH,sz__B1GD,a__QG3G,new_size__RG3G,t__VG3G;
-  __UINTEGER_32 a__UG3G,new_size__2NAH,lab_type__1NAH,sz__BL3,a__YG3G;
-  __UINTEGER_32 new_size__ZG3G,t__3G3G,a__2G3G,new_size__GOAH;
-  __UINTEGER_32 lab_type__FOAH;
-  __STRING_CONSTANT *Self__MRX,*Self__PNAH,*Self__SNW;
-  __STRING *Self__MG5G,*Self__UG5G,*Self__XG5G,*Self__RYS;
-  void *__tmp__JUS;
-  __CHARACTER *Self__PN5G,*ptr__QWX;
-  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__ZE3,*Self__T2BC;
-  __FAST_ARRAYoPROTOTYPEo *Self__ETX;
-  __BOOLEAN __tmp__UTX;
-  void **__tmp__JUX,**new__BNEC;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__WMBC;
-  void *node__CNBC,*node1__YYGD,*node2__ZYGD,*__tmp__WOBC;
-  void **old_buckets__XYGD;
-  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__40GD;
-  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__N3SD;
-  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__4K3,*Self__J4BC;
-  result__PUC=NULL;
-  ptr__QUC=((__POINTER )(NULL));
-  typ_id__VUC= 0;
-  sz__SUC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
-  if ((sz__SUC ==  0)) {
-    result__PUC=PROTOTYPE__;
+  __PROTOTYPE *result__1UC,*Self__ATS;
+  __POINTER ptr__2UC,ptr_table__GZGH,next__FZGH,result__HZGH;
+  __POINTER ptr_table__LZGH,next__KZGH,result__MZGH,ptr__GF3;
+  __POINTER ptr_table__ZZGH,next__YZGH,result__0ZGH,ptr_table__4ZGH;
+  __POINTER next__3ZGH,result__5ZGH,ptr__L1GD,ptr_table__I0GH;
+  __POINTER next__H0GH,result__J0GH,ptr_table__N0GH,next__M0GH;
+  __POINTER result__O0GH,file__ETS,ptr__LL3,ptr_table__S0GH,next__R0GH;
+  __POINTER result__T0GH,ptr_table__X0GH,next__W0GH,result__Y0GH;
+  __INTEGER typ_id__BVC,idx__ZZFH,idx__HTS,len__RZGH,__tmp__SZGH;
+  __INTEGER __tmp__UZGH,Self__VZGH,typ_id__LF3,new_capacity__STX;
+  __INTEGER __tmp__WUX,__tmp__BOEC,Self__JPVD,result__C0GH,__tmp__E0GH;
+  __INTEGER Self__F0GH,idx__MNBC,idx__AZGD,new_capacity__BZGD,i__CZGD;
+  __INTEGER result__AOW,__tmp__BOW,Self__XT1,typ_id__Q1GD,result__TWX;
+  __INTEGER typ_id__QL3,new_capacity__TMJC;
+  __UINTEGER_32 sz__4UC,a__OSDH,new_size__PSDH,t__TSDH,a__SSDH;
+  __UINTEGER_32 new_size__OZGH,lab_type__NZGH,sz__IF3,a__WSDH;
+  __UINTEGER_32 new_size__XSDH,t__1SDH,a__0SDH,new_size__B0GH;
+  __UINTEGER_32 lab_type__A0GH,sz__N1GD,a__NTDH,new_size__OTDH,t__STDH;
+  __UINTEGER_32 a__RTDH,new_size__Q0GH,lab_type__P0GH,sz__NL3,a__VTDH;
+  __UINTEGER_32 new_size__WTDH,t__0TDH,a__ZTDH,new_size__00GH;
+  __UINTEGER_32 lab_type__Z0GH;
+  __STRING_CONSTANT *Self__YRX,*Self__D0GH,*Self__4NW;
+  __STRING *Self__MSFH,*Self__USFH,*Self__XSFH,*Self__3YS;
+  void *__tmp__VUS;
+  __CHARACTER *Self__1ZFH,*ptr__2WX;
+  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__FF3,*Self__52BC;
+  __FAST_ARRAYoPROTOTYPEo *Self__QTX;
+  __BOOLEAN __tmp__AUX;
+  void **__tmp__VUX,**new__NNEC;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__CNBC;
+  void *node__ONBC,*node1__EZGD,*node2__FZGD,*__tmp__CPBC;
+  void **old_buckets__DZGD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__K1GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__Z3SD;
+  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__KL3,*Self__V4BC;
+  result__1UC=NULL;
+  ptr__2UC=((__POINTER )(NULL));
+  typ_id__BVC= 0;
+  sz__4UC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
+  if ((sz__4UC ==  0)) {
+    result__1UC=PROTOTYPE__;
   } else {
-    typ_id__VUC=__PROTOTYPE__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__SUC);
-    if ((typ_id__VUC == (__INTEGER)(-  1))) {
-      a__RF3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SF3G=(__UINTEGER_32)((__UINTEGER_32)(sz__SUC + a__RF3G) & (__UINTEGER_32)(~ a__RF3G));
-      ptr_table__SMAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SF3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RMAH=((__POINTER )(NULL));
-      result__TMAH=((__POINTER *)ptr_table__SMAH)[ 0];
-      if ((result__TMAH == (void *)NULL)) {
-        result__TMAH=new_lab__ARJ(new_size__SF3G);
-        next__RMAH=(void *)((unsigned long)result__TMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SF3G)));
-        ((__POINTER *)next__RMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SMAH)[ 0]=next__RMAH;
-      } else {
-        next__RMAH=((__POINTER *)result__TMAH)[ 0];
-        if ((next__RMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TMAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SF3G <<  1)) <=  4096)) {
-            next__RMAH=(void *)((unsigned long)result__TMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SF3G)));
-          } else {
-            next__RMAH=new_lab__ARJ(new_size__SF3G);
-          };
-          ((__POINTER *)next__RMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SMAH)[ 0]=next__RMAH;
-        } else {
-          ((__POINTER *)result__TMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TMAH=next__RMAH;
-        };
-      };
-      ptr__QUC=result__TMAH;
-    } else {
-      t__WF3G=((__UINTEGER_32 )typ_id__VUC);
-      a__VF3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0MAH=(__UINTEGER_32)((__UINTEGER_32)(sz__SUC + a__VF3G) & (__UINTEGER_32)(~ a__VF3G));
-      ptr_table__XMAH=((__POINTER )(&(table_type[(t__WF3G)])));
-      lab_type__ZMAH=(__UINTEGER_32)(t__WF3G |  1);
-      next__WMAH=((__POINTER )(NULL));
-      result__YMAH=((__POINTER *)ptr_table__XMAH)[ 0];
-      if ((result__YMAH == (void *)NULL)) {
-        result__YMAH=new_lab__ARJ(lab_type__ZMAH);
-        next__WMAH=(void *)((unsigned long)result__YMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MAH)));
-        ((__POINTER *)next__WMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XMAH)[ 0]=next__WMAH;
-      } else {
-        next__WMAH=((__POINTER *)result__YMAH)[ 0];
-        if ((next__WMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YMAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0MAH <<  1)) <=  4096)) {
-            next__WMAH=(void *)((unsigned long)result__YMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MAH)));
-          } else {
-            next__WMAH=new_lab__ARJ(lab_type__ZMAH);
-          };
-          ((__POINTER *)next__WMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XMAH)[ 0]=next__WMAH;
-        } else {
-          ((__POINTER *)result__YMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YMAH=next__WMAH;
-        };
-      };
-      ptr__QUC=result__YMAH;
-    };
-    result__PUC=((__PROTOTYPE *)ptr__QUC);
-    *(result__PUC) = *(PROTOTYPE__);
-  };
-  Self__USS=((__PROTOTYPE *)result__PUC);
-  Self__USS->filename__IPG=f__PAC;
-  Self__USS->parent_named__5.name__LI=n__QAC;
-  Self__MRX=((__STRING_CONSTANT *)n__QAC);
-  Self__PN5G=((__CHARACTER *)Self__MRX->storage__JQO);
-  idx__NN5G=(__INTEGER)(Self__MRX->count__DD -  1);
-  while ((! ((idx__NN5G <  0) || ('.' == Self__PN5G[idx__NN5G])))) {
-    idx__NN5G=(__INTEGER)(idx__NN5G -  1);
-  };
-  idx__1SS=(__INTEGER)( 1 + idx__NN5G);
-  if ((idx__1SS !=  0)) {
-    copy__NCS(string_tmp__VH,n__QAC);
-    Self__MG5G=((__STRING *)string_tmp__VH);
-    if ((idx__1SS > Self__MG5G->count__KFC)) {
-      Self__MG5G->count__KFC= 0;
-    } else {
-      if ((idx__1SS >  0)) {
-        len__3MAH=(__INTEGER)((__INTEGER)(idx__1SS -  1) +  1);
-        if ((len__3MAH >  0)) {
-          __tmp__4MAH=(__INTEGER)(idx__1SS +  1);
-          __tmp__ANAH=Self__MG5G->count__KFC;
-          Self__BNAH=__tmp__4MAH;
-          while ((Self__BNAH <= __tmp__ANAH)) {
-            ((__CHARACTER *)Self__MG5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__BNAH - len__3MAH) -  1)]=((__CHARACTER *)Self__MG5G->storage__VBS)[(__INTEGER)(Self__BNAH -  1)];
-            Self__BNAH=(__INTEGER)(Self__BNAH +  1);
-          };
-          Self__MG5G->count__KFC=(__INTEGER)(Self__MG5G->count__KFC - len__3MAH);
-        };
-      };
-    };
-    Self__USS->shortname__ZHE=get__2VB(string_tmp__VH);
+    typ_id__BVC=__PROTOTYPE__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4UC);
+    if ((typ_id__BVC == (__INTEGER)(-  1))) {
+      a__OSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PSDH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UC + a__OSDH) & (__UINTEGER_32)(~ a__OSDH));
+      ptr_table__GZGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PSDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FZGH=((__POINTER )(NULL));
+      result__HZGH=((__POINTER *)ptr_table__GZGH)[ 0];
+      if ((result__HZGH == (void *)NULL)) {
+        result__HZGH=new_lab__MRJ(new_size__PSDH);
+        next__FZGH=(void *)((unsigned long)result__HZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSDH)));
+        ((__POINTER *)next__FZGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GZGH)[ 0]=next__FZGH;
+      } else {
+        next__FZGH=((__POINTER *)result__HZGH)[ 0];
+        if ((next__FZGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HZGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PSDH <<  1)) <=  4096)) {
+            next__FZGH=(void *)((unsigned long)result__HZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSDH)));
+          } else {
+            next__FZGH=new_lab__MRJ(new_size__PSDH);
+          };
+          ((__POINTER *)next__FZGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GZGH)[ 0]=next__FZGH;
+        } else {
+          ((__POINTER *)result__HZGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FZGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HZGH=next__FZGH;
+        };
+      };
+      ptr__2UC=result__HZGH;
+    } else {
+      t__TSDH=((__UINTEGER_32 )typ_id__BVC);
+      a__SSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UC + a__SSDH) & (__UINTEGER_32)(~ a__SSDH));
+      ptr_table__LZGH=((__POINTER )(&(table_type[(t__TSDH)])));
+      lab_type__NZGH=(__UINTEGER_32)(t__TSDH |  1);
+      next__KZGH=((__POINTER )(NULL));
+      result__MZGH=((__POINTER *)ptr_table__LZGH)[ 0];
+      if ((result__MZGH == (void *)NULL)) {
+        result__MZGH=new_lab__MRJ(lab_type__NZGH);
+        next__KZGH=(void *)((unsigned long)result__MZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZGH)));
+        ((__POINTER *)next__KZGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LZGH)[ 0]=next__KZGH;
+      } else {
+        next__KZGH=((__POINTER *)result__MZGH)[ 0];
+        if ((next__KZGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MZGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OZGH <<  1)) <=  4096)) {
+            next__KZGH=(void *)((unsigned long)result__MZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZGH)));
+          } else {
+            next__KZGH=new_lab__MRJ(lab_type__NZGH);
+          };
+          ((__POINTER *)next__KZGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LZGH)[ 0]=next__KZGH;
+        } else {
+          ((__POINTER *)result__MZGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KZGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MZGH=next__KZGH;
+        };
+      };
+      ptr__2UC=result__MZGH;
+    };
+    result__1UC=((__PROTOTYPE *)ptr__2UC);
+    *(result__1UC) = *(PROTOTYPE__);
+  };
+  Self__ATS=((__PROTOTYPE *)result__1UC);
+  Self__ATS->filename__UPG=f__1AC;
+  Self__ATS->parent_named__5.name__LI=n__2AC;
+  Self__YRX=((__STRING_CONSTANT *)n__2AC);
+  Self__1ZFH=((__CHARACTER *)Self__YRX->storage__VQO);
+  idx__ZZFH=(__INTEGER)(Self__YRX->count__DD -  1);
+  while ((! ((idx__ZZFH <  0) || ('.' == Self__1ZFH[idx__ZZFH])))) {
+    idx__ZZFH=(__INTEGER)(idx__ZZFH -  1);
+  };
+  idx__HTS=(__INTEGER)( 1 + idx__ZZFH);
+  if ((idx__HTS !=  0)) {
+    copy__ZCS(string_tmp__VH,n__2AC);
+    Self__MSFH=((__STRING *)string_tmp__VH);
+    if ((idx__HTS > Self__MSFH->count__WFC)) {
+      Self__MSFH->count__WFC= 0;
+    } else {
+      if ((idx__HTS >  0)) {
+        len__RZGH=(__INTEGER)((__INTEGER)(idx__HTS -  1) +  1);
+        if ((len__RZGH >  0)) {
+          __tmp__SZGH=(__INTEGER)(idx__HTS +  1);
+          __tmp__UZGH=Self__MSFH->count__WFC;
+          Self__VZGH=__tmp__SZGH;
+          while ((Self__VZGH <= __tmp__UZGH)) {
+            ((__CHARACTER *)Self__MSFH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__VZGH - len__RZGH) -  1)]=((__CHARACTER *)Self__MSFH->storage__BCS)[(__INTEGER)(Self__VZGH -  1)];
+            Self__VZGH=(__INTEGER)(Self__VZGH +  1);
+          };
+          Self__MSFH->count__WFC=(__INTEGER)(Self__MSFH->count__WFC - len__RZGH);
+        };
+      };
+    };
+    Self__ATS->shortname__FIE=get__IWB(string_tmp__VH);
   } else {
-    Self__USS->shortname__ZHE=n__QAC;
-  };
-  result__ZE3=NULL;
-  ptr__0E3=((__POINTER )(NULL));
-  typ_id__5E3= 0;
-  sz__2E3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
-  if ((sz__2E3 ==  0)) {
-    result__ZE3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    Self__ATS->shortname__FIE=n__2AC;
+  };
+  result__FF3=NULL;
+  ptr__GF3=((__POINTER )(NULL));
+  typ_id__LF3= 0;
+  sz__IF3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
+  if ((sz__IF3 ==  0)) {
+    result__FF3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
   } else {
-    typ_id__5E3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__2E3);
-    if ((typ_id__5E3 == (__INTEGER)(-  1))) {
-      a__ZF3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0F3G=(__UINTEGER_32)((__UINTEGER_32)(sz__2E3 + a__ZF3G) & (__UINTEGER_32)(~ a__ZF3G));
-      ptr_table__FNAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0F3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ENAH=((__POINTER )(NULL));
-      result__GNAH=((__POINTER *)ptr_table__FNAH)[ 0];
-      if ((result__GNAH == (void *)NULL)) {
-        result__GNAH=new_lab__ARJ(new_size__0F3G);
-        next__ENAH=(void *)((unsigned long)result__GNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0F3G)));
-        ((__POINTER *)next__ENAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FNAH)[ 0]=next__ENAH;
-      } else {
-        next__ENAH=((__POINTER *)result__GNAH)[ 0];
-        if ((next__ENAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GNAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0F3G <<  1)) <=  4096)) {
-            next__ENAH=(void *)((unsigned long)result__GNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0F3G)));
-          } else {
-            next__ENAH=new_lab__ARJ(new_size__0F3G);
-          };
-          ((__POINTER *)next__ENAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FNAH)[ 0]=next__ENAH;
-        } else {
-          ((__POINTER *)result__GNAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ENAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GNAH=next__ENAH;
-        };
-      };
-      ptr__0E3=result__GNAH;
-    } else {
-      t__4F3G=((__UINTEGER_32 )typ_id__5E3);
-      a__3F3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NNAH=(__UINTEGER_32)((__UINTEGER_32)(sz__2E3 + a__3F3G) & (__UINTEGER_32)(~ a__3F3G));
-      ptr_table__KNAH=((__POINTER )(&(table_type[(t__4F3G)])));
-      lab_type__MNAH=(__UINTEGER_32)(t__4F3G |  1);
-      next__JNAH=((__POINTER )(NULL));
-      result__LNAH=((__POINTER *)ptr_table__KNAH)[ 0];
-      if ((result__LNAH == (void *)NULL)) {
-        result__LNAH=new_lab__ARJ(lab_type__MNAH);
-        next__JNAH=(void *)((unsigned long)result__LNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NNAH)));
-        ((__POINTER *)next__JNAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KNAH)[ 0]=next__JNAH;
-      } else {
-        next__JNAH=((__POINTER *)result__LNAH)[ 0];
-        if ((next__JNAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LNAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NNAH <<  1)) <=  4096)) {
-            next__JNAH=(void *)((unsigned long)result__LNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NNAH)));
-          } else {
-            next__JNAH=new_lab__ARJ(lab_type__MNAH);
-          };
-          ((__POINTER *)next__JNAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KNAH)[ 0]=next__JNAH;
-        } else {
-          ((__POINTER *)result__LNAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LNAH=next__JNAH;
-        };
-      };
-      ptr__0E3=result__LNAH;
-    };
-    result__ZE3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__0E3);
-    *(result__ZE3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
-  };
-  Self__T2BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__ZE3);
-  if ((Self__T2BC->parent_arrayed_collection__HME.capacity__MBBC <  0)) {
-    Self__T2BC->parent_arrayed_collection__HME.storage__ICBC=create__JY1C( 0);
-    Self__T2BC->parent_arrayed_collection__HME.capacity__MBBC= 0;
-  };
-  Self__T2BC->parent_arrayed_collection__HME.upper__KBBC=(__INTEGER)(-  1);
-  Self__USS->idf_generic_list__IME=result__ZE3;
-  Self__USS->index__JMG=(__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__RCU -  1))) {
-    Self__ETX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.upper__HJ +  1);
-    __tmp__UTX=TRUE__;
+    typ_id__LF3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IF3);
+    if ((typ_id__LF3 == (__INTEGER)(-  1))) {
+      a__WSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XSDH=(__UINTEGER_32)((__UINTEGER_32)(sz__IF3 + a__WSDH) & (__UINTEGER_32)(~ a__WSDH));
+      ptr_table__ZZGH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XSDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YZGH=((__POINTER )(NULL));
+      result__0ZGH=((__POINTER *)ptr_table__ZZGH)[ 0];
+      if ((result__0ZGH == (void *)NULL)) {
+        result__0ZGH=new_lab__MRJ(new_size__XSDH);
+        next__YZGH=(void *)((unsigned long)result__0ZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XSDH)));
+        ((__POINTER *)next__YZGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZZGH)[ 0]=next__YZGH;
+      } else {
+        next__YZGH=((__POINTER *)result__0ZGH)[ 0];
+        if ((next__YZGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0ZGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XSDH <<  1)) <=  4096)) {
+            next__YZGH=(void *)((unsigned long)result__0ZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XSDH)));
+          } else {
+            next__YZGH=new_lab__MRJ(new_size__XSDH);
+          };
+          ((__POINTER *)next__YZGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZZGH)[ 0]=next__YZGH;
+        } else {
+          ((__POINTER *)result__0ZGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YZGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0ZGH=next__YZGH;
+        };
+      };
+      ptr__GF3=result__0ZGH;
+    } else {
+      t__1SDH=((__UINTEGER_32 )typ_id__LF3);
+      a__0SDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__B0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__IF3 + a__0SDH) & (__UINTEGER_32)(~ a__0SDH));
+      ptr_table__4ZGH=((__POINTER )(&(table_type[(t__1SDH)])));
+      lab_type__A0GH=(__UINTEGER_32)(t__1SDH |  1);
+      next__3ZGH=((__POINTER )(NULL));
+      result__5ZGH=((__POINTER *)ptr_table__4ZGH)[ 0];
+      if ((result__5ZGH == (void *)NULL)) {
+        result__5ZGH=new_lab__MRJ(lab_type__A0GH);
+        next__3ZGH=(void *)((unsigned long)result__5ZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0GH)));
+        ((__POINTER *)next__3ZGH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4ZGH)[ 0]=next__3ZGH;
+      } else {
+        next__3ZGH=((__POINTER *)result__5ZGH)[ 0];
+        if ((next__3ZGH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5ZGH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__B0GH <<  1)) <=  4096)) {
+            next__3ZGH=(void *)((unsigned long)result__5ZGH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0GH)));
+          } else {
+            next__3ZGH=new_lab__MRJ(lab_type__A0GH);
+          };
+          ((__POINTER *)next__3ZGH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4ZGH)[ 0]=next__3ZGH;
+        } else {
+          ((__POINTER *)result__5ZGH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3ZGH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5ZGH=next__3ZGH;
+        };
+      };
+      ptr__GF3=result__5ZGH;
+    };
+    result__FF3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__GF3);
+    *(result__FF3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
+  };
+  Self__52BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__FF3);
+  if ((Self__52BC->parent_arrayed_collection__TME.capacity__YBBC <  0)) {
+    Self__52BC->parent_arrayed_collection__TME.storage__UCBC=create__VY1C( 0);
+    Self__52BC->parent_arrayed_collection__TME.capacity__YBBC= 0;
+  };
+  Self__52BC->parent_arrayed_collection__TME.upper__WBBC=(__INTEGER)(-  1);
+  Self__ATS->idf_generic_list__UME=result__FF3;
+  Self__ATS->index__VMG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
+  Self__QTX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
+  new_capacity__STX= 0;
+  if (((__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.capacity__3CU -  1))) {
+    Self__QTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    __tmp__AUX=TRUE__;
   } else {
-    __tmp__UTX=FALSE__;
-  };
-  if ((! __tmp__UTX)) {
-    if ((Self__ETX->parent_arrayed_collection__AJ.capacity__RCU ==  0)) {
-      Self__ETX->parent_arrayed_collection__AJ.storage__4ST=create__0ESB( 2);
-      Self__ETX->parent_arrayed_collection__AJ.capacity__RCU= 2;
-      Self__ETX->parent_arrayed_collection__AJ.upper__HJ= 0;
-    } else {
-      new_capacity__GTX=(__INTEGER)(Self__ETX->parent_arrayed_collection__AJ.capacity__RCU <<  1);
-      __tmp__JUX=Self__ETX->parent_arrayed_collection__AJ.storage__4ST;
-      __tmp__KUX=Self__ETX->parent_arrayed_collection__AJ.capacity__RCU;
-      new__BNEC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__JUX)),((__UINTEGER_32 )(__INTEGER)(__tmp__KUX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__GTX * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__VNEC=(__INTEGER)(new_capacity__GTX -  1);
-      Self__QOVD=__tmp__KUX;
-      while ((Self__QOVD <= __tmp__VNEC)) {
-        new__BNEC[Self__QOVD]=NULL;
-        Self__QOVD=(__INTEGER)(Self__QOVD +  1);
-      };
-      Self__ETX->parent_arrayed_collection__AJ.storage__4ST=new__BNEC;
-      Self__ETX->parent_arrayed_collection__AJ.capacity__RCU=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__4ST)[Self__ETX->parent_arrayed_collection__AJ.upper__HJ]=Self__USS;
-  Self__WMBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__DTS);
-  Self__PNAH=((__STRING_CONSTANT *)f__PAC);
-  result__ONAH= 0;
-  __tmp__QNAH=Self__PNAH->count__DD;
-  Self__RNAH= 1;
-  while ((Self__RNAH <= __tmp__QNAH)) {
-    result__ONAH=(__INTEGER)((__INTEGER)( 5 * result__ONAH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PNAH->storage__JQO)[(__INTEGER)(Self__RNAH -  1)])));
-    Self__RNAH=(__INTEGER)(Self__RNAH +  1);
-  };
-  if ((result__ONAH <  0)) {
-    result__ONAH=(__INTEGER)(~ result__ONAH);
-  };
-  idx__ANBC=(__INTEGER)(result__ONAH % Self__WMBC->capacity__ENBC);
-  node__CNBC=((void **)Self__WMBC->buckets__JNBC)[idx__ANBC];
-  while ((! (((void *)node__CNBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__CNBC)->key__VNBC == (void *)f__PAC)))) {
-    node__CNBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__CNBC)->next__AOBC;
-  };
-  if (((void *)node__CNBC == (void *)NULL)) {
-    if ((Self__WMBC->capacity__ENBC == Self__WMBC->count__JOBC)) {
-      idx__UYGD= 0;
-      node1__YYGD=NULL;
-      node2__ZYGD=NULL;
-      old_buckets__XYGD=Self__WMBC->buckets__JNBC;
-      new_capacity__VYGD=prime_number_ceiling__L41((__INTEGER)(Self__WMBC->capacity__ENBC +  1));
-      Self__WMBC->buckets__JNBC=create__1HTC(new_capacity__VYGD);
-      i__WYGD=(__INTEGER)(Self__WMBC->capacity__ENBC -  1);
-      Self__WMBC->capacity__ENBC=new_capacity__VYGD;
-      while ((i__WYGD >=  0)) {
-        node1__YYGD=((void **)old_buckets__XYGD)[i__WYGD];
-        while (((void *)node1__YYGD != (void *)NULL)) {
-          node2__ZYGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__YYGD)->next__AOBC;
-          Self__SNW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__YYGD)->key__VNBC);
-          result__UNW= 0;
-          __tmp__VNW=Self__SNW->count__DD;
-          Self__LT1= 1;
-          while ((Self__LT1 <= __tmp__VNW)) {
-            result__UNW=(__INTEGER)((__INTEGER)( 5 * result__UNW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SNW->storage__JQO)[(__INTEGER)(Self__LT1 -  1)])));
-            Self__LT1=(__INTEGER)(Self__LT1 +  1);
-          };
-          if ((result__UNW <  0)) {
-            result__UNW=(__INTEGER)(~ result__UNW);
-          };
-          idx__UYGD=(__INTEGER)(result__UNW % Self__WMBC->capacity__ENBC);
-          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__YYGD)->next__AOBC=((void **)Self__WMBC->buckets__JNBC)[idx__UYGD];
-          ((void **)Self__WMBC->buckets__JNBC)[idx__UYGD]=node1__YYGD;
-          node1__YYGD=node2__ZYGD;
-        };
-        i__WYGD=(__INTEGER)(i__WYGD -  1);
-      };
-      idx__ANBC=(__INTEGER)(result__ONAH % new_capacity__VYGD);
-    };
-    __tmp__WOBC=((void **)Self__WMBC->buckets__JNBC)[idx__ANBC];
-    result__40GD=NULL;
-    ptr__50GD=((__POINTER )(NULL));
-    typ_id__E1GD= 0;
-    sz__B1GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
-    if ((sz__B1GD ==  0)) {
-      result__40GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
-    } else {
-      typ_id__E1GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__B1GD);
-      if ((typ_id__E1GD == (__INTEGER)(-  1))) {
-        a__QG3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__RG3G=(__UINTEGER_32)((__UINTEGER_32)(sz__B1GD + a__QG3G) & (__UINTEGER_32)(~ a__QG3G));
-        ptr_table__UNAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RG3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__TNAH=((__POINTER )(NULL));
-        result__VNAH=((__POINTER *)ptr_table__UNAH)[ 0];
-        if ((result__VNAH == (void *)NULL)) {
-          result__VNAH=new_lab__ARJ(new_size__RG3G);
-          next__TNAH=(void *)((unsigned long)result__VNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RG3G)));
-          ((__POINTER *)next__TNAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UNAH)[ 0]=next__TNAH;
-        } else {
-          next__TNAH=((__POINTER *)result__VNAH)[ 0];
-          if ((next__TNAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VNAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RG3G <<  1)) <=  4096)) {
-              next__TNAH=(void *)((unsigned long)result__VNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RG3G)));
+    __tmp__AUX=FALSE__;
+  };
+  if ((! __tmp__AUX)) {
+    if ((Self__QTX->parent_arrayed_collection__AJ.capacity__3CU ==  0)) {
+      Self__QTX->parent_arrayed_collection__AJ.storage__KTT=create__GFSB( 2);
+      Self__QTX->parent_arrayed_collection__AJ.capacity__3CU= 2;
+      Self__QTX->parent_arrayed_collection__AJ.upper__HJ= 0;
+    } else {
+      new_capacity__STX=(__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.capacity__3CU <<  1);
+      __tmp__VUX=Self__QTX->parent_arrayed_collection__AJ.storage__KTT;
+      __tmp__WUX=Self__QTX->parent_arrayed_collection__AJ.capacity__3CU;
+      new__NNEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__VUX)),((__UINTEGER_32 )(__INTEGER)(__tmp__WUX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__STX * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__BOEC=(__INTEGER)(new_capacity__STX -  1);
+      Self__JPVD=__tmp__WUX;
+      while ((Self__JPVD <= __tmp__BOEC)) {
+        new__NNEC[Self__JPVD]=NULL;
+        Self__JPVD=(__INTEGER)(Self__JPVD +  1);
+      };
+      Self__QTX->parent_arrayed_collection__AJ.storage__KTT=new__NNEC;
+      Self__QTX->parent_arrayed_collection__AJ.capacity__3CU=new_capacity__STX;
+      Self__QTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    };
+  };
+  ((void **)Self__QTX->parent_arrayed_collection__AJ.storage__KTT)[Self__QTX->parent_arrayed_collection__AJ.upper__HJ]=Self__ATS;
+  Self__CNBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__PTS);
+  Self__D0GH=((__STRING_CONSTANT *)f__1AC);
+  result__C0GH= 0;
+  __tmp__E0GH=Self__D0GH->count__DD;
+  Self__F0GH= 1;
+  while ((Self__F0GH <= __tmp__E0GH)) {
+    result__C0GH=(__INTEGER)((__INTEGER)( 5 * result__C0GH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__D0GH->storage__VQO)[(__INTEGER)(Self__F0GH -  1)])));
+    Self__F0GH=(__INTEGER)(Self__F0GH +  1);
+  };
+  if ((result__C0GH <  0)) {
+    result__C0GH=(__INTEGER)(~ result__C0GH);
+  };
+  idx__MNBC=(__INTEGER)(result__C0GH % Self__CNBC->capacity__QNBC);
+  node__ONBC=((void **)Self__CNBC->buckets__VNBC)[idx__MNBC];
+  while ((! (((void *)node__ONBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ONBC)->key__BOBC == (void *)f__1AC)))) {
+    node__ONBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ONBC)->next__MOBC;
+  };
+  if (((void *)node__ONBC == (void *)NULL)) {
+    if ((Self__CNBC->capacity__QNBC == Self__CNBC->count__VOBC)) {
+      idx__AZGD= 0;
+      node1__EZGD=NULL;
+      node2__FZGD=NULL;
+      old_buckets__DZGD=Self__CNBC->buckets__VNBC;
+      new_capacity__BZGD=prime_number_ceiling__X41((__INTEGER)(Self__CNBC->capacity__QNBC +  1));
+      Self__CNBC->buckets__VNBC=create__HITC(new_capacity__BZGD);
+      i__CZGD=(__INTEGER)(Self__CNBC->capacity__QNBC -  1);
+      Self__CNBC->capacity__QNBC=new_capacity__BZGD;
+      while ((i__CZGD >=  0)) {
+        node1__EZGD=((void **)old_buckets__DZGD)[i__CZGD];
+        while (((void *)node1__EZGD != (void *)NULL)) {
+          node2__FZGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__EZGD)->next__MOBC;
+          Self__4NW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__EZGD)->key__BOBC);
+          result__AOW= 0;
+          __tmp__BOW=Self__4NW->count__DD;
+          Self__XT1= 1;
+          while ((Self__XT1 <= __tmp__BOW)) {
+            result__AOW=(__INTEGER)((__INTEGER)( 5 * result__AOW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4NW->storage__VQO)[(__INTEGER)(Self__XT1 -  1)])));
+            Self__XT1=(__INTEGER)(Self__XT1 +  1);
+          };
+          if ((result__AOW <  0)) {
+            result__AOW=(__INTEGER)(~ result__AOW);
+          };
+          idx__AZGD=(__INTEGER)(result__AOW % Self__CNBC->capacity__QNBC);
+          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__EZGD)->next__MOBC=((void **)Self__CNBC->buckets__VNBC)[idx__AZGD];
+          ((void **)Self__CNBC->buckets__VNBC)[idx__AZGD]=node1__EZGD;
+          node1__EZGD=node2__FZGD;
+        };
+        i__CZGD=(__INTEGER)(i__CZGD -  1);
+      };
+      idx__MNBC=(__INTEGER)(result__C0GH % new_capacity__BZGD);
+    };
+    __tmp__CPBC=((void **)Self__CNBC->buckets__VNBC)[idx__MNBC];
+    result__K1GD=NULL;
+    ptr__L1GD=((__POINTER )(NULL));
+    typ_id__Q1GD= 0;
+    sz__N1GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
+    if ((sz__N1GD ==  0)) {
+      result__K1GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__Q1GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__N1GD);
+      if ((typ_id__Q1GD == (__INTEGER)(-  1))) {
+        a__NTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OTDH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1GD + a__NTDH) & (__UINTEGER_32)(~ a__NTDH));
+        ptr_table__I0GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OTDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__H0GH=((__POINTER )(NULL));
+        result__J0GH=((__POINTER *)ptr_table__I0GH)[ 0];
+        if ((result__J0GH == (void *)NULL)) {
+          result__J0GH=new_lab__MRJ(new_size__OTDH);
+          next__H0GH=(void *)((unsigned long)result__J0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OTDH)));
+          ((__POINTER *)next__H0GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I0GH)[ 0]=next__H0GH;
+        } else {
+          next__H0GH=((__POINTER *)result__J0GH)[ 0];
+          if ((next__H0GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OTDH <<  1)) <=  4096)) {
+              next__H0GH=(void *)((unsigned long)result__J0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OTDH)));
             } else {
-              next__TNAH=new_lab__ARJ(new_size__RG3G);
-            };
-            ((__POINTER *)next__TNAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UNAH)[ 0]=next__TNAH;
-          } else {
-            ((__POINTER *)result__VNAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TNAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VNAH=next__TNAH;
-          };
-        };
-        ptr__50GD=result__VNAH;
-      } else {
-        t__VG3G=((__UINTEGER_32 )typ_id__E1GD);
-        a__UG3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__2NAH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1GD + a__UG3G) & (__UINTEGER_32)(~ a__UG3G));
-        ptr_table__ZNAH=((__POINTER )(&(table_type[(t__VG3G)])));
-        lab_type__1NAH=(__UINTEGER_32)(t__VG3G |  1);
-        next__YNAH=((__POINTER )(NULL));
-        result__0NAH=((__POINTER *)ptr_table__ZNAH)[ 0];
-        if ((result__0NAH == (void *)NULL)) {
-          result__0NAH=new_lab__ARJ(lab_type__1NAH);
-          next__YNAH=(void *)((unsigned long)result__0NAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NAH)));
-          ((__POINTER *)next__YNAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZNAH)[ 0]=next__YNAH;
-        } else {
-          next__YNAH=((__POINTER *)result__0NAH)[ 0];
-          if ((next__YNAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0NAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__2NAH <<  1)) <=  4096)) {
-              next__YNAH=(void *)((unsigned long)result__0NAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NAH)));
+              next__H0GH=new_lab__MRJ(new_size__OTDH);
+            };
+            ((__POINTER *)next__H0GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__I0GH)[ 0]=next__H0GH;
+          } else {
+            ((__POINTER *)result__J0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__J0GH=next__H0GH;
+          };
+        };
+        ptr__L1GD=result__J0GH;
+      } else {
+        t__STDH=((__UINTEGER_32 )typ_id__Q1GD);
+        a__RTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Q0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1GD + a__RTDH) & (__UINTEGER_32)(~ a__RTDH));
+        ptr_table__N0GH=((__POINTER )(&(table_type[(t__STDH)])));
+        lab_type__P0GH=(__UINTEGER_32)(t__STDH |  1);
+        next__M0GH=((__POINTER )(NULL));
+        result__O0GH=((__POINTER *)ptr_table__N0GH)[ 0];
+        if ((result__O0GH == (void *)NULL)) {
+          result__O0GH=new_lab__MRJ(lab_type__P0GH);
+          next__M0GH=(void *)((unsigned long)result__O0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q0GH)));
+          ((__POINTER *)next__M0GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N0GH)[ 0]=next__M0GH;
+        } else {
+          next__M0GH=((__POINTER *)result__O0GH)[ 0];
+          if ((next__M0GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q0GH <<  1)) <=  4096)) {
+              next__M0GH=(void *)((unsigned long)result__O0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q0GH)));
             } else {
-              next__YNAH=new_lab__ARJ(lab_type__1NAH);
+              next__M0GH=new_lab__MRJ(lab_type__P0GH);
             };
-            ((__POINTER *)next__YNAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZNAH)[ 0]=next__YNAH;
+            ((__POINTER *)next__M0GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__N0GH)[ 0]=next__M0GH;
           } else {
-            ((__POINTER *)result__0NAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YNAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0NAH=next__YNAH;
+            ((__POINTER *)result__O0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__O0GH=next__M0GH;
           };
         };
-        ptr__50GD=result__0NAH;
+        ptr__L1GD=result__O0GH;
       };
-      result__40GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__50GD);
-      *(result__40GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
+      result__K1GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__L1GD);
+      *(result__K1GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    Self__N3SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__40GD);
-    Self__N3SD->item__I3GD=Self__USS;
-    Self__N3SD->key__VNBC=f__PAC;
-    Self__N3SD->next__AOBC=__tmp__WOBC;
-    node__CNBC=result__40GD;
-    ((void **)Self__WMBC->buckets__JNBC)[idx__ANBC]=result__40GD;
-    Self__WMBC->count__JOBC=(__INTEGER)(Self__WMBC->count__JOBC +  1);
+    Self__Z3SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__K1GD);
+    Self__Z3SD->item__U3GD=Self__ATS;
+    Self__Z3SD->key__BOBC=f__1AC;
+    Self__Z3SD->next__MOBC=__tmp__CPBC;
+    node__ONBC=result__K1GD;
+    ((void **)Self__CNBC->buckets__VNBC)[idx__MNBC]=result__K1GD;
+    Self__CNBC->count__VOBC=(__INTEGER)(Self__CNBC->count__VOBC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__CNBC)->item__I3GD=Self__USS;
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ONBC)->item__U3GD=Self__ATS;
   };
-  copy__NCS(string_tmp__4VX,f__PAC);
-  Self__UG5G=((__STRING *)string_tmp__4VX);
-  if ((Self__UG5G->capacity__MBS > Self__UG5G->count__KFC)) {
-    ((__CHARACTER *)Self__UG5G->storage__VBS)[Self__UG5G->count__KFC]='\0';
+  copy__ZCS(string_tmp__KWX,f__1AC);
+  Self__USFH=((__STRING *)string_tmp__KWX);
+  if ((Self__USFH->capacity__YBS > Self__USFH->count__WFC)) {
+    ((__CHARACTER *)Self__USFH->storage__BCS)[Self__USFH->count__WFC]='\0';
   } else {
-    add_last__NLT(Self__UG5G,'\0');
-    Self__UG5G->count__KFC=(__INTEGER)(Self__UG5G->count__KFC -  1);
-  };
-  file__YSS=((__POINTER )(fopen((char*)(Self__UG5G->storage__VBS),"rb")));
-  fseek((FILE*)((file__YSS)),0,SEEK_END);
-  result__HWX=((__INTEGER )(ftell((FILE *)(file__YSS))));
-  fseek((FILE*)((file__YSS)),0,SEEK_SET);
-  Self__USS->source__BBC=create__EBB((__INTEGER)(result__HWX +  1));
-  __tmp__JUS=Self__USS->source__BBC;
-  Self__XG5G=((__STRING *)__tmp__JUS);
-  if ((Self__XG5G->capacity__MBS > Self__XG5G->count__KFC)) {
-    ((__CHARACTER *)Self__XG5G->storage__VBS)[Self__XG5G->count__KFC]='\0';
+    add_last__ZLT(Self__USFH,'\0');
+    Self__USFH->count__WFC=(__INTEGER)(Self__USFH->count__WFC -  1);
+  };
+  file__ETS=((__POINTER )(fopen((char*)(Self__USFH->storage__BCS),"rb")));
+  fseek((FILE*)((file__ETS)),0,SEEK_END);
+  result__TWX=((__INTEGER )(ftell((FILE *)(file__ETS))));
+  fseek((FILE*)((file__ETS)),0,SEEK_SET);
+  Self__ATS->source__NBC=create__NBB((__INTEGER)(result__TWX +  1));
+  __tmp__VUS=Self__ATS->source__NBC;
+  Self__XSFH=((__STRING *)__tmp__VUS);
+  if ((Self__XSFH->capacity__YBS > Self__XSFH->count__WFC)) {
+    ((__CHARACTER *)Self__XSFH->storage__BCS)[Self__XSFH->count__WFC]='\0';
   } else {
-    add_last__NLT(Self__XG5G,'\0');
-    Self__XG5G->count__KFC=(__INTEGER)(Self__XG5G->count__KFC -  1);
-  };
-  ptr__QWX=Self__XG5G->storage__VBS;
-  fread((void *)((ptr__QWX)),(size_t)(1), (size_t)((result__HWX)),(FILE*)((file__YSS)));
-  ((__CHARACTER *)ptr__QWX)[result__HWX]='\0';
-  Self__RYS=((__STRING *)__tmp__JUS);
-  Self__RYS->count__KFC= 0;
-  while ((((__CHARACTER *)ptr__QWX)[Self__RYS->count__KFC] != '\0')) {
-    Self__RYS->count__KFC=(__INTEGER)(Self__RYS->count__KFC +  1);
-  };
-  if (((void *)Self__RYS->storage__VBS != (void *)ptr__QWX)) {
-    Self__RYS->storage__VBS=ptr__QWX;
-    Self__RYS->capacity__MBS=(__INTEGER)(Self__RYS->count__KFC +  1);
-  };
-  fclose((FILE*)((file__YSS)));
-  result__4K3=NULL;
-  ptr__5K3=((__POINTER )(NULL));
-  typ_id__EL3= 0;
-  sz__BL3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
-  if ((sz__BL3 ==  0)) {
-    result__4K3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    add_last__ZLT(Self__XSFH,'\0');
+    Self__XSFH->count__WFC=(__INTEGER)(Self__XSFH->count__WFC -  1);
+  };
+  ptr__2WX=Self__XSFH->storage__BCS;
+  fread((void *)((ptr__2WX)),(size_t)(1), (size_t)((result__TWX)),(FILE*)((file__ETS)));
+  ((__CHARACTER *)ptr__2WX)[result__TWX]='\0';
+  Self__3YS=((__STRING *)__tmp__VUS);
+  Self__3YS->count__WFC= 0;
+  while ((((__CHARACTER *)ptr__2WX)[Self__3YS->count__WFC] != '\0')) {
+    Self__3YS->count__WFC=(__INTEGER)(Self__3YS->count__WFC +  1);
+  };
+  if (((void *)Self__3YS->storage__BCS != (void *)ptr__2WX)) {
+    Self__3YS->storage__BCS=ptr__2WX;
+    Self__3YS->capacity__YBS=(__INTEGER)(Self__3YS->count__WFC +  1);
+  };
+  fclose((FILE*)((file__ETS)));
+  result__KL3=NULL;
+  ptr__LL3=((__POINTER )(NULL));
+  typ_id__QL3= 0;
+  sz__NL3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
+  if ((sz__NL3 ==  0)) {
+    result__KL3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
   } else {
-    typ_id__EL3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BL3);
-    if ((typ_id__EL3 == (__INTEGER)(-  1))) {
-      a__YG3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ZG3G=(__UINTEGER_32)((__UINTEGER_32)(sz__BL3 + a__YG3G) & (__UINTEGER_32)(~ a__YG3G));
-      ptr_table__4NAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZG3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__3NAH=((__POINTER )(NULL));
-      result__5NAH=((__POINTER *)ptr_table__4NAH)[ 0];
-      if ((result__5NAH == (void *)NULL)) {
-        result__5NAH=new_lab__ARJ(new_size__ZG3G);
-        next__3NAH=(void *)((unsigned long)result__5NAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZG3G)));
-        ((__POINTER *)next__3NAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4NAH)[ 0]=next__3NAH;
-      } else {
-        next__3NAH=((__POINTER *)result__5NAH)[ 0];
-        if ((next__3NAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5NAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZG3G <<  1)) <=  4096)) {
-            next__3NAH=(void *)((unsigned long)result__5NAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZG3G)));
-          } else {
-            next__3NAH=new_lab__ARJ(new_size__ZG3G);
-          };
-          ((__POINTER *)next__3NAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4NAH)[ 0]=next__3NAH;
-        } else {
-          ((__POINTER *)result__5NAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3NAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5NAH=next__3NAH;
-        };
-      };
-      ptr__5K3=result__5NAH;
-    } else {
-      t__3G3G=((__UINTEGER_32 )typ_id__EL3);
-      a__2G3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GOAH=(__UINTEGER_32)((__UINTEGER_32)(sz__BL3 + a__2G3G) & (__UINTEGER_32)(~ a__2G3G));
-      ptr_table__DOAH=((__POINTER )(&(table_type[(t__3G3G)])));
-      lab_type__FOAH=(__UINTEGER_32)(t__3G3G |  1);
-      next__COAH=((__POINTER )(NULL));
-      result__EOAH=((__POINTER *)ptr_table__DOAH)[ 0];
-      if ((result__EOAH == (void *)NULL)) {
-        result__EOAH=new_lab__ARJ(lab_type__FOAH);
-        next__COAH=(void *)((unsigned long)result__EOAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOAH)));
-        ((__POINTER *)next__COAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DOAH)[ 0]=next__COAH;
-      } else {
-        next__COAH=((__POINTER *)result__EOAH)[ 0];
-        if ((next__COAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EOAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__GOAH <<  1)) <=  4096)) {
-            next__COAH=(void *)((unsigned long)result__EOAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOAH)));
-          } else {
-            next__COAH=new_lab__ARJ(lab_type__FOAH);
-          };
-          ((__POINTER *)next__COAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DOAH)[ 0]=next__COAH;
-        } else {
-          ((__POINTER *)result__EOAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__COAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EOAH=next__COAH;
-        };
-      };
-      ptr__5K3=result__EOAH;
-    };
-    result__4K3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__5K3);
-    *(result__4K3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
-  };
-  Self__J4BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__4K3);
-  new_capacity__HMJC=prime_number_ceiling__L41( 193);
-  Self__J4BC->buckets__XAGC=create__RQSC(new_capacity__HMJC);
-  Self__J4BC->capacity__Q4BC=new_capacity__HMJC;
-  Self__J4BC->count__CPGC= 0;
-  Self__USS->slot_list__QUS=result__4K3;
-  Self__USS->parent_named__5.parent_itm_object__4.position__BDJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__USS->index__JMG) |  131072));
-  return(result__PUC);
+    typ_id__QL3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NL3);
+    if ((typ_id__QL3 == (__INTEGER)(-  1))) {
+      a__VTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WTDH=(__UINTEGER_32)((__UINTEGER_32)(sz__NL3 + a__VTDH) & (__UINTEGER_32)(~ a__VTDH));
+      ptr_table__S0GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WTDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__R0GH=((__POINTER )(NULL));
+      result__T0GH=((__POINTER *)ptr_table__S0GH)[ 0];
+      if ((result__T0GH == (void *)NULL)) {
+        result__T0GH=new_lab__MRJ(new_size__WTDH);
+        next__R0GH=(void *)((unsigned long)result__T0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTDH)));
+        ((__POINTER *)next__R0GH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__S0GH)[ 0]=next__R0GH;
+      } else {
+        next__R0GH=((__POINTER *)result__T0GH)[ 0];
+        if ((next__R0GH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WTDH <<  1)) <=  4096)) {
+            next__R0GH=(void *)((unsigned long)result__T0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTDH)));
+          } else {
+            next__R0GH=new_lab__MRJ(new_size__WTDH);
+          };
+          ((__POINTER *)next__R0GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S0GH)[ 0]=next__R0GH;
+        } else {
+          ((__POINTER *)result__T0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__T0GH=next__R0GH;
+        };
+      };
+      ptr__LL3=result__T0GH;
+    } else {
+      t__0TDH=((__UINTEGER_32 )typ_id__QL3);
+      a__ZTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__00GH=(__UINTEGER_32)((__UINTEGER_32)(sz__NL3 + a__ZTDH) & (__UINTEGER_32)(~ a__ZTDH));
+      ptr_table__X0GH=((__POINTER )(&(table_type[(t__0TDH)])));
+      lab_type__Z0GH=(__UINTEGER_32)(t__0TDH |  1);
+      next__W0GH=((__POINTER )(NULL));
+      result__Y0GH=((__POINTER *)ptr_table__X0GH)[ 0];
+      if ((result__Y0GH == (void *)NULL)) {
+        result__Y0GH=new_lab__MRJ(lab_type__Z0GH);
+        next__W0GH=(void *)((unsigned long)result__Y0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__00GH)));
+        ((__POINTER *)next__W0GH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X0GH)[ 0]=next__W0GH;
+      } else {
+        next__W0GH=((__POINTER *)result__Y0GH)[ 0];
+        if ((next__W0GH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__00GH <<  1)) <=  4096)) {
+            next__W0GH=(void *)((unsigned long)result__Y0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__00GH)));
+          } else {
+            next__W0GH=new_lab__MRJ(lab_type__Z0GH);
+          };
+          ((__POINTER *)next__W0GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X0GH)[ 0]=next__W0GH;
+        } else {
+          ((__POINTER *)result__Y0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y0GH=next__W0GH;
+        };
+      };
+      ptr__LL3=result__Y0GH;
+    };
+    result__KL3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__LL3);
+    *(result__KL3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+  };
+  Self__V4BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__KL3);
+  new_capacity__TMJC=prime_number_ceiling__X41( 193);
+  Self__V4BC->buckets__DBGC=create__3QSC(new_capacity__TMJC);
+  Self__V4BC->capacity__24BC=new_capacity__TMJC;
+  Self__V4BC->count__OPGC= 0;
+  Self__ATS->slot_list__2US=result__KL3;
+  Self__ATS->parent_named__5.parent_itm_object__4.position__NDJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__ATS->index__VMG) |  131072));
+  return(result__1UC);
 }
 
-static __BOOLEAN read_space__RRD()
+static __BOOLEAN read_space__3RD()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos2__WRD,short_line__YRD,level_comment__ZRD,pos__VRD;
-  __INTEGER posold__URD,begin__ZAWG,end__0AWG,start__IOAH,end__HOAH;
-  __INTEGER len__JOAH,__tmp__KOAH,__tmp__MOAH,Self__NOAH,begin__3EMD;
-  __INTEGER start__ROAH,end__QOAH,len__SOAH,__tmp__TOAH,__tmp__VOAH;
-  __INTEGER Self__WOAH;
-  void *key__XRD,*__tmp__I2D;
-  __STRING *Self__LOAH,*Self__UOAH;
-  void *__tmp__F2D;
-  __POSITION pos__4MOG;
-  __CHARACTER result__OM1G,result__TM1G,result__YM1G,result__3M1G;
-  __CHARACTER result__GN1G,result__LN1G,result__QN1G,result__VN1G;
-  __CHARACTER result__5N1G,result__EO1G,result__JO1G,result__OO1G;
-  __CHARACTER result__TO1G,result__YO1G,result__3O1G,result__CP1G;
-  __CHARACTER result__HP1G,result__MP1G,result__VP1G,result__0P1G;
-  __CHARACTER result__DQ1G,result__M5E;
-  __BOOLEAN __tmp__2TD,result__2I3G,result__AJ3G,__tmp__4YD;
-  __BOOLEAN result__DJ3G,__tmp__5YD,__tmp__A1D,__tmp__H5D;
-  pos2__WRD= 0;
-  key__XRD=NULL;
-  short_line__YRD= 0;
-  level_comment__ZRD= 0;
-  pos__VRD=position__GBC;
-  posold__URD=(__INTEGER)(-  1);
-  while ((posold__URD != position__GBC)) {
-    posold__URD=position__GBC;
-    if (is_shorter__WY) {
-      while (((position__GBC >  2) && (((__INTEGER_8 )((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)((__INTEGER)(position__GBC -  1) -  1)]) <= ((__INTEGER_8 )' ')))) {
-        position__GBC=(__INTEGER)(position__GBC -  1);
-      };
-      short_line__YRD= 0;
-    };
-    until_do__HNI:
+  __INTEGER pos2__CSD,short_line__ESD,level_comment__FSD,pos__BSD;
+  __INTEGER posold__ASD,begin__MV1G,end__NV1G,start__20GH,end__10GH;
+  __INTEGER len__30GH,__tmp__40GH,__tmp__A1GH,Self__B1GH,begin__JFMD;
+  __INTEGER start__F1GH,end__E1GH,len__G1GH,__tmp__H1GH,__tmp__J1GH;
+  __INTEGER Self__K1GH;
+  void *key__DSD,*__tmp__U2D;
+  __STRING *Self__50GH,*Self__I1GH;
+  void *__tmp__R2D;
+  __POSITION pos__20TG;
+  __CHARACTER result__EXBH,result__RXBH,result__0XBH,result__DYBH;
+  __CHARACTER result__QYBH,result__ZYBH,result__CZBH,result__LZBH;
+  __CHARACTER result__ZZBH,result__C0BH,result__L0BH,result__U0BH;
+  __CHARACTER result__30BH,result__G1BH,result__P1BH,result__21BH;
+  __CHARACTER result__F2BH,result__O2BH,result__12BH,result__I3BH;
+  __CHARACTER result__V3BH,result__Y5E;
+  __BOOLEAN __tmp__IUD,result__FVDH,result__HVDH,__tmp__KZD;
+  __BOOLEAN result__JVDH,__tmp__LZD,__tmp__M1D,__tmp__T5D;
+  pos2__CSD= 0;
+  key__DSD=NULL;
+  short_line__ESD= 0;
+  level_comment__FSD= 0;
+  pos__BSD=position__SBC;
+  posold__ASD=(__INTEGER)(-  1);
+  while ((posold__ASD != position__SBC)) {
+    posold__ASD=position__SBC;
+    if (is_shorter__5Y) {
+      while (((position__SBC >  2) && (((__INTEGER_8 )((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC -  1) -  1)]) <= ((__INTEGER_8 )' ')))) {
+        position__SBC=(__INTEGER)(position__SBC -  1);
+      };
+      short_line__ESD= 0;
+    };
+    until_do__TNI:
     {
-      result__OM1G='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__OM1G=((__CHARACTER )(( 0)));
+      result__EXBH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__EXBH=((__CHARACTER )(( 0)));
       } else {
-        result__OM1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__EXBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__OM1G == ((__CHARACTER )(( 0))))) {
-        __tmp__2TD=TRUE__;
+      if ((result__EXBH == ((__CHARACTER )(( 0))))) {
+        __tmp__IUD=TRUE__;
       } else {
-        result__TM1G='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__TM1G=((__CHARACTER )(( 0)));
+        result__RXBH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__RXBH=((__CHARACTER )(( 0)));
         } else {
-          result__TM1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__RXBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__2TD=(((__INTEGER_8 )result__TM1G) > ((__INTEGER_8 )' '));
+        __tmp__IUD=(((__INTEGER_8 )result__RXBH) > ((__INTEGER_8 )' '));
       };
-      if ((! __tmp__2TD)) {
-        if (is_shorter__WY) {
-          result__YM1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__YM1G=((__CHARACTER )(( 0)));
+      if ((! __tmp__IUD)) {
+        if (is_shorter__5Y) {
+          result__0XBH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__0XBH=((__CHARACTER )(( 0)));
           } else {
-            result__YM1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__0XBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__YM1G == '\n')) {
-            short_line__YRD=(__INTEGER)(short_line__YRD +  1);
-            if ((short_line__YRD ==  2)) {
-              key_comment_default__UBC=(&__string_127);
+          if ((result__0XBH == '\n')) {
+            short_line__ESD=(__INTEGER)(short_line__ESD +  1);
+            if ((short_line__ESD ==  2)) {
+              key_comment_default__ACC=(&__string_127);
               if (is_shorter2__VI) {
-                is_catch_comment__UWC=FALSE__;
+                is_catch_comment__AXC=FALSE__;
               };
             };
           };
         };
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto until_do__HNI;
-      };
-    };
-    if ((position__GBC < ((__STRING *)source__DBC)->count__KFC)) {
-      result__3M1G='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__3M1G=((__CHARACTER )(( 0)));
-      } else {
-        result__3M1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-      };
-      if (((result__3M1G == '/') & (((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)((__INTEGER)(position__GBC +  1) -  1)] == '/'))) {
-        position__GBC=(__INTEGER)(position__GBC +  2);
-        pos2__WRD=position__GBC;
-        if (is_shorter__WY) {
-          if (is_active_short__SBC) {
-            begin__ZAWG=(__INTEGER)(position__GBC -  2);
-            end__0AWG=(__INTEGER)(position__GBC -  1);
-            Self__LOAH=((__STRING *)output_code__SI);
-            start__IOAH=(__INTEGER)(begin__ZAWG + short_derive__VBC);
-            end__HOAH=(__INTEGER)(end__0AWG + short_derive__VBC);
-            len__JOAH=(__INTEGER)((__INTEGER)(end__HOAH - start__IOAH) +  1);
-            if ((len__JOAH >  0)) {
-              __tmp__KOAH=(__INTEGER)(end__HOAH +  1);
-              __tmp__MOAH=Self__LOAH->count__KFC;
-              Self__NOAH=__tmp__KOAH;
-              while ((Self__NOAH <= __tmp__MOAH)) {
-                ((__CHARACTER *)Self__LOAH->storage__VBS)[(__INTEGER)((__INTEGER)(Self__NOAH - len__JOAH) -  1)]=((__CHARACTER *)Self__LOAH->storage__VBS)[(__INTEGER)(Self__NOAH -  1)];
-                Self__NOAH=(__INTEGER)(Self__NOAH +  1);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto until_do__TNI;
+      };
+    };
+    if ((position__SBC < ((__STRING *)source__PBC)->count__WFC)) {
+      result__DYBH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__DYBH=((__CHARACTER )(( 0)));
+      } else {
+        result__DYBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      };
+      if (((result__DYBH == '/') & (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '/'))) {
+        position__SBC=(__INTEGER)(position__SBC +  2);
+        pos2__CSD=position__SBC;
+        if (is_shorter__5Y) {
+          if (is_active_short__4BC) {
+            begin__MV1G=(__INTEGER)(position__SBC -  2);
+            end__NV1G=(__INTEGER)(position__SBC -  1);
+            Self__50GH=((__STRING *)output_code__SI);
+            start__20GH=(__INTEGER)(begin__MV1G + short_derive__BCC);
+            end__10GH=(__INTEGER)(end__NV1G + short_derive__BCC);
+            len__30GH=(__INTEGER)((__INTEGER)(end__10GH - start__20GH) +  1);
+            if ((len__30GH >  0)) {
+              __tmp__40GH=(__INTEGER)(end__10GH +  1);
+              __tmp__A1GH=Self__50GH->count__WFC;
+              Self__B1GH=__tmp__40GH;
+              while ((Self__B1GH <= __tmp__A1GH)) {
+                ((__CHARACTER *)Self__50GH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__B1GH - len__30GH) -  1)]=((__CHARACTER *)Self__50GH->storage__BCS)[(__INTEGER)(Self__B1GH -  1)];
+                Self__B1GH=(__INTEGER)(Self__B1GH +  1);
               };
-              Self__LOAH->count__KFC=(__INTEGER)(Self__LOAH->count__KFC - len__JOAH);
+              Self__50GH->count__WFC=(__INTEGER)(Self__50GH->count__WFC - len__30GH);
             };
-            short_derive__VBC=(__INTEGER)(short_derive__VBC - (__INTEGER)((__INTEGER)(end__0AWG - begin__ZAWG) +  1));
-            while_do__LFMD:
+            short_derive__BCC=(__INTEGER)(short_derive__BCC - (__INTEGER)((__INTEGER)(end__NV1G - begin__MV1G) +  1));
+            while_do__XFMD:
             {
-              result__GN1G='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__GN1G=((__CHARACTER )(( 0)));
+              result__QYBH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__QYBH=((__CHARACTER )(( 0)));
               } else {
-                result__GN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__QYBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__GN1G == ' ')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                goto while_do__LFMD;
+              if ((result__QYBH == ' ')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                goto while_do__XFMD;
               };
             };
-            result__LN1G='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__LN1G=((__CHARACTER )(( 0)));
+            result__ZYBH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__ZYBH=((__CHARACTER )(( 0)));
             } else {
-              result__LN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__ZYBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__LN1G == '*')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              while_do__DMND:
+            if ((result__ZYBH == '*')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              while_do__PMND:
               {
-                result__QN1G='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__QN1G=((__CHARACTER )(( 0)));
+                result__CZBH='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__CZBH=((__CHARACTER )(( 0)));
                 } else {
-                  result__QN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__CZBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                if ((result__QN1G == ' ')) {
-                  position__GBC=(__INTEGER)(position__GBC +  1);
-                  goto while_do__DMND;
+                if ((result__CZBH == ' ')) {
+                  position__SBC=(__INTEGER)(position__SBC +  1);
+                  goto while_do__PMND;
                 };
               };
-              result__VN1G='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__VN1G=((__CHARACTER )(( 0)));
+              result__LZBH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__LZBH=((__CHARACTER )(( 0)));
               } else {
-                result__VN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__LZBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              result__2I3G=FALSE__;
-              if ((((__INTEGER_8 )result__VN1G) >= ((__INTEGER_8 )'a'))) {
-                result__2I3G=(((__INTEGER_8 )result__VN1G) <= ((__INTEGER_8 )'z'));
+              result__FVDH=FALSE__;
+              if ((((__INTEGER_8 )result__LZBH) >= ((__INTEGER_8 )'a'))) {
+                result__FVDH=(((__INTEGER_8 )result__LZBH) <= ((__INTEGER_8 )'z'));
               };
-              if (result__2I3G) {
-                ((__STRING *)string_tmp__VH)->count__KFC= 0;
+              if (result__FVDH) {
+                ((__STRING *)string_tmp__VH)->count__WFC= 0;
                 do {
-                  result__5N1G='\0';
-                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                    result__5N1G=((__CHARACTER )(( 0)));
+                  result__ZZBH='\0';
+                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                    result__ZZBH=((__CHARACTER )(( 0)));
                   } else {
-                    result__5N1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                    result__ZZBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                   };
-                  add_last__NLT(string_tmp__VH,result__5N1G);
-                  position__GBC=(__INTEGER)(position__GBC +  1);
-                  result__EO1G='\0';
-                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                    result__EO1G=((__CHARACTER )(( 0)));
+                  add_last__ZLT(string_tmp__VH,result__ZZBH);
+                  position__SBC=(__INTEGER)(position__SBC +  1);
+                  result__C0BH='\0';
+                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                    result__C0BH=((__CHARACTER )(( 0)));
                   } else {
-                    result__EO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                    result__C0BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                   };
-                  result__AJ3G=FALSE__;
-                  if ((((__INTEGER_8 )result__EO1G) >= ((__INTEGER_8 )'a'))) {
-                    result__AJ3G=(((__INTEGER_8 )result__EO1G) <= ((__INTEGER_8 )'z'));
+                  result__HVDH=FALSE__;
+                  if ((((__INTEGER_8 )result__C0BH) >= ((__INTEGER_8 )'a'))) {
+                    result__HVDH=(((__INTEGER_8 )result__C0BH) <= ((__INTEGER_8 )'z'));
                   };
-                  if (result__AJ3G) {
-                    __tmp__4YD=TRUE__;
+                  if (result__HVDH) {
+                    __tmp__KZD=TRUE__;
                   } else {
-                    result__JO1G='\0';
-                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                      result__JO1G=((__CHARACTER )(( 0)));
+                    result__L0BH='\0';
+                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                      result__L0BH=((__CHARACTER )(( 0)));
                     } else {
-                      result__JO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                      result__L0BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                     };
-                    result__DJ3G=FALSE__;
-                    if ((((__INTEGER_8 )result__JO1G) >= ((__INTEGER_8 )'0'))) {
-                      result__DJ3G=(((__INTEGER_8 )result__JO1G) <= ((__INTEGER_8 )'9'));
+                    result__JVDH=FALSE__;
+                    if ((((__INTEGER_8 )result__L0BH) >= ((__INTEGER_8 )'0'))) {
+                      result__JVDH=(((__INTEGER_8 )result__L0BH) <= ((__INTEGER_8 )'9'));
                     };
-                    __tmp__4YD=result__DJ3G;
+                    __tmp__KZD=result__JVDH;
                   };
-                  if (__tmp__4YD) {
-                    __tmp__5YD=TRUE__;
+                  if (__tmp__KZD) {
+                    __tmp__LZD=TRUE__;
                   } else {
-                    result__OO1G='\0';
-                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                      result__OO1G=((__CHARACTER )(( 0)));
+                    result__U0BH='\0';
+                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                      result__U0BH=((__CHARACTER )(( 0)));
                     } else {
-                      result__OO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                      result__U0BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                     };
-                    __tmp__5YD=(result__OO1G == '_');
+                    __tmp__LZD=(result__U0BH == '_');
                   };
-                } while (__tmp__5YD);
-                while_do__Y05D:
+                } while (__tmp__LZD);
+                while_do__BIAE:
                 {
-                  result__TO1G='\0';
-                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                    result__TO1G=((__CHARACTER )(( 0)));
+                  result__30BH='\0';
+                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                    result__30BH=((__CHARACTER )(( 0)));
                   } else {
-                    result__TO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                    result__30BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                   };
-                  if ((result__TO1G == ' ')) {
-                    position__GBC=(__INTEGER)(position__GBC +  1);
-                    goto while_do__Y05D;
+                  if ((result__30BH == ' ')) {
+                    position__SBC=(__INTEGER)(position__SBC +  1);
+                    goto while_do__BIAE;
                   };
                 };
-                result__YO1G='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__YO1G=((__CHARACTER )(( 0)));
+                result__G1BH='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__G1BH=((__CHARACTER )(( 0)));
                 } else {
-                  result__YO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__G1BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                if ((result__YO1G == ':')) {
-                  position__GBC=(__INTEGER)(position__GBC +  1);
-                  key__XRD=get__2VB(string_tmp__VH);
-                  begin__3EMD=(__INTEGER)(pos2__WRD +  1);
-                  Self__UOAH=((__STRING *)output_code__SI);
-                  start__ROAH=(__INTEGER)(begin__3EMD + short_derive__VBC);
-                  end__QOAH=(__INTEGER)(position__GBC + short_derive__VBC);
-                  len__SOAH=(__INTEGER)((__INTEGER)(end__QOAH - start__ROAH) +  1);
-                  if ((len__SOAH >  0)) {
-                    __tmp__TOAH=(__INTEGER)(end__QOAH +  1);
-                    __tmp__VOAH=Self__UOAH->count__KFC;
-                    Self__WOAH=__tmp__TOAH;
-                    while ((Self__WOAH <= __tmp__VOAH)) {
-                      ((__CHARACTER *)Self__UOAH->storage__VBS)[(__INTEGER)((__INTEGER)(Self__WOAH - len__SOAH) -  1)]=((__CHARACTER *)Self__UOAH->storage__VBS)[(__INTEGER)(Self__WOAH -  1)];
-                      Self__WOAH=(__INTEGER)(Self__WOAH +  1);
+                if ((result__G1BH == ':')) {
+                  position__SBC=(__INTEGER)(position__SBC +  1);
+                  key__DSD=get__IWB(string_tmp__VH);
+                  begin__JFMD=(__INTEGER)(pos2__CSD +  1);
+                  Self__I1GH=((__STRING *)output_code__SI);
+                  start__F1GH=(__INTEGER)(begin__JFMD + short_derive__BCC);
+                  end__E1GH=(__INTEGER)(position__SBC + short_derive__BCC);
+                  len__G1GH=(__INTEGER)((__INTEGER)(end__E1GH - start__F1GH) +  1);
+                  if ((len__G1GH >  0)) {
+                    __tmp__H1GH=(__INTEGER)(end__E1GH +  1);
+                    __tmp__J1GH=Self__I1GH->count__WFC;
+                    Self__K1GH=__tmp__H1GH;
+                    while ((Self__K1GH <= __tmp__J1GH)) {
+                      ((__CHARACTER *)Self__I1GH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__K1GH - len__G1GH) -  1)]=((__CHARACTER *)Self__I1GH->storage__BCS)[(__INTEGER)(Self__K1GH -  1)];
+                      Self__K1GH=(__INTEGER)(Self__K1GH +  1);
                     };
-                    Self__UOAH->count__KFC=(__INTEGER)(Self__UOAH->count__KFC - len__SOAH);
+                    Self__I1GH->count__WFC=(__INTEGER)(Self__I1GH->count__WFC - len__G1GH);
                   };
-                  short_derive__VBC=(__INTEGER)(short_derive__VBC - (__INTEGER)((__INTEGER)(position__GBC - begin__3EMD) +  1));
-                  pos2__WRD=position__GBC;
+                  short_derive__BCC=(__INTEGER)(short_derive__BCC - (__INTEGER)((__INTEGER)(position__SBC - begin__JFMD) +  1));
+                  pos2__CSD=position__SBC;
                 };
               };
             };
           };
         };
-        if (is_catch_comment__UWC) {
-          add_last__NLT(last_comment__O0D,'\t');
+        if (is_catch_comment__AXC) {
+          add_last__ZLT(last_comment__00D,'\t');
         };
-        until_do__U5BD:
+        until_do__AACD:
         {
-          result__3O1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__3O1G=((__CHARACTER )(( 0)));
+          result__P1BH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__P1BH=((__CHARACTER )(( 0)));
           } else {
-            result__3O1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__P1BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__3O1G == ((__CHARACTER )(( 0))))) {
-            __tmp__A1D=TRUE__;
+          if ((result__P1BH == ((__CHARACTER )(( 0))))) {
+            __tmp__M1D=TRUE__;
           } else {
-            result__CP1G='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__CP1G=((__CHARACTER )(( 0)));
+            result__21BH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__21BH=((__CHARACTER )(( 0)));
             } else {
-              result__CP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__21BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            __tmp__A1D=(result__CP1G == '\n');
+            __tmp__M1D=(result__21BH == '\n');
           };
-          if ((! __tmp__A1D)) {
-            if (is_catch_comment__UWC) {
-              result__HP1G='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__HP1G=((__CHARACTER )(( 0)));
+          if ((! __tmp__M1D)) {
+            if (is_catch_comment__AXC) {
+              result__F2BH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__F2BH=((__CHARACTER )(( 0)));
               } else {
-                result__HP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__F2BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              add_last__NLT(last_comment__O0D,result__HP1G);
+              add_last__ZLT(last_comment__00D,result__F2BH);
             };
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            goto until_do__U5BD;
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            goto until_do__AACD;
           };
         };
-        if (is_catch_comment__UWC) {
-          add_last__NLT(last_comment__O0D,'\n');
+        if (is_catch_comment__AXC) {
+          add_last__ZLT(last_comment__00D,'\n');
         };
-        if (((void *)key_comment_default__UBC == (void *)(&__string_128))) {
-          __tmp__F2D=last_slot__E2D;
-          __tmp__I2D=get__2VB(last_comment__O0D);
-          if (((struct ___OBJ *)__tmp__F2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)__tmp__F2D)->comment__KJJD=__tmp__I2D;
+        if (((void *)key_comment_default__ACC == (void *)(&__string_128))) {
+          __tmp__R2D=last_slot__Q2D;
+          __tmp__U2D=get__IWB(last_comment__00D);
+          if (((struct ___OBJ *)__tmp__R2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)__tmp__R2D)->comment__WJJD=__tmp__U2D;
           } else {
-            ((__ITM_SLOT_OPERATOR *)__tmp__F2D)->parent_itm_slot__CU5B.comment__KJJD=__tmp__I2D;
+            ((__ITM_SLOT_OPERATOR *)__tmp__R2D)->parent_itm_slot__OU5B.comment__WJJD=__tmp__U2D;
           };
         };
-        if (((void *)key__XRD == (void *)NULL)) {
-          short__token__to__5AD(key_comment_default__UBC,pos2__WRD,position__GBC);
+        if (((void *)key__DSD == (void *)NULL)) {
+          short__token__to__LBD(key_comment_default__ACC,pos2__CSD,position__SBC);
         } else {
-          short__token__to__5AD(key__XRD,pos2__WRD,position__GBC);
+          short__token__to__LBD(key__DSD,pos2__CSD,position__SBC);
         };
       };
     };
-    if ((position__GBC < ((__STRING *)source__DBC)->count__KFC)) {
-      pos2__WRD=position__GBC;
-      result__MP1G='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__MP1G=((__CHARACTER )(( 0)));
+    if ((position__SBC < ((__STRING *)source__PBC)->count__WFC)) {
+      pos2__CSD=position__SBC;
+      result__O2BH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__O2BH=((__CHARACTER )(( 0)));
       } else {
-        result__MP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__O2BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if (((result__MP1G == '/') && (((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)((__INTEGER)(position__GBC +  1) -  1)] == '*'))) {
-        position__GBC=(__INTEGER)(position__GBC +  2);
-        level_comment__ZRD= 1;
-        until_do__XE2D:
+      if (((result__O2BH == '/') && (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '*'))) {
+        position__SBC=(__INTEGER)(position__SBC +  2);
+        level_comment__FSD= 1;
+        until_do__IQ2D:
         {
-          result__VP1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__VP1G=((__CHARACTER )(( 0)));
+          result__12BH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__12BH=((__CHARACTER )(( 0)));
           } else {
-            result__VP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__12BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((! ((result__VP1G == ((__CHARACTER )(( 0)))) || (level_comment__ZRD ==  0)))) {
-            result__0P1G='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__0P1G=((__CHARACTER )(( 0)));
+          if ((! ((result__12BH == ((__CHARACTER )(( 0)))) || (level_comment__FSD ==  0)))) {
+            result__I3BH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__I3BH=((__CHARACTER )(( 0)));
             } else {
-              result__0P1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__I3BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if (((result__0P1G == '/') && (((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)((__INTEGER)(position__GBC +  1) -  1)] == '*'))) {
-              level_comment__ZRD=(__INTEGER)(level_comment__ZRD +  1);
-              position__GBC=(__INTEGER)(position__GBC +  2);
-              __tmp__H5D=TRUE__;
+            if (((result__I3BH == '/') && (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '*'))) {
+              level_comment__FSD=(__INTEGER)(level_comment__FSD +  1);
+              position__SBC=(__INTEGER)(position__SBC +  2);
+              __tmp__T5D=TRUE__;
             } else {
-              __tmp__H5D=FALSE__;
+              __tmp__T5D=FALSE__;
             };
-            if ((! __tmp__H5D)) {
-              result__DQ1G='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__DQ1G=((__CHARACTER )(( 0)));
+            if ((! __tmp__T5D)) {
+              result__V3BH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__V3BH=((__CHARACTER )(( 0)));
               } else {
-                result__DQ1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__V3BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if (((result__DQ1G == '*') && (((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)((__INTEGER)(position__GBC +  1) -  1)] == '/'))) {
-                level_comment__ZRD=(__INTEGER)(level_comment__ZRD -  1);
-                position__GBC=(__INTEGER)(position__GBC +  2);
+              if (((result__V3BH == '*') && (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '/'))) {
+                level_comment__FSD=(__INTEGER)(level_comment__FSD -  1);
+                position__SBC=(__INTEGER)(position__SBC +  2);
               } else {
-                position__GBC=(__INTEGER)(position__GBC +  1);
+                position__SBC=(__INTEGER)(position__SBC +  1);
               };
             };
-            goto until_do__XE2D;
+            goto until_do__IQ2D;
           };
         };
-        if ((level_comment__ZRD !=  0)) {
-          position__GBC=pos2__WRD;
-          pos__4MOG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_193));
-          put_position__IOG(pos__4MOG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((level_comment__FSD !=  0)) {
+          position__SBC=pos2__CSD;
+          pos__20TG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_203));
+          put_position__UOG(pos__20TG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__5AD((&__string_70),pos2__WRD,position__GBC);
+        short__token__to__LBD((&__string_70),pos2__CSD,position__SBC);
       };
     };
   };
-  begin_position__5AE=position__GBC;
-  result__M5E='\0';
-  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-    result__M5E=((__CHARACTER )(( 0)));
+  begin_position__LBE=position__SBC;
+  result__Y5E='\0';
+  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+    result__Y5E=((__CHARACTER )(( 0)));
   } else {
-    result__M5E=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+    result__Y5E=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
   };
-  return(((position__GBC != pos__VRD) | (result__M5E != ((__CHARACTER )(( 0))))));
+  return(((position__SBC != pos__BSD) | (result__Y5E != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__55K()
+static __BOOLEAN read_identifier__LAL()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__DAL,idx__EAL;
-  __POSITION pos__UIUG;
-  __BOOLEAN result__CAL,__tmp__RAL,result__AH3G,__tmp__BCL,result__FH3G;
-  __BOOLEAN result__IH3G,__tmp__3BL,__tmp__4BL;
-  __CHARACTER result__YJ1G,result__CK1G,result__HK1G,result__MK1G;
-  __CHARACTER result__RK1G,result__WK1G;
-  result__CAL=FALSE__;
-  posold__DAL= 0;
-  idx__EAL= 0;
-  if ((! read_space__RRD())) {
-    __tmp__RAL=TRUE__;
+  __INTEGER posold__PAL,idx__QAL;
+  __POSITION pos__G2ZG;
+  __BOOLEAN result__OAL,__tmp__3AL,result__1TDH,__tmp__NCL,result__3TDH;
+  __BOOLEAN result__5TDH,__tmp__JCL,__tmp__KCL;
+  __CHARACTER result__GTBH,result__UTBH,result__BUBH,result__KUBH;
+  __CHARACTER result__TUBH,result__2UBH;
+  result__OAL=FALSE__;
+  posold__PAL= 0;
+  idx__QAL= 0;
+  if ((! read_space__3RD())) {
+    __tmp__3AL=TRUE__;
   } else {
-    result__YJ1G='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__YJ1G=((__CHARACTER )(( 0)));
+    result__GTBH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__GTBH=((__CHARACTER )(( 0)));
     } else {
-      result__YJ1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__GTBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    result__AH3G=FALSE__;
-    if ((((__INTEGER_8 )result__YJ1G) >= ((__INTEGER_8 )'a'))) {
-      result__AH3G=(((__INTEGER_8 )result__YJ1G) <= ((__INTEGER_8 )'z'));
+    result__1TDH=FALSE__;
+    if ((((__INTEGER_8 )result__GTBH) >= ((__INTEGER_8 )'a'))) {
+      result__1TDH=(((__INTEGER_8 )result__GTBH) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__RAL=(! result__AH3G);
+    __tmp__3AL=(! result__1TDH);
   };
-  if (__tmp__RAL) {
-    result__CAL=FALSE__;
+  if (__tmp__3AL) {
+    result__OAL=FALSE__;
   } else {
-    posold__DAL=position__GBC;
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    until_do__HJYE:
+    posold__PAL=position__SBC;
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    until_do__KEZE:
     {
-      result__CK1G='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__CK1G=((__CHARACTER )(( 0)));
+      result__UTBH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__UTBH=((__CHARACTER )(( 0)));
       } else {
-        result__CK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__UTBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__CK1G == ((__CHARACTER )(( 0))))) {
-        __tmp__BCL=TRUE__;
+      if ((result__UTBH == ((__CHARACTER )(( 0))))) {
+        __tmp__NCL=TRUE__;
       } else {
-        result__HK1G='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__HK1G=((__CHARACTER )(( 0)));
+        result__BUBH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__BUBH=((__CHARACTER )(( 0)));
         } else {
-          result__HK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__BUBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        result__FH3G=FALSE__;
-        if ((((__INTEGER_8 )result__HK1G) >= ((__INTEGER_8 )'a'))) {
-          result__FH3G=(((__INTEGER_8 )result__HK1G) <= ((__INTEGER_8 )'z'));
+        result__3TDH=FALSE__;
+        if ((((__INTEGER_8 )result__BUBH) >= ((__INTEGER_8 )'a'))) {
+          result__3TDH=(((__INTEGER_8 )result__BUBH) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__FH3G)) {
-          result__MK1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__MK1G=((__CHARACTER )(( 0)));
+        if ((! result__3TDH)) {
+          result__KUBH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__KUBH=((__CHARACTER )(( 0)));
           } else {
-            result__MK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__KUBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          result__IH3G=FALSE__;
-          if ((((__INTEGER_8 )result__MK1G) >= ((__INTEGER_8 )'0'))) {
-            result__IH3G=(((__INTEGER_8 )result__MK1G) <= ((__INTEGER_8 )'9'));
+          result__5TDH=FALSE__;
+          if ((((__INTEGER_8 )result__KUBH) >= ((__INTEGER_8 )'0'))) {
+            result__5TDH=(((__INTEGER_8 )result__KUBH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__3BL=(! result__IH3G);
+          __tmp__JCL=(! result__5TDH);
         } else {
-          __tmp__3BL=FALSE__;
+          __tmp__JCL=FALSE__;
         };
-        if (__tmp__3BL) {
-          result__RK1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__RK1G=((__CHARACTER )(( 0)));
+        if (__tmp__JCL) {
+          result__TUBH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__TUBH=((__CHARACTER )(( 0)));
           } else {
-            result__RK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__TUBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__4BL=(result__RK1G != '_');
+          __tmp__KCL=(result__TUBH != '_');
         } else {
-          __tmp__4BL=FALSE__;
+          __tmp__KCL=FALSE__;
         };
-        __tmp__BCL=__tmp__4BL;
+        __tmp__NCL=__tmp__KCL;
       };
-      if ((! __tmp__BCL)) {
-        result__WK1G='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__WK1G=((__CHARACTER )(( 0)));
+      if ((! __tmp__NCL)) {
+        result__2UBH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__2UBH=((__CHARACTER )(( 0)));
         } else {
-          result__WK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__2UBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        add_last__NLT(string_tmp__VH,result__WK1G);
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto until_do__HJYE;
+        add_last__ZLT(string_tmp__VH,result__2UBH);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto until_do__KEZE;
       };
     };
-    if ((((__STRING *)string_tmp__VH)->count__KFC !=  0)) {
-      idx__EAL=first_substring_index__OIYE(string_tmp__VH);
-      if ((idx__EAL !=  0)) {
-        position__GBC=(__INTEGER)(posold__DAL + idx__EAL);
-        pos__UIUG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_194));
-        put_position__IOG(pos__UIUG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+    if ((((__STRING *)string_tmp__VH)->count__WFC !=  0)) {
+      idx__QAL=first_substring_index__RDZE(string_tmp__VH);
+      if ((idx__QAL !=  0)) {
+        position__SBC=(__INTEGER)(posold__PAL + idx__QAL);
+        pos__G2ZG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_204));
+        put_position__UOG(pos__G2ZG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      last_string__2ZC=get__2VB(string_tmp__VH);
-      result__CAL=TRUE__;
+      last_string__I0C=get__IWB(string_tmp__VH);
+      result__OAL=TRUE__;
     };
   };
-  return(result__CAL);
+  return(result__OAL);
 }
 
-static __POSITION current_position__3WF()
+static __POSITION current_position__JXF()
 // () With resultNo recursive, No inlinable.
 {
-  __POSITION result__AXF;
-  result__AXF=((__POSITION ) 0);
-  while ((pos_cur__JBC != position__GBC)) {
-    if ((((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(pos_cur__JBC -  1)] == '\n')) {
-      pos_col__LBC= 0;
-      pos_line__KBC=(__INTEGER)(pos_line__KBC +  1);
-    } else {
-      pos_col__LBC=(__INTEGER)(pos_col__LBC +  1);
-    };
-    pos_cur__JBC=(__INTEGER)(pos_cur__JBC +  1);
-  };
-  if ((pos_line__KBC >  32767)) {
-    result__AXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__3AC)->index__JMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__LBC <<  9))) |  4294836224LU));
-    put_error__text__4MG( 0,(&__string_195));
-    put_position__IOG(result__AXF);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  __POSITION result__MXF;
+  result__MXF=((__POSITION ) 0);
+  while ((pos_cur__VBC != position__SBC)) {
+    if ((((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(pos_cur__VBC -  1)] == '\n')) {
+      pos_col__XBC= 0;
+      pos_line__WBC=(__INTEGER)(pos_line__WBC +  1);
+    } else {
+      pos_col__XBC=(__INTEGER)(pos_col__XBC +  1);
+    };
+    pos_cur__VBC=(__INTEGER)(pos_cur__VBC +  1);
+  };
+  if ((pos_line__WBC >  32767)) {
+    result__MXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__JBC)->index__VMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__XBC <<  9))) |  4294836224LU));
+    put_error__text__KNG( 0,(&__string_205));
+    put_position__UOG(result__MXF);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  if ((pos_col__LBC >  255)) {
-    result__AXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__3AC)->index__JMG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__KBC <<  17))));
-    put_error__text__4MG( 0,(&__string_196));
-    put_position__IOG(result__AXF);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if ((pos_col__XBC >  255)) {
+    result__MXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__JBC)->index__VMG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__WBC <<  17))));
+    put_error__text__KNG( 0,(&__string_206));
+    put_position__UOG(result__MXF);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__3AC)->index__JMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__LBC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__KBC <<  17)))));
+  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__JBC)->index__VMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__XBC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__WBC <<  17)))));
 }
 
-static void put_error__text__4MG(__INTEGER type__ANG,void *txt__BNG)
+static void put_error__text__KNG(__INTEGER type__MNG,void *txt__NNG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__CNG=type__ANG;
-  ((__STRING *)msg_err__DNG)->count__KFC= 0;
-  if ((type__ANG ==  0)) {
-    append__VNS(msg_err__DNG,(&__string_197));
+  type_error__ONG=type__MNG;
+  ((__STRING *)msg_err__PNG)->count__WFC= 0;
+  if ((type__MNG ==  0)) {
+    append__BOS(msg_err__PNG,(&__string_207));
   };
-  if ((type__ANG ==  1)) {
-    append__VNS(msg_err__DNG,(&__string_198));
+  if ((type__MNG ==  1)) {
+    append__BOS(msg_err__PNG,(&__string_208));
   };
-  if ((type__ANG ==  2)) {
-    append__VNS(msg_err__DNG,(&__string_199));
+  if ((type__MNG ==  2)) {
+    append__BOS(msg_err__PNG,(&__string_209));
   };
-  if ((type__ANG ==  3)) {
-    append__VNS(msg_err__DNG,(&__string_200));
+  if ((type__MNG ==  3)) {
+    append__BOS(msg_err__PNG,(&__string_210));
   };
-  append__VNS(msg_err__DNG,txt__BNG);
+  append__BOS(msg_err__PNG,txt__NNG);
 }
 
-static void put_position__IOG(__POSITION Self__JOG)
+static void put_position__UOG(__POSITION Self__VOG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __UINTEGER_32 c__LOG,__tmp__TPG,cols__OOG;
-  void *src__ROG;
-  __INTEGER pos__KOG,Self__ALH,limit_up__BLH;
-  __CHARACTER char__SOG;
-  c__LOG= 0;
-  char__SOG='\0';
-  append__VNS(msg_err__DNG,(&__string_201));
-  append_in__CIH((__UINTEGER_32)(((__UINTEGER_32 )Self__JOG) >>  17),msg_err__DNG);
-  append__VNS(msg_err__DNG,(&__string_202));
-  append_in__CIH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__JOG) >>  9) &  255),msg_err__DNG);
-  append__VNS(msg_err__DNG,(&__string_203));
-  append__VNS(msg_err__DNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__JOG)) &  511)])->parent_named__5.name__LI);
-  add_last__NLT(msg_err__DNG,'(');
-  append__VNS(msg_err__DNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__JOG)) &  511)])->filename__IPG);
-  append__VNS(msg_err__DNG,(&__string_204));
-  src__ROG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__JOG)) &  511)])->source__BBC;
-  pos__KOG= 1;
-  __tmp__TPG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__JOG) >>  17) -  1);
-  Self__ALH= 1;
-  limit_up__BLH=((__INTEGER )__tmp__TPG);
-  while ((Self__ALH <= limit_up__BLH)) {
-    while ((((__CHARACTER *)((__STRING *)src__ROG)->storage__VBS)[(__INTEGER)(pos__KOG -  1)] != '\n')) {
-      pos__KOG=(__INTEGER)(pos__KOG +  1);
-    };
-    pos__KOG=(__INTEGER)(pos__KOG +  1);
-    Self__ALH=(__INTEGER)(Self__ALH +  1);
-  };
-  ((__STRING *)string_tmp__VH)->count__KFC= 0;
-  cols__OOG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__JOG) >>  9) &  255);
-  while ((! ((pos__KOG > ((__STRING *)src__ROG)->count__KFC) || (((__CHARACTER *)((__STRING *)src__ROG)->storage__VBS)[(__INTEGER)(pos__KOG -  1)] == '\n')))) {
-    char__SOG=((__CHARACTER *)((__STRING *)src__ROG)->storage__VBS)[(__INTEGER)(pos__KOG -  1)];
-    add_last__NLT(msg_err__DNG,char__SOG);
-    if ((c__LOG < cols__OOG)) {
-      if ((char__SOG == '\t')) {
-        add_last__NLT(string_tmp__VH,'\t');
-      } else {
-        add_last__NLT(string_tmp__VH,' ');
-      };
-    };
-    c__LOG=(__UINTEGER_32)(c__LOG +  1);
-    pos__KOG=(__INTEGER)(pos__KOG +  1);
-  };
-  add_last__NLT(msg_err__DNG,'\n');
-  append__VNS(msg_err__DNG,string_tmp__VH);
-  append__VNS(msg_err__DNG,(&__string_205));
+  __UINTEGER_32 c__XOG,__tmp__5PG,cols__0OG;
+  void *src__3OG;
+  __INTEGER pos__WOG,Self__MLH,limit_up__NLH;
+  __CHARACTER char__4OG;
+  c__XOG= 0;
+  char__4OG='\0';
+  append__BOS(msg_err__PNG,(&__string_211));
+  append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  17),msg_err__PNG);
+  append__BOS(msg_err__PNG,(&__string_212));
+  append_in__OIH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  9) &  255),msg_err__PNG);
+  append__BOS(msg_err__PNG,(&__string_213));
+  append__BOS(msg_err__PNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__VOG)) &  511)])->parent_named__5.name__LI);
+  add_last__ZLT(msg_err__PNG,'(');
+  append__BOS(msg_err__PNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__VOG)) &  511)])->filename__UPG);
+  append__BOS(msg_err__PNG,(&__string_214));
+  src__3OG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__VOG)) &  511)])->source__NBC;
+  pos__WOG= 1;
+  __tmp__5PG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  17) -  1);
+  Self__MLH= 1;
+  limit_up__NLH=((__INTEGER )__tmp__5PG);
+  while ((Self__MLH <= limit_up__NLH)) {
+    while ((((__CHARACTER *)((__STRING *)src__3OG)->storage__BCS)[(__INTEGER)(pos__WOG -  1)] != '\n')) {
+      pos__WOG=(__INTEGER)(pos__WOG +  1);
+    };
+    pos__WOG=(__INTEGER)(pos__WOG +  1);
+    Self__MLH=(__INTEGER)(Self__MLH +  1);
+  };
+  ((__STRING *)string_tmp__VH)->count__WFC= 0;
+  cols__0OG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  9) &  255);
+  while ((! ((pos__WOG > ((__STRING *)src__3OG)->count__WFC) || (((__CHARACTER *)((__STRING *)src__3OG)->storage__BCS)[(__INTEGER)(pos__WOG -  1)] == '\n')))) {
+    char__4OG=((__CHARACTER *)((__STRING *)src__3OG)->storage__BCS)[(__INTEGER)(pos__WOG -  1)];
+    add_last__ZLT(msg_err__PNG,char__4OG);
+    if ((c__XOG < cols__0OG)) {
+      if ((char__4OG == '\t')) {
+        add_last__ZLT(string_tmp__VH,'\t');
+      } else {
+        add_last__ZLT(string_tmp__VH,' ');
+      };
+    };
+    c__XOG=(__UINTEGER_32)(c__XOG +  1);
+    pos__WOG=(__INTEGER)(pos__WOG +  1);
+  };
+  add_last__ZLT(msg_err__PNG,'\n');
+  append__BOS(msg_err__PNG,string_tmp__VH);
+  append__BOS(msg_err__PNG,(&__string_215));
 }
 
-static __BOOLEAN read_symbol__XWJ(void *st__ZWJ)
+static __BOOLEAN read_symbol__DXJ(void *st__FXJ)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__1WJ,j__2WJ;
-  __BOOLEAN result__3WJ,__tmp__FYJ,__tmp__CYJ;
-  __CHARACTER result__YL1G,result__3L1G;
-  posold__1WJ= 0;
-  j__2WJ= 0;
-  result__3WJ=FALSE__;
-  if ((! read_space__RRD())) {
-    result__3WJ=FALSE__;
+  __INTEGER posold__HXJ,j__IXJ;
+  __BOOLEAN result__JXJ,__tmp__RYJ,__tmp__OYJ;
+  __CHARACTER result__CWBH,result__PWBH;
+  posold__HXJ= 0;
+  j__IXJ= 0;
+  result__JXJ=FALSE__;
+  if ((! read_space__3RD())) {
+    result__JXJ=FALSE__;
   } else {
-    posold__1WJ=position__GBC;
-    j__2WJ= 1;
-    until_do__SC5:
+    posold__HXJ=position__SBC;
+    j__IXJ= 1;
+    until_do__4C5:
     {
-      result__YL1G='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__YL1G=((__CHARACTER )(( 0)));
+      result__CWBH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__CWBH=((__CHARACTER )(( 0)));
       } else {
-        result__YL1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__CWBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__YL1G == ((__CHARACTER )(( 0))))) {
-        __tmp__FYJ=TRUE__;
+      if ((result__CWBH == ((__CHARACTER )(( 0))))) {
+        __tmp__RYJ=TRUE__;
       } else {
-        if ((j__2WJ > ((__STRING_CONSTANT *)st__ZWJ)->count__DD)) {
-          __tmp__CYJ=TRUE__;
+        if ((j__IXJ > ((__STRING_CONSTANT *)st__FXJ)->count__DD)) {
+          __tmp__OYJ=TRUE__;
         } else {
-          result__3L1G='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__3L1G=((__CHARACTER )(( 0)));
+          result__PWBH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__PWBH=((__CHARACTER )(( 0)));
           } else {
-            result__3L1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__PWBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__CYJ=(result__3L1G != ((__CHARACTER *)((__STRING_CONSTANT *)st__ZWJ)->storage__JQO)[(__INTEGER)(j__2WJ -  1)]);
+          __tmp__OYJ=(result__PWBH != ((__CHARACTER *)((__STRING_CONSTANT *)st__FXJ)->storage__VQO)[(__INTEGER)(j__IXJ -  1)]);
         };
-        __tmp__FYJ=__tmp__CYJ;
+        __tmp__RYJ=__tmp__OYJ;
       };
-      if ((! __tmp__FYJ)) {
-        j__2WJ=(__INTEGER)(j__2WJ +  1);
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto until_do__SC5;
+      if ((! __tmp__RYJ)) {
+        j__IXJ=(__INTEGER)(j__IXJ +  1);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto until_do__4C5;
       };
     };
-    if ((j__2WJ > ((__STRING_CONSTANT *)st__ZWJ)->count__DD)) {
-      result__3WJ=TRUE__;
-      last_string__2ZC=st__ZWJ;
+    if ((j__IXJ > ((__STRING_CONSTANT *)st__FXJ)->count__DD)) {
+      result__JXJ=TRUE__;
+      last_string__I0C=st__FXJ;
     } else {
-      position__GBC=posold__1WJ;
-      result__3WJ=FALSE__;
+      position__SBC=posold__HXJ;
+      result__JXJ=FALSE__;
     };
   };
-  return(result__3WJ);
+  return(result__JXJ);
 }
 
-static __BOOLEAN read_short_elt__5KKB()
+static __BOOLEAN read_short_elt__LLKB()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER j__DLKB;
-  __POSITION pos__OIG;
-  __BOOLEAN result__CLKB,__tmp__WLKB;
-  __CHARACTER __tmp__1MKB;
-  result__CLKB=FALSE__;
-  j__DLKB= 0;
-  if (read_identifier__55K()) {
-    if (((void *)last_string__2ZC != (void *)(&__string_115))) {
-      pos__OIG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_206));
-      put_position__IOG(pos__OIG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  __INTEGER j__PLKB;
+  __POSITION pos__0IG;
+  __BOOLEAN result__OLKB,__tmp__CMKB;
+  __CHARACTER __tmp__HNKB;
+  result__OLKB=FALSE__;
+  j__PLKB= 0;
+  if (read_identifier__LAL()) {
+    if (((void *)last_string__I0C != (void *)(&__string_115))) {
+      pos__0IG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_216));
+      put_position__UOG(pos__0IG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__2ZC=NULL;
-    result__CLKB=TRUE__;
-    __tmp__WLKB=TRUE__;
+    last_string__I0C=NULL;
+    result__OLKB=TRUE__;
+    __tmp__CMKB=TRUE__;
   } else {
-    __tmp__WLKB=FALSE__;
+    __tmp__CMKB=FALSE__;
   };
-  if ((! __tmp__WLKB)) {
-    if (read_string__5EQ()) {
-      ((__STRING *)string_tmp__VH)->count__KFC= 0;
-      j__DLKB= 1;
-      while ((j__DLKB <= ((__STRING_CONSTANT *)last_string__2ZC)->count__DD)) {
-        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[(__INTEGER)(j__DLKB -  1)] == '\\')) {
-          j__DLKB=(__INTEGER)(j__DLKB +  1);
-          __tmp__1MKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[(__INTEGER)(j__DLKB -  1)];
-          if ((__tmp__1MKB == 'a')) {
-            add_last__NLT(string_tmp__VH,'\a');
+  if ((! __tmp__CMKB)) {
+    if (read_string__LFQ()) {
+      ((__STRING *)string_tmp__VH)->count__WFC= 0;
+      j__PLKB= 1;
+      while ((j__PLKB <= ((__STRING_CONSTANT *)last_string__I0C)->count__DD)) {
+        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[(__INTEGER)(j__PLKB -  1)] == '\\')) {
+          j__PLKB=(__INTEGER)(j__PLKB +  1);
+          __tmp__HNKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[(__INTEGER)(j__PLKB -  1)];
+          if ((__tmp__HNKB == 'a')) {
+            add_last__ZLT(string_tmp__VH,'\a');
           };
-          if ((__tmp__1MKB == 'b')) {
-            add_last__NLT(string_tmp__VH,'\b');
+          if ((__tmp__HNKB == 'b')) {
+            add_last__ZLT(string_tmp__VH,'\b');
           };
-          if ((__tmp__1MKB == 'f')) {
-            add_last__NLT(string_tmp__VH,'\f');
+          if ((__tmp__HNKB == 'f')) {
+            add_last__ZLT(string_tmp__VH,'\f');
           };
-          if ((__tmp__1MKB == 'n')) {
-            add_last__NLT(string_tmp__VH,'\n');
+          if ((__tmp__HNKB == 'n')) {
+            add_last__ZLT(string_tmp__VH,'\n');
           };
-          if ((__tmp__1MKB == 'r')) {
-            add_last__NLT(string_tmp__VH,'\r');
+          if ((__tmp__HNKB == 'r')) {
+            add_last__ZLT(string_tmp__VH,'\r');
           };
-          if ((__tmp__1MKB == 't')) {
-            add_last__NLT(string_tmp__VH,'\t');
+          if ((__tmp__HNKB == 't')) {
+            add_last__ZLT(string_tmp__VH,'\t');
           };
-          if ((__tmp__1MKB == 'v')) {
-            add_last__NLT(string_tmp__VH,'\v');
+          if ((__tmp__HNKB == 'v')) {
+            add_last__ZLT(string_tmp__VH,'\v');
           };
-          if ((__tmp__1MKB == '\\')) {
-            add_last__NLT(string_tmp__VH,'\\');
+          if ((__tmp__HNKB == '\\')) {
+            add_last__ZLT(string_tmp__VH,'\\');
           };
-          if ((__tmp__1MKB == '?')) {
-            add_last__NLT(string_tmp__VH,'\?');
+          if ((__tmp__HNKB == '?')) {
+            add_last__ZLT(string_tmp__VH,'\?');
           };
-          if ((__tmp__1MKB == '\'')) {
-            add_last__NLT(string_tmp__VH,'\'');
+          if ((__tmp__HNKB == '\'')) {
+            add_last__ZLT(string_tmp__VH,'\'');
           };
-          if ((__tmp__1MKB == '\"')) {
-            add_last__NLT(string_tmp__VH,'\"');
+          if ((__tmp__HNKB == '\"')) {
+            add_last__ZLT(string_tmp__VH,'\"');
           };
         } else {
-          add_last__NLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[(__INTEGER)(j__DLKB -  1)]);
+          add_last__ZLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[(__INTEGER)(j__PLKB -  1)]);
         };
-        j__DLKB=(__INTEGER)(j__DLKB +  1);
+        j__PLKB=(__INTEGER)(j__PLKB +  1);
       };
-      last_string__2ZC=get__2VB(string_tmp__VH);
-      result__CLKB=TRUE__;
+      last_string__I0C=get__IWB(string_tmp__VH);
+      result__OLKB=TRUE__;
     };
   };
-  return(result__CLKB);
+  return(result__OLKB);
 }
 
-static void fast_put__to__M1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__N1R,void *k__P1R)
+static void fast_put__to__Y1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__Z1R,void *k__11R)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__RN5G,__tmp__TN5G,Self__UN5G,idx__X1R,idx__5TNB;
-  __INTEGER new_capacity__AUNB,i__BUNB,result__WN5G,__tmp__YN5G;
-  __INTEGER Self__ZN5G,typ_id__QWNB;
-  __STRING_CONSTANT *Self__XN5G;
-  __POINTER ptr__LWNB,ptr_table__0OAH,next__ZOAH,result__1OAH;
-  __POINTER ptr_table__5OAH,next__4OAH,result__APAH;
-  __UINTEGER_32 sz__NWNB,a__4J3G,new_size__5J3G,t__DK3G,a__CK3G;
-  __UINTEGER_32 new_size__CPAH,lab_type__BPAH;
-  void *node__01R,*node1__DUNB,*node2__EUNB,*__tmp__O3R;
-  void **old_buckets__CUNB;
-  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__KWNB;
-  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__LTDC;
-  result__RN5G= 0;
-  __tmp__TN5G=((__STRING_CONSTANT *)k__P1R)->count__DD;
-  Self__UN5G= 1;
-  while ((Self__UN5G <= __tmp__TN5G)) {
-    result__RN5G=(__INTEGER)((__INTEGER)( 5 * result__RN5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__P1R)->storage__JQO)[(__INTEGER)(Self__UN5G -  1)])));
-    Self__UN5G=(__INTEGER)(Self__UN5G +  1);
-  };
-  if ((result__RN5G <  0)) {
-    result__RN5G=(__INTEGER)(~ result__RN5G);
-  };
-  idx__X1R=(__INTEGER)(result__RN5G % Self__N1R->capacity__21R);
-  node__01R=((void **)Self__N1R->buckets__B2R)[idx__X1R];
-  while ((! (((void *)node__01R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__01R)->key__N2R == (void *)k__P1R)))) {
-    node__01R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__01R)->next__Y2R;
-  };
-  if (((void *)node__01R == (void *)NULL)) {
-    if ((Self__N1R->capacity__21R == Self__N1R->count__B3R)) {
-      idx__5TNB= 0;
-      node1__DUNB=NULL;
-      node2__EUNB=NULL;
-      old_buckets__CUNB=Self__N1R->buckets__B2R;
-      new_capacity__AUNB=prime_number_ceiling__L41((__INTEGER)(Self__N1R->capacity__21R +  1));
-      Self__N1R->buckets__B2R=create__AZ2(new_capacity__AUNB);
-      i__BUNB=(__INTEGER)(Self__N1R->capacity__21R -  1);
-      Self__N1R->capacity__21R=new_capacity__AUNB;
-      while ((i__BUNB >=  0)) {
-        node1__DUNB=((void **)old_buckets__CUNB)[i__BUNB];
-        while (((void *)node1__DUNB != (void *)NULL)) {
-          node2__EUNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__DUNB)->next__Y2R;
-          Self__XN5G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__DUNB)->key__N2R);
-          result__WN5G= 0;
-          __tmp__YN5G=Self__XN5G->count__DD;
-          Self__ZN5G= 1;
-          while ((Self__ZN5G <= __tmp__YN5G)) {
-            result__WN5G=(__INTEGER)((__INTEGER)( 5 * result__WN5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__XN5G->storage__JQO)[(__INTEGER)(Self__ZN5G -  1)])));
-            Self__ZN5G=(__INTEGER)(Self__ZN5G +  1);
-          };
-          if ((result__WN5G <  0)) {
-            result__WN5G=(__INTEGER)(~ result__WN5G);
-          };
-          idx__5TNB=(__INTEGER)(result__WN5G % Self__N1R->capacity__21R);
-          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__DUNB)->next__Y2R=((void **)Self__N1R->buckets__B2R)[idx__5TNB];
-          ((void **)Self__N1R->buckets__B2R)[idx__5TNB]=node1__DUNB;
-          node1__DUNB=node2__EUNB;
-        };
-        i__BUNB=(__INTEGER)(i__BUNB -  1);
-      };
-      idx__X1R=(__INTEGER)(result__RN5G % new_capacity__AUNB);
-    };
-    __tmp__O3R=((void **)Self__N1R->buckets__B2R)[idx__X1R];
-    result__KWNB=NULL;
-    ptr__LWNB=((__POINTER )(NULL));
-    typ_id__QWNB= 0;
-    sz__NWNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
-    if ((sz__NWNB ==  0)) {
-      result__KWNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
-    } else {
-      typ_id__QWNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__NWNB);
-      if ((typ_id__QWNB == (__INTEGER)(-  1))) {
-        a__4J3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__5J3G=(__UINTEGER_32)((__UINTEGER_32)(sz__NWNB + a__4J3G) & (__UINTEGER_32)(~ a__4J3G));
-        ptr_table__0OAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5J3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ZOAH=((__POINTER )(NULL));
-        result__1OAH=((__POINTER *)ptr_table__0OAH)[ 0];
-        if ((result__1OAH == (void *)NULL)) {
-          result__1OAH=new_lab__ARJ(new_size__5J3G);
-          next__ZOAH=(void *)((unsigned long)result__1OAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5J3G)));
-          ((__POINTER *)next__ZOAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0OAH)[ 0]=next__ZOAH;
-        } else {
-          next__ZOAH=((__POINTER *)result__1OAH)[ 0];
-          if ((next__ZOAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1OAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5J3G <<  1)) <=  4096)) {
-              next__ZOAH=(void *)((unsigned long)result__1OAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5J3G)));
+  __INTEGER result__3ZFH,__tmp__5ZFH,Self__A0FH,idx__D2R,idx__LUNB;
+  __INTEGER new_capacity__MUNB,i__NUNB,result__C0FH,__tmp__E0FH;
+  __INTEGER Self__F0FH,typ_id__2WNB;
+  __STRING_CONSTANT *Self__D0FH;
+  __POINTER ptr__XWNB,ptr_table__O1GH,next__N1GH,result__P1GH;
+  __POINTER ptr_table__T1GH,next__S1GH,result__U1GH;
+  __UINTEGER_32 sz__ZWNB,a__XVDH,new_size__YVDH,t__2VDH,a__1VDH;
+  __UINTEGER_32 new_size__W1GH,lab_type__V1GH;
+  void *node__G2R,*node1__PUNB,*node2__QUNB,*__tmp__03R;
+  void **old_buckets__OUNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__WWNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__XTDC;
+  result__3ZFH= 0;
+  __tmp__5ZFH=((__STRING_CONSTANT *)k__11R)->count__DD;
+  Self__A0FH= 1;
+  while ((Self__A0FH <= __tmp__5ZFH)) {
+    result__3ZFH=(__INTEGER)((__INTEGER)( 5 * result__3ZFH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__11R)->storage__VQO)[(__INTEGER)(Self__A0FH -  1)])));
+    Self__A0FH=(__INTEGER)(Self__A0FH +  1);
+  };
+  if ((result__3ZFH <  0)) {
+    result__3ZFH=(__INTEGER)(~ result__3ZFH);
+  };
+  idx__D2R=(__INTEGER)(result__3ZFH % Self__Z1R->capacity__I2R);
+  node__G2R=((void **)Self__Z1R->buckets__N2R)[idx__D2R];
+  while ((! (((void *)node__G2R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__G2R)->key__Z2R == (void *)k__11R)))) {
+    node__G2R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__G2R)->next__E3R;
+  };
+  if (((void *)node__G2R == (void *)NULL)) {
+    if ((Self__Z1R->capacity__I2R == Self__Z1R->count__N3R)) {
+      idx__LUNB= 0;
+      node1__PUNB=NULL;
+      node2__QUNB=NULL;
+      old_buckets__OUNB=Self__Z1R->buckets__N2R;
+      new_capacity__MUNB=prime_number_ceiling__X41((__INTEGER)(Self__Z1R->capacity__I2R +  1));
+      Self__Z1R->buckets__N2R=create__MZ2(new_capacity__MUNB);
+      i__NUNB=(__INTEGER)(Self__Z1R->capacity__I2R -  1);
+      Self__Z1R->capacity__I2R=new_capacity__MUNB;
+      while ((i__NUNB >=  0)) {
+        node1__PUNB=((void **)old_buckets__OUNB)[i__NUNB];
+        while (((void *)node1__PUNB != (void *)NULL)) {
+          node2__QUNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__PUNB)->next__E3R;
+          Self__D0FH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__PUNB)->key__Z2R);
+          result__C0FH= 0;
+          __tmp__E0FH=Self__D0FH->count__DD;
+          Self__F0FH= 1;
+          while ((Self__F0FH <= __tmp__E0FH)) {
+            result__C0FH=(__INTEGER)((__INTEGER)( 5 * result__C0FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__D0FH->storage__VQO)[(__INTEGER)(Self__F0FH -  1)])));
+            Self__F0FH=(__INTEGER)(Self__F0FH +  1);
+          };
+          if ((result__C0FH <  0)) {
+            result__C0FH=(__INTEGER)(~ result__C0FH);
+          };
+          idx__LUNB=(__INTEGER)(result__C0FH % Self__Z1R->capacity__I2R);
+          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__PUNB)->next__E3R=((void **)Self__Z1R->buckets__N2R)[idx__LUNB];
+          ((void **)Self__Z1R->buckets__N2R)[idx__LUNB]=node1__PUNB;
+          node1__PUNB=node2__QUNB;
+        };
+        i__NUNB=(__INTEGER)(i__NUNB -  1);
+      };
+      idx__D2R=(__INTEGER)(result__3ZFH % new_capacity__MUNB);
+    };
+    __tmp__03R=((void **)Self__Z1R->buckets__N2R)[idx__D2R];
+    result__WWNB=NULL;
+    ptr__XWNB=((__POINTER )(NULL));
+    typ_id__2WNB= 0;
+    sz__ZWNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
+    if ((sz__ZWNB ==  0)) {
+      result__WWNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__2WNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZWNB);
+      if ((typ_id__2WNB == (__INTEGER)(-  1))) {
+        a__XVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YVDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZWNB + a__XVDH) & (__UINTEGER_32)(~ a__XVDH));
+        ptr_table__O1GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YVDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__N1GH=((__POINTER )(NULL));
+        result__P1GH=((__POINTER *)ptr_table__O1GH)[ 0];
+        if ((result__P1GH == (void *)NULL)) {
+          result__P1GH=new_lab__MRJ(new_size__YVDH);
+          next__N1GH=(void *)((unsigned long)result__P1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVDH)));
+          ((__POINTER *)next__N1GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__O1GH)[ 0]=next__N1GH;
+        } else {
+          next__N1GH=((__POINTER *)result__P1GH)[ 0];
+          if ((next__N1GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YVDH <<  1)) <=  4096)) {
+              next__N1GH=(void *)((unsigned long)result__P1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVDH)));
             } else {
-              next__ZOAH=new_lab__ARJ(new_size__5J3G);
-            };
-            ((__POINTER *)next__ZOAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0OAH)[ 0]=next__ZOAH;
-          } else {
-            ((__POINTER *)result__1OAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZOAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1OAH=next__ZOAH;
-          };
-        };
-        ptr__LWNB=result__1OAH;
-      } else {
-        t__DK3G=((__UINTEGER_32 )typ_id__QWNB);
-        a__CK3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__CPAH=(__UINTEGER_32)((__UINTEGER_32)(sz__NWNB + a__CK3G) & (__UINTEGER_32)(~ a__CK3G));
-        ptr_table__5OAH=((__POINTER )(&(table_type[(t__DK3G)])));
-        lab_type__BPAH=(__UINTEGER_32)(t__DK3G |  1);
-        next__4OAH=((__POINTER )(NULL));
-        result__APAH=((__POINTER *)ptr_table__5OAH)[ 0];
-        if ((result__APAH == (void *)NULL)) {
-          result__APAH=new_lab__ARJ(lab_type__BPAH);
-          next__4OAH=(void *)((unsigned long)result__APAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CPAH)));
-          ((__POINTER *)next__4OAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5OAH)[ 0]=next__4OAH;
-        } else {
-          next__4OAH=((__POINTER *)result__APAH)[ 0];
-          if ((next__4OAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__APAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CPAH <<  1)) <=  4096)) {
-              next__4OAH=(void *)((unsigned long)result__APAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CPAH)));
+              next__N1GH=new_lab__MRJ(new_size__YVDH);
+            };
+            ((__POINTER *)next__N1GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__O1GH)[ 0]=next__N1GH;
+          } else {
+            ((__POINTER *)result__P1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__P1GH=next__N1GH;
+          };
+        };
+        ptr__XWNB=result__P1GH;
+      } else {
+        t__2VDH=((__UINTEGER_32 )typ_id__2WNB);
+        a__1VDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__W1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZWNB + a__1VDH) & (__UINTEGER_32)(~ a__1VDH));
+        ptr_table__T1GH=((__POINTER )(&(table_type[(t__2VDH)])));
+        lab_type__V1GH=(__UINTEGER_32)(t__2VDH |  1);
+        next__S1GH=((__POINTER )(NULL));
+        result__U1GH=((__POINTER *)ptr_table__T1GH)[ 0];
+        if ((result__U1GH == (void *)NULL)) {
+          result__U1GH=new_lab__MRJ(lab_type__V1GH);
+          next__S1GH=(void *)((unsigned long)result__U1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1GH)));
+          ((__POINTER *)next__S1GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__T1GH)[ 0]=next__S1GH;
+        } else {
+          next__S1GH=((__POINTER *)result__U1GH)[ 0];
+          if ((next__S1GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__W1GH <<  1)) <=  4096)) {
+              next__S1GH=(void *)((unsigned long)result__U1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1GH)));
             } else {
-              next__4OAH=new_lab__ARJ(lab_type__BPAH);
+              next__S1GH=new_lab__MRJ(lab_type__V1GH);
             };
-            ((__POINTER *)next__4OAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5OAH)[ 0]=next__4OAH;
+            ((__POINTER *)next__S1GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__T1GH)[ 0]=next__S1GH;
           } else {
-            ((__POINTER *)result__APAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4OAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__APAH=next__4OAH;
+            ((__POINTER *)result__U1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__U1GH=next__S1GH;
           };
         };
-        ptr__LWNB=result__APAH;
+        ptr__XWNB=result__U1GH;
       };
-      result__KWNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__LWNB);
-      *(result__KWNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+      result__WWNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__XWNB);
+      *(result__WWNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
     };
-    Self__LTDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__KWNB);
-    Self__LTDC->key__N2R=k__P1R;
-    Self__LTDC->next__Y2R=__tmp__O3R;
-    node__01R=result__KWNB;
-    ((void **)Self__N1R->buckets__B2R)[idx__X1R]=result__KWNB;
-    Self__N1R->count__B3R=(__INTEGER)(Self__N1R->count__B3R +  1);
+    Self__XTDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__WWNB);
+    Self__XTDC->key__Z2R=k__11R;
+    Self__XTDC->next__E3R=__tmp__03R;
+    node__G2R=result__WWNB;
+    ((void **)Self__Z1R->buckets__N2R)[idx__D2R]=result__WWNB;
+    Self__Z1R->count__N3R=(__INTEGER)(Self__Z1R->count__N3R +  1);
   };
 }
 
-static __TYPE_FULL* create__with__GQB(void *typ__IQB,__UINTEGER_8 code__JQB)
+static __TYPE_FULL* create__with__SQB(void *typ__UQB,__UINTEGER_8 code__VQB)
 // ({TYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_ID},{UINTEGER_8}) With resultNo recursive, No inlinable.
 {
-  __TYPE_FULL *result__P0B,*Self__IFS;
-  __POINTER ptr__Q0B,ptr_table__EPAH,next__DPAH,result__FPAH;
-  __POINTER ptr_table__JPAH,next__IPAH,result__KPAH;
-  __INTEGER typ_id__V0B;
-  __UINTEGER_32 sz__S0B,a__GK3G,new_size__HK3G,t__LK3G,a__KK3G;
-  __UINTEGER_32 new_size__MPAH,lab_type__LPAH;
-  void *__tmp__UFS,*__tmp__2FS;
-  __BOOLEAN __tmp__IGS,__tmp__JGS;
-  result__P0B=NULL;
-  ptr__Q0B=((__POINTER )(NULL));
-  typ_id__V0B= 0;
-  sz__S0B=((__UINTEGER_32 )sizeof(__TYPE_FULL));
-  if ((sz__S0B ==  0)) {
-    result__P0B=TYPE_FULL__;
+  __TYPE_FULL *result__10B,*Self__UFS;
+  __POINTER ptr__20B,ptr_table__Y1GH,next__X1GH,result__Z1GH;
+  __POINTER ptr_table__31GH,next__21GH,result__41GH;
+  __INTEGER typ_id__B1B;
+  __UINTEGER_32 sz__40B,a__5VDH,new_size__AWDH,t__EWDH,a__DWDH;
+  __UINTEGER_32 new_size__A2GH,lab_type__51GH;
+  void *__tmp__AGS,*__tmp__IGS;
+  __BOOLEAN __tmp__UGS,__tmp__VGS;
+  result__10B=NULL;
+  ptr__20B=((__POINTER )(NULL));
+  typ_id__B1B= 0;
+  sz__40B=((__UINTEGER_32 )sizeof(__TYPE_FULL));
+  if ((sz__40B ==  0)) {
+    result__10B=TYPE_FULL__;
   } else {
-    typ_id__V0B=__TYPE_FULL__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__S0B);
-    if ((typ_id__V0B == (__INTEGER)(-  1))) {
-      a__GK3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__HK3G=(__UINTEGER_32)((__UINTEGER_32)(sz__S0B + a__GK3G) & (__UINTEGER_32)(~ a__GK3G));
-      ptr_table__EPAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HK3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__DPAH=((__POINTER )(NULL));
-      result__FPAH=((__POINTER *)ptr_table__EPAH)[ 0];
-      if ((result__FPAH == (void *)NULL)) {
-        result__FPAH=new_lab__ARJ(new_size__HK3G);
-        next__DPAH=(void *)((unsigned long)result__FPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HK3G)));
-        ((__POINTER *)next__DPAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EPAH)[ 0]=next__DPAH;
-      } else {
-        next__DPAH=((__POINTER *)result__FPAH)[ 0];
-        if ((next__DPAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FPAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HK3G <<  1)) <=  4096)) {
-            next__DPAH=(void *)((unsigned long)result__FPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HK3G)));
-          } else {
-            next__DPAH=new_lab__ARJ(new_size__HK3G);
-          };
-          ((__POINTER *)next__DPAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EPAH)[ 0]=next__DPAH;
-        } else {
-          ((__POINTER *)result__FPAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DPAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FPAH=next__DPAH;
-        };
-      };
-      ptr__Q0B=result__FPAH;
-    } else {
-      t__LK3G=((__UINTEGER_32 )typ_id__V0B);
-      a__KK3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__MPAH=(__UINTEGER_32)((__UINTEGER_32)(sz__S0B + a__KK3G) & (__UINTEGER_32)(~ a__KK3G));
-      ptr_table__JPAH=((__POINTER )(&(table_type[(t__LK3G)])));
-      lab_type__LPAH=(__UINTEGER_32)(t__LK3G |  1);
-      next__IPAH=((__POINTER )(NULL));
-      result__KPAH=((__POINTER *)ptr_table__JPAH)[ 0];
-      if ((result__KPAH == (void *)NULL)) {
-        result__KPAH=new_lab__ARJ(lab_type__LPAH);
-        next__IPAH=(void *)((unsigned long)result__KPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MPAH)));
-        ((__POINTER *)next__IPAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JPAH)[ 0]=next__IPAH;
-      } else {
-        next__IPAH=((__POINTER *)result__KPAH)[ 0];
-        if ((next__IPAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KPAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MPAH <<  1)) <=  4096)) {
-            next__IPAH=(void *)((unsigned long)result__KPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MPAH)));
-          } else {
-            next__IPAH=new_lab__ARJ(lab_type__LPAH);
-          };
-          ((__POINTER *)next__IPAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JPAH)[ 0]=next__IPAH;
-        } else {
-          ((__POINTER *)result__KPAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IPAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KPAH=next__IPAH;
-        };
-      };
-      ptr__Q0B=result__KPAH;
-    };
-    result__P0B=((__TYPE_FULL *)ptr__Q0B);
-    *(result__P0B) = *(TYPE_FULL__);
-  };
-  Self__IFS=((__TYPE_FULL *)result__P0B);
-  Self__IFS->flag__MFS=code__JQB;
-  if (((void *)typ__IQB != (void *)NULL)) {
-    switch (((struct ___OBJ *)typ__IQB)->__id) {
+    typ_id__B1B=__TYPE_FULL__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__40B);
+    if ((typ_id__B1B == (__INTEGER)(-  1))) {
+      a__5VDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AWDH=(__UINTEGER_32)((__UINTEGER_32)(sz__40B + a__5VDH) & (__UINTEGER_32)(~ a__5VDH));
+      ptr_table__Y1GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AWDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__X1GH=((__POINTER )(NULL));
+      result__Z1GH=((__POINTER *)ptr_table__Y1GH)[ 0];
+      if ((result__Z1GH == (void *)NULL)) {
+        result__Z1GH=new_lab__MRJ(new_size__AWDH);
+        next__X1GH=(void *)((unsigned long)result__Z1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AWDH)));
+        ((__POINTER *)next__X1GH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Y1GH)[ 0]=next__X1GH;
+      } else {
+        next__X1GH=((__POINTER *)result__Z1GH)[ 0];
+        if ((next__X1GH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AWDH <<  1)) <=  4096)) {
+            next__X1GH=(void *)((unsigned long)result__Z1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AWDH)));
+          } else {
+            next__X1GH=new_lab__MRJ(new_size__AWDH);
+          };
+          ((__POINTER *)next__X1GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Y1GH)[ 0]=next__X1GH;
+        } else {
+          ((__POINTER *)result__Z1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Z1GH=next__X1GH;
+        };
+      };
+      ptr__20B=result__Z1GH;
+    } else {
+      t__EWDH=((__UINTEGER_32 )typ_id__B1B);
+      a__DWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__A2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__40B + a__DWDH) & (__UINTEGER_32)(~ a__DWDH));
+      ptr_table__31GH=((__POINTER )(&(table_type[(t__EWDH)])));
+      lab_type__51GH=(__UINTEGER_32)(t__EWDH |  1);
+      next__21GH=((__POINTER )(NULL));
+      result__41GH=((__POINTER *)ptr_table__31GH)[ 0];
+      if ((result__41GH == (void *)NULL)) {
+        result__41GH=new_lab__MRJ(lab_type__51GH);
+        next__21GH=(void *)((unsigned long)result__41GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2GH)));
+        ((__POINTER *)next__21GH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__31GH)[ 0]=next__21GH;
+      } else {
+        next__21GH=((__POINTER *)result__41GH)[ 0];
+        if ((next__21GH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__41GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__A2GH <<  1)) <=  4096)) {
+            next__21GH=(void *)((unsigned long)result__41GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2GH)));
+          } else {
+            next__21GH=new_lab__MRJ(lab_type__51GH);
+          };
+          ((__POINTER *)next__21GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__31GH)[ 0]=next__21GH;
+        } else {
+          ((__POINTER *)result__41GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__41GH=next__21GH;
+        };
+      };
+      ptr__20B=result__41GH;
+    };
+    result__10B=((__TYPE_FULL *)ptr__20B);
+    *(result__10B) = *(TYPE_FULL__);
+  };
+  Self__UFS=((__TYPE_FULL *)result__10B);
+  Self__UFS->flag__YFS=code__VQB;
+  if (((void *)typ__UQB != (void *)NULL)) {
+    switch (((struct ___OBJ *)typ__UQB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__UFS=(&__string_2);
+      __tmp__AGS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__UFS=(&__string_3);
+      __tmp__AGS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__UFS=(&__string_45);
+      __tmp__AGS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__UFS=(&__string_47);
+      __tmp__AGS=(&__string_47);
     } break;
     };
-    __tmp__IGS=((void *)__tmp__UFS != (void *)NULL);
+    __tmp__UGS=((void *)__tmp__AGS != (void *)NULL);
   } else {
-    __tmp__IGS=FALSE__;
+    __tmp__UGS=FALSE__;
   };
-  if (__tmp__IGS) {
-    switch (((struct ___OBJ *)typ__IQB)->__id) {
+  if (__tmp__UGS) {
+    switch (((struct ___OBJ *)typ__UQB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__2FS=(&__string_2);
+      __tmp__IGS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__2FS=(&__string_3);
+      __tmp__IGS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__2FS=(&__string_45);
+      __tmp__IGS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__2FS=(&__string_47);
+      __tmp__IGS=(&__string_47);
     } break;
     };
-    __tmp__JGS=__infix_equal_equal__S5DB(__tmp__2FS,(&__string_33));
+    __tmp__VGS=__infix_equal_equal__45DB(__tmp__IGS,(&__string_33));
   } else {
-    __tmp__JGS=FALSE__;
+    __tmp__VGS=FALSE__;
   };
-  if ((__tmp__JGS && (! ((__UINTEGER_8)(Self__IFS->flag__MFS &  1) !=  0)))) {
-    print__KHD((&__string_207));
+  if ((__tmp__VGS && (! ((__UINTEGER_8)(Self__UFS->flag__YFS &  1) !=  0)))) {
+    print__WHD((&__string_217));
     fputc((int)('\n'),stdout);
     exit(( 1));
   };
-  return(result__P0B);
+  return(result__10B);
 }
 
-static void** create__WYNB(__INTEGER nb_elements__YYNB)
+static void** create__CZNB(__INTEGER nb_elements__EZNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__RQ1G,a__OK3G,new_size__SQ1G,new_size2__TQ1G,a__SK3G;
-  __UINTEGER_32 new_size__TK3G;
-  __POINTER result__QQ1G,ptr_table__OPAH,next__NPAH,result__PPAH;
-  void *result__SPAH;
-  __INTEGER Self__PFMC;
-  void **Result__Z3RB;
-  sz__RQ1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__YYNB * ((__INTEGER )(sizeof(void *)))));
-  result__QQ1G=((__POINTER )(NULL));
-  a__OK3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__SQ1G=(__UINTEGER_32)((__UINTEGER_32)(sz__RQ1G + a__OK3G) & (__UINTEGER_32)(~ a__OK3G));
-  new_size2__TQ1G=(__UINTEGER_32)(new_size__SQ1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__TQ1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__SK3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__TK3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TQ1G + a__SK3G) & (__UINTEGER_32)(~ a__SK3G));
-    ptr_table__OPAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TK3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__NPAH=((__POINTER )(NULL));
-    result__PPAH=((__POINTER *)ptr_table__OPAH)[ 0];
-    if ((result__PPAH == (void *)NULL)) {
-      result__PPAH=new_lab__ARJ(new_size__TK3G);
-      next__NPAH=(void *)((unsigned long)result__PPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TK3G)));
-      ((__POINTER *)next__NPAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__OPAH)[ 0]=next__NPAH;
-    } else {
-      next__NPAH=((__POINTER *)result__PPAH)[ 0];
-      if ((next__NPAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PPAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TK3G <<  1)) <=  4096)) {
-          next__NPAH=(void *)((unsigned long)result__PPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TK3G)));
-        } else {
-          next__NPAH=new_lab__ARJ(new_size__TK3G);
-        };
-        ((__POINTER *)next__NPAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OPAH)[ 0]=next__NPAH;
-      } else {
-        ((__POINTER *)result__PPAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NPAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__PPAH=next__NPAH;
-      };
-    };
-    ((__POINTER *)result__PPAH)[ 0]=((__POINTER ) 3);
-    result__QQ1G=(void *)((unsigned long)result__PPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__L4BH,a__HWDH,new_size__M4BH,new_size2__N4BH,a__LWDH;
+  __UINTEGER_32 new_size__MWDH;
+  __POINTER result__K4BH,ptr_table__C2GH,next__B2GH,result__D2GH;
+  void *result__G2GH;
+  __INTEGER Self__1FMC;
+  void **Result__F4RB;
+  sz__L4BH=((__UINTEGER_32 )(__INTEGER)(nb_elements__EZNB * ((__INTEGER )(sizeof(void *)))));
+  result__K4BH=((__POINTER )(NULL));
+  a__HWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__M4BH=(__UINTEGER_32)((__UINTEGER_32)(sz__L4BH + a__HWDH) & (__UINTEGER_32)(~ a__HWDH));
+  new_size2__N4BH=(__UINTEGER_32)(new_size__M4BH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__N4BH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__LWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__MWDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__N4BH + a__LWDH) & (__UINTEGER_32)(~ a__LWDH));
+    ptr_table__C2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MWDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__B2GH=((__POINTER )(NULL));
+    result__D2GH=((__POINTER *)ptr_table__C2GH)[ 0];
+    if ((result__D2GH == (void *)NULL)) {
+      result__D2GH=new_lab__MRJ(new_size__MWDH);
+      next__B2GH=(void *)((unsigned long)result__D2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MWDH)));
+      ((__POINTER *)next__B2GH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__C2GH)[ 0]=next__B2GH;
+    } else {
+      next__B2GH=((__POINTER *)result__D2GH)[ 0];
+      if ((next__B2GH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MWDH <<  1)) <=  4096)) {
+          next__B2GH=(void *)((unsigned long)result__D2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MWDH)));
+        } else {
+          next__B2GH=new_lab__MRJ(new_size__MWDH);
+        };
+        ((__POINTER *)next__B2GH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__C2GH)[ 0]=next__B2GH;
+      } else {
+        ((__POINTER *)result__D2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__D2GH=next__B2GH;
+      };
+    };
+    ((__POINTER *)result__D2GH)[ 0]=((__POINTER ) 3);
+    result__K4BH=(void *)((unsigned long)result__D2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__SPAH=first_free__LDVB;
-    while ((((void *)result__SPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SPAH)->map_size_and_id__2SB &  4294967292LU) < new_size__SQ1G))) {
-      result__SPAH=((__MEMORY *)result__SPAH)->map_next_free__3SB;
+    result__G2GH=first_free__XDVB;
+    while ((((void *)result__G2GH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__G2GH)->map_size_and_id__ITB &  4294967292LU) < new_size__M4BH))) {
+      result__G2GH=((__MEMORY *)result__G2GH)->map_next_free__JTB;
     };
-    if (((void *)result__SPAH == (void *)NULL)) {
-      result__SPAH=new_page__CA5();
+    if (((void *)result__G2GH == (void *)NULL)) {
+      result__G2GH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__SPAH,new_size__SQ1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SPAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__QQ1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__G2GH,new_size__M4BH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__G2GH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__K4BH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__G2GH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__Z3RB=((void **)result__QQ1G);
-  Self__PFMC=(__INTEGER)(nb_elements__YYNB -  1);
-  while ((Self__PFMC >=  0)) {
-    Result__Z3RB[Self__PFMC]=NULL;
-    Self__PFMC=(__INTEGER)(Self__PFMC -  1);
+  Result__F4RB=((void **)result__K4BH);
+  Self__1FMC=(__INTEGER)(nb_elements__EZNB -  1);
+  while ((Self__1FMC >=  0)) {
+    Result__F4RB[Self__1FMC]=NULL;
+    Self__1FMC=(__INTEGER)(Self__1FMC -  1);
   };
-  return(Result__Z3RB);
+  return(Result__F4RB);
 }
 
-static void add_last__C4R(__FAST_ARRAYoTYPE_IDo *Self__D4R,void *element__E4R)
+static void add_last__O4R(__FAST_ARRAYoTYPE_IDo *Self__P4R,void *element__Q4R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__F4R,__tmp__O5R,__tmp__RVDC,Self__Y4UD;
-  __BOOLEAN __tmp__V4R;
-  void **__tmp__N5R,**new__3UDC;
-  new_capacity__F4R= 0;
-  if (((__INTEGER)(Self__D4R->parent_arrayed_collection__LAB.upper__G4R +  1) <= (__INTEGER)(Self__D4R->parent_arrayed_collection__LAB.capacity__I4R -  1))) {
-    Self__D4R->parent_arrayed_collection__LAB.upper__G4R=(__INTEGER)(Self__D4R->parent_arrayed_collection__LAB.upper__G4R +  1);
-    __tmp__V4R=TRUE__;
+  __INTEGER new_capacity__R4R,__tmp__05R,__tmp__3VDC,Self__R5UD;
+  __BOOLEAN __tmp__B5R;
+  void **__tmp__Z5R,**new__JVDC;
+  new_capacity__R4R= 0;
+  if (((__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.upper__S4R +  1) <= (__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.capacity__U4R -  1))) {
+    Self__P4R->parent_arrayed_collection__UAB.upper__S4R=(__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.upper__S4R +  1);
+    __tmp__B5R=TRUE__;
   } else {
-    __tmp__V4R=FALSE__;
-  };
-  if ((! __tmp__V4R)) {
-    if ((Self__D4R->parent_arrayed_collection__LAB.capacity__I4R ==  0)) {
-      Self__D4R->parent_arrayed_collection__LAB.storage__E5R=create__WYNB( 2);
-      Self__D4R->parent_arrayed_collection__LAB.capacity__I4R= 2;
-      Self__D4R->parent_arrayed_collection__LAB.upper__G4R= 0;
-    } else {
-      new_capacity__F4R=(__INTEGER)(Self__D4R->parent_arrayed_collection__LAB.capacity__I4R <<  1);
-      __tmp__N5R=Self__D4R->parent_arrayed_collection__LAB.storage__E5R;
-      __tmp__O5R=Self__D4R->parent_arrayed_collection__LAB.capacity__I4R;
-      new__3UDC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__N5R)),((__UINTEGER_32 )(__INTEGER)(__tmp__O5R * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__F4R * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__RVDC=(__INTEGER)(new_capacity__F4R -  1);
-      Self__Y4UD=__tmp__O5R;
-      while ((Self__Y4UD <= __tmp__RVDC)) {
-        new__3UDC[Self__Y4UD]=NULL;
-        Self__Y4UD=(__INTEGER)(Self__Y4UD +  1);
-      };
-      Self__D4R->parent_arrayed_collection__LAB.storage__E5R=new__3UDC;
-      Self__D4R->parent_arrayed_collection__LAB.capacity__I4R=new_capacity__F4R;
-      Self__D4R->parent_arrayed_collection__LAB.upper__G4R=(__INTEGER)(Self__D4R->parent_arrayed_collection__LAB.upper__G4R +  1);
-    };
-  };
-  ((void **)Self__D4R->parent_arrayed_collection__LAB.storage__E5R)[Self__D4R->parent_arrayed_collection__LAB.upper__G4R]=element__E4R;
+    __tmp__B5R=FALSE__;
+  };
+  if ((! __tmp__B5R)) {
+    if ((Self__P4R->parent_arrayed_collection__UAB.capacity__U4R ==  0)) {
+      Self__P4R->parent_arrayed_collection__UAB.storage__Q5R=create__CZNB( 2);
+      Self__P4R->parent_arrayed_collection__UAB.capacity__U4R= 2;
+      Self__P4R->parent_arrayed_collection__UAB.upper__S4R= 0;
+    } else {
+      new_capacity__R4R=(__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.capacity__U4R <<  1);
+      __tmp__Z5R=Self__P4R->parent_arrayed_collection__UAB.storage__Q5R;
+      __tmp__05R=Self__P4R->parent_arrayed_collection__UAB.capacity__U4R;
+      new__JVDC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__Z5R)),((__UINTEGER_32 )(__INTEGER)(__tmp__05R * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__R4R * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__3VDC=(__INTEGER)(new_capacity__R4R -  1);
+      Self__R5UD=__tmp__05R;
+      while ((Self__R5UD <= __tmp__3VDC)) {
+        new__JVDC[Self__R5UD]=NULL;
+        Self__R5UD=(__INTEGER)(Self__R5UD +  1);
+      };
+      Self__P4R->parent_arrayed_collection__UAB.storage__Q5R=new__JVDC;
+      Self__P4R->parent_arrayed_collection__UAB.capacity__U4R=new_capacity__R4R;
+      Self__P4R->parent_arrayed_collection__UAB.upper__S4R=(__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.upper__S4R +  1);
+    };
+  };
+  ((void **)Self__P4R->parent_arrayed_collection__UAB.storage__Q5R)[Self__P4R->parent_arrayed_collection__UAB.upper__S4R]=element__Q4R;
 }
 
-static __BOOLEAN open__NERD(__DIRECTORY_UNIX *Self__OERD)
+static __BOOLEAN open__ZERD(__DIRECTORY_UNIX *Self__0ERD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __POINTER dirent__UERD,ptr__HGLE,ptr_table__WPAH,next__VPAH;
-  __POINTER result__XPAH,ptr_table__1PAH,next__0PAH,result__2PAH;
-  __POINTER dir__SERD,ptr__FQAH,ptr_table__PQAH,next__OQAH,result__QQAH;
-  __POINTER ptr_table__UQAH,next__TQAH,result__VQAH,ptr__MYMF;
-  __POINTER ptr_table__ZQAH,next__YQAH,result__0QAH,ptr_table__4QAH;
-  __POINTER next__3QAH,result__5QAH;
-  __INTEGER i__YERD,typ_id__MGLE,i__AQAH,Self__Y4DF,i__SL3G,j__UL3G;
-  __INTEGER Self__2H5G,idx__KP2E,idx__IC3,n__NTTD,n__UV3G,typ_id__GQAH;
-  __INTEGER typ_id__RYMF;
-  __UINTEGER_32 sz__JGLE,a__BL3G,new_size__CL3G,t__GL3G,a__FL3G;
-  __UINTEGER_32 new_size__4PAH,lab_type__3PAH,sz__HQAH,a__IQAH;
-  __UINTEGER_32 new_size__JQAH,t__KQAH,a__LQAH,new_size__XQAH;
-  __UINTEGER_32 lab_type__WQAH,sz__OYMF,a__NX3G,new_size__OX3G,t__SX3G;
-  __UINTEGER_32 a__RX3G,new_size__BRAH,lab_type__ARAH;
-  __STRING *new__Z2PE,*Self__A3PE,*Self__EH2E,*Self__RL3G,*Self__NXSD;
-  __STRING *Self__MTTD;
-  void *other__TL3G;
-  void *result__JP2E;
-  void *__tmp__3R2E,*dir__1R2E;
-  void *__tmp__HHRD;
-  __CHARACTER *n__RERD,*Self__BQAH,*other__CQAH,*Self__3H5G,*model__4H5G;
-  __CHARACTER *Self__2B3;
-  __BOOLEAN result__XERD,result__SARE,__tmp__MR2E;
-  __LINKED_LISToENTRYo *result__GGLE,*Self__WHVE,*Self__N3KF;
-  __LINKED_LIST_NODEoENTRYo *result__EQAH,*Self__MQAH,*result__LYMF;
-  __LINKED_LIST_NODEoENTRYo *Self__5BPF;
-  n__RERD=NULL;
-  dirent__UERD=((__POINTER )(NULL));
-  result__XERD=FALSE__;
-  i__YERD= 0;
-  if (((void *)Self__OERD->parent_directory__OED.list__2ERD == (void *)NULL)) {
-    result__GGLE=NULL;
-    ptr__HGLE=((__POINTER )(NULL));
-    typ_id__MGLE= 0;
-    sz__JGLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
-    if ((sz__JGLE ==  0)) {
-      result__GGLE=LINKED_LISToENTRYo__;
-    } else {
-      typ_id__MGLE=__LINKED_LISToENTRYo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__JGLE);
-      if ((typ_id__MGLE == (__INTEGER)(-  1))) {
-        a__BL3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__CL3G=(__UINTEGER_32)((__UINTEGER_32)(sz__JGLE + a__BL3G) & (__UINTEGER_32)(~ a__BL3G));
-        ptr_table__WPAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CL3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__VPAH=((__POINTER )(NULL));
-        result__XPAH=((__POINTER *)ptr_table__WPAH)[ 0];
-        if ((result__XPAH == (void *)NULL)) {
-          result__XPAH=new_lab__ARJ(new_size__CL3G);
-          next__VPAH=(void *)((unsigned long)result__XPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CL3G)));
-          ((__POINTER *)next__VPAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WPAH)[ 0]=next__VPAH;
-        } else {
-          next__VPAH=((__POINTER *)result__XPAH)[ 0];
-          if ((next__VPAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XPAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CL3G <<  1)) <=  4096)) {
-              next__VPAH=(void *)((unsigned long)result__XPAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CL3G)));
+  __POINTER dirent__AFRD,ptr__QVLE,ptr_table__K2GH,next__J2GH;
+  __POINTER result__L2GH,ptr_table__P2GH,next__O2GH,result__Q2GH;
+  __POINTER dir__4ERD,ptr__Z2GH,ptr_table__D3GH,next__C3GH,result__E3GH;
+  __POINTER ptr_table__I3GH,next__H3GH,result__J3GH,ptr__Q3MF;
+  __POINTER ptr_table__N3GH,next__M3GH,result__O3GH,ptr_table__S3GH;
+  __POINTER next__R3GH,result__T3GH;
+  __INTEGER i__EFRD,typ_id__VVLE,i__U2GH,Self__HTEF,i__LXDH,j__NXDH;
+  __INTEGER Self__2TFH,idx__WF3E,idx__UC3,n__GUTD,n__TBEH,typ_id__02GH;
+  __INTEGER typ_id__V3MF;
+  __UINTEGER_32 sz__SVLE,a__0WDH,new_size__1WDH,t__5WDH,a__4WDH;
+  __UINTEGER_32 new_size__S2GH,lab_type__R2GH,sz__12GH,a__22GH;
+  __UINTEGER_32 new_size__32GH,t__42GH,a__52GH,new_size__L3GH;
+  __UINTEGER_32 lab_type__K3GH,sz__S3MF,a__2CEH,new_size__3CEH,t__BDEH;
+  __UINTEGER_32 a__ADEH,new_size__V3GH,lab_type__U3GH;
+  __STRING *new__YOQE,*Self__5OQE,*Self__Q32E,*Self__KXDH,*Self__ZXSD;
+  __STRING *Self__FUTD;
+  void *other__MXDH;
+  void *result__VF3E;
+  void *__tmp__JI3E,*dir__HI3E;
+  void *__tmp__THRD;
+  __CHARACTER *n__3ERD,*Self__V2GH,*other__W2GH,*Self__3TFH,*model__4TFH;
+  __CHARACTER *Self__IC3;
+  __BOOLEAN result__DFRD,result__QQRE,__tmp__YH3E;
+  __LINKED_LISToENTRYo *result__PVLE,*Self__MWVE,*Self__CKLF;
+  __LINKED_LIST_NODEoENTRYo *result__Y2GH,*Self__A3GH,*result__P3MF;
+  __LINKED_LIST_NODEoENTRYo *Self__HFPF;
+  n__3ERD=NULL;
+  dirent__AFRD=((__POINTER )(NULL));
+  result__DFRD=FALSE__;
+  i__EFRD= 0;
+  if (((void *)Self__0ERD->parent_directory__0ED.list__IFRD == (void *)NULL)) {
+    result__PVLE=NULL;
+    ptr__QVLE=((__POINTER )(NULL));
+    typ_id__VVLE= 0;
+    sz__SVLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
+    if ((sz__SVLE ==  0)) {
+      result__PVLE=LINKED_LISToENTRYo__;
+    } else {
+      typ_id__VVLE=__LINKED_LISToENTRYo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SVLE);
+      if ((typ_id__VVLE == (__INTEGER)(-  1))) {
+        a__0WDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1WDH=(__UINTEGER_32)((__UINTEGER_32)(sz__SVLE + a__0WDH) & (__UINTEGER_32)(~ a__0WDH));
+        ptr_table__K2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1WDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__J2GH=((__POINTER )(NULL));
+        result__L2GH=((__POINTER *)ptr_table__K2GH)[ 0];
+        if ((result__L2GH == (void *)NULL)) {
+          result__L2GH=new_lab__MRJ(new_size__1WDH);
+          next__J2GH=(void *)((unsigned long)result__L2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1WDH)));
+          ((__POINTER *)next__J2GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K2GH)[ 0]=next__J2GH;
+        } else {
+          next__J2GH=((__POINTER *)result__L2GH)[ 0];
+          if ((next__J2GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1WDH <<  1)) <=  4096)) {
+              next__J2GH=(void *)((unsigned long)result__L2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1WDH)));
             } else {
-              next__VPAH=new_lab__ARJ(new_size__CL3G);
-            };
-            ((__POINTER *)next__VPAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WPAH)[ 0]=next__VPAH;
-          } else {
-            ((__POINTER *)result__XPAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XPAH=next__VPAH;
-          };
-        };
-        ptr__HGLE=result__XPAH;
-      } else {
-        t__GL3G=((__UINTEGER_32 )typ_id__MGLE);
-        a__FL3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__4PAH=(__UINTEGER_32)((__UINTEGER_32)(sz__JGLE + a__FL3G) & (__UINTEGER_32)(~ a__FL3G));
-        ptr_table__1PAH=((__POINTER )(&(table_type[(t__GL3G)])));
-        lab_type__3PAH=(__UINTEGER_32)(t__GL3G |  1);
-        next__0PAH=((__POINTER )(NULL));
-        result__2PAH=((__POINTER *)ptr_table__1PAH)[ 0];
-        if ((result__2PAH == (void *)NULL)) {
-          result__2PAH=new_lab__ARJ(lab_type__3PAH);
-          next__0PAH=(void *)((unsigned long)result__2PAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4PAH)));
-          ((__POINTER *)next__0PAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1PAH)[ 0]=next__0PAH;
-        } else {
-          next__0PAH=((__POINTER *)result__2PAH)[ 0];
-          if ((next__0PAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2PAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4PAH <<  1)) <=  4096)) {
-              next__0PAH=(void *)((unsigned long)result__2PAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4PAH)));
+              next__J2GH=new_lab__MRJ(new_size__1WDH);
+            };
+            ((__POINTER *)next__J2GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__K2GH)[ 0]=next__J2GH;
+          } else {
+            ((__POINTER *)result__L2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__L2GH=next__J2GH;
+          };
+        };
+        ptr__QVLE=result__L2GH;
+      } else {
+        t__5WDH=((__UINTEGER_32 )typ_id__VVLE);
+        a__4WDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__S2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__SVLE + a__4WDH) & (__UINTEGER_32)(~ a__4WDH));
+        ptr_table__P2GH=((__POINTER )(&(table_type[(t__5WDH)])));
+        lab_type__R2GH=(__UINTEGER_32)(t__5WDH |  1);
+        next__O2GH=((__POINTER )(NULL));
+        result__Q2GH=((__POINTER *)ptr_table__P2GH)[ 0];
+        if ((result__Q2GH == (void *)NULL)) {
+          result__Q2GH=new_lab__MRJ(lab_type__R2GH);
+          next__O2GH=(void *)((unsigned long)result__Q2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S2GH)));
+          ((__POINTER *)next__O2GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P2GH)[ 0]=next__O2GH;
+        } else {
+          next__O2GH=((__POINTER *)result__Q2GH)[ 0];
+          if ((next__O2GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__S2GH <<  1)) <=  4096)) {
+              next__O2GH=(void *)((unsigned long)result__Q2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S2GH)));
             } else {
-              next__0PAH=new_lab__ARJ(lab_type__3PAH);
+              next__O2GH=new_lab__MRJ(lab_type__R2GH);
             };
-            ((__POINTER *)next__0PAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1PAH)[ 0]=next__0PAH;
+            ((__POINTER *)next__O2GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__P2GH)[ 0]=next__O2GH;
           } else {
-            ((__POINTER *)result__2PAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2PAH=next__0PAH;
+            ((__POINTER *)result__Q2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Q2GH=next__O2GH;
           };
         };
-        ptr__HGLE=result__2PAH;
+        ptr__QVLE=result__Q2GH;
       };
-      result__GGLE=((__LINKED_LISToENTRYo *)ptr__HGLE);
-      *(result__GGLE) = *(LINKED_LISToENTRYo__);
+      result__PVLE=((__LINKED_LISToENTRYo *)ptr__QVLE);
+      *(result__PVLE) = *(LINKED_LISToENTRYo__);
     };
-    Self__OERD->parent_directory__OED.list__2ERD=result__GGLE;
+    Self__0ERD->parent_directory__0ED.list__IFRD=result__PVLE;
   } else {
-    Self__WHVE=((__LINKED_LISToENTRYo *)Self__OERD->parent_directory__OED.list__2ERD);
-    if (((void *)Self__WHVE->first_link__YHVE != (void *)NULL)) {
-      Self__WHVE->first_link__YHVE=NULL;
-      Self__WHVE->mem_idx__5HVE= 0;
-      Self__WHVE->mem_lnk__AIVE=NULL;
-      Self__WHVE->parent_linked_collection__1ERD.upper__C32D= 0;
-      Self__WHVE->last_link__BIVE=NULL;
-    };
-  };
-  dir__SERD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__OERD->parent_entry_unix__NED.parent_entry__MED.path__BD)->storage__JQO))));
-  if ((dir__SERD != (void *)NULL)) {
-    result__XERD=TRUE__;
+    Self__MWVE=((__LINKED_LISToENTRYo *)Self__0ERD->parent_directory__0ED.list__IFRD);
+    if (((void *)Self__MWVE->first_link__OWVE != (void *)NULL)) {
+      Self__MWVE->first_link__OWVE=NULL;
+      Self__MWVE->mem_idx__VWVE= 0;
+      Self__MWVE->mem_lnk__WWVE=NULL;
+      Self__MWVE->parent_linked_collection__HFRD.upper__TI3D= 0;
+      Self__MWVE->last_link__XWVE=NULL;
+    };
+  };
+  dir__4ERD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD)->storage__VQO))));
+  if ((dir__4ERD != (void *)NULL)) {
+    result__DFRD=TRUE__;
     do {
-      dirent__UERD=((__POINTER )(readdir((dir__SERD))));
-      if ((dirent__UERD != (void *)NULL)) {
-        n__RERD=((__CHARACTER *)(((struct dirent *)(dirent__UERD))->d_name));
-        ((__STRING *)string_tmp__HED)->count__KFC= 0;
-        i__YERD= 0;
-        while ((((__CHARACTER *)n__RERD)[i__YERD] != '\0')) {
-          add_last__NLT(string_tmp__HED,((__CHARACTER *)n__RERD)[i__YERD]);
-          i__YERD=(__INTEGER)(i__YERD +  1);
-        };
-        new__Z2PE=create__EBB(((__STRING_CONSTANT *)(&__string_208))->count__DD);
-        copy__NCS(new__Z2PE,(&__string_208));
-        Self__A3PE=((__STRING *)string_tmp__HED);
-        result__SARE=FALSE__;
-        if ((Self__A3PE->count__KFC == new__Z2PE->count__KFC)) {
-          if ((Self__A3PE->count__KFC ==  0)) {
-            result__SARE=TRUE__;
-          } else {
-            Self__BQAH=((__CHARACTER *)Self__A3PE->storage__VBS);
-            other__CQAH=new__Z2PE->storage__VBS;
-            i__AQAH=(__INTEGER)(Self__A3PE->count__KFC -  1);
-            while (((i__AQAH >=  0) && (Self__BQAH[i__AQAH] == ((__CHARACTER *)other__CQAH)[i__AQAH]))) {
-              i__AQAH=(__INTEGER)(i__AQAH -  1);
-            };
-            result__SARE=(i__AQAH <  0);
-          };
-        };
-        if ((! result__SARE)) {
-          Self__EH2E=((__STRING *)string_tmp__HED);
-          add_last__NLT(Self__EH2E,' ');
-          Self__Y4DF=Self__EH2E->count__KFC;
-          while ((Self__Y4DF >=  2)) {
-            ((__CHARACTER *)Self__EH2E->storage__VBS)[(__INTEGER)(Self__Y4DF -  1)]=((__CHARACTER *)Self__EH2E->storage__VBS)[(__INTEGER)((__INTEGER)(Self__Y4DF -  1) -  1)];
-            Self__Y4DF=(__INTEGER)(Self__Y4DF -  1);
-          };
-          ((__CHARACTER *)Self__EH2E->storage__VBS)[ 0]='/';
-          Self__RL3G=((__STRING *)string_tmp__HED);
-          other__TL3G=Self__OERD->parent_entry_unix__NED.parent_entry__MED.path__BD;
-          i__SL3G=Self__RL3G->count__KFC;
-          j__UL3G=((__STRING_CONSTANT *)other__TL3G)->count__DD;
-          resize__MXZ(Self__RL3G,(__INTEGER)(i__SL3G + j__UL3G));
-          if (((i__SL3G >  0) && (j__UL3G >  0))) {
-            move__to__by__VVCC(Self__RL3G->storage__VBS, 0,(__INTEGER)(i__SL3G -  1),j__UL3G);
-          };
-          Self__3H5G=((__CHARACTER *)Self__RL3G->storage__VBS);
-          model__4H5G=((__STRING_CONSTANT *)other__TL3G)->storage__JQO;
-          Self__2H5G=(__INTEGER)(j__UL3G -  1);
-          while ((Self__2H5G >=  0)) {
-            Self__3H5G[Self__2H5G]=((__CHARACTER *)model__4H5G)[Self__2H5G];
-            Self__2H5G=(__INTEGER)(Self__2H5G -  1);
-          };
-          reduce_path__MI2E(string_tmp__HED);
-          result__JP2E=NULL;
-          idx__KP2E= 0;
-          copy__NCS(string_tmp2__N0AC,Self__OERD->parent_entry_unix__NED.parent_entry__MED.path__BD);
-          add_last__NLT(string_tmp2__N0AC,'/');
-          append__VNS(string_tmp2__N0AC,string_tmp__HED);
-          reduce_path__MI2E(string_tmp2__N0AC);
-          copy__NCS(string_tmp3__T0AC,string_tmp2__N0AC);
+      dirent__AFRD=((__POINTER )(readdir((dir__4ERD))));
+      if ((dirent__AFRD != (void *)NULL)) {
+        n__3ERD=((__CHARACTER *)(((struct dirent *)(dirent__AFRD))->d_name));
+        ((__STRING *)string_tmp__TED)->count__WFC= 0;
+        i__EFRD= 0;
+        while ((((__CHARACTER *)n__3ERD)[i__EFRD] != '\0')) {
+          add_last__ZLT(string_tmp__TED,((__CHARACTER *)n__3ERD)[i__EFRD]);
+          i__EFRD=(__INTEGER)(i__EFRD +  1);
+        };
+        new__YOQE=create__NBB(((__STRING_CONSTANT *)(&__string_218))->count__DD);
+        copy__ZCS(new__YOQE,(&__string_218));
+        Self__5OQE=((__STRING *)string_tmp__TED);
+        result__QQRE=FALSE__;
+        if ((Self__5OQE->count__WFC == new__YOQE->count__WFC)) {
+          if ((Self__5OQE->count__WFC ==  0)) {
+            result__QQRE=TRUE__;
+          } else {
+            Self__V2GH=((__CHARACTER *)Self__5OQE->storage__BCS);
+            other__W2GH=new__YOQE->storage__BCS;
+            i__U2GH=(__INTEGER)(Self__5OQE->count__WFC -  1);
+            while (((i__U2GH >=  0) && (Self__V2GH[i__U2GH] == ((__CHARACTER *)other__W2GH)[i__U2GH]))) {
+              i__U2GH=(__INTEGER)(i__U2GH -  1);
+            };
+            result__QQRE=(i__U2GH <  0);
+          };
+        };
+        if ((! result__QQRE)) {
+          Self__Q32E=((__STRING *)string_tmp__TED);
+          add_last__ZLT(Self__Q32E,' ');
+          Self__HTEF=Self__Q32E->count__WFC;
+          while ((Self__HTEF >=  2)) {
+            ((__CHARACTER *)Self__Q32E->storage__BCS)[(__INTEGER)(Self__HTEF -  1)]=((__CHARACTER *)Self__Q32E->storage__BCS)[(__INTEGER)((__INTEGER)(Self__HTEF -  1) -  1)];
+            Self__HTEF=(__INTEGER)(Self__HTEF -  1);
+          };
+          ((__CHARACTER *)Self__Q32E->storage__BCS)[ 0]='/';
+          Self__KXDH=((__STRING *)string_tmp__TED);
+          other__MXDH=Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+          i__LXDH=Self__KXDH->count__WFC;
+          j__NXDH=((__STRING_CONSTANT *)other__MXDH)->count__DD;
+          resize__YXZ(Self__KXDH,(__INTEGER)(i__LXDH + j__NXDH));
+          if (((i__LXDH >  0) && (j__NXDH >  0))) {
+            move__to__by__BWCC(Self__KXDH->storage__BCS, 0,(__INTEGER)(i__LXDH -  1),j__NXDH);
+          };
+          Self__3TFH=((__CHARACTER *)Self__KXDH->storage__BCS);
+          model__4TFH=((__STRING_CONSTANT *)other__MXDH)->storage__VQO;
+          Self__2TFH=(__INTEGER)(j__NXDH -  1);
+          while ((Self__2TFH >=  0)) {
+            Self__3TFH[Self__2TFH]=((__CHARACTER *)model__4TFH)[Self__2TFH];
+            Self__2TFH=(__INTEGER)(Self__2TFH -  1);
+          };
+          reduce_path__Y42E(string_tmp__TED);
+          result__VF3E=NULL;
+          idx__WF3E= 0;
+          copy__ZCS(string_tmp2__Z0AC,Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD);
+          add_last__ZLT(string_tmp2__Z0AC,'/');
+          append__BOS(string_tmp2__Z0AC,string_tmp__TED);
+          reduce_path__Y42E(string_tmp2__Z0AC);
+          copy__ZCS(string_tmp3__50AC,string_tmp2__Z0AC);
           do {
-            result__JP2E=reference_at__YT0C(alias__YED,string_tmp2__N0AC);
-            if (((void *)result__JP2E == (void *)NULL)) {
-              Self__NXSD=((__STRING *)string_tmp2__N0AC);
-              Self__2B3=((__CHARACTER *)Self__NXSD->storage__VBS);
-              idx__IC3=(__INTEGER)(Self__NXSD->count__KFC -  1);
-              while ((! ((idx__IC3 <  0) || ('/' == Self__2B3[idx__IC3])))) {
-                idx__IC3=(__INTEGER)(idx__IC3 -  1);
+            result__VF3E=reference_at__EU0C(alias__EFD,string_tmp2__Z0AC);
+            if (((void *)result__VF3E == (void *)NULL)) {
+              Self__ZXSD=((__STRING *)string_tmp2__Z0AC);
+              Self__IC3=((__CHARACTER *)Self__ZXSD->storage__BCS);
+              idx__UC3=(__INTEGER)(Self__ZXSD->count__WFC -  1);
+              while ((! ((idx__UC3 <  0) || ('/' == Self__IC3[idx__UC3])))) {
+                idx__UC3=(__INTEGER)(idx__UC3 -  1);
               };
-              idx__KP2E=(__INTEGER)( 1 + idx__IC3);
-              if ((idx__KP2E >  0)) {
-                Self__MTTD=((__STRING *)string_tmp2__N0AC);
-                n__NTTD=(__INTEGER)(idx__KP2E -  1);
-                if ((n__NTTD < Self__MTTD->count__KFC)) {
-                  n__UV3G=(__INTEGER)(Self__MTTD->count__KFC - n__NTTD);
-                  if ((n__UV3G > Self__MTTD->count__KFC)) {
-                    Self__MTTD->count__KFC= 0;
+              idx__WF3E=(__INTEGER)( 1 + idx__UC3);
+              if ((idx__WF3E >  0)) {
+                Self__FUTD=((__STRING *)string_tmp2__Z0AC);
+                n__GUTD=(__INTEGER)(idx__WF3E -  1);
+                if ((n__GUTD < Self__FUTD->count__WFC)) {
+                  n__TBEH=(__INTEGER)(Self__FUTD->count__WFC - n__GUTD);
+                  if ((n__TBEH > Self__FUTD->count__WFC)) {
+                    Self__FUTD->count__WFC= 0;
                   } else {
-                    Self__MTTD->count__KFC=(__INTEGER)(Self__MTTD->count__KFC - n__UV3G);
+                    Self__FUTD->count__WFC=(__INTEGER)(Self__FUTD->count__WFC - n__TBEH);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__N0AC)->count__KFC= 0;
+                ((__STRING *)string_tmp2__Z0AC)->count__WFC= 0;
               };
             };
-          } while ((((void *)result__JP2E == (void *)NULL) && (((__STRING *)string_tmp2__N0AC)->count__KFC !=  0)));
-          if (((void *)result__JP2E == (void *)NULL)) {
-            if (FILE_SYSTEM__->parent_directory__DFD==0) {
+          } while ((((void *)result__VF3E == (void *)NULL) && (((__STRING *)string_tmp2__Z0AC)->count__WFC !=  0)));
+          if (((void *)result__VF3E == (void *)NULL)) {
+            if (FILE_SYSTEM__->parent_directory__PFD==0) {
             } else {
-              parent_directory__CED();
+              parent_directory__OED();
             };
-            result__JP2E=physical_get_entry__MW0C(string_tmp3__T0AC);
-            __tmp__MR2E=TRUE__;
+            result__VF3E=physical_get_entry__YW0C(string_tmp3__50AC);
+            __tmp__YH3E=TRUE__;
           } else {
-            __tmp__MR2E=FALSE__;
+            __tmp__YH3E=FALSE__;
           };
-          if ((! __tmp__MR2E)) {
-            if ((((__STRING *)string_tmp3__T0AC)->count__KFC != ((__STRING *)string_tmp2__N0AC)->count__KFC)) {
-              if (result__JP2E==NULL) {
-                __tmp__3R2E=NULL;
+          if ((! __tmp__YH3E)) {
+            if ((((__STRING *)string_tmp3__50AC)->count__WFC != ((__STRING *)string_tmp2__Z0AC)->count__WFC)) {
+              if (result__VF3E==NULL) {
+                __tmp__JI3E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__JP2E)->__id) {
+                switch (((struct ___OBJ *)result__VF3E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__3R2E=((void *)result__JP2E);
+                  __tmp__JI3E=((void *)result__VF3E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__3R2E=NULL;
+                  __tmp__JI3E=NULL;
                 } break;
                 }
               };
-              dir__1R2E=__tmp__3R2E;
-              result__JP2E=physical_get_entry__3BF(string_tmp3__T0AC);
+              dir__HI3E=__tmp__JI3E;
+              result__VF3E=physical_get_entry__JCF(string_tmp3__50AC);
             };
           };
-          if (((void *)result__JP2E == (void *)NULL)) {
-            result__XERD=FALSE__;
+          if (((void *)result__VF3E == (void *)NULL)) {
+            result__DFRD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__JP2E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__HHRD=((__DIRECTORY_UNIX *)result__JP2E)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+            if (((struct ___OBJ *)result__VF3E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__THRD=((__DIRECTORY_UNIX *)result__VF3E)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
             } else {
-              __tmp__HHRD=((__FILE_UNIX *)result__JP2E)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
-            };
-            if ((((__STRING_CONSTANT *)__tmp__HHRD)->count__DD >= ((__STRING_CONSTANT *)Self__OERD->parent_entry_unix__NED.parent_entry__MED.path__BD)->count__DD)) {
-              Self__N3KF=((__LINKED_LISToENTRYo *)Self__OERD->parent_directory__OED.list__2ERD);
-              if (((void *)Self__N3KF->first_link__YHVE == (void *)NULL)) {
-                result__EQAH=NULL;
-                ptr__FQAH=((__POINTER )(NULL));
-                typ_id__GQAH= 0;
-                sz__HQAH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
-                if ((sz__HQAH ==  0)) {
-                  result__EQAH=LINKED_LIST_NODEoENTRYo__;
+              __tmp__THRD=((__FILE_UNIX *)result__VF3E)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+            };
+            if ((((__STRING_CONSTANT *)__tmp__THRD)->count__DD >= ((__STRING_CONSTANT *)Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD)->count__DD)) {
+              Self__CKLF=((__LINKED_LISToENTRYo *)Self__0ERD->parent_directory__0ED.list__IFRD);
+              if (((void *)Self__CKLF->first_link__OWVE == (void *)NULL)) {
+                result__Y2GH=NULL;
+                ptr__Z2GH=((__POINTER )(NULL));
+                typ_id__02GH= 0;
+                sz__12GH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__12GH ==  0)) {
+                  result__Y2GH=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  typ_id__GQAH=__LINKED_LIST_NODEoENTRYo__;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__HQAH);
-                  if ((typ_id__GQAH == (__INTEGER)(-  1))) {
-                    a__IQAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__JQAH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQAH + a__IQAH) & (__UINTEGER_32)(~ a__IQAH));
-                    ptr_table__PQAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JQAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__OQAH=((__POINTER )(NULL));
-                    result__QQAH=((__POINTER *)ptr_table__PQAH)[ 0];
-                    if ((result__QQAH == (void *)NULL)) {
-                      result__QQAH=new_lab__ARJ(new_size__JQAH);
-                      next__OQAH=(void *)((unsigned long)result__QQAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQAH)));
-                      ((__POINTER *)next__OQAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__PQAH)[ 0]=next__OQAH;
+                  typ_id__02GH=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__12GH);
+                  if ((typ_id__02GH == (__INTEGER)(-  1))) {
+                    a__22GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__32GH=(__UINTEGER_32)((__UINTEGER_32)(sz__12GH + a__22GH) & (__UINTEGER_32)(~ a__22GH));
+                    ptr_table__D3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__32GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__C3GH=((__POINTER )(NULL));
+                    result__E3GH=((__POINTER *)ptr_table__D3GH)[ 0];
+                    if ((result__E3GH == (void *)NULL)) {
+                      result__E3GH=new_lab__MRJ(new_size__32GH);
+                      next__C3GH=(void *)((unsigned long)result__E3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__32GH)));
+                      ((__POINTER *)next__C3GH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__D3GH)[ 0]=next__C3GH;
                     } else {
-                      next__OQAH=((__POINTER *)result__QQAH)[ 0];
-                      if ((next__OQAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QQAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JQAH <<  1)) <=  4096)) {
-                          next__OQAH=(void *)((unsigned long)result__QQAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JQAH)));
+                      next__C3GH=((__POINTER *)result__E3GH)[ 0];
+                      if ((next__C3GH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__32GH <<  1)) <=  4096)) {
+                          next__C3GH=(void *)((unsigned long)result__E3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__32GH)));
                         } else {
-                          next__OQAH=new_lab__ARJ(new_size__JQAH);
+                          next__C3GH=new_lab__MRJ(new_size__32GH);
                         };
-                        ((__POINTER *)next__OQAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__PQAH)[ 0]=next__OQAH;
+                        ((__POINTER *)next__C3GH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__D3GH)[ 0]=next__C3GH;
                       } else {
-                        ((__POINTER *)result__QQAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__QQAH=next__OQAH;
+                        ((__POINTER *)result__E3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__E3GH=next__C3GH;
                       };
                     };
-                    ptr__FQAH=result__QQAH;
+                    ptr__Z2GH=result__E3GH;
                   } else {
-                    t__KQAH=((__UINTEGER_32 )typ_id__GQAH);
-                    a__LQAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__XQAH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQAH + a__LQAH) & (__UINTEGER_32)(~ a__LQAH));
-                    ptr_table__UQAH=((__POINTER )(&(table_type[(t__KQAH)])));
-                    lab_type__WQAH=(__UINTEGER_32)(t__KQAH |  1);
-                    next__TQAH=((__POINTER )(NULL));
-                    result__VQAH=((__POINTER *)ptr_table__UQAH)[ 0];
-                    if ((result__VQAH == (void *)NULL)) {
-                      result__VQAH=new_lab__ARJ(lab_type__WQAH);
-                      next__TQAH=(void *)((unsigned long)result__VQAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQAH)));
-                      ((__POINTER *)next__TQAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__UQAH)[ 0]=next__TQAH;
+                    t__42GH=((__UINTEGER_32 )typ_id__02GH);
+                    a__52GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__L3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__12GH + a__52GH) & (__UINTEGER_32)(~ a__52GH));
+                    ptr_table__I3GH=((__POINTER )(&(table_type[(t__42GH)])));
+                    lab_type__K3GH=(__UINTEGER_32)(t__42GH |  1);
+                    next__H3GH=((__POINTER )(NULL));
+                    result__J3GH=((__POINTER *)ptr_table__I3GH)[ 0];
+                    if ((result__J3GH == (void *)NULL)) {
+                      result__J3GH=new_lab__MRJ(lab_type__K3GH);
+                      next__H3GH=(void *)((unsigned long)result__J3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L3GH)));
+                      ((__POINTER *)next__H3GH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__I3GH)[ 0]=next__H3GH;
                     } else {
-                      next__TQAH=((__POINTER *)result__VQAH)[ 0];
-                      if ((next__TQAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VQAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XQAH <<  1)) <=  4096)) {
-                          next__TQAH=(void *)((unsigned long)result__VQAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQAH)));
+                      next__H3GH=((__POINTER *)result__J3GH)[ 0];
+                      if ((next__H3GH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__L3GH <<  1)) <=  4096)) {
+                          next__H3GH=(void *)((unsigned long)result__J3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L3GH)));
                         } else {
-                          next__TQAH=new_lab__ARJ(lab_type__WQAH);
+                          next__H3GH=new_lab__MRJ(lab_type__K3GH);
                         };
-                        ((__POINTER *)next__TQAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__UQAH)[ 0]=next__TQAH;
+                        ((__POINTER *)next__H3GH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__I3GH)[ 0]=next__H3GH;
                       } else {
-                        ((__POINTER *)result__VQAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__VQAH=next__TQAH;
+                        ((__POINTER *)result__J3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__J3GH=next__H3GH;
                       };
                     };
-                    ptr__FQAH=result__VQAH;
+                    ptr__Z2GH=result__J3GH;
                   };
-                  result__EQAH=((__LINKED_LIST_NODEoENTRYo *)ptr__FQAH);
-                  *(result__EQAH) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__Y2GH=((__LINKED_LIST_NODEoENTRYo *)ptr__Z2GH);
+                  *(result__Y2GH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                Self__MQAH=((__LINKED_LIST_NODEoENTRYo *)result__EQAH);
-                Self__MQAH->item__TZVE=result__JP2E;
-                Self__MQAH->next__GGEF=NULL;
-                Self__N3KF->first_link__YHVE=result__EQAH;
-                Self__N3KF->parent_linked_collection__1ERD.upper__C32D= 1;
-                Self__N3KF->last_link__BIVE=result__EQAH;
-                Self__N3KF->mem_idx__5HVE= 1;
-                Self__N3KF->mem_lnk__AIVE=result__EQAH;
+                Self__A3GH=((__LINKED_LIST_NODEoENTRYo *)result__Y2GH);
+                Self__A3GH->item__OJWE=result__VF3E;
+                Self__A3GH->next__V0EF=NULL;
+                Self__CKLF->first_link__OWVE=result__Y2GH;
+                Self__CKLF->parent_linked_collection__HFRD.upper__TI3D= 1;
+                Self__CKLF->last_link__XWVE=result__Y2GH;
+                Self__CKLF->mem_idx__VWVE= 1;
+                Self__CKLF->mem_lnk__WWVE=result__Y2GH;
               } else {
-                result__LYMF=NULL;
-                ptr__MYMF=((__POINTER )(NULL));
-                typ_id__RYMF= 0;
-                sz__OYMF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
-                if ((sz__OYMF ==  0)) {
-                  result__LYMF=LINKED_LIST_NODEoENTRYo__;
+                result__P3MF=NULL;
+                ptr__Q3MF=((__POINTER )(NULL));
+                typ_id__V3MF= 0;
+                sz__S3MF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__S3MF ==  0)) {
+                  result__P3MF=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  typ_id__RYMF=__LINKED_LIST_NODEoENTRYo__;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__OYMF);
-                  if ((typ_id__RYMF == (__INTEGER)(-  1))) {
-                    a__NX3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__OX3G=(__UINTEGER_32)((__UINTEGER_32)(sz__OYMF + a__NX3G) & (__UINTEGER_32)(~ a__NX3G));
-                    ptr_table__ZQAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OX3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__YQAH=((__POINTER )(NULL));
-                    result__0QAH=((__POINTER *)ptr_table__ZQAH)[ 0];
-                    if ((result__0QAH == (void *)NULL)) {
-                      result__0QAH=new_lab__ARJ(new_size__OX3G);
-                      next__YQAH=(void *)((unsigned long)result__0QAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OX3G)));
-                      ((__POINTER *)next__YQAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__ZQAH)[ 0]=next__YQAH;
+                  typ_id__V3MF=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__S3MF);
+                  if ((typ_id__V3MF == (__INTEGER)(-  1))) {
+                    a__2CEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__3CEH=(__UINTEGER_32)((__UINTEGER_32)(sz__S3MF + a__2CEH) & (__UINTEGER_32)(~ a__2CEH));
+                    ptr_table__N3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3CEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__M3GH=((__POINTER )(NULL));
+                    result__O3GH=((__POINTER *)ptr_table__N3GH)[ 0];
+                    if ((result__O3GH == (void *)NULL)) {
+                      result__O3GH=new_lab__MRJ(new_size__3CEH);
+                      next__M3GH=(void *)((unsigned long)result__O3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CEH)));
+                      ((__POINTER *)next__M3GH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__N3GH)[ 0]=next__M3GH;
                     } else {
-                      next__YQAH=((__POINTER *)result__0QAH)[ 0];
-                      if ((next__YQAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0QAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__OX3G <<  1)) <=  4096)) {
-                          next__YQAH=(void *)((unsigned long)result__0QAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OX3G)));
+                      next__M3GH=((__POINTER *)result__O3GH)[ 0];
+                      if ((next__M3GH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3CEH <<  1)) <=  4096)) {
+                          next__M3GH=(void *)((unsigned long)result__O3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CEH)));
                         } else {
-                          next__YQAH=new_lab__ARJ(new_size__OX3G);
+                          next__M3GH=new_lab__MRJ(new_size__3CEH);
                         };
-                        ((__POINTER *)next__YQAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__ZQAH)[ 0]=next__YQAH;
+                        ((__POINTER *)next__M3GH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__N3GH)[ 0]=next__M3GH;
                       } else {
-                        ((__POINTER *)result__0QAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__0QAH=next__YQAH;
+                        ((__POINTER *)result__O3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__O3GH=next__M3GH;
                       };
                     };
-                    ptr__MYMF=result__0QAH;
+                    ptr__Q3MF=result__O3GH;
                   } else {
-                    t__SX3G=((__UINTEGER_32 )typ_id__RYMF);
-                    a__RX3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__BRAH=(__UINTEGER_32)((__UINTEGER_32)(sz__OYMF + a__RX3G) & (__UINTEGER_32)(~ a__RX3G));
-                    ptr_table__4QAH=((__POINTER )(&(table_type[(t__SX3G)])));
-                    lab_type__ARAH=(__UINTEGER_32)(t__SX3G |  1);
-                    next__3QAH=((__POINTER )(NULL));
-                    result__5QAH=((__POINTER *)ptr_table__4QAH)[ 0];
-                    if ((result__5QAH == (void *)NULL)) {
-                      result__5QAH=new_lab__ARJ(lab_type__ARAH);
-                      next__3QAH=(void *)((unsigned long)result__5QAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRAH)));
-                      ((__POINTER *)next__3QAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__4QAH)[ 0]=next__3QAH;
+                    t__BDEH=((__UINTEGER_32 )typ_id__V3MF);
+                    a__ADEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__V3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__S3MF + a__ADEH) & (__UINTEGER_32)(~ a__ADEH));
+                    ptr_table__S3GH=((__POINTER )(&(table_type[(t__BDEH)])));
+                    lab_type__U3GH=(__UINTEGER_32)(t__BDEH |  1);
+                    next__R3GH=((__POINTER )(NULL));
+                    result__T3GH=((__POINTER *)ptr_table__S3GH)[ 0];
+                    if ((result__T3GH == (void *)NULL)) {
+                      result__T3GH=new_lab__MRJ(lab_type__U3GH);
+                      next__R3GH=(void *)((unsigned long)result__T3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V3GH)));
+                      ((__POINTER *)next__R3GH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__S3GH)[ 0]=next__R3GH;
                     } else {
-                      next__3QAH=((__POINTER *)result__5QAH)[ 0];
-                      if ((next__3QAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5QAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BRAH <<  1)) <=  4096)) {
-                          next__3QAH=(void *)((unsigned long)result__5QAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRAH)));
+                      next__R3GH=((__POINTER *)result__T3GH)[ 0];
+                      if ((next__R3GH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__V3GH <<  1)) <=  4096)) {
+                          next__R3GH=(void *)((unsigned long)result__T3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V3GH)));
                         } else {
-                          next__3QAH=new_lab__ARJ(lab_type__ARAH);
+                          next__R3GH=new_lab__MRJ(lab_type__U3GH);
                         };
-                        ((__POINTER *)next__3QAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__4QAH)[ 0]=next__3QAH;
+                        ((__POINTER *)next__R3GH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__S3GH)[ 0]=next__R3GH;
                       } else {
-                        ((__POINTER *)result__5QAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3QAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__5QAH=next__3QAH;
+                        ((__POINTER *)result__T3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__T3GH=next__R3GH;
                       };
                     };
-                    ptr__MYMF=result__5QAH;
+                    ptr__Q3MF=result__T3GH;
                   };
-                  result__LYMF=((__LINKED_LIST_NODEoENTRYo *)ptr__MYMF);
-                  *(result__LYMF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__P3MF=((__LINKED_LIST_NODEoENTRYo *)ptr__Q3MF);
+                  *(result__P3MF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                Self__5BPF=((__LINKED_LIST_NODEoENTRYo *)result__LYMF);
-                Self__5BPF->item__TZVE=result__JP2E;
-                Self__5BPF->next__GGEF=NULL;
-                ((__LINKED_LIST_NODEoENTRYo *)Self__N3KF->last_link__BIVE)->next__GGEF=result__LYMF;
-                Self__N3KF->parent_linked_collection__1ERD.upper__C32D=(__INTEGER)(Self__N3KF->parent_linked_collection__1ERD.upper__C32D +  1);
-                Self__N3KF->last_link__BIVE=result__LYMF;
+                Self__HFPF=((__LINKED_LIST_NODEoENTRYo *)result__P3MF);
+                Self__HFPF->item__OJWE=result__VF3E;
+                Self__HFPF->next__V0EF=NULL;
+                ((__LINKED_LIST_NODEoENTRYo *)Self__CKLF->last_link__XWVE)->next__V0EF=result__P3MF;
+                Self__CKLF->parent_linked_collection__HFRD.upper__TI3D=(__INTEGER)(Self__CKLF->parent_linked_collection__HFRD.upper__TI3D +  1);
+                Self__CKLF->last_link__XWVE=result__P3MF;
               };
             };
           };
         };
       };
-    } while (((dirent__UERD != (void *)NULL) & result__XERD));
-    closedir((dir__SERD));
+    } while (((dirent__AFRD != (void *)NULL) & result__DFRD));
+    closedir((dir__4ERD));
   };
-  return(result__XERD);
+  return(result__DFRD);
 }
 
-static void check_in__begin__SQQC(void *entry__UQQC,__INTEGER n__VQQC)
+static void check_in__begin__4QQC(void *entry__ARQC,__INTEGER n__BRQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  void *tok__XQQC,*__tmp__BRQC,*__tmp__RSQC,*k__HWDC,*k__SCBG;
-  void *__tmp__3UQC,*__tmp__CVQC;
-  void *dir__ZQQC,*__tmp__IRQC;
-  __FILE_UNIX *Self__HHWG;
-  __INTEGER __tmp__NRQC,Self__G32D,__tmp__CSQC,Self__X32D,i1__NIS;
-  __INTEGER i2__OIS,Self__MPX,result__5N5G,__tmp__BO5G,Self__CO5G;
-  __INTEGER result__EO5G,__tmp__GO5G,Self__HO5G,__tmp__NTQC,Self__CCBG;
-  __INTEGER result__JO5G,__tmp__LO5G,Self__MO5G,result__OO5G;
-  __INTEGER __tmp__QO5G,Self__RO5G,result__XO5G,__tmp__ZO5G,Self__0O5G;
-  __INTEGER result__2O5G,__tmp__4O5G,Self__5O5G,i__2XBD,j__3XBD;
-  __INTEGER Self__CDKB,result__FP5G,__tmp__HP5G,Self__IP5G,result__KP5G;
-  __INTEGER __tmp__MP5G,Self__NP5G,len__VVU,__tmp__SWU,__tmp__TWU;
-  __INTEGER Self__KQGB,__tmp__DQS,Self__2RIC,result__TP5G,__tmp__VP5G;
-  __INTEGER Self__WP5G,result__YP5G,__tmp__0P5G,Self__1P5G,__tmp__1XQC;
-  __INTEGER Self__VERE;
-  void *__tmp__TRQC,*__tmp__ISQC,*__tmp__QSQC,*__tmp__2UQC,*__tmp__BVQC;
-  __STRING_CONSTANT *Self__JIS,*Self__KO5G,*Self__PO5G;
-  __STRING *Self__CRS,*Self__ISS,*Self__0XBD,*Self__N32,*Self__1PS;
-  void *tok_lst__YQQC;
-  __BOOLEAN __tmp__0QQC,__tmp__URQC,__tmp__JSQC,result__MIS;
-  __CHARACTER Self__KJOB,result__MJOB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1N5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DI5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__TO5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HI5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__BP5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__OI5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__PP5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3W3;
-  void *node__3N5G,*node__FI5G,*node__VO5G,*node__JI5G,*node__DP5G;
-  void *node__QI5G,*node__RP5G,*node__IX3;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__GWDC,*Self__RCBG;
-  void *node__QWDC,*node__2CBG;
-  __CHARACTER *Self__PMEB,*model__QMEB,*__tmp__AQS,*Self__1LBC;
-  tok__XQQC=NULL;
-  tok_lst__YQQC=NULL;
-  dir__ZQQC=NULL;
-  if (((struct ___OBJ *)entry__UQQC)->__id==__DIRECTORY_UNIX__) {
-    __tmp__0QQC=open__NERD(entry__UQQC);
+  void *tok__DRQC,*__tmp__NRQC,*__tmp__3SQC,*k__TWDC,*k__2KDG;
+  void *__tmp__JVQC,*__tmp__OVQC;
+  void *dir__FRQC,*__tmp__URQC;
+  __FILE_UNIX *Self__Z11G;
+  __INTEGER __tmp__ZRQC,Self__XI3D,__tmp__OSQC,Self__IJ3D,i1__ZIS;
+  __INTEGER i2__0IS,Self__YPX,result__L0FH,__tmp__N0FH,Self__O0FH;
+  __INTEGER result__Q0FH,__tmp__S0FH,Self__T0FH,__tmp__ZTQC,Self__MKDG;
+  __INTEGER result__V0FH,__tmp__X0FH,Self__Y0FH,result__00FH;
+  __INTEGER __tmp__20FH,Self__30FH,result__D1FH,__tmp__F1FH,Self__G1FH;
+  __INTEGER result__I1FH,__tmp__K1FH,Self__L1FH,i__IYBD,j__JYBD;
+  __INTEGER Self__ODKB,result__R1FH,__tmp__T1FH,Self__U1FH,result__W1FH;
+  __INTEGER __tmp__Y1FH,Self__Z1FH,len__BWU,__tmp__4WU,__tmp__5WU;
+  __INTEGER Self__WQGB,__tmp__PQS,Self__ISIC,result__51FH,__tmp__B2FH;
+  __INTEGER Self__C2FH,result__E2FH,__tmp__G2FH,Self__H2FH,__tmp__HYQC;
+  __INTEGER Self__TURE;
+  void *__tmp__5RQC,*__tmp__USQC,*__tmp__2SQC,*__tmp__IVQC,*__tmp__NVQC;
+  __STRING_CONSTANT *Self__VIS,*Self__W0FH,*Self__10FH;
+  __STRING *Self__ORS,*Self__USS,*Self__GYBD,*Self__Z32,*Self__HQS;
+  void *tok_lst__ERQC;
+  __BOOLEAN __tmp__GRQC,__tmp__ASQC,__tmp__VSQC,result__YIS;
+  __CHARACTER Self__WJOB,result__YJOB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__H0FH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DUFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__50FH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HUFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__N1FH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__OUFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__11FH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JX3;
+  void *node__J0FH,*node__FUFH,*node__B1FH,*node__JUFH,*node__P1FH;
+  void *node__QUFH,*node__31FH,*node__UX3;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__SWDC,*Self__1KDG;
+  void *node__2WDC,*node__GLDG;
+  __CHARACTER *Self__1MEB,*model__2MEB,*__tmp__MQS,*Self__HMBC;
+  tok__DRQC=NULL;
+  tok_lst__ERQC=NULL;
+  dir__FRQC=NULL;
+  if (((struct ___OBJ *)entry__ARQC)->__id==__DIRECTORY_UNIX__) {
+    __tmp__GRQC=open__ZERD(entry__ARQC);
   } else {
-    Self__HHWG=((__FILE_UNIX *)entry__UQQC);
-    Self__HHWG->stream__YIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__HHWG->parent_entry_unix__QCF.parent_entry__MED.path__BD)->storage__JQO),"r+b")));
-    __tmp__0QQC=(Self__HHWG->stream__YIRD != (void *)NULL);
+    Self__Z11G=((__FILE_UNIX *)entry__ARQC);
+    Self__Z11G->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__Z11G->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
+    __tmp__GRQC=(Self__Z11G->stream__EJRD != (void *)NULL);
   };
-  if ((! __tmp__0QQC)) {
-    print__KHD((&__string_209));
-    if (((struct ___OBJ *)entry__UQQC)->__id==__DIRECTORY_UNIX__) {
-      __tmp__BRQC=((__DIRECTORY_UNIX *)entry__UQQC)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+  if ((! __tmp__GRQC)) {
+    print__WHD((&__string_219));
+    if (((struct ___OBJ *)entry__ARQC)->__id==__DIRECTORY_UNIX__) {
+      __tmp__NRQC=((__DIRECTORY_UNIX *)entry__ARQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
     } else {
-      __tmp__BRQC=((__FILE_UNIX *)entry__UQQC)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
+      __tmp__NRQC=((__FILE_UNIX *)entry__ARQC)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
     };
-    print__KHD(__tmp__BRQC);
-    print__KHD((&__string_164));
+    print__WHD(__tmp__NRQC);
+    print__WHD((&__string_167));
   } else {
-    if (entry__UQQC==NULL) {
-      __tmp__IRQC=NULL;
+    if (entry__ARQC==NULL) {
+      __tmp__URQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__UQQC)->__id) {
+      switch (((struct ___OBJ *)entry__ARQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__IRQC=((void *)entry__UQQC);
+        __tmp__URQC=((void *)entry__ARQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__IRQC=NULL;
+        __tmp__URQC=NULL;
       } break;
       }
     };
-    dir__ZQQC=__tmp__IRQC;
-    __tmp__NRQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__IRQC)->parent_directory__OED.list__2ERD)->parent_linked_collection__1ERD.upper__C32D;
-    Self__G32D= 1;
-    while ((Self__G32D <= __tmp__NRQC)) {
-      __tmp__TRQC=item__VEPE(dir__ZQQC,Self__G32D);
-      if (((struct ___OBJ *)__tmp__TRQC)->__id==__DIRECTORY_UNIX__) {
-        __tmp__URQC=((void *)((__DIRECTORY_UNIX *)__tmp__TRQC) != (void *)NULL);
-      } else {
-        __tmp__URQC=FALSE__;
-      };
-      if (__tmp__URQC) {
-        check_in__begin__SQQC(item__VEPE(dir__ZQQC,Self__G32D),n__VQQC);
-      };
-      Self__G32D=(__INTEGER)(Self__G32D +  1);
-    };
-    __tmp__CSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__IRQC)->parent_directory__OED.list__2ERD)->parent_linked_collection__1ERD.upper__C32D;
-    Self__X32D= 1;
-    while ((Self__X32D <= __tmp__CSQC)) {
-      __tmp__ISQC=item__VEPE(dir__ZQQC,Self__X32D);
-      if (((struct ___OBJ *)__tmp__ISQC)->__id==__DIRECTORY_UNIX__) {
-        __tmp__JSQC=((void *)((__DIRECTORY_UNIX *)__tmp__ISQC) != (void *)NULL);
-      } else {
-        __tmp__JSQC=FALSE__;
-      };
-      if ((! __tmp__JSQC)) {
-        __tmp__QSQC=item__VEPE(dir__ZQQC,Self__X32D);
-        if (((struct ___OBJ *)__tmp__QSQC)->__id==__DIRECTORY_UNIX__) {
-          __tmp__RSQC=((__DIRECTORY_UNIX *)__tmp__QSQC)->parent_entry_unix__NED.parent_entry__MED.name__JNT;
-        } else {
-          __tmp__RSQC=((__FILE_UNIX *)__tmp__QSQC)->parent_entry_unix__QCF.parent_entry__MED.name__JNT;
-        };
-        Self__JIS=((__STRING_CONSTANT *)__tmp__RSQC);
-        result__MIS=FALSE__;
-        i1__NIS= 0;
-        i2__OIS= 0;
-        if ((((__STRING_CONSTANT *)(&__string_152))->count__DD <= Self__JIS->count__DD)) {
-          i1__NIS=(__INTEGER)((__INTEGER)(Self__JIS->count__DD - ((__STRING_CONSTANT *)(&__string_152))->count__DD) +  1);
-          i2__OIS= 1;
-          while ((! (((i1__NIS > Self__JIS->count__DD) || (i2__OIS > ((__STRING_CONSTANT *)(&__string_152))->count__DD)) || (((__CHARACTER *)Self__JIS->storage__JQO)[(__INTEGER)(i1__NIS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__JQO)[(__INTEGER)(i2__OIS -  1)])))) {
-            i1__NIS=(__INTEGER)(i1__NIS +  1);
-            i2__OIS=(__INTEGER)(i2__OIS +  1);
-          };
-          result__MIS=(i1__NIS > Self__JIS->count__DD);
-        };
-        if (result__MIS) {
-          copy__NCS(string_tmp__VH,__tmp__RSQC);
-          Self__CRS=((__STRING *)string_tmp__VH);
-          if (( 3 > Self__CRS->count__KFC)) {
-            Self__CRS->count__KFC= 0;
-          } else {
-            Self__CRS->count__KFC=(__INTEGER)(Self__CRS->count__KFC -  3);
-          };
-          Self__ISS=((__STRING *)string_tmp__VH);
-          Self__MPX=Self__ISS->count__KFC;
-          while ((Self__MPX >=  1)) {
-            Self__KJOB=((__CHARACTER *)Self__ISS->storage__VBS)[(__INTEGER)(Self__MPX -  1)];
-            result__MJOB='\0';
-            if (((((__INTEGER_8 )Self__KJOB) <  97) || (((__INTEGER_8 )Self__KJOB) >  122))) {
-              result__MJOB=Self__KJOB;
+    dir__FRQC=__tmp__URQC;
+    __tmp__ZRQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__URQC)->parent_directory__0ED.list__IFRD)->parent_linked_collection__HFRD.upper__TI3D;
+    Self__XI3D= 1;
+    while ((Self__XI3D <= __tmp__ZRQC)) {
+      __tmp__5RQC=item__DVPE(dir__FRQC,Self__XI3D);
+      if (((struct ___OBJ *)__tmp__5RQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__ASQC=((void *)((__DIRECTORY_UNIX *)__tmp__5RQC) != (void *)NULL);
+      } else {
+        __tmp__ASQC=FALSE__;
+      };
+      if (__tmp__ASQC) {
+        check_in__begin__4QQC(item__DVPE(dir__FRQC,Self__XI3D),n__BRQC);
+      };
+      Self__XI3D=(__INTEGER)(Self__XI3D +  1);
+    };
+    __tmp__OSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__URQC)->parent_directory__0ED.list__IFRD)->parent_linked_collection__HFRD.upper__TI3D;
+    Self__IJ3D= 1;
+    while ((Self__IJ3D <= __tmp__OSQC)) {
+      __tmp__USQC=item__DVPE(dir__FRQC,Self__IJ3D);
+      if (((struct ___OBJ *)__tmp__USQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__VSQC=((void *)((__DIRECTORY_UNIX *)__tmp__USQC) != (void *)NULL);
+      } else {
+        __tmp__VSQC=FALSE__;
+      };
+      if ((! __tmp__VSQC)) {
+        __tmp__2SQC=item__DVPE(dir__FRQC,Self__IJ3D);
+        if (((struct ___OBJ *)__tmp__2SQC)->__id==__DIRECTORY_UNIX__) {
+          __tmp__3SQC=((__DIRECTORY_UNIX *)__tmp__2SQC)->parent_entry_unix__ZED.parent_entry__YED.name__VNT;
+        } else {
+          __tmp__3SQC=((__FILE_UNIX *)__tmp__2SQC)->parent_entry_unix__2CF.parent_entry__YED.name__VNT;
+        };
+        Self__VIS=((__STRING_CONSTANT *)__tmp__3SQC);
+        result__YIS=FALSE__;
+        i1__ZIS= 0;
+        i2__0IS= 0;
+        if ((((__STRING_CONSTANT *)(&__string_155))->count__DD <= Self__VIS->count__DD)) {
+          i1__ZIS=(__INTEGER)((__INTEGER)(Self__VIS->count__DD - ((__STRING_CONSTANT *)(&__string_155))->count__DD) +  1);
+          i2__0IS= 1;
+          while ((! (((i1__ZIS > Self__VIS->count__DD) || (i2__0IS > ((__STRING_CONSTANT *)(&__string_155))->count__DD)) || (((__CHARACTER *)Self__VIS->storage__VQO)[(__INTEGER)(i1__ZIS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__VQO)[(__INTEGER)(i2__0IS -  1)])))) {
+            i1__ZIS=(__INTEGER)(i1__ZIS +  1);
+            i2__0IS=(__INTEGER)(i2__0IS +  1);
+          };
+          result__YIS=(i1__ZIS > Self__VIS->count__DD);
+        };
+        if (result__YIS) {
+          copy__ZCS(string_tmp__VH,__tmp__3SQC);
+          Self__ORS=((__STRING *)string_tmp__VH);
+          if (( 3 > Self__ORS->count__WFC)) {
+            Self__ORS->count__WFC= 0;
+          } else {
+            Self__ORS->count__WFC=(__INTEGER)(Self__ORS->count__WFC -  3);
+          };
+          Self__USS=((__STRING *)string_tmp__VH);
+          Self__YPX=Self__USS->count__WFC;
+          while ((Self__YPX >=  1)) {
+            Self__WJOB=((__CHARACTER *)Self__USS->storage__BCS)[(__INTEGER)(Self__YPX -  1)];
+            result__YJOB='\0';
+            if (((((__INTEGER_8 )Self__WJOB) <  97) || (((__INTEGER_8 )Self__WJOB) >  122))) {
+              result__YJOB=Self__WJOB;
             } else {
-              result__MJOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__KJOB) -  32))));
-            };
-            ((__CHARACTER *)Self__ISS->storage__VBS)[(__INTEGER)(Self__MPX -  1)]=result__MJOB;
-            Self__MPX=(__INTEGER)(Self__MPX -  1);
-          };
-          tok__XQQC=get__2VB(string_tmp__VH);
-          Self__1N5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-          result__5N5G= 0;
-          __tmp__BO5G=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-          Self__CO5G= 1;
-          while ((Self__CO5G <= __tmp__BO5G)) {
-            result__5N5G=(__INTEGER)((__INTEGER)( 5 * result__5N5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__JQO)[(__INTEGER)(Self__CO5G -  1)])));
-            Self__CO5G=(__INTEGER)(Self__CO5G +  1);
-          };
-          if ((result__5N5G <  0)) {
-            result__5N5G=(__INTEGER)(~ result__5N5G);
-          };
-          node__3N5G=((void **)Self__1N5G->buckets__TCT)[(__INTEGER)(result__5N5G % Self__1N5G->capacity__OCT)];
-          while ((! (((void *)node__3N5G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3N5G)->key__5CT == (void *)(&__string_148))))) {
-            node__3N5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3N5G)->next__KDT;
-          };
-          if (((void *)node__3N5G != (void *)NULL)) {
-            Self__DI5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-            result__EO5G= 0;
-            __tmp__GO5G=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-            Self__HO5G= 1;
-            while ((Self__HO5G <= __tmp__GO5G)) {
-              result__EO5G=(__INTEGER)((__INTEGER)( 5 * result__EO5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__JQO)[(__INTEGER)(Self__HO5G -  1)])));
-              Self__HO5G=(__INTEGER)(Self__HO5G +  1);
-            };
-            if ((result__EO5G <  0)) {
-              result__EO5G=(__INTEGER)(~ result__EO5G);
-            };
-            node__FI5G=((void **)Self__DI5G->buckets__TCT)[(__INTEGER)(result__EO5G % Self__DI5G->capacity__OCT)];
-            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FI5G)->key__5CT != (void *)(&__string_148))) {
-              node__FI5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FI5G)->next__KDT;
-            };
-            tok_lst__YQQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FI5G)->item__1X3;
-            __tmp__NTQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__YQQC)->parent_linked_collection__LD.upper__TCD;
-            Self__CCBG= 1;
-            while ((Self__CCBG <= __tmp__NTQC)) {
-              if (((void *)item__M0ND(tok_lst__YQQC,Self__CCBG) == (void *)NULL)) {
-                append__VNS(current_list__2B,tok__XQQC);
-                append__VNS(file_list__0B,tok__XQQC);
+              result__YJOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__WJOB) -  32))));
+            };
+            ((__CHARACTER *)Self__USS->storage__BCS)[(__INTEGER)(Self__YPX -  1)]=result__YJOB;
+            Self__YPX=(__INTEGER)(Self__YPX -  1);
+          };
+          tok__DRQC=get__IWB(string_tmp__VH);
+          Self__H0FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__L0FH= 0;
+          __tmp__N0FH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+          Self__O0FH= 1;
+          while ((Self__O0FH <= __tmp__N0FH)) {
+            result__L0FH=(__INTEGER)((__INTEGER)( 5 * result__L0FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__VQO)[(__INTEGER)(Self__O0FH -  1)])));
+            Self__O0FH=(__INTEGER)(Self__O0FH +  1);
+          };
+          if ((result__L0FH <  0)) {
+            result__L0FH=(__INTEGER)(~ result__L0FH);
+          };
+          node__J0FH=((void **)Self__H0FH->buckets__5CT)[(__INTEGER)(result__L0FH % Self__H0FH->capacity__0CT)];
+          while ((! (((void *)node__J0FH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__J0FH)->key__LDT == (void *)(&__string_151))))) {
+            node__J0FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__J0FH)->next__WDT;
+          };
+          if (((void *)node__J0FH != (void *)NULL)) {
+            Self__DUFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+            result__Q0FH= 0;
+            __tmp__S0FH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+            Self__T0FH= 1;
+            while ((Self__T0FH <= __tmp__S0FH)) {
+              result__Q0FH=(__INTEGER)((__INTEGER)( 5 * result__Q0FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__VQO)[(__INTEGER)(Self__T0FH -  1)])));
+              Self__T0FH=(__INTEGER)(Self__T0FH +  1);
+            };
+            if ((result__Q0FH <  0)) {
+              result__Q0FH=(__INTEGER)(~ result__Q0FH);
+            };
+            node__FUFH=((void **)Self__DUFH->buckets__5CT)[(__INTEGER)(result__Q0FH % Self__DUFH->capacity__0CT)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FUFH)->key__LDT != (void *)(&__string_151))) {
+              node__FUFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FUFH)->next__WDT;
+            };
+            tok_lst__ERQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FUFH)->item__HY3;
+            __tmp__ZTQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__ERQC)->parent_linked_collection__LD.upper__5CD;
+            Self__MKDG= 1;
+            while ((Self__MKDG <= __tmp__ZTQC)) {
+              if (((void *)item__Y0ND(tok_lst__ERQC,Self__MKDG) == (void *)NULL)) {
+                append__BOS(current_list__2B,tok__DRQC);
+                append__BOS(file_list__0B,tok__DRQC);
               } else {
-                append__VNS(current_list__2B,item__M0ND(tok_lst__YQQC,Self__CCBG));
-                append__VNS(file_list__0B,item__M0ND(tok_lst__YQQC,Self__CCBG));
+                append__BOS(current_list__2B,item__Y0ND(tok_lst__ERQC,Self__MKDG));
+                append__BOS(file_list__0B,item__Y0ND(tok_lst__ERQC,Self__MKDG));
               };
-              Self__CCBG=(__INTEGER)(Self__CCBG +  1);
-            };
-          } else {
-            append__VNS(current_list__2B,tok__XQQC);
-            add_last__NLT(current_list__2B,'\n');
-            append__VNS(file_list__0B,tok__XQQC);
-            add_last__NLT(file_list__0B,'\n');
-          };
-          Self__GWDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__DTS);
-          k__HWDC=tok__XQQC;
-          Self__KO5G=((__STRING_CONSTANT *)tok__XQQC);
-          result__JO5G= 0;
-          __tmp__LO5G=Self__KO5G->count__DD;
-          Self__MO5G= 1;
-          while ((Self__MO5G <= __tmp__LO5G)) {
-            result__JO5G=(__INTEGER)((__INTEGER)( 5 * result__JO5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KO5G->storage__JQO)[(__INTEGER)(Self__MO5G -  1)])));
-            Self__MO5G=(__INTEGER)(Self__MO5G +  1);
-          };
-          if ((result__JO5G <  0)) {
-            result__JO5G=(__INTEGER)(~ result__JO5G);
-          };
-          node__QWDC=((void **)Self__GWDC->buckets__JNBC)[(__INTEGER)(result__JO5G % Self__GWDC->capacity__ENBC)];
-          while ((! (((void *)node__QWDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__QWDC)->key__VNBC == (void *)k__HWDC)))) {
-            node__QWDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__QWDC)->next__AOBC;
-          };
-          if (((void *)node__QWDC != (void *)NULL)) {
-            print__KHD((&__string_210));
-            Self__RCBG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__DTS);
-            k__SCBG=tok__XQQC;
-            Self__PO5G=((__STRING_CONSTANT *)tok__XQQC);
-            result__OO5G= 0;
-            __tmp__QO5G=Self__PO5G->count__DD;
-            Self__RO5G= 1;
-            while ((Self__RO5G <= __tmp__QO5G)) {
-              result__OO5G=(__INTEGER)((__INTEGER)( 5 * result__OO5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PO5G->storage__JQO)[(__INTEGER)(Self__RO5G -  1)])));
-              Self__RO5G=(__INTEGER)(Self__RO5G +  1);
-            };
-            if ((result__OO5G <  0)) {
-              result__OO5G=(__INTEGER)(~ result__OO5G);
-            };
-            node__2CBG=((void **)Self__RCBG->buckets__JNBC)[(__INTEGER)(result__OO5G % Self__RCBG->capacity__ENBC)];
-            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2CBG)->key__VNBC != (void *)k__SCBG)) {
-              node__2CBG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2CBG)->next__AOBC;
-            };
-            print__KHD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2CBG)->item__I3GD)->filename__IPG);
+              Self__MKDG=(__INTEGER)(Self__MKDG +  1);
+            };
+          } else {
+            append__BOS(current_list__2B,tok__DRQC);
+            add_last__ZLT(current_list__2B,'\n');
+            append__BOS(file_list__0B,tok__DRQC);
+            add_last__ZLT(file_list__0B,'\n');
+          };
+          Self__SWDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__PTS);
+          k__TWDC=tok__DRQC;
+          Self__W0FH=((__STRING_CONSTANT *)tok__DRQC);
+          result__V0FH= 0;
+          __tmp__X0FH=Self__W0FH->count__DD;
+          Self__Y0FH= 1;
+          while ((Self__Y0FH <= __tmp__X0FH)) {
+            result__V0FH=(__INTEGER)((__INTEGER)( 5 * result__V0FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__W0FH->storage__VQO)[(__INTEGER)(Self__Y0FH -  1)])));
+            Self__Y0FH=(__INTEGER)(Self__Y0FH +  1);
+          };
+          if ((result__V0FH <  0)) {
+            result__V0FH=(__INTEGER)(~ result__V0FH);
+          };
+          node__2WDC=((void **)Self__SWDC->buckets__VNBC)[(__INTEGER)(result__V0FH % Self__SWDC->capacity__QNBC)];
+          while ((! (((void *)node__2WDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2WDC)->key__BOBC == (void *)k__TWDC)))) {
+            node__2WDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2WDC)->next__MOBC;
+          };
+          if (((void *)node__2WDC != (void *)NULL)) {
+            print__WHD((&__string_220));
+            Self__1KDG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__PTS);
+            k__2KDG=tok__DRQC;
+            Self__10FH=((__STRING_CONSTANT *)tok__DRQC);
+            result__00FH= 0;
+            __tmp__20FH=Self__10FH->count__DD;
+            Self__30FH= 1;
+            while ((Self__30FH <= __tmp__20FH)) {
+              result__00FH=(__INTEGER)((__INTEGER)( 5 * result__00FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__10FH->storage__VQO)[(__INTEGER)(Self__30FH -  1)])));
+              Self__30FH=(__INTEGER)(Self__30FH +  1);
+            };
+            if ((result__00FH <  0)) {
+              result__00FH=(__INTEGER)(~ result__00FH);
+            };
+            node__GLDG=((void **)Self__1KDG->buckets__VNBC)[(__INTEGER)(result__00FH % Self__1KDG->capacity__QNBC)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GLDG)->key__BOBC != (void *)k__2KDG)) {
+              node__GLDG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GLDG)->next__MOBC;
+            };
+            print__WHD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__GLDG)->item__U3GD)->filename__UPG);
             fputc((int)('\n'),stdout);
-            __tmp__2UQC=item__VEPE(dir__ZQQC,Self__X32D);
-            if (((struct ___OBJ *)__tmp__2UQC)->__id==__DIRECTORY_UNIX__) {
-              __tmp__3UQC=((__DIRECTORY_UNIX *)__tmp__2UQC)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+            __tmp__IVQC=item__DVPE(dir__FRQC,Self__IJ3D);
+            if (((struct ___OBJ *)__tmp__IVQC)->__id==__DIRECTORY_UNIX__) {
+              __tmp__JVQC=((__DIRECTORY_UNIX *)__tmp__IVQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
             } else {
-              __tmp__3UQC=((__FILE_UNIX *)__tmp__2UQC)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
+              __tmp__JVQC=((__FILE_UNIX *)__tmp__IVQC)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
             };
-            print__KHD(__tmp__3UQC);
+            print__WHD(__tmp__JVQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __tmp__BVQC=item__VEPE(dir__ZQQC,Self__X32D);
-          if (((struct ___OBJ *)__tmp__BVQC)->__id==__DIRECTORY_UNIX__) {
-            __tmp__CVQC=((__DIRECTORY_UNIX *)__tmp__BVQC)->parent_entry_unix__NED.parent_entry__MED.path__BD;
-          } else {
-            __tmp__CVQC=((__FILE_UNIX *)__tmp__BVQC)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
-          };
-          proto_input__BI=create__name__generic_count__NAC(__tmp__CVQC,tok__XQQC);
-          go_on__WAC(proto_input__BI);
-          if (is_shorter__WY) {
-            save_file__with__DDC(add_ext__YAF(tok__XQQC),output_code__SI);
-          };
-        };
-      };
-      Self__X32D=(__INTEGER)(Self__X32D +  1);
-    };
-    if ((((__STRING *)current_list__2B)->count__KFC !=  0)) {
-      Self__TO5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      result__XO5G= 0;
-      __tmp__ZO5G=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-      Self__0O5G= 1;
-      while ((Self__0O5G <= __tmp__ZO5G)) {
-        result__XO5G=(__INTEGER)((__INTEGER)( 5 * result__XO5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__JQO)[(__INTEGER)(Self__0O5G -  1)])));
-        Self__0O5G=(__INTEGER)(Self__0O5G +  1);
-      };
-      if ((result__XO5G <  0)) {
-        result__XO5G=(__INTEGER)(~ result__XO5G);
-      };
-      node__VO5G=((void **)Self__TO5G->buckets__TCT)[(__INTEGER)(result__XO5G % Self__TO5G->capacity__OCT)];
-      while ((! (((void *)node__VO5G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VO5G)->key__5CT == (void *)(&__string_147))))) {
-        node__VO5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VO5G)->next__KDT;
-      };
-      if (((void *)node__VO5G != (void *)NULL)) {
-        Self__HI5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__2O5G= 0;
-        __tmp__4O5G=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-        Self__5O5G= 1;
-        while ((Self__5O5G <= __tmp__4O5G)) {
-          result__2O5G=(__INTEGER)((__INTEGER)( 5 * result__2O5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__JQO)[(__INTEGER)(Self__5O5G -  1)])));
-          Self__5O5G=(__INTEGER)(Self__5O5G +  1);
-        };
-        if ((result__2O5G <  0)) {
-          result__2O5G=(__INTEGER)(~ result__2O5G);
-        };
-        node__JI5G=((void **)Self__HI5G->buckets__TCT)[(__INTEGER)(result__2O5G % Self__HI5G->capacity__OCT)];
-        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JI5G)->key__5CT != (void *)(&__string_147))) {
-          node__JI5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JI5G)->next__KDT;
-        };
-        tok__XQQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JI5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-        Self__0XBD=((__STRING *)current_list__2B);
-        i__2XBD=Self__0XBD->count__KFC;
-        j__3XBD=((__STRING_CONSTANT *)tok__XQQC)->count__DD;
-        resize__MXZ(Self__0XBD,(__INTEGER)(i__2XBD + j__3XBD));
-        if (((i__2XBD >  0) && (j__3XBD >  0))) {
-          move__to__by__VVCC(Self__0XBD->storage__VBS, 0,(__INTEGER)(i__2XBD -  1),j__3XBD);
-        };
-        Self__PMEB=((__CHARACTER *)Self__0XBD->storage__VBS);
-        model__QMEB=((__STRING_CONSTANT *)tok__XQQC)->storage__JQO;
-        Self__CDKB=(__INTEGER)(j__3XBD -  1);
-        while ((Self__CDKB >=  0)) {
-          Self__PMEB[Self__CDKB]=((__CHARACTER *)model__QMEB)[Self__CDKB];
-          Self__CDKB=(__INTEGER)(Self__CDKB -  1);
-        };
-      };
-      Self__BP5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      result__FP5G= 0;
-      __tmp__HP5G=((__STRING_CONSTANT *)(&__string_149))->count__DD;
-      Self__IP5G= 1;
-      while ((Self__IP5G <= __tmp__HP5G)) {
-        result__FP5G=(__INTEGER)((__INTEGER)( 5 * result__FP5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__JQO)[(__INTEGER)(Self__IP5G -  1)])));
-        Self__IP5G=(__INTEGER)(Self__IP5G +  1);
-      };
-      if ((result__FP5G <  0)) {
-        result__FP5G=(__INTEGER)(~ result__FP5G);
-      };
-      node__DP5G=((void **)Self__BP5G->buckets__TCT)[(__INTEGER)(result__FP5G % Self__BP5G->capacity__OCT)];
-      while ((! (((void *)node__DP5G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DP5G)->key__5CT == (void *)(&__string_149))))) {
-        node__DP5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DP5G)->next__KDT;
-      };
-      if (((void *)node__DP5G != (void *)NULL)) {
-        Self__OI5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__KP5G= 0;
-        __tmp__MP5G=((__STRING_CONSTANT *)(&__string_149))->count__DD;
-        Self__NP5G= 1;
-        while ((Self__NP5G <= __tmp__MP5G)) {
-          result__KP5G=(__INTEGER)((__INTEGER)( 5 * result__KP5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__JQO)[(__INTEGER)(Self__NP5G -  1)])));
-          Self__NP5G=(__INTEGER)(Self__NP5G +  1);
-        };
-        if ((result__KP5G <  0)) {
-          result__KP5G=(__INTEGER)(~ result__KP5G);
-        };
-        node__QI5G=((void **)Self__OI5G->buckets__TCT)[(__INTEGER)(result__KP5G % Self__OI5G->capacity__OCT)];
-        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QI5G)->key__5CT != (void *)(&__string_149))) {
-          node__QI5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QI5G)->next__KDT;
-        };
-        tok__XQQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QI5G)->item__1X3)->first_link__YTEC)->item__OVHD;
-        append__VNS(current_list__2B,tok__XQQC);
-      };
-      copy__NCS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__IRQC)->parent_entry_unix__NED.parent_entry__MED.path__BD);
-      Self__N32=((__STRING *)string_tmp__VH);
-      if ((n__VQQC > Self__N32->count__KFC)) {
-        Self__N32->count__KFC= 0;
-      } else {
-        if ((n__VQQC >  0)) {
-          len__VVU=(__INTEGER)((__INTEGER)(n__VQQC -  1) +  1);
-          if ((len__VVU >  0)) {
-            __tmp__SWU=(__INTEGER)(n__VQQC +  1);
-            __tmp__TWU=Self__N32->count__KFC;
-            Self__KQGB=__tmp__SWU;
-            while ((Self__KQGB <= __tmp__TWU)) {
-              ((__CHARACTER *)Self__N32->storage__VBS)[(__INTEGER)((__INTEGER)(Self__KQGB - len__VVU) -  1)]=((__CHARACTER *)Self__N32->storage__VBS)[(__INTEGER)(Self__KQGB -  1)];
-              Self__KQGB=(__INTEGER)(Self__KQGB +  1);
-            };
-            Self__N32->count__KFC=(__INTEGER)(Self__N32->count__KFC - len__VVU);
-          };
-        };
-      };
-      if ((((__STRING *)string_tmp__VH)->count__KFC !=  0)) {
-        Self__1PS=((__STRING *)string_tmp__VH);
-        __tmp__AQS=Self__1PS->storage__VBS;
-        __tmp__DQS=(__INTEGER)(Self__1PS->count__KFC -  1);
-        Self__1LBC=((__CHARACTER *)__tmp__AQS);
-        Self__2RIC=__tmp__DQS;
-        while ((Self__2RIC >=  0)) {
-          if (('/' == Self__1LBC[Self__2RIC])) {
-            Self__1LBC[Self__2RIC]='-';
-          };
-          Self__2RIC=(__INTEGER)(Self__2RIC -  1);
-        };
-        tok__XQQC=get__2VB(string_tmp__VH);
-        Self__PP5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__TP5G= 0;
-        __tmp__VP5G=((__STRING_CONSTANT *)(&__string_145))->count__DD;
-        Self__WP5G= 1;
-        while ((Self__WP5G <= __tmp__VP5G)) {
-          result__TP5G=(__INTEGER)((__INTEGER)( 5 * result__TP5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_145))->storage__JQO)[(__INTEGER)(Self__WP5G -  1)])));
-          Self__WP5G=(__INTEGER)(Self__WP5G +  1);
-        };
-        if ((result__TP5G <  0)) {
-          result__TP5G=(__INTEGER)(~ result__TP5G);
-        };
-        node__RP5G=((void **)Self__PP5G->buckets__TCT)[(__INTEGER)(result__TP5G % Self__PP5G->capacity__OCT)];
-        while ((! (((void *)node__RP5G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RP5G)->key__5CT == (void *)(&__string_145))))) {
-          node__RP5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RP5G)->next__KDT;
-        };
-        if (((void *)node__RP5G != (void *)NULL)) {
-          Self__3W3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-          result__YP5G= 0;
-          __tmp__0P5G=((__STRING_CONSTANT *)(&__string_145))->count__DD;
-          Self__1P5G= 1;
-          while ((Self__1P5G <= __tmp__0P5G)) {
-            result__YP5G=(__INTEGER)((__INTEGER)( 5 * result__YP5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_145))->storage__JQO)[(__INTEGER)(Self__1P5G -  1)])));
-            Self__1P5G=(__INTEGER)(Self__1P5G +  1);
-          };
-          if ((result__YP5G <  0)) {
-            result__YP5G=(__INTEGER)(~ result__YP5G);
-          };
-          node__IX3=((void **)Self__3W3->buckets__TCT)[(__INTEGER)(result__YP5G % Self__3W3->capacity__OCT)];
-          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IX3)->key__5CT != (void *)(&__string_145))) {
-            node__IX3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IX3)->next__KDT;
-          };
-          tok_lst__YQQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IX3)->item__1X3;
-          __tmp__1XQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__YQQC)->parent_linked_collection__LD.upper__TCD;
-          Self__VERE= 1;
-          while ((Self__VERE <= __tmp__1XQC)) {
-            if (((void *)item__M0ND(tok_lst__YQQC,Self__VERE) == (void *)NULL)) {
-              append__VNS(directory_list__YB,tok__XQQC);
+          __tmp__NVQC=item__DVPE(dir__FRQC,Self__IJ3D);
+          if (((struct ___OBJ *)__tmp__NVQC)->__id==__DIRECTORY_UNIX__) {
+            __tmp__OVQC=((__DIRECTORY_UNIX *)__tmp__NVQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+          } else {
+            __tmp__OVQC=((__FILE_UNIX *)__tmp__NVQC)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+          };
+          proto_input__BI=create__name__generic_count__ZAC(__tmp__OVQC,tok__DRQC);
+          go_on__CBC(proto_input__BI);
+          if (is_shorter__5Y) {
+            save_file__with__PDC(add_ext__EBF(tok__DRQC),output_code__SI);
+          };
+        };
+      };
+      Self__IJ3D=(__INTEGER)(Self__IJ3D +  1);
+    };
+    if ((((__STRING *)current_list__2B)->count__WFC !=  0)) {
+      Self__50FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__D1FH= 0;
+      __tmp__F1FH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+      Self__G1FH= 1;
+      while ((Self__G1FH <= __tmp__F1FH)) {
+        result__D1FH=(__INTEGER)((__INTEGER)( 5 * result__D1FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__G1FH -  1)])));
+        Self__G1FH=(__INTEGER)(Self__G1FH +  1);
+      };
+      if ((result__D1FH <  0)) {
+        result__D1FH=(__INTEGER)(~ result__D1FH);
+      };
+      node__B1FH=((void **)Self__50FH->buckets__5CT)[(__INTEGER)(result__D1FH % Self__50FH->capacity__0CT)];
+      while ((! (((void *)node__B1FH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__B1FH)->key__LDT == (void *)(&__string_150))))) {
+        node__B1FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__B1FH)->next__WDT;
+      };
+      if (((void *)node__B1FH != (void *)NULL)) {
+        Self__HUFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__I1FH= 0;
+        __tmp__K1FH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+        Self__L1FH= 1;
+        while ((Self__L1FH <= __tmp__K1FH)) {
+          result__I1FH=(__INTEGER)((__INTEGER)( 5 * result__I1FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__L1FH -  1)])));
+          Self__L1FH=(__INTEGER)(Self__L1FH +  1);
+        };
+        if ((result__I1FH <  0)) {
+          result__I1FH=(__INTEGER)(~ result__I1FH);
+        };
+        node__JUFH=((void **)Self__HUFH->buckets__5CT)[(__INTEGER)(result__I1FH % Self__HUFH->capacity__0CT)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JUFH)->key__LDT != (void *)(&__string_150))) {
+          node__JUFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JUFH)->next__WDT;
+        };
+        tok__DRQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JUFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+        Self__GYBD=((__STRING *)current_list__2B);
+        i__IYBD=Self__GYBD->count__WFC;
+        j__JYBD=((__STRING_CONSTANT *)tok__DRQC)->count__DD;
+        resize__YXZ(Self__GYBD,(__INTEGER)(i__IYBD + j__JYBD));
+        if (((i__IYBD >  0) && (j__JYBD >  0))) {
+          move__to__by__BWCC(Self__GYBD->storage__BCS, 0,(__INTEGER)(i__IYBD -  1),j__JYBD);
+        };
+        Self__1MEB=((__CHARACTER *)Self__GYBD->storage__BCS);
+        model__2MEB=((__STRING_CONSTANT *)tok__DRQC)->storage__VQO;
+        Self__ODKB=(__INTEGER)(j__JYBD -  1);
+        while ((Self__ODKB >=  0)) {
+          Self__1MEB[Self__ODKB]=((__CHARACTER *)model__2MEB)[Self__ODKB];
+          Self__ODKB=(__INTEGER)(Self__ODKB -  1);
+        };
+      };
+      Self__N1FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__R1FH= 0;
+      __tmp__T1FH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+      Self__U1FH= 1;
+      while ((Self__U1FH <= __tmp__T1FH)) {
+        result__R1FH=(__INTEGER)((__INTEGER)( 5 * result__R1FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__U1FH -  1)])));
+        Self__U1FH=(__INTEGER)(Self__U1FH +  1);
+      };
+      if ((result__R1FH <  0)) {
+        result__R1FH=(__INTEGER)(~ result__R1FH);
+      };
+      node__P1FH=((void **)Self__N1FH->buckets__5CT)[(__INTEGER)(result__R1FH % Self__N1FH->capacity__0CT)];
+      while ((! (((void *)node__P1FH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__P1FH)->key__LDT == (void *)(&__string_152))))) {
+        node__P1FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__P1FH)->next__WDT;
+      };
+      if (((void *)node__P1FH != (void *)NULL)) {
+        Self__OUFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__W1FH= 0;
+        __tmp__Y1FH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+        Self__Z1FH= 1;
+        while ((Self__Z1FH <= __tmp__Y1FH)) {
+          result__W1FH=(__INTEGER)((__INTEGER)( 5 * result__W1FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__Z1FH -  1)])));
+          Self__Z1FH=(__INTEGER)(Self__Z1FH +  1);
+        };
+        if ((result__W1FH <  0)) {
+          result__W1FH=(__INTEGER)(~ result__W1FH);
+        };
+        node__QUFH=((void **)Self__OUFH->buckets__5CT)[(__INTEGER)(result__W1FH % Self__OUFH->capacity__0CT)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QUFH)->key__LDT != (void *)(&__string_152))) {
+          node__QUFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QUFH)->next__WDT;
+        };
+        tok__DRQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QUFH)->item__HY3)->first_link__EUEC)->item__0VHD;
+        append__BOS(current_list__2B,tok__DRQC);
+      };
+      copy__ZCS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__URQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
+      Self__Z32=((__STRING *)string_tmp__VH);
+      if ((n__BRQC > Self__Z32->count__WFC)) {
+        Self__Z32->count__WFC= 0;
+      } else {
+        if ((n__BRQC >  0)) {
+          len__BWU=(__INTEGER)((__INTEGER)(n__BRQC -  1) +  1);
+          if ((len__BWU >  0)) {
+            __tmp__4WU=(__INTEGER)(n__BRQC +  1);
+            __tmp__5WU=Self__Z32->count__WFC;
+            Self__WQGB=__tmp__4WU;
+            while ((Self__WQGB <= __tmp__5WU)) {
+              ((__CHARACTER *)Self__Z32->storage__BCS)[(__INTEGER)((__INTEGER)(Self__WQGB - len__BWU) -  1)]=((__CHARACTER *)Self__Z32->storage__BCS)[(__INTEGER)(Self__WQGB -  1)];
+              Self__WQGB=(__INTEGER)(Self__WQGB +  1);
+            };
+            Self__Z32->count__WFC=(__INTEGER)(Self__Z32->count__WFC - len__BWU);
+          };
+        };
+      };
+      if ((((__STRING *)string_tmp__VH)->count__WFC !=  0)) {
+        Self__HQS=((__STRING *)string_tmp__VH);
+        __tmp__MQS=Self__HQS->storage__BCS;
+        __tmp__PQS=(__INTEGER)(Self__HQS->count__WFC -  1);
+        Self__HMBC=((__CHARACTER *)__tmp__MQS);
+        Self__ISIC=__tmp__PQS;
+        while ((Self__ISIC >=  0)) {
+          if (('/' == Self__HMBC[Self__ISIC])) {
+            Self__HMBC[Self__ISIC]='-';
+          };
+          Self__ISIC=(__INTEGER)(Self__ISIC -  1);
+        };
+        tok__DRQC=get__IWB(string_tmp__VH);
+        Self__11FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__51FH= 0;
+        __tmp__B2FH=((__STRING_CONSTANT *)(&__string_148))->count__DD;
+        Self__C2FH= 1;
+        while ((Self__C2FH <= __tmp__B2FH)) {
+          result__51FH=(__INTEGER)((__INTEGER)( 5 * result__51FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__VQO)[(__INTEGER)(Self__C2FH -  1)])));
+          Self__C2FH=(__INTEGER)(Self__C2FH +  1);
+        };
+        if ((result__51FH <  0)) {
+          result__51FH=(__INTEGER)(~ result__51FH);
+        };
+        node__31FH=((void **)Self__11FH->buckets__5CT)[(__INTEGER)(result__51FH % Self__11FH->capacity__0CT)];
+        while ((! (((void *)node__31FH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__31FH)->key__LDT == (void *)(&__string_148))))) {
+          node__31FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__31FH)->next__WDT;
+        };
+        if (((void *)node__31FH != (void *)NULL)) {
+          Self__JX3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__E2FH= 0;
+          __tmp__G2FH=((__STRING_CONSTANT *)(&__string_148))->count__DD;
+          Self__H2FH= 1;
+          while ((Self__H2FH <= __tmp__G2FH)) {
+            result__E2FH=(__INTEGER)((__INTEGER)( 5 * result__E2FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__VQO)[(__INTEGER)(Self__H2FH -  1)])));
+            Self__H2FH=(__INTEGER)(Self__H2FH +  1);
+          };
+          if ((result__E2FH <  0)) {
+            result__E2FH=(__INTEGER)(~ result__E2FH);
+          };
+          node__UX3=((void **)Self__JX3->buckets__5CT)[(__INTEGER)(result__E2FH % Self__JX3->capacity__0CT)];
+          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UX3)->key__LDT != (void *)(&__string_148))) {
+            node__UX3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UX3)->next__WDT;
+          };
+          tok_lst__ERQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UX3)->item__HY3;
+          __tmp__HYQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__ERQC)->parent_linked_collection__LD.upper__5CD;
+          Self__TURE= 1;
+          while ((Self__TURE <= __tmp__HYQC)) {
+            if (((void *)item__Y0ND(tok_lst__ERQC,Self__TURE) == (void *)NULL)) {
+              append__BOS(directory_list__YB,tok__DRQC);
             } else {
-              append__VNS(directory_list__YB,item__M0ND(tok_lst__YQQC,Self__VERE));
+              append__BOS(directory_list__YB,item__Y0ND(tok_lst__ERQC,Self__TURE));
             };
-            Self__VERE=(__INTEGER)(Self__VERE +  1);
+            Self__TURE=(__INTEGER)(Self__TURE +  1);
           };
         } else {
-          append__VNS(directory_list__YB,tok__XQQC);
-          add_last__NLT(directory_list__YB,'\n');
+          append__BOS(directory_list__YB,tok__DRQC);
+          add_last__ZLT(directory_list__YB,'\n');
         };
-        save_file__with__DDC(add_ext__YAF(tok__XQQC),current_list__2B);
-        ((__STRING *)current_list__2B)->count__KFC= 0;
+        save_file__with__PDC(add_ext__EBF(tok__DRQC),current_list__2B);
+        ((__STRING *)current_list__2B)->count__WFC= 0;
       };
     };
   };
 }
 
-static void* add_ext__YAF(void *n__0AF)
+static void* add_ext__EBF(void *n__GBF)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__BQ5G,__tmp__DQ5G,Self__EQ5G,result__GQ5G;
-  __INTEGER __tmp__IQ5G,Self__JQ5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3P5G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ZL3G;
-  void *node__5P5G,*node__1L3G;
-  copy__NCS(string_tmp__VH,n__0AF);
-  Self__3P5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-  result__BQ5G= 0;
-  __tmp__DQ5G=((__STRING_CONSTANT *)(&__string_116))->count__DD;
-  Self__EQ5G= 1;
-  while ((Self__EQ5G <= __tmp__DQ5G)) {
-    result__BQ5G=(__INTEGER)((__INTEGER)( 5 * result__BQ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__JQO)[(__INTEGER)(Self__EQ5G -  1)])));
-    Self__EQ5G=(__INTEGER)(Self__EQ5G +  1);
-  };
-  if ((result__BQ5G <  0)) {
-    result__BQ5G=(__INTEGER)(~ result__BQ5G);
-  };
-  node__5P5G=((void **)Self__3P5G->buckets__TCT)[(__INTEGER)(result__BQ5G % Self__3P5G->capacity__OCT)];
-  while ((! (((void *)node__5P5G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5P5G)->key__5CT == (void *)(&__string_116))))) {
-    node__5P5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5P5G)->next__KDT;
-  };
-  if (((void *)node__5P5G != (void *)NULL)) {
-    Self__ZL3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-    result__GQ5G= 0;
-    __tmp__IQ5G=((__STRING_CONSTANT *)(&__string_116))->count__DD;
-    Self__JQ5G= 1;
-    while ((Self__JQ5G <= __tmp__IQ5G)) {
-      result__GQ5G=(__INTEGER)((__INTEGER)( 5 * result__GQ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__JQO)[(__INTEGER)(Self__JQ5G -  1)])));
-      Self__JQ5G=(__INTEGER)(Self__JQ5G +  1);
-    };
-    if ((result__GQ5G <  0)) {
-      result__GQ5G=(__INTEGER)(~ result__GQ5G);
-    };
-    node__1L3G=((void **)Self__ZL3G->buckets__TCT)[(__INTEGER)(result__GQ5G % Self__ZL3G->capacity__OCT)];
-    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__1L3G)->key__5CT != (void *)(&__string_116))) {
-      node__1L3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__1L3G)->next__KDT;
-    };
-    append__VNS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__1L3G)->item__1X3)->first_link__YTEC)->item__OVHD);
+  __INTEGER result__N2FH,__tmp__P2FH,Self__Q2FH,result__S2FH;
+  __INTEGER __tmp__U2FH,Self__V2FH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__J2FH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SXDH;
+  void *node__L2FH,*node__UXDH;
+  copy__ZCS(string_tmp__VH,n__GBF);
+  Self__J2FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+  result__N2FH= 0;
+  __tmp__P2FH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+  Self__Q2FH= 1;
+  while ((Self__Q2FH <= __tmp__P2FH)) {
+    result__N2FH=(__INTEGER)((__INTEGER)( 5 * result__N2FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__VQO)[(__INTEGER)(Self__Q2FH -  1)])));
+    Self__Q2FH=(__INTEGER)(Self__Q2FH +  1);
+  };
+  if ((result__N2FH <  0)) {
+    result__N2FH=(__INTEGER)(~ result__N2FH);
+  };
+  node__L2FH=((void **)Self__J2FH->buckets__5CT)[(__INTEGER)(result__N2FH % Self__J2FH->capacity__0CT)];
+  while ((! (((void *)node__L2FH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__L2FH)->key__LDT == (void *)(&__string_116))))) {
+    node__L2FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__L2FH)->next__WDT;
+  };
+  if (((void *)node__L2FH != (void *)NULL)) {
+    Self__SXDH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+    result__S2FH= 0;
+    __tmp__U2FH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+    Self__V2FH= 1;
+    while ((Self__V2FH <= __tmp__U2FH)) {
+      result__S2FH=(__INTEGER)((__INTEGER)( 5 * result__S2FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__VQO)[(__INTEGER)(Self__V2FH -  1)])));
+      Self__V2FH=(__INTEGER)(Self__V2FH +  1);
+    };
+    if ((result__S2FH <  0)) {
+      result__S2FH=(__INTEGER)(~ result__S2FH);
+    };
+    node__UXDH=((void **)Self__SXDH->buckets__5CT)[(__INTEGER)(result__S2FH % Self__SXDH->capacity__0CT)];
+    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UXDH)->key__LDT != (void *)(&__string_116))) {
+      node__UXDH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UXDH)->next__WDT;
+    };
+    append__BOS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UXDH)->item__HY3)->first_link__EUEC)->item__0VHD);
   } else {
-    append__VNS(string_tmp__VH,(&__string_211));
+    append__BOS(string_tmp__VH,(&__string_221));
   };
-  return(get__2VB(string_tmp__VH));
+  return(get__IWB(string_tmp__VH));
 }
 
-static void save_file__with__DDC(void *n__FDC,void *buf__GDC)
+static void save_file__with__PDC(void *n__RDC,void *buf__SDC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING *Self__3L3G,*Self__XDT,*Self__LXS;
-  void *result__FZAC,*__tmp__VZAC,*__tmp__HFC,*file__IDC;
-  void *__tmp__V2HC;
-  __POINTER stream__DEIC,ptr__FGOF;
-  void *__tmp__UZAC;
-  __FILE_UNIX *Self__1HWG,*Self__1ETE,*Self__EGTE;
-  __INTEGER __tmp__MFC;
-  __BOOLEAN __tmp__3DC,result__FEIC;
+  __STRING *Self__WXDH,*Self__DET,*Self__XXS;
+  void *result__RZAC,*__tmp__B0AC,*__tmp__TFC,*file__UDC;
+  void *__tmp__B3HC;
+  __POINTER stream__PEIC,ptr__GGOF;
+  void *__tmp__A0AC;
+  __FILE_UNIX *Self__N21G,*Self__VSTE,*Self__4TTE;
+  __INTEGER __tmp__YFC;
+  __BOOLEAN __tmp__JEC,result__REIC;
   if (((void *)output_name__DI != (void *)NULL)) {
-    copy__NCS(string_tmp__VH,output_name__DI);
-    Self__3L3G=((__STRING *)string_tmp__VH);
-    if ((((__CHARACTER *)Self__3L3G->storage__VBS)[(__INTEGER)(Self__3L3G->count__KFC -  1)] != '/')) {
-      __tmp__3DC=TRUE__;
+    copy__ZCS(string_tmp__VH,output_name__DI);
+    Self__WXDH=((__STRING *)string_tmp__VH);
+    if ((((__CHARACTER *)Self__WXDH->storage__BCS)[(__INTEGER)(Self__WXDH->count__WFC -  1)] != '/')) {
+      __tmp__JEC=TRUE__;
     } else {
-      Self__XDT=((__STRING *)string_tmp__VH);
-      __tmp__3DC=(((__CHARACTER *)Self__XDT->storage__VBS)[(__INTEGER)(Self__XDT->count__KFC -  1)] != '\\');
+      Self__DET=((__STRING *)string_tmp__VH);
+      __tmp__JEC=(((__CHARACTER *)Self__DET->storage__BCS)[(__INTEGER)(Self__DET->count__WFC -  1)] != '\\');
     };
-    if (__tmp__3DC) {
-      add_last__NLT(string_tmp__VH,'/');
+    if (__tmp__JEC) {
+      add_last__ZLT(string_tmp__VH,'/');
     };
   } else {
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
   };
-  append__VNS(string_tmp__VH,n__FDC);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  append__BOS(string_tmp__VH,n__RDC);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  result__FZAC=NULL;
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  result__RZAC=NULL;
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
-    __tmp__V2HC=FILE_SYSTEM__->parent_directory__CFD;
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    __tmp__B3HC=FILE_SYSTEM__->parent_directory__OFD;
   } else {
-    __tmp__V2HC=parent_directory__CED();
+    __tmp__B3HC=parent_directory__OED();
   };
-  copy__NCS(string_tmp__HED,((__DIRECTORY_UNIX *)__tmp__V2HC)->parent_entry_unix__NED.parent_entry__MED.path__BD);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  copy__ZCS(string_tmp__TED,((__DIRECTORY_UNIX *)__tmp__B3HC)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  add_last__NLT(string_tmp__HED,'/');
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  add_last__ZLT(string_tmp__TED,'/');
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  append__VNS(string_tmp__HED,string_tmp__VH);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  append__BOS(string_tmp__TED,string_tmp__VH);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  reduce_path__E3HC(string_tmp__HED);
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  reduce_path__Q3HC(string_tmp__TED);
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  result__FEIC=FALSE__;
-  Self__LXS=((__STRING *)string_tmp__HED);
-  if ((Self__LXS->capacity__MBS > Self__LXS->count__KFC)) {
-    ((__CHARACTER *)Self__LXS->storage__VBS)[Self__LXS->count__KFC]='\0';
+  result__REIC=FALSE__;
+  Self__XXS=((__STRING *)string_tmp__TED);
+  if ((Self__XXS->capacity__YBS > Self__XXS->count__WFC)) {
+    ((__CHARACTER *)Self__XXS->storage__BCS)[Self__XXS->count__WFC]='\0';
   } else {
-    add_last__NLT(Self__LXS,'\0');
-    Self__LXS->count__KFC=(__INTEGER)(Self__LXS->count__KFC -  1);
+    add_last__ZLT(Self__XXS,'\0');
+    Self__XXS->count__WFC=(__INTEGER)(Self__XXS->count__WFC -  1);
   };
-  stream__DEIC=((__POINTER )(fopen((char*)(Self__LXS->storage__VBS),"w+b")));
-  if ((stream__DEIC != (void *)NULL)) {
-    result__FEIC=(((__INTEGER )(fclose((FILE*)(stream__DEIC)))) ==  0);
+  stream__PEIC=((__POINTER )(fopen((char*)(Self__XXS->storage__BCS),"w+b")));
+  if ((stream__PEIC != (void *)NULL)) {
+    result__REIC=(((__INTEGER )(fclose((FILE*)(stream__PEIC)))) ==  0);
   };
-  if (result__FEIC) {
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  if (result__REIC) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    __tmp__UZAC=get_entry__H0AC(string_tmp__HED);
-    if (__tmp__UZAC==NULL) {
-      __tmp__VZAC=NULL;
+    __tmp__A0AC=get_entry__T0AC(string_tmp__TED);
+    if (__tmp__A0AC==NULL) {
+      __tmp__B0AC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__UZAC)->__id) {
+      switch (((struct ___OBJ *)__tmp__A0AC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__VZAC=NULL;
+        __tmp__B0AC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__VZAC=((void *)__tmp__UZAC);
+        __tmp__B0AC=((void *)__tmp__A0AC);
       } break;
       }
     };
-    result__FZAC=__tmp__VZAC;
+    result__RZAC=__tmp__B0AC;
   };
-  if (((void *)result__FZAC == (void *)NULL)) {
-    put_string__I1F((&__string_212));
-    put_string__I1F(string_tmp__VH);
-    put_string__I1F((&__string_213));
+  if (((void *)result__RZAC == (void *)NULL)) {
+    put_string__U1F((&__string_222));
+    put_string__U1F(string_tmp__VH);
+    put_string__U1F((&__string_223));
     exit(( 1));
   };
-  Self__1HWG=((__FILE_UNIX *)result__FZAC);
-  Self__1HWG->stream__YIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__1HWG->parent_entry_unix__QCF.parent_entry__MED.path__BD)->storage__JQO),"r+b")));
-  if ((! (Self__1HWG->stream__YIRD != (void *)NULL))) {
-    put_string__I1F((&__string_212));
-    put_string__I1F(string_tmp__VH);
-    put_string__I1F((&__string_214));
+  Self__N21G=((__FILE_UNIX *)result__RZAC);
+  Self__N21G->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__N21G->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
+  if ((! (Self__N21G->stream__EJRD != (void *)NULL))) {
+    put_string__U1F((&__string_222));
+    put_string__U1F(string_tmp__VH);
+    put_string__U1F((&__string_224));
     exit(( 1));
   };
-  if (result__FZAC==NULL) {
-    __tmp__HFC=NULL;
+  if (result__RZAC==NULL) {
+    __tmp__TFC=NULL;
   } else {
-    __tmp__HFC=((void *)result__FZAC);
-  };
-  file__IDC=__tmp__HFC;
-  __tmp__MFC=((__STRING *)buf__GDC)->count__KFC;
-  Self__1ETE=((__FILE_UNIX *)__tmp__HFC);
-  ptr__FGOF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__GDC)->storage__VBS));
-  ptr__FGOF=(void *)((unsigned long)ptr__FGOF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
-  fwrite((void *)((((__UINTEGER_8 *)ptr__FGOF))),(size_t)(1), (size_t)((__tmp__MFC)),(FILE*)((Self__1ETE->stream__YIRD)));
-  Self__EGTE=((__FILE_UNIX *)__tmp__HFC);
-  fclose((FILE*)((Self__EGTE->stream__YIRD)));
-  Self__EGTE->stream__YIRD=NULL;
+    __tmp__TFC=((void *)result__RZAC);
+  };
+  file__UDC=__tmp__TFC;
+  __tmp__YFC=((__STRING *)buf__SDC)->count__WFC;
+  Self__VSTE=((__FILE_UNIX *)__tmp__TFC);
+  ptr__GGOF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__SDC)->storage__BCS));
+  ptr__GGOF=(void *)((unsigned long)ptr__GGOF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
+  fwrite((void *)((((__UINTEGER_8 *)ptr__GGOF))),(size_t)(1), (size_t)((__tmp__YFC)),(FILE*)((Self__VSTE->stream__EJRD)));
+  Self__4TTE=((__FILE_UNIX *)__tmp__TFC);
+  fclose((FILE*)((Self__4TTE->stream__EJRD)));
+  Self__4TTE->stream__EJRD=NULL;
 }
 
-static void resize__MXZ(__STRING *Self__NXZ,__INTEGER new_count__OXZ)
+static void resize__YXZ(__STRING *Self__ZXZ,__INTEGER new_count__0XZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER old_nb_elts__U11G,upper__VI5G,Self__TI5G,lower__0N3C;
-  __INTEGER upper__1N3C,Self__WTDD;
-  __CHARACTER *Self__T11G,*new__W11G,*Self__ZN3C;
-  if ((! (new_count__OXZ <= Self__NXZ->count__KFC))) {
-    if ((Self__NXZ->capacity__MBS < new_count__OXZ)) {
-      if ((Self__NXZ->capacity__MBS ==  0)) {
-        Self__NXZ->storage__VBS=create__VLEB(new_count__OXZ);
-      } else {
-        Self__T11G=((__CHARACTER *)Self__NXZ->storage__VBS);
-        old_nb_elts__U11G=Self__NXZ->capacity__MBS;
-        new__W11G=((__CHARACTER *)realloc_dynamic__old_size__new_size__FELC(((__POINTER )Self__T11G),((__UINTEGER_32 )old_nb_elts__U11G),((__UINTEGER_32 )new_count__OXZ)));
-        upper__VI5G=(__INTEGER)(new_count__OXZ -  1);
-        Self__TI5G=old_nb_elts__U11G;
-        while ((Self__TI5G <= upper__VI5G)) {
-          new__W11G[Self__TI5G]='\0';
-          Self__TI5G=(__INTEGER)(Self__TI5G +  1);
-        };
-        Self__NXZ->storage__VBS=new__W11G;
-      };
-      Self__NXZ->capacity__MBS=new_count__OXZ;
-    } else {
-      Self__ZN3C=((__CHARACTER *)Self__NXZ->storage__VBS);
-      lower__0N3C=Self__NXZ->count__KFC;
-      upper__1N3C=(__INTEGER)(new_count__OXZ -  1);
-      Self__WTDD=lower__0N3C;
-      while ((Self__WTDD <= upper__1N3C)) {
-        Self__ZN3C[Self__WTDD]='\0';
-        Self__WTDD=(__INTEGER)(Self__WTDD +  1);
-      };
-    };
-  };
-  Self__NXZ->count__KFC=new_count__OXZ;
+  __INTEGER old_nb_elts__0ICH,upper__VUFH,Self__TUFH,lower__GO3C;
+  __INTEGER upper__HO3C,Self__CUDD;
+  __CHARACTER *Self__ZICH,*new__2ICH,*Self__FO3C;
+  if ((! (new_count__0XZ <= Self__ZXZ->count__WFC))) {
+    if ((Self__ZXZ->capacity__YBS < new_count__0XZ)) {
+      if ((Self__ZXZ->capacity__YBS ==  0)) {
+        Self__ZXZ->storage__BCS=create__BMEB(new_count__0XZ);
+      } else {
+        Self__ZICH=((__CHARACTER *)Self__ZXZ->storage__BCS);
+        old_nb_elts__0ICH=Self__ZXZ->capacity__YBS;
+        new__2ICH=((__CHARACTER *)realloc_dynamic__old_size__new_size__RELC(((__POINTER )Self__ZICH),((__UINTEGER_32 )old_nb_elts__0ICH),((__UINTEGER_32 )new_count__0XZ)));
+        upper__VUFH=(__INTEGER)(new_count__0XZ -  1);
+        Self__TUFH=old_nb_elts__0ICH;
+        while ((Self__TUFH <= upper__VUFH)) {
+          new__2ICH[Self__TUFH]='\0';
+          Self__TUFH=(__INTEGER)(Self__TUFH +  1);
+        };
+        Self__ZXZ->storage__BCS=new__2ICH;
+      };
+      Self__ZXZ->capacity__YBS=new_count__0XZ;
+    } else {
+      Self__FO3C=((__CHARACTER *)Self__ZXZ->storage__BCS);
+      lower__GO3C=Self__ZXZ->count__WFC;
+      upper__HO3C=(__INTEGER)(new_count__0XZ -  1);
+      Self__CUDD=lower__GO3C;
+      while ((Self__CUDD <= upper__HO3C)) {
+        Self__FO3C[Self__CUDD]='\0';
+        Self__CUDD=(__INTEGER)(Self__CUDD +  1);
+      };
+    };
+  };
+  Self__ZXZ->count__WFC=new_count__0XZ;
 }
 
-static void move__to__by__VVCC(__CHARACTER *Self__WVCC,__INTEGER lower__XVCC,__INTEGER upper__YVCC,__INTEGER offset__ZVCC)
+static void move__to__by__BWCC(__CHARACTER *Self__CWCC,__INTEGER lower__DWCC,__INTEGER upper__EWCC,__INTEGER offset__FWCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER Self__3IHD,Self__MJHD;
-  if ((offset__ZVCC !=  0)) {
-    if ((offset__ZVCC <  0)) {
-      Self__3IHD=lower__XVCC;
-      while ((Self__3IHD <= upper__YVCC)) {
-        Self__WVCC[(__INTEGER)(Self__3IHD + offset__ZVCC)]=Self__WVCC[Self__3IHD];
-        Self__3IHD=(__INTEGER)(Self__3IHD +  1);
+  __INTEGER Self__JJHD,Self__YJHD;
+  if ((offset__FWCC !=  0)) {
+    if ((offset__FWCC <  0)) {
+      Self__JJHD=lower__DWCC;
+      while ((Self__JJHD <= upper__EWCC)) {
+        Self__CWCC[(__INTEGER)(Self__JJHD + offset__FWCC)]=Self__CWCC[Self__JJHD];
+        Self__JJHD=(__INTEGER)(Self__JJHD +  1);
       };
     } else {
-      Self__MJHD=upper__YVCC;
-      while ((Self__MJHD >= lower__XVCC)) {
-        Self__WVCC[(__INTEGER)(Self__MJHD + offset__ZVCC)]=Self__WVCC[Self__MJHD];
-        Self__MJHD=(__INTEGER)(Self__MJHD -  1);
+      Self__YJHD=upper__EWCC;
+      while ((Self__YJHD >= lower__DWCC)) {
+        Self__CWCC[(__INTEGER)(Self__YJHD + offset__FWCC)]=Self__CWCC[Self__YJHD];
+        Self__YJHD=(__INTEGER)(Self__YJHD -  1);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__S5DB(__STRING_CONSTANT *Self__T5DB,void *other__U5DB)
+static __BOOLEAN __infix_equal_equal__45DB(__STRING_CONSTANT *Self__55DB,void *other__AAEB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__35DB,__tmp__45DB,i__U0YB;
-  __BOOLEAN result__W5DB;
-  __CHARACTER *__tmp__PAEB,*__tmp__QAEB,*Self__A0YB,*other__B0YB;
-  result__W5DB=FALSE__;
-  __tmp__35DB=Self__T5DB->count__DD;
-  if (((struct ___OBJ *)other__U5DB)->__id==__STRING_CONSTANT__) {
-    __tmp__45DB=((__STRING_CONSTANT *)other__U5DB)->count__DD;
+  __INTEGER __tmp__JAEB,__tmp__KAEB,i__A1YB;
+  __BOOLEAN result__CAEB;
+  __CHARACTER *__tmp__1AEB,*__tmp__2AEB,*Self__M0YB,*other__N0YB;
+  result__CAEB=FALSE__;
+  __tmp__JAEB=Self__55DB->count__DD;
+  if (((struct ___OBJ *)other__AAEB)->__id==__STRING_CONSTANT__) {
+    __tmp__KAEB=((__STRING_CONSTANT *)other__AAEB)->count__DD;
   } else {
-    __tmp__45DB=((__STRING *)other__U5DB)->count__KFC;
+    __tmp__KAEB=((__STRING *)other__AAEB)->count__WFC;
   };
-  if ((__tmp__35DB == __tmp__45DB)) {
-    if ((Self__T5DB->count__DD ==  0)) {
-      result__W5DB=TRUE__;
+  if ((__tmp__JAEB == __tmp__KAEB)) {
+    if ((Self__55DB->count__DD ==  0)) {
+      result__CAEB=TRUE__;
     } else {
-      __tmp__PAEB=Self__T5DB->storage__JQO;
-      if (((struct ___OBJ *)other__U5DB)->__id==__STRING_CONSTANT__) {
-        __tmp__QAEB=((__STRING_CONSTANT *)other__U5DB)->storage__JQO;
+      __tmp__1AEB=Self__55DB->storage__VQO;
+      if (((struct ___OBJ *)other__AAEB)->__id==__STRING_CONSTANT__) {
+        __tmp__2AEB=((__STRING_CONSTANT *)other__AAEB)->storage__VQO;
       } else {
-        __tmp__QAEB=((__STRING *)other__U5DB)->storage__VBS;
+        __tmp__2AEB=((__STRING *)other__AAEB)->storage__BCS;
       };
-      Self__A0YB=((__CHARACTER *)__tmp__PAEB);
-      other__B0YB=__tmp__QAEB;
-      i__U0YB=(__INTEGER)(Self__T5DB->count__DD -  1);
-      while (((i__U0YB >=  0) && (Self__A0YB[i__U0YB] == ((__CHARACTER *)other__B0YB)[i__U0YB]))) {
-        i__U0YB=(__INTEGER)(i__U0YB -  1);
+      Self__M0YB=((__CHARACTER *)__tmp__1AEB);
+      other__N0YB=__tmp__2AEB;
+      i__A1YB=(__INTEGER)(Self__55DB->count__DD -  1);
+      while (((i__A1YB >=  0) && (Self__M0YB[i__A1YB] == ((__CHARACTER *)other__N0YB)[i__A1YB]))) {
+        i__A1YB=(__INTEGER)(i__A1YB -  1);
       };
-      result__W5DB=(i__U0YB <  0);
+      result__CAEB=(i__A1YB <  0);
     };
   };
-  return(result__W5DB);
+  return(result__CAEB);
 }
 
-static void* at__EL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FL4,void *k__GL4)
+static void* at__QL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RL4,void *k__SL4)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__MQ5G;
-  __INTEGER result__LQ5G,__tmp__NQ5G,Self__OQ5G;
-  void *node__QL4;
-  Self__MQ5G=((__STRING_CONSTANT *)k__GL4);
-  result__LQ5G= 0;
-  __tmp__NQ5G=Self__MQ5G->count__DD;
-  Self__OQ5G= 1;
-  while ((Self__OQ5G <= __tmp__NQ5G)) {
-    result__LQ5G=(__INTEGER)((__INTEGER)( 5 * result__LQ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MQ5G->storage__JQO)[(__INTEGER)(Self__OQ5G -  1)])));
-    Self__OQ5G=(__INTEGER)(Self__OQ5G +  1);
-  };
-  if ((result__LQ5G <  0)) {
-    result__LQ5G=(__INTEGER)(~ result__LQ5G);
-  };
-  node__QL4=((void **)Self__FL4->buckets__TCT)[(__INTEGER)(result__LQ5G % Self__FL4->capacity__OCT)];
-  while ((! __infix_equal_equal__S5DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QL4)->key__5CT,k__GL4))) {
-    node__QL4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QL4)->next__KDT;
-  };
-  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QL4)->item__1X3);
+  __STRING_CONSTANT *Self__Y2FH;
+  __INTEGER result__X2FH,__tmp__Z2FH,Self__02FH;
+  void *node__2L4;
+  Self__Y2FH=((__STRING_CONSTANT *)k__SL4);
+  result__X2FH= 0;
+  __tmp__Z2FH=Self__Y2FH->count__DD;
+  Self__02FH= 1;
+  while ((Self__02FH <= __tmp__Z2FH)) {
+    result__X2FH=(__INTEGER)((__INTEGER)( 5 * result__X2FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Y2FH->storage__VQO)[(__INTEGER)(Self__02FH -  1)])));
+    Self__02FH=(__INTEGER)(Self__02FH +  1);
+  };
+  if ((result__X2FH <  0)) {
+    result__X2FH=(__INTEGER)(~ result__X2FH);
+  };
+  node__2L4=((void **)Self__RL4->buckets__5CT)[(__INTEGER)(result__X2FH % Self__RL4->capacity__0CT)];
+  while ((! __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2L4)->key__LDT,k__SL4))) {
+    node__2L4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2L4)->next__WDT;
+  };
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2L4)->item__HY3);
 }
 
-static void go_on__WAC(void *obj__YAC)
+static void go_on__CBC(void *obj__EBC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __POINTER ptr__YEG,ptr_table__DRAH,next__CRAH,result__ERAH;
-  __POINTER ptr_table__IRAH,next__HRAH,result__JRAH,ptr__NRAH;
-  __POINTER ptr_table__VRAH,next__URAH,result__WRAH,ptr_table__0RAH;
-  __POINTER next__ZRAH,result__1RAH,ptr__MFID,ptr_table__5RAH;
-  __POINTER next__4RAH,result__ASAH,ptr_table__ESAH,next__DSAH;
-  __POINTER result__FSAH,ptr__MSAH,ptr_table__YSAH,next__XSAH;
-  __POINTER result__ZSAH,ptr_table__3SAH,next__2SAH,result__4SAH;
-  __POINTER ptr__TTAH,ptr_table__5TAH,next__4TAH,result__AUAH;
-  __POINTER ptr_table__EUAH,next__DUAH,result__FUAH,ptr__JUAH;
-  __POINTER ptr_table__VUAH,next__UUAH,result__WUAH,ptr_table__0UAH;
-  __POINTER next__ZUAH,result__1UAH,ptr__5UAH,ptr_table__IVAH;
-  __POINTER next__HVAH,result__JVAH,ptr_table__NVAH,next__MVAH;
-  __POINTER result__OVAH,ptr__SVAH,ptr_table__1VAH,next__0VAH;
-  __POINTER result__2VAH,ptr_table__AWAH,next__5VAH,result__BWAH;
-  __INTEGER typ_id__3EG,new_capacity__HHY,pos_sec__FXC,old_derive__GXC;
-  __INTEGER typ_id__ORAH,h__K0FC,idx__L0FC,idx__CDID,new_capacity__DDID;
-  __INTEGER i__EDID,typ_id__RFID,old_pos__GXOB,old_derive__HXOB;
-  __INTEGER typ_id__NSAH,new_capacity__CMHC,other_upper__BMHC;
-  __INTEGER Self__T1WD,new_capacity__NUHC,__tmp__RVHC,__tmp__4ITD;
-  __INTEGER Self__U3WE,__tmp__GEHC,typ_id__UTAH,typ_id__KUAH;
-  __INTEGER typ_id__AVAH,typ_id__TVAH,start__RQ5G,end__QQ5G,len__SQ5G;
-  __INTEGER __tmp__TQ5G,__tmp__VQ5G,Self__WQ5G,__tmp__2J3B,Self__JZPC;
-  __INTEGER start__0Q5G,end__ZQ5G,len__1Q5G,__tmp__2Q5G,__tmp__4Q5G;
-  __INTEGER Self__5Q5G;
-  __UINTEGER_32 sz__0EG,a__QM3G,new_size__RM3G,t__VM3G,a__UM3G;
-  __UINTEGER_32 new_size__LRAH,lab_type__KRAH,sz__PRAH,a__QRAH;
-  __UINTEGER_32 new_size__RRAH,t__SRAH,a__TRAH,new_size__3RAH;
-  __UINTEGER_32 lab_type__2RAH,sz__OFID,a__GN3G,new_size__HN3G,t__LN3G;
-  __UINTEGER_32 a__KN3G,new_size__HSAH,lab_type__GSAH,sz__OSAH,a__PSAH;
-  __UINTEGER_32 new_size__QSAH,t__RSAH,a__SSAH,new_size__ATAH;
-  __UINTEGER_32 lab_type__5SAH,sz__VTAH,a__WTAH,new_size__XTAH,t__YTAH;
-  __UINTEGER_32 a__ZTAH,new_size__HUAH,lab_type__GUAH,sz__LUAH,a__MUAH;
-  __UINTEGER_32 new_size__NUAH,t__OUAH,a__PUAH,new_size__3UAH;
-  __UINTEGER_32 lab_type__2UAH,sz__BVAH,a__CVAH,new_size__DVAH,t__EVAH;
-  __UINTEGER_32 a__FVAH,new_size__QVAH,lab_type__PVAH,sz__UVAH,a__VVAH;
-  __UINTEGER_32 new_size__WVAH,t__XVAH,a__YVAH,new_size__DWAH;
-  __UINTEGER_32 lab_type__CWAH;
-  __POSITION pos__4XOG,pos__AYOG,pos__CYOG,pos__NYOG,pos__PYOG;
-  __POSITION pos__SYOG,pos__UYOG,p__USAH,__tmp__YEHC,__tmp__FFHC;
-  __POSITION pos__C3OG,pos__E3OG,pos__G3OG,pos__I3OG,pos__FZID;
-  __POSITION pos__M3OG,__tmp__1DBD,__tmp__DEBD,__tmp__XEBD,__tmp__AFBD;
-  __POSITION pos__W3OG,__tmp__J5OB,__tmp__L5OB,pos__R4OG,pos__T4OG;
-  void *n__SSOB,*n__ODBD,*__tmp__44OB,*__tmp__UFZB;
-  __SECTION_ *Self__2KWG,*Self__3KWG,*result__MRAH,*Self__UOWG;
-  __SECTION_ *Self__VBFC;
-  void *__tmp__L1C,*s__IXOB,*result__UBZB,*__tmp__50OB,*__tmp__FJ3B;
-  void *s__SFZB,*__tmp__CGZB;
-  void *__tmp__N1C,*result__VQEC,*result__OWOB,*sec__PDBD;
-  void *t__CXOB;
-  void *arg__TBZB,*__tmp__FEHC,*__tmp__XEHC,*__tmp__EFHC;
-  __ITM_ARG *result__LSAH,*Self__TSAH,*result__STAH,*Self__0TAH;
-  __ITM_SLOT_OPERATOR *Self__2DHC,*Self__Q4FC,*Self__HGHC;
-  void *tm__S4FC,*__tmp__14FC;
-  void *expr__YI3B;
-  void *__tmp__GJ3B;
-  __ITM_SLOT *result__IUAH,*Self__QUAH;
-  __ITM_PROTOTYPE *result__4UAH;
-  __ITM_READ_ARG1 *result__RVAH;
-  __STRING *Self__UQ5G,*Self__3Q5G;
-  __PROTOTYPE *Self__RFZB;
-  __HASHED_SEToSTRING_CONSTANTo *result__XEG,*Self__QHT,*Self__XJ3B;
-  void *t__OXC,*k__KQEC,*k__D0FC,*lt__DXOB;
-  __BOOLEAN result__UUCH,result__WUCH,result__NBE,result__CGEB;
-  __BOOLEAN __tmp__PGEB,result__LD5,result__WM3G,result__KX5;
-  __BOOLEAN __tmp__HIEB,result__BVAB,__tmp__IIEB,__tmp__LIEB,__tmp__41C;
-  __BOOLEAN __tmp__T1C,result__BXOB,result__ISAH,result__BTAH;
-  __BOOLEAN __tmp__EDZB,result__ETAH,__tmp__1UHC,__tmp__KEHC;
-  __BOOLEAN result__JTAH,__tmp__1YOB,result__MTAH,result__PTAH;
-  __BOOLEAN result__EWAH,__tmp__U3OB,__tmp__V3OB;
-  __CHARACTER result__TKWG,result__UKWG,result__VKWG,result__WKWG;
-  __CHARACTER result__XKWG,result__YKWG,result__ZKWG,result__0KWG;
-  __CHARACTER result__1KWG,affect__FXOB,style__EXOB,result__JSAH;
-  __CHARACTER result__CTAH,result__FTAH,result__KTAH,result__NTAH;
-  __CHARACTER result__QTAH,result__FWAH,result__4OWG,result__5OWG;
-  __CHARACTER result__APWG,result__BPWG,result__OPWG;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__JQEC;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__B0FC;
-  void *node__UQEC,*node__M0FC,*node1__GDID,*node2__HDID,*__tmp__01FC;
-  void **old_buckets__FDID;
-  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__LFID;
-  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__3DTD;
-  void *result__EU1B,*result__GU4B,*larg__QDBD;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__KCZC,*Self__ADZC;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__LUHC;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__5LHC,*Self__ZN3G,*Self__CO3G;
-  void **__tmp__VMHC,**__tmp__XMHC,**Self__YGSD;
-  void **__tmp__QVHC,**new__KITD;
-  void *__tmp__24OB,*__tmp__TFZB;
-  void **__tmp__ZJ3B,**Self__HHHC;
-  object__3AC=obj__YAC;
-  source__DBC=((__PROTOTYPE *)obj__YAC)->source__BBC;
-  position__GBC= 1;
-  pos_cur__JBC= 1;
-  pos_line__KBC= 1;
-  pos_col__LBC= 0;
-  is_catch_comment__UWC=FALSE__;
-  if (is_shorter__WY) {
-    is_active_short__SBC=TRUE__;
-    key_comment_default__UBC=(&__string_129);
-    short_derive__VBC= 0;
-    copy__NCS(output_code__SI,source__DBC);
-    result__XEG=NULL;
-    ptr__YEG=((__POINTER )(NULL));
-    typ_id__3EG= 0;
-    sz__0EG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
-    if ((sz__0EG ==  0)) {
-      result__XEG=HASHED_SEToSTRING_CONSTANTo__;
-    } else {
-      typ_id__3EG=__HASHED_SEToSTRING_CONSTANTo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__0EG);
-      if ((typ_id__3EG == (__INTEGER)(-  1))) {
-        a__QM3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__RM3G=(__UINTEGER_32)((__UINTEGER_32)(sz__0EG + a__QM3G) & (__UINTEGER_32)(~ a__QM3G));
-        ptr_table__DRAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RM3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__CRAH=((__POINTER )(NULL));
-        result__ERAH=((__POINTER *)ptr_table__DRAH)[ 0];
-        if ((result__ERAH == (void *)NULL)) {
-          result__ERAH=new_lab__ARJ(new_size__RM3G);
-          next__CRAH=(void *)((unsigned long)result__ERAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RM3G)));
-          ((__POINTER *)next__CRAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DRAH)[ 0]=next__CRAH;
-        } else {
-          next__CRAH=((__POINTER *)result__ERAH)[ 0];
-          if ((next__CRAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ERAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RM3G <<  1)) <=  4096)) {
-              next__CRAH=(void *)((unsigned long)result__ERAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RM3G)));
+  __POINTER ptr__EFG,ptr_table__X3GH,next__W3GH,result__Y3GH;
+  __POINTER ptr_table__23GH,next__13GH,result__33GH,ptr__B4GH;
+  __POINTER ptr_table__J4GH,next__I4GH,result__K4GH,ptr_table__O4GH;
+  __POINTER next__N4GH,result__P4GH,ptr__YFID,ptr_table__T4GH;
+  __POINTER next__S4GH,result__U4GH,ptr_table__Y4GH,next__X4GH;
+  __POINTER result__Z4GH,ptr__A5GH,ptr_table__M5GH,next__L5GH;
+  __POINTER result__N5GH,ptr_table__R5GH,next__Q5GH,result__S5GH;
+  __POINTER ptr__HAHH,ptr_table__TAHH,next__SAHH,result__UAHH;
+  __POINTER ptr_table__YAHH,next__XAHH,result__ZAHH,ptr__3AHH;
+  __POINTER ptr_table__JBHH,next__IBHH,result__KBHH,ptr_table__OBHH;
+  __POINTER next__NBHH,result__PBHH,ptr__TBHH,ptr_table__2BHH;
+  __POINTER next__1BHH,result__3BHH,ptr_table__BCHH,next__ACHH;
+  __POINTER result__CCHH,ptr__GCHH,ptr_table__PCHH,next__OCHH;
+  __POINTER result__QCHH,ptr_table__UCHH,next__TCHH,result__VCHH;
+  __INTEGER typ_id__JFG,new_capacity__THY,pos_sec__RXC,old_derive__SXC;
+  __INTEGER typ_id__C4GH,h__W0FC,idx__X0FC,idx__ODID,new_capacity__PDID;
+  __INTEGER i__QDID,typ_id__3FID,old_pos__SXOB,old_derive__TXOB;
+  __INTEGER typ_id__B5GH,new_capacity__OMHC,other_upper__NMHC;
+  __INTEGER Self__M2WD,new_capacity__ZUHC,__tmp__3VHC,__tmp__KJTD;
+  __INTEGER Self__YPXE,__tmp__SEHC,typ_id__IAHH,typ_id__4AHH;
+  __INTEGER typ_id__UBHH,typ_id__HCHH,start__32FH,end__22FH,len__42FH;
+  __INTEGER __tmp__52FH,__tmp__B3FH,Self__C3FH,__tmp__IK3B,Self__VZPC;
+  __INTEGER start__G3FH,end__F3FH,len__H3FH,__tmp__I3FH,__tmp__K3FH;
+  __INTEGER Self__L3FH;
+  __UINTEGER_32 sz__GFG,a__JYDH,new_size__KYDH,t__OYDH,a__NYDH;
+  __UINTEGER_32 new_size__53GH,lab_type__43GH,sz__D4GH,a__E4GH;
+  __UINTEGER_32 new_size__F4GH,t__G4GH,a__H4GH,new_size__R4GH;
+  __UINTEGER_32 lab_type__Q4GH,sz__0FID,a__5YDH,new_size__AZDH,t__EZDH;
+  __UINTEGER_32 a__DZDH,new_size__14GH,lab_type__04GH,sz__C5GH,a__D5GH;
+  __UINTEGER_32 new_size__E5GH,t__F5GH,a__G5GH,new_size__U5GH;
+  __UINTEGER_32 lab_type__T5GH,sz__JAHH,a__KAHH,new_size__LAHH,t__MAHH;
+  __UINTEGER_32 a__NAHH,new_size__1AHH,lab_type__0AHH,sz__5AHH,a__ABHH;
+  __UINTEGER_32 new_size__BBHH,t__CBHH,a__DBHH,new_size__RBHH;
+  __UINTEGER_32 lab_type__QBHH,sz__VBHH,a__WBHH,new_size__XBHH,t__YBHH;
+  __UINTEGER_32 a__ZBHH,new_size__ECHH,lab_type__DCHH,sz__ICHH,a__JCHH;
+  __UINTEGER_32 new_size__KCHH,t__LCHH,a__MCHH,new_size__XCHH;
+  __UINTEGER_32 lab_type__WCHH;
+  __POSITION pos__2FUG,pos__4FUG,pos__AGUG,pos__LGUG,pos__NGUG;
+  __POSITION pos__QGUG,pos__SGUG,p__I5GH,__tmp__EFHC,__tmp__RFHC;
+  __POSITION pos__ALUG,pos__CLUG,pos__ELUG,pos__GLUG,pos__RZID;
+  __POSITION pos__KLUG,__tmp__HEBD,__tmp__PEBD,__tmp__DFBD,__tmp__MFBD;
+  __POSITION pos__ULUG,__tmp__V5OB,__tmp__X5OB,pos__PMUG,pos__RMUG;
+  void *n__4SOB,*n__0DBD,*__tmp__K5OB,*__tmp__AGZB;
+  __SECTION_ *Self__CB2G,*Self__DB2G,*result__A4GH,*Self__0E2G;
+  __SECTION_ *Self__1E2G;
+  void *__tmp__X1C,*s__UXOB,*result__ACZB,*__tmp__L1OB,*__tmp__RJ3B;
+  void *s__4FZB,*__tmp__OGZB;
+  void *__tmp__Z1C,*result__BREC,*result__0WOB,*sec__1DBD;
+  void *t__OXOB;
+  void *arg__5BZB,*__tmp__REHC,*__tmp__DFHC,*__tmp__QFHC;
+  __ITM_ARG *result__54GH,*Self__H5GH,*result__GAHH,*Self__OAHH;
+  __ITM_SLOT_OPERATOR *Self__IEHC,*Self__24FC,*Self__TGHC;
+  void *tm__44FC,*__tmp__H5FC;
+  void *expr__EJ3B;
+  void *__tmp__SJ3B;
+  __ITM_SLOT *result__2AHH,*Self__EBHH;
+  __ITM_PROTOTYPE *result__SBHH;
+  __ITM_READ_ARG1 *result__FCHH;
+  __STRING *Self__A3FH,*Self__J3FH;
+  __PROTOTYPE *Self__3FZB;
+  __HASHED_SEToSTRING_CONSTANTo *result__DFG,*Self__2HT,*Self__DK3B;
+  void *t__0XC,*k__WQEC,*k__P0FC,*lt__PXOB;
+  __BOOLEAN result__SBJH,result__UBJH,result__ZBE,result__OGEB;
+  __BOOLEAN __tmp__1GEB,result__XD5,result__PYDH,result__WX5;
+  __BOOLEAN __tmp__TIEB,result__NVAB,__tmp__UIEB,__tmp__XIEB,__tmp__K2C;
+  __BOOLEAN __tmp__51C,result__NXOB,result__24GH,result__V5GH;
+  __BOOLEAN __tmp__QDZB,result__Y5GH,__tmp__HVHC,__tmp__WEHC;
+  __BOOLEAN result__35GH,__tmp__HZOB,result__AAHH,result__DAHH;
+  __BOOLEAN result__YCHH,__tmp__A4OB,__tmp__B4OB;
+  __CHARACTER result__R51G,result__W51G,result__151G,result__AA2G;
+  __CHARACTER result__FA2G,result__OA2G,result__TA2G,result__YA2G;
+  __CHARACTER result__3A2G,affect__RXOB,style__QXOB,result__34GH;
+  __CHARACTER result__W5GH,result__Z5GH,result__45GH,result__BAHH;
+  __CHARACTER result__EAHH,result__ZCHH,result__FF2G,result__OF2G;
+  __CHARACTER result__TF2G,result__YF2G,result__JG2G;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__VQEC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__N0FC;
+  void *node__AREC,*node__Y0FC,*node1__SDID,*node2__TDID,*__tmp__G2FC;
+  void **old_buckets__RDID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__XFID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__JETD;
+  void *result__QU1B,*result__SU4B,*larg__2DBD;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__WCZC,*Self__MDZC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__XUHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__LMHC,*Self__SZDH,*Self__1ZDH;
+  void **__tmp__BNHC,**__tmp__DNHC,**Self__EHSD;
+  void **__tmp__2VHC,**new__WITD;
+  void *__tmp__I5OB,*__tmp__5FZB;
+  void **__tmp__FK3B,**Self__THHC;
+  object__JBC=obj__EBC;
+  source__PBC=((__PROTOTYPE *)obj__EBC)->source__NBC;
+  position__SBC= 1;
+  pos_cur__VBC= 1;
+  pos_line__WBC= 1;
+  pos_col__XBC= 0;
+  is_catch_comment__AXC=FALSE__;
+  if (is_shorter__5Y) {
+    is_active_short__4BC=TRUE__;
+    key_comment_default__ACC=(&__string_129);
+    short_derive__BCC= 0;
+    copy__ZCS(output_code__SI,source__PBC);
+    result__DFG=NULL;
+    ptr__EFG=((__POINTER )(NULL));
+    typ_id__JFG= 0;
+    sz__GFG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
+    if ((sz__GFG ==  0)) {
+      result__DFG=HASHED_SEToSTRING_CONSTANTo__;
+    } else {
+      typ_id__JFG=__HASHED_SEToSTRING_CONSTANTo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GFG);
+      if ((typ_id__JFG == (__INTEGER)(-  1))) {
+        a__JYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KYDH=(__UINTEGER_32)((__UINTEGER_32)(sz__GFG + a__JYDH) & (__UINTEGER_32)(~ a__JYDH));
+        ptr_table__X3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KYDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__W3GH=((__POINTER )(NULL));
+        result__Y3GH=((__POINTER *)ptr_table__X3GH)[ 0];
+        if ((result__Y3GH == (void *)NULL)) {
+          result__Y3GH=new_lab__MRJ(new_size__KYDH);
+          next__W3GH=(void *)((unsigned long)result__Y3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KYDH)));
+          ((__POINTER *)next__W3GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X3GH)[ 0]=next__W3GH;
+        } else {
+          next__W3GH=((__POINTER *)result__Y3GH)[ 0];
+          if ((next__W3GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KYDH <<  1)) <=  4096)) {
+              next__W3GH=(void *)((unsigned long)result__Y3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KYDH)));
             } else {
-              next__CRAH=new_lab__ARJ(new_size__RM3G);
-            };
-            ((__POINTER *)next__CRAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DRAH)[ 0]=next__CRAH;
-          } else {
-            ((__POINTER *)result__ERAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CRAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ERAH=next__CRAH;
-          };
-        };
-        ptr__YEG=result__ERAH;
-      } else {
-        t__VM3G=((__UINTEGER_32 )typ_id__3EG);
-        a__UM3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__LRAH=(__UINTEGER_32)((__UINTEGER_32)(sz__0EG + a__UM3G) & (__UINTEGER_32)(~ a__UM3G));
-        ptr_table__IRAH=((__POINTER )(&(table_type[(t__VM3G)])));
-        lab_type__KRAH=(__UINTEGER_32)(t__VM3G |  1);
-        next__HRAH=((__POINTER )(NULL));
-        result__JRAH=((__POINTER *)ptr_table__IRAH)[ 0];
-        if ((result__JRAH == (void *)NULL)) {
-          result__JRAH=new_lab__ARJ(lab_type__KRAH);
-          next__HRAH=(void *)((unsigned long)result__JRAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRAH)));
-          ((__POINTER *)next__HRAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IRAH)[ 0]=next__HRAH;
-        } else {
-          next__HRAH=((__POINTER *)result__JRAH)[ 0];
-          if ((next__HRAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JRAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LRAH <<  1)) <=  4096)) {
-              next__HRAH=(void *)((unsigned long)result__JRAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRAH)));
+              next__W3GH=new_lab__MRJ(new_size__KYDH);
+            };
+            ((__POINTER *)next__W3GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__X3GH)[ 0]=next__W3GH;
+          } else {
+            ((__POINTER *)result__Y3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Y3GH=next__W3GH;
+          };
+        };
+        ptr__EFG=result__Y3GH;
+      } else {
+        t__OYDH=((__UINTEGER_32 )typ_id__JFG);
+        a__NYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__53GH=(__UINTEGER_32)((__UINTEGER_32)(sz__GFG + a__NYDH) & (__UINTEGER_32)(~ a__NYDH));
+        ptr_table__23GH=((__POINTER )(&(table_type[(t__OYDH)])));
+        lab_type__43GH=(__UINTEGER_32)(t__OYDH |  1);
+        next__13GH=((__POINTER )(NULL));
+        result__33GH=((__POINTER *)ptr_table__23GH)[ 0];
+        if ((result__33GH == (void *)NULL)) {
+          result__33GH=new_lab__MRJ(lab_type__43GH);
+          next__13GH=(void *)((unsigned long)result__33GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53GH)));
+          ((__POINTER *)next__13GH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__23GH)[ 0]=next__13GH;
+        } else {
+          next__13GH=((__POINTER *)result__33GH)[ 0];
+          if ((next__13GH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__33GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__53GH <<  1)) <=  4096)) {
+              next__13GH=(void *)((unsigned long)result__33GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53GH)));
             } else {
-              next__HRAH=new_lab__ARJ(lab_type__KRAH);
+              next__13GH=new_lab__MRJ(lab_type__43GH);
             };
-            ((__POINTER *)next__HRAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__IRAH)[ 0]=next__HRAH;
+            ((__POINTER *)next__13GH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__23GH)[ 0]=next__13GH;
           } else {
-            ((__POINTER *)result__JRAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HRAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__JRAH=next__HRAH;
+            ((__POINTER *)result__33GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__13GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__33GH=next__13GH;
           };
         };
-        ptr__YEG=result__JRAH;
+        ptr__EFG=result__33GH;
       };
-      result__XEG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__YEG);
-      *(result__XEG) = *(HASHED_SEToSTRING_CONSTANTo__);
+      result__DFG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__EFG);
+      *(result__DFG) = *(HASHED_SEToSTRING_CONSTANTo__);
     };
-    Self__QHT=((__HASHED_SEToSTRING_CONSTANTo *)result__XEG);
-    new_capacity__HHY=prime_number_ceiling__L41( 53);
-    Self__QHT->buckets__DEV=create__H23(new_capacity__HHY);
-    Self__QHT->capacity__4HT=new_capacity__HHY;
-    Self__QHT->count__MHY= 0;
-    short_local__3BC=result__XEG;
-    short__token__to__5AD((&__string_117), 1, 1);
+    Self__2HT=((__HASHED_SEToSTRING_CONSTANTo *)result__DFG);
+    new_capacity__THY=prime_number_ceiling__X41( 53);
+    Self__2HT->buckets__PEV=create__T23(new_capacity__THY);
+    Self__2HT->capacity__KIT=new_capacity__THY;
+    Self__2HT->count__YHY= 0;
+    short_local__JCC=result__DFG;
+    short__token__to__LBD((&__string_117), 1, 1);
   };
-  t__OXC=NULL;
-  read_space__RRD();
-  pos_sec__FXC=position__GBC;
-  old_derive__GXC=short_derive__VBC;
-  result__UUCH=read_word__EPF((&__string_4));
-  if (is_shorter__WY) {
-    if (result__UUCH) {
-      short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+  t__0XC=NULL;
+  read_space__3RD();
+  pos_sec__RXC=position__SBC;
+  old_derive__SXC=short_derive__BCC;
+  result__SBJH=read_word__QPF((&__string_4));
+  if (is_shorter__5Y) {
+    if (result__SBJH) {
+      short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
     };
   };
-  if ((! result__UUCH)) {
-    pos__4XOG=current_position__3WF();
-    put_error__text__4MG( 0,(&__string_215));
-    put_position__IOG(pos__4XOG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if ((! result__SBJH)) {
+    pos__2FUG=current_position__JXF();
+    put_error__text__KNG( 0,(&__string_225));
+    put_position__UOG(pos__2FUG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  key_comment_default__UBC=(&__string_127);
+  key_comment_default__ACC=(&__string_127);
   if (is_shorter2__VI) {
-    is_catch_comment__UWC=FALSE__;
+    is_catch_comment__AXC=FALSE__;
   };
-  result__WUCH=read_word__EPF((&__string_22));
-  if (is_shorter__WY) {
-    if (result__WUCH) {
+  result__UBJH=read_word__QPF((&__string_22));
+  if (is_shorter__5Y) {
+    if (result__UBJH) {
       if (((void *)(&__string_22) == (void *)(&__string_4))) {
-        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       } else {
-        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       };
     };
   };
-  if ((! result__WUCH)) {
-    pos__AYOG=current_position__3WF();
-    put_error__text__4MG( 0,(&__string_216));
-    put_position__IOG(pos__AYOG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if ((! result__UBJH)) {
+    pos__4FUG=current_position__JXF();
+    put_error__text__KNG( 0,(&__string_226));
+    put_position__UOG(pos__4FUG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  if ((! read_slot_header__GDE(TRUE__))) {
-    pos__CYOG=current_position__3WF();
-    put_error__text__4MG( 0,(&__string_217));
-    put_position__IOG(pos__CYOG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if ((! read_slot_header__SDE(TRUE__))) {
+    pos__AGUG=current_position__JXF();
+    put_error__text__KNG( 0,(&__string_227));
+    put_position__UOG(pos__AGUG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__GDE(FALSE__)) {
+  while (read_slot_header__SDE(FALSE__)) {
   };
-  while_do__R4E:
+  while_do__34E:
   {
-    result__NBE=read_word__EPF((&__string_4));
-    if (is_shorter__WY) {
-      if (result__NBE) {
-        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+    result__ZBE=read_word__QPF((&__string_4));
+    if (is_shorter__5Y) {
+      if (result__ZBE) {
+        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       };
     };
-    if (result__NBE) {
-      result__CGEB=FALSE__;
-      if ((! read_space__RRD())) {
-        __tmp__PGEB=TRUE__;
+    if (result__ZBE) {
+      result__OGEB=FALSE__;
+      if ((! read_space__3RD())) {
+        __tmp__1GEB=TRUE__;
       } else {
-        result__TKWG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__TKWG=((__CHARACTER )(( 0)));
+        result__R51G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__R51G=((__CHARACTER )(( 0)));
         } else {
-          result__TKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__R51G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        result__LD5=FALSE__;
-        if ((((__INTEGER_8 )result__TKWG) >= ((__INTEGER_8 )'A'))) {
-          result__LD5=(((__INTEGER_8 )result__TKWG) <= ((__INTEGER_8 )'Z'));
+        result__XD5=FALSE__;
+        if ((((__INTEGER_8 )result__R51G) >= ((__INTEGER_8 )'A'))) {
+          result__XD5=(((__INTEGER_8 )result__R51G) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__PGEB=(! result__LD5);
+        __tmp__1GEB=(! result__XD5);
       };
-      if (__tmp__PGEB) {
-        result__CGEB=FALSE__;
+      if (__tmp__1GEB) {
+        result__OGEB=FALSE__;
       } else {
-        ((__STRING *)string_tmp__VH)->count__KFC= 0;
-        result__UKWG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__UKWG=((__CHARACTER )(( 0)));
+        ((__STRING *)string_tmp__VH)->count__WFC= 0;
+        result__W51G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__W51G=((__CHARACTER )(( 0)));
         } else {
-          result__UKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__W51G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        add_last__NLT(string_tmp__VH,result__UKWG);
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__VKWG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__VKWG=((__CHARACTER )(( 0)));
+        add_last__ZLT(string_tmp__VH,result__W51G);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__151G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__151G=((__CHARACTER )(( 0)));
         } else {
-          result__VKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__151G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        result__WM3G=FALSE__;
-        if ((((__INTEGER_8 )result__VKWG) >= ((__INTEGER_8 )'a'))) {
-          result__WM3G=(((__INTEGER_8 )result__VKWG) <= ((__INTEGER_8 )'z'));
+        result__PYDH=FALSE__;
+        if ((((__INTEGER_8 )result__151G) >= ((__INTEGER_8 )'a'))) {
+          result__PYDH=(((__INTEGER_8 )result__151G) <= ((__INTEGER_8 )'z'));
         };
-        if (result__WM3G) {
-          result__WKWG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__WKWG=((__CHARACTER )(( 0)));
+        if (result__PYDH) {
+          result__AA2G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__AA2G=((__CHARACTER )(( 0)));
           } else {
-            result__WKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__AA2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__WKWG);
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          while_do__5CFF:
+          add_last__ZLT(string_tmp__VH,result__AA2G);
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          while_do__ZXFF:
           {
-            result__XKWG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__XKWG=((__CHARACTER )(( 0)));
+            result__FA2G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__FA2G=((__CHARACTER )(( 0)));
             } else {
-              result__XKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__FA2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__XKWG != ((__CHARACTER )(( 0))))) {
-              result__YKWG='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__YKWG=((__CHARACTER )(( 0)));
+            if ((result__FA2G != ((__CHARACTER )(( 0))))) {
+              result__OA2G='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__OA2G=((__CHARACTER )(( 0)));
               } else {
-                result__YKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__OA2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              result__KX5=FALSE__;
-              if ((((__INTEGER_8 )result__YKWG) >= ((__INTEGER_8 )'a'))) {
-                result__KX5=(((__INTEGER_8 )result__YKWG) <= ((__INTEGER_8 )'z'));
+              result__WX5=FALSE__;
+              if ((((__INTEGER_8 )result__OA2G) >= ((__INTEGER_8 )'a'))) {
+                result__WX5=(((__INTEGER_8 )result__OA2G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__KX5) {
-                __tmp__HIEB=TRUE__;
+              if (result__WX5) {
+                __tmp__TIEB=TRUE__;
               } else {
-                result__ZKWG='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__ZKWG=((__CHARACTER )(( 0)));
+                result__TA2G='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__TA2G=((__CHARACTER )(( 0)));
                 } else {
-                  result__ZKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__TA2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                result__BVAB=FALSE__;
-                if ((((__INTEGER_8 )result__ZKWG) >= ((__INTEGER_8 )'0'))) {
-                  result__BVAB=(((__INTEGER_8 )result__ZKWG) <= ((__INTEGER_8 )'9'));
+                result__NVAB=FALSE__;
+                if ((((__INTEGER_8 )result__TA2G) >= ((__INTEGER_8 )'0'))) {
+                  result__NVAB=(((__INTEGER_8 )result__TA2G) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__HIEB=result__BVAB;
+                __tmp__TIEB=result__NVAB;
               };
-              if (__tmp__HIEB) {
-                __tmp__IIEB=TRUE__;
+              if (__tmp__TIEB) {
+                __tmp__UIEB=TRUE__;
               } else {
-                result__0KWG='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__0KWG=((__CHARACTER )(( 0)));
+                result__YA2G='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__YA2G=((__CHARACTER )(( 0)));
                 } else {
-                  result__0KWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__YA2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                __tmp__IIEB=(result__0KWG == '_');
+                __tmp__UIEB=(result__YA2G == '_');
               };
-              __tmp__LIEB=__tmp__IIEB;
+              __tmp__XIEB=__tmp__UIEB;
             } else {
-              __tmp__LIEB=FALSE__;
+              __tmp__XIEB=FALSE__;
             };
-            if (__tmp__LIEB) {
-              result__1KWG='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__1KWG=((__CHARACTER )(( 0)));
+            if (__tmp__XIEB) {
+              result__3A2G='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__3A2G=((__CHARACTER )(( 0)));
               } else {
-                result__1KWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__3A2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              add_last__NLT(string_tmp__VH,result__1KWG);
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              goto while_do__5CFF;
+              add_last__ZLT(string_tmp__VH,result__3A2G);
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              goto while_do__ZXFF;
             };
           };
-          last_string__2ZC=get__2VB(string_tmp__VH);
-          result__CGEB=TRUE__;
-          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          last_string__I0C=get__IWB(string_tmp__VH);
+          result__OGEB=TRUE__;
+          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         } else {
-          position__GBC=(__INTEGER)(position__GBC -  1);
-          result__CGEB=FALSE__;
+          position__SBC=(__INTEGER)(position__SBC -  1);
+          result__OGEB=FALSE__;
         };
       };
-      if (result__CGEB) {
-        n__SSOB=last_string__2ZC;
-        if ((! (((((((((void *)n__SSOB == (void *)(&__string_23)) || ((void *)n__SSOB == (void *)(&__string_24))) || ((void *)n__SSOB == (void *)(&__string_25))) || ((void *)n__SSOB == (void *)(&__string_26))) || ((void *)n__SSOB == (void *)(&__string_27))) || ((void *)n__SSOB == (void *)(&__string_28))) || ((void *)n__SSOB == (void *)(&__string_29))) || ((void *)n__SSOB == (void *)(&__string_30))))) {
-          pos__NYOG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_218));
-          put_position__IOG(pos__NYOG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (result__OGEB) {
+        n__4SOB=last_string__I0C;
+        if ((! (((((((((void *)n__4SOB == (void *)(&__string_23)) || ((void *)n__4SOB == (void *)(&__string_24))) || ((void *)n__4SOB == (void *)(&__string_25))) || ((void *)n__4SOB == (void *)(&__string_26))) || ((void *)n__4SOB == (void *)(&__string_27))) || ((void *)n__4SOB == (void *)(&__string_28))) || ((void *)n__4SOB == (void *)(&__string_29))) || ((void *)n__4SOB == (void *)(&__string_30))))) {
+          pos__LGUG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_228));
+          put_position__UOG(pos__LGUG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        last_section__L0C=get_name__OUOB(last_string__2ZC);
-        if (((void *)((__SECTION_ *)last_section__L0C)->name__WYDC == (void *)(&__string_28))) {
-          __tmp__41C=TRUE__;
+        last_section__X0C=get_name__0UOB(last_string__I0C);
+        if (((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_28))) {
+          __tmp__K2C=TRUE__;
         } else {
-          Self__2KWG=((__SECTION_ *)last_section__L0C);
-          if (((((void *)Self__2KWG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__2KWG->name__WYDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__3AC)->last_slot__C1C != (void *)NULL))) {
-            __tmp__L1C=((__PROTOTYPE *)object__3AC)->last_slot__C1C;
-            if (((struct ___OBJ *)__tmp__L1C)->__id==__ITM_SLOT__) {
-              __tmp__N1C=((__ITM_SLOT *)__tmp__L1C)->id_section__M1C;
+          Self__CB2G=((__SECTION_ *)last_section__X0C);
+          if (((((void *)Self__CB2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__CB2G->name__CZDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__JBC)->last_slot__O1C != (void *)NULL))) {
+            __tmp__X1C=((__PROTOTYPE *)object__JBC)->last_slot__O1C;
+            if (((struct ___OBJ *)__tmp__X1C)->__id==__ITM_SLOT__) {
+              __tmp__Z1C=((__ITM_SLOT *)__tmp__X1C)->id_section__Y1C;
             } else {
-              __tmp__N1C=((__ITM_SLOT_OPERATOR *)__tmp__L1C)->parent_itm_slot__CU5B.id_section__M1C;
+              __tmp__Z1C=((__ITM_SLOT_OPERATOR *)__tmp__X1C)->parent_itm_slot__OU5B.id_section__Y1C;
             };
-            Self__3KWG=((__SECTION_ *)__tmp__N1C);
-            __tmp__T1C=(! (((void *)Self__3KWG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__3KWG->name__WYDC == (void *)(&__string_24))));
+            Self__DB2G=((__SECTION_ *)__tmp__Z1C);
+            __tmp__51C=(! (((void *)Self__DB2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__DB2G->name__CZDC == (void *)(&__string_24))));
           } else {
-            __tmp__T1C=FALSE__;
+            __tmp__51C=FALSE__;
           };
-          if (__tmp__T1C) {
-            pos__PYOG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_219));
-            put_position__IOG(pos__PYOG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if (__tmp__51C) {
+            pos__NGUG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_229));
+            put_position__UOG(pos__NGUG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          __tmp__41C=__tmp__T1C;
+          __tmp__K2C=__tmp__51C;
         };
-        if ((! __tmp__41C)) {
-          if ((((((void *)((__SECTION_ *)last_section__L0C)->name__WYDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__3AC)->type_style__L2C == (void *)(&__string_9))) && ((void *)((__PROTOTYPE *)object__3AC)->parent_named__5.name__LI != (void *)(&__string_42))) && ((void *)((__PROTOTYPE *)object__3AC)->parent_named__5.name__LI != (void *)(&__string_43)))) {
-            pos__SYOG=current_position__3WF();
-            put_error__text__4MG( 2,(&__string_220));
-            put_position__IOG(pos__SYOG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        if ((! __tmp__K2C)) {
+          if ((((((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__JBC)->type_style__X2C == (void *)(&__string_9))) && ((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI != (void *)(&__string_42))) && ((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI != (void *)(&__string_43)))) {
+            pos__QGUG=current_position__JXF();
+            put_error__text__KNG( 2,(&__string_230));
+            put_position__UOG(pos__QGUG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
         };
       } else {
-        t__OXC=read_type_list__2LO(PARSER__,TRUE__);
-        if (((void *)t__OXC == (void *)NULL)) {
-          pos__UYOG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_218));
-          put_position__IOG(pos__UYOG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        t__0XC=read_type_list__IMO(PARSER__,TRUE__);
+        if (((void *)t__0XC == (void *)NULL)) {
+          pos__SGUG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_228));
+          put_position__UOG(pos__SGUG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        Self__JQEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__SWOB);
-        k__KQEC=t__OXC;
-        result__VQEC=NULL;
-        node__UQEC=((void **)Self__JQEC->buckets__2QEC)[(__INTEGER)(hash_code__D50(t__OXC) % Self__JQEC->capacity__XQEC)];
-        while ((! (((void *)node__UQEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__UQEC)->key__IREC == (void *)k__KQEC)))) {
-          node__UQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__UQEC)->next__TREC;
-        };
-        if (((void *)node__UQEC != (void *)NULL)) {
-          result__VQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__UQEC)->item__1REC;
-        };
-        result__OWOB=result__VQEC;
-        if (((void *)result__VQEC == (void *)NULL)) {
-          result__MRAH=NULL;
-          ptr__NRAH=((__POINTER )(NULL));
-          typ_id__ORAH= 0;
-          sz__PRAH=((__UINTEGER_32 )sizeof(__SECTION_));
-          if ((sz__PRAH ==  0)) {
-            result__MRAH=SECTION___;
-          } else {
-            typ_id__ORAH=__SECTION___;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__PRAH);
-            if ((typ_id__ORAH == (__INTEGER)(-  1))) {
-              a__QRAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__RRAH=(__UINTEGER_32)((__UINTEGER_32)(sz__PRAH + a__QRAH) & (__UINTEGER_32)(~ a__QRAH));
-              ptr_table__VRAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RRAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__URAH=((__POINTER )(NULL));
-              result__WRAH=((__POINTER *)ptr_table__VRAH)[ 0];
-              if ((result__WRAH == (void *)NULL)) {
-                result__WRAH=new_lab__ARJ(new_size__RRAH);
-                next__URAH=(void *)((unsigned long)result__WRAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RRAH)));
-                ((__POINTER *)next__URAH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VRAH)[ 0]=next__URAH;
+        Self__VQEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__4WOB);
+        k__WQEC=t__0XC;
+        result__BREC=NULL;
+        node__AREC=((void **)Self__VQEC->buckets__IREC)[(__INTEGER)(hash_code__P50(t__0XC) % Self__VQEC->capacity__DREC)];
+        while ((! (((void *)node__AREC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__AREC)->key__UREC == (void *)k__WQEC)))) {
+          node__AREC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__AREC)->next__5REC;
+        };
+        if (((void *)node__AREC != (void *)NULL)) {
+          result__BREC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__AREC)->item__HSEC;
+        };
+        result__0WOB=result__BREC;
+        if (((void *)result__BREC == (void *)NULL)) {
+          result__A4GH=NULL;
+          ptr__B4GH=((__POINTER )(NULL));
+          typ_id__C4GH= 0;
+          sz__D4GH=((__UINTEGER_32 )sizeof(__SECTION_));
+          if ((sz__D4GH ==  0)) {
+            result__A4GH=SECTION___;
+          } else {
+            typ_id__C4GH=__SECTION___;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__D4GH);
+            if ((typ_id__C4GH == (__INTEGER)(-  1))) {
+              a__E4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__F4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__D4GH + a__E4GH) & (__UINTEGER_32)(~ a__E4GH));
+              ptr_table__J4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__I4GH=((__POINTER )(NULL));
+              result__K4GH=((__POINTER *)ptr_table__J4GH)[ 0];
+              if ((result__K4GH == (void *)NULL)) {
+                result__K4GH=new_lab__MRJ(new_size__F4GH);
+                next__I4GH=(void *)((unsigned long)result__K4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4GH)));
+                ((__POINTER *)next__I4GH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__J4GH)[ 0]=next__I4GH;
               } else {
-                next__URAH=((__POINTER *)result__WRAH)[ 0];
-                if ((next__URAH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WRAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RRAH <<  1)) <=  4096)) {
-                    next__URAH=(void *)((unsigned long)result__WRAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RRAH)));
+                next__I4GH=((__POINTER *)result__K4GH)[ 0];
+                if ((next__I4GH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__F4GH <<  1)) <=  4096)) {
+                    next__I4GH=(void *)((unsigned long)result__K4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4GH)));
                   } else {
-                    next__URAH=new_lab__ARJ(new_size__RRAH);
+                    next__I4GH=new_lab__MRJ(new_size__F4GH);
                   };
-                  ((__POINTER *)next__URAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__VRAH)[ 0]=next__URAH;
+                  ((__POINTER *)next__I4GH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__J4GH)[ 0]=next__I4GH;
                 } else {
-                  ((__POINTER *)result__WRAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__URAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__WRAH=next__URAH;
+                  ((__POINTER *)result__K4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__K4GH=next__I4GH;
                 };
               };
-              ptr__NRAH=result__WRAH;
+              ptr__B4GH=result__K4GH;
             } else {
-              t__SRAH=((__UINTEGER_32 )typ_id__ORAH);
-              a__TRAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__3RAH=(__UINTEGER_32)((__UINTEGER_32)(sz__PRAH + a__TRAH) & (__UINTEGER_32)(~ a__TRAH));
-              ptr_table__0RAH=((__POINTER )(&(table_type[(t__SRAH)])));
-              lab_type__2RAH=(__UINTEGER_32)(t__SRAH |  1);
-              next__ZRAH=((__POINTER )(NULL));
-              result__1RAH=((__POINTER *)ptr_table__0RAH)[ 0];
-              if ((result__1RAH == (void *)NULL)) {
-                result__1RAH=new_lab__ARJ(lab_type__2RAH);
-                next__ZRAH=(void *)((unsigned long)result__1RAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3RAH)));
-                ((__POINTER *)next__ZRAH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0RAH)[ 0]=next__ZRAH;
+              t__G4GH=((__UINTEGER_32 )typ_id__C4GH);
+              a__H4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__R4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__D4GH + a__H4GH) & (__UINTEGER_32)(~ a__H4GH));
+              ptr_table__O4GH=((__POINTER )(&(table_type[(t__G4GH)])));
+              lab_type__Q4GH=(__UINTEGER_32)(t__G4GH |  1);
+              next__N4GH=((__POINTER )(NULL));
+              result__P4GH=((__POINTER *)ptr_table__O4GH)[ 0];
+              if ((result__P4GH == (void *)NULL)) {
+                result__P4GH=new_lab__MRJ(lab_type__Q4GH);
+                next__N4GH=(void *)((unsigned long)result__P4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R4GH)));
+                ((__POINTER *)next__N4GH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__O4GH)[ 0]=next__N4GH;
               } else {
-                next__ZRAH=((__POINTER *)result__1RAH)[ 0];
-                if ((next__ZRAH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1RAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3RAH <<  1)) <=  4096)) {
-                    next__ZRAH=(void *)((unsigned long)result__1RAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3RAH)));
+                next__N4GH=((__POINTER *)result__P4GH)[ 0];
+                if ((next__N4GH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__R4GH <<  1)) <=  4096)) {
+                    next__N4GH=(void *)((unsigned long)result__P4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R4GH)));
                   } else {
-                    next__ZRAH=new_lab__ARJ(lab_type__2RAH);
+                    next__N4GH=new_lab__MRJ(lab_type__Q4GH);
                   };
-                  ((__POINTER *)next__ZRAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0RAH)[ 0]=next__ZRAH;
+                  ((__POINTER *)next__N4GH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__O4GH)[ 0]=next__N4GH;
                 } else {
-                  ((__POINTER *)result__1RAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZRAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__1RAH=next__ZRAH;
+                  ((__POINTER *)result__P4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__P4GH=next__N4GH;
                 };
               };
-              ptr__NRAH=result__1RAH;
-            };
-            result__MRAH=((__SECTION_ *)ptr__NRAH);
-            *(result__MRAH) = *(SECTION___);
-          };
-          result__OWOB=result__MRAH;
-          ((__SECTION_ *)result__MRAH)->name__WYDC=NULL;
-          Self__B0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__SWOB);
-          k__D0FC=t__OXC;
-          h__K0FC=hash_code__D50(t__OXC);
-          idx__L0FC=(__INTEGER)(h__K0FC % Self__B0FC->capacity__XQEC);
-          node__M0FC=((void **)Self__B0FC->buckets__2QEC)[idx__L0FC];
-          while ((! (((void *)node__M0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__M0FC)->key__IREC == (void *)k__D0FC)))) {
-            node__M0FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__M0FC)->next__TREC;
-          };
-          if (((void *)node__M0FC == (void *)NULL)) {
-            if ((Self__B0FC->capacity__XQEC == Self__B0FC->count__N1FC)) {
-              idx__CDID= 0;
-              node1__GDID=NULL;
-              node2__HDID=NULL;
-              old_buckets__FDID=Self__B0FC->buckets__2QEC;
-              new_capacity__DDID=prime_number_ceiling__L41((__INTEGER)(Self__B0FC->capacity__XQEC +  1));
-              Self__B0FC->buckets__2QEC=create__UAYC(new_capacity__DDID);
-              i__EDID=(__INTEGER)(Self__B0FC->capacity__XQEC -  1);
-              Self__B0FC->capacity__XQEC=new_capacity__DDID;
-              while ((i__EDID >=  0)) {
-                node1__GDID=((void **)old_buckets__FDID)[i__EDID];
-                while (((void *)node1__GDID != (void *)NULL)) {
-                  node2__HDID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__GDID)->next__TREC;
-                  idx__CDID=(__INTEGER)(hash_code__D50(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__GDID)->key__IREC) % Self__B0FC->capacity__XQEC);
-                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__GDID)->next__TREC=((void **)Self__B0FC->buckets__2QEC)[idx__CDID];
-                  ((void **)Self__B0FC->buckets__2QEC)[idx__CDID]=node1__GDID;
-                  node1__GDID=node2__HDID;
+              ptr__B4GH=result__P4GH;
+            };
+            result__A4GH=((__SECTION_ *)ptr__B4GH);
+            *(result__A4GH) = *(SECTION___);
+          };
+          result__0WOB=result__A4GH;
+          ((__SECTION_ *)result__A4GH)->name__CZDC=NULL;
+          Self__N0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__4WOB);
+          k__P0FC=t__0XC;
+          h__W0FC=hash_code__P50(t__0XC);
+          idx__X0FC=(__INTEGER)(h__W0FC % Self__N0FC->capacity__DREC);
+          node__Y0FC=((void **)Self__N0FC->buckets__IREC)[idx__X0FC];
+          while ((! (((void *)node__Y0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Y0FC)->key__UREC == (void *)k__P0FC)))) {
+            node__Y0FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Y0FC)->next__5REC;
+          };
+          if (((void *)node__Y0FC == (void *)NULL)) {
+            if ((Self__N0FC->capacity__DREC == Self__N0FC->count__Z1FC)) {
+              idx__ODID= 0;
+              node1__SDID=NULL;
+              node2__TDID=NULL;
+              old_buckets__RDID=Self__N0FC->buckets__IREC;
+              new_capacity__PDID=prime_number_ceiling__X41((__INTEGER)(Self__N0FC->capacity__DREC +  1));
+              Self__N0FC->buckets__IREC=create__ABYC(new_capacity__PDID);
+              i__QDID=(__INTEGER)(Self__N0FC->capacity__DREC -  1);
+              Self__N0FC->capacity__DREC=new_capacity__PDID;
+              while ((i__QDID >=  0)) {
+                node1__SDID=((void **)old_buckets__RDID)[i__QDID];
+                while (((void *)node1__SDID != (void *)NULL)) {
+                  node2__TDID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__SDID)->next__5REC;
+                  idx__ODID=(__INTEGER)(hash_code__P50(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__SDID)->key__UREC) % Self__N0FC->capacity__DREC);
+                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__SDID)->next__5REC=((void **)Self__N0FC->buckets__IREC)[idx__ODID];
+                  ((void **)Self__N0FC->buckets__IREC)[idx__ODID]=node1__SDID;
+                  node1__SDID=node2__TDID;
                 };
-                i__EDID=(__INTEGER)(i__EDID -  1);
+                i__QDID=(__INTEGER)(i__QDID -  1);
               };
-              idx__L0FC=(__INTEGER)(h__K0FC % Self__B0FC->capacity__XQEC);
-            };
-            __tmp__01FC=((void **)Self__B0FC->buckets__2QEC)[idx__L0FC];
-            result__LFID=NULL;
-            ptr__MFID=((__POINTER )(NULL));
-            typ_id__RFID= 0;
-            sz__OFID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
-            if ((sz__OFID ==  0)) {
-              result__LFID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              idx__X0FC=(__INTEGER)(h__W0FC % Self__N0FC->capacity__DREC);
+            };
+            __tmp__G2FC=((void **)Self__N0FC->buckets__IREC)[idx__X0FC];
+            result__XFID=NULL;
+            ptr__YFID=((__POINTER )(NULL));
+            typ_id__3FID= 0;
+            sz__0FID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+            if ((sz__0FID ==  0)) {
+              result__XFID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
             } else {
-              typ_id__RFID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
-              clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__OFID);
-              if ((typ_id__RFID == (__INTEGER)(-  1))) {
-                a__GN3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__HN3G=(__UINTEGER_32)((__UINTEGER_32)(sz__OFID + a__GN3G) & (__UINTEGER_32)(~ a__GN3G));
-                ptr_table__5RAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HN3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__4RAH=((__POINTER )(NULL));
-                result__ASAH=((__POINTER *)ptr_table__5RAH)[ 0];
-                if ((result__ASAH == (void *)NULL)) {
-                  result__ASAH=new_lab__ARJ(new_size__HN3G);
-                  next__4RAH=(void *)((unsigned long)result__ASAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HN3G)));
-                  ((__POINTER *)next__4RAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__5RAH)[ 0]=next__4RAH;
+              typ_id__3FID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0FID);
+              if ((typ_id__3FID == (__INTEGER)(-  1))) {
+                a__5YDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__AZDH=(__UINTEGER_32)((__UINTEGER_32)(sz__0FID + a__5YDH) & (__UINTEGER_32)(~ a__5YDH));
+                ptr_table__T4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AZDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__S4GH=((__POINTER )(NULL));
+                result__U4GH=((__POINTER *)ptr_table__T4GH)[ 0];
+                if ((result__U4GH == (void *)NULL)) {
+                  result__U4GH=new_lab__MRJ(new_size__AZDH);
+                  next__S4GH=(void *)((unsigned long)result__U4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AZDH)));
+                  ((__POINTER *)next__S4GH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__T4GH)[ 0]=next__S4GH;
                 } else {
-                  next__4RAH=((__POINTER *)result__ASAH)[ 0];
-                  if ((next__4RAH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ASAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HN3G <<  1)) <=  4096)) {
-                      next__4RAH=(void *)((unsigned long)result__ASAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HN3G)));
+                  next__S4GH=((__POINTER *)result__U4GH)[ 0];
+                  if ((next__S4GH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AZDH <<  1)) <=  4096)) {
+                      next__S4GH=(void *)((unsigned long)result__U4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AZDH)));
                     } else {
-                      next__4RAH=new_lab__ARJ(new_size__HN3G);
+                      next__S4GH=new_lab__MRJ(new_size__AZDH);
                     };
-                    ((__POINTER *)next__4RAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__5RAH)[ 0]=next__4RAH;
+                    ((__POINTER *)next__S4GH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__T4GH)[ 0]=next__S4GH;
                   } else {
-                    ((__POINTER *)result__ASAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__ASAH=next__4RAH;
+                    ((__POINTER *)result__U4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__U4GH=next__S4GH;
                   };
                 };
-                ptr__MFID=result__ASAH;
+                ptr__YFID=result__U4GH;
               } else {
-                t__LN3G=((__UINTEGER_32 )typ_id__RFID);
-                a__KN3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__HSAH=(__UINTEGER_32)((__UINTEGER_32)(sz__OFID + a__KN3G) & (__UINTEGER_32)(~ a__KN3G));
-                ptr_table__ESAH=((__POINTER )(&(table_type[(t__LN3G)])));
-                lab_type__GSAH=(__UINTEGER_32)(t__LN3G |  1);
-                next__DSAH=((__POINTER )(NULL));
-                result__FSAH=((__POINTER *)ptr_table__ESAH)[ 0];
-                if ((result__FSAH == (void *)NULL)) {
-                  result__FSAH=new_lab__ARJ(lab_type__GSAH);
-                  next__DSAH=(void *)((unsigned long)result__FSAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSAH)));
-                  ((__POINTER *)next__DSAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ESAH)[ 0]=next__DSAH;
+                t__EZDH=((__UINTEGER_32 )typ_id__3FID);
+                a__DZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__14GH=(__UINTEGER_32)((__UINTEGER_32)(sz__0FID + a__DZDH) & (__UINTEGER_32)(~ a__DZDH));
+                ptr_table__Y4GH=((__POINTER )(&(table_type[(t__EZDH)])));
+                lab_type__04GH=(__UINTEGER_32)(t__EZDH |  1);
+                next__X4GH=((__POINTER )(NULL));
+                result__Z4GH=((__POINTER *)ptr_table__Y4GH)[ 0];
+                if ((result__Z4GH == (void *)NULL)) {
+                  result__Z4GH=new_lab__MRJ(lab_type__04GH);
+                  next__X4GH=(void *)((unsigned long)result__Z4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__14GH)));
+                  ((__POINTER *)next__X4GH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__Y4GH)[ 0]=next__X4GH;
                 } else {
-                  next__DSAH=((__POINTER *)result__FSAH)[ 0];
-                  if ((next__DSAH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FSAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HSAH <<  1)) <=  4096)) {
-                      next__DSAH=(void *)((unsigned long)result__FSAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSAH)));
+                  next__X4GH=((__POINTER *)result__Z4GH)[ 0];
+                  if ((next__X4GH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__14GH <<  1)) <=  4096)) {
+                      next__X4GH=(void *)((unsigned long)result__Z4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__14GH)));
                     } else {
-                      next__DSAH=new_lab__ARJ(lab_type__GSAH);
+                      next__X4GH=new_lab__MRJ(lab_type__04GH);
                     };
-                    ((__POINTER *)next__DSAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__ESAH)[ 0]=next__DSAH;
+                    ((__POINTER *)next__X4GH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__Y4GH)[ 0]=next__X4GH;
                   } else {
-                    ((__POINTER *)result__FSAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DSAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__FSAH=next__DSAH;
+                    ((__POINTER *)result__Z4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__Z4GH=next__X4GH;
                   };
                 };
-                ptr__MFID=result__FSAH;
+                ptr__YFID=result__Z4GH;
               };
-              result__LFID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__MFID);
-              *(result__LFID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__XFID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__YFID);
+              *(result__XFID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            Self__3DTD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__LFID);
-            Self__3DTD->item__1REC=result__MRAH;
-            Self__3DTD->key__IREC=t__OXC;
-            Self__3DTD->next__TREC=__tmp__01FC;
-            node__M0FC=result__LFID;
-            ((void **)Self__B0FC->buckets__2QEC)[idx__L0FC]=result__LFID;
-            Self__B0FC->count__N1FC=(__INTEGER)(Self__B0FC->count__N1FC +  1);
+            Self__JETD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__XFID);
+            Self__JETD->item__HSEC=result__A4GH;
+            Self__JETD->key__UREC=t__0XC;
+            Self__JETD->next__5REC=__tmp__G2FC;
+            node__Y0FC=result__XFID;
+            ((void **)Self__N0FC->buckets__IREC)[idx__X0FC]=result__XFID;
+            Self__N0FC->count__Z1FC=(__INTEGER)(Self__N0FC->count__Z1FC +  1);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__M0FC)->item__1REC=result__MRAH;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Y0FC)->item__HSEC=result__A4GH;
           };
         };
-        last_section__L0C=result__OWOB;
+        last_section__X0C=result__0WOB;
       };
       do {
-        result__BXOB=FALSE__;
-        t__CXOB=NULL;
-        lt__DXOB=NULL;
-        affect__FXOB='\0';
-        old_pos__GXOB= 0;
-        old_derive__HXOB= 0;
-        s__IXOB=NULL;
-        style__EXOB=read_style__LRF();
-        if ((style__EXOB != ' ')) {
-          key_comment_default__UBC=(&__string_128);
+        result__NXOB=FALSE__;
+        t__OXOB=NULL;
+        lt__PXOB=NULL;
+        affect__RXOB='\0';
+        old_pos__SXOB= 0;
+        old_derive__TXOB= 0;
+        s__UXOB=NULL;
+        style__QXOB=read_style__XRF();
+        if ((style__QXOB != ' ')) {
+          key_comment_default__ACC=(&__string_128);
           if (is_shorter2__VI) {
-            is_catch_comment__UWC=TRUE__;
-            ((__STRING *)last_comment__O0D)->count__KFC= 0;
-          };
-          result__BXOB=TRUE__;
-          result__UBZB=NULL;
-          result__EU1B=NULL;
-          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__KU1B)->parent_arrayed_collection__JU1B.upper__ETGC <  0)) {
-            result__EU1B=create_with_capacity__FL5B( 16);
-          } else {
-            Self__KCZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__KU1B);
-            result__EU1B=((void **)Self__KCZC->parent_arrayed_collection__JU1B.storage__XKHC)[Self__KCZC->parent_arrayed_collection__JU1B.upper__ETGC];
-            Self__ADZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__KU1B);
-            Self__ADZC->parent_arrayed_collection__JU1B.upper__ETGC=(__INTEGER)(Self__ADZC->parent_arrayed_collection__JU1B.upper__ETGC -  1);
-          };
-          arg__TBZB=read_loc_arg__with_self__2DHB(PARSER__,FALSE__,TRUE__);
-          if (((void *)arg__TBZB == (void *)NULL)) {
-            result__ISAH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__ISAH=FALSE__;
+            is_catch_comment__AXC=TRUE__;
+            ((__STRING *)last_comment__00D)->count__WFC= 0;
+          };
+          result__NXOB=TRUE__;
+          result__ACZB=NULL;
+          result__QU1B=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B)->parent_arrayed_collection__VU1B.upper__QTGC <  0)) {
+            result__QU1B=create_with_capacity__RL5B( 16);
+          } else {
+            Self__WCZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B);
+            result__QU1B=((void **)Self__WCZC->parent_arrayed_collection__VU1B.storage__DLHC)[Self__WCZC->parent_arrayed_collection__VU1B.upper__QTGC];
+            Self__MDZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B);
+            Self__MDZC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(Self__MDZC->parent_arrayed_collection__VU1B.upper__QTGC -  1);
+          };
+          arg__5BZB=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,TRUE__);
+          if (((void *)arg__5BZB == (void *)NULL)) {
+            result__24GH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__24GH=FALSE__;
             } else {
-              result__JSAH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__JSAH=((__CHARACTER )(( 0)));
+              result__34GH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__34GH=((__CHARACTER )(( 0)));
               } else {
-                result__JSAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__34GH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__JSAH == '\'')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__ISAH=TRUE__;
+              if ((result__34GH == '\'')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__24GH=TRUE__;
               };
             };
-            if (result__ISAH) {
-              result__UBZB=read_slot_operator__ZT5B(result__EU1B);
+            if (result__24GH) {
+              result__ACZB=read_slot_operator__FU5B(result__QU1B);
             } else {
-              p__USAH=current_position__3WF();
-              result__LSAH=NULL;
-              ptr__MSAH=((__POINTER )(NULL));
-              typ_id__NSAH= 0;
-              sz__OSAH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-              if ((sz__OSAH ==  0)) {
-                result__LSAH=ITM_ARG__;
+              p__I5GH=current_position__JXF();
+              result__54GH=NULL;
+              ptr__A5GH=((__POINTER )(NULL));
+              typ_id__B5GH= 0;
+              sz__C5GH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+              if ((sz__C5GH ==  0)) {
+                result__54GH=ITM_ARG__;
               } else {
-                typ_id__NSAH=-1;
-                clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__OSAH);
-                if ((typ_id__NSAH == (__INTEGER)(-  1))) {
-                  a__PSAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__QSAH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSAH + a__PSAH) & (__UINTEGER_32)(~ a__PSAH));
-                  ptr_table__YSAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QSAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                  next__XSAH=((__POINTER )(NULL));
-                  result__ZSAH=((__POINTER *)ptr_table__YSAH)[ 0];
-                  if ((result__ZSAH == (void *)NULL)) {
-                    result__ZSAH=new_lab__ARJ(new_size__QSAH);
-                    next__XSAH=(void *)((unsigned long)result__ZSAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QSAH)));
-                    ((__POINTER *)next__XSAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__YSAH)[ 0]=next__XSAH;
+                typ_id__B5GH=-1;
+                clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__C5GH);
+                if ((typ_id__B5GH == (__INTEGER)(-  1))) {
+                  a__D5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__E5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5GH + a__D5GH) & (__UINTEGER_32)(~ a__D5GH));
+                  ptr_table__M5GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__L5GH=((__POINTER )(NULL));
+                  result__N5GH=((__POINTER *)ptr_table__M5GH)[ 0];
+                  if ((result__N5GH == (void *)NULL)) {
+                    result__N5GH=new_lab__MRJ(new_size__E5GH);
+                    next__L5GH=(void *)((unsigned long)result__N5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5GH)));
+                    ((__POINTER *)next__L5GH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__M5GH)[ 0]=next__L5GH;
                   } else {
-                    next__XSAH=((__POINTER *)result__ZSAH)[ 0];
-                    if ((next__XSAH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZSAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__QSAH <<  1)) <=  4096)) {
-                        next__XSAH=(void *)((unsigned long)result__ZSAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QSAH)));
+                    next__L5GH=((__POINTER *)result__N5GH)[ 0];
+                    if ((next__L5GH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N5GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__E5GH <<  1)) <=  4096)) {
+                        next__L5GH=(void *)((unsigned long)result__N5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5GH)));
                       } else {
-                        next__XSAH=new_lab__ARJ(new_size__QSAH);
+                        next__L5GH=new_lab__MRJ(new_size__E5GH);
                       };
-                      ((__POINTER *)next__XSAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__YSAH)[ 0]=next__XSAH;
+                      ((__POINTER *)next__L5GH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__M5GH)[ 0]=next__L5GH;
                     } else {
-                      ((__POINTER *)result__ZSAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XSAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__ZSAH=next__XSAH;
+                      ((__POINTER *)result__N5GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__N5GH=next__L5GH;
                     };
                   };
-                  ptr__MSAH=result__ZSAH;
+                  ptr__A5GH=result__N5GH;
                 } else {
-                  t__RSAH=((__UINTEGER_32 )typ_id__NSAH);
-                  a__SSAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__ATAH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSAH + a__SSAH) & (__UINTEGER_32)(~ a__SSAH));
-                  ptr_table__3SAH=((__POINTER )(&(table_type[(t__RSAH)])));
-                  lab_type__5SAH=(__UINTEGER_32)(t__RSAH |  1);
-                  next__2SAH=((__POINTER )(NULL));
-                  result__4SAH=((__POINTER *)ptr_table__3SAH)[ 0];
-                  if ((result__4SAH == (void *)NULL)) {
-                    result__4SAH=new_lab__ARJ(lab_type__5SAH);
-                    next__2SAH=(void *)((unsigned long)result__4SAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATAH)));
-                    ((__POINTER *)next__2SAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__3SAH)[ 0]=next__2SAH;
+                  t__F5GH=((__UINTEGER_32 )typ_id__B5GH);
+                  a__G5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__U5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5GH + a__G5GH) & (__UINTEGER_32)(~ a__G5GH));
+                  ptr_table__R5GH=((__POINTER )(&(table_type[(t__F5GH)])));
+                  lab_type__T5GH=(__UINTEGER_32)(t__F5GH |  1);
+                  next__Q5GH=((__POINTER )(NULL));
+                  result__S5GH=((__POINTER *)ptr_table__R5GH)[ 0];
+                  if ((result__S5GH == (void *)NULL)) {
+                    result__S5GH=new_lab__MRJ(lab_type__T5GH);
+                    next__Q5GH=(void *)((unsigned long)result__S5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U5GH)));
+                    ((__POINTER *)next__Q5GH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__R5GH)[ 0]=next__Q5GH;
                   } else {
-                    next__2SAH=((__POINTER *)result__4SAH)[ 0];
-                    if ((next__2SAH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4SAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ATAH <<  1)) <=  4096)) {
-                        next__2SAH=(void *)((unsigned long)result__4SAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATAH)));
+                    next__Q5GH=((__POINTER *)result__S5GH)[ 0];
+                    if ((next__Q5GH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S5GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__U5GH <<  1)) <=  4096)) {
+                        next__Q5GH=(void *)((unsigned long)result__S5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U5GH)));
                       } else {
-                        next__2SAH=new_lab__ARJ(lab_type__5SAH);
+                        next__Q5GH=new_lab__MRJ(lab_type__T5GH);
                       };
-                      ((__POINTER *)next__2SAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__3SAH)[ 0]=next__2SAH;
+                      ((__POINTER *)next__Q5GH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__R5GH)[ 0]=next__Q5GH;
                     } else {
-                      ((__POINTER *)result__4SAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2SAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__4SAH=next__2SAH;
+                      ((__POINTER *)result__S5GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__S5GH=next__Q5GH;
                     };
                   };
-                  ptr__MSAH=result__4SAH;
+                  ptr__A5GH=result__S5GH;
                 };
-                result__LSAH=((__ITM_ARG *)ptr__MSAH);
-                *(result__LSAH) = *(ITM_ARG__);
+                result__54GH=((__ITM_ARG *)ptr__A5GH);
+                *(result__54GH) = *(ITM_ARG__);
               };
-              Self__TSAH=((__ITM_ARG *)result__LSAH);
-              Self__TSAH->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ=p__USAH;
-              Self__TSAH->name__P0HC=(&__string_58);
-              Self__TSAH->type__Q0HC=type_self__1TN;
-              arg__TBZB=result__LSAH;
-              add_last__O5GC(result__EU1B,result__LSAH);
-              result__UBZB=read_slot_keyword__GZ5B(result__EU1B);
-            };
-          } else {
-            add_last__O5GC(result__EU1B,arg__TBZB);
-            result__BTAH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__BTAH=FALSE__;
+              Self__H5GH=((__ITM_ARG *)result__54GH);
+              Self__H5GH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=p__I5GH;
+              Self__H5GH->name__10HC=(&__string_58);
+              Self__H5GH->type__20HC=type_self__HUN;
+              arg__5BZB=result__54GH;
+              add_last__05GC(result__QU1B,result__54GH);
+              result__ACZB=read_slot_keyword__SZ5B(result__QU1B);
+            };
+          } else {
+            add_last__05GC(result__QU1B,arg__5BZB);
+            result__V5GH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__V5GH=FALSE__;
             } else {
-              result__CTAH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__CTAH=((__CHARACTER )(( 0)));
+              result__W5GH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__W5GH=((__CHARACTER )(( 0)));
               } else {
-                result__CTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__W5GH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__CTAH == '.')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__BTAH=TRUE__;
+              if ((result__W5GH == '.')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__V5GH=TRUE__;
               };
             };
-            if (result__BTAH) {
-              result__UBZB=read_slot_keyword__GZ5B(result__EU1B);
-              __tmp__EDZB=TRUE__;
+            if (result__V5GH) {
+              result__ACZB=read_slot_keyword__SZ5B(result__QU1B);
+              __tmp__QDZB=TRUE__;
             } else {
-              __tmp__EDZB=FALSE__;
+              __tmp__QDZB=FALSE__;
             };
-            if ((! __tmp__EDZB)) {
-              result__ETAH=FALSE__;
-              if ((! read_space__RRD())) {
-                result__ETAH=FALSE__;
+            if ((! __tmp__QDZB)) {
+              result__Y5GH=FALSE__;
+              if ((! read_space__3RD())) {
+                result__Y5GH=FALSE__;
               } else {
-                result__FTAH='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__FTAH=((__CHARACTER )(( 0)));
+                result__Z5GH='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__Z5GH=((__CHARACTER )(( 0)));
                 } else {
-                  result__FTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__Z5GH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                if ((result__FTAH == '\'')) {
-                  position__GBC=(__INTEGER)(position__GBC +  1);
-                  result__ETAH=TRUE__;
+                if ((result__Z5GH == '\'')) {
+                  position__SBC=(__INTEGER)(position__SBC +  1);
+                  result__Y5GH=TRUE__;
                 };
               };
-              if (result__ETAH) {
-                result__UBZB=read_slot_operator__ZT5B(result__EU1B);
+              if (result__Y5GH) {
+                result__ACZB=read_slot_operator__FU5B(result__QU1B);
               };
             };
           };
-          if (((void *)result__UBZB != (void *)NULL)) {
-            result__GU4B=create_with_capacity__FL5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__EU1B)->parent_arrayed_collection__ZBZB.upper__S5GC +  1));
-            Self__5LHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__GU4B);
-            new_capacity__CMHC= 0;
-            other_upper__BMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__EU1B)->parent_arrayed_collection__ZBZB.upper__S5GC;
-            if ((other_upper__BMHC >=  0)) {
-              new_capacity__CMHC=(__INTEGER)(other_upper__BMHC +  1);
-              if ((Self__5LHC->parent_arrayed_collection__ZBZB.capacity__U5GC < new_capacity__CMHC)) {
-                Self__5LHC->parent_arrayed_collection__ZBZB.storage__QAHC=create__KPBD(new_capacity__CMHC);
-                Self__5LHC->parent_arrayed_collection__ZBZB.capacity__U5GC=new_capacity__CMHC;
+          if (((void *)result__ACZB != (void *)NULL)) {
+            result__SU4B=create_with_capacity__RL5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.upper__45GC +  1));
+            Self__LMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B);
+            new_capacity__OMHC= 0;
+            other_upper__NMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.upper__45GC;
+            if ((other_upper__NMHC >=  0)) {
+              new_capacity__OMHC=(__INTEGER)(other_upper__NMHC +  1);
+              if ((Self__LMHC->parent_arrayed_collection__FCZB.capacity__AAHC < new_capacity__OMHC)) {
+                Self__LMHC->parent_arrayed_collection__FCZB.storage__2AHC=create__WPBD(new_capacity__OMHC);
+                Self__LMHC->parent_arrayed_collection__FCZB.capacity__AAHC=new_capacity__OMHC;
               };
-              __tmp__VMHC=Self__5LHC->parent_arrayed_collection__ZBZB.storage__QAHC;
-              __tmp__XMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__EU1B)->parent_arrayed_collection__ZBZB.storage__QAHC;
-              Self__YGSD=((void **)__tmp__VMHC);
-              Self__T1WD=other_upper__BMHC;
-              while ((Self__T1WD >=  0)) {
-                Self__YGSD[Self__T1WD]=((void **)__tmp__XMHC)[Self__T1WD];
-                Self__T1WD=(__INTEGER)(Self__T1WD -  1);
+              __tmp__BNHC=Self__LMHC->parent_arrayed_collection__FCZB.storage__2AHC;
+              __tmp__DNHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.storage__2AHC;
+              Self__EHSD=((void **)__tmp__BNHC);
+              Self__M2WD=other_upper__NMHC;
+              while ((Self__M2WD >=  0)) {
+                Self__EHSD[Self__M2WD]=((void **)__tmp__DNHC)[Self__M2WD];
+                Self__M2WD=(__INTEGER)(Self__M2WD -  1);
               };
             };
-            Self__5LHC->parent_arrayed_collection__ZBZB.upper__S5GC=other_upper__BMHC;
-            ((__FAST_ARRAYoITM_ARGUMENTo *)result__EU1B)->parent_arrayed_collection__ZBZB.upper__S5GC=(__INTEGER)(-  1);
-            Self__LUHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__KU1B);
-            new_capacity__NUHC= 0;
-            if (((__INTEGER)(Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC +  1) <= (__INTEGER)(Self__LUHC->parent_arrayed_collection__JU1B.capacity__MKHC -  1))) {
-              Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC=(__INTEGER)(Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC +  1);
-              __tmp__1UHC=TRUE__;
+            Self__LMHC->parent_arrayed_collection__FCZB.upper__45GC=other_upper__NMHC;
+            ((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(-  1);
+            Self__XUHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B);
+            new_capacity__ZUHC= 0;
+            if (((__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC +  1) <= (__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC -  1))) {
+              Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC +  1);
+              __tmp__HVHC=TRUE__;
             } else {
-              __tmp__1UHC=FALSE__;
+              __tmp__HVHC=FALSE__;
             };
-            if ((! __tmp__1UHC)) {
-              if ((Self__LUHC->parent_arrayed_collection__JU1B.capacity__MKHC ==  0)) {
-                Self__LUHC->parent_arrayed_collection__JU1B.storage__XKHC=create__YKBD( 2);
-                Self__LUHC->parent_arrayed_collection__JU1B.capacity__MKHC= 2;
-                Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC= 0;
+            if ((! __tmp__HVHC)) {
+              if ((Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC ==  0)) {
+                Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC=create__ELBD( 2);
+                Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC= 2;
+                Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC= 0;
               } else {
-                new_capacity__NUHC=(__INTEGER)(Self__LUHC->parent_arrayed_collection__JU1B.capacity__MKHC <<  1);
-                __tmp__QVHC=Self__LUHC->parent_arrayed_collection__JU1B.storage__XKHC;
-                __tmp__RVHC=Self__LUHC->parent_arrayed_collection__JU1B.capacity__MKHC;
-                new__KITD=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__QVHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__RVHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__NUHC * ((__INTEGER )(sizeof(void *)))))));
-                __tmp__4ITD=(__INTEGER)(new_capacity__NUHC -  1);
-                Self__U3WE=__tmp__RVHC;
-                while ((Self__U3WE <= __tmp__4ITD)) {
-                  new__KITD[Self__U3WE]=NULL;
-                  Self__U3WE=(__INTEGER)(Self__U3WE +  1);
+                new_capacity__ZUHC=(__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC <<  1);
+                __tmp__2VHC=Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC;
+                __tmp__3VHC=Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC;
+                new__WITD=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__2VHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__3VHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZUHC * ((__INTEGER )(sizeof(void *)))))));
+                __tmp__KJTD=(__INTEGER)(new_capacity__ZUHC -  1);
+                Self__YPXE=__tmp__3VHC;
+                while ((Self__YPXE <= __tmp__KJTD)) {
+                  new__WITD[Self__YPXE]=NULL;
+                  Self__YPXE=(__INTEGER)(Self__YPXE +  1);
                 };
-                Self__LUHC->parent_arrayed_collection__JU1B.storage__XKHC=new__KITD;
-                Self__LUHC->parent_arrayed_collection__JU1B.capacity__MKHC=new_capacity__NUHC;
-                Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC=(__INTEGER)(Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC +  1);
+                Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC=new__WITD;
+                Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC=new_capacity__ZUHC;
+                Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC +  1);
               };
             };
-            ((void **)Self__LUHC->parent_arrayed_collection__JU1B.storage__XKHC)[Self__LUHC->parent_arrayed_collection__JU1B.upper__ETGC]=result__EU1B;
-            if (((struct ___OBJ *)result__UBZB)->__id==__ITM_SLOT__) {
-              set_argument_list__JCHC(result__UBZB,result__GU4B);
+            ((void **)Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC)[Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC]=result__QU1B;
+            if (((struct ___OBJ *)result__ACZB)->__id==__ITM_SLOT__) {
+              set_argument_list__VCHC(result__ACZB,result__SU4B);
             } else {
-              Self__2DHC=((__ITM_SLOT_OPERATOR *)result__UBZB);
-              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__GU4B)->parent_arrayed_collection__ZBZB.upper__S5GC +  1) >  1)) {
-                __tmp__KEHC=TRUE__;
+              Self__IEHC=((__ITM_SLOT_OPERATOR *)result__ACZB);
+              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B)->parent_arrayed_collection__FCZB.upper__45GC +  1) >  1)) {
+                __tmp__WEHC=TRUE__;
               } else {
-                __tmp__FEHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__GU4B)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 0];
-                if (((struct ___OBJ *)__tmp__FEHC)->__id==__ITM_ARG__) {
-                  __tmp__GEHC= 1;
+                __tmp__REHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
+                if (((struct ___OBJ *)__tmp__REHC)->__id==__ITM_ARG__) {
+                  __tmp__SEHC= 1;
                 } else {
-                  __tmp__GEHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__FEHC)->name__QPOF)->parent_arrayed_collection__14I.upper__P5OD +  1);
+                  __tmp__SEHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__REHC)->name__N1OF)->parent_arrayed_collection__H5I.upper__15OD +  1);
                 };
-                __tmp__KEHC=(__tmp__GEHC >  1);
+                __tmp__WEHC=(__tmp__SEHC >  1);
               };
-              if (__tmp__KEHC) {
-                if (((void *)((__SECTION_ *)Self__2DHC->parent_itm_slot__CU5B.id_section__M1C)->name__WYDC == (void *)(&__string_25))) {
-                  Self__ZN3G=((__FAST_ARRAYoITM_ARGUMENTo *)result__GU4B);
-                  __tmp__XEHC=((void **)Self__ZN3G->parent_arrayed_collection__ZBZB.storage__QAHC)[Self__ZN3G->parent_arrayed_collection__ZBZB.upper__S5GC];
-                  if (((struct ___OBJ *)__tmp__XEHC)->__id==__ITM_ARG__) {
-                    __tmp__YEHC=((__ITM_ARG *)__tmp__XEHC)->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ;
+              if (__tmp__WEHC) {
+                if (((void *)((__SECTION_ *)Self__IEHC->parent_itm_slot__OU5B.id_section__Y1C)->name__CZDC == (void *)(&__string_25))) {
+                  Self__SZDH=((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B);
+                  __tmp__DFHC=((void **)Self__SZDH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__SZDH->parent_arrayed_collection__FCZB.upper__45GC];
+                  if (((struct ___OBJ *)__tmp__DFHC)->__id==__ITM_ARG__) {
+                    __tmp__EFHC=((__ITM_ARG *)__tmp__DFHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
                   } else {
-                    __tmp__YEHC=((__ITM_ARGS *)__tmp__XEHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
+                    __tmp__EFHC=((__ITM_ARGS *)__tmp__DFHC)->parent_itm_argument__B5EE.parent_itm_code__S4M.position__NDJ;
                   };
-                  put_error__text__4MG( 1,(&__string_221));
-                  put_position__IOG(__tmp__YEHC);
-                  put_string__I1F(msg_err__DNG);
-                  if ((type_error__CNG !=  2)) {
+                  put_error__text__KNG( 1,(&__string_231));
+                  put_position__UOG(__tmp__EFHC);
+                  put_string__U1F(msg_err__PNG);
+                  if ((type_error__ONG !=  2)) {
                     exit(( 1));
                   };
                 };
-                Self__UOWG=((__SECTION_ *)Self__2DHC->parent_itm_slot__CU5B.id_section__M1C);
-                if ((((void *)Self__UOWG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__UOWG->name__WYDC == (void *)(&__string_24)))) {
-                  Self__CO3G=((__FAST_ARRAYoITM_ARGUMENTo *)result__GU4B);
-                  __tmp__EFHC=((void **)Self__CO3G->parent_arrayed_collection__ZBZB.storage__QAHC)[Self__CO3G->parent_arrayed_collection__ZBZB.upper__S5GC];
-                  if (((struct ___OBJ *)__tmp__EFHC)->__id==__ITM_ARG__) {
-                    __tmp__FFHC=((__ITM_ARG *)__tmp__EFHC)->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ;
+                Self__0E2G=((__SECTION_ *)Self__IEHC->parent_itm_slot__OU5B.id_section__Y1C);
+                if ((((void *)Self__0E2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__0E2G->name__CZDC == (void *)(&__string_24)))) {
+                  Self__1ZDH=((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B);
+                  __tmp__QFHC=((void **)Self__1ZDH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__1ZDH->parent_arrayed_collection__FCZB.upper__45GC];
+                  if (((struct ___OBJ *)__tmp__QFHC)->__id==__ITM_ARG__) {
+                    __tmp__RFHC=((__ITM_ARG *)__tmp__QFHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
                   } else {
-                    __tmp__FFHC=((__ITM_ARGS *)__tmp__EFHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
+                    __tmp__RFHC=((__ITM_ARGS *)__tmp__QFHC)->parent_itm_argument__B5EE.parent_itm_code__S4M.position__NDJ;
                   };
-                  put_error__text__4MG( 1,(&__string_222));
-                  put_position__IOG(__tmp__FFHC);
-                  put_string__I1F(msg_err__DNG);
-                  if ((type_error__CNG !=  2)) {
+                  put_error__text__KNG( 1,(&__string_232));
+                  put_position__UOG(__tmp__RFHC);
+                  put_string__U1F(msg_err__PNG);
+                  if ((type_error__ONG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
-              Self__2DHC->parent_itm_slot__CU5B.argument_list__0DHC=result__GU4B;
+              Self__IEHC->parent_itm_slot__OU5B.argument_list__GEHC=result__SU4B;
             };
           };
-          last_slot__E2D=result__UBZB;
-          if (((void *)result__UBZB == (void *)NULL)) {
-            pos__C3OG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_223));
-            put_position__IOG(pos__C3OG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          last_slot__Q2D=result__ACZB;
+          if (((void *)result__ACZB == (void *)NULL)) {
+            pos__ALUG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_233));
+            put_position__UOG(pos__ALUG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__E2D)->parent_named__G5.style__VDU=style__EXOB;
+          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.style__BEU=style__QXOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.style__VDU=style__EXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.style__BEU=style__QXOB;
           };
-          if (((read_symbol__XWJ((&__string_12)) || read_symbol__XWJ((&__string_13))) || read_symbol__XWJ((&__string_14)))) {
-            affect__FXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[ 0];
+          if (((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14)))) {
+            affect__RXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
           } else {
-            affect__FXOB=' ';
+            affect__RXOB=' ';
           };
-          if ((affect__FXOB == ' ')) {
-            result__JTAH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__JTAH=FALSE__;
+          if ((affect__RXOB == ' ')) {
+            result__35GH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__35GH=FALSE__;
             } else {
-              result__KTAH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__KTAH=((__CHARACTER )(( 0)));
+              result__45GH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__45GH=((__CHARACTER )(( 0)));
               } else {
-                result__KTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__45GH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__KTAH == ':')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__JTAH=TRUE__;
+              if ((result__45GH == ':')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__35GH=TRUE__;
               };
             };
-            __tmp__1YOB=result__JTAH;
+            __tmp__HZOB=result__35GH;
           } else {
-            __tmp__1YOB=FALSE__;
+            __tmp__HZOB=FALSE__;
           };
-          if (__tmp__1YOB) {
-            result__MTAH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__MTAH=FALSE__;
+          if (__tmp__HZOB) {
+            result__AAHH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__AAHH=FALSE__;
             } else {
-              result__NTAH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__NTAH=((__CHARACTER )(( 0)));
+              result__BAHH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__BAHH=((__CHARACTER )(( 0)));
               } else {
-                result__NTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__BAHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__NTAH == '(')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__MTAH=TRUE__;
+              if ((result__BAHH == '(')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__AAHH=TRUE__;
               };
             };
-            if (result__MTAH) {
-              lt__DXOB=read_type_list__2LO(PARSER__,FALSE__);
-              if (((void *)lt__DXOB == (void *)NULL)) {
-                pos__E3OG=current_position__3WF();
-                put_error__text__4MG( 0,(&__string_224));
-                put_position__IOG(pos__E3OG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+            if (result__AAHH) {
+              lt__PXOB=read_type_list__IMO(PARSER__,FALSE__);
+              if (((void *)lt__PXOB == (void *)NULL)) {
+                pos__CLUG=current_position__JXF();
+                put_error__text__KNG( 0,(&__string_234));
+                put_position__UOG(pos__CLUG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
-              result__PTAH=FALSE__;
-              if ((! read_space__RRD())) {
-                result__PTAH=FALSE__;
+              result__DAHH=FALSE__;
+              if ((! read_space__3RD())) {
+                result__DAHH=FALSE__;
               } else {
-                result__QTAH='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__QTAH=((__CHARACTER )(( 0)));
+                result__EAHH='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__EAHH=((__CHARACTER )(( 0)));
                 } else {
-                  result__QTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__EAHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                if ((result__QTAH == ')')) {
-                  position__GBC=(__INTEGER)(position__GBC +  1);
-                  result__PTAH=TRUE__;
+                if ((result__EAHH == ')')) {
+                  position__SBC=(__INTEGER)(position__SBC +  1);
+                  result__DAHH=TRUE__;
                 };
               };
-              if ((! result__PTAH)) {
-                pos__G3OG=current_position__3WF();
-                put_error__text__4MG( 2,(&__string_225));
-                put_position__IOG(pos__G3OG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+              if ((! result__DAHH)) {
+                pos__ELUG=current_position__JXF();
+                put_error__text__KNG( 2,(&__string_235));
+                put_position__UOG(pos__ELUG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
-              t__CXOB=get__WIP(lt__DXOB);
+              t__OXOB=get__CJP(lt__PXOB);
             } else {
-              t__CXOB=read_type__XBM(PARSER__,FALSE__);
-              if (((void *)t__CXOB == (void *)NULL)) {
-                pos__I3OG=current_position__3WF();
-                put_error__text__4MG( 0,(&__string_224));
-                put_position__IOG(pos__I3OG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+              t__OXOB=read_type__DCM(PARSER__,FALSE__);
+              if (((void *)t__OXOB == (void *)NULL)) {
+                pos__GLUG=current_position__JXF();
+                put_error__text__KNG( 0,(&__string_234));
+                put_position__UOG(pos__GLUG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            if (((read_symbol__XWJ((&__string_12)) || read_symbol__XWJ((&__string_13))) || read_symbol__XWJ((&__string_14)))) {
-              affect__FXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[ 0];
+            if (((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14)))) {
+              affect__RXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
             };
           } else {
-            t__CXOB=type_void__SVF;
+            t__OXOB=type_void__4VF;
           };
-          __tmp__50OB=last_slot__E2D;
-          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-            set_result_type__E3FC(last_slot__E2D,t__CXOB);
+          __tmp__L1OB=last_slot__Q2D;
+          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+            set_result_type__Q3FC(last_slot__Q2D,t__OXOB);
           } else {
-            Self__Q4FC=((__ITM_SLOT_OPERATOR *)__tmp__50OB);
-            tm__S4FC=NULL;
-            Self__VBFC=((__SECTION_ *)Self__Q4FC->parent_itm_slot__CU5B.id_section__M1C);
-            if ((((void *)Self__VBFC->name__WYDC == (void *)(&__string_23)) || ((void *)Self__VBFC->name__WYDC == (void *)(&__string_24)))) {
-              if (t__CXOB==NULL) {
-                __tmp__14FC=NULL;
+            Self__24FC=((__ITM_SLOT_OPERATOR *)__tmp__L1OB);
+            tm__44FC=NULL;
+            Self__1E2G=((__SECTION_ *)Self__24FC->parent_itm_slot__OU5B.id_section__Y1C);
+            if ((((void *)Self__1E2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__1E2G->name__CZDC == (void *)(&__string_24)))) {
+              if (t__OXOB==NULL) {
+                __tmp__H5FC=NULL;
               } else {
-                switch (((struct ___OBJ *)t__CXOB)->__id) {
+                switch (((struct ___OBJ *)t__OXOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__14FC=((void *)t__CXOB);
+                  __tmp__H5FC=((void *)t__OXOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__14FC=((void *)t__CXOB);
+                  __tmp__H5FC=((void *)t__OXOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__14FC=NULL;
+                  __tmp__H5FC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__14FC=((void *)t__CXOB);
+                  __tmp__H5FC=((void *)t__OXOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__14FC=((void *)t__CXOB);
+                  __tmp__H5FC=((void *)t__OXOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__14FC=((void *)t__CXOB);
+                  __tmp__H5FC=((void *)t__OXOB);
                 } break;
                 }
               };
-              tm__S4FC=__tmp__14FC;
-              if (((((void *)__tmp__14FC == (void *)NULL) || ((void *)__tmp__14FC == (void *)type_self__1TN)) || ((void *)__tmp__14FC == (void *)type_void__SVF))) {
-                pos__FZID=Self__Q4FC->parent_itm_slot__CU5B.parent_named__G5.parent_itm_object__4.position__BDJ;
-                put_error__text__4MG( 1,(&__string_226));
-                put_position__IOG(pos__FZID);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+              tm__44FC=__tmp__H5FC;
+              if (((((void *)__tmp__H5FC == (void *)NULL) || ((void *)__tmp__H5FC == (void *)type_self__HUN)) || ((void *)__tmp__H5FC == (void *)type_void__4VF))) {
+                pos__RZID=Self__24FC->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+                put_error__text__KNG( 1,(&__string_236));
+                put_position__UOG(pos__RZID);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            Self__Q4FC->parent_itm_slot__CU5B.result_type__O4FC=t__CXOB;
+            Self__24FC->parent_itm_slot__OU5B.result_type__04FC=t__OXOB;
           };
-          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__E2D)->affect__35FC=affect__FXOB;
+          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__Q2D)->affect__JAGC=affect__RXOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.affect__35FC=affect__FXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.affect__JAGC=affect__RXOB;
           };
-          if ((affect__FXOB != ' ')) {
-            read_space__RRD();
-            old_pos__GXOB=position__GBC;
-            old_derive__HXOB=short_derive__VBC;
-            if (((void *)read_contract__1SF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
+          if ((affect__RXOB != ' ')) {
+            read_space__3RD();
+            old_pos__SXOB=position__SBC;
+            old_derive__TXOB=short_derive__BCC;
+            if (((void *)read_contract__HTF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
               };
             };
-            expr__YI3B=read_expr__S4I(PARSER__);
-            if (((void *)expr__YI3B == (void *)NULL)) {
-              pos__M3OG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_227));
-              put_position__IOG(pos__M3OG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+            expr__EJ3B=read_expr__44I(PARSER__);
+            if (((void *)expr__EJ3B == (void *)NULL)) {
+              pos__KLUG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_237));
+              put_position__UOG(pos__KLUG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            __tmp__FJ3B=last_slot__E2D;
-            __tmp__GJ3B=object__3AC;
-            if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-              set_value__type__NFHC(last_slot__E2D,expr__YI3B,object__3AC);
+            __tmp__RJ3B=last_slot__Q2D;
+            __tmp__SJ3B=object__JBC;
+            if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+              set_value__type__ZFHC(last_slot__Q2D,expr__EJ3B,object__JBC);
             } else {
-              Self__HGHC=((__ITM_SLOT_OPERATOR *)__tmp__FJ3B);
-              if ((Self__HGHC->parent_itm_slot__CU5B.affect__35FC != '<')) {
-                copy__NCS(string_tmp__VH,(&__string_228));
-                append__VNS(string_tmp__VH,Self__HGHC->parent_itm_slot__CU5B.parent_named__G5.name__LI);
-                n__ODBD=get__2VB(string_tmp__VH);
-                sec__PDBD=get_name__OUOB((&__string_27));
-                larg__QDBD=create_with_capacity__FL5B( 1);
-                switch (((struct ___OBJ *)expr__YI3B)->__id) {
+              Self__TGHC=((__ITM_SLOT_OPERATOR *)__tmp__RJ3B);
+              if ((Self__TGHC->parent_itm_slot__OU5B.affect__JAGC != '<')) {
+                copy__ZCS(string_tmp__VH,(&__string_238));
+                append__BOS(string_tmp__VH,Self__TGHC->parent_itm_slot__OU5B.parent_named__P5.name__LI);
+                n__0DBD=get__IWB(string_tmp__VH);
+                sec__1DBD=get_name__0UOB((&__string_27));
+                larg__2DBD=create_with_capacity__RL5B( 1);
+                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__1DBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__1DBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__1DBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__1DBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__1DBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__1DBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__1DBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__1DBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__1DBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__1DBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__1DBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__1DBD=position__ZC5B(expr__YI3B);
+                  __tmp__HEBD=position__FD5B(expr__EJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__1DBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__1DBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__1DBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__1DBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__1DBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__1DBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__1DBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__1DBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__1DBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__HEBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__1DBD=position__ZIHC(expr__YI3B);
+                  __tmp__HEBD=position__FJHC(expr__EJ3B);
                 } break;
                 };
-                result__STAH=NULL;
-                ptr__TTAH=((__POINTER )(NULL));
-                typ_id__UTAH= 0;
-                sz__VTAH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-                if ((sz__VTAH ==  0)) {
-                  result__STAH=ITM_ARG__;
+                result__GAHH=NULL;
+                ptr__HAHH=((__POINTER )(NULL));
+                typ_id__IAHH= 0;
+                sz__JAHH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+                if ((sz__JAHH ==  0)) {
+                  result__GAHH=ITM_ARG__;
                 } else {
-                  typ_id__UTAH=-1;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__VTAH);
-                  if ((typ_id__UTAH == (__INTEGER)(-  1))) {
-                    a__WTAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__XTAH=(__UINTEGER_32)((__UINTEGER_32)(sz__VTAH + a__WTAH) & (__UINTEGER_32)(~ a__WTAH));
-                    ptr_table__5TAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XTAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__4TAH=((__POINTER )(NULL));
-                    result__AUAH=((__POINTER *)ptr_table__5TAH)[ 0];
-                    if ((result__AUAH == (void *)NULL)) {
-                      result__AUAH=new_lab__ARJ(new_size__XTAH);
-                      next__4TAH=(void *)((unsigned long)result__AUAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTAH)));
-                      ((__POINTER *)next__4TAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__5TAH)[ 0]=next__4TAH;
+                  typ_id__IAHH=-1;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JAHH);
+                  if ((typ_id__IAHH == (__INTEGER)(-  1))) {
+                    a__KAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__LAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JAHH + a__KAHH) & (__UINTEGER_32)(~ a__KAHH));
+                    ptr_table__TAHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__SAHH=((__POINTER )(NULL));
+                    result__UAHH=((__POINTER *)ptr_table__TAHH)[ 0];
+                    if ((result__UAHH == (void *)NULL)) {
+                      result__UAHH=new_lab__MRJ(new_size__LAHH);
+                      next__SAHH=(void *)((unsigned long)result__UAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LAHH)));
+                      ((__POINTER *)next__SAHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__TAHH)[ 0]=next__SAHH;
                     } else {
-                      next__4TAH=((__POINTER *)result__AUAH)[ 0];
-                      if ((next__4TAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AUAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XTAH <<  1)) <=  4096)) {
-                          next__4TAH=(void *)((unsigned long)result__AUAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTAH)));
+                      next__SAHH=((__POINTER *)result__UAHH)[ 0];
+                      if ((next__SAHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UAHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LAHH <<  1)) <=  4096)) {
+                          next__SAHH=(void *)((unsigned long)result__UAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LAHH)));
                         } else {
-                          next__4TAH=new_lab__ARJ(new_size__XTAH);
+                          next__SAHH=new_lab__MRJ(new_size__LAHH);
                         };
-                        ((__POINTER *)next__4TAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__5TAH)[ 0]=next__4TAH;
+                        ((__POINTER *)next__SAHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__TAHH)[ 0]=next__SAHH;
                       } else {
-                        ((__POINTER *)result__AUAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4TAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__AUAH=next__4TAH;
+                        ((__POINTER *)result__UAHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SAHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__UAHH=next__SAHH;
                       };
                     };
-                    ptr__TTAH=result__AUAH;
+                    ptr__HAHH=result__UAHH;
                   } else {
-                    t__YTAH=((__UINTEGER_32 )typ_id__UTAH);
-                    a__ZTAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__HUAH=(__UINTEGER_32)((__UINTEGER_32)(sz__VTAH + a__ZTAH) & (__UINTEGER_32)(~ a__ZTAH));
-                    ptr_table__EUAH=((__POINTER )(&(table_type[(t__YTAH)])));
-                    lab_type__GUAH=(__UINTEGER_32)(t__YTAH |  1);
-                    next__DUAH=((__POINTER )(NULL));
-                    result__FUAH=((__POINTER *)ptr_table__EUAH)[ 0];
-                    if ((result__FUAH == (void *)NULL)) {
-                      result__FUAH=new_lab__ARJ(lab_type__GUAH);
-                      next__DUAH=(void *)((unsigned long)result__FUAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUAH)));
-                      ((__POINTER *)next__DUAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__EUAH)[ 0]=next__DUAH;
+                    t__MAHH=((__UINTEGER_32 )typ_id__IAHH);
+                    a__NAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__1AHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JAHH + a__NAHH) & (__UINTEGER_32)(~ a__NAHH));
+                    ptr_table__YAHH=((__POINTER )(&(table_type[(t__MAHH)])));
+                    lab_type__0AHH=(__UINTEGER_32)(t__MAHH |  1);
+                    next__XAHH=((__POINTER )(NULL));
+                    result__ZAHH=((__POINTER *)ptr_table__YAHH)[ 0];
+                    if ((result__ZAHH == (void *)NULL)) {
+                      result__ZAHH=new_lab__MRJ(lab_type__0AHH);
+                      next__XAHH=(void *)((unsigned long)result__ZAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1AHH)));
+                      ((__POINTER *)next__XAHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__YAHH)[ 0]=next__XAHH;
                     } else {
-                      next__DUAH=((__POINTER *)result__FUAH)[ 0];
-                      if ((next__DUAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FUAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HUAH <<  1)) <=  4096)) {
-                          next__DUAH=(void *)((unsigned long)result__FUAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUAH)));
+                      next__XAHH=((__POINTER *)result__ZAHH)[ 0];
+                      if ((next__XAHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZAHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1AHH <<  1)) <=  4096)) {
+                          next__XAHH=(void *)((unsigned long)result__ZAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1AHH)));
                         } else {
-                          next__DUAH=new_lab__ARJ(lab_type__GUAH);
+                          next__XAHH=new_lab__MRJ(lab_type__0AHH);
                         };
-                        ((__POINTER *)next__DUAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__EUAH)[ 0]=next__DUAH;
+                        ((__POINTER *)next__XAHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__YAHH)[ 0]=next__XAHH;
                       } else {
-                        ((__POINTER *)result__FUAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DUAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__FUAH=next__DUAH;
+                        ((__POINTER *)result__ZAHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XAHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ZAHH=next__XAHH;
                       };
                     };
-                    ptr__TTAH=result__FUAH;
+                    ptr__HAHH=result__ZAHH;
                   };
-                  result__STAH=((__ITM_ARG *)ptr__TTAH);
-                  *(result__STAH) = *(ITM_ARG__);
+                  result__GAHH=((__ITM_ARG *)ptr__HAHH);
+                  *(result__GAHH) = *(ITM_ARG__);
                 };
-                Self__0TAH=((__ITM_ARG *)result__STAH);
-                Self__0TAH->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ=__tmp__1DBD;
-                Self__0TAH->name__P0HC=(&__string_58);
-                Self__0TAH->type__Q0HC=type_self__1TN;
-                add_last__O5GC(larg__QDBD,result__STAH);
-                switch (((struct ___OBJ *)expr__YI3B)->__id) {
+                Self__OAHH=((__ITM_ARG *)result__GAHH);
+                Self__OAHH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=__tmp__HEBD;
+                Self__OAHH->name__10HC=(&__string_58);
+                Self__OAHH->type__20HC=type_self__HUN;
+                add_last__05GC(larg__2DBD,result__GAHH);
+                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__DEBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__DEBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__DEBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__DEBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__DEBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__DEBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__DEBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__DEBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__DEBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__DEBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__DEBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__DEBD=position__ZC5B(expr__YI3B);
+                  __tmp__PEBD=position__FD5B(expr__EJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__DEBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__DEBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__DEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__DEBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__DEBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__DEBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__DEBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__DEBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__DEBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__PEBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__DEBD=position__ZIHC(expr__YI3B);
+                  __tmp__PEBD=position__FJHC(expr__EJ3B);
                 } break;
                 };
-                result__IUAH=NULL;
-                ptr__JUAH=((__POINTER )(NULL));
-                typ_id__KUAH= 0;
-                sz__LUAH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-                if ((sz__LUAH ==  0)) {
-                  result__IUAH=ITM_SLOT__;
+                result__2AHH=NULL;
+                ptr__3AHH=((__POINTER )(NULL));
+                typ_id__4AHH= 0;
+                sz__5AHH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+                if ((sz__5AHH ==  0)) {
+                  result__2AHH=ITM_SLOT__;
                 } else {
-                  typ_id__KUAH=-1;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__LUAH);
-                  if ((typ_id__KUAH == (__INTEGER)(-  1))) {
-                    a__MUAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__NUAH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUAH + a__MUAH) & (__UINTEGER_32)(~ a__MUAH));
-                    ptr_table__VUAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NUAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__UUAH=((__POINTER )(NULL));
-                    result__WUAH=((__POINTER *)ptr_table__VUAH)[ 0];
-                    if ((result__WUAH == (void *)NULL)) {
-                      result__WUAH=new_lab__ARJ(new_size__NUAH);
-                      next__UUAH=(void *)((unsigned long)result__WUAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUAH)));
-                      ((__POINTER *)next__UUAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__VUAH)[ 0]=next__UUAH;
+                  typ_id__4AHH=-1;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5AHH);
+                  if ((typ_id__4AHH == (__INTEGER)(-  1))) {
+                    a__ABHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__BBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5AHH + a__ABHH) & (__UINTEGER_32)(~ a__ABHH));
+                    ptr_table__JBHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__IBHH=((__POINTER )(NULL));
+                    result__KBHH=((__POINTER *)ptr_table__JBHH)[ 0];
+                    if ((result__KBHH == (void *)NULL)) {
+                      result__KBHH=new_lab__MRJ(new_size__BBHH);
+                      next__IBHH=(void *)((unsigned long)result__KBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BBHH)));
+                      ((__POINTER *)next__IBHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__JBHH)[ 0]=next__IBHH;
                     } else {
-                      next__UUAH=((__POINTER *)result__WUAH)[ 0];
-                      if ((next__UUAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WUAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NUAH <<  1)) <=  4096)) {
-                          next__UUAH=(void *)((unsigned long)result__WUAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUAH)));
+                      next__IBHH=((__POINTER *)result__KBHH)[ 0];
+                      if ((next__IBHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KBHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BBHH <<  1)) <=  4096)) {
+                          next__IBHH=(void *)((unsigned long)result__KBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BBHH)));
                         } else {
-                          next__UUAH=new_lab__ARJ(new_size__NUAH);
+                          next__IBHH=new_lab__MRJ(new_size__BBHH);
                         };
-                        ((__POINTER *)next__UUAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__VUAH)[ 0]=next__UUAH;
+                        ((__POINTER *)next__IBHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__JBHH)[ 0]=next__IBHH;
                       } else {
-                        ((__POINTER *)result__WUAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UUAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__WUAH=next__UUAH;
+                        ((__POINTER *)result__KBHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IBHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__KBHH=next__IBHH;
                       };
                     };
-                    ptr__JUAH=result__WUAH;
+                    ptr__3AHH=result__KBHH;
                   } else {
-                    t__OUAH=((__UINTEGER_32 )typ_id__KUAH);
-                    a__PUAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__3UAH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUAH + a__PUAH) & (__UINTEGER_32)(~ a__PUAH));
-                    ptr_table__0UAH=((__POINTER )(&(table_type[(t__OUAH)])));
-                    lab_type__2UAH=(__UINTEGER_32)(t__OUAH |  1);
-                    next__ZUAH=((__POINTER )(NULL));
-                    result__1UAH=((__POINTER *)ptr_table__0UAH)[ 0];
-                    if ((result__1UAH == (void *)NULL)) {
-                      result__1UAH=new_lab__ARJ(lab_type__2UAH);
-                      next__ZUAH=(void *)((unsigned long)result__1UAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3UAH)));
-                      ((__POINTER *)next__ZUAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__0UAH)[ 0]=next__ZUAH;
+                    t__CBHH=((__UINTEGER_32 )typ_id__4AHH);
+                    a__DBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__RBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5AHH + a__DBHH) & (__UINTEGER_32)(~ a__DBHH));
+                    ptr_table__OBHH=((__POINTER )(&(table_type[(t__CBHH)])));
+                    lab_type__QBHH=(__UINTEGER_32)(t__CBHH |  1);
+                    next__NBHH=((__POINTER )(NULL));
+                    result__PBHH=((__POINTER *)ptr_table__OBHH)[ 0];
+                    if ((result__PBHH == (void *)NULL)) {
+                      result__PBHH=new_lab__MRJ(lab_type__QBHH);
+                      next__NBHH=(void *)((unsigned long)result__PBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RBHH)));
+                      ((__POINTER *)next__NBHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__OBHH)[ 0]=next__NBHH;
                     } else {
-                      next__ZUAH=((__POINTER *)result__1UAH)[ 0];
-                      if ((next__ZUAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1UAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3UAH <<  1)) <=  4096)) {
-                          next__ZUAH=(void *)((unsigned long)result__1UAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3UAH)));
+                      next__NBHH=((__POINTER *)result__PBHH)[ 0];
+                      if ((next__NBHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PBHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RBHH <<  1)) <=  4096)) {
+                          next__NBHH=(void *)((unsigned long)result__PBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RBHH)));
                         } else {
-                          next__ZUAH=new_lab__ARJ(lab_type__2UAH);
+                          next__NBHH=new_lab__MRJ(lab_type__QBHH);
                         };
-                        ((__POINTER *)next__ZUAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__0UAH)[ 0]=next__ZUAH;
+                        ((__POINTER *)next__NBHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__OBHH)[ 0]=next__NBHH;
                       } else {
-                        ((__POINTER *)result__1UAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZUAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__1UAH=next__ZUAH;
+                        ((__POINTER *)result__PBHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NBHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__PBHH=next__NBHH;
                       };
                     };
-                    ptr__JUAH=result__1UAH;
+                    ptr__3AHH=result__PBHH;
                   };
-                  result__IUAH=((__ITM_SLOT *)ptr__JUAH);
-                  *(result__IUAH) = *(ITM_SLOT__);
+                  result__2AHH=((__ITM_SLOT *)ptr__3AHH);
+                  *(result__2AHH) = *(ITM_SLOT__);
                 };
-                Self__QUAH=((__ITM_SLOT *)result__IUAH);
-                Self__QUAH->parent_named__G5.name__LI=n__ODBD;
-                Self__QUAH->parent_named__G5.parent_itm_object__4.position__BDJ=__tmp__DEBD;
-                Self__QUAH->id_section__M1C=sec__PDBD;
-                ((__ITM_SLOT *)result__IUAH)->affect__35FC='<';
-                set_value__type__NFHC(result__IUAH,expr__YI3B,__tmp__GJ3B);
-                set_argument_list__JCHC(result__IUAH,larg__QDBD);
-                set_result_type__E3FC(result__IUAH,Self__HGHC->parent_itm_slot__CU5B.result_type__O4FC);
-                fast_put__to__VNGC(((__PROTOTYPE *)__tmp__GJ3B)->slot_list__QUS,result__IUAH,result__IUAH->parent_named__G5.name__LI);
-                switch (((struct ___OBJ *)expr__YI3B)->__id) {
+                Self__EBHH=((__ITM_SLOT *)result__2AHH);
+                Self__EBHH->parent_named__P5.name__LI=n__0DBD;
+                Self__EBHH->parent_named__P5.parent_itm_object__4.position__NDJ=__tmp__PEBD;
+                Self__EBHH->id_section__Y1C=sec__1DBD;
+                ((__ITM_SLOT *)result__2AHH)->affect__JAGC='<';
+                set_value__type__ZFHC(result__2AHH,expr__EJ3B,__tmp__SJ3B);
+                set_argument_list__VCHC(result__2AHH,larg__2DBD);
+                set_result_type__Q3FC(result__2AHH,Self__TGHC->parent_itm_slot__OU5B.result_type__04FC);
+                fast_put__to__BOGC(((__PROTOTYPE *)__tmp__SJ3B)->slot_list__2US,result__2AHH,result__2AHH->parent_named__P5.name__LI);
+                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__XEBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__XEBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__XEBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__XEBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__XEBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__XEBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__XEBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__XEBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__XEBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__XEBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__XEBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__XEBD=position__ZC5B(expr__YI3B);
+                  __tmp__DFBD=position__FD5B(expr__EJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__XEBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__XEBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__XEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__XEBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__XEBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__XEBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__XEBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__XEBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__XEBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__DFBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__XEBD=position__ZIHC(expr__YI3B);
+                  __tmp__DFBD=position__FJHC(expr__EJ3B);
                 } break;
                 };
-                get__XSI(((__PROTOTYPE *)__tmp__GJ3B)->parent_named__5.name__LI);
-                result__4UAH=NULL;
-                ptr__5UAH=((__POINTER )(NULL));
-                typ_id__AVAH= 0;
-                sz__BVAH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-                if ((sz__BVAH ==  0)) {
-                  result__4UAH=ITM_PROTOTYPE__;
+                get__DTI(((__PROTOTYPE *)__tmp__SJ3B)->parent_named__5.name__LI);
+                result__SBHH=NULL;
+                ptr__TBHH=((__POINTER )(NULL));
+                typ_id__UBHH= 0;
+                sz__VBHH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+                if ((sz__VBHH ==  0)) {
+                  result__SBHH=ITM_PROTOTYPE__;
                 } else {
-                  typ_id__AVAH=-1;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BVAH);
-                  if ((typ_id__AVAH == (__INTEGER)(-  1))) {
-                    a__CVAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__DVAH=(__UINTEGER_32)((__UINTEGER_32)(sz__BVAH + a__CVAH) & (__UINTEGER_32)(~ a__CVAH));
-                    ptr_table__IVAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DVAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__HVAH=((__POINTER )(NULL));
-                    result__JVAH=((__POINTER *)ptr_table__IVAH)[ 0];
-                    if ((result__JVAH == (void *)NULL)) {
-                      result__JVAH=new_lab__ARJ(new_size__DVAH);
-                      next__HVAH=(void *)((unsigned long)result__JVAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DVAH)));
-                      ((__POINTER *)next__HVAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__IVAH)[ 0]=next__HVAH;
+                  typ_id__UBHH=-1;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__VBHH);
+                  if ((typ_id__UBHH == (__INTEGER)(-  1))) {
+                    a__WBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__XBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VBHH + a__WBHH) & (__UINTEGER_32)(~ a__WBHH));
+                    ptr_table__2BHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__1BHH=((__POINTER )(NULL));
+                    result__3BHH=((__POINTER *)ptr_table__2BHH)[ 0];
+                    if ((result__3BHH == (void *)NULL)) {
+                      result__3BHH=new_lab__MRJ(new_size__XBHH);
+                      next__1BHH=(void *)((unsigned long)result__3BHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBHH)));
+                      ((__POINTER *)next__1BHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__2BHH)[ 0]=next__1BHH;
                     } else {
-                      next__HVAH=((__POINTER *)result__JVAH)[ 0];
-                      if ((next__HVAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JVAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DVAH <<  1)) <=  4096)) {
-                          next__HVAH=(void *)((unsigned long)result__JVAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DVAH)));
+                      next__1BHH=((__POINTER *)result__3BHH)[ 0];
+                      if ((next__1BHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XBHH <<  1)) <=  4096)) {
+                          next__1BHH=(void *)((unsigned long)result__3BHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBHH)));
                         } else {
-                          next__HVAH=new_lab__ARJ(new_size__DVAH);
+                          next__1BHH=new_lab__MRJ(new_size__XBHH);
                         };
-                        ((__POINTER *)next__HVAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__IVAH)[ 0]=next__HVAH;
+                        ((__POINTER *)next__1BHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__2BHH)[ 0]=next__1BHH;
                       } else {
-                        ((__POINTER *)result__JVAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HVAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__JVAH=next__HVAH;
+                        ((__POINTER *)result__3BHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__3BHH=next__1BHH;
                       };
                     };
-                    ptr__5UAH=result__JVAH;
+                    ptr__TBHH=result__3BHH;
                   } else {
-                    t__EVAH=((__UINTEGER_32 )typ_id__AVAH);
-                    a__FVAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__QVAH=(__UINTEGER_32)((__UINTEGER_32)(sz__BVAH + a__FVAH) & (__UINTEGER_32)(~ a__FVAH));
-                    ptr_table__NVAH=((__POINTER )(&(table_type[(t__EVAH)])));
-                    lab_type__PVAH=(__UINTEGER_32)(t__EVAH |  1);
-                    next__MVAH=((__POINTER )(NULL));
-                    result__OVAH=((__POINTER *)ptr_table__NVAH)[ 0];
-                    if ((result__OVAH == (void *)NULL)) {
-                      result__OVAH=new_lab__ARJ(lab_type__PVAH);
-                      next__MVAH=(void *)((unsigned long)result__OVAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QVAH)));
-                      ((__POINTER *)next__MVAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__NVAH)[ 0]=next__MVAH;
+                    t__YBHH=((__UINTEGER_32 )typ_id__UBHH);
+                    a__ZBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ECHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VBHH + a__ZBHH) & (__UINTEGER_32)(~ a__ZBHH));
+                    ptr_table__BCHH=((__POINTER )(&(table_type[(t__YBHH)])));
+                    lab_type__DCHH=(__UINTEGER_32)(t__YBHH |  1);
+                    next__ACHH=((__POINTER )(NULL));
+                    result__CCHH=((__POINTER *)ptr_table__BCHH)[ 0];
+                    if ((result__CCHH == (void *)NULL)) {
+                      result__CCHH=new_lab__MRJ(lab_type__DCHH);
+                      next__ACHH=(void *)((unsigned long)result__CCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECHH)));
+                      ((__POINTER *)next__ACHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__BCHH)[ 0]=next__ACHH;
                     } else {
-                      next__MVAH=((__POINTER *)result__OVAH)[ 0];
-                      if ((next__MVAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OVAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__QVAH <<  1)) <=  4096)) {
-                          next__MVAH=(void *)((unsigned long)result__OVAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QVAH)));
+                      next__ACHH=((__POINTER *)result__CCHH)[ 0];
+                      if ((next__ACHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CCHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ECHH <<  1)) <=  4096)) {
+                          next__ACHH=(void *)((unsigned long)result__CCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECHH)));
                         } else {
-                          next__MVAH=new_lab__ARJ(lab_type__PVAH);
+                          next__ACHH=new_lab__MRJ(lab_type__DCHH);
                         };
-                        ((__POINTER *)next__MVAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__NVAH)[ 0]=next__MVAH;
+                        ((__POINTER *)next__ACHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BCHH)[ 0]=next__ACHH;
                       } else {
-                        ((__POINTER *)result__OVAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MVAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__OVAH=next__MVAH;
+                        ((__POINTER *)result__CCHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ACHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__CCHH=next__ACHH;
                       };
                     };
-                    ptr__5UAH=result__OVAH;
+                    ptr__TBHH=result__CCHH;
                   };
-                  result__4UAH=((__ITM_PROTOTYPE *)ptr__5UAH);
-                  *(result__4UAH) = *(ITM_PROTOTYPE__);
+                  result__SBHH=((__ITM_PROTOTYPE *)ptr__TBHH);
+                  *(result__SBHH) = *(ITM_PROTOTYPE__);
                 };
-                ((__ITM_PROTOTYPE *)result__4UAH)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__XEBD;
-                switch (((struct ___OBJ *)expr__YI3B)->__id) {
+                ((__ITM_PROTOTYPE *)result__SBHH)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__DFBD;
+                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__AFBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__AFBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__AFBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__AFBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__AFBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__AFBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__AFBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__AFBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__AFBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__AFBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__AFBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__AFBD=position__ZC5B(expr__YI3B);
+                  __tmp__MFBD=position__FD5B(expr__EJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__AFBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__AFBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__AFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__AFBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__AFBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__AFBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__AFBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__AFBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__AFBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+                  __tmp__MFBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__AFBD=position__ZIHC(expr__YI3B);
+                  __tmp__MFBD=position__FJHC(expr__EJ3B);
                 } break;
                 };
-                result__RVAH=NULL;
-                ptr__SVAH=((__POINTER )(NULL));
-                typ_id__TVAH= 0;
-                sz__UVAH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-                if ((sz__UVAH ==  0)) {
-                  result__RVAH=ITM_READ_ARG1__;
+                result__FCHH=NULL;
+                ptr__GCHH=((__POINTER )(NULL));
+                typ_id__HCHH= 0;
+                sz__ICHH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+                if ((sz__ICHH ==  0)) {
+                  result__FCHH=ITM_READ_ARG1__;
                 } else {
-                  typ_id__TVAH=-1;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__UVAH);
-                  if ((typ_id__TVAH == (__INTEGER)(-  1))) {
-                    a__VVAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__WVAH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVAH + a__VVAH) & (__UINTEGER_32)(~ a__VVAH));
-                    ptr_table__1VAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WVAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__0VAH=((__POINTER )(NULL));
-                    result__2VAH=((__POINTER *)ptr_table__1VAH)[ 0];
-                    if ((result__2VAH == (void *)NULL)) {
-                      result__2VAH=new_lab__ARJ(new_size__WVAH);
-                      next__0VAH=(void *)((unsigned long)result__2VAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVAH)));
-                      ((__POINTER *)next__0VAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__1VAH)[ 0]=next__0VAH;
+                  typ_id__HCHH=-1;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ICHH);
+                  if ((typ_id__HCHH == (__INTEGER)(-  1))) {
+                    a__JCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__KCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ICHH + a__JCHH) & (__UINTEGER_32)(~ a__JCHH));
+                    ptr_table__PCHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KCHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__OCHH=((__POINTER )(NULL));
+                    result__QCHH=((__POINTER *)ptr_table__PCHH)[ 0];
+                    if ((result__QCHH == (void *)NULL)) {
+                      result__QCHH=new_lab__MRJ(new_size__KCHH);
+                      next__OCHH=(void *)((unsigned long)result__QCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KCHH)));
+                      ((__POINTER *)next__OCHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__PCHH)[ 0]=next__OCHH;
                     } else {
-                      next__0VAH=((__POINTER *)result__2VAH)[ 0];
-                      if ((next__0VAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2VAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WVAH <<  1)) <=  4096)) {
-                          next__0VAH=(void *)((unsigned long)result__2VAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVAH)));
+                      next__OCHH=((__POINTER *)result__QCHH)[ 0];
+                      if ((next__OCHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QCHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KCHH <<  1)) <=  4096)) {
+                          next__OCHH=(void *)((unsigned long)result__QCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KCHH)));
                         } else {
-                          next__0VAH=new_lab__ARJ(new_size__WVAH);
+                          next__OCHH=new_lab__MRJ(new_size__KCHH);
                         };
-                        ((__POINTER *)next__0VAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__1VAH)[ 0]=next__0VAH;
+                        ((__POINTER *)next__OCHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__PCHH)[ 0]=next__OCHH;
                       } else {
-                        ((__POINTER *)result__2VAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__2VAH=next__0VAH;
+                        ((__POINTER *)result__QCHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OCHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__QCHH=next__OCHH;
                       };
                     };
-                    ptr__SVAH=result__2VAH;
+                    ptr__GCHH=result__QCHH;
                   } else {
-                    t__XVAH=((__UINTEGER_32 )typ_id__TVAH);
-                    a__YVAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__DWAH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVAH + a__YVAH) & (__UINTEGER_32)(~ a__YVAH));
-                    ptr_table__AWAH=((__POINTER )(&(table_type[(t__XVAH)])));
-                    lab_type__CWAH=(__UINTEGER_32)(t__XVAH |  1);
-                    next__5VAH=((__POINTER )(NULL));
-                    result__BWAH=((__POINTER *)ptr_table__AWAH)[ 0];
-                    if ((result__BWAH == (void *)NULL)) {
-                      result__BWAH=new_lab__ARJ(lab_type__CWAH);
-                      next__5VAH=(void *)((unsigned long)result__BWAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DWAH)));
-                      ((__POINTER *)next__5VAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__AWAH)[ 0]=next__5VAH;
+                    t__LCHH=((__UINTEGER_32 )typ_id__HCHH);
+                    a__MCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__XCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ICHH + a__MCHH) & (__UINTEGER_32)(~ a__MCHH));
+                    ptr_table__UCHH=((__POINTER )(&(table_type[(t__LCHH)])));
+                    lab_type__WCHH=(__UINTEGER_32)(t__LCHH |  1);
+                    next__TCHH=((__POINTER )(NULL));
+                    result__VCHH=((__POINTER *)ptr_table__UCHH)[ 0];
+                    if ((result__VCHH == (void *)NULL)) {
+                      result__VCHH=new_lab__MRJ(lab_type__WCHH);
+                      next__TCHH=(void *)((unsigned long)result__VCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XCHH)));
+                      ((__POINTER *)next__TCHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__UCHH)[ 0]=next__TCHH;
                     } else {
-                      next__5VAH=((__POINTER *)result__BWAH)[ 0];
-                      if ((next__5VAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BWAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DWAH <<  1)) <=  4096)) {
-                          next__5VAH=(void *)((unsigned long)result__BWAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DWAH)));
+                      next__TCHH=((__POINTER *)result__VCHH)[ 0];
+                      if ((next__TCHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VCHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XCHH <<  1)) <=  4096)) {
+                          next__TCHH=(void *)((unsigned long)result__VCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XCHH)));
                         } else {
-                          next__5VAH=new_lab__ARJ(lab_type__CWAH);
+                          next__TCHH=new_lab__MRJ(lab_type__WCHH);
                         };
-                        ((__POINTER *)next__5VAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__AWAH)[ 0]=next__5VAH;
+                        ((__POINTER *)next__TCHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__UCHH)[ 0]=next__TCHH;
                       } else {
-                        ((__POINTER *)result__BWAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5VAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__BWAH=next__5VAH;
+                        ((__POINTER *)result__VCHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TCHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__VCHH=next__TCHH;
                       };
                     };
-                    ptr__SVAH=result__BWAH;
+                    ptr__GCHH=result__VCHH;
                   };
-                  result__RVAH=((__ITM_READ_ARG1 *)ptr__SVAH);
-                  *(result__RVAH) = *(ITM_READ_ARG1__);
+                  result__FCHH=((__ITM_READ_ARG1 *)ptr__GCHH);
+                  *(result__FCHH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__RVAH)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__AFBD;
+                ((__ITM_READ_ARG1 *)result__FCHH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__MFBD;
               };
             };
-            if (((void *)read_contract__1SF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__HTF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__EWAH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__EWAH=FALSE__;
+          result__YCHH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__YCHH=FALSE__;
           } else {
-            result__FWAH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__FWAH=((__CHARACTER )(( 0)));
+            result__ZCHH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__ZCHH=((__CHARACTER )(( 0)));
             } else {
-              result__FWAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__ZCHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__FWAH == ';')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__EWAH=TRUE__;
+            if ((result__ZCHH == ';')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__YCHH=TRUE__;
             };
           };
-          if ((! result__EWAH)) {
-            pos__W3OG=current_position__3WF();
-            put_error__text__4MG( 2,(&__string_229));
-            put_position__IOG(pos__W3OG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if ((! result__YCHH)) {
+            pos__ULUG=current_position__JXF();
+            put_error__text__KNG( 2,(&__string_239));
+            put_position__UOG(pos__ULUG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          if (is_shorter__WY) {
-            if ((((! is_short_code__G1) && (old_pos__GXOB !=  0)) && ((void *)((__SECTION_ *)last_section__L0C)->name__WYDC != (void *)(&__string_22)))) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__3WF()) >>  9) &  255) <  5)) {
-                while_do__B5KE:
+          if (is_shorter__5Y) {
+            if ((((! is_short_code__P1) && (old_pos__SXOB !=  0)) && ((void *)((__SECTION_ *)last_section__X0C)->name__CZDC != (void *)(&__string_22)))) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__JXF()) >>  9) &  255) <  5)) {
+                while_do__KOLE:
                 {
-                  result__4OWG='\0';
-                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                    result__4OWG=((__CHARACTER )(( 0)));
+                  result__FF2G='\0';
+                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                    result__FF2G=((__CHARACTER )(( 0)));
                   } else {
-                    result__4OWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                    result__FF2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                   };
-                  if ((result__4OWG != ((__CHARACTER )(( 0))))) {
-                    result__5OWG='\0';
-                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                      result__5OWG=((__CHARACTER )(( 0)));
+                  if ((result__FF2G != ((__CHARACTER )(( 0))))) {
+                    result__OF2G='\0';
+                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                      result__OF2G=((__CHARACTER )(( 0)));
                     } else {
-                      result__5OWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                      result__OF2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                     };
-                    __tmp__U3OB=(((((((result__5OWG == ' ') || (result__5OWG == '\t')) || (result__5OWG == '\n')) || (result__5OWG == '\r')) || (result__5OWG == '\0')) || (result__5OWG == '\f')) || (result__5OWG == '\v'));
+                    __tmp__A4OB=(((((((result__OF2G == ' ') || (result__OF2G == '\t')) || (result__OF2G == '\n')) || (result__OF2G == '\r')) || (result__OF2G == '\0')) || (result__OF2G == '\f')) || (result__OF2G == '\v'));
                   } else {
-                    __tmp__U3OB=FALSE__;
+                    __tmp__A4OB=FALSE__;
                   };
-                  if (__tmp__U3OB) {
-                    result__APWG='\0';
-                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                      result__APWG=((__CHARACTER )(( 0)));
+                  if (__tmp__A4OB) {
+                    result__TF2G='\0';
+                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                      result__TF2G=((__CHARACTER )(( 0)));
                     } else {
-                      result__APWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                      result__TF2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                     };
-                    __tmp__V3OB=(result__APWG != '\n');
+                    __tmp__B4OB=(result__TF2G != '\n');
                   } else {
-                    __tmp__V3OB=FALSE__;
+                    __tmp__B4OB=FALSE__;
                   };
-                  if (__tmp__V3OB) {
-                    position__GBC=(__INTEGER)(position__GBC +  1);
-                    goto while_do__B5KE;
+                  if (__tmp__B4OB) {
+                    position__SBC=(__INTEGER)(position__SBC +  1);
+                    goto while_do__KOLE;
                   };
                 };
-                result__BPWG='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__BPWG=((__CHARACTER )(( 0)));
+                result__YF2G='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__YF2G=((__CHARACTER )(( 0)));
                 } else {
-                  result__BPWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__YF2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                if ((result__BPWG == '\n')) {
-                  position__GBC=(__INTEGER)(position__GBC +  1);
+                if ((result__YF2G == '\n')) {
+                  position__SBC=(__INTEGER)(position__SBC +  1);
                 };
               };
-              Self__UQ5G=((__STRING *)output_code__SI);
-              start__RQ5G=(__INTEGER)(old_pos__GXOB + old_derive__HXOB);
-              end__QQ5G=(__INTEGER)((__INTEGER)(position__GBC + short_derive__VBC) -  1);
-              len__SQ5G=(__INTEGER)((__INTEGER)(end__QQ5G - start__RQ5G) +  1);
-              if ((len__SQ5G >  0)) {
-                __tmp__TQ5G=(__INTEGER)(end__QQ5G +  1);
-                __tmp__VQ5G=Self__UQ5G->count__KFC;
-                Self__WQ5G=__tmp__TQ5G;
-                while ((Self__WQ5G <= __tmp__VQ5G)) {
-                  ((__CHARACTER *)Self__UQ5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__WQ5G - len__SQ5G) -  1)]=((__CHARACTER *)Self__UQ5G->storage__VBS)[(__INTEGER)(Self__WQ5G -  1)];
-                  Self__WQ5G=(__INTEGER)(Self__WQ5G +  1);
+              Self__A3FH=((__STRING *)output_code__SI);
+              start__32FH=(__INTEGER)(old_pos__SXOB + old_derive__TXOB);
+              end__22FH=(__INTEGER)((__INTEGER)(position__SBC + short_derive__BCC) -  1);
+              len__42FH=(__INTEGER)((__INTEGER)(end__22FH - start__32FH) +  1);
+              if ((len__42FH >  0)) {
+                __tmp__52FH=(__INTEGER)(end__22FH +  1);
+                __tmp__B3FH=Self__A3FH->count__WFC;
+                Self__C3FH=__tmp__52FH;
+                while ((Self__C3FH <= __tmp__B3FH)) {
+                  ((__CHARACTER *)Self__A3FH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__C3FH - len__42FH) -  1)]=((__CHARACTER *)Self__A3FH->storage__BCS)[(__INTEGER)(Self__C3FH -  1)];
+                  Self__C3FH=(__INTEGER)(Self__C3FH +  1);
                 };
-                Self__UQ5G->count__KFC=(__INTEGER)(Self__UQ5G->count__KFC - len__SQ5G);
+                Self__A3FH->count__WFC=(__INTEGER)(Self__A3FH->count__WFC - len__42FH);
               };
-              short_derive__VBC=(__INTEGER)(old_derive__HXOB - (__INTEGER)(position__GBC - old_pos__GXOB));
+              short_derive__BCC=(__INTEGER)(old_derive__TXOB - (__INTEGER)(position__SBC - old_pos__SXOB));
             };
           };
-          __tmp__24OB=((__PROTOTYPE *)object__3AC)->slot_list__QUS;
-          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-            __tmp__44OB=((__ITM_SLOT *)last_slot__E2D)->parent_named__G5.name__LI;
+          __tmp__I5OB=((__PROTOTYPE *)object__JBC)->slot_list__2US;
+          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+            __tmp__K5OB=((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.name__LI;
           } else {
-            __tmp__44OB=((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__K5OB=((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
           };
-          s__IXOB=fast_reference_at__EAGC(__tmp__24OB,__tmp__44OB);
-          if (((void *)s__IXOB != (void *)NULL)) {
-            put_error__text__4MG( 1,(&__string_230));
-            if (((struct ___OBJ *)s__IXOB)->__id==__ITM_SLOT__) {
-              __tmp__J5OB=((__ITM_SLOT *)s__IXOB)->parent_named__G5.parent_itm_object__4.position__BDJ;
+          s__UXOB=fast_reference_at__QAGC(__tmp__I5OB,__tmp__K5OB);
+          if (((void *)s__UXOB != (void *)NULL)) {
+            put_error__text__KNG( 1,(&__string_240));
+            if (((struct ___OBJ *)s__UXOB)->__id==__ITM_SLOT__) {
+              __tmp__V5OB=((__ITM_SLOT *)s__UXOB)->parent_named__P5.parent_itm_object__4.position__NDJ;
             } else {
-              __tmp__J5OB=((__ITM_SLOT_OPERATOR *)s__IXOB)->parent_itm_slot__CU5B.parent_named__G5.parent_itm_object__4.position__BDJ;
+              __tmp__V5OB=((__ITM_SLOT_OPERATOR *)s__UXOB)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
             };
-            put_position__IOG(__tmp__J5OB);
-            if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-              __tmp__L5OB=((__ITM_SLOT *)last_slot__E2D)->parent_named__G5.parent_itm_object__4.position__BDJ;
+            put_position__UOG(__tmp__V5OB);
+            if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+              __tmp__X5OB=((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.parent_itm_object__4.position__NDJ;
             } else {
-              __tmp__L5OB=((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.parent_itm_object__4.position__BDJ;
+              __tmp__X5OB=((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
             };
-            put_position__IOG(__tmp__L5OB);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+            put_position__UOG(__tmp__X5OB);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          Self__RFZB=((__PROTOTYPE *)object__3AC);
-          s__SFZB=last_slot__E2D;
-          __tmp__TFZB=Self__RFZB->slot_list__QUS;
-          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
-            __tmp__UFZB=((__ITM_SLOT *)last_slot__E2D)->parent_named__G5.name__LI;
+          Self__3FZB=((__PROTOTYPE *)object__JBC);
+          s__4FZB=last_slot__Q2D;
+          __tmp__5FZB=Self__3FZB->slot_list__2US;
+          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+            __tmp__AGZB=((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.name__LI;
           } else {
-            __tmp__UFZB=((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+            __tmp__AGZB=((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
           };
-          fast_put__to__VNGC(__tmp__TFZB,last_slot__E2D,__tmp__UFZB);
-          if (((void *)Self__RFZB->first_slot__WFZB == (void *)NULL)) {
-            Self__RFZB->first_slot__WFZB=s__SFZB;
+          fast_put__to__BOGC(__tmp__5FZB,last_slot__Q2D,__tmp__AGZB);
+          if (((void *)Self__3FZB->first_slot__CGZB == (void *)NULL)) {
+            Self__3FZB->first_slot__CGZB=s__4FZB;
           } else {
-            __tmp__CGZB=Self__RFZB->last_slot__C1C;
-            if (((struct ___OBJ *)__tmp__CGZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__CGZB)->next__CHHC=s__SFZB;
+            __tmp__OGZB=Self__3FZB->last_slot__O1C;
+            if (((struct ___OBJ *)__tmp__OGZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__OGZB)->next__OHHC=s__4FZB;
             } else {
-              ((__ITM_SLOT_OPERATOR *)__tmp__CGZB)->parent_itm_slot__CU5B.next__CHHC=s__SFZB;
-            };
-          };
-          Self__RFZB->last_slot__C1C=s__SFZB;
-          if (is_shorter__WY) {
-            Self__XJ3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__3BC);
-            Self__XJ3B->count__MHY= 0;
-            __tmp__ZJ3B=Self__XJ3B->buckets__DEV;
-            __tmp__2J3B=(__INTEGER)(Self__XJ3B->capacity__4HT -  1);
-            Self__HHHC=((void **)__tmp__ZJ3B);
-            Self__JZPC=__tmp__2J3B;
-            while ((Self__JZPC >=  0)) {
-              Self__HHHC[Self__JZPC]=NULL;
-              Self__JZPC=(__INTEGER)(Self__JZPC -  1);
-            };
-          };
-        };
-      } while (result__BXOB);
-      if (is_shorter__WY) {
-        if (((! is_short_private__U1) && ((void *)((__SECTION_ *)last_section__L0C)->name__WYDC == (void *)(&__string_26)))) {
-          Self__3Q5G=((__STRING *)output_code__SI);
-          start__0Q5G=(__INTEGER)(pos_sec__FXC + old_derive__GXC);
-          end__ZQ5G=(__INTEGER)((__INTEGER)(position__GBC + short_derive__VBC) -  1);
-          len__1Q5G=(__INTEGER)((__INTEGER)(end__ZQ5G - start__0Q5G) +  1);
-          if ((len__1Q5G >  0)) {
-            __tmp__2Q5G=(__INTEGER)(end__ZQ5G +  1);
-            __tmp__4Q5G=Self__3Q5G->count__KFC;
-            Self__5Q5G=__tmp__2Q5G;
-            while ((Self__5Q5G <= __tmp__4Q5G)) {
-              ((__CHARACTER *)Self__3Q5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__5Q5G - len__1Q5G) -  1)]=((__CHARACTER *)Self__3Q5G->storage__VBS)[(__INTEGER)(Self__5Q5G -  1)];
-              Self__5Q5G=(__INTEGER)(Self__5Q5G +  1);
-            };
-            Self__3Q5G->count__KFC=(__INTEGER)(Self__3Q5G->count__KFC - len__1Q5G);
-          };
-          short_derive__VBC=(__INTEGER)(old_derive__GXC - (__INTEGER)(position__GBC - pos_sec__FXC));
-        };
-        pos_sec__FXC=position__GBC;
-        old_derive__GXC=short_derive__VBC;
-      };
-      goto while_do__R4E;
-    };
-  };
-  if (((void *)read_contract__1SF(PARSER__) != (void *)NULL)) {
-    pos__R4OG=current_position__3WF();
-    put_error__text__4MG( 2,(&__string_231));
-    put_position__IOG(pos__R4OG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+              ((__ITM_SLOT_OPERATOR *)__tmp__OGZB)->parent_itm_slot__OU5B.next__OHHC=s__4FZB;
+            };
+          };
+          Self__3FZB->last_slot__O1C=s__4FZB;
+          if (is_shorter__5Y) {
+            Self__DK3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__JCC);
+            Self__DK3B->count__YHY= 0;
+            __tmp__FK3B=Self__DK3B->buckets__PEV;
+            __tmp__IK3B=(__INTEGER)(Self__DK3B->capacity__KIT -  1);
+            Self__THHC=((void **)__tmp__FK3B);
+            Self__VZPC=__tmp__IK3B;
+            while ((Self__VZPC >=  0)) {
+              Self__THHC[Self__VZPC]=NULL;
+              Self__VZPC=(__INTEGER)(Self__VZPC -  1);
+            };
+          };
+        };
+      } while (result__NXOB);
+      if (is_shorter__5Y) {
+        if (((! is_short_private__31) && ((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_26)))) {
+          Self__J3FH=((__STRING *)output_code__SI);
+          start__G3FH=(__INTEGER)(pos_sec__RXC + old_derive__SXC);
+          end__F3FH=(__INTEGER)((__INTEGER)(position__SBC + short_derive__BCC) -  1);
+          len__H3FH=(__INTEGER)((__INTEGER)(end__F3FH - start__G3FH) +  1);
+          if ((len__H3FH >  0)) {
+            __tmp__I3FH=(__INTEGER)(end__F3FH +  1);
+            __tmp__K3FH=Self__J3FH->count__WFC;
+            Self__L3FH=__tmp__I3FH;
+            while ((Self__L3FH <= __tmp__K3FH)) {
+              ((__CHARACTER *)Self__J3FH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__L3FH - len__H3FH) -  1)]=((__CHARACTER *)Self__J3FH->storage__BCS)[(__INTEGER)(Self__L3FH -  1)];
+              Self__L3FH=(__INTEGER)(Self__L3FH +  1);
+            };
+            Self__J3FH->count__WFC=(__INTEGER)(Self__J3FH->count__WFC - len__H3FH);
+          };
+          short_derive__BCC=(__INTEGER)(old_derive__SXC - (__INTEGER)(position__SBC - pos_sec__RXC));
+        };
+        pos_sec__RXC=position__SBC;
+        old_derive__SXC=short_derive__BCC;
+      };
+      goto while_do__34E;
+    };
+  };
+  if (((void *)read_contract__HTF(PARSER__) != (void *)NULL)) {
+    pos__PMUG=current_position__JXF();
+    put_error__text__KNG( 2,(&__string_241));
+    put_position__UOG(pos__PMUG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  read_space__RRD();
-  result__OPWG='\0';
-  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-    result__OPWG=((__CHARACTER )(( 0)));
+  read_space__3RD();
+  result__JG2G='\0';
+  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+    result__JG2G=((__CHARACTER )(( 0)));
   } else {
-    result__OPWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-  };
-  if ((result__OPWG != ((__CHARACTER )(( 0))))) {
-    pos__T4OG=current_position__3WF();
-    put_error__text__4MG( 0,(&__string_161));
-    put_position__IOG(pos__T4OG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    result__JG2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+  };
+  if ((result__JG2G != ((__CHARACTER )(( 0))))) {
+    pos__RMUG=current_position__JXF();
+    put_error__text__KNG( 0,(&__string_164));
+    put_position__UOG(pos__RMUG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  short__token__to__5AD((&__string_118),((__STRING *)source__DBC)->count__KFC,((__STRING *)source__DBC)->count__KFC);
-  object__3AC=NULL;
+  short__token__to__LBD((&__string_118),((__STRING *)source__PBC)->count__WFC,((__STRING *)source__PBC)->count__WFC);
+  object__JBC=NULL;
 }
 
-static void put__to__like__CZXD(void *tok__EZXD,void *buf__FZXD,void *key__GZXD)
+static void put__to__like__1ZXD(void *tok__3ZXD,void *buf__4ZXD,void *key__5ZXD)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__SZXD,Self__PZME;
-  void *lst__HZXD;
-  lst__HZXD=fast_reference_at__TR4D(short_dico__QD,key__GZXD);
-  if (((void *)lst__HZXD != (void *)NULL)) {
-    __tmp__SZXD=((__LINKED_LISToSTRING_CONSTANTo *)lst__HZXD)->parent_linked_collection__LD.upper__TCD;
-    Self__PZME= 1;
-    while ((Self__PZME <= __tmp__SZXD)) {
-      if (((void *)item__M0ND(lst__HZXD,Self__PZME) == (void *)NULL)) {
-        append__VNS(buf__FZXD,tok__EZXD);
+  __INTEGER __tmp__L0XD,Self__YINE;
+  void *lst__A0XD;
+  lst__A0XD=fast_reference_at__E34D(short_dico__QD,key__5ZXD);
+  if (((void *)lst__A0XD != (void *)NULL)) {
+    __tmp__L0XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__A0XD)->parent_linked_collection__LD.upper__5CD;
+    Self__YINE= 1;
+    while ((Self__YINE <= __tmp__L0XD)) {
+      if (((void *)item__Y0ND(lst__A0XD,Self__YINE) == (void *)NULL)) {
+        append__BOS(buf__4ZXD,tok__3ZXD);
+      } else {
+        append__BOS(buf__4ZXD,item__Y0ND(lst__A0XD,Self__YINE));
+      };
+      Self__YINE=(__INTEGER)(Self__YINE +  1);
+    };
+  };
+}
+
+static void shorter_get_all_slot_in__E1XD(__PROTOTYPE *Self__F1XD,void *lst__G1XD)
+// ({PROTOTYPE},{NULLxFAST_ARRAYoITM_SLOTo}) VoidRecursive, No inlinable.
+{
+  void *ps__I1XD,*__tmp__U3XD;
+  void *p__J1XD;
+  __INTEGER i__K1XD,new_capacity__BNWE,__tmp__FOWE,__tmp__OXOF;
+  __INTEGER Self__ZO4F;
+  void *s__H1XD,*__tmp__E2XD,*__tmp__12XD,*__tmp__15XD;
+  void *__tmp__F2XD,*__tmp__G2XD,*__tmp__B4XD,*__tmp__F5XD,*__tmp__G5XD;
+  void *__tmp__H3XD;
+  __SECTION_ *Self__BCFC;
+  void *__tmp__S3XD;
+  __BOOLEAN __tmp__J2XD,__tmp__PNWE,__tmp__L3XD,__tmp__F4XD,__tmp__G4XD;
+  __FAST_ARRAYoITM_SLOTo *Self__5MWE;
+  void **__tmp__EOWE,**new__0WOF;
+  __CHARACTER __tmp__03XD;
+  ps__I1XD=NULL;
+  p__J1XD=NULL;
+  i__K1XD= 0;
+  s__H1XD=Self__F1XD->first_slot__CGZB;
+  while (((void *)s__H1XD != (void *)NULL)) {
+    i__K1XD= 0;
+    while_do__N5PE:
+    {
+      if ((i__K1XD <= ((__FAST_ARRAYoITM_SLOTo *)lst__G1XD)->parent_arrayed_collection__4JTD.upper__21XD)) {
+        __tmp__E2XD=((void **)((__FAST_ARRAYoITM_SLOTo *)lst__G1XD)->parent_arrayed_collection__4JTD.storage__MZVE)[i__K1XD];
+        if (((struct ___OBJ *)__tmp__E2XD)->__id==__ITM_SLOT__) {
+          __tmp__F2XD=((__ITM_SLOT *)__tmp__E2XD)->parent_named__P5.name__LI;
+        } else {
+          __tmp__F2XD=((__ITM_SLOT_OPERATOR *)__tmp__E2XD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+        };
+        if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
+          __tmp__G2XD=((__ITM_SLOT *)s__H1XD)->parent_named__P5.name__LI;
+        } else {
+          __tmp__G2XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+        };
+        __tmp__J2XD=((void *)__tmp__F2XD != (void *)__tmp__G2XD);
+      } else {
+        __tmp__J2XD=FALSE__;
+      };
+      if (__tmp__J2XD) {
+        i__K1XD=(__INTEGER)(i__K1XD +  1);
+        goto while_do__N5PE;
+      };
+    };
+    if ((i__K1XD > ((__FAST_ARRAYoITM_SLOTo *)lst__G1XD)->parent_arrayed_collection__4JTD.upper__21XD)) {
+      Self__5MWE=((__FAST_ARRAYoITM_SLOTo *)lst__G1XD);
+      new_capacity__BNWE= 0;
+      if (((__INTEGER)(Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD +  1) <= (__INTEGER)(Self__5MWE->parent_arrayed_collection__4JTD.capacity__SMVE -  1))) {
+        Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD=(__INTEGER)(Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD +  1);
+        __tmp__PNWE=TRUE__;
+      } else {
+        __tmp__PNWE=FALSE__;
+      };
+      if ((! __tmp__PNWE)) {
+        if ((Self__5MWE->parent_arrayed_collection__4JTD.capacity__SMVE ==  0)) {
+          Self__5MWE->parent_arrayed_collection__4JTD.storage__MZVE=create__5FEF( 2);
+          Self__5MWE->parent_arrayed_collection__4JTD.capacity__SMVE= 2;
+          Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD= 0;
+        } else {
+          new_capacity__BNWE=(__INTEGER)(Self__5MWE->parent_arrayed_collection__4JTD.capacity__SMVE <<  1);
+          __tmp__EOWE=Self__5MWE->parent_arrayed_collection__4JTD.storage__MZVE;
+          __tmp__FOWE=Self__5MWE->parent_arrayed_collection__4JTD.capacity__SMVE;
+          new__0WOF=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__EOWE)),((__UINTEGER_32 )(__INTEGER)(__tmp__FOWE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BNWE * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__OXOF=(__INTEGER)(new_capacity__BNWE -  1);
+          Self__ZO4F=__tmp__FOWE;
+          while ((Self__ZO4F <= __tmp__OXOF)) {
+            new__0WOF[Self__ZO4F]=NULL;
+            Self__ZO4F=(__INTEGER)(Self__ZO4F +  1);
+          };
+          Self__5MWE->parent_arrayed_collection__4JTD.storage__MZVE=new__0WOF;
+          Self__5MWE->parent_arrayed_collection__4JTD.capacity__SMVE=new_capacity__BNWE;
+          Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD=(__INTEGER)(Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD +  1);
+        };
+      };
+      ((void **)Self__5MWE->parent_arrayed_collection__4JTD.storage__MZVE)[Self__5MWE->parent_arrayed_collection__4JTD.upper__21XD]=s__H1XD;
+    };
+    if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
+      __tmp__12XD=((__ITM_SLOT *)s__H1XD)->next__OHHC;
+    } else {
+      __tmp__12XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.next__OHHC;
+    };
+    s__H1XD=__tmp__12XD;
+  };
+  s__H1XD=Self__F1XD->first_slot__CGZB;
+  while_do__054D:
+  {
+    if (((void *)s__H1XD != (void *)NULL)) {
+      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
+        __tmp__H3XD=((__ITM_SLOT *)s__H1XD)->id_section__Y1C;
+      } else {
+        __tmp__H3XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.id_section__Y1C;
+      };
+      Self__BCFC=((__SECTION_ *)__tmp__H3XD);
+      __tmp__L3XD=(((void *)Self__BCFC->name__CZDC == (void *)(&__string_23)) || ((void *)Self__BCFC->name__CZDC == (void *)(&__string_24)));
+    } else {
+      __tmp__L3XD=FALSE__;
+    };
+    if (__tmp__L3XD) {
+      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
+        __tmp__S3XD=((__ITM_SLOT *)s__H1XD)->result_type__04FC;
+      } else {
+        __tmp__S3XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.result_type__04FC;
+      };
+      if (__tmp__S3XD==NULL) {
+        __tmp__U3XD=NULL;
+      } else {
+        switch (((struct ___OBJ *)__tmp__S3XD)->__id) {
+        case __ITM_TYPE_PARAMETER__: {
+          __tmp__U3XD=((void *)__tmp__S3XD);
+        } break;
+        case __ITM_TYPE_SIMPLE__: {
+          __tmp__U3XD=((void *)__tmp__S3XD);
+        } break;
+        case __ITM_TYPE_MULTI__: {
+          __tmp__U3XD=NULL;
+        } break;
+        case __ITM_TYPE_BLOCK__: {
+          __tmp__U3XD=NULL;
+        } break;
+        case __ITM_TYPE_GENERIC__: {
+          __tmp__U3XD=((void *)__tmp__S3XD);
+        } break;
+        case __ITM_TYPE_STYLE__: {
+          __tmp__U3XD=((void *)__tmp__S3XD);
+        } break;
+        }
+      };
+      ps__I1XD=__tmp__U3XD;
+      if (((void *)__tmp__U3XD != (void *)NULL)) {
+        if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
+          __tmp__03XD=((__ITM_SLOT *)s__H1XD)->parent_named__P5.style__BEU;
+        } else {
+          __tmp__03XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+        };
+        __tmp__F4XD=(__tmp__03XD == '+');
+      } else {
+        __tmp__F4XD=FALSE__;
+      };
+      if (__tmp__F4XD) {
+        switch (((struct ___OBJ *)__tmp__U3XD)->__id) {
+        case __ITM_TYPE_PARAMETER__: {
+          __tmp__B4XD=NULL;
+        } break;
+        case __ITM_TYPE_SIMPLE__: {
+          __tmp__B4XD=NULL;
+        } break;
+        case __ITM_TYPE_GENERIC__: {
+          __tmp__B4XD=((__ITM_TYPE_GENERIC *)__tmp__U3XD)->parent_itm_type_style__CSN.style__TYP;
+        } break;
+        case __ITM_TYPE_STYLE__: {
+          __tmp__B4XD=((__ITM_TYPE_STYLE *)__tmp__U3XD)->style__TYP;
+        } break;
+        };
+        __tmp__G4XD=((void *)__tmp__B4XD == (void *)(&__string_9));
+      } else {
+        __tmp__G4XD=FALSE__;
+      };
+      if (__tmp__G4XD) {
+        p__J1XD=NULL;
+        i__K1XD= 0;
+        while (((i__K1XD <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__J1XD == (void *)NULL))) {
+          __tmp__F5XD=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__K1XD])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__I1XD)->__id) {
+          case __ITM_TYPE_PARAMETER__: {
+            __tmp__G5XD=((__ITM_TYPE_PARAMETER *)ps__I1XD)->parent_itm_type__3DE.name__KYP;
+          } break;
+          case __ITM_TYPE_SIMPLE__: {
+            __tmp__G5XD=((__ITM_TYPE_SIMPLE *)ps__I1XD)->name__KYP;
+          } break;
+          case __ITM_TYPE_GENERIC__: {
+            __tmp__G5XD=((__ITM_TYPE_GENERIC *)ps__I1XD)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP;
+          } break;
+          case __ITM_TYPE_STYLE__: {
+            __tmp__G5XD=((__ITM_TYPE_STYLE *)ps__I1XD)->parent_itm_type_simple__BSN.name__KYP;
+          } break;
+          };
+          if (((void *)__tmp__F5XD == (void *)__tmp__G5XD)) {
+            p__J1XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__K1XD];
+          };
+          i__K1XD=(__INTEGER)(i__K1XD +  1);
+        };
+        if (((void *)p__J1XD != (void *)NULL)) {
+          shorter_get_all_slot_in__E1XD(p__J1XD,lst__G1XD);
+        };
+      };
+      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
+        __tmp__15XD=((__ITM_SLOT *)s__H1XD)->next__OHHC;
       } else {
-        append__VNS(buf__FZXD,item__M0ND(lst__HZXD,Self__PZME));
+        __tmp__15XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.next__OHHC;
       };
-      Self__PZME=(__INTEGER)(Self__PZME +  1);
+      s__H1XD=__tmp__15XD;
+      goto while_do__054D;
     };
   };
 }
 
-static void pretty_name_in__DW1E(__ITM_SLOT *Self__EW1E,void *buffer__FW1E)
+static void pretty_name_in__IA3F(__ITM_SLOT *Self__JA3F,void *buffer__KA3F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__GW1E;
-  __STRING_CONSTANT *Self__WO3G;
-  j__GW1E= 1;
-  while ((j__GW1E < ((__STRING_CONSTANT *)Self__EW1E->parent_named__G5.name__LI)->count__DD)) {
-    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__EW1E->parent_named__G5.name__LI)->storage__JQO)[(__INTEGER)(j__GW1E -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__EW1E->parent_named__G5.name__LI)->storage__JQO)[(__INTEGER)((__INTEGER)(j__GW1E +  1) -  1)] == '_'))) {
-      add_last__NLT(buffer__FW1E,' ');
-      j__GW1E=(__INTEGER)(j__GW1E +  2);
+  __INTEGER j__LA3F;
+  __STRING_CONSTANT *Self__V0DH;
+  j__LA3F= 1;
+  while ((j__LA3F < ((__STRING_CONSTANT *)Self__JA3F->parent_named__P5.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__JA3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__LA3F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__JA3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)((__INTEGER)(j__LA3F +  1) -  1)] == '_'))) {
+      add_last__ZLT(buffer__KA3F,' ');
+      j__LA3F=(__INTEGER)(j__LA3F +  2);
     } else {
-      add_last__NLT(buffer__FW1E,((__CHARACTER *)((__STRING_CONSTANT *)Self__EW1E->parent_named__G5.name__LI)->storage__JQO)[(__INTEGER)(j__GW1E -  1)]);
-      j__GW1E=(__INTEGER)(j__GW1E +  1);
+      add_last__ZLT(buffer__KA3F,((__CHARACTER *)((__STRING_CONSTANT *)Self__JA3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__LA3F -  1)]);
+      j__LA3F=(__INTEGER)(j__LA3F +  1);
     };
   };
-  Self__WO3G=((__STRING_CONSTANT *)Self__EW1E->parent_named__G5.name__LI);
-  add_last__NLT(buffer__FW1E,((__CHARACTER *)Self__WO3G->storage__JQO)[(__INTEGER)(Self__WO3G->count__DD -  1)]);
+  Self__V0DH=((__STRING_CONSTANT *)Self__JA3F->parent_named__P5.name__LI);
+  add_last__ZLT(buffer__KA3F,((__CHARACTER *)Self__V0DH->storage__VQO)[(__INTEGER)(Self__V0DH->count__DD -  1)]);
 }
 
-static void pretty_name_in__YX1E(__ITM_SLOT_OPERATOR *Self__ZX1E,void *buffer__0X1E)
+static void pretty_name_in__3B3F(__ITM_SLOT_OPERATOR *Self__4B3F,void *buffer__5B3F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__0UCH,*Self__DFQE;
-  __INTEGER i__YUCH,i__HFQE;
-  __BOOLEAN result__XUCH,__tmp__FY1E,result__GFQE;
-  Self__0UCH=((__STRING_CONSTANT *)Self__ZX1E->parent_itm_slot__CU5B.parent_named__G5.name__LI);
-  result__XUCH=FALSE__;
-  i__YUCH= 0;
-  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__0UCH->count__DD)) {
-    i__YUCH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
-    while ((! ((i__YUCH ==  0) || (((__CHARACTER *)Self__0UCH->storage__JQO)[(__INTEGER)(i__YUCH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__JQO)[(__INTEGER)(i__YUCH -  1)])))) {
-      i__YUCH=(__INTEGER)(i__YUCH -  1);
-    };
-    result__XUCH=(i__YUCH ==  0);
-  };
-  if (result__XUCH) {
-    append__VNS(buffer__0X1E,(&__string_232));
-    __tmp__FY1E=TRUE__;
+  __STRING_CONSTANT *Self__YBJH,*Self__QZ2F;
+  __INTEGER i__WBJH,i__UZ2F;
+  __BOOLEAN result__VBJH,__tmp__KC3F,result__TZ2F;
+  Self__YBJH=((__STRING_CONSTANT *)Self__4B3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
+  result__VBJH=FALSE__;
+  i__WBJH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__YBJH->count__DD)) {
+    i__WBJH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__WBJH ==  0) || (((__CHARACTER *)Self__YBJH->storage__VQO)[(__INTEGER)(i__WBJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__VQO)[(__INTEGER)(i__WBJH -  1)])))) {
+      i__WBJH=(__INTEGER)(i__WBJH -  1);
+    };
+    result__VBJH=(i__WBJH ==  0);
+  };
+  if (result__VBJH) {
+    append__BOS(buffer__5B3F,(&__string_242));
+    __tmp__KC3F=TRUE__;
   } else {
-    __tmp__FY1E=FALSE__;
+    __tmp__KC3F=FALSE__;
   };
-  if ((! __tmp__FY1E)) {
-    Self__DFQE=((__STRING_CONSTANT *)Self__ZX1E->parent_itm_slot__CU5B.parent_named__G5.name__LI);
-    result__GFQE=FALSE__;
-    i__HFQE= 0;
-    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__DFQE->count__DD)) {
-      i__HFQE=((__STRING_CONSTANT *)(&__string_81))->count__DD;
-      while ((! ((i__HFQE ==  0) || (((__CHARACTER *)Self__DFQE->storage__JQO)[(__INTEGER)(i__HFQE -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__JQO)[(__INTEGER)(i__HFQE -  1)])))) {
-        i__HFQE=(__INTEGER)(i__HFQE -  1);
+  if ((! __tmp__KC3F)) {
+    Self__QZ2F=((__STRING_CONSTANT *)Self__4B3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
+    result__TZ2F=FALSE__;
+    i__UZ2F= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__QZ2F->count__DD)) {
+      i__UZ2F=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__UZ2F ==  0) || (((__CHARACTER *)Self__QZ2F->storage__VQO)[(__INTEGER)(i__UZ2F -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__VQO)[(__INTEGER)(i__UZ2F -  1)])))) {
+        i__UZ2F=(__INTEGER)(i__UZ2F -  1);
       };
-      result__GFQE=(i__HFQE ==  0);
+      result__TZ2F=(i__UZ2F ==  0);
     };
-    if (result__GFQE) {
-      append__VNS(buffer__0X1E,(&__string_233));
+    if (result__TZ2F) {
+      append__BOS(buffer__5B3F,(&__string_243));
     } else {
-      append__VNS(buffer__0X1E,(&__string_234));
+      append__BOS(buffer__5B3F,(&__string_244));
     };
   };
-  append__VNS(buffer__0X1E,Self__ZX1E->pretty_name__J0HC);
-  add_last__NLT(buffer__0X1E,'\'');
+  append__BOS(buffer__5B3F,Self__4B3F->pretty_name__V0HC);
+  add_last__ZLT(buffer__5B3F,'\'');
 }
 
-static void get_all_comment_slot__in__OZ1E(__PROTOTYPE *Self__PZ1E,void *n__QZ1E,void *buf__RZ1E)
+static void get_all_comment_slot__in__FW2E(__PROTOTYPE *Self__GW2E,void *n__HW2E,void *buf__IW2E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *ps__TZ1E,*__tmp__B11E;
-  void *p__UZ1E;
-  __INTEGER i__VZ1E;
-  void *s__SZ1E,*__tmp__W21E;
-  void *__tmp__3Z1E,*__tmp__G01E,*__tmp__A21E,*__tmp__B21E;
-  void *__tmp__U01E;
-  __SECTION_ *Self__DKUG;
-  void *__tmp__501E;
-  __BOOLEAN __tmp__A01E,__tmp__Y01E;
-  ps__TZ1E=NULL;
-  p__UZ1E=NULL;
-  i__VZ1E= 0;
-  s__SZ1E=fast_reference_at__EAGC(Self__PZ1E->slot_list__QUS,n__QZ1E);
-  if (((void *)s__SZ1E != (void *)NULL)) {
-    if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
-      __tmp__3Z1E=((__ITM_SLOT *)s__SZ1E)->comment__KJJD;
-    } else {
-      __tmp__3Z1E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.comment__KJJD;
-    };
-    __tmp__A01E=((void *)__tmp__3Z1E != (void *)NULL);
+  void *ps__KW2E,*__tmp__YX2E;
+  void *p__LW2E;
+  __INTEGER i__MW2E;
+  void *s__JW2E,*__tmp__NZ2E;
+  void *__tmp__UW2E,*__tmp__3W2E,*__tmp__XY2E,*__tmp__YY2E;
+  void *__tmp__LX2E;
+  __SECTION_ *Self__W3ZG;
+  void *__tmp__WX2E;
+  __BOOLEAN __tmp__XW2E,__tmp__PX2E;
+  ps__KW2E=NULL;
+  p__LW2E=NULL;
+  i__MW2E= 0;
+  s__JW2E=fast_reference_at__QAGC(Self__GW2E->slot_list__2US,n__HW2E);
+  if (((void *)s__JW2E != (void *)NULL)) {
+    if (((struct ___OBJ *)s__JW2E)->__id==__ITM_SLOT__) {
+      __tmp__UW2E=((__ITM_SLOT *)s__JW2E)->comment__WJJD;
+    } else {
+      __tmp__UW2E=((__ITM_SLOT_OPERATOR *)s__JW2E)->parent_itm_slot__OU5B.comment__WJJD;
+    };
+    __tmp__XW2E=((void *)__tmp__UW2E != (void *)NULL);
   } else {
-    __tmp__A01E=FALSE__;
+    __tmp__XW2E=FALSE__;
   };
-  if (__tmp__A01E) {
-    if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
-      __tmp__G01E=((__ITM_SLOT *)s__SZ1E)->comment__KJJD;
+  if (__tmp__XW2E) {
+    if (((struct ___OBJ *)s__JW2E)->__id==__ITM_SLOT__) {
+      __tmp__3W2E=((__ITM_SLOT *)s__JW2E)->comment__WJJD;
     } else {
-      __tmp__G01E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.comment__KJJD;
+      __tmp__3W2E=((__ITM_SLOT_OPERATOR *)s__JW2E)->parent_itm_slot__OU5B.comment__WJJD;
     };
-    append__VNS(buf__RZ1E,__tmp__G01E);
+    append__BOS(buf__IW2E,__tmp__3W2E);
   };
-  s__SZ1E=Self__PZ1E->first_slot__WFZB;
-  while_do__SXDF:
+  s__JW2E=Self__GW2E->first_slot__CGZB;
+  while_do__VREF:
   {
-    if (((void *)s__SZ1E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
-        __tmp__U01E=((__ITM_SLOT *)s__SZ1E)->id_section__M1C;
+    if (((void *)s__JW2E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__JW2E)->__id==__ITM_SLOT__) {
+        __tmp__LX2E=((__ITM_SLOT *)s__JW2E)->id_section__Y1C;
       } else {
-        __tmp__U01E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.id_section__M1C;
+        __tmp__LX2E=((__ITM_SLOT_OPERATOR *)s__JW2E)->parent_itm_slot__OU5B.id_section__Y1C;
       };
-      Self__DKUG=((__SECTION_ *)__tmp__U01E);
-      __tmp__Y01E=(((void *)Self__DKUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__DKUG->name__WYDC == (void *)(&__string_24)));
+      Self__W3ZG=((__SECTION_ *)__tmp__LX2E);
+      __tmp__PX2E=(((void *)Self__W3ZG->name__CZDC == (void *)(&__string_23)) || ((void *)Self__W3ZG->name__CZDC == (void *)(&__string_24)));
     } else {
-      __tmp__Y01E=FALSE__;
+      __tmp__PX2E=FALSE__;
     };
-    if (__tmp__Y01E) {
-      if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
-        __tmp__501E=((__ITM_SLOT *)s__SZ1E)->result_type__O4FC;
+    if (__tmp__PX2E) {
+      if (((struct ___OBJ *)s__JW2E)->__id==__ITM_SLOT__) {
+        __tmp__WX2E=((__ITM_SLOT *)s__JW2E)->result_type__04FC;
       } else {
-        __tmp__501E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.result_type__O4FC;
+        __tmp__WX2E=((__ITM_SLOT_OPERATOR *)s__JW2E)->parent_itm_slot__OU5B.result_type__04FC;
       };
-      if (__tmp__501E==NULL) {
-        __tmp__B11E=NULL;
+      if (__tmp__WX2E==NULL) {
+        __tmp__YX2E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__501E)->__id) {
+        switch (((struct ___OBJ *)__tmp__WX2E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__B11E=((void *)__tmp__501E);
+          __tmp__YX2E=((void *)__tmp__WX2E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__B11E=((void *)__tmp__501E);
+          __tmp__YX2E=((void *)__tmp__WX2E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__B11E=NULL;
+          __tmp__YX2E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__B11E=NULL;
+          __tmp__YX2E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__B11E=((void *)__tmp__501E);
+          __tmp__YX2E=((void *)__tmp__WX2E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__B11E=((void *)__tmp__501E);
+          __tmp__YX2E=((void *)__tmp__WX2E);
         } break;
         }
       };
-      ps__TZ1E=__tmp__B11E;
-      if (((void *)__tmp__B11E != (void *)NULL)) {
-        p__UZ1E=NULL;
-        i__VZ1E= 0;
-        while (((i__VZ1E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__UZ1E == (void *)NULL))) {
-          __tmp__A21E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[i__VZ1E])->parent_named__5.name__LI;
-          switch (((struct ___OBJ *)ps__TZ1E)->__id) {
+      ps__KW2E=__tmp__YX2E;
+      if (((void *)__tmp__YX2E != (void *)NULL)) {
+        p__LW2E=NULL;
+        i__MW2E= 0;
+        while (((i__MW2E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__LW2E == (void *)NULL))) {
+          __tmp__XY2E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__MW2E])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__KW2E)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__B21E=((__ITM_TYPE_PARAMETER *)ps__TZ1E)->parent_itm_type__RDE.name__4XP;
+            __tmp__YY2E=((__ITM_TYPE_PARAMETER *)ps__KW2E)->parent_itm_type__3DE.name__KYP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__B21E=((__ITM_TYPE_SIMPLE *)ps__TZ1E)->name__4XP;
+            __tmp__YY2E=((__ITM_TYPE_SIMPLE *)ps__KW2E)->name__KYP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__B21E=((__ITM_TYPE_GENERIC *)ps__TZ1E)->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP;
+            __tmp__YY2E=((__ITM_TYPE_GENERIC *)ps__KW2E)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__B21E=((__ITM_TYPE_STYLE *)ps__TZ1E)->parent_itm_type_simple__VRN.name__4XP;
+            __tmp__YY2E=((__ITM_TYPE_STYLE *)ps__KW2E)->parent_itm_type_simple__BSN.name__KYP;
           } break;
           };
-          if (((void *)__tmp__A21E == (void *)__tmp__B21E)) {
-            p__UZ1E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[i__VZ1E];
+          if (((void *)__tmp__XY2E == (void *)__tmp__YY2E)) {
+            p__LW2E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__MW2E];
           };
-          i__VZ1E=(__INTEGER)(i__VZ1E +  1);
+          i__MW2E=(__INTEGER)(i__MW2E +  1);
         };
-        if (((void *)p__UZ1E != (void *)NULL)) {
-          get_all_comment_slot__in__OZ1E(p__UZ1E,n__QZ1E,buf__RZ1E);
+        if (((void *)p__LW2E != (void *)NULL)) {
+          get_all_comment_slot__in__FW2E(p__LW2E,n__HW2E,buf__IW2E);
         };
       };
-      if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
-        __tmp__W21E=((__ITM_SLOT *)s__SZ1E)->next__CHHC;
+      if (((struct ___OBJ *)s__JW2E)->__id==__ITM_SLOT__) {
+        __tmp__NZ2E=((__ITM_SLOT *)s__JW2E)->next__OHHC;
       } else {
-        __tmp__W21E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.next__CHHC;
+        __tmp__NZ2E=((__ITM_SLOT_OPERATOR *)s__JW2E)->parent_itm_slot__OU5B.next__OHHC;
       };
-      s__SZ1E=__tmp__W21E;
-      goto while_do__SXDF;
+      s__JW2E=__tmp__NZ2E;
+      goto while_do__VREF;
+    };
+  };
+}
+
+static void append_in__OIH(__UINTEGER_32 Self__PIH,void *buffer__QIH)
+// ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
+{
+  __UINTEGER_32 val__RIH;
+  __INTEGER i__UIH,j__VIH;
+  __STRING *Self__ZVFH;
+  __CHARACTER tmp__1VFH;
+  val__RIH= 0;
+  i__UIH= 0;
+  j__VIH= 0;
+  if ((Self__PIH ==  0)) {
+    add_last__ZLT(((__STRING *)buffer__QIH),'0');
+  } else {
+    i__UIH=(__INTEGER)(((__STRING *)buffer__QIH)->count__WFC +  1);
+    val__RIH=Self__PIH;
+    while ((val__RIH !=  0)) {
+      add_last__ZLT(((__STRING *)buffer__QIH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__RIH %  10)) + ((__INTEGER_8 )'0'))))));
+      val__RIH=(__UINTEGER_32)(val__RIH /  10);
+    };
+    j__VIH=((__STRING *)buffer__QIH)->count__WFC;
+    while ((i__UIH < j__VIH)) {
+      Self__ZVFH=((__STRING *)buffer__QIH);
+      tmp__1VFH=((__CHARACTER *)Self__ZVFH->storage__BCS)[(__INTEGER)(i__UIH -  1)];
+      ((__CHARACTER *)Self__ZVFH->storage__BCS)[(__INTEGER)(i__UIH -  1)]=((__CHARACTER *)Self__ZVFH->storage__BCS)[(__INTEGER)(j__VIH -  1)];
+      ((__CHARACTER *)Self__ZVFH->storage__BCS)[(__INTEGER)(j__VIH -  1)]=tmp__1VFH;
+      j__VIH=(__INTEGER)(j__VIH -  1);
+      i__UIH=(__INTEGER)(i__UIH +  1);
     };
   };
 }
 
-static void shorter_profile_in__JB2E(__ITM_SLOT *Self__KB2E,void *buf__LB2E)
+static void shorter_profile_in__UD3F(__ITM_SLOT *Self__VD3F,void *buf__WD3F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__JYDF,i__KYDF;
-  void *__tmp__PYDF,*__tmp__XZDF,*__tmp__X0DF;
-  __STRING_CONSTANT *Self__TP3G;
-  void *__tmp__DC2E;
-  __ITM_TYPE_PARAMETER *Self__RV1G;
-  __ITM_TYPE_SIMPLE *Self__TV1G;
-  __ITM_TYPE_MULTI *Self__FKUG;
-  __ITM_TYPE_STYLE *Self__HWAH;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__VP3G;
-  if ((Self__KB2E->parent_named__G5.style__VDU == '+')) {
-    put__to__like__QJIF((&__string_235),buf__LB2E,(&__string_132));
+  __INTEGER j__XH4F,i__YH4F;
+  void *__tmp__3H4F,*__tmp__FJ4F,*__tmp__FK4F;
+  __STRING_CONSTANT *Self__S1DH;
+  void *__tmp__OE3F;
+  __ITM_TYPE_PARAMETER *Self__ADCH;
+  __ITM_TYPE_SIMPLE *Self__CDCH;
+  __ITM_TYPE_MULTI *Self__E4ZG;
+  __ITM_TYPE_STYLE *Self__1CHH;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__U1DH;
+  if ((Self__VD3F->parent_named__P5.style__BEU == '+')) {
+    put__to__like__PT5F((&__string_245),buf__WD3F,(&__string_132));
   } else {
-    put__to__like__QJIF((&__string_236),buf__LB2E,(&__string_132));
+    put__to__like__PT5F((&__string_246),buf__WD3F,(&__string_132));
   };
-  ((__STRING *)string_tmp__VH)->count__KFC= 0;
-  j__JYDF= 1;
-  __tmp__PYDF=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__KB2E->argument_list__0DHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 0];
-  if (((struct ___OBJ *)__tmp__PYDF)->__id==__ITM_ARG__) {
-    shorter_in__CIIF(__tmp__PYDF,buf__LB2E);
+  ((__STRING *)string_tmp__VH)->count__WFC= 0;
+  j__XH4F= 1;
+  __tmp__3H4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__VD3F->argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
+  if (((struct ___OBJ *)__tmp__3H4F)->__id==__ITM_ARG__) {
+    shorter_in__QQ5F(__tmp__3H4F,buf__WD3F);
   } else {
-    shorter_in__NPOF(__tmp__PYDF,buf__LB2E);
-  };
-  add_last__NLT(buf__LB2E,'.');
-  i__KYDF= 1;
-  while ((j__JYDF < ((__STRING_CONSTANT *)Self__KB2E->parent_named__G5.name__LI)->count__DD)) {
-    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__KB2E->parent_named__G5.name__LI)->storage__JQO)[(__INTEGER)(j__JYDF -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__KB2E->parent_named__G5.name__LI)->storage__JQO)[(__INTEGER)((__INTEGER)(j__JYDF +  1) -  1)] == '_'))) {
-      put__to__like__QJIF(string_tmp__VH,buf__LB2E,(&__string_130));
-      add_last__NLT(buf__LB2E,' ');
-      __tmp__XZDF=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__KB2E->argument_list__0DHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[i__KYDF];
-      if (((struct ___OBJ *)__tmp__XZDF)->__id==__ITM_ARG__) {
-        shorter_in__CIIF(__tmp__XZDF,buf__LB2E);
-      } else {
-        shorter_in__NPOF(__tmp__XZDF,buf__LB2E);
-      };
-      add_last__NLT(buf__LB2E,' ');
-      ((__STRING *)string_tmp__VH)->count__KFC= 0;
-      j__JYDF=(__INTEGER)(j__JYDF +  2);
-      i__KYDF=(__INTEGER)(i__KYDF +  1);
-    } else {
-      add_last__NLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__KB2E->parent_named__G5.name__LI)->storage__JQO)[(__INTEGER)(j__JYDF -  1)]);
-      j__JYDF=(__INTEGER)(j__JYDF +  1);
-    };
-  };
-  Self__TP3G=((__STRING_CONSTANT *)Self__KB2E->parent_named__G5.name__LI);
-  add_last__NLT(string_tmp__VH,((__CHARACTER *)Self__TP3G->storage__JQO)[(__INTEGER)(Self__TP3G->count__DD -  1)]);
-  put__to__like__QJIF(string_tmp__VH,buf__LB2E,(&__string_130));
-  if ((i__KYDF <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__KB2E->argument_list__0DHC)->parent_arrayed_collection__ZBZB.upper__S5GC)) {
-    add_last__NLT(buf__LB2E,' ');
-    Self__VP3G=((__FAST_ARRAYoITM_ARGUMENTo *)Self__KB2E->argument_list__0DHC);
-    __tmp__X0DF=((void **)Self__VP3G->parent_arrayed_collection__ZBZB.storage__QAHC)[Self__VP3G->parent_arrayed_collection__ZBZB.upper__S5GC];
-    if (((struct ___OBJ *)__tmp__X0DF)->__id==__ITM_ARG__) {
-      shorter_in__CIIF(__tmp__X0DF,buf__LB2E);
-    } else {
-      shorter_in__NPOF(__tmp__X0DF,buf__LB2E);
-    };
-  };
-  if (((void *)Self__KB2E->result_type__O4FC != (void *)type_void__SVF)) {
-    add_last__NLT(buf__LB2E,' ');
-    add_last__NLT(buf__LB2E,':');
-    __tmp__DC2E=Self__KB2E->result_type__O4FC;
-    switch (((struct ___OBJ *)__tmp__DC2E)->__id) {
+    shorter_in__HR5F(__tmp__3H4F,buf__WD3F);
+  };
+  add_last__ZLT(buf__WD3F,'.');
+  i__YH4F= 1;
+  while ((j__XH4F < ((__STRING_CONSTANT *)Self__VD3F->parent_named__P5.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__VD3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__XH4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__VD3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)((__INTEGER)(j__XH4F +  1) -  1)] == '_'))) {
+      put__to__like__PT5F(string_tmp__VH,buf__WD3F,(&__string_130));
+      add_last__ZLT(buf__WD3F,' ');
+      __tmp__FJ4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__VD3F->argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[i__YH4F];
+      if (((struct ___OBJ *)__tmp__FJ4F)->__id==__ITM_ARG__) {
+        shorter_in__QQ5F(__tmp__FJ4F,buf__WD3F);
+      } else {
+        shorter_in__HR5F(__tmp__FJ4F,buf__WD3F);
+      };
+      add_last__ZLT(buf__WD3F,' ');
+      ((__STRING *)string_tmp__VH)->count__WFC= 0;
+      j__XH4F=(__INTEGER)(j__XH4F +  2);
+      i__YH4F=(__INTEGER)(i__YH4F +  1);
+    } else {
+      add_last__ZLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__VD3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__XH4F -  1)]);
+      j__XH4F=(__INTEGER)(j__XH4F +  1);
+    };
+  };
+  Self__S1DH=((__STRING_CONSTANT *)Self__VD3F->parent_named__P5.name__LI);
+  add_last__ZLT(string_tmp__VH,((__CHARACTER *)Self__S1DH->storage__VQO)[(__INTEGER)(Self__S1DH->count__DD -  1)]);
+  put__to__like__PT5F(string_tmp__VH,buf__WD3F,(&__string_130));
+  if ((i__YH4F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__VD3F->argument_list__GEHC)->parent_arrayed_collection__FCZB.upper__45GC)) {
+    add_last__ZLT(buf__WD3F,' ');
+    Self__U1DH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__VD3F->argument_list__GEHC);
+    __tmp__FK4F=((void **)Self__U1DH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__U1DH->parent_arrayed_collection__FCZB.upper__45GC];
+    if (((struct ___OBJ *)__tmp__FK4F)->__id==__ITM_ARG__) {
+      shorter_in__QQ5F(__tmp__FK4F,buf__WD3F);
+    } else {
+      shorter_in__HR5F(__tmp__FK4F,buf__WD3F);
+    };
+    add_last__ZLT(buf__WD3F,' ');
+  };
+  if (((void *)Self__VD3F->result_type__04FC != (void *)type_void__4VF)) {
+    add_last__ZLT(buf__WD3F,':');
+    __tmp__OE3F=Self__VD3F->result_type__04FC;
+    switch (((struct ___OBJ *)__tmp__OE3F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      Self__RV1G=((__ITM_TYPE_PARAMETER *)__tmp__DC2E);
-      if (((void *)Self__RV1G == (void *)type_self__1TN)) {
-        put__to__like__L3LF(Self__RV1G->parent_itm_type__RDE.name__4XP,buf__LB2E,(&__string_126));
+      Self__ADCH=((__ITM_TYPE_PARAMETER *)__tmp__OE3F);
+      if (((void *)Self__ADCH == (void *)type_self__HUN)) {
+        put__to__like__QCFG(Self__ADCH->parent_itm_type__3DE.name__KYP,buf__WD3F,(&__string_126));
       } else {
-        put__to__like__L3LF(Self__RV1G->parent_itm_type__RDE.name__4XP,buf__LB2E,(&__string_125));
+        put__to__like__QCFG(Self__ADCH->parent_itm_type__3DE.name__KYP,buf__WD3F,(&__string_125));
       };
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      Self__TV1G=((__ITM_TYPE_SIMPLE *)__tmp__DC2E);
-      if (((void *)Self__TV1G == (void *)type_self__1TN)) {
-        put__to__like__C5LF(Self__TV1G->name__4XP,buf__LB2E,(&__string_126));
+      Self__CDCH=((__ITM_TYPE_SIMPLE *)__tmp__OE3F);
+      if (((void *)Self__CDCH == (void *)type_self__HUN)) {
+        put__to__like__HEFG(Self__CDCH->name__KYP,buf__WD3F,(&__string_126));
       } else {
-        put__to__like__C5LF(Self__TV1G->name__4XP,buf__LB2E,(&__string_125));
+        put__to__like__HEFG(Self__CDCH->name__KYP,buf__WD3F,(&__string_125));
       };
     } break;
     case __ITM_TYPE_MULTI__: {
-      Self__FKUG=((__ITM_TYPE_MULTI *)__tmp__DC2E);
-      add_last__NLT(buf__LB2E,'(');
-      shorter_raw_in__Z1KF(Self__FKUG,buf__LB2E);
-      add_last__NLT(buf__LB2E,')');
+      Self__E4ZG=((__ITM_TYPE_MULTI *)__tmp__OE3F);
+      add_last__ZLT(buf__WD3F,'(');
+      shorter_raw_in__U1DG(Self__E4ZG,buf__WD3F);
+      add_last__ZLT(buf__WD3F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__FXJF(__tmp__DC2E,buf__LB2E);
+      shorter_in__YVBG(__tmp__OE3F,buf__WD3F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__NYJF(__tmp__DC2E,buf__LB2E);
+      shorter_in__AXBG(__tmp__OE3F,buf__WD3F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__HWAH=((__ITM_TYPE_STYLE *)__tmp__DC2E);
-      if (((void *)Self__HWAH->style__HYP != (void *)NULL)) {
-        put__to__like__HBMF(Self__HWAH->style__HYP,buf__LB2E,(&__string_119));
-        add_last__NLT(buf__LB2E,' ');
+      Self__1CHH=((__ITM_TYPE_STYLE *)__tmp__OE3F);
+      if (((void *)Self__1CHH->style__TYP != (void *)NULL)) {
+        put__to__like__MGFG(Self__1CHH->style__TYP,buf__WD3F,(&__string_119));
+        add_last__ZLT(buf__WD3F,' ');
       };
-      if (((void *)Self__HWAH == (void *)type_self__1TN)) {
-        put__to__like__HBMF(Self__HWAH->parent_itm_type_simple__VRN.name__4XP,buf__LB2E,(&__string_126));
+      if (((void *)Self__1CHH == (void *)type_self__HUN)) {
+        put__to__like__MGFG(Self__1CHH->parent_itm_type_simple__BSN.name__KYP,buf__WD3F,(&__string_126));
       } else {
-        put__to__like__HBMF(Self__HWAH->parent_itm_type_simple__VRN.name__4XP,buf__LB2E,(&__string_125));
+        put__to__like__MGFG(Self__1CHH->parent_itm_type_simple__BSN.name__KYP,buf__WD3F,(&__string_125));
       };
     } break;
     };
   };
 }
 
-static void shorter_profile_in__GC2E(__ITM_SLOT_OPERATOR *Self__HC2E,void *buf__IC2E)
+static void shorter_profile_in__RE3F(__ITM_SLOT_OPERATOR *Self__SE3F,void *buf__TE3F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__MWAH,*Self__RWAH;
-  __INTEGER i__KWAH,i__PWAH;
-  void *__tmp__Z1DF,*__tmp__O2DF,*__tmp__12DF,*__tmp__F3DF;
-  void *__tmp__AD2E;
-  __ITM_TYPE_PARAMETER *Self__VV1G;
-  __ITM_TYPE_SIMPLE *Self__XV1G;
-  __ITM_TYPE_MULTI *Self__00JF;
-  __ITM_TYPE_STYLE *Self__TWAH;
-  __BOOLEAN result__JWAH,__tmp__41DF,result__OWAH;
-  if ((Self__HC2E->parent_itm_slot__CU5B.parent_named__G5.style__VDU == '+')) {
-    put__to__like__B1JF((&__string_235),buf__IC2E,(&__string_132));
+  __STRING_CONSTANT *Self__ADHH,*Self__FDHH;
+  __INTEGER i__4CHH,i__DDHH,Self__T4KG,result__V4KG,i__FALG,j__GALG;
+  void *__tmp__HL4F,*__tmp__2L4F,*__tmp__SM4F,*__tmp__2M4F;
+  void *result__3XKG;
+  __INTEGER_32 Self__05KG,val__CALG;
+  __STRING *Self__AYFB;
+  void *__tmp__LF3F;
+  __ITM_TYPE_PARAMETER *Self__UDCH;
+  __ITM_TYPE_SIMPLE *Self__WDCH;
+  __ITM_TYPE_MULTI *Self__Q1BG;
+  __ITM_TYPE_STYLE *Self__HDHH;
+  __BOOLEAN result__3CHH,__tmp__ML4F,result__CDHH;
+  __CHARACTER tmp__DYFB;
+  if ((Self__SE3F->parent_itm_slot__OU5B.parent_named__P5.style__BEU == '+')) {
+    put__to__like__X1BG((&__string_245),buf__TE3F,(&__string_132));
   } else {
-    put__to__like__B1JF((&__string_236),buf__IC2E,(&__string_132));
-  };
-  Self__MWAH=((__STRING_CONSTANT *)Self__HC2E->parent_itm_slot__CU5B.parent_named__G5.name__LI);
-  result__JWAH=FALSE__;
-  i__KWAH= 0;
-  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__MWAH->count__DD)) {
-    i__KWAH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
-    while ((! ((i__KWAH ==  0) || (((__CHARACTER *)Self__MWAH->storage__JQO)[(__INTEGER)(i__KWAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__JQO)[(__INTEGER)(i__KWAH -  1)])))) {
-      i__KWAH=(__INTEGER)(i__KWAH -  1);
-    };
-    result__JWAH=(i__KWAH ==  0);
-  };
-  if (result__JWAH) {
-    __tmp__Z1DF=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__HC2E->parent_itm_slot__CU5B.argument_list__0DHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 0];
-    if (((struct ___OBJ *)__tmp__Z1DF)->__id==__ITM_ARG__) {
-      shorter_in__CIIF(__tmp__Z1DF,buf__IC2E);
-    } else {
-      shorter_in__NPOF(__tmp__Z1DF,buf__IC2E);
-    };
-    add_last__NLT(buf__IC2E,' ');
-    add_last__NLT(buf__IC2E,'\'');
-    put__to__like__B1JF(Self__HC2E->pretty_name__J0HC,buf__IC2E,(&__string_130));
-    add_last__NLT(buf__IC2E,'\'');
-    __tmp__41DF=TRUE__;
+    put__to__like__X1BG((&__string_246),buf__TE3F,(&__string_132));
+  };
+  Self__ADHH=((__STRING_CONSTANT *)Self__SE3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
+  result__3CHH=FALSE__;
+  i__4CHH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__ADHH->count__DD)) {
+    i__4CHH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__4CHH ==  0) || (((__CHARACTER *)Self__ADHH->storage__VQO)[(__INTEGER)(i__4CHH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__VQO)[(__INTEGER)(i__4CHH -  1)])))) {
+      i__4CHH=(__INTEGER)(i__4CHH -  1);
+    };
+    result__3CHH=(i__4CHH ==  0);
+  };
+  if (result__3CHH) {
+    __tmp__HL4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
+    if (((struct ___OBJ *)__tmp__HL4F)->__id==__ITM_ARG__) {
+      shorter_in__QQ5F(__tmp__HL4F,buf__TE3F);
+    } else {
+      shorter_in__HR5F(__tmp__HL4F,buf__TE3F);
+    };
+    add_last__ZLT(buf__TE3F,' ');
+    add_last__ZLT(buf__TE3F,'\'');
+    put__to__like__X1BG(Self__SE3F->pretty_name__V0HC,buf__TE3F,(&__string_130));
+    add_last__ZLT(buf__TE3F,'\'');
+    add_last__ZLT(buf__TE3F,' ');
+    __tmp__ML4F=TRUE__;
   } else {
-    __tmp__41DF=FALSE__;
-  };
-  if ((! __tmp__41DF)) {
-    Self__RWAH=((__STRING_CONSTANT *)Self__HC2E->parent_itm_slot__CU5B.parent_named__G5.name__LI);
-    result__OWAH=FALSE__;
-    i__PWAH= 0;
-    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__RWAH->count__DD)) {
-      i__PWAH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
-      while ((! ((i__PWAH ==  0) || (((__CHARACTER *)Self__RWAH->storage__JQO)[(__INTEGER)(i__PWAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__JQO)[(__INTEGER)(i__PWAH -  1)])))) {
-        i__PWAH=(__INTEGER)(i__PWAH -  1);
-      };
-      result__OWAH=(i__PWAH ==  0);
-    };
-    if (result__OWAH) {
-      __tmp__O2DF=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__HC2E->parent_itm_slot__CU5B.argument_list__0DHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 0];
-      if (((struct ___OBJ *)__tmp__O2DF)->__id==__ITM_ARG__) {
-        shorter_in__CIIF(__tmp__O2DF,buf__IC2E);
-      } else {
-        shorter_in__NPOF(__tmp__O2DF,buf__IC2E);
-      };
-      add_last__NLT(buf__IC2E,' ');
-      add_last__NLT(buf__IC2E,'\'');
-      put__to__like__B1JF(Self__HC2E->pretty_name__J0HC,buf__IC2E,(&__string_130));
-      add_last__NLT(buf__IC2E,'\'');
-      add_last__NLT(buf__IC2E,' ');
-      __tmp__12DF=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__HC2E->parent_itm_slot__CU5B.argument_list__0DHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 1];
-      if (((struct ___OBJ *)__tmp__12DF)->__id==__ITM_ARG__) {
-        shorter_in__CIIF(__tmp__12DF,buf__IC2E);
-      } else {
-        shorter_in__NPOF(__tmp__12DF,buf__IC2E);
-      };
-    } else {
-      add_last__NLT(buf__IC2E,'\'');
-      put__to__like__B1JF(Self__HC2E->pretty_name__J0HC,buf__IC2E,(&__string_130));
-      add_last__NLT(buf__IC2E,'\'');
-      add_last__NLT(buf__IC2E,' ');
-      __tmp__F3DF=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__HC2E->parent_itm_slot__CU5B.argument_list__0DHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 0];
-      if (((struct ___OBJ *)__tmp__F3DF)->__id==__ITM_ARG__) {
-        shorter_in__CIIF(__tmp__F3DF,buf__IC2E);
-      } else {
-        shorter_in__NPOF(__tmp__F3DF,buf__IC2E);
-      };
-    };
-  };
-  if (((void *)Self__HC2E->parent_itm_slot__CU5B.result_type__O4FC != (void *)type_void__SVF)) {
-    add_last__NLT(buf__IC2E,' ');
-    add_last__NLT(buf__IC2E,':');
-    __tmp__AD2E=Self__HC2E->parent_itm_slot__CU5B.result_type__O4FC;
-    switch (((struct ___OBJ *)__tmp__AD2E)->__id) {
+    __tmp__ML4F=FALSE__;
+  };
+  if ((! __tmp__ML4F)) {
+    Self__FDHH=((__STRING_CONSTANT *)Self__SE3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
+    result__CDHH=FALSE__;
+    i__DDHH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__FDHH->count__DD)) {
+      i__DDHH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__DDHH ==  0) || (((__CHARACTER *)Self__FDHH->storage__VQO)[(__INTEGER)(i__DDHH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__VQO)[(__INTEGER)(i__DDHH -  1)])))) {
+        i__DDHH=(__INTEGER)(i__DDHH -  1);
+      };
+      result__CDHH=(i__DDHH ==  0);
+    };
+    if (result__CDHH) {
+      __tmp__2L4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
+      if (((struct ___OBJ *)__tmp__2L4F)->__id==__ITM_ARG__) {
+        shorter_in__QQ5F(__tmp__2L4F,buf__TE3F);
+      } else {
+        shorter_in__HR5F(__tmp__2L4F,buf__TE3F);
+      };
+      add_last__ZLT(buf__TE3F,' ');
+      add_last__ZLT(buf__TE3F,'\'');
+      put__to__like__X1BG(Self__SE3F->pretty_name__V0HC,buf__TE3F,(&__string_130));
+      add_last__ZLT(buf__TE3F,'\'');
+      if ((Self__SE3F->priority_and_level__K0HC !=  0)) {
+        add_last__ZLT(buf__TE3F,' ');
+        result__3XKG=NULL;
+        if ((Self__SE3F->priority_and_level__K0HC >=  0)) {
+          result__3XKG=(&__string_6);
+        } else {
+          result__3XKG=(&__string_5);
+        };
+        put__to__like__X1BG(result__3XKG,buf__TE3F,(&__string_119));
+        add_last__ZLT(buf__TE3F,' ');
+        ((__STRING *)string_tmp__VH)->count__WFC= 0;
+        Self__T4KG=Self__SE3F->priority_and_level__K0HC;
+        result__V4KG= 0;
+        if ((Self__T4KG <  0)) {
+          result__V4KG=(__INTEGER)(- Self__T4KG);
+        } else {
+          result__V4KG=Self__T4KG;
+        };
+        Self__05KG=((__INTEGER_32 )result__V4KG);
+        val__CALG= 0;
+        i__FALG= 0;
+        j__GALG= 0;
+        if ((Self__05KG ==  0)) {
+          add_last__ZLT(((__STRING *)string_tmp__VH),'0');
+        } else {
+          if ((Self__05KG >  0)) {
+            val__CALG=Self__05KG;
+          } else {
+            val__CALG=(__INTEGER_32)(- Self__05KG);
+            add_last__ZLT(((__STRING *)string_tmp__VH),'-');
+          };
+          i__FALG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__WFC +  1);
+          while ((val__CALG !=  0)) {
+            add_last__ZLT(((__STRING *)string_tmp__VH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__CALG %  10)) + ((__INTEGER_8 )'0'))))));
+            val__CALG=(__INTEGER_32)(val__CALG /  10);
+          };
+          j__GALG=((__STRING *)string_tmp__VH)->count__WFC;
+          while ((i__FALG < j__GALG)) {
+            Self__AYFB=((__STRING *)string_tmp__VH);
+            tmp__DYFB=((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(i__FALG -  1)];
+            ((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(i__FALG -  1)]=((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(j__GALG -  1)];
+            ((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(j__GALG -  1)]=tmp__DYFB;
+            j__GALG=(__INTEGER)(j__GALG -  1);
+            i__FALG=(__INTEGER)(i__FALG +  1);
+          };
+        };
+        put__to__like__X1BG(string_tmp__VH,buf__TE3F,(&__string_119));
+      };
+      add_last__ZLT(buf__TE3F,' ');
+      __tmp__SM4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 1];
+      if (((struct ___OBJ *)__tmp__SM4F)->__id==__ITM_ARG__) {
+        shorter_in__QQ5F(__tmp__SM4F,buf__TE3F);
+      } else {
+        shorter_in__HR5F(__tmp__SM4F,buf__TE3F);
+      };
+      add_last__ZLT(buf__TE3F,' ');
+    } else {
+      add_last__ZLT(buf__TE3F,'\'');
+      put__to__like__X1BG(Self__SE3F->pretty_name__V0HC,buf__TE3F,(&__string_130));
+      add_last__ZLT(buf__TE3F,'\'');
+      add_last__ZLT(buf__TE3F,' ');
+      __tmp__2M4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
+      if (((struct ___OBJ *)__tmp__2M4F)->__id==__ITM_ARG__) {
+        shorter_in__QQ5F(__tmp__2M4F,buf__TE3F);
+      } else {
+        shorter_in__HR5F(__tmp__2M4F,buf__TE3F);
+      };
+      add_last__ZLT(buf__TE3F,' ');
+    };
+  };
+  if (((void *)Self__SE3F->parent_itm_slot__OU5B.result_type__04FC != (void *)type_void__4VF)) {
+    add_last__ZLT(buf__TE3F,':');
+    __tmp__LF3F=Self__SE3F->parent_itm_slot__OU5B.result_type__04FC;
+    switch (((struct ___OBJ *)__tmp__LF3F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      Self__VV1G=((__ITM_TYPE_PARAMETER *)__tmp__AD2E);
-      if (((void *)Self__VV1G == (void *)type_self__1TN)) {
-        put__to__like__L3LF(Self__VV1G->parent_itm_type__RDE.name__4XP,buf__IC2E,(&__string_126));
+      Self__UDCH=((__ITM_TYPE_PARAMETER *)__tmp__LF3F);
+      if (((void *)Self__UDCH == (void *)type_self__HUN)) {
+        put__to__like__QCFG(Self__UDCH->parent_itm_type__3DE.name__KYP,buf__TE3F,(&__string_126));
       } else {
-        put__to__like__L3LF(Self__VV1G->parent_itm_type__RDE.name__4XP,buf__IC2E,(&__string_125));
+        put__to__like__QCFG(Self__UDCH->parent_itm_type__3DE.name__KYP,buf__TE3F,(&__string_125));
       };
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      Self__XV1G=((__ITM_TYPE_SIMPLE *)__tmp__AD2E);
-      if (((void *)Self__XV1G == (void *)type_self__1TN)) {
-        put__to__like__C5LF(Self__XV1G->name__4XP,buf__IC2E,(&__string_126));
+      Self__WDCH=((__ITM_TYPE_SIMPLE *)__tmp__LF3F);
+      if (((void *)Self__WDCH == (void *)type_self__HUN)) {
+        put__to__like__HEFG(Self__WDCH->name__KYP,buf__TE3F,(&__string_126));
       } else {
-        put__to__like__C5LF(Self__XV1G->name__4XP,buf__IC2E,(&__string_125));
+        put__to__like__HEFG(Self__WDCH->name__KYP,buf__TE3F,(&__string_125));
       };
     } break;
     case __ITM_TYPE_MULTI__: {
-      Self__00JF=((__ITM_TYPE_MULTI *)__tmp__AD2E);
-      add_last__NLT(buf__IC2E,'(');
-      shorter_raw_in__Z1KF(Self__00JF,buf__IC2E);
-      add_last__NLT(buf__IC2E,')');
+      Self__Q1BG=((__ITM_TYPE_MULTI *)__tmp__LF3F);
+      add_last__ZLT(buf__TE3F,'(');
+      shorter_raw_in__U1DG(Self__Q1BG,buf__TE3F);
+      add_last__ZLT(buf__TE3F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__FXJF(__tmp__AD2E,buf__IC2E);
+      shorter_in__YVBG(__tmp__LF3F,buf__TE3F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__NYJF(__tmp__AD2E,buf__IC2E);
+      shorter_in__AXBG(__tmp__LF3F,buf__TE3F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__TWAH=((__ITM_TYPE_STYLE *)__tmp__AD2E);
-      if (((void *)Self__TWAH->style__HYP != (void *)NULL)) {
-        put__to__like__HBMF(Self__TWAH->style__HYP,buf__IC2E,(&__string_119));
-        add_last__NLT(buf__IC2E,' ');
+      Self__HDHH=((__ITM_TYPE_STYLE *)__tmp__LF3F);
+      if (((void *)Self__HDHH->style__TYP != (void *)NULL)) {
+        put__to__like__MGFG(Self__HDHH->style__TYP,buf__TE3F,(&__string_119));
+        add_last__ZLT(buf__TE3F,' ');
       };
-      if (((void *)Self__TWAH == (void *)type_self__1TN)) {
-        put__to__like__HBMF(Self__TWAH->parent_itm_type_simple__VRN.name__4XP,buf__IC2E,(&__string_126));
+      if (((void *)Self__HDHH == (void *)type_self__HUN)) {
+        put__to__like__MGFG(Self__HDHH->parent_itm_type_simple__BSN.name__KYP,buf__TE3F,(&__string_126));
       } else {
-        put__to__like__HBMF(Self__TWAH->parent_itm_type_simple__VRN.name__4XP,buf__IC2E,(&__string_125));
+        put__to__like__MGFG(Self__HDHH->parent_itm_type_simple__BSN.name__KYP,buf__TE3F,(&__string_125));
       };
     } break;
     };
   };
 }
 
-static __CHARACTER* create__VLEB(__INTEGER nb_elements__XLEB)
+static __CHARACTER* create__BMEB(__INTEGER nb_elements__DMEB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__0V1G,a__5P3G,new_size__1V1G,new_size2__2V1G,a__DQ3G;
-  __UINTEGER_32 new_size__EQ3G;
-  __POINTER result__ZV1G,ptr_table__WWAH,next__VWAH,result__XWAH;
-  void *result__0WAH;
-  __INTEGER Self__FUKC;
-  __CHARACTER *Result__WAKB;
-  sz__0V1G=((__UINTEGER_32 )nb_elements__XLEB);
-  result__ZV1G=((__POINTER )(NULL));
-  a__5P3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__1V1G=(__UINTEGER_32)((__UINTEGER_32)(sz__0V1G + a__5P3G) & (__UINTEGER_32)(~ a__5P3G));
-  new_size2__2V1G=(__UINTEGER_32)(new_size__1V1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__2V1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__DQ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__EQ3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2V1G + a__DQ3G) & (__UINTEGER_32)(~ a__DQ3G));
-    ptr_table__WWAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EQ3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__VWAH=((__POINTER )(NULL));
-    result__XWAH=((__POINTER *)ptr_table__WWAH)[ 0];
-    if ((result__XWAH == (void *)NULL)) {
-      result__XWAH=new_lab__ARJ(new_size__EQ3G);
-      next__VWAH=(void *)((unsigned long)result__XWAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQ3G)));
-      ((__POINTER *)next__VWAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__WWAH)[ 0]=next__VWAH;
-    } else {
-      next__VWAH=((__POINTER *)result__XWAH)[ 0];
-      if ((next__VWAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XWAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__EQ3G <<  1)) <=  4096)) {
-          next__VWAH=(void *)((unsigned long)result__XWAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQ3G)));
-        } else {
-          next__VWAH=new_lab__ARJ(new_size__EQ3G);
-        };
-        ((__POINTER *)next__VWAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WWAH)[ 0]=next__VWAH;
-      } else {
-        ((__POINTER *)result__XWAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__XWAH=next__VWAH;
-      };
-    };
-    ((__POINTER *)result__XWAH)[ 0]=((__POINTER ) 3);
-    result__ZV1G=(void *)((unsigned long)result__XWAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__ZDCH,a__41DH,new_size__0DCH,new_size2__1DCH,a__C2DH;
+  __UINTEGER_32 new_size__D2DH;
+  __POINTER result__YDCH,ptr_table__KDHH,next__JDHH,result__LDHH;
+  void *result__ODHH;
+  __INTEGER Self__RUKC;
+  __CHARACTER *Result__CBKB;
+  sz__ZDCH=((__UINTEGER_32 )nb_elements__DMEB);
+  result__YDCH=((__POINTER )(NULL));
+  a__41DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0DCH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZDCH + a__41DH) & (__UINTEGER_32)(~ a__41DH));
+  new_size2__1DCH=(__UINTEGER_32)(new_size__0DCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1DCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__C2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__D2DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1DCH + a__C2DH) & (__UINTEGER_32)(~ a__C2DH));
+    ptr_table__KDHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D2DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JDHH=((__POINTER )(NULL));
+    result__LDHH=((__POINTER *)ptr_table__KDHH)[ 0];
+    if ((result__LDHH == (void *)NULL)) {
+      result__LDHH=new_lab__MRJ(new_size__D2DH);
+      next__JDHH=(void *)((unsigned long)result__LDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D2DH)));
+      ((__POINTER *)next__JDHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KDHH)[ 0]=next__JDHH;
+    } else {
+      next__JDHH=((__POINTER *)result__LDHH)[ 0];
+      if ((next__JDHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LDHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__D2DH <<  1)) <=  4096)) {
+          next__JDHH=(void *)((unsigned long)result__LDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D2DH)));
+        } else {
+          next__JDHH=new_lab__MRJ(new_size__D2DH);
+        };
+        ((__POINTER *)next__JDHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KDHH)[ 0]=next__JDHH;
+      } else {
+        ((__POINTER *)result__LDHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JDHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LDHH=next__JDHH;
+      };
+    };
+    ((__POINTER *)result__LDHH)[ 0]=((__POINTER ) 3);
+    result__YDCH=(void *)((unsigned long)result__LDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__0WAH=first_free__LDVB;
-    while ((((void *)result__0WAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0WAH)->map_size_and_id__2SB &  4294967292LU) < new_size__1V1G))) {
-      result__0WAH=((__MEMORY *)result__0WAH)->map_next_free__3SB;
+    result__ODHH=first_free__XDVB;
+    while ((((void *)result__ODHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ODHH)->map_size_and_id__ITB &  4294967292LU) < new_size__0DCH))) {
+      result__ODHH=((__MEMORY *)result__ODHH)->map_next_free__JTB;
     };
-    if (((void *)result__0WAH == (void *)NULL)) {
-      result__0WAH=new_page__CA5();
+    if (((void *)result__ODHH == (void *)NULL)) {
+      result__ODHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__0WAH,new_size__1V1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0WAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__ZV1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0WAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__ODHH,new_size__0DCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ODHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__YDCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ODHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__WAKB=((__CHARACTER *)result__ZV1G);
-  Self__FUKC=(__INTEGER)(nb_elements__XLEB -  1);
-  while ((Self__FUKC >=  0)) {
-    Result__WAKB[Self__FUKC]='\0';
-    Self__FUKC=(__INTEGER)(Self__FUKC -  1);
+  Result__CBKB=((__CHARACTER *)result__YDCH);
+  Self__RUKC=(__INTEGER)(nb_elements__DMEB -  1);
+  while ((Self__RUKC >=  0)) {
+    Result__CBKB[Self__RUKC]='\0';
+    Self__RUKC=(__INTEGER)(Self__RUKC -  1);
   };
-  return(Result__WAKB);
+  return(Result__CBKB);
 }
 
-static __POINTER realloc_dynamic__old_size__new_size__FELC(__POINTER p__HELC,__UINTEGER_32 old_sz__IELC,__UINTEGER_32 new_sz__JELC)
+static __POINTER realloc_dynamic__old_size__new_size__RELC(__POINTER p__TELC,__UINTEGER_32 old_sz__UELC,__UINTEGER_32 new_sz__VELC)
 // ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  void *mem__UELC,*result__KXAH,*nxt__3CED,*result__4CED,*result__NXAH;
-  void *next__UBND,*new_free__TBND,*prev__WR3G,*next__XR3G;
-  __POINTER result__VELC,result__FW1G,ptr_table__GXAH,next__FXAH;
-  __POINTER result__HXAH,__tmp__ZFLC,last__AOHD,src__JAED,dst__KAED;
-  __UINTEGER_32 a__VQ3G,old_size__LELC,old_size2__OELC,a__ZQ3G;
-  __UINTEGER_32 new_size__RELC,a__3Q3G,new_size__HW1G,new_size2__IW1G;
-  __UINTEGER_32 a__BR3G,new_size__CR3G,a__GRH,__tmp__GGLC,sz__CDED;
-  __UINTEGER_32 old_size__5CED,prev__VBND,new_size__YBND;
-  __INTEGER siz__DR5G,Self__IR5G,siz__OAED,Self__TLHD;
-  __MEMORY *Self__ZCED;
-  __POINTER *na_src__FR5G,*na_dst__HR5G,*na_src__MAED,*na_dst__NAED;
-  mem__UELC=NULL;
-  result__VELC=((__POINTER )(NULL));
-  a__VQ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  old_size__LELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__IELC + a__VQ3G) & (__UINTEGER_32)(~ a__VQ3G));
-  old_size2__OELC=(__UINTEGER_32)(old_size__LELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  a__ZQ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__RELC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__JELC + a__ZQ3G) & (__UINTEGER_32)(~ a__ZQ3G));
-  if ((old_size2__OELC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    result__FW1G=((__POINTER )(NULL));
-    a__3Q3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__HW1G=(__UINTEGER_32)((__UINTEGER_32)(new_size__RELC + a__3Q3G) & (__UINTEGER_32)(~ a__3Q3G));
-    new_size2__IW1G=(__UINTEGER_32)(new_size__HW1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__IW1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__BR3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__CR3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IW1G + a__BR3G) & (__UINTEGER_32)(~ a__BR3G));
-      ptr_table__GXAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CR3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FXAH=((__POINTER )(NULL));
-      result__HXAH=((__POINTER *)ptr_table__GXAH)[ 0];
-      if ((result__HXAH == (void *)NULL)) {
-        result__HXAH=new_lab__ARJ(new_size__CR3G);
-        next__FXAH=(void *)((unsigned long)result__HXAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CR3G)));
-        ((__POINTER *)next__FXAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GXAH)[ 0]=next__FXAH;
-      } else {
-        next__FXAH=((__POINTER *)result__HXAH)[ 0];
-        if ((next__FXAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HXAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CR3G <<  1)) <=  4096)) {
-            next__FXAH=(void *)((unsigned long)result__HXAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CR3G)));
-          } else {
-            next__FXAH=new_lab__ARJ(new_size__CR3G);
-          };
-          ((__POINTER *)next__FXAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GXAH)[ 0]=next__FXAH;
-        } else {
-          ((__POINTER *)result__HXAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FXAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HXAH=next__FXAH;
-        };
-      };
-      ((__POINTER *)result__HXAH)[ 0]=((__POINTER ) 3);
-      result__FW1G=(void *)((unsigned long)result__HXAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__KXAH=first_free__LDVB;
-      while ((((void *)result__KXAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KXAH)->map_size_and_id__2SB &  4294967292LU) < new_size__HW1G))) {
-        result__KXAH=((__MEMORY *)result__KXAH)->map_next_free__3SB;
-      };
-      if (((void *)result__KXAH == (void *)NULL)) {
-        result__KXAH=new_page__CA5();
-      };
-      to_busy__index__HTFC(result__KXAH,new_size__HW1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KXAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-      result__FW1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KXAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    result__VELC=result__FW1G;
-    siz__DR5G=((__INTEGER )old_size__LELC);
-    siz__DR5G=(__INTEGER)(siz__DR5G / ((__INTEGER )(sizeof(void *))));
-    na_src__FR5G=((__POINTER *)p__HELC);
-    na_dst__HR5G=((__POINTER *)result__FW1G);
-    Self__IR5G=(__INTEGER)(siz__DR5G -  1);
-    while ((Self__IR5G >=  0)) {
-      na_dst__HR5G[Self__IR5G]=na_src__FR5G[Self__IR5G];
-      Self__IR5G=(__INTEGER)(Self__IR5G -  1);
-    };
-    __tmp__ZFLC=(void *)((unsigned long)p__HELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
-    a__GRH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    last__AOHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__OELC + a__GRH) & (__UINTEGER_32)(~ a__GRH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
-    ((__POINTER *)__tmp__ZFLC)[ 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__AOHD)[ 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__AOHD)[ 0]=__tmp__ZFLC;
+  void *mem__AFLC,*result__4DHH,*nxt__JDED,*result__KDED,*result__BEHH;
+  void *next__ACND,*new_free__5BND,*prev__V3DH,*next__W3DH;
+  __POINTER result__BFLC,result__EECH,ptr_table__0DHH,next__ZDHH;
+  __POINTER result__1DHH,__tmp__FGLC,last__MOHD,src__VAED,dst__WAED;
+  __UINTEGER_32 a__U2DH,old_size__XELC,old_size2__0ELC,a__Y2DH;
+  __UINTEGER_32 new_size__3ELC,a__22DH,new_size__GECH,new_size2__HECH;
+  __UINTEGER_32 a__A3DH,new_size__B3DH,a__SRH,__tmp__SGLC,sz__ODED;
+  __UINTEGER_32 old_size__LDED,prev__BCND,new_size__ECND;
+  __INTEGER siz__P3FH,Self__U3FH,siz__0AED,Self__5LHD;
+  __MEMORY *Self__FDED;
+  __POINTER *na_src__R3FH,*na_dst__T3FH,*na_src__YAED,*na_dst__ZAED;
+  mem__AFLC=NULL;
+  result__BFLC=((__POINTER )(NULL));
+  a__U2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  old_size__XELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__UELC + a__U2DH) & (__UINTEGER_32)(~ a__U2DH));
+  old_size2__0ELC=(__UINTEGER_32)(old_size__XELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  a__Y2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3ELC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__VELC + a__Y2DH) & (__UINTEGER_32)(~ a__Y2DH));
+  if ((old_size2__0ELC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    result__EECH=((__POINTER )(NULL));
+    a__22DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GECH=(__UINTEGER_32)((__UINTEGER_32)(new_size__3ELC + a__22DH) & (__UINTEGER_32)(~ a__22DH));
+    new_size2__HECH=(__UINTEGER_32)(new_size__GECH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__HECH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__A3DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__B3DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HECH + a__A3DH) & (__UINTEGER_32)(~ a__A3DH));
+      ptr_table__0DHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B3DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZDHH=((__POINTER )(NULL));
+      result__1DHH=((__POINTER *)ptr_table__0DHH)[ 0];
+      if ((result__1DHH == (void *)NULL)) {
+        result__1DHH=new_lab__MRJ(new_size__B3DH);
+        next__ZDHH=(void *)((unsigned long)result__1DHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B3DH)));
+        ((__POINTER *)next__ZDHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0DHH)[ 0]=next__ZDHH;
+      } else {
+        next__ZDHH=((__POINTER *)result__1DHH)[ 0];
+        if ((next__ZDHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1DHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__B3DH <<  1)) <=  4096)) {
+            next__ZDHH=(void *)((unsigned long)result__1DHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B3DH)));
+          } else {
+            next__ZDHH=new_lab__MRJ(new_size__B3DH);
+          };
+          ((__POINTER *)next__ZDHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0DHH)[ 0]=next__ZDHH;
+        } else {
+          ((__POINTER *)result__1DHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZDHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1DHH=next__ZDHH;
+        };
+      };
+      ((__POINTER *)result__1DHH)[ 0]=((__POINTER ) 3);
+      result__EECH=(void *)((unsigned long)result__1DHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__4DHH=first_free__XDVB;
+      while ((((void *)result__4DHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4DHH)->map_size_and_id__ITB &  4294967292LU) < new_size__GECH))) {
+        result__4DHH=((__MEMORY *)result__4DHH)->map_next_free__JTB;
+      };
+      if (((void *)result__4DHH == (void *)NULL)) {
+        result__4DHH=new_page__OA5();
+      };
+      to_busy__index__TTFC(result__4DHH,new_size__GECH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4DHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+      result__EECH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4DHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    result__BFLC=result__EECH;
+    siz__P3FH=((__INTEGER )old_size__XELC);
+    siz__P3FH=(__INTEGER)(siz__P3FH / ((__INTEGER )(sizeof(void *))));
+    na_src__R3FH=((__POINTER *)p__TELC);
+    na_dst__T3FH=((__POINTER *)result__EECH);
+    Self__U3FH=(__INTEGER)(siz__P3FH -  1);
+    while ((Self__U3FH >=  0)) {
+      na_dst__T3FH[Self__U3FH]=na_src__R3FH[Self__U3FH];
+      Self__U3FH=(__INTEGER)(Self__U3FH -  1);
+    };
+    __tmp__FGLC=(void *)((unsigned long)p__TELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
+    a__SRH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    last__MOHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__0ELC + a__SRH) & (__UINTEGER_32)(~ a__SRH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
+    ((__POINTER *)__tmp__FGLC)[ 0]=(void *)((unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)(void *)((unsigned long)(void *)((unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER *)last__MOHD)[ 0]) - (unsigned long)((__POINTER ) 1)) & (unsigned long)(void *)((unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 3)) - (unsigned long)((__POINTER ) 1)))) - (unsigned long)((__POINTER ) 1));
+    ((__POINTER *)last__MOHD)[ 0]=__tmp__FGLC;
   } else {
-    mem__UELC=((void *)(void *)((unsigned long)p__HELC - (unsigned long)((__POINTER ) 8)));
-    __tmp__GGLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__HELC - (unsigned long)begin_memory__DVH)))) >>  26);
-    Self__ZCED=((__MEMORY *)mem__UELC);
-    nxt__3CED=NULL;
-    result__4CED=NULL;
-    sz__CDED= 0;
-    old_size__5CED=(__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  4294967292LU);
-    if ((new_size__RELC > old_size__5CED)) {
-      if ((! ((__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  2) !=  0))) {
-        nxt__3CED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  4294967292LU)))));
-        sz__CDED=(__UINTEGER_32)((__UINTEGER_32)(new_size__RELC - old_size__5CED) -  8);
-        if ((((__UINTEGER_32)(((__MEMORY *)nxt__3CED)->map_size_and_id__2SB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__3CED)->map_size_and_id__2SB &  4294967292LU) >= sz__CDED))) {
-          to_busy__index__HTFC(nxt__3CED,sz__CDED,__tmp__GGLC);
-          Self__ZCED->map_size_and_id__2SB=(__UINTEGER_32)((__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB + (__UINTEGER_32)(((__MEMORY *)nxt__3CED)->map_size_and_id__2SB &  4294967294LU)) +  8);
-          if (((__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  2) !=  0)) {
-            last_block[(__tmp__GGLC)] = (Self__ZCED);
-          } else {
-            nxt__3CED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  4294967292LU)))));
-            ((__MEMORY *)nxt__3CED)->map_previous_linear__1SB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)begin_memory__DVH))));
-          };
-          result__4CED=Self__ZCED;
-        };
-      };
-      if (((void *)result__4CED == (void *)NULL)) {
-        result__NXAH=first_free__LDVB;
-        while ((((void *)result__NXAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__NXAH)->map_size_and_id__2SB &  4294967292LU) < new_size__RELC))) {
-          result__NXAH=((__MEMORY *)result__NXAH)->map_next_free__3SB;
-        };
-        if (((void *)result__NXAH == (void *)NULL)) {
-          result__NXAH=new_page__CA5();
-        };
-        to_busy__index__HTFC(result__NXAH,new_size__RELC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__NXAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-        result__4CED=result__NXAH;
-        src__JAED=(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-        dst__KAED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NXAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-        siz__OAED=((__INTEGER )old_size__5CED);
-        siz__OAED=(__INTEGER)(siz__OAED / ((__INTEGER )(sizeof(void *))));
-        na_src__MAED=((__POINTER *)src__JAED);
-        na_dst__NAED=((__POINTER *)dst__KAED);
-        Self__TLHD=(__INTEGER)(siz__OAED -  1);
-        while ((Self__TLHD >=  0)) {
-          na_dst__NAED[Self__TLHD]=na_src__MAED[Self__TLHD];
-          Self__TLHD=(__INTEGER)(Self__TLHD -  1);
-        };
-        prev__VBND=Self__ZCED->map_previous_linear__1SB;
-        next__UBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  4294967292LU)))));
-        new_free__TBND=((void *)(void *)((unsigned long)begin_memory__DVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__VBND))));
-        new_size__YBND=(__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  4294967294LU);
-        if (((prev__VBND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__TBND)->map_size_and_id__2SB &  1) !=  0))) {
-          new_free__TBND=Self__ZCED;
-          Self__ZCED->map_next_free__3SB=first_free__LDVB;
-          Self__ZCED->map_previous_free__4SB=NULL;
-          if (((void *)first_free__LDVB != (void *)NULL)) {
-            ((__MEMORY *)first_free__LDVB)->map_previous_free__4SB=Self__ZCED;
-          };
-          first_free__LDVB=Self__ZCED;
-        } else {
-          new_size__YBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__YBND + ((__MEMORY *)new_free__TBND)->map_size_and_id__2SB) +  8);
-        };
-        if (((! ((__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__UBND)->map_size_and_id__2SB &  1) ==  0))) {
-          new_size__YBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__YBND + ((__MEMORY *)next__UBND)->map_size_and_id__2SB) +  8);
-          prev__WR3G=((__MEMORY *)next__UBND)->map_previous_free__4SB;
-          next__XR3G=((__MEMORY *)next__UBND)->map_next_free__3SB;
-          if (((void *)prev__WR3G == (void *)NULL)) {
-            first_free__LDVB=next__XR3G;
-          } else {
-            ((__MEMORY *)prev__WR3G)->map_next_free__3SB=next__XR3G;
-          };
-          if (((void *)next__XR3G != (void *)NULL)) {
-            ((__MEMORY *)next__XR3G)->map_previous_free__4SB=prev__WR3G;
-          };
-        };
-        ((__MEMORY *)new_free__TBND)->map_size_and_id__2SB=new_size__YBND;
-        if (((__UINTEGER_32)(((__MEMORY *)new_free__TBND)->map_size_and_id__2SB &  2) !=  0)) {
-          last_block[(__tmp__GGLC)] = (new_free__TBND);
-        } else {
-          next__UBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__2SB &  4294967292LU)))));
-          ((__MEMORY *)next__UBND)->map_previous_linear__1SB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__TBND) - (unsigned long)begin_memory__DVH))));
-        };
-      };
-    } else {
-      result__4CED=Self__ZCED;
-    };
-    result__VELC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4CED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-  };
-  return(result__VELC);
+    mem__AFLC=((void *)(void *)((unsigned long)p__TELC - (unsigned long)((__POINTER ) 8)));
+    __tmp__SGLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__TELC - (unsigned long)begin_memory__PVH)))) >>  26);
+    Self__FDED=((__MEMORY *)mem__AFLC);
+    nxt__JDED=NULL;
+    result__KDED=NULL;
+    sz__ODED= 0;
+    old_size__LDED=(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU);
+    if ((new_size__3ELC > old_size__LDED)) {
+      if ((! ((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  2) !=  0))) {
+        nxt__JDED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
+        sz__ODED=(__UINTEGER_32)((__UINTEGER_32)(new_size__3ELC - old_size__LDED) -  8);
+        if ((((__UINTEGER_32)(((__MEMORY *)nxt__JDED)->map_size_and_id__ITB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__JDED)->map_size_and_id__ITB &  4294967292LU) >= sz__ODED))) {
+          to_busy__index__TTFC(nxt__JDED,sz__ODED,__tmp__SGLC);
+          Self__FDED->map_size_and_id__ITB=(__UINTEGER_32)((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB + (__UINTEGER_32)(((__MEMORY *)nxt__JDED)->map_size_and_id__ITB &  4294967294LU)) +  8);
+          if (((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  2) !=  0)) {
+            last_block[(__tmp__SGLC)] = (Self__FDED);
+          } else {
+            nxt__JDED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
+            ((__MEMORY *)nxt__JDED)->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)begin_memory__PVH))));
+          };
+          result__KDED=Self__FDED;
+        };
+      };
+      if (((void *)result__KDED == (void *)NULL)) {
+        result__BEHH=first_free__XDVB;
+        while ((((void *)result__BEHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BEHH)->map_size_and_id__ITB &  4294967292LU) < new_size__3ELC))) {
+          result__BEHH=((__MEMORY *)result__BEHH)->map_next_free__JTB;
+        };
+        if (((void *)result__BEHH == (void *)NULL)) {
+          result__BEHH=new_page__OA5();
+        };
+        to_busy__index__TTFC(result__BEHH,new_size__3ELC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BEHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+        result__KDED=result__BEHH;
+        src__VAED=(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        dst__WAED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BEHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        siz__0AED=((__INTEGER )old_size__LDED);
+        siz__0AED=(__INTEGER)(siz__0AED / ((__INTEGER )(sizeof(void *))));
+        na_src__YAED=((__POINTER *)src__VAED);
+        na_dst__ZAED=((__POINTER *)dst__WAED);
+        Self__5LHD=(__INTEGER)(siz__0AED -  1);
+        while ((Self__5LHD >=  0)) {
+          na_dst__ZAED[Self__5LHD]=na_src__YAED[Self__5LHD];
+          Self__5LHD=(__INTEGER)(Self__5LHD -  1);
+        };
+        prev__BCND=Self__FDED->map_previous_linear__HTB;
+        next__ACND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
+        new_free__5BND=((void *)(void *)((unsigned long)begin_memory__PVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__BCND))));
+        new_size__ECND=(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967294LU);
+        if (((prev__BCND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__5BND)->map_size_and_id__ITB &  1) !=  0))) {
+          new_free__5BND=Self__FDED;
+          Self__FDED->map_next_free__JTB=first_free__XDVB;
+          Self__FDED->map_previous_free__KTB=NULL;
+          if (((void *)first_free__XDVB != (void *)NULL)) {
+            ((__MEMORY *)first_free__XDVB)->map_previous_free__KTB=Self__FDED;
+          };
+          first_free__XDVB=Self__FDED;
+        } else {
+          new_size__ECND=(__UINTEGER_32)((__UINTEGER_32)(new_size__ECND + ((__MEMORY *)new_free__5BND)->map_size_and_id__ITB) +  8);
+        };
+        if (((! ((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__ACND)->map_size_and_id__ITB &  1) ==  0))) {
+          new_size__ECND=(__UINTEGER_32)((__UINTEGER_32)(new_size__ECND + ((__MEMORY *)next__ACND)->map_size_and_id__ITB) +  8);
+          prev__V3DH=((__MEMORY *)next__ACND)->map_previous_free__KTB;
+          next__W3DH=((__MEMORY *)next__ACND)->map_next_free__JTB;
+          if (((void *)prev__V3DH == (void *)NULL)) {
+            first_free__XDVB=next__W3DH;
+          } else {
+            ((__MEMORY *)prev__V3DH)->map_next_free__JTB=next__W3DH;
+          };
+          if (((void *)next__W3DH != (void *)NULL)) {
+            ((__MEMORY *)next__W3DH)->map_previous_free__KTB=prev__V3DH;
+          };
+        };
+        ((__MEMORY *)new_free__5BND)->map_size_and_id__ITB=new_size__ECND;
+        if (((__UINTEGER_32)(((__MEMORY *)new_free__5BND)->map_size_and_id__ITB &  2) !=  0)) {
+          last_block[(__tmp__SGLC)] = (new_free__5BND);
+        } else {
+          next__ACND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
+          ((__MEMORY *)next__ACND)->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__5BND) - (unsigned long)begin_memory__PVH))));
+        };
+      };
+    } else {
+      result__KDED=Self__FDED;
+    };
+    result__BFLC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KDED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  return(result__BFLC);
 }
 
-static void** create__HBRB(__INTEGER nb_elements__JBRB)
+static void** create__TBRB(__INTEGER nb_elements__VBRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__RW1G,a__WW1G,new_size__SW1G,new_size2__TW1G,a__VS3G;
-  __UINTEGER_32 new_size__WS3G;
-  __POINTER result__QW1G,ptr_table__RXAH,next__QXAH,result__SXAH;
-  void *result__VXAH;
-  __INTEGER Self__Y4MC;
-  void **Result__P4TB;
-  sz__RW1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__JBRB * ((__INTEGER )(sizeof(void *)))));
-  result__QW1G=((__POINTER )(NULL));
-  a__WW1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__SW1G=(__UINTEGER_32)((__UINTEGER_32)(sz__RW1G + a__WW1G) & (__UINTEGER_32)(~ a__WW1G));
-  new_size2__TW1G=(__UINTEGER_32)(new_size__SW1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__TW1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VS3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WS3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TW1G + a__VS3G) & (__UINTEGER_32)(~ a__VS3G));
-    ptr_table__RXAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WS3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__QXAH=((__POINTER )(NULL));
-    result__SXAH=((__POINTER *)ptr_table__RXAH)[ 0];
-    if ((result__SXAH == (void *)NULL)) {
-      result__SXAH=new_lab__ARJ(new_size__WS3G);
-      next__QXAH=(void *)((unsigned long)result__SXAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WS3G)));
-      ((__POINTER *)next__QXAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__RXAH)[ 0]=next__QXAH;
-    } else {
-      next__QXAH=((__POINTER *)result__SXAH)[ 0];
-      if ((next__QXAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SXAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WS3G <<  1)) <=  4096)) {
-          next__QXAH=(void *)((unsigned long)result__SXAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WS3G)));
-        } else {
-          next__QXAH=new_lab__ARJ(new_size__WS3G);
-        };
-        ((__POINTER *)next__QXAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__RXAH)[ 0]=next__QXAH;
-      } else {
-        ((__POINTER *)result__SXAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QXAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__SXAH=next__QXAH;
-      };
-    };
-    ((__POINTER *)result__SXAH)[ 0]=((__POINTER ) 3);
-    result__QW1G=(void *)((unsigned long)result__SXAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QECH,a__VECH,new_size__RECH,new_size2__SECH,a__U4DH;
+  __UINTEGER_32 new_size__V4DH;
+  __POINTER result__PECH,ptr_table__FEHH,next__EEHH,result__GEHH;
+  void *result__JEHH;
+  __INTEGER Self__E5MC;
+  void **Result__14TB;
+  sz__QECH=((__UINTEGER_32 )(__INTEGER)(nb_elements__VBRB * ((__INTEGER )(sizeof(void *)))));
+  result__PECH=((__POINTER )(NULL));
+  a__VECH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RECH=(__UINTEGER_32)((__UINTEGER_32)(sz__QECH + a__VECH) & (__UINTEGER_32)(~ a__VECH));
+  new_size2__SECH=(__UINTEGER_32)(new_size__RECH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SECH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__U4DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__V4DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SECH + a__U4DH) & (__UINTEGER_32)(~ a__U4DH));
+    ptr_table__FEHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V4DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EEHH=((__POINTER )(NULL));
+    result__GEHH=((__POINTER *)ptr_table__FEHH)[ 0];
+    if ((result__GEHH == (void *)NULL)) {
+      result__GEHH=new_lab__MRJ(new_size__V4DH);
+      next__EEHH=(void *)((unsigned long)result__GEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V4DH)));
+      ((__POINTER *)next__EEHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FEHH)[ 0]=next__EEHH;
+    } else {
+      next__EEHH=((__POINTER *)result__GEHH)[ 0];
+      if ((next__EEHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__V4DH <<  1)) <=  4096)) {
+          next__EEHH=(void *)((unsigned long)result__GEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V4DH)));
+        } else {
+          next__EEHH=new_lab__MRJ(new_size__V4DH);
+        };
+        ((__POINTER *)next__EEHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FEHH)[ 0]=next__EEHH;
+      } else {
+        ((__POINTER *)result__GEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EEHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GEHH=next__EEHH;
+      };
+    };
+    ((__POINTER *)result__GEHH)[ 0]=((__POINTER ) 3);
+    result__PECH=(void *)((unsigned long)result__GEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__VXAH=first_free__LDVB;
-    while ((((void *)result__VXAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VXAH)->map_size_and_id__2SB &  4294967292LU) < new_size__SW1G))) {
-      result__VXAH=((__MEMORY *)result__VXAH)->map_next_free__3SB;
+    result__JEHH=first_free__XDVB;
+    while ((((void *)result__JEHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JEHH)->map_size_and_id__ITB &  4294967292LU) < new_size__RECH))) {
+      result__JEHH=((__MEMORY *)result__JEHH)->map_next_free__JTB;
     };
-    if (((void *)result__VXAH == (void *)NULL)) {
-      result__VXAH=new_page__CA5();
+    if (((void *)result__JEHH == (void *)NULL)) {
+      result__JEHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__VXAH,new_size__SW1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VXAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__QW1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VXAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__JEHH,new_size__RECH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JEHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__PECH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JEHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__P4TB=((void **)result__QW1G);
-  Self__Y4MC=(__INTEGER)(nb_elements__JBRB -  1);
-  while ((Self__Y4MC >=  0)) {
-    Result__P4TB[Self__Y4MC]=NULL;
-    Self__Y4MC=(__INTEGER)(Self__Y4MC -  1);
+  Result__14TB=((void **)result__PECH);
+  Self__E5MC=(__INTEGER)(nb_elements__VBRB -  1);
+  while ((Self__E5MC >=  0)) {
+    Result__14TB[Self__E5MC]=NULL;
+    Self__E5MC=(__INTEGER)(Self__E5MC -  1);
   };
-  return(Result__P4TB);
+  return(Result__14TB);
 }
 
-static void* fast_reference_at__M1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__N1T,void *k__O1T)
+static void* fast_reference_at__Y1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__Z1T,void *k__01T)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__Z1T;
-  __STRING_CONSTANT *Self__VR5G;
-  __INTEGER result__UR5G,__tmp__WR5G,Self__XR5G;
-  void *node__Y1T;
-  result__Z1T=NULL;
-  Self__VR5G=((__STRING_CONSTANT *)k__O1T);
-  result__UR5G= 0;
-  __tmp__WR5G=Self__VR5G->count__DD;
-  Self__XR5G= 1;
-  while ((Self__XR5G <= __tmp__WR5G)) {
-    result__UR5G=(__INTEGER)((__INTEGER)( 5 * result__UR5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__VR5G->storage__JQO)[(__INTEGER)(Self__XR5G -  1)])));
-    Self__XR5G=(__INTEGER)(Self__XR5G +  1);
-  };
-  if ((result__UR5G <  0)) {
-    result__UR5G=(__INTEGER)(~ result__UR5G);
-  };
-  node__Y1T=((void **)Self__N1T->buckets__A2T)[(__INTEGER)(result__UR5G % Self__N1T->capacity__11T)];
-  while ((! (((void *)node__Y1T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__Y1T)->key__M2T == (void *)k__O1T)))) {
-    node__Y1T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__Y1T)->next__X2T;
-  };
-  if (((void *)node__Y1T != (void *)NULL)) {
-    result__Z1T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__Y1T)->item__52T;
-  };
-  return(result__Z1T);
+  void *result__F2T;
+  __STRING_CONSTANT *Self__B4FH;
+  __INTEGER result__A4FH,__tmp__C4FH,Self__D4FH;
+  void *node__E2T;
+  result__F2T=NULL;
+  Self__B4FH=((__STRING_CONSTANT *)k__01T);
+  result__A4FH= 0;
+  __tmp__C4FH=Self__B4FH->count__DD;
+  Self__D4FH= 1;
+  while ((Self__D4FH <= __tmp__C4FH)) {
+    result__A4FH=(__INTEGER)((__INTEGER)( 5 * result__A4FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__B4FH->storage__VQO)[(__INTEGER)(Self__D4FH -  1)])));
+    Self__D4FH=(__INTEGER)(Self__D4FH +  1);
+  };
+  if ((result__A4FH <  0)) {
+    result__A4FH=(__INTEGER)(~ result__A4FH);
+  };
+  node__E2T=((void **)Self__Z1T->buckets__M2T)[(__INTEGER)(result__A4FH % Self__Z1T->capacity__H2T)];
+  while ((! (((void *)node__E2T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__E2T)->key__Y2T == (void *)k__01T)))) {
+    node__E2T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__E2T)->next__D3T;
+  };
+  if (((void *)node__E2T != (void *)NULL)) {
+    result__F2T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__E2T)->item__L3T;
+  };
+  return(result__F2T);
 }
 
-static void** create__G0GE(__INTEGER nb_elements__I0GE)
+static void** create__PHHE(__INTEGER nb_elements__RHHE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__ZW1G,a__4W1G,new_size__0W1G,new_size2__1W1G,a__WT3G;
-  __UINTEGER_32 new_size__XT3G;
-  __POINTER result__YW1G,ptr_table__ZXAH,next__YXAH,result__0XAH;
-  void *result__3XAH;
-  __INTEGER Self__EIXE;
-  void **Result__IKME;
-  sz__ZW1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__I0GE * ((__INTEGER )(sizeof(void *)))));
-  result__YW1G=((__POINTER )(NULL));
-  a__4W1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__0W1G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZW1G + a__4W1G) & (__UINTEGER_32)(~ a__4W1G));
-  new_size2__1W1G=(__UINTEGER_32)(new_size__0W1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__1W1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__WT3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__XT3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1W1G + a__WT3G) & (__UINTEGER_32)(~ a__WT3G));
-    ptr_table__ZXAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XT3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__YXAH=((__POINTER )(NULL));
-    result__0XAH=((__POINTER *)ptr_table__ZXAH)[ 0];
-    if ((result__0XAH == (void *)NULL)) {
-      result__0XAH=new_lab__ARJ(new_size__XT3G);
-      next__YXAH=(void *)((unsigned long)result__0XAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XT3G)));
-      ((__POINTER *)next__YXAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__ZXAH)[ 0]=next__YXAH;
-    } else {
-      next__YXAH=((__POINTER *)result__0XAH)[ 0];
-      if ((next__YXAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0XAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XT3G <<  1)) <=  4096)) {
-          next__YXAH=(void *)((unsigned long)result__0XAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XT3G)));
-        } else {
-          next__YXAH=new_lab__ARJ(new_size__XT3G);
-        };
-        ((__POINTER *)next__YXAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZXAH)[ 0]=next__YXAH;
-      } else {
-        ((__POINTER *)result__0XAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YXAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__0XAH=next__YXAH;
-      };
-    };
-    ((__POINTER *)result__0XAH)[ 0]=((__POINTER ) 3);
-    result__YW1G=(void *)((unsigned long)result__0XAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__YECH,a__3ECH,new_size__ZECH,new_size2__0ECH,a__V5DH;
+  __UINTEGER_32 new_size__W5DH;
+  __POINTER result__XECH,ptr_table__NEHH,next__MEHH,result__OEHH;
+  void *result__REHH;
+  __INTEGER Self__13XE;
+  void **Result__RZME;
+  sz__YECH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RHHE * ((__INTEGER )(sizeof(void *)))));
+  result__XECH=((__POINTER )(NULL));
+  a__3ECH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ZECH=(__UINTEGER_32)((__UINTEGER_32)(sz__YECH + a__3ECH) & (__UINTEGER_32)(~ a__3ECH));
+  new_size2__0ECH=(__UINTEGER_32)(new_size__ZECH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__0ECH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__V5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__W5DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0ECH + a__V5DH) & (__UINTEGER_32)(~ a__V5DH));
+    ptr_table__NEHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W5DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__MEHH=((__POINTER )(NULL));
+    result__OEHH=((__POINTER *)ptr_table__NEHH)[ 0];
+    if ((result__OEHH == (void *)NULL)) {
+      result__OEHH=new_lab__MRJ(new_size__W5DH);
+      next__MEHH=(void *)((unsigned long)result__OEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W5DH)));
+      ((__POINTER *)next__MEHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__NEHH)[ 0]=next__MEHH;
+    } else {
+      next__MEHH=((__POINTER *)result__OEHH)[ 0];
+      if ((next__MEHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__W5DH <<  1)) <=  4096)) {
+          next__MEHH=(void *)((unsigned long)result__OEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W5DH)));
+        } else {
+          next__MEHH=new_lab__MRJ(new_size__W5DH);
+        };
+        ((__POINTER *)next__MEHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NEHH)[ 0]=next__MEHH;
+      } else {
+        ((__POINTER *)result__OEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MEHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__OEHH=next__MEHH;
+      };
+    };
+    ((__POINTER *)result__OEHH)[ 0]=((__POINTER ) 3);
+    result__XECH=(void *)((unsigned long)result__OEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__3XAH=first_free__LDVB;
-    while ((((void *)result__3XAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3XAH)->map_size_and_id__2SB &  4294967292LU) < new_size__0W1G))) {
-      result__3XAH=((__MEMORY *)result__3XAH)->map_next_free__3SB;
+    result__REHH=first_free__XDVB;
+    while ((((void *)result__REHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__REHH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZECH))) {
+      result__REHH=((__MEMORY *)result__REHH)->map_next_free__JTB;
     };
-    if (((void *)result__3XAH == (void *)NULL)) {
-      result__3XAH=new_page__CA5();
+    if (((void *)result__REHH == (void *)NULL)) {
+      result__REHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__3XAH,new_size__0W1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3XAH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__YW1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3XAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__REHH,new_size__ZECH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__REHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__XECH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__REHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__IKME=((void **)result__YW1G);
-  Self__EIXE=(__INTEGER)(nb_elements__I0GE -  1);
-  while ((Self__EIXE >=  0)) {
-    Result__IKME[Self__EIXE]=NULL;
-    Self__EIXE=(__INTEGER)(Self__EIXE -  1);
+  Result__RZME=((void **)result__XECH);
+  Self__13XE=(__INTEGER)(nb_elements__RHHE -  1);
+  while ((Self__13XE >=  0)) {
+    Result__RZME[Self__13XE]=NULL;
+    Self__13XE=(__INTEGER)(Self__13XE -  1);
   };
-  return(Result__IKME);
+  return(Result__RZME);
 }
 
-static __BOOLEAN has__PPW(__HASHED_SEToABSTRACT_STRINGo *Self__QPW,void *e__RPW)
+static __BOOLEAN has__1PW(__HASHED_SEToABSTRACT_STRINGo *Self__2PW,void *e__3PW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__ZR5G,__tmp__1R5G,Self__2R5G;
-  void *node__0PW;
-  result__ZR5G= 0;
-  __tmp__1R5G=((__STRING_CONSTANT *)e__RPW)->count__DD;
-  Self__2R5G= 1;
-  while ((Self__2R5G <= __tmp__1R5G)) {
-    result__ZR5G=(__INTEGER)((__INTEGER)( 5 * result__ZR5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__RPW)->storage__JQO)[(__INTEGER)(Self__2R5G -  1)])));
-    Self__2R5G=(__INTEGER)(Self__2R5G +  1);
-  };
-  if ((result__ZR5G <  0)) {
-    result__ZR5G=(__INTEGER)(~ result__ZR5G);
-  };
-  node__0PW=((void **)Self__QPW->buckets__SYR)[(__INTEGER)(result__ZR5G % Self__QPW->capacity__NYR)];
-  while ((! (((void *)node__0PW == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__0PW)->item__4YR,e__RPW)))) {
-    node__0PW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__0PW)->next__KZR;
-  };
-  return(((void *)node__0PW != (void *)NULL));
+  __INTEGER result__F4FH,__tmp__H4FH,Self__I4FH;
+  void *node__GQW;
+  result__F4FH= 0;
+  __tmp__H4FH=((__STRING_CONSTANT *)e__3PW)->count__DD;
+  Self__I4FH= 1;
+  while ((Self__I4FH <= __tmp__H4FH)) {
+    result__F4FH=(__INTEGER)((__INTEGER)( 5 * result__F4FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__3PW)->storage__VQO)[(__INTEGER)(Self__I4FH -  1)])));
+    Self__I4FH=(__INTEGER)(Self__I4FH +  1);
+  };
+  if ((result__F4FH <  0)) {
+    result__F4FH=(__INTEGER)(~ result__F4FH);
+  };
+  node__GQW=((void **)Self__2PW->buckets__4YR)[(__INTEGER)(result__F4FH % Self__2PW->capacity__ZYR)];
+  while ((! (((void *)node__GQW == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__GQW)->item__KZR,e__3PW)))) {
+    node__GQW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__GQW)->next__WZR;
+  };
+  return(((void *)node__GQW != (void *)NULL));
 }
 
-static void increase_capacity__SRNB(__HASHED_SEToABSTRACT_STRINGo *Self__TRNB)
+static void increase_capacity__4RNB(__HASHED_SEToABSTRACT_STRINGo *Self__5RNB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER idx__VRNB,new_capacity__WRNB,i__URNB,result__4R5G;
-  __INTEGER __tmp__AS5G,Self__BS5G;
-  __STRING_CONSTANT *Self__5R5G;
-  void *node1__YRNB,*node2__ZRNB;
-  void **old_buckets__XRNB;
-  idx__VRNB= 0;
-  node1__YRNB=NULL;
-  node2__ZRNB=NULL;
-  new_capacity__WRNB=prime_number_ceiling__L41((__INTEGER)(Self__TRNB->capacity__NYR +  1));
-  old_buckets__XRNB=Self__TRNB->buckets__SYR;
-  Self__TRNB->buckets__SYR=create__VJ2(new_capacity__WRNB);
-  i__URNB=(__INTEGER)(Self__TRNB->capacity__NYR -  1);
-  Self__TRNB->capacity__NYR=new_capacity__WRNB;
-  while ((i__URNB >=  0)) {
-    node1__YRNB=((void **)old_buckets__XRNB)[i__URNB];
-    while (((void *)node1__YRNB != (void *)NULL)) {
-      node2__ZRNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__YRNB)->next__KZR;
-      Self__5R5G=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__YRNB)->item__4YR);
-      result__4R5G= 0;
-      __tmp__AS5G=Self__5R5G->count__DD;
-      Self__BS5G= 1;
-      while ((Self__BS5G <= __tmp__AS5G)) {
-        result__4R5G=(__INTEGER)((__INTEGER)( 5 * result__4R5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5R5G->storage__JQO)[(__INTEGER)(Self__BS5G -  1)])));
-        Self__BS5G=(__INTEGER)(Self__BS5G +  1);
-      };
-      if ((result__4R5G <  0)) {
-        result__4R5G=(__INTEGER)(~ result__4R5G);
-      };
-      idx__VRNB=(__INTEGER)(result__4R5G % Self__TRNB->capacity__NYR);
-      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__YRNB)->next__KZR=((void **)Self__TRNB->buckets__SYR)[idx__VRNB];
-      ((void **)Self__TRNB->buckets__SYR)[idx__VRNB]=node1__YRNB;
-      node1__YRNB=node2__ZRNB;
-    };
-    i__URNB=(__INTEGER)(i__URNB -  1);
+  __INTEGER idx__BSNB,new_capacity__CSNB,i__ASNB,result__K4FH;
+  __INTEGER __tmp__M4FH,Self__N4FH;
+  __STRING_CONSTANT *Self__L4FH;
+  void *node1__ESNB,*node2__FSNB;
+  void **old_buckets__DSNB;
+  idx__BSNB= 0;
+  node1__ESNB=NULL;
+  node2__FSNB=NULL;
+  new_capacity__CSNB=prime_number_ceiling__X41((__INTEGER)(Self__5RNB->capacity__ZYR +  1));
+  old_buckets__DSNB=Self__5RNB->buckets__4YR;
+  Self__5RNB->buckets__4YR=create__BK2(new_capacity__CSNB);
+  i__ASNB=(__INTEGER)(Self__5RNB->capacity__ZYR -  1);
+  Self__5RNB->capacity__ZYR=new_capacity__CSNB;
+  while ((i__ASNB >=  0)) {
+    node1__ESNB=((void **)old_buckets__DSNB)[i__ASNB];
+    while (((void *)node1__ESNB != (void *)NULL)) {
+      node2__FSNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__ESNB)->next__WZR;
+      Self__L4FH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__ESNB)->item__KZR);
+      result__K4FH= 0;
+      __tmp__M4FH=Self__L4FH->count__DD;
+      Self__N4FH= 1;
+      while ((Self__N4FH <= __tmp__M4FH)) {
+        result__K4FH=(__INTEGER)((__INTEGER)( 5 * result__K4FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__L4FH->storage__VQO)[(__INTEGER)(Self__N4FH -  1)])));
+        Self__N4FH=(__INTEGER)(Self__N4FH +  1);
+      };
+      if ((result__K4FH <  0)) {
+        result__K4FH=(__INTEGER)(~ result__K4FH);
+      };
+      idx__BSNB=(__INTEGER)(result__K4FH % Self__5RNB->capacity__ZYR);
+      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__ESNB)->next__WZR=((void **)Self__5RNB->buckets__4YR)[idx__BSNB];
+      ((void **)Self__5RNB->buckets__4YR)[idx__BSNB]=node1__ESNB;
+      node1__ESNB=node2__FSNB;
+    };
+    i__ASNB=(__INTEGER)(i__ASNB -  1);
   };
 }
 
-static void put_string__MHF(void *s__OHF)
+static void put_string__YHF(void *s__0HF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__5HF,Self__TAG,limit_up__UAG;
-  __CHARACTER __tmp__GIF;
-  if (((struct ___OBJ *)s__OHF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__LIF,Self__5AG,limit_up__ABG;
+  __CHARACTER __tmp__SIF;
+  if (((struct ___OBJ *)s__0HF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__OHF)->__id==__STRING_CONSTANT__) {
-    __tmp__5HF=((__STRING_CONSTANT *)s__OHF)->count__DD;
+  if (((struct ___OBJ *)s__0HF)->__id==__STRING_CONSTANT__) {
+    __tmp__LIF=((__STRING_CONSTANT *)s__0HF)->count__DD;
   } else {
-    __tmp__5HF=((__STRING *)s__OHF)->count__KFC;
+    __tmp__LIF=((__STRING *)s__0HF)->count__WFC;
   };
-  Self__TAG= 1;
-  limit_up__UAG=__tmp__5HF;
-  while ((Self__TAG <= limit_up__UAG)) {
-    if (((struct ___OBJ *)s__OHF)->__id==__STRING_CONSTANT__) {
-      __tmp__GIF=((__CHARACTER *)((__STRING_CONSTANT *)s__OHF)->storage__JQO)[(__INTEGER)(Self__TAG -  1)];
+  Self__5AG= 1;
+  limit_up__ABG=__tmp__LIF;
+  while ((Self__5AG <= limit_up__ABG)) {
+    if (((struct ___OBJ *)s__0HF)->__id==__STRING_CONSTANT__) {
+      __tmp__SIF=((__CHARACTER *)((__STRING_CONSTANT *)s__0HF)->storage__VQO)[(__INTEGER)(Self__5AG -  1)];
     } else {
-      __tmp__GIF=((__CHARACTER *)((__STRING *)s__OHF)->storage__VBS)[(__INTEGER)(Self__TAG -  1)];
+      __tmp__SIF=((__CHARACTER *)((__STRING *)s__0HF)->storage__BCS)[(__INTEGER)(Self__5AG -  1)];
     };
-    fputc((int)(__tmp__GIF),stdout);
-    Self__TAG=(__INTEGER)(Self__TAG +  1);
+    fputc((int)(__tmp__SIF),stdout);
+    Self__5AG=(__INTEGER)(Self__5AG +  1);
   };
 }
 
-static __BOOLEAN fast_has__CAY(__HASHED_SEToABSTRACT_STRINGo *Self__DAY,void *e__EAY)
+static __BOOLEAN fast_has__OAY(__HASHED_SEToABSTRACT_STRINGo *Self__PAY,void *e__QAY)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__ES5G;
-  __INTEGER result__DS5G,__tmp__FS5G,Self__GS5G;
-  void *node__NAY;
-  Self__ES5G=((__STRING_CONSTANT *)e__EAY);
-  result__DS5G= 0;
-  __tmp__FS5G=Self__ES5G->count__DD;
-  Self__GS5G= 1;
-  while ((Self__GS5G <= __tmp__FS5G)) {
-    result__DS5G=(__INTEGER)((__INTEGER)( 5 * result__DS5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ES5G->storage__JQO)[(__INTEGER)(Self__GS5G -  1)])));
-    Self__GS5G=(__INTEGER)(Self__GS5G +  1);
-  };
-  if ((result__DS5G <  0)) {
-    result__DS5G=(__INTEGER)(~ result__DS5G);
-  };
-  node__NAY=((void **)Self__DAY->buckets__SYR)[(__INTEGER)(result__DS5G % Self__DAY->capacity__NYR)];
-  while ((! (((void *)node__NAY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__NAY)->item__4YR == (void *)e__EAY)))) {
-    node__NAY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__NAY)->next__KZR;
-  };
-  return(((void *)node__NAY != (void *)NULL));
+  __STRING_CONSTANT *Self__Q4FH;
+  __INTEGER result__P4FH,__tmp__R4FH,Self__S4FH;
+  void *node__ZAY;
+  Self__Q4FH=((__STRING_CONSTANT *)e__QAY);
+  result__P4FH= 0;
+  __tmp__R4FH=Self__Q4FH->count__DD;
+  Self__S4FH= 1;
+  while ((Self__S4FH <= __tmp__R4FH)) {
+    result__P4FH=(__INTEGER)((__INTEGER)( 5 * result__P4FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Q4FH->storage__VQO)[(__INTEGER)(Self__S4FH -  1)])));
+    Self__S4FH=(__INTEGER)(Self__S4FH +  1);
+  };
+  if ((result__P4FH <  0)) {
+    result__P4FH=(__INTEGER)(~ result__P4FH);
+  };
+  node__ZAY=((void **)Self__PAY->buckets__4YR)[(__INTEGER)(result__P4FH % Self__PAY->capacity__ZYR)];
+  while ((! (((void *)node__ZAY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZAY)->item__KZR == (void *)e__QAY)))) {
+    node__ZAY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZAY)->next__WZR;
+  };
+  return(((void *)node__ZAY != (void *)NULL));
 }
 
-static void* physical_get_entry__3BF(void *new_path__5BF)
+static void* physical_get_entry__JCF(void *new_path__LCF)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__CCF;
-  __STRING *Self__MU3G;
-  __FILE_UNIX *result__AYAH;
-  __POINTER ptr__BYAH,ptr_table__JYAH,next__IYAH,result__KYAH;
-  __POINTER ptr_table__OYAH,next__NYAH,result__PYAH,ptr__TYAH;
-  __POINTER ptr_table__1YAH,next__0YAH,result__2YAH,ptr_table__AZAH;
-  __POINTER next__5YAH,result__BZAH;
-  __INTEGER typ_id__CYAH,typ_id__UYAH;
-  __UINTEGER_32 sz__DYAH,a__EYAH,new_size__FYAH,t__GYAH,a__HYAH;
-  __UINTEGER_32 new_size__RYAH,lab_type__QYAH,sz__VYAH,a__WYAH;
-  __UINTEGER_32 new_size__XYAH,t__YYAH,a__ZYAH,new_size__DZAH;
-  __UINTEGER_32 lab_type__CZAH;
-  __DIRECTORY_UNIX *result__SYAH;
-  void *__tmp__1CF;
-  __CHARACTER *pe__BCF;
-  result__CCF=NULL;
-  Self__MU3G=((__STRING *)new_path__5BF);
-  if ((Self__MU3G->capacity__MBS > Self__MU3G->count__KFC)) {
-    ((__CHARACTER *)Self__MU3G->storage__VBS)[Self__MU3G->count__KFC]='\0';
+  void *result__OCF;
+  __STRING *Self__LAEH;
+  __FILE_UNIX *result__UEHH;
+  __POINTER ptr__VEHH,ptr_table__3EHH,next__2EHH,result__4EHH;
+  __POINTER ptr_table__CFHH,next__BFHH,result__DFHH,ptr__HFHH;
+  __POINTER ptr_table__PFHH,next__OFHH,result__QFHH,ptr_table__UFHH;
+  __POINTER next__TFHH,result__VFHH;
+  __INTEGER typ_id__WEHH,typ_id__IFHH;
+  __UINTEGER_32 sz__XEHH,a__YEHH,new_size__ZEHH,t__0EHH,a__1EHH;
+  __UINTEGER_32 new_size__FFHH,lab_type__EFHH,sz__JFHH,a__KFHH;
+  __UINTEGER_32 new_size__LFHH,t__MFHH,a__NFHH,new_size__XFHH;
+  __UINTEGER_32 lab_type__WFHH;
+  __DIRECTORY_UNIX *result__GFHH;
+  void *__tmp__HDF;
+  __CHARACTER *pe__NCF;
+  result__OCF=NULL;
+  Self__LAEH=((__STRING *)new_path__LCF);
+  if ((Self__LAEH->capacity__YBS > Self__LAEH->count__WFC)) {
+    ((__CHARACTER *)Self__LAEH->storage__BCS)[Self__LAEH->count__WFC]='\0';
   } else {
-    add_last__NLT(Self__MU3G,'\0');
-    Self__MU3G->count__KFC=(__INTEGER)(Self__MU3G->count__KFC -  1);
+    add_last__ZLT(Self__LAEH,'\0');
+    Self__LAEH->count__WFC=(__INTEGER)(Self__LAEH->count__WFC -  1);
   };
-  pe__BCF=Self__MU3G->storage__VBS;
+  pe__NCF=Self__LAEH->storage__BCS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__BCF),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__NCF),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      result__AYAH=NULL;
-      ptr__BYAH=((__POINTER )(NULL));
-      typ_id__CYAH= 0;
-      sz__DYAH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
-      if ((sz__DYAH ==  0)) {
-        result__AYAH=FILE_UNIX__;
-      } else {
-        typ_id__CYAH=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__DYAH);
-        if ((typ_id__CYAH == (__INTEGER)(-  1))) {
-          a__EYAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__FYAH=(__UINTEGER_32)((__UINTEGER_32)(sz__DYAH + a__EYAH) & (__UINTEGER_32)(~ a__EYAH));
-          ptr_table__JYAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FYAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__IYAH=((__POINTER )(NULL));
-          result__KYAH=((__POINTER *)ptr_table__JYAH)[ 0];
-          if ((result__KYAH == (void *)NULL)) {
-            result__KYAH=new_lab__ARJ(new_size__FYAH);
-            next__IYAH=(void *)((unsigned long)result__KYAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYAH)));
-            ((__POINTER *)next__IYAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JYAH)[ 0]=next__IYAH;
-          } else {
-            next__IYAH=((__POINTER *)result__KYAH)[ 0];
-            if ((next__IYAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KYAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FYAH <<  1)) <=  4096)) {
-                next__IYAH=(void *)((unsigned long)result__KYAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYAH)));
+      result__UEHH=NULL;
+      ptr__VEHH=((__POINTER )(NULL));
+      typ_id__WEHH= 0;
+      sz__XEHH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__XEHH ==  0)) {
+        result__UEHH=FILE_UNIX__;
+      } else {
+        typ_id__WEHH=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XEHH);
+        if ((typ_id__WEHH == (__INTEGER)(-  1))) {
+          a__YEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__XEHH + a__YEHH) & (__UINTEGER_32)(~ a__YEHH));
+          ptr_table__3EHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__2EHH=((__POINTER )(NULL));
+          result__4EHH=((__POINTER *)ptr_table__3EHH)[ 0];
+          if ((result__4EHH == (void *)NULL)) {
+            result__4EHH=new_lab__MRJ(new_size__ZEHH);
+            next__2EHH=(void *)((unsigned long)result__4EHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZEHH)));
+            ((__POINTER *)next__2EHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3EHH)[ 0]=next__2EHH;
+          } else {
+            next__2EHH=((__POINTER *)result__4EHH)[ 0];
+            if ((next__2EHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4EHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZEHH <<  1)) <=  4096)) {
+                next__2EHH=(void *)((unsigned long)result__4EHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZEHH)));
               } else {
-                next__IYAH=new_lab__ARJ(new_size__FYAH);
+                next__2EHH=new_lab__MRJ(new_size__ZEHH);
               };
-              ((__POINTER *)next__IYAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JYAH)[ 0]=next__IYAH;
+              ((__POINTER *)next__2EHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3EHH)[ 0]=next__2EHH;
             } else {
-              ((__POINTER *)result__KYAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IYAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__KYAH=next__IYAH;
-            };
-          };
-          ptr__BYAH=result__KYAH;
-        } else {
-          t__GYAH=((__UINTEGER_32 )typ_id__CYAH);
-          a__HYAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__RYAH=(__UINTEGER_32)((__UINTEGER_32)(sz__DYAH + a__HYAH) & (__UINTEGER_32)(~ a__HYAH));
-          ptr_table__OYAH=((__POINTER )(&(table_type[(t__GYAH)])));
-          lab_type__QYAH=(__UINTEGER_32)(t__GYAH |  1);
-          next__NYAH=((__POINTER )(NULL));
-          result__PYAH=((__POINTER *)ptr_table__OYAH)[ 0];
-          if ((result__PYAH == (void *)NULL)) {
-            result__PYAH=new_lab__ARJ(lab_type__QYAH);
-            next__NYAH=(void *)((unsigned long)result__PYAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RYAH)));
-            ((__POINTER *)next__NYAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OYAH)[ 0]=next__NYAH;
-          } else {
-            next__NYAH=((__POINTER *)result__PYAH)[ 0];
-            if ((next__NYAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PYAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RYAH <<  1)) <=  4096)) {
-                next__NYAH=(void *)((unsigned long)result__PYAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RYAH)));
+              ((__POINTER *)result__4EHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2EHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4EHH=next__2EHH;
+            };
+          };
+          ptr__VEHH=result__4EHH;
+        } else {
+          t__0EHH=((__UINTEGER_32 )typ_id__WEHH);
+          a__1EHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__XEHH + a__1EHH) & (__UINTEGER_32)(~ a__1EHH));
+          ptr_table__CFHH=((__POINTER )(&(table_type[(t__0EHH)])));
+          lab_type__EFHH=(__UINTEGER_32)(t__0EHH |  1);
+          next__BFHH=((__POINTER )(NULL));
+          result__DFHH=((__POINTER *)ptr_table__CFHH)[ 0];
+          if ((result__DFHH == (void *)NULL)) {
+            result__DFHH=new_lab__MRJ(lab_type__EFHH);
+            next__BFHH=(void *)((unsigned long)result__DFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFHH)));
+            ((__POINTER *)next__BFHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CFHH)[ 0]=next__BFHH;
+          } else {
+            next__BFHH=((__POINTER *)result__DFHH)[ 0];
+            if ((next__BFHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DFHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FFHH <<  1)) <=  4096)) {
+                next__BFHH=(void *)((unsigned long)result__DFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFHH)));
               } else {
-                next__NYAH=new_lab__ARJ(lab_type__QYAH);
+                next__BFHH=new_lab__MRJ(lab_type__EFHH);
               };
-              ((__POINTER *)next__NYAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__OYAH)[ 0]=next__NYAH;
+              ((__POINTER *)next__BFHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CFHH)[ 0]=next__BFHH;
             } else {
-              ((__POINTER *)result__PYAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NYAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__PYAH=next__NYAH;
-            };
-          };
-          ptr__BYAH=result__PYAH;
-        };
-        result__AYAH=((__FILE_UNIX *)ptr__BYAH);
-        *(result__AYAH) = *(FILE_UNIX__);
-      };
-      result__CCF=result__AYAH;
-    } else {
-      result__SYAH=NULL;
-      ptr__TYAH=((__POINTER )(NULL));
-      typ_id__UYAH= 0;
-      sz__VYAH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
-      if ((sz__VYAH ==  0)) {
-        result__SYAH=DIRECTORY_UNIX__;
-      } else {
-        typ_id__UYAH=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__VYAH);
-        if ((typ_id__UYAH == (__INTEGER)(-  1))) {
-          a__WYAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__XYAH=(__UINTEGER_32)((__UINTEGER_32)(sz__VYAH + a__WYAH) & (__UINTEGER_32)(~ a__WYAH));
-          ptr_table__1YAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XYAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__0YAH=((__POINTER )(NULL));
-          result__2YAH=((__POINTER *)ptr_table__1YAH)[ 0];
-          if ((result__2YAH == (void *)NULL)) {
-            result__2YAH=new_lab__ARJ(new_size__XYAH);
-            next__0YAH=(void *)((unsigned long)result__2YAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XYAH)));
-            ((__POINTER *)next__0YAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1YAH)[ 0]=next__0YAH;
-          } else {
-            next__0YAH=((__POINTER *)result__2YAH)[ 0];
-            if ((next__0YAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2YAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XYAH <<  1)) <=  4096)) {
-                next__0YAH=(void *)((unsigned long)result__2YAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XYAH)));
+              ((__POINTER *)result__DFHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DFHH=next__BFHH;
+            };
+          };
+          ptr__VEHH=result__DFHH;
+        };
+        result__UEHH=((__FILE_UNIX *)ptr__VEHH);
+        *(result__UEHH) = *(FILE_UNIX__);
+      };
+      result__OCF=result__UEHH;
+    } else {
+      result__GFHH=NULL;
+      ptr__HFHH=((__POINTER )(NULL));
+      typ_id__IFHH= 0;
+      sz__JFHH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__JFHH ==  0)) {
+        result__GFHH=DIRECTORY_UNIX__;
+      } else {
+        typ_id__IFHH=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JFHH);
+        if ((typ_id__IFHH == (__INTEGER)(-  1))) {
+          a__KFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JFHH + a__KFHH) & (__UINTEGER_32)(~ a__KFHH));
+          ptr_table__PFHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OFHH=((__POINTER )(NULL));
+          result__QFHH=((__POINTER *)ptr_table__PFHH)[ 0];
+          if ((result__QFHH == (void *)NULL)) {
+            result__QFHH=new_lab__MRJ(new_size__LFHH);
+            next__OFHH=(void *)((unsigned long)result__QFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LFHH)));
+            ((__POINTER *)next__OFHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PFHH)[ 0]=next__OFHH;
+          } else {
+            next__OFHH=((__POINTER *)result__QFHH)[ 0];
+            if ((next__OFHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QFHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LFHH <<  1)) <=  4096)) {
+                next__OFHH=(void *)((unsigned long)result__QFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LFHH)));
               } else {
-                next__0YAH=new_lab__ARJ(new_size__XYAH);
+                next__OFHH=new_lab__MRJ(new_size__LFHH);
               };
-              ((__POINTER *)next__0YAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1YAH)[ 0]=next__0YAH;
+              ((__POINTER *)next__OFHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PFHH)[ 0]=next__OFHH;
             } else {
-              ((__POINTER *)result__2YAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0YAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__2YAH=next__0YAH;
-            };
-          };
-          ptr__TYAH=result__2YAH;
-        } else {
-          t__YYAH=((__UINTEGER_32 )typ_id__UYAH);
-          a__ZYAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__DZAH=(__UINTEGER_32)((__UINTEGER_32)(sz__VYAH + a__ZYAH) & (__UINTEGER_32)(~ a__ZYAH));
-          ptr_table__AZAH=((__POINTER )(&(table_type[(t__YYAH)])));
-          lab_type__CZAH=(__UINTEGER_32)(t__YYAH |  1);
-          next__5YAH=((__POINTER )(NULL));
-          result__BZAH=((__POINTER *)ptr_table__AZAH)[ 0];
-          if ((result__BZAH == (void *)NULL)) {
-            result__BZAH=new_lab__ARJ(lab_type__CZAH);
-            next__5YAH=(void *)((unsigned long)result__BZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZAH)));
-            ((__POINTER *)next__5YAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AZAH)[ 0]=next__5YAH;
-          } else {
-            next__5YAH=((__POINTER *)result__BZAH)[ 0];
-            if ((next__5YAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BZAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DZAH <<  1)) <=  4096)) {
-                next__5YAH=(void *)((unsigned long)result__BZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZAH)));
+              ((__POINTER *)result__QFHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QFHH=next__OFHH;
+            };
+          };
+          ptr__HFHH=result__QFHH;
+        } else {
+          t__MFHH=((__UINTEGER_32 )typ_id__IFHH);
+          a__NFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JFHH + a__NFHH) & (__UINTEGER_32)(~ a__NFHH));
+          ptr_table__UFHH=((__POINTER )(&(table_type[(t__MFHH)])));
+          lab_type__WFHH=(__UINTEGER_32)(t__MFHH |  1);
+          next__TFHH=((__POINTER )(NULL));
+          result__VFHH=((__POINTER *)ptr_table__UFHH)[ 0];
+          if ((result__VFHH == (void *)NULL)) {
+            result__VFHH=new_lab__MRJ(lab_type__WFHH);
+            next__TFHH=(void *)((unsigned long)result__VFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XFHH)));
+            ((__POINTER *)next__TFHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UFHH)[ 0]=next__TFHH;
+          } else {
+            next__TFHH=((__POINTER *)result__VFHH)[ 0];
+            if ((next__TFHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VFHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XFHH <<  1)) <=  4096)) {
+                next__TFHH=(void *)((unsigned long)result__VFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XFHH)));
               } else {
-                next__5YAH=new_lab__ARJ(lab_type__CZAH);
+                next__TFHH=new_lab__MRJ(lab_type__WFHH);
               };
-              ((__POINTER *)next__5YAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AZAH)[ 0]=next__5YAH;
+              ((__POINTER *)next__TFHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UFHH)[ 0]=next__TFHH;
             } else {
-              ((__POINTER *)result__BZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5YAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BZAH=next__5YAH;
+              ((__POINTER *)result__VFHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VFHH=next__TFHH;
             };
           };
-          ptr__TYAH=result__BZAH;
+          ptr__HFHH=result__VFHH;
         };
-        result__SYAH=((__DIRECTORY_UNIX *)ptr__TYAH);
-        *(result__SYAH) = *(DIRECTORY_UNIX__);
+        result__GFHH=((__DIRECTORY_UNIX *)ptr__HFHH);
+        *(result__GFHH) = *(DIRECTORY_UNIX__);
       };
-      result__CCF=result__SYAH;
+      result__OCF=result__GFHH;
     };
-    if (((struct ___OBJ *)result__CCF)->__id==__DIRECTORY_UNIX__) {
-      set_path__CNT(result__CCF,new_path__5BF);
+    if (((struct ___OBJ *)result__OCF)->__id==__DIRECTORY_UNIX__) {
+      set_path__ONT(result__OCF,new_path__LCF);
     } else {
-      set_path__3NT(result__CCF,new_path__5BF);
+      set_path__JOT(result__OCF,new_path__LCF);
     };
-    if (((struct ___OBJ *)result__CCF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__1CF=((__DIRECTORY_UNIX *)result__CCF)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+    if (((struct ___OBJ *)result__OCF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__HDF=((__DIRECTORY_UNIX *)result__OCF)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
     } else {
-      __tmp__1CF=((__FILE_UNIX *)result__CCF)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
+      __tmp__HDF=((__FILE_UNIX *)result__OCF)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
     };
-    put__to__F0S(alias__YED,result__CCF,__tmp__1CF);
+    put__to__R0S(alias__EFD,result__OCF,__tmp__HDF);
   };
   };
-  return(result__CCF);
+  return(result__OCF);
 }
 
-static void put__to__F0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__G0S,void *v__H0S,void *k__I0S)
+static void put__to__R0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__S0S,void *v__T0S,void *k__U0S)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__JS5G,*Self__OS5G;
-  __INTEGER result__IS5G,__tmp__KS5G,Self__LS5G,idx__Q0S,idx__0NOB;
-  __INTEGER new_capacity__1NOB,i__2NOB,result__NS5G,__tmp__PS5G;
-  __INTEGER Self__QS5G,typ_id__KQOB;
-  __POINTER ptr__FQOB,ptr_table__FZAH,next__EZAH,result__GZAH;
-  __POINTER ptr_table__KZAH,next__JZAH,result__LZAH;
-  __UINTEGER_32 sz__HQOB,a__AV3G,new_size__BV3G,t__FV3G,a__EV3G;
-  __UINTEGER_32 new_size__NZAH,lab_type__MZAH;
-  void *node__S0S,*node1__4NOB,*node2__5NOB,*__tmp__H2S;
-  void **old_buckets__3NOB;
-  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__EQOB;
-  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__0XDC;
-  Self__JS5G=((__STRING_CONSTANT *)k__I0S);
-  result__IS5G= 0;
-  __tmp__KS5G=Self__JS5G->count__DD;
-  Self__LS5G= 1;
-  while ((Self__LS5G <= __tmp__KS5G)) {
-    result__IS5G=(__INTEGER)((__INTEGER)( 5 * result__IS5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JS5G->storage__JQO)[(__INTEGER)(Self__LS5G -  1)])));
-    Self__LS5G=(__INTEGER)(Self__LS5G +  1);
-  };
-  if ((result__IS5G <  0)) {
-    result__IS5G=(__INTEGER)(~ result__IS5G);
-  };
-  idx__Q0S=(__INTEGER)(result__IS5G % Self__G0S->capacity__U0S);
-  node__S0S=((void **)Self__G0S->buckets__Z0S)[idx__Q0S];
-  while ((! (((void *)node__S0S == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__S0S)->key__F1S,k__I0S)))) {
-    node__S0S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__S0S)->next__R1S;
-  };
-  if (((void *)node__S0S == (void *)NULL)) {
-    if ((Self__G0S->capacity__U0S == Self__G0S->count__01S)) {
-      idx__0NOB= 0;
-      node1__4NOB=NULL;
-      node2__5NOB=NULL;
-      old_buckets__3NOB=Self__G0S->buckets__Z0S;
-      new_capacity__1NOB=prime_number_ceiling__L41((__INTEGER)(Self__G0S->capacity__U0S +  1));
-      Self__G0S->buckets__Z0S=create__LB4(new_capacity__1NOB);
-      i__2NOB=(__INTEGER)(Self__G0S->capacity__U0S -  1);
-      Self__G0S->capacity__U0S=new_capacity__1NOB;
-      while ((i__2NOB >=  0)) {
-        node1__4NOB=((void **)old_buckets__3NOB)[i__2NOB];
-        while (((void *)node1__4NOB != (void *)NULL)) {
-          node2__5NOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__4NOB)->next__R1S;
-          Self__OS5G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__4NOB)->key__F1S);
-          result__NS5G= 0;
-          __tmp__PS5G=Self__OS5G->count__DD;
-          Self__QS5G= 1;
-          while ((Self__QS5G <= __tmp__PS5G)) {
-            result__NS5G=(__INTEGER)((__INTEGER)( 5 * result__NS5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OS5G->storage__JQO)[(__INTEGER)(Self__QS5G -  1)])));
-            Self__QS5G=(__INTEGER)(Self__QS5G +  1);
-          };
-          if ((result__NS5G <  0)) {
-            result__NS5G=(__INTEGER)(~ result__NS5G);
-          };
-          idx__0NOB=(__INTEGER)(result__NS5G % Self__G0S->capacity__U0S);
-          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__4NOB)->next__R1S=((void **)Self__G0S->buckets__Z0S)[idx__0NOB];
-          ((void **)Self__G0S->buckets__Z0S)[idx__0NOB]=node1__4NOB;
-          node1__4NOB=node2__5NOB;
-        };
-        i__2NOB=(__INTEGER)(i__2NOB -  1);
-      };
-      idx__Q0S=(__INTEGER)(result__IS5G % new_capacity__1NOB);
-    };
-    __tmp__H2S=((void **)Self__G0S->buckets__Z0S)[idx__Q0S];
-    result__EQOB=NULL;
-    ptr__FQOB=((__POINTER )(NULL));
-    typ_id__KQOB= 0;
-    sz__HQOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
-    if ((sz__HQOB ==  0)) {
-      result__EQOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
-    } else {
-      typ_id__KQOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__HQOB);
-      if ((typ_id__KQOB == (__INTEGER)(-  1))) {
-        a__AV3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__BV3G=(__UINTEGER_32)((__UINTEGER_32)(sz__HQOB + a__AV3G) & (__UINTEGER_32)(~ a__AV3G));
-        ptr_table__FZAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BV3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__EZAH=((__POINTER )(NULL));
-        result__GZAH=((__POINTER *)ptr_table__FZAH)[ 0];
-        if ((result__GZAH == (void *)NULL)) {
-          result__GZAH=new_lab__ARJ(new_size__BV3G);
-          next__EZAH=(void *)((unsigned long)result__GZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BV3G)));
-          ((__POINTER *)next__EZAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FZAH)[ 0]=next__EZAH;
-        } else {
-          next__EZAH=((__POINTER *)result__GZAH)[ 0];
-          if ((next__EZAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GZAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BV3G <<  1)) <=  4096)) {
-              next__EZAH=(void *)((unsigned long)result__GZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BV3G)));
+  __STRING_CONSTANT *Self__V4FH,*Self__04FH;
+  __INTEGER result__U4FH,__tmp__W4FH,Self__X4FH,idx__20S,idx__GOOB;
+  __INTEGER new_capacity__HOOB,i__IOOB,result__Z4FH,__tmp__14FH;
+  __INTEGER Self__24FH,typ_id__WQOB;
+  __POINTER ptr__RQOB,ptr_table__ZFHH,next__YFHH,result__0FHH;
+  __POINTER ptr_table__4FHH,next__3FHH,result__5FHH;
+  __UINTEGER_32 sz__TQOB,a__5AEH,new_size__ABEH,t__EBEH,a__DBEH;
+  __UINTEGER_32 new_size__BGHH,lab_type__AGHH;
+  void *node__40S,*node1__KOOB,*node2__LOOB,*__tmp__T2S;
+  void **old_buckets__JOOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__QQOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__GYDC;
+  Self__V4FH=((__STRING_CONSTANT *)k__U0S);
+  result__U4FH= 0;
+  __tmp__W4FH=Self__V4FH->count__DD;
+  Self__X4FH= 1;
+  while ((Self__X4FH <= __tmp__W4FH)) {
+    result__U4FH=(__INTEGER)((__INTEGER)( 5 * result__U4FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__V4FH->storage__VQO)[(__INTEGER)(Self__X4FH -  1)])));
+    Self__X4FH=(__INTEGER)(Self__X4FH +  1);
+  };
+  if ((result__U4FH <  0)) {
+    result__U4FH=(__INTEGER)(~ result__U4FH);
+  };
+  idx__20S=(__INTEGER)(result__U4FH % Self__S0S->capacity__A1S);
+  node__40S=((void **)Self__S0S->buckets__F1S)[idx__20S];
+  while ((! (((void *)node__40S == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__40S)->key__R1S,k__U0S)))) {
+    node__40S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__40S)->next__31S;
+  };
+  if (((void *)node__40S == (void *)NULL)) {
+    if ((Self__S0S->capacity__A1S == Self__S0S->count__G2S)) {
+      idx__GOOB= 0;
+      node1__KOOB=NULL;
+      node2__LOOB=NULL;
+      old_buckets__JOOB=Self__S0S->buckets__F1S;
+      new_capacity__HOOB=prime_number_ceiling__X41((__INTEGER)(Self__S0S->capacity__A1S +  1));
+      Self__S0S->buckets__F1S=create__XB4(new_capacity__HOOB);
+      i__IOOB=(__INTEGER)(Self__S0S->capacity__A1S -  1);
+      Self__S0S->capacity__A1S=new_capacity__HOOB;
+      while ((i__IOOB >=  0)) {
+        node1__KOOB=((void **)old_buckets__JOOB)[i__IOOB];
+        while (((void *)node1__KOOB != (void *)NULL)) {
+          node2__LOOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__KOOB)->next__31S;
+          Self__04FH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__KOOB)->key__R1S);
+          result__Z4FH= 0;
+          __tmp__14FH=Self__04FH->count__DD;
+          Self__24FH= 1;
+          while ((Self__24FH <= __tmp__14FH)) {
+            result__Z4FH=(__INTEGER)((__INTEGER)( 5 * result__Z4FH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__04FH->storage__VQO)[(__INTEGER)(Self__24FH -  1)])));
+            Self__24FH=(__INTEGER)(Self__24FH +  1);
+          };
+          if ((result__Z4FH <  0)) {
+            result__Z4FH=(__INTEGER)(~ result__Z4FH);
+          };
+          idx__GOOB=(__INTEGER)(result__Z4FH % Self__S0S->capacity__A1S);
+          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__KOOB)->next__31S=((void **)Self__S0S->buckets__F1S)[idx__GOOB];
+          ((void **)Self__S0S->buckets__F1S)[idx__GOOB]=node1__KOOB;
+          node1__KOOB=node2__LOOB;
+        };
+        i__IOOB=(__INTEGER)(i__IOOB -  1);
+      };
+      idx__20S=(__INTEGER)(result__U4FH % new_capacity__HOOB);
+    };
+    __tmp__T2S=((void **)Self__S0S->buckets__F1S)[idx__20S];
+    result__QQOB=NULL;
+    ptr__RQOB=((__POINTER )(NULL));
+    typ_id__WQOB= 0;
+    sz__TQOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
+    if ((sz__TQOB ==  0)) {
+      result__QQOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+    } else {
+      typ_id__WQOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TQOB);
+      if ((typ_id__WQOB == (__INTEGER)(-  1))) {
+        a__5AEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ABEH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQOB + a__5AEH) & (__UINTEGER_32)(~ a__5AEH));
+        ptr_table__ZFHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ABEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__YFHH=((__POINTER )(NULL));
+        result__0FHH=((__POINTER *)ptr_table__ZFHH)[ 0];
+        if ((result__0FHH == (void *)NULL)) {
+          result__0FHH=new_lab__MRJ(new_size__ABEH);
+          next__YFHH=(void *)((unsigned long)result__0FHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ABEH)));
+          ((__POINTER *)next__YFHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZFHH)[ 0]=next__YFHH;
+        } else {
+          next__YFHH=((__POINTER *)result__0FHH)[ 0];
+          if ((next__YFHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0FHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ABEH <<  1)) <=  4096)) {
+              next__YFHH=(void *)((unsigned long)result__0FHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ABEH)));
             } else {
-              next__EZAH=new_lab__ARJ(new_size__BV3G);
-            };
-            ((__POINTER *)next__EZAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FZAH)[ 0]=next__EZAH;
-          } else {
-            ((__POINTER *)result__GZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EZAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GZAH=next__EZAH;
-          };
-        };
-        ptr__FQOB=result__GZAH;
-      } else {
-        t__FV3G=((__UINTEGER_32 )typ_id__KQOB);
-        a__EV3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NZAH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQOB + a__EV3G) & (__UINTEGER_32)(~ a__EV3G));
-        ptr_table__KZAH=((__POINTER )(&(table_type[(t__FV3G)])));
-        lab_type__MZAH=(__UINTEGER_32)(t__FV3G |  1);
-        next__JZAH=((__POINTER )(NULL));
-        result__LZAH=((__POINTER *)ptr_table__KZAH)[ 0];
-        if ((result__LZAH == (void *)NULL)) {
-          result__LZAH=new_lab__ARJ(lab_type__MZAH);
-          next__JZAH=(void *)((unsigned long)result__LZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NZAH)));
-          ((__POINTER *)next__JZAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KZAH)[ 0]=next__JZAH;
-        } else {
-          next__JZAH=((__POINTER *)result__LZAH)[ 0];
-          if ((next__JZAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LZAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__NZAH <<  1)) <=  4096)) {
-              next__JZAH=(void *)((unsigned long)result__LZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NZAH)));
+              next__YFHH=new_lab__MRJ(new_size__ABEH);
+            };
+            ((__POINTER *)next__YFHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZFHH)[ 0]=next__YFHH;
+          } else {
+            ((__POINTER *)result__0FHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0FHH=next__YFHH;
+          };
+        };
+        ptr__RQOB=result__0FHH;
+      } else {
+        t__EBEH=((__UINTEGER_32 )typ_id__WQOB);
+        a__DBEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQOB + a__DBEH) & (__UINTEGER_32)(~ a__DBEH));
+        ptr_table__4FHH=((__POINTER )(&(table_type[(t__EBEH)])));
+        lab_type__AGHH=(__UINTEGER_32)(t__EBEH |  1);
+        next__3FHH=((__POINTER )(NULL));
+        result__5FHH=((__POINTER *)ptr_table__4FHH)[ 0];
+        if ((result__5FHH == (void *)NULL)) {
+          result__5FHH=new_lab__MRJ(lab_type__AGHH);
+          next__3FHH=(void *)((unsigned long)result__5FHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BGHH)));
+          ((__POINTER *)next__3FHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4FHH)[ 0]=next__3FHH;
+        } else {
+          next__3FHH=((__POINTER *)result__5FHH)[ 0];
+          if ((next__3FHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5FHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BGHH <<  1)) <=  4096)) {
+              next__3FHH=(void *)((unsigned long)result__5FHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BGHH)));
             } else {
-              next__JZAH=new_lab__ARJ(lab_type__MZAH);
+              next__3FHH=new_lab__MRJ(lab_type__AGHH);
             };
-            ((__POINTER *)next__JZAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KZAH)[ 0]=next__JZAH;
+            ((__POINTER *)next__3FHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4FHH)[ 0]=next__3FHH;
           } else {
-            ((__POINTER *)result__LZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JZAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LZAH=next__JZAH;
+            ((__POINTER *)result__5FHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3FHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5FHH=next__3FHH;
           };
         };
-        ptr__FQOB=result__LZAH;
+        ptr__RQOB=result__5FHH;
       };
-      result__EQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__FQOB);
-      *(result__EQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+      result__QQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__RQOB);
+      *(result__QQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
     };
-    Self__0XDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__EQOB);
-    Self__0XDC->item__OSOB=v__H0S;
-    Self__0XDC->key__F1S=k__I0S;
-    Self__0XDC->next__R1S=__tmp__H2S;
-    node__S0S=result__EQOB;
-    ((void **)Self__G0S->buckets__Z0S)[idx__Q0S]=result__EQOB;
-    Self__G0S->count__01S=(__INTEGER)(Self__G0S->count__01S +  1);
+    Self__GYDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__QQOB);
+    Self__GYDC->item__0SOB=v__T0S;
+    Self__GYDC->key__R1S=k__U0S;
+    Self__GYDC->next__31S=__tmp__T2S;
+    node__40S=result__QQOB;
+    ((void **)Self__S0S->buckets__F1S)[idx__20S]=result__QQOB;
+    Self__S0S->count__G2S=(__INTEGER)(Self__S0S->count__G2S +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__S0S)->item__OSOB=v__H0S;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__40S)->item__0SOB=v__T0S;
   };
 }
 
-static void reduce_path__E3HC(void *st__G3HC)
+static void reduce_path__Q3HC(void *st__S3HC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER stat__I3HC,__tmp__US5G,Self__WS5G,i__H3HC,Self__B3NE;
-  __INTEGER n__KV3G,len__2S5G,__tmp__3S5G,__tmp__5S5G,Self__AT5G;
-  __INTEGER len__FT5G,__tmp__GT5G,__tmp__IT5G,Self__JT5G,result__NT5G;
-  __INTEGER n__MV3G,len__ST5G,__tmp__TT5G,__tmp__VT5G,Self__WT5G;
-  __INTEGER end__ZT5G,len__1T5G,__tmp__2T5G,__tmp__4T5G,Self__5T5G;
-  __INTEGER Self__QODF,n__OV3G,len__EU5G,__tmp__FU5G,__tmp__HU5G;
-  __INTEGER Self__IU5G,result__MU5G,end__PU5G,len__RU5G,__tmp__SU5G;
-  __INTEGER __tmp__UU5G,Self__VU5G;
-  __STRING *Self__SS5G,*Self__JV3G,*Self__HT5G,*Self__OT5G,*Self__LV3G;
-  __STRING *Self__3T5G,*Self__NV3G,*Self__PV3G,*Self__RV3G,*Self__NU5G;
-  __STRING *Self__TU5G;
-  __CHARACTER car__J3HC,Self__PZAH;
-  __CHARACTER *__tmp__TS5G,*Self__VS5G;
-  __BOOLEAN __tmp__Q5HC,__tmp__VAIC,result__AZGE,result__OZAH;
-  __BOOLEAN __tmp__QZAH,__tmp__WBIC;
-  stat__I3HC= 0;
-  car__J3HC='\0';
-  Self__SS5G=((__STRING *)st__G3HC);
-  __tmp__TS5G=Self__SS5G->storage__VBS;
-  __tmp__US5G=(__INTEGER)(Self__SS5G->count__KFC -  1);
-  Self__VS5G=((__CHARACTER *)__tmp__TS5G);
-  Self__WS5G=__tmp__US5G;
-  while ((Self__WS5G >=  0)) {
-    if (('\\' == Self__VS5G[Self__WS5G])) {
-      Self__VS5G[Self__WS5G]='/';
-    };
-    Self__WS5G=(__INTEGER)(Self__WS5G -  1);
-  };
-  i__H3HC= 1;
-  while ((i__H3HC <= ((__STRING *)st__G3HC)->count__KFC)) {
-    car__J3HC=((__CHARACTER *)((__STRING *)st__G3HC)->storage__VBS)[(__INTEGER)(i__H3HC -  1)];
-    if ((car__J3HC == '/')) {
-      Self__B3NE=stat__I3HC;
-      if ((stat__I3HC ==  0)) {
-        stat__I3HC= 1;
-      };
-      if ((Self__B3NE ==  1)) {
-        Self__JV3G=((__STRING *)st__G3HC);
-        n__KV3G=(__INTEGER)(i__H3HC -  1);
-        if ((n__KV3G > Self__JV3G->count__KFC)) {
-          Self__JV3G->count__KFC= 0;
-        } else {
-          if ((n__KV3G >  0)) {
-            len__2S5G=(__INTEGER)((__INTEGER)(n__KV3G -  1) +  1);
-            if ((len__2S5G >  0)) {
-              __tmp__3S5G=(__INTEGER)(n__KV3G +  1);
-              __tmp__5S5G=Self__JV3G->count__KFC;
-              Self__AT5G=__tmp__3S5G;
-              while ((Self__AT5G <= __tmp__5S5G)) {
-                ((__CHARACTER *)Self__JV3G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__AT5G - len__2S5G) -  1)]=((__CHARACTER *)Self__JV3G->storage__VBS)[(__INTEGER)(Self__AT5G -  1)];
-                Self__AT5G=(__INTEGER)(Self__AT5G +  1);
+  __INTEGER stat__U3HC,__tmp__A5FH,Self__C5FH,i__T3HC,Self__DNOE;
+  __INTEGER n__JBEH,len__I5FH,__tmp__J5FH,__tmp__L5FH,Self__M5FH;
+  __INTEGER len__R5FH,__tmp__S5FH,__tmp__U5FH,Self__V5FH,result__Z5FH;
+  __INTEGER n__LBEH,len__45FH,__tmp__55FH,__tmp__BAGH,Self__CAGH;
+  __INTEGER end__FAGH,len__HAGH,__tmp__IAGH,__tmp__KAGH,Self__LAGH;
+  __INTEGER Self__4JEF,n__NBEH,len__QAGH,__tmp__RAGH,__tmp__TAGH;
+  __INTEGER Self__UAGH,result__YAGH,end__1AGH,len__3AGH,__tmp__4AGH;
+  __INTEGER __tmp__ABGH,Self__BBGH;
+  __STRING *Self__44FH,*Self__IBEH,*Self__T5FH,*Self__05FH,*Self__KBEH;
+  __STRING *Self__JAGH,*Self__MBEH,*Self__OBEH,*Self__QBEH,*Self__ZAGH;
+  __STRING *Self__5AGH;
+  __CHARACTER car__V3HC,Self__DGHH;
+  __CHARACTER *__tmp__54FH,*Self__B5FH;
+  __BOOLEAN __tmp__25HC,__tmp__BBIC,result__JGHE,result__CGHH;
+  __BOOLEAN __tmp__EGHH,__tmp__CCIC;
+  stat__U3HC= 0;
+  car__V3HC='\0';
+  Self__44FH=((__STRING *)st__S3HC);
+  __tmp__54FH=Self__44FH->storage__BCS;
+  __tmp__A5FH=(__INTEGER)(Self__44FH->count__WFC -  1);
+  Self__B5FH=((__CHARACTER *)__tmp__54FH);
+  Self__C5FH=__tmp__A5FH;
+  while ((Self__C5FH >=  0)) {
+    if (('\\' == Self__B5FH[Self__C5FH])) {
+      Self__B5FH[Self__C5FH]='/';
+    };
+    Self__C5FH=(__INTEGER)(Self__C5FH -  1);
+  };
+  i__T3HC= 1;
+  while ((i__T3HC <= ((__STRING *)st__S3HC)->count__WFC)) {
+    car__V3HC=((__CHARACTER *)((__STRING *)st__S3HC)->storage__BCS)[(__INTEGER)(i__T3HC -  1)];
+    if ((car__V3HC == '/')) {
+      Self__DNOE=stat__U3HC;
+      if ((stat__U3HC ==  0)) {
+        stat__U3HC= 1;
+      };
+      if ((Self__DNOE ==  1)) {
+        Self__IBEH=((__STRING *)st__S3HC);
+        n__JBEH=(__INTEGER)(i__T3HC -  1);
+        if ((n__JBEH > Self__IBEH->count__WFC)) {
+          Self__IBEH->count__WFC= 0;
+        } else {
+          if ((n__JBEH >  0)) {
+            len__I5FH=(__INTEGER)((__INTEGER)(n__JBEH -  1) +  1);
+            if ((len__I5FH >  0)) {
+              __tmp__J5FH=(__INTEGER)(n__JBEH +  1);
+              __tmp__L5FH=Self__IBEH->count__WFC;
+              Self__M5FH=__tmp__J5FH;
+              while ((Self__M5FH <= __tmp__L5FH)) {
+                ((__CHARACTER *)Self__IBEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__M5FH - len__I5FH) -  1)]=((__CHARACTER *)Self__IBEH->storage__BCS)[(__INTEGER)(Self__M5FH -  1)];
+                Self__M5FH=(__INTEGER)(Self__M5FH +  1);
               };
-              Self__JV3G->count__KFC=(__INTEGER)(Self__JV3G->count__KFC - len__2S5G);
-            };
-          };
-        };
-        i__H3HC= 1;
-      };
-      if ((Self__B3NE ==  2)) {
-        Self__HT5G=((__STRING *)st__G3HC);
-        len__FT5G=(__INTEGER)((__INTEGER)(i__H3HC - (__INTEGER)(i__H3HC -  1)) +  1);
-        if ((len__FT5G >  0)) {
-          __tmp__GT5G=(__INTEGER)(i__H3HC +  1);
-          __tmp__IT5G=Self__HT5G->count__KFC;
-          Self__JT5G=__tmp__GT5G;
-          while ((Self__JT5G <= __tmp__IT5G)) {
-            ((__CHARACTER *)Self__HT5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__JT5G - len__FT5G) -  1)]=((__CHARACTER *)Self__HT5G->storage__VBS)[(__INTEGER)(Self__JT5G -  1)];
-            Self__JT5G=(__INTEGER)(Self__JT5G +  1);
-          };
-          Self__HT5G->count__KFC=(__INTEGER)(Self__HT5G->count__KFC - len__FT5G);
-        };
-        i__H3HC=(__INTEGER)(i__H3HC -  2);
-        stat__I3HC= 1;
-      };
-      if ((Self__B3NE ==  3)) {
-        Self__OT5G=((__STRING *)st__G3HC);
-        result__NT5G=(__INTEGER)(i__H3HC -  4);
-        while ((! ((result__NT5G <  1) || ('/' == ((__CHARACTER *)Self__OT5G->storage__VBS)[(__INTEGER)(result__NT5G -  1)])))) {
-          result__NT5G=(__INTEGER)(result__NT5G -  1);
-        };
-        if ((result__NT5G ==  0)) {
-          Self__LV3G=((__STRING *)st__G3HC);
-          n__MV3G=(__INTEGER)(i__H3HC -  1);
-          if ((n__MV3G > Self__LV3G->count__KFC)) {
-            Self__LV3G->count__KFC= 0;
-          } else {
-            if ((n__MV3G >  0)) {
-              len__ST5G=(__INTEGER)((__INTEGER)(n__MV3G -  1) +  1);
-              if ((len__ST5G >  0)) {
-                __tmp__TT5G=(__INTEGER)(n__MV3G +  1);
-                __tmp__VT5G=Self__LV3G->count__KFC;
-                Self__WT5G=__tmp__TT5G;
-                while ((Self__WT5G <= __tmp__VT5G)) {
-                  ((__CHARACTER *)Self__LV3G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__WT5G - len__ST5G) -  1)]=((__CHARACTER *)Self__LV3G->storage__VBS)[(__INTEGER)(Self__WT5G -  1)];
-                  Self__WT5G=(__INTEGER)(Self__WT5G +  1);
+              Self__IBEH->count__WFC=(__INTEGER)(Self__IBEH->count__WFC - len__I5FH);
+            };
+          };
+        };
+        i__T3HC= 1;
+      };
+      if ((Self__DNOE ==  2)) {
+        Self__T5FH=((__STRING *)st__S3HC);
+        len__R5FH=(__INTEGER)((__INTEGER)(i__T3HC - (__INTEGER)(i__T3HC -  1)) +  1);
+        if ((len__R5FH >  0)) {
+          __tmp__S5FH=(__INTEGER)(i__T3HC +  1);
+          __tmp__U5FH=Self__T5FH->count__WFC;
+          Self__V5FH=__tmp__S5FH;
+          while ((Self__V5FH <= __tmp__U5FH)) {
+            ((__CHARACTER *)Self__T5FH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__V5FH - len__R5FH) -  1)]=((__CHARACTER *)Self__T5FH->storage__BCS)[(__INTEGER)(Self__V5FH -  1)];
+            Self__V5FH=(__INTEGER)(Self__V5FH +  1);
+          };
+          Self__T5FH->count__WFC=(__INTEGER)(Self__T5FH->count__WFC - len__R5FH);
+        };
+        i__T3HC=(__INTEGER)(i__T3HC -  2);
+        stat__U3HC= 1;
+      };
+      if ((Self__DNOE ==  3)) {
+        Self__05FH=((__STRING *)st__S3HC);
+        result__Z5FH=(__INTEGER)(i__T3HC -  4);
+        while ((! ((result__Z5FH <  1) || ('/' == ((__CHARACTER *)Self__05FH->storage__BCS)[(__INTEGER)(result__Z5FH -  1)])))) {
+          result__Z5FH=(__INTEGER)(result__Z5FH -  1);
+        };
+        if ((result__Z5FH ==  0)) {
+          Self__KBEH=((__STRING *)st__S3HC);
+          n__LBEH=(__INTEGER)(i__T3HC -  1);
+          if ((n__LBEH > Self__KBEH->count__WFC)) {
+            Self__KBEH->count__WFC= 0;
+          } else {
+            if ((n__LBEH >  0)) {
+              len__45FH=(__INTEGER)((__INTEGER)(n__LBEH -  1) +  1);
+              if ((len__45FH >  0)) {
+                __tmp__55FH=(__INTEGER)(n__LBEH +  1);
+                __tmp__BAGH=Self__KBEH->count__WFC;
+                Self__CAGH=__tmp__55FH;
+                while ((Self__CAGH <= __tmp__BAGH)) {
+                  ((__CHARACTER *)Self__KBEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__CAGH - len__45FH) -  1)]=((__CHARACTER *)Self__KBEH->storage__BCS)[(__INTEGER)(Self__CAGH -  1)];
+                  Self__CAGH=(__INTEGER)(Self__CAGH +  1);
                 };
-                Self__LV3G->count__KFC=(__INTEGER)(Self__LV3G->count__KFC - len__ST5G);
+                Self__KBEH->count__WFC=(__INTEGER)(Self__KBEH->count__WFC - len__45FH);
               };
             };
           };
-          i__H3HC= 1;
+          i__T3HC= 1;
         } else {
-          Self__3T5G=((__STRING *)st__G3HC);
-          end__ZT5G=(__INTEGER)(i__H3HC -  1);
-          len__1T5G=(__INTEGER)((__INTEGER)(end__ZT5G - result__NT5G) +  1);
-          if ((len__1T5G >  0)) {
-            __tmp__2T5G=(__INTEGER)(end__ZT5G +  1);
-            __tmp__4T5G=Self__3T5G->count__KFC;
-            Self__5T5G=__tmp__2T5G;
-            while ((Self__5T5G <= __tmp__4T5G)) {
-              ((__CHARACTER *)Self__3T5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__5T5G - len__1T5G) -  1)]=((__CHARACTER *)Self__3T5G->storage__VBS)[(__INTEGER)(Self__5T5G -  1)];
-              Self__5T5G=(__INTEGER)(Self__5T5G +  1);
+          Self__JAGH=((__STRING *)st__S3HC);
+          end__FAGH=(__INTEGER)(i__T3HC -  1);
+          len__HAGH=(__INTEGER)((__INTEGER)(end__FAGH - result__Z5FH) +  1);
+          if ((len__HAGH >  0)) {
+            __tmp__IAGH=(__INTEGER)(end__FAGH +  1);
+            __tmp__KAGH=Self__JAGH->count__WFC;
+            Self__LAGH=__tmp__IAGH;
+            while ((Self__LAGH <= __tmp__KAGH)) {
+              ((__CHARACTER *)Self__JAGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__LAGH - len__HAGH) -  1)]=((__CHARACTER *)Self__JAGH->storage__BCS)[(__INTEGER)(Self__LAGH -  1)];
+              Self__LAGH=(__INTEGER)(Self__LAGH +  1);
             };
-            Self__3T5G->count__KFC=(__INTEGER)(Self__3T5G->count__KFC - len__1T5G);
+            Self__JAGH->count__WFC=(__INTEGER)(Self__JAGH->count__WFC - len__HAGH);
           };
-          i__H3HC=result__NT5G;
+          i__T3HC=result__Z5FH;
         };
-        stat__I3HC= 1;
+        stat__U3HC= 1;
       };
-      __tmp__Q5HC=TRUE__;
+      __tmp__25HC=TRUE__;
     } else {
-      __tmp__Q5HC=FALSE__;
+      __tmp__25HC=FALSE__;
     };
-    if (__tmp__Q5HC) {
-      __tmp__VAIC=TRUE__;
+    if (__tmp__25HC) {
+      __tmp__BBIC=TRUE__;
     } else {
-      result__AZGE=(car__J3HC == '.');
-      if (result__AZGE) {
-        Self__QODF=stat__I3HC;
-        if ((stat__I3HC ==  1)) {
-          stat__I3HC= 2;
+      result__JGHE=(car__V3HC == '.');
+      if (result__JGHE) {
+        Self__4JEF=stat__U3HC;
+        if ((stat__U3HC ==  1)) {
+          stat__U3HC= 2;
         };
-        if ((Self__QODF ==  2)) {
-          stat__I3HC= 3;
+        if ((Self__4JEF ==  2)) {
+          stat__U3HC= 3;
         };
-        if ((Self__QODF ==  3)) {
-          stat__I3HC= 0;
+        if ((Self__4JEF ==  3)) {
+          stat__U3HC= 0;
         };
       };
-      __tmp__VAIC=result__AZGE;
+      __tmp__BBIC=result__JGHE;
     };
-    if ((! __tmp__VAIC)) {
-      if (((car__J3HC == ':') && (i__H3HC >  2))) {
-        Self__PZAH=((__CHARACTER *)((__STRING *)st__G3HC)->storage__VBS)[(__INTEGER)((__INTEGER)(i__H3HC -  1) -  1)];
-        result__OZAH=FALSE__;
-        if ((((__INTEGER_8 )Self__PZAH) >= ((__INTEGER_8 )'a'))) {
-          result__OZAH=(((__INTEGER_8 )Self__PZAH) <= ((__INTEGER_8 )'z'));
-          __tmp__QZAH=TRUE__;
+    if ((! __tmp__BBIC)) {
+      if (((car__V3HC == ':') && (i__T3HC >  2))) {
+        Self__DGHH=((__CHARACTER *)((__STRING *)st__S3HC)->storage__BCS)[(__INTEGER)((__INTEGER)(i__T3HC -  1) -  1)];
+        result__CGHH=FALSE__;
+        if ((((__INTEGER_8 )Self__DGHH) >= ((__INTEGER_8 )'a'))) {
+          result__CGHH=(((__INTEGER_8 )Self__DGHH) <= ((__INTEGER_8 )'z'));
+          __tmp__EGHH=TRUE__;
         } else {
-          __tmp__QZAH=FALSE__;
+          __tmp__EGHH=FALSE__;
         };
-        if ((! __tmp__QZAH)) {
-          if ((((__INTEGER_8 )Self__PZAH) >= ((__INTEGER_8 )'A'))) {
-            result__OZAH=(((__INTEGER_8 )Self__PZAH) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__EGHH)) {
+          if ((((__INTEGER_8 )Self__DGHH) >= ((__INTEGER_8 )'A'))) {
+            result__CGHH=(((__INTEGER_8 )Self__DGHH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__WBIC=result__OZAH;
+        __tmp__CCIC=result__CGHH;
       } else {
-        __tmp__WBIC=FALSE__;
+        __tmp__CCIC=FALSE__;
       };
-      if ((__tmp__WBIC && (((__CHARACTER *)((__STRING *)st__G3HC)->storage__VBS)[(__INTEGER)((__INTEGER)(i__H3HC -  2) -  1)] == '/'))) {
-        Self__NV3G=((__STRING *)st__G3HC);
-        n__OV3G=(__INTEGER)(i__H3HC -  2);
-        if ((n__OV3G > Self__NV3G->count__KFC)) {
-          Self__NV3G->count__KFC= 0;
+      if ((__tmp__CCIC && (((__CHARACTER *)((__STRING *)st__S3HC)->storage__BCS)[(__INTEGER)((__INTEGER)(i__T3HC -  2) -  1)] == '/'))) {
+        Self__MBEH=((__STRING *)st__S3HC);
+        n__NBEH=(__INTEGER)(i__T3HC -  2);
+        if ((n__NBEH > Self__MBEH->count__WFC)) {
+          Self__MBEH->count__WFC= 0;
         } else {
-          if ((n__OV3G >  0)) {
-            len__EU5G=(__INTEGER)((__INTEGER)(n__OV3G -  1) +  1);
-            if ((len__EU5G >  0)) {
-              __tmp__FU5G=(__INTEGER)(n__OV3G +  1);
-              __tmp__HU5G=Self__NV3G->count__KFC;
-              Self__IU5G=__tmp__FU5G;
-              while ((Self__IU5G <= __tmp__HU5G)) {
-                ((__CHARACTER *)Self__NV3G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__IU5G - len__EU5G) -  1)]=((__CHARACTER *)Self__NV3G->storage__VBS)[(__INTEGER)(Self__IU5G -  1)];
-                Self__IU5G=(__INTEGER)(Self__IU5G +  1);
+          if ((n__NBEH >  0)) {
+            len__QAGH=(__INTEGER)((__INTEGER)(n__NBEH -  1) +  1);
+            if ((len__QAGH >  0)) {
+              __tmp__RAGH=(__INTEGER)(n__NBEH +  1);
+              __tmp__TAGH=Self__MBEH->count__WFC;
+              Self__UAGH=__tmp__RAGH;
+              while ((Self__UAGH <= __tmp__TAGH)) {
+                ((__CHARACTER *)Self__MBEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__UAGH - len__QAGH) -  1)]=((__CHARACTER *)Self__MBEH->storage__BCS)[(__INTEGER)(Self__UAGH -  1)];
+                Self__UAGH=(__INTEGER)(Self__UAGH +  1);
               };
-              Self__NV3G->count__KFC=(__INTEGER)(Self__NV3G->count__KFC - len__EU5G);
+              Self__MBEH->count__WFC=(__INTEGER)(Self__MBEH->count__WFC - len__QAGH);
             };
           };
         };
-        i__H3HC= 1;
+        i__T3HC= 1;
       } else {
-        stat__I3HC= 0;
+        stat__U3HC= 0;
       };
     };
-    i__H3HC=(__INTEGER)(i__H3HC +  1);
+    i__T3HC=(__INTEGER)(i__T3HC +  1);
   };
-  if ((stat__I3HC ==  1)) {
-    Self__PV3G=((__STRING *)st__G3HC);
-    if (( 1 > Self__PV3G->count__KFC)) {
-      Self__PV3G->count__KFC= 0;
+  if ((stat__U3HC ==  1)) {
+    Self__OBEH=((__STRING *)st__S3HC);
+    if (( 1 > Self__OBEH->count__WFC)) {
+      Self__OBEH->count__WFC= 0;
     } else {
-      Self__PV3G->count__KFC=(__INTEGER)(Self__PV3G->count__KFC -  1);
+      Self__OBEH->count__WFC=(__INTEGER)(Self__OBEH->count__WFC -  1);
     };
   };
-  if ((stat__I3HC ==  2)) {
-    Self__RV3G=((__STRING *)st__G3HC);
-    if (( 2 > Self__RV3G->count__KFC)) {
-      Self__RV3G->count__KFC= 0;
+  if ((stat__U3HC ==  2)) {
+    Self__QBEH=((__STRING *)st__S3HC);
+    if (( 2 > Self__QBEH->count__WFC)) {
+      Self__QBEH->count__WFC= 0;
     } else {
-      Self__RV3G->count__KFC=(__INTEGER)(Self__RV3G->count__KFC -  2);
+      Self__QBEH->count__WFC=(__INTEGER)(Self__QBEH->count__WFC -  2);
     };
   };
-  if ((stat__I3HC ==  3)) {
-    Self__NU5G=((__STRING *)st__G3HC);
-    result__MU5G=(__INTEGER)(i__H3HC -  4);
-    while ((! ((result__MU5G <  1) || ('/' == ((__CHARACTER *)Self__NU5G->storage__VBS)[(__INTEGER)(result__MU5G -  1)])))) {
-      result__MU5G=(__INTEGER)(result__MU5G -  1);
+  if ((stat__U3HC ==  3)) {
+    Self__ZAGH=((__STRING *)st__S3HC);
+    result__YAGH=(__INTEGER)(i__T3HC -  4);
+    while ((! ((result__YAGH <  1) || ('/' == ((__CHARACTER *)Self__ZAGH->storage__BCS)[(__INTEGER)(result__YAGH -  1)])))) {
+      result__YAGH=(__INTEGER)(result__YAGH -  1);
     };
-    if ((result__MU5G ==  0)) {
-      ((__STRING *)st__G3HC)->count__KFC= 0;
+    if ((result__YAGH ==  0)) {
+      ((__STRING *)st__S3HC)->count__WFC= 0;
     } else {
-      Self__TU5G=((__STRING *)st__G3HC);
-      end__PU5G=(__INTEGER)(i__H3HC -  1);
-      len__RU5G=(__INTEGER)((__INTEGER)(end__PU5G - result__MU5G) +  1);
-      if ((len__RU5G >  0)) {
-        __tmp__SU5G=(__INTEGER)(end__PU5G +  1);
-        __tmp__UU5G=Self__TU5G->count__KFC;
-        Self__VU5G=__tmp__SU5G;
-        while ((Self__VU5G <= __tmp__UU5G)) {
-          ((__CHARACTER *)Self__TU5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__VU5G - len__RU5G) -  1)]=((__CHARACTER *)Self__TU5G->storage__VBS)[(__INTEGER)(Self__VU5G -  1)];
-          Self__VU5G=(__INTEGER)(Self__VU5G +  1);
+      Self__5AGH=((__STRING *)st__S3HC);
+      end__1AGH=(__INTEGER)(i__T3HC -  1);
+      len__3AGH=(__INTEGER)((__INTEGER)(end__1AGH - result__YAGH) +  1);
+      if ((len__3AGH >  0)) {
+        __tmp__4AGH=(__INTEGER)(end__1AGH +  1);
+        __tmp__ABGH=Self__5AGH->count__WFC;
+        Self__BBGH=__tmp__4AGH;
+        while ((Self__BBGH <= __tmp__ABGH)) {
+          ((__CHARACTER *)Self__5AGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__BBGH - len__3AGH) -  1)]=((__CHARACTER *)Self__5AGH->storage__BCS)[(__INTEGER)(Self__BBGH -  1)];
+          Self__BBGH=(__INTEGER)(Self__BBGH +  1);
         };
-        Self__TU5G->count__KFC=(__INTEGER)(Self__TU5G->count__KFC - len__RU5G);
+        Self__5AGH->count__WFC=(__INTEGER)(Self__5AGH->count__WFC - len__3AGH);
       };
     };
   };
-  if ((((__STRING *)st__G3HC)->count__KFC ==  0)) {
-    add_last__NLT(st__G3HC,'/');
+  if ((((__STRING *)st__S3HC)->count__WFC ==  0)) {
+    add_last__ZLT(st__S3HC,'/');
   };
 }
 
-static void* reference_at__YT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__ZT0C,void *k__0T0C)
+static void* reference_at__EU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__FU0C,void *k__GU0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__EU0C;
-  __STRING *Self__ZU5G;
-  __INTEGER result__YU5G,__tmp__0U5G,Self__1U5G;
-  void *node__DU0C;
-  result__EU0C=NULL;
-  Self__ZU5G=((__STRING *)k__0T0C);
-  result__YU5G= 0;
-  __tmp__0U5G=Self__ZU5G->count__KFC;
-  Self__1U5G= 1;
-  while ((Self__1U5G <= __tmp__0U5G)) {
-    result__YU5G=(__INTEGER)((__INTEGER)( 5 * result__YU5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZU5G->storage__VBS)[(__INTEGER)(Self__1U5G -  1)])));
-    Self__1U5G=(__INTEGER)(Self__1U5G +  1);
-  };
-  if ((result__YU5G <  0)) {
-    result__YU5G=(__INTEGER)(~ result__YU5G);
-  };
-  node__DU0C=((void **)Self__ZT0C->buckets__Z0S)[(__INTEGER)(result__YU5G % Self__ZT0C->capacity__U0S)];
-  while ((! (((void *)node__DU0C == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__DU0C)->key__F1S,k__0T0C)))) {
-    node__DU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__DU0C)->next__R1S;
-  };
-  if (((void *)node__DU0C != (void *)NULL)) {
-    result__EU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__DU0C)->item__OSOB;
-  };
-  return(result__EU0C);
+  void *result__QU0C;
+  __STRING *Self__FBGH;
+  __INTEGER result__EBGH,__tmp__GBGH,Self__HBGH;
+  void *node__PU0C;
+  result__QU0C=NULL;
+  Self__FBGH=((__STRING *)k__GU0C);
+  result__EBGH= 0;
+  __tmp__GBGH=Self__FBGH->count__WFC;
+  Self__HBGH= 1;
+  while ((Self__HBGH <= __tmp__GBGH)) {
+    result__EBGH=(__INTEGER)((__INTEGER)( 5 * result__EBGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FBGH->storage__BCS)[(__INTEGER)(Self__HBGH -  1)])));
+    Self__HBGH=(__INTEGER)(Self__HBGH +  1);
+  };
+  if ((result__EBGH <  0)) {
+    result__EBGH=(__INTEGER)(~ result__EBGH);
+  };
+  node__PU0C=((void **)Self__FU0C->buckets__F1S)[(__INTEGER)(result__EBGH % Self__FU0C->capacity__A1S)];
+  while ((! (((void *)node__PU0C == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__PU0C)->key__R1S,k__GU0C)))) {
+    node__PU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__PU0C)->next__31S;
+  };
+  if (((void *)node__PU0C != (void *)NULL)) {
+    result__QU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__PU0C)->item__0SOB;
+  };
+  return(result__QU0C);
 }
 
-static void* physical_get_entry__MW0C(void *new_path__OW0C)
+static void* physical_get_entry__YW0C(void *new_path__0W0C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__RW0C;
-  __STRING *Self__VV3G;
-  __FILE_UNIX *result__SXI;
-  __POINTER ptr__TXI,ptr_table__SZAH,next__RZAH,result__TZAH;
-  __POINTER ptr_table__XZAH,next__WZAH,result__YZAH,ptr__EZI;
-  __POINTER ptr_table__2ZAH,next__1ZAH,result__3ZAH,ptr_table__B0AH;
-  __POINTER next__A0AH,result__C0AH;
-  __INTEGER typ_id__YXI,typ_id__JZI;
-  __UINTEGER_32 sz__VXI,a__CG4G,new_size__DG4G,t__HG4G,a__GG4G;
-  __UINTEGER_32 new_size__0ZAH,lab_type__ZZAH,sz__GZI,a__KG4G;
-  __UINTEGER_32 new_size__LG4G,t__PG4G,a__OG4G,new_size__E0AH;
-  __UINTEGER_32 lab_type__D0AH;
-  __DIRECTORY_UNIX *result__DZI;
-  void *__tmp__IX0C;
-  __CHARACTER *pe__QW0C;
-  result__RW0C=NULL;
-  Self__VV3G=((__STRING *)new_path__OW0C);
-  if ((Self__VV3G->capacity__MBS > Self__VV3G->count__KFC)) {
-    ((__CHARACTER *)Self__VV3G->storage__VBS)[Self__VV3G->count__KFC]='\0';
+  void *result__3W0C;
+  __STRING *Self__UBEH;
+  __FILE_UNIX *result__4XI;
+  __POINTER ptr__5XI,ptr_table__GGHH,next__FGHH,result__HGHH;
+  __POINTER ptr_table__LGHH,next__KGHH,result__MGHH,ptr__QZI;
+  __POINTER ptr_table__QGHH,next__PGHH,result__RGHH,ptr_table__VGHH;
+  __POINTER next__UGHH,result__WGHH;
+  __INTEGER typ_id__EYI,typ_id__VZI;
+  __UINTEGER_32 sz__BYI,a__XREH,new_size__YREH,t__2REH,a__1REH;
+  __UINTEGER_32 new_size__OGHH,lab_type__NGHH,sz__SZI,a__5REH;
+  __UINTEGER_32 new_size__ASEH,t__ESEH,a__DSEH,new_size__YGHH;
+  __UINTEGER_32 lab_type__XGHH;
+  __DIRECTORY_UNIX *result__PZI;
+  void *__tmp__UX0C;
+  __CHARACTER *pe__2W0C;
+  result__3W0C=NULL;
+  Self__UBEH=((__STRING *)new_path__0W0C);
+  if ((Self__UBEH->capacity__YBS > Self__UBEH->count__WFC)) {
+    ((__CHARACTER *)Self__UBEH->storage__BCS)[Self__UBEH->count__WFC]='\0';
   } else {
-    add_last__NLT(Self__VV3G,'\0');
-    Self__VV3G->count__KFC=(__INTEGER)(Self__VV3G->count__KFC -  1);
+    add_last__ZLT(Self__UBEH,'\0');
+    Self__UBEH->count__WFC=(__INTEGER)(Self__UBEH->count__WFC -  1);
   };
-  pe__QW0C=Self__VV3G->storage__VBS;
+  pe__2W0C=Self__UBEH->storage__BCS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__QW0C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__2W0C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      result__SXI=NULL;
-      ptr__TXI=((__POINTER )(NULL));
-      typ_id__YXI= 0;
-      sz__VXI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
-      if ((sz__VXI ==  0)) {
-        result__SXI=FILE_UNIX__;
-      } else {
-        typ_id__YXI=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__VXI);
-        if ((typ_id__YXI == (__INTEGER)(-  1))) {
-          a__CG4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__DG4G=(__UINTEGER_32)((__UINTEGER_32)(sz__VXI + a__CG4G) & (__UINTEGER_32)(~ a__CG4G));
-          ptr_table__SZAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DG4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__RZAH=((__POINTER )(NULL));
-          result__TZAH=((__POINTER *)ptr_table__SZAH)[ 0];
-          if ((result__TZAH == (void *)NULL)) {
-            result__TZAH=new_lab__ARJ(new_size__DG4G);
-            next__RZAH=(void *)((unsigned long)result__TZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DG4G)));
-            ((__POINTER *)next__RZAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SZAH)[ 0]=next__RZAH;
-          } else {
-            next__RZAH=((__POINTER *)result__TZAH)[ 0];
-            if ((next__RZAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TZAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DG4G <<  1)) <=  4096)) {
-                next__RZAH=(void *)((unsigned long)result__TZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DG4G)));
+      result__4XI=NULL;
+      ptr__5XI=((__POINTER )(NULL));
+      typ_id__EYI= 0;
+      sz__BYI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__BYI ==  0)) {
+        result__4XI=FILE_UNIX__;
+      } else {
+        typ_id__EYI=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BYI);
+        if ((typ_id__EYI == (__INTEGER)(-  1))) {
+          a__XREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YREH=(__UINTEGER_32)((__UINTEGER_32)(sz__BYI + a__XREH) & (__UINTEGER_32)(~ a__XREH));
+          ptr_table__GGHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YREH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__FGHH=((__POINTER )(NULL));
+          result__HGHH=((__POINTER *)ptr_table__GGHH)[ 0];
+          if ((result__HGHH == (void *)NULL)) {
+            result__HGHH=new_lab__MRJ(new_size__YREH);
+            next__FGHH=(void *)((unsigned long)result__HGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YREH)));
+            ((__POINTER *)next__FGHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GGHH)[ 0]=next__FGHH;
+          } else {
+            next__FGHH=((__POINTER *)result__HGHH)[ 0];
+            if ((next__FGHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YREH <<  1)) <=  4096)) {
+                next__FGHH=(void *)((unsigned long)result__HGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YREH)));
               } else {
-                next__RZAH=new_lab__ARJ(new_size__DG4G);
+                next__FGHH=new_lab__MRJ(new_size__YREH);
               };
-              ((__POINTER *)next__RZAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SZAH)[ 0]=next__RZAH;
+              ((__POINTER *)next__FGHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GGHH)[ 0]=next__FGHH;
             } else {
-              ((__POINTER *)result__TZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RZAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TZAH=next__RZAH;
-            };
-          };
-          ptr__TXI=result__TZAH;
-        } else {
-          t__HG4G=((__UINTEGER_32 )typ_id__YXI);
-          a__GG4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__0ZAH=(__UINTEGER_32)((__UINTEGER_32)(sz__VXI + a__GG4G) & (__UINTEGER_32)(~ a__GG4G));
-          ptr_table__XZAH=((__POINTER )(&(table_type[(t__HG4G)])));
-          lab_type__ZZAH=(__UINTEGER_32)(t__HG4G |  1);
-          next__WZAH=((__POINTER )(NULL));
-          result__YZAH=((__POINTER *)ptr_table__XZAH)[ 0];
-          if ((result__YZAH == (void *)NULL)) {
-            result__YZAH=new_lab__ARJ(lab_type__ZZAH);
-            next__WZAH=(void *)((unsigned long)result__YZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0ZAH)));
-            ((__POINTER *)next__WZAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XZAH)[ 0]=next__WZAH;
-          } else {
-            next__WZAH=((__POINTER *)result__YZAH)[ 0];
-            if ((next__WZAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YZAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0ZAH <<  1)) <=  4096)) {
-                next__WZAH=(void *)((unsigned long)result__YZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0ZAH)));
+              ((__POINTER *)result__HGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HGHH=next__FGHH;
+            };
+          };
+          ptr__5XI=result__HGHH;
+        } else {
+          t__2REH=((__UINTEGER_32 )typ_id__EYI);
+          a__1REH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BYI + a__1REH) & (__UINTEGER_32)(~ a__1REH));
+          ptr_table__LGHH=((__POINTER )(&(table_type[(t__2REH)])));
+          lab_type__NGHH=(__UINTEGER_32)(t__2REH |  1);
+          next__KGHH=((__POINTER )(NULL));
+          result__MGHH=((__POINTER *)ptr_table__LGHH)[ 0];
+          if ((result__MGHH == (void *)NULL)) {
+            result__MGHH=new_lab__MRJ(lab_type__NGHH);
+            next__KGHH=(void *)((unsigned long)result__MGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OGHH)));
+            ((__POINTER *)next__KGHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LGHH)[ 0]=next__KGHH;
+          } else {
+            next__KGHH=((__POINTER *)result__MGHH)[ 0];
+            if ((next__KGHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OGHH <<  1)) <=  4096)) {
+                next__KGHH=(void *)((unsigned long)result__MGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OGHH)));
               } else {
-                next__WZAH=new_lab__ARJ(lab_type__ZZAH);
+                next__KGHH=new_lab__MRJ(lab_type__NGHH);
               };
-              ((__POINTER *)next__WZAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XZAH)[ 0]=next__WZAH;
+              ((__POINTER *)next__KGHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LGHH)[ 0]=next__KGHH;
             } else {
-              ((__POINTER *)result__YZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WZAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__YZAH=next__WZAH;
-            };
-          };
-          ptr__TXI=result__YZAH;
-        };
-        result__SXI=((__FILE_UNIX *)ptr__TXI);
-        *(result__SXI) = *(FILE_UNIX__);
-      };
-      result__RW0C=result__SXI;
-    } else {
-      result__DZI=NULL;
-      ptr__EZI=((__POINTER )(NULL));
-      typ_id__JZI= 0;
-      sz__GZI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
-      if ((sz__GZI ==  0)) {
-        result__DZI=DIRECTORY_UNIX__;
-      } else {
-        typ_id__JZI=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__GZI);
-        if ((typ_id__JZI == (__INTEGER)(-  1))) {
-          a__KG4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__LG4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GZI + a__KG4G) & (__UINTEGER_32)(~ a__KG4G));
-          ptr_table__2ZAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LG4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__1ZAH=((__POINTER )(NULL));
-          result__3ZAH=((__POINTER *)ptr_table__2ZAH)[ 0];
-          if ((result__3ZAH == (void *)NULL)) {
-            result__3ZAH=new_lab__ARJ(new_size__LG4G);
-            next__1ZAH=(void *)((unsigned long)result__3ZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LG4G)));
-            ((__POINTER *)next__1ZAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2ZAH)[ 0]=next__1ZAH;
-          } else {
-            next__1ZAH=((__POINTER *)result__3ZAH)[ 0];
-            if ((next__1ZAH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3ZAH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LG4G <<  1)) <=  4096)) {
-                next__1ZAH=(void *)((unsigned long)result__3ZAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LG4G)));
+              ((__POINTER *)result__MGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MGHH=next__KGHH;
+            };
+          };
+          ptr__5XI=result__MGHH;
+        };
+        result__4XI=((__FILE_UNIX *)ptr__5XI);
+        *(result__4XI) = *(FILE_UNIX__);
+      };
+      result__3W0C=result__4XI;
+    } else {
+      result__PZI=NULL;
+      ptr__QZI=((__POINTER )(NULL));
+      typ_id__VZI= 0;
+      sz__SZI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__SZI ==  0)) {
+        result__PZI=DIRECTORY_UNIX__;
+      } else {
+        typ_id__VZI=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SZI);
+        if ((typ_id__VZI == (__INTEGER)(-  1))) {
+          a__5REH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ASEH=(__UINTEGER_32)((__UINTEGER_32)(sz__SZI + a__5REH) & (__UINTEGER_32)(~ a__5REH));
+          ptr_table__QGHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ASEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__PGHH=((__POINTER )(NULL));
+          result__RGHH=((__POINTER *)ptr_table__QGHH)[ 0];
+          if ((result__RGHH == (void *)NULL)) {
+            result__RGHH=new_lab__MRJ(new_size__ASEH);
+            next__PGHH=(void *)((unsigned long)result__RGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASEH)));
+            ((__POINTER *)next__PGHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QGHH)[ 0]=next__PGHH;
+          } else {
+            next__PGHH=((__POINTER *)result__RGHH)[ 0];
+            if ((next__PGHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ASEH <<  1)) <=  4096)) {
+                next__PGHH=(void *)((unsigned long)result__RGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASEH)));
               } else {
-                next__1ZAH=new_lab__ARJ(new_size__LG4G);
+                next__PGHH=new_lab__MRJ(new_size__ASEH);
               };
-              ((__POINTER *)next__1ZAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2ZAH)[ 0]=next__1ZAH;
+              ((__POINTER *)next__PGHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QGHH)[ 0]=next__PGHH;
             } else {
-              ((__POINTER *)result__3ZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1ZAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__3ZAH=next__1ZAH;
-            };
-          };
-          ptr__EZI=result__3ZAH;
-        } else {
-          t__PG4G=((__UINTEGER_32 )typ_id__JZI);
-          a__OG4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__E0AH=(__UINTEGER_32)((__UINTEGER_32)(sz__GZI + a__OG4G) & (__UINTEGER_32)(~ a__OG4G));
-          ptr_table__B0AH=((__POINTER )(&(table_type[(t__PG4G)])));
-          lab_type__D0AH=(__UINTEGER_32)(t__PG4G |  1);
-          next__A0AH=((__POINTER )(NULL));
-          result__C0AH=((__POINTER *)ptr_table__B0AH)[ 0];
-          if ((result__C0AH == (void *)NULL)) {
-            result__C0AH=new_lab__ARJ(lab_type__D0AH);
-            next__A0AH=(void *)((unsigned long)result__C0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E0AH)));
-            ((__POINTER *)next__A0AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__B0AH)[ 0]=next__A0AH;
-          } else {
-            next__A0AH=((__POINTER *)result__C0AH)[ 0];
-            if ((next__A0AH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C0AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__E0AH <<  1)) <=  4096)) {
-                next__A0AH=(void *)((unsigned long)result__C0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E0AH)));
+              ((__POINTER *)result__RGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RGHH=next__PGHH;
+            };
+          };
+          ptr__QZI=result__RGHH;
+        } else {
+          t__ESEH=((__UINTEGER_32 )typ_id__VZI);
+          a__DSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SZI + a__DSEH) & (__UINTEGER_32)(~ a__DSEH));
+          ptr_table__VGHH=((__POINTER )(&(table_type[(t__ESEH)])));
+          lab_type__XGHH=(__UINTEGER_32)(t__ESEH |  1);
+          next__UGHH=((__POINTER )(NULL));
+          result__WGHH=((__POINTER *)ptr_table__VGHH)[ 0];
+          if ((result__WGHH == (void *)NULL)) {
+            result__WGHH=new_lab__MRJ(lab_type__XGHH);
+            next__UGHH=(void *)((unsigned long)result__WGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YGHH)));
+            ((__POINTER *)next__UGHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VGHH)[ 0]=next__UGHH;
+          } else {
+            next__UGHH=((__POINTER *)result__WGHH)[ 0];
+            if ((next__UGHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YGHH <<  1)) <=  4096)) {
+                next__UGHH=(void *)((unsigned long)result__WGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YGHH)));
               } else {
-                next__A0AH=new_lab__ARJ(lab_type__D0AH);
+                next__UGHH=new_lab__MRJ(lab_type__XGHH);
               };
-              ((__POINTER *)next__A0AH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__B0AH)[ 0]=next__A0AH;
+              ((__POINTER *)next__UGHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VGHH)[ 0]=next__UGHH;
             } else {
-              ((__POINTER *)result__C0AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A0AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__C0AH=next__A0AH;
+              ((__POINTER *)result__WGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WGHH=next__UGHH;
             };
           };
-          ptr__EZI=result__C0AH;
+          ptr__QZI=result__WGHH;
         };
-        result__DZI=((__DIRECTORY_UNIX *)ptr__EZI);
-        *(result__DZI) = *(DIRECTORY_UNIX__);
+        result__PZI=((__DIRECTORY_UNIX *)ptr__QZI);
+        *(result__PZI) = *(DIRECTORY_UNIX__);
       };
-      result__RW0C=result__DZI;
+      result__3W0C=result__PZI;
     };
-    if (((struct ___OBJ *)result__RW0C)->__id==__DIRECTORY_UNIX__) {
-      set_path__CNT(result__RW0C,new_path__OW0C);
+    if (((struct ___OBJ *)result__3W0C)->__id==__DIRECTORY_UNIX__) {
+      set_path__ONT(result__3W0C,new_path__0W0C);
     } else {
-      set_path__3NT(result__RW0C,new_path__OW0C);
+      set_path__JOT(result__3W0C,new_path__0W0C);
     };
-    if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    if (FILE_SYSTEM__->parent_directory__PFD==0) {
     } else {
-      parent_directory__CED();
+      parent_directory__OED();
     };
-    if (((struct ___OBJ *)result__RW0C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__IX0C=((__DIRECTORY_UNIX *)result__RW0C)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+    if (((struct ___OBJ *)result__3W0C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__UX0C=((__DIRECTORY_UNIX *)result__3W0C)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
     } else {
-      __tmp__IX0C=((__FILE_UNIX *)result__RW0C)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
+      __tmp__UX0C=((__FILE_UNIX *)result__3W0C)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
     };
-    put__to__F0S(alias__YED,result__RW0C,__tmp__IX0C);
+    put__to__R0S(alias__EFD,result__3W0C,__tmp__UX0C);
   };
   };
-  return(result__RW0C);
+  return(result__3W0C);
 }
 
-static void** create__JY1C(__INTEGER nb_elements__LY1C)
+static void** create__VY1C(__INTEGER nb_elements__XY1C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__GY1G,a__LY1G,new_size__HY1G,new_size2__IY1G,a__0V3G;
-  __UINTEGER_32 new_size__1V3G;
-  __POINTER result__FY1G,ptr_table__G0AH,next__F0AH,result__H0AH;
-  void *result__K0AH;
-  __INTEGER Self__A3WD;
-  void **Result__GVCD;
-  sz__GY1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__LY1C * ((__INTEGER )(sizeof(void *)))));
-  result__FY1G=((__POINTER )(NULL));
-  a__LY1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__HY1G=(__UINTEGER_32)((__UINTEGER_32)(sz__GY1G + a__LY1G) & (__UINTEGER_32)(~ a__LY1G));
-  new_size2__IY1G=(__UINTEGER_32)(new_size__HY1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__IY1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__0V3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__1V3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IY1G + a__0V3G) & (__UINTEGER_32)(~ a__0V3G));
-    ptr_table__G0AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1V3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__F0AH=((__POINTER )(NULL));
-    result__H0AH=((__POINTER *)ptr_table__G0AH)[ 0];
-    if ((result__H0AH == (void *)NULL)) {
-      result__H0AH=new_lab__ARJ(new_size__1V3G);
-      next__F0AH=(void *)((unsigned long)result__H0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1V3G)));
-      ((__POINTER *)next__F0AH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__G0AH)[ 0]=next__F0AH;
-    } else {
-      next__F0AH=((__POINTER *)result__H0AH)[ 0];
-      if ((next__F0AH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H0AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1V3G <<  1)) <=  4096)) {
-          next__F0AH=(void *)((unsigned long)result__H0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1V3G)));
-        } else {
-          next__F0AH=new_lab__ARJ(new_size__1V3G);
-        };
-        ((__POINTER *)next__F0AH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__G0AH)[ 0]=next__F0AH;
-      } else {
-        ((__POINTER *)result__H0AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F0AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__H0AH=next__F0AH;
-      };
-    };
-    ((__POINTER *)result__H0AH)[ 0]=((__POINTER ) 3);
-    result__FY1G=(void *)((unsigned long)result__H0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__FGCH,a__KGCH,new_size__GGCH,new_size2__HGCH,a__ZBEH;
+  __UINTEGER_32 new_size__0BEH;
+  __POINTER result__EGCH,ptr_table__0GHH,next__ZGHH,result__1GHH;
+  void *result__4GHH;
+  __INTEGER Self__Z3WD;
+  void **Result__SVCD;
+  sz__FGCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XY1C * ((__INTEGER )(sizeof(void *)))));
+  result__EGCH=((__POINTER )(NULL));
+  a__KGCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__GGCH=(__UINTEGER_32)((__UINTEGER_32)(sz__FGCH + a__KGCH) & (__UINTEGER_32)(~ a__KGCH));
+  new_size2__HGCH=(__UINTEGER_32)(new_size__GGCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__HGCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZBEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0BEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HGCH + a__ZBEH) & (__UINTEGER_32)(~ a__ZBEH));
+    ptr_table__0GHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0BEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZGHH=((__POINTER )(NULL));
+    result__1GHH=((__POINTER *)ptr_table__0GHH)[ 0];
+    if ((result__1GHH == (void *)NULL)) {
+      result__1GHH=new_lab__MRJ(new_size__0BEH);
+      next__ZGHH=(void *)((unsigned long)result__1GHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BEH)));
+      ((__POINTER *)next__ZGHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0GHH)[ 0]=next__ZGHH;
+    } else {
+      next__ZGHH=((__POINTER *)result__1GHH)[ 0];
+      if ((next__ZGHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1GHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0BEH <<  1)) <=  4096)) {
+          next__ZGHH=(void *)((unsigned long)result__1GHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BEH)));
+        } else {
+          next__ZGHH=new_lab__MRJ(new_size__0BEH);
+        };
+        ((__POINTER *)next__ZGHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0GHH)[ 0]=next__ZGHH;
+      } else {
+        ((__POINTER *)result__1GHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1GHH=next__ZGHH;
+      };
+    };
+    ((__POINTER *)result__1GHH)[ 0]=((__POINTER ) 3);
+    result__EGCH=(void *)((unsigned long)result__1GHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__K0AH=first_free__LDVB;
-    while ((((void *)result__K0AH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__K0AH)->map_size_and_id__2SB &  4294967292LU) < new_size__HY1G))) {
-      result__K0AH=((__MEMORY *)result__K0AH)->map_next_free__3SB;
+    result__4GHH=first_free__XDVB;
+    while ((((void *)result__4GHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4GHH)->map_size_and_id__ITB &  4294967292LU) < new_size__GGCH))) {
+      result__4GHH=((__MEMORY *)result__4GHH)->map_next_free__JTB;
     };
-    if (((void *)result__K0AH == (void *)NULL)) {
-      result__K0AH=new_page__CA5();
+    if (((void *)result__4GHH == (void *)NULL)) {
+      result__4GHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__K0AH,new_size__HY1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__K0AH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__FY1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__K0AH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__4GHH,new_size__GGCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4GHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__EGCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4GHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__GVCD=((void **)result__FY1G);
-  Self__A3WD=(__INTEGER)(nb_elements__LY1C -  1);
-  while ((Self__A3WD >=  0)) {
-    Result__GVCD[Self__A3WD]=NULL;
-    Self__A3WD=(__INTEGER)(Self__A3WD -  1);
+  Result__SVCD=((void **)result__EGCH);
+  Self__Z3WD=(__INTEGER)(nb_elements__XY1C -  1);
+  while ((Self__Z3WD >=  0)) {
+    Result__SVCD[Self__Z3WD]=NULL;
+    Self__Z3WD=(__INTEGER)(Self__Z3WD -  1);
   };
-  return(Result__GVCD);
+  return(Result__SVCD);
 }
 
-static void** create__RQSC(__INTEGER nb_elements__TQSC)
+static void** create__3QSC(__INTEGER nb_elements__5QSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__OY1G,a__TY1G,new_size__PY1G,new_size2__QY1G,a__BW3G;
-  __UINTEGER_32 new_size__CW3G;
-  __POINTER result__NY1G,ptr_table__O0AH,next__N0AH,result__P0AH;
-  void *result__S0AH;
-  __INTEGER Self__GOWD;
-  void **Result__K11C;
-  sz__OY1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__TQSC * ((__INTEGER )(sizeof(void *)))));
-  result__NY1G=((__POINTER )(NULL));
-  a__TY1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__PY1G=(__UINTEGER_32)((__UINTEGER_32)(sz__OY1G + a__TY1G) & (__UINTEGER_32)(~ a__TY1G));
-  new_size2__QY1G=(__UINTEGER_32)(new_size__PY1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__QY1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BW3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CW3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QY1G + a__BW3G) & (__UINTEGER_32)(~ a__BW3G));
-    ptr_table__O0AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CW3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__N0AH=((__POINTER )(NULL));
-    result__P0AH=((__POINTER *)ptr_table__O0AH)[ 0];
-    if ((result__P0AH == (void *)NULL)) {
-      result__P0AH=new_lab__ARJ(new_size__CW3G);
-      next__N0AH=(void *)((unsigned long)result__P0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CW3G)));
-      ((__POINTER *)next__N0AH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__O0AH)[ 0]=next__N0AH;
-    } else {
-      next__N0AH=((__POINTER *)result__P0AH)[ 0];
-      if ((next__N0AH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CW3G <<  1)) <=  4096)) {
-          next__N0AH=(void *)((unsigned long)result__P0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CW3G)));
-        } else {
-          next__N0AH=new_lab__ARJ(new_size__CW3G);
-        };
-        ((__POINTER *)next__N0AH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__O0AH)[ 0]=next__N0AH;
-      } else {
-        ((__POINTER *)result__P0AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__P0AH=next__N0AH;
-      };
-    };
-    ((__POINTER *)result__P0AH)[ 0]=((__POINTER ) 3);
-    result__NY1G=(void *)((unsigned long)result__P0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__NGCH,a__SGCH,new_size__OGCH,new_size2__PGCH,a__ACEH;
+  __UINTEGER_32 new_size__BCEH;
+  __POINTER result__MGCH,ptr_table__CHHH,next__BHHH,result__DHHH;
+  void *result__GHHH;
+  __INTEGER Self__5OWD;
+  void **Result__W11C;
+  sz__NGCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5QSC * ((__INTEGER )(sizeof(void *)))));
+  result__MGCH=((__POINTER )(NULL));
+  a__SGCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__OGCH=(__UINTEGER_32)((__UINTEGER_32)(sz__NGCH + a__SGCH) & (__UINTEGER_32)(~ a__SGCH));
+  new_size2__PGCH=(__UINTEGER_32)(new_size__OGCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__PGCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ACEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__BCEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__PGCH + a__ACEH) & (__UINTEGER_32)(~ a__ACEH));
+    ptr_table__CHHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BCEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BHHH=((__POINTER )(NULL));
+    result__DHHH=((__POINTER *)ptr_table__CHHH)[ 0];
+    if ((result__DHHH == (void *)NULL)) {
+      result__DHHH=new_lab__MRJ(new_size__BCEH);
+      next__BHHH=(void *)((unsigned long)result__DHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCEH)));
+      ((__POINTER *)next__BHHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__CHHH)[ 0]=next__BHHH;
+    } else {
+      next__BHHH=((__POINTER *)result__DHHH)[ 0];
+      if ((next__BHHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DHHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BCEH <<  1)) <=  4096)) {
+          next__BHHH=(void *)((unsigned long)result__DHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCEH)));
+        } else {
+          next__BHHH=new_lab__MRJ(new_size__BCEH);
+        };
+        ((__POINTER *)next__BHHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CHHH)[ 0]=next__BHHH;
+      } else {
+        ((__POINTER *)result__DHHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DHHH=next__BHHH;
+      };
+    };
+    ((__POINTER *)result__DHHH)[ 0]=((__POINTER ) 3);
+    result__MGCH=(void *)((unsigned long)result__DHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__S0AH=first_free__LDVB;
-    while ((((void *)result__S0AH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__S0AH)->map_size_and_id__2SB &  4294967292LU) < new_size__PY1G))) {
-      result__S0AH=((__MEMORY *)result__S0AH)->map_next_free__3SB;
+    result__GHHH=first_free__XDVB;
+    while ((((void *)result__GHHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GHHH)->map_size_and_id__ITB &  4294967292LU) < new_size__OGCH))) {
+      result__GHHH=((__MEMORY *)result__GHHH)->map_next_free__JTB;
     };
-    if (((void *)result__S0AH == (void *)NULL)) {
-      result__S0AH=new_page__CA5();
+    if (((void *)result__GHHH == (void *)NULL)) {
+      result__GHHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__S0AH,new_size__PY1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__S0AH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__NY1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__S0AH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__GHHH,new_size__OGCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GHHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__MGCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GHHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__K11C=((void **)result__NY1G);
-  Self__GOWD=(__INTEGER)(nb_elements__TQSC -  1);
-  while ((Self__GOWD >=  0)) {
-    Result__K11C[Self__GOWD]=NULL;
-    Self__GOWD=(__INTEGER)(Self__GOWD -  1);
+  Result__W11C=((void **)result__MGCH);
+  Self__5OWD=(__INTEGER)(nb_elements__5QSC -  1);
+  while ((Self__5OWD >=  0)) {
+    Result__W11C[Self__5OWD]=NULL;
+    Self__5OWD=(__INTEGER)(Self__5OWD -  1);
   };
-  return(Result__K11C);
+  return(Result__W11C);
 }
 
-static void short__token__to__5AD(void *key__BBD,__INTEGER beg__CBD,__INTEGER end__DBD)
+static void short__token__to__LBD(void *key__NBD,__INTEGER beg__OBD,__INTEGER end__PBD)
 // ({NULLxSTRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER pos__EBD,result__BV5G,__tmp__DV5G,Self__EV5G,__tmp__5BD;
-  __INTEGER Self__WK4,__tmp__JV5G,__tmp__LV5G,Self__MV5G,__tmp__VCD;
-  __INTEGER Self__HM4,__tmp__LDD,__tmp__ODD;
-  void *add_text__FBD;
-  __STRING_CONSTANT *Self__CV5G;
-  __STRING *Self__KV5G;
-  void *fmt__GBD;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3U5G;
-  void *node__5U5G;
-  pos__EBD= 0;
-  add_text__FBD=NULL;
-  fmt__GBD=NULL;
-  if (is_shorter__WY) {
-    if (is_active_short__SBC) {
-      Self__3U5G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      Self__CV5G=((__STRING_CONSTANT *)key__BBD);
-      result__BV5G= 0;
-      __tmp__DV5G=Self__CV5G->count__DD;
-      Self__EV5G= 1;
-      while ((Self__EV5G <= __tmp__DV5G)) {
-        result__BV5G=(__INTEGER)((__INTEGER)( 5 * result__BV5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CV5G->storage__JQO)[(__INTEGER)(Self__EV5G -  1)])));
-        Self__EV5G=(__INTEGER)(Self__EV5G +  1);
-      };
-      if ((result__BV5G <  0)) {
-        result__BV5G=(__INTEGER)(~ result__BV5G);
-      };
-      node__5U5G=((void **)Self__3U5G->buckets__TCT)[(__INTEGER)(result__BV5G % Self__3U5G->capacity__OCT)];
-      while ((! (((void *)node__5U5G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5U5G)->key__5CT == (void *)key__BBD)))) {
-        node__5U5G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5U5G)->next__KDT;
-      };
-      if (((void *)node__5U5G != (void *)NULL)) {
-        ((__STRING *)token__0BD)->count__KFC= 0;
-        pos__EBD=(__INTEGER)(beg__CBD + short_derive__VBC);
-        __tmp__5BD=(__INTEGER)(end__DBD -  1);
-        Self__WK4=beg__CBD;
-        while ((Self__WK4 <= __tmp__5BD)) {
-          add_last__NLT(token__0BD,((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(Self__WK4 -  1)]);
-          Self__KV5G=((__STRING *)output_code__SI);
-          __tmp__JV5G=(__INTEGER)(pos__EBD +  1);
-          __tmp__LV5G=Self__KV5G->count__KFC;
-          Self__MV5G=__tmp__JV5G;
-          while ((Self__MV5G <= __tmp__LV5G)) {
-            ((__CHARACTER *)Self__KV5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__MV5G -  1) -  1)]=((__CHARACTER *)Self__KV5G->storage__VBS)[(__INTEGER)(Self__MV5G -  1)];
-            Self__MV5G=(__INTEGER)(Self__MV5G +  1);
-          };
-          Self__KV5G->count__KFC=(__INTEGER)(Self__KV5G->count__KFC -  1);
-          Self__WK4=(__INTEGER)(Self__WK4 +  1);
-        };
-        short_derive__VBC=(__INTEGER)(short_derive__VBC - ((__STRING *)token__0BD)->count__KFC);
-        fmt__GBD=at__EL4(short_dico__QD,key__BBD);
-        __tmp__VCD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__GBD)->parent_linked_collection__LD.upper__TCD;
-        Self__HM4= 1;
-        while ((Self__HM4 <= __tmp__VCD)) {
-          if (((void *)item__M0ND(fmt__GBD,Self__HM4) == (void *)NULL)) {
-            add_text__FBD=token__0BD;
-          } else {
-            add_text__FBD=item__M0ND(fmt__GBD,Self__HM4);
-          };
-          insert_string__to__OXU(output_code__SI,add_text__FBD,pos__EBD);
-          if (((struct ___OBJ *)add_text__FBD)->__id==__STRING_CONSTANT__) {
-            __tmp__LDD=((__STRING_CONSTANT *)add_text__FBD)->count__DD;
-          } else {
-            __tmp__LDD=((__STRING *)add_text__FBD)->count__KFC;
-          };
-          pos__EBD=(__INTEGER)(pos__EBD + __tmp__LDD);
-          if (((struct ___OBJ *)add_text__FBD)->__id==__STRING_CONSTANT__) {
-            __tmp__ODD=((__STRING_CONSTANT *)add_text__FBD)->count__DD;
-          } else {
-            __tmp__ODD=((__STRING *)add_text__FBD)->count__KFC;
-          };
-          short_derive__VBC=(__INTEGER)(short_derive__VBC + __tmp__ODD);
-          Self__HM4=(__INTEGER)(Self__HM4 +  1);
+  __INTEGER pos__QBD,result__NBGH,__tmp__PBGH,Self__QBGH,__tmp__LCD;
+  __INTEGER Self__CL4,__tmp__VBGH,__tmp__XBGH,Self__YBGH,__tmp__BDD;
+  __INTEGER Self__TM4,__tmp__XDD,__tmp__0DD;
+  void *add_text__RBD;
+  __STRING_CONSTANT *Self__OBGH;
+  __STRING *Self__WBGH;
+  void *fmt__SBD;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JBGH;
+  void *node__LBGH;
+  pos__QBD= 0;
+  add_text__RBD=NULL;
+  fmt__SBD=NULL;
+  if (is_shorter__5Y) {
+    if (is_active_short__4BC) {
+      Self__JBGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      Self__OBGH=((__STRING_CONSTANT *)key__NBD);
+      result__NBGH= 0;
+      __tmp__PBGH=Self__OBGH->count__DD;
+      Self__QBGH= 1;
+      while ((Self__QBGH <= __tmp__PBGH)) {
+        result__NBGH=(__INTEGER)((__INTEGER)( 5 * result__NBGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OBGH->storage__VQO)[(__INTEGER)(Self__QBGH -  1)])));
+        Self__QBGH=(__INTEGER)(Self__QBGH +  1);
+      };
+      if ((result__NBGH <  0)) {
+        result__NBGH=(__INTEGER)(~ result__NBGH);
+      };
+      node__LBGH=((void **)Self__JBGH->buckets__5CT)[(__INTEGER)(result__NBGH % Self__JBGH->capacity__0CT)];
+      while ((! (((void *)node__LBGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LBGH)->key__LDT == (void *)key__NBD)))) {
+        node__LBGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LBGH)->next__WDT;
+      };
+      if (((void *)node__LBGH != (void *)NULL)) {
+        ((__STRING *)token__GCD)->count__WFC= 0;
+        pos__QBD=(__INTEGER)(beg__OBD + short_derive__BCC);
+        __tmp__LCD=(__INTEGER)(end__PBD -  1);
+        Self__CL4=beg__OBD;
+        while ((Self__CL4 <= __tmp__LCD)) {
+          add_last__ZLT(token__GCD,((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(Self__CL4 -  1)]);
+          Self__WBGH=((__STRING *)output_code__SI);
+          __tmp__VBGH=(__INTEGER)(pos__QBD +  1);
+          __tmp__XBGH=Self__WBGH->count__WFC;
+          Self__YBGH=__tmp__VBGH;
+          while ((Self__YBGH <= __tmp__XBGH)) {
+            ((__CHARACTER *)Self__WBGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__YBGH -  1) -  1)]=((__CHARACTER *)Self__WBGH->storage__BCS)[(__INTEGER)(Self__YBGH -  1)];
+            Self__YBGH=(__INTEGER)(Self__YBGH +  1);
+          };
+          Self__WBGH->count__WFC=(__INTEGER)(Self__WBGH->count__WFC -  1);
+          Self__CL4=(__INTEGER)(Self__CL4 +  1);
+        };
+        short_derive__BCC=(__INTEGER)(short_derive__BCC - ((__STRING *)token__GCD)->count__WFC);
+        fmt__SBD=at__QL4(short_dico__QD,key__NBD);
+        __tmp__BDD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__SBD)->parent_linked_collection__LD.upper__5CD;
+        Self__TM4= 1;
+        while ((Self__TM4 <= __tmp__BDD)) {
+          if (((void *)item__Y0ND(fmt__SBD,Self__TM4) == (void *)NULL)) {
+            add_text__RBD=token__GCD;
+          } else {
+            add_text__RBD=item__Y0ND(fmt__SBD,Self__TM4);
+          };
+          insert_string__to__0XU(output_code__SI,add_text__RBD,pos__QBD);
+          if (((struct ___OBJ *)add_text__RBD)->__id==__STRING_CONSTANT__) {
+            __tmp__XDD=((__STRING_CONSTANT *)add_text__RBD)->count__DD;
+          } else {
+            __tmp__XDD=((__STRING *)add_text__RBD)->count__WFC;
+          };
+          pos__QBD=(__INTEGER)(pos__QBD + __tmp__XDD);
+          if (((struct ___OBJ *)add_text__RBD)->__id==__STRING_CONSTANT__) {
+            __tmp__0DD=((__STRING_CONSTANT *)add_text__RBD)->count__DD;
+          } else {
+            __tmp__0DD=((__STRING *)add_text__RBD)->count__WFC;
+          };
+          short_derive__BCC=(__INTEGER)(short_derive__BCC + __tmp__0DD);
+          Self__TM4=(__INTEGER)(Self__TM4 +  1);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__OIYE(__STRING *Self__PIYE)
+static __INTEGER first_substring_index__RDZE(__STRING *Self__SDZE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __INTEGER i__4E3E,result__AF3E,s__5E3E;
-  i__4E3E= 0;
-  result__AF3E= 0;
-  s__5E3E= 1;
-  while ((! ((result__AF3E !=  0) || ((__INTEGER)((__INTEGER)(s__5E3E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__PIYE->count__KFC)))) {
-    i__4E3E= 1;
-    while ((! ((i__4E3E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__PIYE->storage__VBS)[(__INTEGER)((__INTEGER)((__INTEGER)(s__5E3E + i__4E3E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__JQO)[(__INTEGER)(i__4E3E -  1)])))) {
-      i__4E3E=(__INTEGER)(i__4E3E +  1);
+  __INTEGER i__J43E,result__L43E,s__K43E;
+  i__J43E= 0;
+  result__L43E= 0;
+  s__K43E= 1;
+  while ((! ((result__L43E !=  0) || ((__INTEGER)((__INTEGER)(s__K43E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__SDZE->count__WFC)))) {
+    i__J43E= 1;
+    while ((! ((i__J43E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__SDZE->storage__BCS)[(__INTEGER)((__INTEGER)((__INTEGER)(s__K43E + i__J43E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__VQO)[(__INTEGER)(i__J43E -  1)])))) {
+      i__J43E=(__INTEGER)(i__J43E +  1);
     };
-    if ((i__4E3E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__AF3E=s__5E3E;
+    if ((i__J43E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
+      result__L43E=s__K43E;
     } else {
-      s__5E3E=(__INTEGER)(s__5E3E +  1);
-    };
-  };
-  return(result__AF3E);
-}
-
-static void append_in__CIH(__UINTEGER_32 Self__DIH,void *buffer__EIH)
-// ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
-{
-  __UINTEGER_32 val__FIH;
-  __INTEGER i__IIH,j__JIH;
-  __STRING *Self__UXFB;
-  __CHARACTER tmp__XXFB;
-  val__FIH= 0;
-  i__IIH= 0;
-  j__JIH= 0;
-  if ((Self__DIH ==  0)) {
-    add_last__NLT(((__STRING *)buffer__EIH),'0');
-  } else {
-    i__IIH=(__INTEGER)(((__STRING *)buffer__EIH)->count__KFC +  1);
-    val__FIH=Self__DIH;
-    while ((val__FIH !=  0)) {
-      add_last__NLT(((__STRING *)buffer__EIH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__FIH %  10)) + ((__INTEGER_8 )'0'))))));
-      val__FIH=(__UINTEGER_32)(val__FIH /  10);
-    };
-    j__JIH=((__STRING *)buffer__EIH)->count__KFC;
-    while ((i__IIH < j__JIH)) {
-      Self__UXFB=((__STRING *)buffer__EIH);
-      tmp__XXFB=((__CHARACTER *)Self__UXFB->storage__VBS)[(__INTEGER)(i__IIH -  1)];
-      ((__CHARACTER *)Self__UXFB->storage__VBS)[(__INTEGER)(i__IIH -  1)]=((__CHARACTER *)Self__UXFB->storage__VBS)[(__INTEGER)(j__JIH -  1)];
-      ((__CHARACTER *)Self__UXFB->storage__VBS)[(__INTEGER)(j__JIH -  1)]=tmp__XXFB;
-      j__JIH=(__INTEGER)(j__JIH -  1);
-      i__IIH=(__INTEGER)(i__IIH +  1);
+      s__K43E=(__INTEGER)(s__K43E +  1);
     };
   };
+  return(result__L43E);
 }
 
-static __BOOLEAN read_string__5EQ()
+static __BOOLEAN read_string__LFQ()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER old_pos__DFQ;
-  __POSITION pos__N4PG;
-  __BOOLEAN result__CFQ,__tmp__NFQ,__tmp__MGQ,__tmp__NGQ;
-  __CHARACTER result__4UXG,result__EVXG,result__FVXG,result__GVXG;
-  __CHARACTER result__HVXG,result__IVXG,result__JVXG;
-  result__CFQ=FALSE__;
-  old_pos__DFQ= 0;
-  if (read_space__RRD()) {
-    result__4UXG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__4UXG=((__CHARACTER )(( 0)));
-    } else {
-      result__4UXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-    };
-    __tmp__NFQ=(result__4UXG == '\"');
+  __INTEGER old_pos__PFQ;
+  __POSITION pos__3QVG;
+  __BOOLEAN result__OFQ,__tmp__ZFQ,__tmp__YGQ,__tmp__ZGQ;
+  __CHARACTER result__ZO3G,result__DP3G,result__MP3G,result__RP3G;
+  __CHARACTER result__WP3G,result__1P3G,result__AQ3G;
+  result__OFQ=FALSE__;
+  old_pos__PFQ= 0;
+  if (read_space__3RD()) {
+    result__ZO3G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__ZO3G=((__CHARACTER )(( 0)));
+    } else {
+      result__ZO3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    };
+    __tmp__ZFQ=(result__ZO3G == '\"');
   } else {
-    __tmp__NFQ=FALSE__;
+    __tmp__ZFQ=FALSE__;
   };
-  if (__tmp__NFQ) {
-    old_pos__DFQ=position__GBC;
-    position__GBC=(__INTEGER)(position__GBC +  1);
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    until_do__SJRC:
+  if (__tmp__ZFQ) {
+    old_pos__PFQ=position__SBC;
+    position__SBC=(__INTEGER)(position__SBC +  1);
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    until_do__4JRC:
     {
-      result__EVXG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__EVXG=((__CHARACTER )(( 0)));
+      result__DP3G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__DP3G=((__CHARACTER )(( 0)));
       } else {
-        result__EVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__DP3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__EVXG == ((__CHARACTER )(( 0))))) {
-        __tmp__MGQ=TRUE__;
+      if ((result__DP3G == ((__CHARACTER )(( 0))))) {
+        __tmp__YGQ=TRUE__;
       } else {
-        result__FVXG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__FVXG=((__CHARACTER )(( 0)));
+        result__MP3G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__MP3G=((__CHARACTER )(( 0)));
         } else {
-          result__FVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__MP3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__MGQ=(result__FVXG == '\n');
+        __tmp__YGQ=(result__MP3G == '\n');
       };
-      if (__tmp__MGQ) {
-        __tmp__NGQ=TRUE__;
+      if (__tmp__YGQ) {
+        __tmp__ZGQ=TRUE__;
       } else {
-        result__GVXG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__GVXG=((__CHARACTER )(( 0)));
+        result__RP3G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__RP3G=((__CHARACTER )(( 0)));
         } else {
-          result__GVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__RP3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__NGQ=(result__GVXG == '\"');
+        __tmp__ZGQ=(result__RP3G == '\"');
       };
-      if ((! __tmp__NGQ)) {
-        result__HVXG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__HVXG=((__CHARACTER )(( 0)));
+      if ((! __tmp__ZGQ)) {
+        result__WP3G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__WP3G=((__CHARACTER )(( 0)));
         } else {
-          result__HVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__WP3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        add_last__NLT(string_tmp__VH,result__HVXG);
-        result__IVXG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__IVXG=((__CHARACTER )(( 0)));
+        add_last__ZLT(string_tmp__VH,result__WP3G);
+        result__1P3G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__1P3G=((__CHARACTER )(( 0)));
         } else {
-          result__IVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__1P3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__IVXG == '\\')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          read_escape_character__PIJF();
+        if ((result__1P3G == '\\')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          read_escape_character__R1JF();
         } else {
-          position__GBC=(__INTEGER)(position__GBC +  1);
+          position__SBC=(__INTEGER)(position__SBC +  1);
         };
-        goto until_do__SJRC;
+        goto until_do__4JRC;
       };
     };
-    result__JVXG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__JVXG=((__CHARACTER )(( 0)));
+    result__AQ3G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__AQ3G=((__CHARACTER )(( 0)));
     } else {
-      result__JVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__AQ3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__JVXG == '\"')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      last_string__2ZC=get__2VB(string_tmp__VH);
-      result__CFQ=TRUE__;
-      short__token__to__5AD((&__string_123),old_pos__DFQ,position__GBC);
+    if ((result__AQ3G == '\"')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      last_string__I0C=get__IWB(string_tmp__VH);
+      result__OFQ=TRUE__;
+      short__token__to__LBD((&__string_123),old_pos__PFQ,position__SBC);
     } else {
-      position__GBC=begin_position__5AE;
-      pos__N4PG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_237));
-      put_position__IOG(pos__N4PG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+      position__SBC=begin_position__LBE;
+      pos__3QVG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_247));
+      put_position__UOG(pos__3QVG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__CFQ);
+  return(result__OFQ);
 }
 
-static void reduce_path__MI2E(void *st__OI2E)
+static void reduce_path__Y42E(void *st__042E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER stat__QI2E,__tmp__RV5G,Self__TV5G,i__PI2E,Self__GOZF;
-  __INTEGER n__CX3G,len__ZV5G,__tmp__0V5G,__tmp__2V5G,Self__3V5G;
-  __INTEGER len__CW5G,__tmp__DW5G,__tmp__FW5G,Self__GW5G,result__KW5G;
-  __INTEGER n__EX3G,len__PW5G,__tmp__QW5G,__tmp__SW5G,Self__TW5G;
-  __INTEGER end__WW5G,len__YW5G,__tmp__ZW5G,__tmp__1W5G,Self__2W5G;
-  __INTEGER Self__VTAG,n__GX3G,len__BX5G,__tmp__CX5G,__tmp__EX5G;
-  __INTEGER Self__FX5G,result__KLGD,end__IX5G,len__KX5G,__tmp__LX5G;
-  __INTEGER __tmp__NX5G,Self__OX5G;
-  __STRING *Self__PV5G,*Self__BX3G,*Self__EW5G,*Self__LW5G,*Self__DX3G;
-  __STRING *Self__0W5G,*Self__FX3G,*Self__HX3G,*Self__JX3G,*Self__GLGD;
-  __STRING *Self__MX5G;
-  __CHARACTER car__RI2E,Self__EO1E;
-  __CHARACTER *__tmp__QV5G,*Self__SV5G;
-  __BOOLEAN __tmp__YK2E,__tmp__3L2E,result__O5VF,result__GO1E;
-  __BOOLEAN __tmp__QO1E,__tmp__4M2E;
-  stat__QI2E= 0;
-  car__RI2E='\0';
-  Self__PV5G=((__STRING *)st__OI2E);
-  __tmp__QV5G=Self__PV5G->storage__VBS;
-  __tmp__RV5G=(__INTEGER)(Self__PV5G->count__KFC -  1);
-  Self__SV5G=((__CHARACTER *)__tmp__QV5G);
-  Self__TV5G=__tmp__RV5G;
-  while ((Self__TV5G >=  0)) {
-    if (('\\' == Self__SV5G[Self__TV5G])) {
-      Self__SV5G[Self__TV5G]='/';
-    };
-    Self__TV5G=(__INTEGER)(Self__TV5G -  1);
-  };
-  i__PI2E= 1;
-  while ((i__PI2E <= ((__STRING *)st__OI2E)->count__KFC)) {
-    car__RI2E=((__CHARACTER *)((__STRING *)st__OI2E)->storage__VBS)[(__INTEGER)(i__PI2E -  1)];
-    if ((car__RI2E == '/')) {
-      Self__GOZF=stat__QI2E;
-      if ((stat__QI2E ==  0)) {
-        stat__QI2E= 1;
-      };
-      if ((Self__GOZF ==  1)) {
-        Self__BX3G=((__STRING *)st__OI2E);
-        n__CX3G=(__INTEGER)(i__PI2E -  1);
-        if ((n__CX3G > Self__BX3G->count__KFC)) {
-          Self__BX3G->count__KFC= 0;
-        } else {
-          if ((n__CX3G >  0)) {
-            len__ZV5G=(__INTEGER)((__INTEGER)(n__CX3G -  1) +  1);
-            if ((len__ZV5G >  0)) {
-              __tmp__0V5G=(__INTEGER)(n__CX3G +  1);
-              __tmp__2V5G=Self__BX3G->count__KFC;
-              Self__3V5G=__tmp__0V5G;
-              while ((Self__3V5G <= __tmp__2V5G)) {
-                ((__CHARACTER *)Self__BX3G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__3V5G - len__ZV5G) -  1)]=((__CHARACTER *)Self__BX3G->storage__VBS)[(__INTEGER)(Self__3V5G -  1)];
-                Self__3V5G=(__INTEGER)(Self__3V5G +  1);
+  __INTEGER stat__242E,__tmp__3BGH,Self__5BGH,i__142E,Self__HJ0F;
+  __INTEGER n__RCEH,len__FCGH,__tmp__GCGH,__tmp__ICGH,Self__JCGH;
+  __INTEGER len__OCGH,__tmp__PCGH,__tmp__RCGH,Self__SCGH,result__WCGH;
+  __INTEGER n__TCEH,len__1CGH,__tmp__2CGH,__tmp__4CGH,Self__5CGH;
+  __INTEGER end__CDGH,len__EDGH,__tmp__FDGH,__tmp__HDGH,Self__IDGH;
+  __INTEGER Self__51CG,n__VCEH,len__NDGH,__tmp__ODGH,__tmp__QDGH;
+  __INTEGER Self__RDGH,result__WLGD,end__UDGH,len__WDGH,__tmp__XDGH;
+  __INTEGER __tmp__ZDGH,Self__0DGH;
+  __STRING *Self__1BGH,*Self__QCEH,*Self__QCGH,*Self__XCGH,*Self__SCEH;
+  __STRING *Self__GDGH,*Self__UCEH,*Self__WCEH,*Self__YCEH,*Self__SLGD;
+  __STRING *Self__YDGH;
+  __CHARACTER car__342E,Self__YM2E;
+  __CHARACTER *__tmp__2BGH,*Self__4BGH;
+  __BOOLEAN __tmp__EB3E,__tmp__JC3E,result__IXWF,result__0M2E;
+  __BOOLEAN __tmp__EN2E,__tmp__KD3E;
+  stat__242E= 0;
+  car__342E='\0';
+  Self__1BGH=((__STRING *)st__042E);
+  __tmp__2BGH=Self__1BGH->storage__BCS;
+  __tmp__3BGH=(__INTEGER)(Self__1BGH->count__WFC -  1);
+  Self__4BGH=((__CHARACTER *)__tmp__2BGH);
+  Self__5BGH=__tmp__3BGH;
+  while ((Self__5BGH >=  0)) {
+    if (('\\' == Self__4BGH[Self__5BGH])) {
+      Self__4BGH[Self__5BGH]='/';
+    };
+    Self__5BGH=(__INTEGER)(Self__5BGH -  1);
+  };
+  i__142E= 1;
+  while ((i__142E <= ((__STRING *)st__042E)->count__WFC)) {
+    car__342E=((__CHARACTER *)((__STRING *)st__042E)->storage__BCS)[(__INTEGER)(i__142E -  1)];
+    if ((car__342E == '/')) {
+      Self__HJ0F=stat__242E;
+      if ((stat__242E ==  0)) {
+        stat__242E= 1;
+      };
+      if ((Self__HJ0F ==  1)) {
+        Self__QCEH=((__STRING *)st__042E);
+        n__RCEH=(__INTEGER)(i__142E -  1);
+        if ((n__RCEH > Self__QCEH->count__WFC)) {
+          Self__QCEH->count__WFC= 0;
+        } else {
+          if ((n__RCEH >  0)) {
+            len__FCGH=(__INTEGER)((__INTEGER)(n__RCEH -  1) +  1);
+            if ((len__FCGH >  0)) {
+              __tmp__GCGH=(__INTEGER)(n__RCEH +  1);
+              __tmp__ICGH=Self__QCEH->count__WFC;
+              Self__JCGH=__tmp__GCGH;
+              while ((Self__JCGH <= __tmp__ICGH)) {
+                ((__CHARACTER *)Self__QCEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__JCGH - len__FCGH) -  1)]=((__CHARACTER *)Self__QCEH->storage__BCS)[(__INTEGER)(Self__JCGH -  1)];
+                Self__JCGH=(__INTEGER)(Self__JCGH +  1);
               };
-              Self__BX3G->count__KFC=(__INTEGER)(Self__BX3G->count__KFC - len__ZV5G);
-            };
-          };
-        };
-        i__PI2E= 1;
-      };
-      if ((Self__GOZF ==  2)) {
-        Self__EW5G=((__STRING *)st__OI2E);
-        len__CW5G=(__INTEGER)((__INTEGER)(i__PI2E - (__INTEGER)(i__PI2E -  1)) +  1);
-        if ((len__CW5G >  0)) {
-          __tmp__DW5G=(__INTEGER)(i__PI2E +  1);
-          __tmp__FW5G=Self__EW5G->count__KFC;
-          Self__GW5G=__tmp__DW5G;
-          while ((Self__GW5G <= __tmp__FW5G)) {
-            ((__CHARACTER *)Self__EW5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__GW5G - len__CW5G) -  1)]=((__CHARACTER *)Self__EW5G->storage__VBS)[(__INTEGER)(Self__GW5G -  1)];
-            Self__GW5G=(__INTEGER)(Self__GW5G +  1);
-          };
-          Self__EW5G->count__KFC=(__INTEGER)(Self__EW5G->count__KFC - len__CW5G);
-        };
-        i__PI2E=(__INTEGER)(i__PI2E -  2);
-        stat__QI2E= 1;
-      };
-      if ((Self__GOZF ==  3)) {
-        Self__LW5G=((__STRING *)st__OI2E);
-        result__KW5G=(__INTEGER)(i__PI2E -  4);
-        while ((! ((result__KW5G <  1) || ('/' == ((__CHARACTER *)Self__LW5G->storage__VBS)[(__INTEGER)(result__KW5G -  1)])))) {
-          result__KW5G=(__INTEGER)(result__KW5G -  1);
-        };
-        if ((result__KW5G ==  0)) {
-          Self__DX3G=((__STRING *)st__OI2E);
-          n__EX3G=(__INTEGER)(i__PI2E -  1);
-          if ((n__EX3G > Self__DX3G->count__KFC)) {
-            Self__DX3G->count__KFC= 0;
-          } else {
-            if ((n__EX3G >  0)) {
-              len__PW5G=(__INTEGER)((__INTEGER)(n__EX3G -  1) +  1);
-              if ((len__PW5G >  0)) {
-                __tmp__QW5G=(__INTEGER)(n__EX3G +  1);
-                __tmp__SW5G=Self__DX3G->count__KFC;
-                Self__TW5G=__tmp__QW5G;
-                while ((Self__TW5G <= __tmp__SW5G)) {
-                  ((__CHARACTER *)Self__DX3G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__TW5G - len__PW5G) -  1)]=((__CHARACTER *)Self__DX3G->storage__VBS)[(__INTEGER)(Self__TW5G -  1)];
-                  Self__TW5G=(__INTEGER)(Self__TW5G +  1);
+              Self__QCEH->count__WFC=(__INTEGER)(Self__QCEH->count__WFC - len__FCGH);
+            };
+          };
+        };
+        i__142E= 1;
+      };
+      if ((Self__HJ0F ==  2)) {
+        Self__QCGH=((__STRING *)st__042E);
+        len__OCGH=(__INTEGER)((__INTEGER)(i__142E - (__INTEGER)(i__142E -  1)) +  1);
+        if ((len__OCGH >  0)) {
+          __tmp__PCGH=(__INTEGER)(i__142E +  1);
+          __tmp__RCGH=Self__QCGH->count__WFC;
+          Self__SCGH=__tmp__PCGH;
+          while ((Self__SCGH <= __tmp__RCGH)) {
+            ((__CHARACTER *)Self__QCGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__SCGH - len__OCGH) -  1)]=((__CHARACTER *)Self__QCGH->storage__BCS)[(__INTEGER)(Self__SCGH -  1)];
+            Self__SCGH=(__INTEGER)(Self__SCGH +  1);
+          };
+          Self__QCGH->count__WFC=(__INTEGER)(Self__QCGH->count__WFC - len__OCGH);
+        };
+        i__142E=(__INTEGER)(i__142E -  2);
+        stat__242E= 1;
+      };
+      if ((Self__HJ0F ==  3)) {
+        Self__XCGH=((__STRING *)st__042E);
+        result__WCGH=(__INTEGER)(i__142E -  4);
+        while ((! ((result__WCGH <  1) || ('/' == ((__CHARACTER *)Self__XCGH->storage__BCS)[(__INTEGER)(result__WCGH -  1)])))) {
+          result__WCGH=(__INTEGER)(result__WCGH -  1);
+        };
+        if ((result__WCGH ==  0)) {
+          Self__SCEH=((__STRING *)st__042E);
+          n__TCEH=(__INTEGER)(i__142E -  1);
+          if ((n__TCEH > Self__SCEH->count__WFC)) {
+            Self__SCEH->count__WFC= 0;
+          } else {
+            if ((n__TCEH >  0)) {
+              len__1CGH=(__INTEGER)((__INTEGER)(n__TCEH -  1) +  1);
+              if ((len__1CGH >  0)) {
+                __tmp__2CGH=(__INTEGER)(n__TCEH +  1);
+                __tmp__4CGH=Self__SCEH->count__WFC;
+                Self__5CGH=__tmp__2CGH;
+                while ((Self__5CGH <= __tmp__4CGH)) {
+                  ((__CHARACTER *)Self__SCEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__5CGH - len__1CGH) -  1)]=((__CHARACTER *)Self__SCEH->storage__BCS)[(__INTEGER)(Self__5CGH -  1)];
+                  Self__5CGH=(__INTEGER)(Self__5CGH +  1);
                 };
-                Self__DX3G->count__KFC=(__INTEGER)(Self__DX3G->count__KFC - len__PW5G);
+                Self__SCEH->count__WFC=(__INTEGER)(Self__SCEH->count__WFC - len__1CGH);
               };
             };
           };
-          i__PI2E= 1;
+          i__142E= 1;
         } else {
-          Self__0W5G=((__STRING *)st__OI2E);
-          end__WW5G=(__INTEGER)(i__PI2E -  1);
-          len__YW5G=(__INTEGER)((__INTEGER)(end__WW5G - result__KW5G) +  1);
-          if ((len__YW5G >  0)) {
-            __tmp__ZW5G=(__INTEGER)(end__WW5G +  1);
-            __tmp__1W5G=Self__0W5G->count__KFC;
-            Self__2W5G=__tmp__ZW5G;
-            while ((Self__2W5G <= __tmp__1W5G)) {
-              ((__CHARACTER *)Self__0W5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__2W5G - len__YW5G) -  1)]=((__CHARACTER *)Self__0W5G->storage__VBS)[(__INTEGER)(Self__2W5G -  1)];
-              Self__2W5G=(__INTEGER)(Self__2W5G +  1);
+          Self__GDGH=((__STRING *)st__042E);
+          end__CDGH=(__INTEGER)(i__142E -  1);
+          len__EDGH=(__INTEGER)((__INTEGER)(end__CDGH - result__WCGH) +  1);
+          if ((len__EDGH >  0)) {
+            __tmp__FDGH=(__INTEGER)(end__CDGH +  1);
+            __tmp__HDGH=Self__GDGH->count__WFC;
+            Self__IDGH=__tmp__FDGH;
+            while ((Self__IDGH <= __tmp__HDGH)) {
+              ((__CHARACTER *)Self__GDGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__IDGH - len__EDGH) -  1)]=((__CHARACTER *)Self__GDGH->storage__BCS)[(__INTEGER)(Self__IDGH -  1)];
+              Self__IDGH=(__INTEGER)(Self__IDGH +  1);
             };
-            Self__0W5G->count__KFC=(__INTEGER)(Self__0W5G->count__KFC - len__YW5G);
+            Self__GDGH->count__WFC=(__INTEGER)(Self__GDGH->count__WFC - len__EDGH);
           };
-          i__PI2E=result__KW5G;
+          i__142E=result__WCGH;
         };
-        stat__QI2E= 1;
+        stat__242E= 1;
       };
-      __tmp__YK2E=TRUE__;
+      __tmp__EB3E=TRUE__;
     } else {
-      __tmp__YK2E=FALSE__;
+      __tmp__EB3E=FALSE__;
     };
-    if (__tmp__YK2E) {
-      __tmp__3L2E=TRUE__;
+    if (__tmp__EB3E) {
+      __tmp__JC3E=TRUE__;
     } else {
-      result__O5VF=(car__RI2E == '.');
-      if (result__O5VF) {
-        Self__VTAG=stat__QI2E;
-        if ((stat__QI2E ==  1)) {
-          stat__QI2E= 2;
+      result__IXWF=(car__342E == '.');
+      if (result__IXWF) {
+        Self__51CG=stat__242E;
+        if ((stat__242E ==  1)) {
+          stat__242E= 2;
         };
-        if ((Self__VTAG ==  2)) {
-          stat__QI2E= 3;
+        if ((Self__51CG ==  2)) {
+          stat__242E= 3;
         };
-        if ((Self__VTAG ==  3)) {
-          stat__QI2E= 0;
+        if ((Self__51CG ==  3)) {
+          stat__242E= 0;
         };
       };
-      __tmp__3L2E=result__O5VF;
+      __tmp__JC3E=result__IXWF;
     };
-    if ((! __tmp__3L2E)) {
-      if (((car__RI2E == ':') && (i__PI2E >  2))) {
-        Self__EO1E=((__CHARACTER *)((__STRING *)st__OI2E)->storage__VBS)[(__INTEGER)((__INTEGER)(i__PI2E -  1) -  1)];
-        result__GO1E=FALSE__;
-        if ((((__INTEGER_8 )Self__EO1E) >= ((__INTEGER_8 )'a'))) {
-          result__GO1E=(((__INTEGER_8 )Self__EO1E) <= ((__INTEGER_8 )'z'));
-          __tmp__QO1E=TRUE__;
+    if ((! __tmp__JC3E)) {
+      if (((car__342E == ':') && (i__142E >  2))) {
+        Self__YM2E=((__CHARACTER *)((__STRING *)st__042E)->storage__BCS)[(__INTEGER)((__INTEGER)(i__142E -  1) -  1)];
+        result__0M2E=FALSE__;
+        if ((((__INTEGER_8 )Self__YM2E) >= ((__INTEGER_8 )'a'))) {
+          result__0M2E=(((__INTEGER_8 )Self__YM2E) <= ((__INTEGER_8 )'z'));
+          __tmp__EN2E=TRUE__;
         } else {
-          __tmp__QO1E=FALSE__;
+          __tmp__EN2E=FALSE__;
         };
-        if ((! __tmp__QO1E)) {
-          if ((((__INTEGER_8 )Self__EO1E) >= ((__INTEGER_8 )'A'))) {
-            result__GO1E=(((__INTEGER_8 )Self__EO1E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__EN2E)) {
+          if ((((__INTEGER_8 )Self__YM2E) >= ((__INTEGER_8 )'A'))) {
+            result__0M2E=(((__INTEGER_8 )Self__YM2E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__4M2E=result__GO1E;
+        __tmp__KD3E=result__0M2E;
       } else {
-        __tmp__4M2E=FALSE__;
+        __tmp__KD3E=FALSE__;
       };
-      if ((__tmp__4M2E && (((__CHARACTER *)((__STRING *)st__OI2E)->storage__VBS)[(__INTEGER)((__INTEGER)(i__PI2E -  2) -  1)] == '/'))) {
-        Self__FX3G=((__STRING *)st__OI2E);
-        n__GX3G=(__INTEGER)(i__PI2E -  2);
-        if ((n__GX3G > Self__FX3G->count__KFC)) {
-          Self__FX3G->count__KFC= 0;
+      if ((__tmp__KD3E && (((__CHARACTER *)((__STRING *)st__042E)->storage__BCS)[(__INTEGER)((__INTEGER)(i__142E -  2) -  1)] == '/'))) {
+        Self__UCEH=((__STRING *)st__042E);
+        n__VCEH=(__INTEGER)(i__142E -  2);
+        if ((n__VCEH > Self__UCEH->count__WFC)) {
+          Self__UCEH->count__WFC= 0;
         } else {
-          if ((n__GX3G >  0)) {
-            len__BX5G=(__INTEGER)((__INTEGER)(n__GX3G -  1) +  1);
-            if ((len__BX5G >  0)) {
-              __tmp__CX5G=(__INTEGER)(n__GX3G +  1);
-              __tmp__EX5G=Self__FX3G->count__KFC;
-              Self__FX5G=__tmp__CX5G;
-              while ((Self__FX5G <= __tmp__EX5G)) {
-                ((__CHARACTER *)Self__FX3G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__FX5G - len__BX5G) -  1)]=((__CHARACTER *)Self__FX3G->storage__VBS)[(__INTEGER)(Self__FX5G -  1)];
-                Self__FX5G=(__INTEGER)(Self__FX5G +  1);
+          if ((n__VCEH >  0)) {
+            len__NDGH=(__INTEGER)((__INTEGER)(n__VCEH -  1) +  1);
+            if ((len__NDGH >  0)) {
+              __tmp__ODGH=(__INTEGER)(n__VCEH +  1);
+              __tmp__QDGH=Self__UCEH->count__WFC;
+              Self__RDGH=__tmp__ODGH;
+              while ((Self__RDGH <= __tmp__QDGH)) {
+                ((__CHARACTER *)Self__UCEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__RDGH - len__NDGH) -  1)]=((__CHARACTER *)Self__UCEH->storage__BCS)[(__INTEGER)(Self__RDGH -  1)];
+                Self__RDGH=(__INTEGER)(Self__RDGH +  1);
               };
-              Self__FX3G->count__KFC=(__INTEGER)(Self__FX3G->count__KFC - len__BX5G);
+              Self__UCEH->count__WFC=(__INTEGER)(Self__UCEH->count__WFC - len__NDGH);
             };
           };
         };
-        i__PI2E= 1;
+        i__142E= 1;
       } else {
-        stat__QI2E= 0;
+        stat__242E= 0;
       };
     };
-    i__PI2E=(__INTEGER)(i__PI2E +  1);
+    i__142E=(__INTEGER)(i__142E +  1);
   };
-  if ((stat__QI2E ==  1)) {
-    Self__HX3G=((__STRING *)st__OI2E);
-    if (( 1 > Self__HX3G->count__KFC)) {
-      Self__HX3G->count__KFC= 0;
+  if ((stat__242E ==  1)) {
+    Self__WCEH=((__STRING *)st__042E);
+    if (( 1 > Self__WCEH->count__WFC)) {
+      Self__WCEH->count__WFC= 0;
     } else {
-      Self__HX3G->count__KFC=(__INTEGER)(Self__HX3G->count__KFC -  1);
+      Self__WCEH->count__WFC=(__INTEGER)(Self__WCEH->count__WFC -  1);
     };
   };
-  if ((stat__QI2E ==  2)) {
-    Self__JX3G=((__STRING *)st__OI2E);
-    if (( 2 > Self__JX3G->count__KFC)) {
-      Self__JX3G->count__KFC= 0;
+  if ((stat__242E ==  2)) {
+    Self__YCEH=((__STRING *)st__042E);
+    if (( 2 > Self__YCEH->count__WFC)) {
+      Self__YCEH->count__WFC= 0;
     } else {
-      Self__JX3G->count__KFC=(__INTEGER)(Self__JX3G->count__KFC -  2);
+      Self__YCEH->count__WFC=(__INTEGER)(Self__YCEH->count__WFC -  2);
     };
   };
-  if ((stat__QI2E ==  3)) {
-    Self__GLGD=((__STRING *)st__OI2E);
-    result__KLGD=(__INTEGER)(i__PI2E -  4);
-    while ((! ((result__KLGD <  1) || ('/' == ((__CHARACTER *)Self__GLGD->storage__VBS)[(__INTEGER)(result__KLGD -  1)])))) {
-      result__KLGD=(__INTEGER)(result__KLGD -  1);
+  if ((stat__242E ==  3)) {
+    Self__SLGD=((__STRING *)st__042E);
+    result__WLGD=(__INTEGER)(i__142E -  4);
+    while ((! ((result__WLGD <  1) || ('/' == ((__CHARACTER *)Self__SLGD->storage__BCS)[(__INTEGER)(result__WLGD -  1)])))) {
+      result__WLGD=(__INTEGER)(result__WLGD -  1);
     };
-    if ((result__KLGD ==  0)) {
-      ((__STRING *)st__OI2E)->count__KFC= 0;
+    if ((result__WLGD ==  0)) {
+      ((__STRING *)st__042E)->count__WFC= 0;
     } else {
-      Self__MX5G=((__STRING *)st__OI2E);
-      end__IX5G=(__INTEGER)(i__PI2E -  1);
-      len__KX5G=(__INTEGER)((__INTEGER)(end__IX5G - result__KLGD) +  1);
-      if ((len__KX5G >  0)) {
-        __tmp__LX5G=(__INTEGER)(end__IX5G +  1);
-        __tmp__NX5G=Self__MX5G->count__KFC;
-        Self__OX5G=__tmp__LX5G;
-        while ((Self__OX5G <= __tmp__NX5G)) {
-          ((__CHARACTER *)Self__MX5G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__OX5G - len__KX5G) -  1)]=((__CHARACTER *)Self__MX5G->storage__VBS)[(__INTEGER)(Self__OX5G -  1)];
-          Self__OX5G=(__INTEGER)(Self__OX5G +  1);
+      Self__YDGH=((__STRING *)st__042E);
+      end__UDGH=(__INTEGER)(i__142E -  1);
+      len__WDGH=(__INTEGER)((__INTEGER)(end__UDGH - result__WLGD) +  1);
+      if ((len__WDGH >  0)) {
+        __tmp__XDGH=(__INTEGER)(end__UDGH +  1);
+        __tmp__ZDGH=Self__YDGH->count__WFC;
+        Self__0DGH=__tmp__XDGH;
+        while ((Self__0DGH <= __tmp__ZDGH)) {
+          ((__CHARACTER *)Self__YDGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__0DGH - len__WDGH) -  1)]=((__CHARACTER *)Self__YDGH->storage__BCS)[(__INTEGER)(Self__0DGH -  1)];
+          Self__0DGH=(__INTEGER)(Self__0DGH +  1);
         };
-        Self__MX5G->count__KFC=(__INTEGER)(Self__MX5G->count__KFC - len__KX5G);
+        Self__YDGH->count__WFC=(__INTEGER)(Self__YDGH->count__WFC - len__WDGH);
       };
     };
   };
-  if ((((__STRING *)st__OI2E)->count__KFC ==  0)) {
-    add_last__NLT(st__OI2E,'/');
+  if ((((__STRING *)st__042E)->count__WFC ==  0)) {
+    add_last__ZLT(st__042E,'/');
   };
 }
 
-static void* item__VEPE(__DIRECTORY_UNIX *Self__WEPE,__INTEGER i__XEPE)
+static void* item__DVPE(__DIRECTORY_UNIX *Self__EVPE,__INTEGER i__FVPE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __LINKED_LISToENTRYo *Self__AZVE;
-  Self__AZVE=((__LINKED_LISToENTRYo *)Self__WEPE->parent_directory__OED.list__2ERD);
-  if ((i__XEPE != Self__AZVE->mem_idx__5HVE)) {
-    if ((Self__AZVE->mem_idx__5HVE > i__XEPE)) {
-      Self__AZVE->mem_idx__5HVE= 1;
-      Self__AZVE->mem_lnk__AIVE=Self__AZVE->first_link__YHVE;
+  __LINKED_LISToENTRYo *Self__1IWE;
+  Self__1IWE=((__LINKED_LISToENTRYo *)Self__EVPE->parent_directory__0ED.list__IFRD);
+  if ((i__FVPE != Self__1IWE->mem_idx__VWVE)) {
+    if ((Self__1IWE->mem_idx__VWVE > i__FVPE)) {
+      Self__1IWE->mem_idx__VWVE= 1;
+      Self__1IWE->mem_lnk__WWVE=Self__1IWE->first_link__OWVE;
     };
-    while ((i__XEPE != Self__AZVE->mem_idx__5HVE)) {
-      Self__AZVE->mem_lnk__AIVE=((__LINKED_LIST_NODEoENTRYo *)Self__AZVE->mem_lnk__AIVE)->next__GGEF;
-      Self__AZVE->mem_idx__5HVE=(__INTEGER)(Self__AZVE->mem_idx__5HVE +  1);
+    while ((i__FVPE != Self__1IWE->mem_idx__VWVE)) {
+      Self__1IWE->mem_lnk__WWVE=((__LINKED_LIST_NODEoENTRYo *)Self__1IWE->mem_lnk__WWVE)->next__V0EF;
+      Self__1IWE->mem_idx__VWVE=(__INTEGER)(Self__1IWE->mem_idx__VWVE +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__AZVE->mem_lnk__AIVE)->item__TZVE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__1IWE->mem_lnk__WWVE)->item__OJWE);
 }
 
-static void* item__M0ND(__LINKED_LISToSTRING_CONSTANTo *Self__N0ND,__INTEGER i__O0ND)
+static void* item__Y0ND(__LINKED_LISToSTRING_CONSTANTo *Self__Z0ND,__INTEGER i__00ND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  if ((i__O0ND != Self__N0ND->mem_idx__CUEC)) {
-    if ((Self__N0ND->mem_idx__CUEC > i__O0ND)) {
-      Self__N0ND->mem_idx__CUEC= 1;
-      Self__N0ND->mem_lnk__EUEC=Self__N0ND->first_link__YTEC;
+  if ((i__00ND != Self__Z0ND->mem_idx__OUEC)) {
+    if ((Self__Z0ND->mem_idx__OUEC > i__00ND)) {
+      Self__Z0ND->mem_idx__OUEC= 1;
+      Self__Z0ND->mem_lnk__QUEC=Self__Z0ND->first_link__EUEC;
     };
-    while ((i__O0ND != Self__N0ND->mem_idx__CUEC)) {
-      Self__N0ND->mem_lnk__EUEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__N0ND->mem_lnk__EUEC)->next__AOOD;
-      Self__N0ND->mem_idx__CUEC=(__INTEGER)(Self__N0ND->mem_idx__CUEC +  1);
+    while ((i__00ND != Self__Z0ND->mem_idx__OUEC)) {
+      Self__Z0ND->mem_lnk__QUEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__Z0ND->mem_lnk__QUEC)->next__MOOD;
+      Self__Z0ND->mem_idx__OUEC=(__INTEGER)(Self__Z0ND->mem_idx__OUEC +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__N0ND->mem_lnk__EUEC)->item__OVHD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__Z0ND->mem_lnk__QUEC)->item__0VHD);
 }
 
-static void** create__H23(__INTEGER nb_elements__J23)
+static void** create__T23(__INTEGER nb_elements__V23)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__411G,a__D21G,new_size__511G,new_size2__A21G,a__VX3G;
-  __UINTEGER_32 new_size__WX3G;
-  __POINTER result__311G,ptr_table__W0AH,next__V0AH,result__X0AH;
-  void *result__00AH;
-  __INTEGER Self__WZJC;
-  void **Result__TUEB;
-  sz__411G=((__UINTEGER_32 )(__INTEGER)(nb_elements__J23 * ((__INTEGER )(sizeof(void *)))));
-  result__311G=((__POINTER )(NULL));
-  a__D21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__511G=(__UINTEGER_32)((__UINTEGER_32)(sz__411G + a__D21G) & (__UINTEGER_32)(~ a__D21G));
-  new_size2__A21G=(__UINTEGER_32)(new_size__511G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__A21G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VX3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WX3G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__A21G + a__VX3G) & (__UINTEGER_32)(~ a__VX3G));
-    ptr_table__W0AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WX3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__V0AH=((__POINTER )(NULL));
-    result__X0AH=((__POINTER *)ptr_table__W0AH)[ 0];
-    if ((result__X0AH == (void *)NULL)) {
-      result__X0AH=new_lab__ARJ(new_size__WX3G);
-      next__V0AH=(void *)((unsigned long)result__X0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WX3G)));
-      ((__POINTER *)next__V0AH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__W0AH)[ 0]=next__V0AH;
-    } else {
-      next__V0AH=((__POINTER *)result__X0AH)[ 0];
-      if ((next__V0AH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X0AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WX3G <<  1)) <=  4096)) {
-          next__V0AH=(void *)((unsigned long)result__X0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WX3G)));
-        } else {
-          next__V0AH=new_lab__ARJ(new_size__WX3G);
-        };
-        ((__POINTER *)next__V0AH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__W0AH)[ 0]=next__V0AH;
-      } else {
-        ((__POINTER *)result__X0AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V0AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__X0AH=next__V0AH;
-      };
-    };
-    ((__POINTER *)result__X0AH)[ 0]=((__POINTER ) 3);
-    result__311G=(void *)((unsigned long)result__X0AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EJCH,a__JJCH,new_size__FJCH,new_size2__GJCH,a__EDEH;
+  __UINTEGER_32 new_size__FDEH;
+  __POINTER result__DJCH,ptr_table__KHHH,next__JHHH,result__LHHH;
+  void *result__OHHH;
+  __INTEGER Self__C0JC;
+  void **Result__5UEB;
+  sz__EJCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__V23 * ((__INTEGER )(sizeof(void *)))));
+  result__DJCH=((__POINTER )(NULL));
+  a__JJCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FJCH=(__UINTEGER_32)((__UINTEGER_32)(sz__EJCH + a__JJCH) & (__UINTEGER_32)(~ a__JJCH));
+  new_size2__GJCH=(__UINTEGER_32)(new_size__FJCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GJCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EDEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FDEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GJCH + a__EDEH) & (__UINTEGER_32)(~ a__EDEH));
+    ptr_table__KHHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FDEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JHHH=((__POINTER )(NULL));
+    result__LHHH=((__POINTER *)ptr_table__KHHH)[ 0];
+    if ((result__LHHH == (void *)NULL)) {
+      result__LHHH=new_lab__MRJ(new_size__FDEH);
+      next__JHHH=(void *)((unsigned long)result__LHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FDEH)));
+      ((__POINTER *)next__JHHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KHHH)[ 0]=next__JHHH;
+    } else {
+      next__JHHH=((__POINTER *)result__LHHH)[ 0];
+      if ((next__JHHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LHHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FDEH <<  1)) <=  4096)) {
+          next__JHHH=(void *)((unsigned long)result__LHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FDEH)));
+        } else {
+          next__JHHH=new_lab__MRJ(new_size__FDEH);
+        };
+        ((__POINTER *)next__JHHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KHHH)[ 0]=next__JHHH;
+      } else {
+        ((__POINTER *)result__LHHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JHHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LHHH=next__JHHH;
+      };
+    };
+    ((__POINTER *)result__LHHH)[ 0]=((__POINTER ) 3);
+    result__DJCH=(void *)((unsigned long)result__LHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__00AH=first_free__LDVB;
-    while ((((void *)result__00AH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__00AH)->map_size_and_id__2SB &  4294967292LU) < new_size__511G))) {
-      result__00AH=((__MEMORY *)result__00AH)->map_next_free__3SB;
+    result__OHHH=first_free__XDVB;
+    while ((((void *)result__OHHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OHHH)->map_size_and_id__ITB &  4294967292LU) < new_size__FJCH))) {
+      result__OHHH=((__MEMORY *)result__OHHH)->map_next_free__JTB;
     };
-    if (((void *)result__00AH == (void *)NULL)) {
-      result__00AH=new_page__CA5();
+    if (((void *)result__OHHH == (void *)NULL)) {
+      result__OHHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__00AH,new_size__511G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__00AH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__311G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__00AH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__OHHH,new_size__FJCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OHHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__DJCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OHHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__TUEB=((void **)result__311G);
-  Self__WZJC=(__INTEGER)(nb_elements__J23 -  1);
-  while ((Self__WZJC >=  0)) {
-    Result__TUEB[Self__WZJC]=NULL;
-    Self__WZJC=(__INTEGER)(Self__WZJC -  1);
+  Result__5UEB=((void **)result__DJCH);
+  Self__C0JC=(__INTEGER)(nb_elements__V23 -  1);
+  while ((Self__C0JC >=  0)) {
+    Result__5UEB[Self__C0JC]=NULL;
+    Self__C0JC=(__INTEGER)(Self__C0JC -  1);
   };
-  return(Result__TUEB);
+  return(Result__5UEB);
 }
 
-static __BOOLEAN read_word__EPF(void *st__GPF)
+static __BOOLEAN read_word__QPF(void *st__SPF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__IPF,idx__JPF;
-  __BOOLEAN result__KPF,__tmp__IQF;
-  __CHARACTER result__0VYG;
-  posold__IPF= 0;
-  idx__JPF= 0;
-  result__KPF=FALSE__;
-  if ((! read_space__RRD())) {
-    result__KPF=FALSE__;
+  __INTEGER posold__UPF,idx__VPF;
+  __BOOLEAN result__WPF,__tmp__UQF;
+  __CHARACTER result__2U4G;
+  posold__UPF= 0;
+  idx__VPF= 0;
+  result__WPF=FALSE__;
+  if ((! read_space__3RD())) {
+    result__WPF=FALSE__;
   } else {
-    posold__IPF=position__GBC;
-    idx__JPF= 1;
-    until_do__353:
+    posold__UPF=position__SBC;
+    idx__VPF= 1;
+    until_do__JA4:
     {
-      if ((idx__JPF > ((__STRING_CONSTANT *)st__GPF)->count__DD)) {
-        __tmp__IQF=TRUE__;
+      if ((idx__VPF > ((__STRING_CONSTANT *)st__SPF)->count__DD)) {
+        __tmp__UQF=TRUE__;
       } else {
-        result__0VYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__0VYG=((__CHARACTER )(( 0)));
+        result__2U4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__2U4G=((__CHARACTER )(( 0)));
         } else {
-          result__0VYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__2U4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__IQF=(result__0VYG != ((__CHARACTER *)((__STRING_CONSTANT *)st__GPF)->storage__JQO)[(__INTEGER)(idx__JPF -  1)]);
+        __tmp__UQF=(result__2U4G != ((__CHARACTER *)((__STRING_CONSTANT *)st__SPF)->storage__VQO)[(__INTEGER)(idx__VPF -  1)]);
       };
-      if ((! __tmp__IQF)) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        idx__JPF=(__INTEGER)(idx__JPF +  1);
-        goto until_do__353;
+      if ((! __tmp__UQF)) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        idx__VPF=(__INTEGER)(idx__VPF +  1);
+        goto until_do__JA4;
       };
     };
-    if ((idx__JPF > ((__STRING_CONSTANT *)st__GPF)->count__DD)) {
-      last_string__2ZC=st__GPF;
-      result__KPF=TRUE__;
+    if ((idx__VPF > ((__STRING_CONSTANT *)st__SPF)->count__DD)) {
+      last_string__I0C=st__SPF;
+      result__WPF=TRUE__;
     } else {
-      position__GBC=posold__IPF;
+      position__SBC=posold__UPF;
     };
   };
-  return(result__KPF);
+  return(result__WPF);
 }
 
-static __BOOLEAN read_slot_header__GDE(__BOOLEAN first__IDE)
+static __BOOLEAN read_slot_header__SDE(__BOOLEAN first__UDE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *v__MDE;
-  void *instr__UDE;
-  __POSITION pos__NGQG,pos__PGQG,pos__RGQG,pos__TGQG,pos__VGQG;
-  __POSITION pos__XGQG,pos__ZGQG,pos__4NUG,pos__1GQG,pos__3GQG;
-  __POSITION pos__5GQG,pos__BHQG,pos__AOUG,pos__DHQG,pos__FHQG;
-  __POSITION pos__HHQG,pos__JHQG,pos__LHQG,pos__NHQG,pos__PHQG;
-  __POSITION pos__RHQG,pos__THQG,pos__VHQG,pos__XHQG,pos__COUG;
-  __POSITION pos__ZHQG,pos__1HQG,pos__WIM,pos__3HQG,pos__5HQG,pos__BIQG;
-  __POSITION pos__DIQG,__tmp__JCQD,__tmp__OCQD,__tmp__EOUG,pos__FIQG;
-  __POSITION pos__HIQG,pos__JIQG,pos__LIQG,pos__NIQG,pos__PIQG;
-  void *res__QIE,*__tmp__SKE;
-  __INTEGER __tmp__JKE,__tmp__LKE,__tmp__NKE,typ_id__TX5G,typ_id__3X5G;
-  void *n__0X3G,*n__UPGB;
-  void *result__1X3G,*result__2PGB;
-  __ITM_TYPE_PARAMETER *result__RX5G,*Self__ZX5G,*result__1X5G;
-  __ITM_TYPE_PARAMETER *Self__DY5G;
-  __POINTER ptr__SX5G,ptr_table__I1AH,next__H1AH,result__J1AH;
-  __POINTER ptr_table__N1AH,next__M1AH,result__O1AH,ptr__2X5G;
-  __POINTER ptr_table__Y1AH,next__X1AH,result__Z1AH,ptr_table__31AH;
-  __POINTER next__21AH,result__41AH;
-  __UINTEGER_32 sz__UX5G,a__VX5G,new_size__WX5G,t__XX5G,a__YX5G;
-  __UINTEGER_32 new_size__Q1AH,lab_type__P1AH,sz__4X5G,a__5X5G;
-  __UINTEGER_32 new_size__AY5G,t__BY5G,a__CY5G,new_size__A2AH;
-  __UINTEGER_32 lab_type__51AH;
-  __BOOLEAN result__KDE,result__40AH,__tmp__0GE,result__A1AH;
-  __BOOLEAN result__B1AH,__tmp__SIE,result__E1AH,__tmp__CJE,__tmp__QJE;
-  __BOOLEAN result__JSL,__tmp__4JE,result__R1AH,result__U1AH;
-  __BOOLEAN result__B2AH,__tmp__3OE,__tmp__DRE,__tmp__PPE,__tmp__ZSE;
-  __BOOLEAN result__U4G,__tmp__VUE,result__G5G,__tmp__RWE,result__Y5G;
-  __BOOLEAN __tmp__4XE,result__KAH,__tmp__E0E,result__2AH,result__E2AH;
-  __BOOLEAN result__H2AH,result__K2AH,result__N2AH;
-  __CHARACTER style__ODE,result__C1AH,result__F1AH,result__S1AH;
-  __CHARACTER result__V1AH,result__C2AH,result__F2AH,result__I2AH;
-  __CHARACTER result__L2AH,result__O2AH;
-  result__KDE=FALSE__;
-  v__MDE=NULL;
-  instr__UDE=NULL;
-  style__ODE=read_style__LRF();
-  if ((style__ODE != ' ')) {
-    result__KDE=TRUE__;
-    if (((! first__IDE) && (style__ODE == '+'))) {
-      pos__NGQG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_238));
-      put_position__IOG(pos__NGQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  void *v__YDE;
+  void *instr__AEE;
+  __POSITION pos__3YVG,pos__5YVG,pos__BZVG,pos__DZVG,pos__FZVG;
+  __POSITION pos__HZVG,pos__JZVG,pos__FC0G,pos__LZVG,pos__NZVG;
+  __POSITION pos__PZVG,pos__RZVG,pos__HC0G,pos__TZVG,pos__VZVG;
+  __POSITION pos__XZVG,pos__ZZVG,pos__1ZVG,pos__3ZVG,pos__5ZVG;
+  __POSITION pos__B0VG,pos__D0VG,pos__F0VG,pos__H0VG,pos__JC0G;
+  __POSITION pos__J0VG,pos__L0VG,pos__CJM,pos__N0VG,pos__P0VG,pos__R0VG;
+  __POSITION pos__T0VG,__tmp__VCQD,__tmp__0CQD,__tmp__LC0G,pos__V0VG;
+  __POSITION pos__X0VG,pos__Z0VG,pos__10VG,pos__30VG,pos__50VG;
+  void *res__2IE,*__tmp__4KE;
+  __INTEGER __tmp__VKE,__tmp__XKE,__tmp__ZKE,typ_id__5DGH,typ_id__JEGH;
+  void *n__JDEH,*n__AQGB;
+  void *result__KDEH,*result__IQGB;
+  __ITM_TYPE_PARAMETER *result__3DGH,*Self__FEGH,*result__HEGH;
+  __ITM_TYPE_PARAMETER *Self__PEGH;
+  __POINTER ptr__4DGH,ptr_table__2HHH,next__1HHH,result__3HHH;
+  __POINTER ptr_table__BIHH,next__AIHH,result__CIHH,ptr__IEGH;
+  __POINTER ptr_table__MIHH,next__LIHH,result__NIHH,ptr_table__RIHH;
+  __POINTER next__QIHH,result__SIHH;
+  __UINTEGER_32 sz__AEGH,a__BEGH,new_size__CEGH,t__DEGH,a__EEGH;
+  __UINTEGER_32 new_size__EIHH,lab_type__DIHH,sz__KEGH,a__LEGH;
+  __UINTEGER_32 new_size__MEGH,t__NEGH,a__OEGH,new_size__UIHH;
+  __UINTEGER_32 lab_type__TIHH;
+  __BOOLEAN result__WDE,result__SHHH,__tmp__GHE,result__UHHH;
+  __BOOLEAN result__VHHH,__tmp__4IE,result__YHHH,__tmp__OJE,__tmp__2JE;
+  __BOOLEAN result__VSL,__tmp__KKE,result__FIHH,result__IIHH;
+  __BOOLEAN result__VIHH,__tmp__JPE,__tmp__PRE,__tmp__1PE,__tmp__FTE;
+  __BOOLEAN result__A5G,__tmp__BVE,result__S5G,__tmp__3WE,result__EAH;
+  __BOOLEAN __tmp__KYE,result__WAH,__tmp__Q0E,result__IBH,result__YIHH;
+  __BOOLEAN result__1IHH,result__4IHH,result__BJHH;
+  __CHARACTER style__0DE,result__WHHH,result__ZHHH,result__GIHH;
+  __CHARACTER result__JIHH,result__WIHH,result__ZIHH,result__2IHH;
+  __CHARACTER result__5IHH,result__CJHH;
+  result__WDE=FALSE__;
+  v__YDE=NULL;
+  instr__AEE=NULL;
+  style__0DE=read_style__XRF();
+  if ((style__0DE != ' ')) {
+    result__WDE=TRUE__;
+    if (((! first__UDE) && (style__0DE == '+'))) {
+      pos__3YVG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_248));
+      put_position__UOG(pos__3YVG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    if (first__IDE) {
-      if (read_word__EPF((&__string_62))) {
-        if ((style__ODE == '-')) {
-          append__VNS(output_decl__RFE,(&__string_239));
-        };
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        ((__PROTOTYPE *)object__3AC)->parent_named__5.parent_itm_object__4.position__BDJ=current_position__3WF();
-        ((__PROTOTYPE *)object__3AC)->parent_named__5.style__VDU=style__ODE;
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__PGQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__PGQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+    if (first__UDE) {
+      if (read_word__QPF((&__string_62))) {
+        if ((style__0DE == '-')) {
+          append__BOS(output_decl__3FE,(&__string_249));
+        };
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        ((__PROTOTYPE *)object__JBC)->parent_named__5.parent_itm_object__4.position__NDJ=current_position__JXF();
+        ((__PROTOTYPE *)object__JBC)->parent_named__5.style__BEU=style__0DE;
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__5YVG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__5YVG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__40AH=read_word__EPF((&__string_9));
-        if (is_shorter__WY) {
-          if (result__40AH) {
+        result__SHHH=read_word__QPF((&__string_9));
+        if (is_shorter__5Y) {
+          if (result__SHHH) {
             if (((void *)(&__string_9) == (void *)(&__string_4))) {
-              short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+              short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
             } else {
-              short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+              short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
             };
           };
         };
-        if (result__40AH) {
-          __tmp__0GE=TRUE__;
+        if (result__SHHH) {
+          __tmp__GHE=TRUE__;
         } else {
-          result__A1AH=read_word__EPF((&__string_10));
-          if (is_shorter__WY) {
-            if (result__A1AH) {
+          result__UHHH=read_word__QPF((&__string_10));
+          if (is_shorter__5Y) {
+            if (result__UHHH) {
               if (((void *)(&__string_10) == (void *)(&__string_4))) {
-                short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+                short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
               } else {
-                short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+                short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
               };
             };
           };
-          __tmp__0GE=result__A1AH;
+          __tmp__GHE=result__UHHH;
         };
-        if (__tmp__0GE) {
-          ((__PROTOTYPE *)object__3AC)->type_style__L2C=last_string__2ZC;
+        if (__tmp__GHE) {
+          ((__PROTOTYPE *)object__JBC)->type_style__X2C=last_string__I0C;
         };
-        if ((! read_cap_identifier__GZJ())) {
-          pos__RGQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_241));
-          put_position__IOG(pos__RGQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! read_cap_identifier__SZJ())) {
+          pos__BZVG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_251));
+          put_position__UOG(pos__BZVG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__5AD((&__string_125),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if (((void *)((__PROTOTYPE *)object__3AC)->shortname__ZHE != (void *)last_string__2ZC)) {
-          pos__TGQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_242));
-          put_position__IOG(pos__TGQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        short__token__to__LBD((&__string_125),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if (((void *)((__PROTOTYPE *)object__JBC)->shortname__FIE != (void *)last_string__I0C)) {
+          pos__DZVG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_252));
+          put_position__UOG(pos__DZVG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__B1AH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__B1AH=FALSE__;
+        result__VHHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__VHHH=FALSE__;
         } else {
-          result__C1AH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__C1AH=((__CHARACTER )(( 0)));
+          result__WHHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__WHHH=((__CHARACTER )(( 0)));
           } else {
-            result__C1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__WHHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__C1AH == '(')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__B1AH=TRUE__;
+          if ((result__WHHH == '(')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__VHHH=TRUE__;
           };
         };
-        if (result__B1AH) {
-          if (((! is_shorter__WY) && (! is_shorter2__VI))) {
-            pos__VGQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_243));
-            put_position__IOG(pos__VGQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        if (result__VHHH) {
+          if (((! is_shorter__5Y) && (! is_shorter2__VI))) {
+            pos__FZVG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_253));
+            put_position__UOG(pos__FZVG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          res__QIE=NULL;
-          __tmp__SIE=read_identifier__55K();
-          if (__tmp__SIE) {
-            result__E1AH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__E1AH=FALSE__;
+          res__2IE=NULL;
+          __tmp__4IE=read_identifier__LAL();
+          if (__tmp__4IE) {
+            result__YHHH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__YHHH=FALSE__;
             } else {
-              result__F1AH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__F1AH=((__CHARACTER )(( 0)));
+              result__ZHHH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__ZHHH=((__CHARACTER )(( 0)));
               } else {
-                result__F1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__ZHHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__F1AH == ':')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__E1AH=TRUE__;
+              if ((result__ZHHH == ':')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__YHHH=TRUE__;
               };
             };
-            if ((! result__E1AH)) {
-              pos__XGQG=current_position__3WF();
-              put_error__text__4MG( 2,(&__string_244));
-              put_position__IOG(pos__XGQG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+            if ((! result__YHHH)) {
+              pos__HZVG=current_position__JXF();
+              put_error__text__KNG( 2,(&__string_254));
+              put_position__UOG(pos__HZVG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            __tmp__CJE=((void *)read_type__XBM(PARSER__,TRUE__) == (void *)NULL);
-            if (__tmp__CJE) {
-              pos__ZGQG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_245));
-              put_position__IOG(pos__ZGQG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+            __tmp__OJE=((void *)read_type__DCM(PARSER__,TRUE__) == (void *)NULL);
+            if (__tmp__OJE) {
+              pos__JZVG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_255));
+              put_position__UOG(pos__JZVG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            pos__4NUG=current_position__3WF();
-            put_error__text__4MG( 1,(&__string_246));
-            put_position__IOG(pos__4NUG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+            pos__FC0G=current_position__JXF();
+            put_error__text__KNG( 1,(&__string_256));
+            put_position__UOG(pos__FC0G);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
-            __tmp__QJE=TRUE__;
+            __tmp__2JE=TRUE__;
           } else {
-            __tmp__QJE=FALSE__;
+            __tmp__2JE=FALSE__;
           };
-          if ((! __tmp__QJE)) {
-            result__JSL=read_cap_identifier__GZJ();
-            if (result__JSL) {
-              __tmp__4JE=is_parameter_type__2JE;
-              if ((! __tmp__4JE)) {
-                pos__1GQG=current_position__3WF();
-                put_error__text__4MG( 0,(&__string_247));
-                put_position__IOG(pos__1GQG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+          if ((! __tmp__2JE)) {
+            result__VSL=read_cap_identifier__SZJ();
+            if (result__VSL) {
+              __tmp__KKE=is_parameter_type__IKE;
+              if ((! __tmp__KKE)) {
+                pos__LZVG=current_position__JXF();
+                put_error__text__KNG( 0,(&__string_257));
+                put_position__UOG(pos__LZVG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
-              __tmp__JKE=position__GBC;
-              __tmp__LKE=((__STRING_CONSTANT *)last_string__2ZC)->count__DD;
-              __tmp__NKE=(__INTEGER)(__tmp__JKE - __tmp__LKE);
-              short__token__to__5AD((&__string_126),__tmp__NKE,position__GBC);
-              n__0X3G=last_string__2ZC;
-              result__1X3G=fast_reference_at__M1T(dico__GTI,n__0X3G);
-              if (((void *)result__1X3G == (void *)NULL)) {
-                result__RX5G=NULL;
-                ptr__SX5G=((__POINTER )(NULL));
-                typ_id__TX5G= 0;
-                sz__UX5G=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-                if ((sz__UX5G ==  0)) {
-                  result__RX5G=ITM_TYPE_PARAMETER__;
+              __tmp__VKE=position__SBC;
+              __tmp__XKE=((__STRING_CONSTANT *)last_string__I0C)->count__DD;
+              __tmp__ZKE=(__INTEGER)(__tmp__VKE - __tmp__XKE);
+              short__token__to__LBD((&__string_126),__tmp__ZKE,position__SBC);
+              n__JDEH=last_string__I0C;
+              result__KDEH=fast_reference_at__Y1T(dico__STI,n__JDEH);
+              if (((void *)result__KDEH == (void *)NULL)) {
+                result__3DGH=NULL;
+                ptr__4DGH=((__POINTER )(NULL));
+                typ_id__5DGH= 0;
+                sz__AEGH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                if ((sz__AEGH ==  0)) {
+                  result__3DGH=ITM_TYPE_PARAMETER__;
                 } else {
-                  typ_id__TX5G=-1;
-                  clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__UX5G);
-                  if ((typ_id__TX5G == (__INTEGER)(-  1))) {
-                    a__VX5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__WX5G=(__UINTEGER_32)((__UINTEGER_32)(sz__UX5G + a__VX5G) & (__UINTEGER_32)(~ a__VX5G));
-                    ptr_table__I1AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WX5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__H1AH=((__POINTER )(NULL));
-                    result__J1AH=((__POINTER *)ptr_table__I1AH)[ 0];
-                    if ((result__J1AH == (void *)NULL)) {
-                      result__J1AH=new_lab__ARJ(new_size__WX5G);
-                      next__H1AH=(void *)((unsigned long)result__J1AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WX5G)));
-                      ((__POINTER *)next__H1AH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__I1AH)[ 0]=next__H1AH;
+                  typ_id__5DGH=-1;
+                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__AEGH);
+                  if ((typ_id__5DGH == (__INTEGER)(-  1))) {
+                    a__BEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__CEGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEGH + a__BEGH) & (__UINTEGER_32)(~ a__BEGH));
+                    ptr_table__2HHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CEGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__1HHH=((__POINTER )(NULL));
+                    result__3HHH=((__POINTER *)ptr_table__2HHH)[ 0];
+                    if ((result__3HHH == (void *)NULL)) {
+                      result__3HHH=new_lab__MRJ(new_size__CEGH);
+                      next__1HHH=(void *)((unsigned long)result__3HHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEGH)));
+                      ((__POINTER *)next__1HHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__2HHH)[ 0]=next__1HHH;
                     } else {
-                      next__H1AH=((__POINTER *)result__J1AH)[ 0];
-                      if ((next__H1AH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J1AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WX5G <<  1)) <=  4096)) {
-                          next__H1AH=(void *)((unsigned long)result__J1AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WX5G)));
+                      next__1HHH=((__POINTER *)result__3HHH)[ 0];
+                      if ((next__1HHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3HHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CEGH <<  1)) <=  4096)) {
+                          next__1HHH=(void *)((unsigned long)result__3HHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEGH)));
                         } else {
-                          next__H1AH=new_lab__ARJ(new_size__WX5G);
+                          next__1HHH=new_lab__MRJ(new_size__CEGH);
                         };
-                        ((__POINTER *)next__H1AH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__I1AH)[ 0]=next__H1AH;
+                        ((__POINTER *)next__1HHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__2HHH)[ 0]=next__1HHH;
                       } else {
-                        ((__POINTER *)result__J1AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__J1AH=next__H1AH;
+                        ((__POINTER *)result__3HHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1HHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__3HHH=next__1HHH;
                       };
                     };
-                    ptr__SX5G=result__J1AH;
+                    ptr__4DGH=result__3HHH;
                   } else {
-                    t__XX5G=((__UINTEGER_32 )typ_id__TX5G);
-                    a__YX5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__Q1AH=(__UINTEGER_32)((__UINTEGER_32)(sz__UX5G + a__YX5G) & (__UINTEGER_32)(~ a__YX5G));
-                    ptr_table__N1AH=((__POINTER )(&(table_type[(t__XX5G)])));
-                    lab_type__P1AH=(__UINTEGER_32)(t__XX5G |  1);
-                    next__M1AH=((__POINTER )(NULL));
-                    result__O1AH=((__POINTER *)ptr_table__N1AH)[ 0];
-                    if ((result__O1AH == (void *)NULL)) {
-                      result__O1AH=new_lab__ARJ(lab_type__P1AH);
-                      next__M1AH=(void *)((unsigned long)result__O1AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q1AH)));
-                      ((__POINTER *)next__M1AH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__N1AH)[ 0]=next__M1AH;
+                    t__DEGH=((__UINTEGER_32 )typ_id__5DGH);
+                    a__EEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__EIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEGH + a__EEGH) & (__UINTEGER_32)(~ a__EEGH));
+                    ptr_table__BIHH=((__POINTER )(&(table_type[(t__DEGH)])));
+                    lab_type__DIHH=(__UINTEGER_32)(t__DEGH |  1);
+                    next__AIHH=((__POINTER )(NULL));
+                    result__CIHH=((__POINTER *)ptr_table__BIHH)[ 0];
+                    if ((result__CIHH == (void *)NULL)) {
+                      result__CIHH=new_lab__MRJ(lab_type__DIHH);
+                      next__AIHH=(void *)((unsigned long)result__CIHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIHH)));
+                      ((__POINTER *)next__AIHH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__BIHH)[ 0]=next__AIHH;
                     } else {
-                      next__M1AH=((__POINTER *)result__O1AH)[ 0];
-                      if ((next__M1AH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O1AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__Q1AH <<  1)) <=  4096)) {
-                          next__M1AH=(void *)((unsigned long)result__O1AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q1AH)));
+                      next__AIHH=((__POINTER *)result__CIHH)[ 0];
+                      if ((next__AIHH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CIHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EIHH <<  1)) <=  4096)) {
+                          next__AIHH=(void *)((unsigned long)result__CIHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIHH)));
                         } else {
-                          next__M1AH=new_lab__ARJ(lab_type__P1AH);
+                          next__AIHH=new_lab__MRJ(lab_type__DIHH);
                         };
-                        ((__POINTER *)next__M1AH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__N1AH)[ 0]=next__M1AH;
+                        ((__POINTER *)next__AIHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BIHH)[ 0]=next__AIHH;
                       } else {
-                        ((__POINTER *)result__O1AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__O1AH=next__M1AH;
+                        ((__POINTER *)result__CIHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AIHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__CIHH=next__AIHH;
                       };
                     };
-                    ptr__SX5G=result__O1AH;
+                    ptr__4DGH=result__CIHH;
                   };
-                  result__RX5G=((__ITM_TYPE_PARAMETER *)ptr__SX5G);
-                  *(result__RX5G) = *(ITM_TYPE_PARAMETER__);
+                  result__3DGH=((__ITM_TYPE_PARAMETER *)ptr__4DGH);
+                  *(result__3DGH) = *(ITM_TYPE_PARAMETER__);
                 };
-                Self__ZX5G=((__ITM_TYPE_PARAMETER *)result__RX5G);
-                Self__ZX5G->parent_itm_type__RDE.name__4XP=n__0X3G;
-                fast_put__to__HOZ(dico__GTI,Self__ZX5G,n__0X3G);
-                result__1X3G=result__RX5G;
+                Self__FEGH=((__ITM_TYPE_PARAMETER *)result__3DGH);
+                Self__FEGH->parent_itm_type__3DE.name__KYP=n__JDEH;
+                fast_put__to__TOZ(dico__STI,Self__FEGH,n__JDEH);
+                result__KDEH=result__3DGH;
               };
-              if (result__1X3G==NULL) {
-                __tmp__SKE=NULL;
+              if (result__KDEH==NULL) {
+                __tmp__4KE=NULL;
               } else {
-                switch (((struct ___OBJ *)result__1X3G)->__id) {
+                switch (((struct ___OBJ *)result__KDEH)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__SKE=((void *)result__1X3G);
+                  __tmp__4KE=((void *)result__KDEH);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__SKE=NULL;
+                  __tmp__4KE=NULL;
                 } break;
                 }
               };
-              res__QIE=__tmp__SKE;
+              res__2IE=__tmp__4KE;
             };
           };
-          if (((void *)res__QIE == (void *)NULL)) {
-            pos__3GQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_247));
-            put_position__IOG(pos__3GQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if (((void *)res__2IE == (void *)NULL)) {
+            pos__NZVG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_257));
+            put_position__UOG(pos__NZVG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__GBBC(((__PROTOTYPE *)object__3AC)->idf_generic_list__IME,res__QIE);
-          while_do__OWK:
+          add_last__SBBC(((__PROTOTYPE *)object__JBC)->idf_generic_list__UME,res__2IE);
+          while_do__0WK:
           {
-            result__R1AH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__R1AH=FALSE__;
+            result__FIHH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__FIHH=FALSE__;
             } else {
-              result__S1AH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__S1AH=((__CHARACTER )(( 0)));
+              result__GIHH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__GIHH=((__CHARACTER )(( 0)));
               } else {
-                result__S1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__GIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__S1AH == ',')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__R1AH=TRUE__;
+              if ((result__GIHH == ',')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__FIHH=TRUE__;
               };
             };
-            if (result__R1AH) {
-              res__QIE=NULL;
-              __tmp__SIE=read_identifier__55K();
-              if (__tmp__SIE) {
-                result__U1AH=FALSE__;
-                if ((! read_space__RRD())) {
-                  result__U1AH=FALSE__;
+            if (result__FIHH) {
+              res__2IE=NULL;
+              __tmp__4IE=read_identifier__LAL();
+              if (__tmp__4IE) {
+                result__IIHH=FALSE__;
+                if ((! read_space__3RD())) {
+                  result__IIHH=FALSE__;
                 } else {
-                  result__V1AH='\0';
-                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                    result__V1AH=((__CHARACTER )(( 0)));
+                  result__JIHH='\0';
+                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                    result__JIHH=((__CHARACTER )(( 0)));
                   } else {
-                    result__V1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                    result__JIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                   };
-                  if ((result__V1AH == ':')) {
-                    position__GBC=(__INTEGER)(position__GBC +  1);
-                    result__U1AH=TRUE__;
+                  if ((result__JIHH == ':')) {
+                    position__SBC=(__INTEGER)(position__SBC +  1);
+                    result__IIHH=TRUE__;
                   };
                 };
-                if ((! result__U1AH)) {
-                  pos__5GQG=current_position__3WF();
-                  put_error__text__4MG( 2,(&__string_244));
-                  put_position__IOG(pos__5GQG);
-                  put_string__I1F(msg_err__DNG);
-                  if ((type_error__CNG !=  2)) {
+                if ((! result__IIHH)) {
+                  pos__PZVG=current_position__JXF();
+                  put_error__text__KNG( 2,(&__string_254));
+                  put_position__UOG(pos__PZVG);
+                  put_string__U1F(msg_err__PNG);
+                  if ((type_error__ONG !=  2)) {
                     exit(( 1));
                   };
                 };
-                __tmp__CJE=((void *)read_type__XBM(PARSER__,TRUE__) == (void *)NULL);
-                if (__tmp__CJE) {
-                  pos__BHQG=current_position__3WF();
-                  put_error__text__4MG( 0,(&__string_245));
-                  put_position__IOG(pos__BHQG);
-                  put_string__I1F(msg_err__DNG);
-                  if ((type_error__CNG !=  2)) {
+                __tmp__OJE=((void *)read_type__DCM(PARSER__,TRUE__) == (void *)NULL);
+                if (__tmp__OJE) {
+                  pos__RZVG=current_position__JXF();
+                  put_error__text__KNG( 0,(&__string_255));
+                  put_position__UOG(pos__RZVG);
+                  put_string__U1F(msg_err__PNG);
+                  if ((type_error__ONG !=  2)) {
                     exit(( 1));
                   };
                 };
-                pos__AOUG=current_position__3WF();
-                put_error__text__4MG( 1,(&__string_246));
-                put_position__IOG(pos__AOUG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+                pos__HC0G=current_position__JXF();
+                put_error__text__KNG( 1,(&__string_256));
+                put_position__UOG(pos__HC0G);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
-                __tmp__QJE=TRUE__;
+                __tmp__2JE=TRUE__;
               } else {
-                __tmp__QJE=FALSE__;
+                __tmp__2JE=FALSE__;
               };
-              if ((! __tmp__QJE)) {
-                result__JSL=read_cap_identifier__GZJ();
-                if (result__JSL) {
-                  __tmp__4JE=is_parameter_type__2JE;
-                  if ((! __tmp__4JE)) {
-                    pos__DHQG=current_position__3WF();
-                    put_error__text__4MG( 0,(&__string_247));
-                    put_position__IOG(pos__DHQG);
-                    put_string__I1F(msg_err__DNG);
-                    if ((type_error__CNG !=  2)) {
+              if ((! __tmp__2JE)) {
+                result__VSL=read_cap_identifier__SZJ();
+                if (result__VSL) {
+                  __tmp__KKE=is_parameter_type__IKE;
+                  if ((! __tmp__KKE)) {
+                    pos__TZVG=current_position__JXF();
+                    put_error__text__KNG( 0,(&__string_257));
+                    put_position__UOG(pos__TZVG);
+                    put_string__U1F(msg_err__PNG);
+                    if ((type_error__ONG !=  2)) {
                       exit(( 1));
                     };
                   };
-                  __tmp__JKE=position__GBC;
-                  __tmp__LKE=((__STRING_CONSTANT *)last_string__2ZC)->count__DD;
-                  __tmp__NKE=(__INTEGER)(__tmp__JKE - __tmp__LKE);
-                  short__token__to__5AD((&__string_126),__tmp__NKE,position__GBC);
-                  n__UPGB=last_string__2ZC;
-                  result__2PGB=fast_reference_at__M1T(dico__GTI,n__UPGB);
-                  if (((void *)result__2PGB == (void *)NULL)) {
-                    result__1X5G=NULL;
-                    ptr__2X5G=((__POINTER )(NULL));
-                    typ_id__3X5G= 0;
-                    sz__4X5G=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-                    if ((sz__4X5G ==  0)) {
-                      result__1X5G=ITM_TYPE_PARAMETER__;
+                  __tmp__VKE=position__SBC;
+                  __tmp__XKE=((__STRING_CONSTANT *)last_string__I0C)->count__DD;
+                  __tmp__ZKE=(__INTEGER)(__tmp__VKE - __tmp__XKE);
+                  short__token__to__LBD((&__string_126),__tmp__ZKE,position__SBC);
+                  n__AQGB=last_string__I0C;
+                  result__IQGB=fast_reference_at__Y1T(dico__STI,n__AQGB);
+                  if (((void *)result__IQGB == (void *)NULL)) {
+                    result__HEGH=NULL;
+                    ptr__IEGH=((__POINTER )(NULL));
+                    typ_id__JEGH= 0;
+                    sz__KEGH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                    if ((sz__KEGH ==  0)) {
+                      result__HEGH=ITM_TYPE_PARAMETER__;
                     } else {
-                      typ_id__3X5G=-1;
-                      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__4X5G);
-                      if ((typ_id__3X5G == (__INTEGER)(-  1))) {
-                        a__5X5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                        new_size__AY5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4X5G + a__5X5G) & (__UINTEGER_32)(~ a__5X5G));
-                        ptr_table__Y1AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AY5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                        next__X1AH=((__POINTER )(NULL));
-                        result__Z1AH=((__POINTER *)ptr_table__Y1AH)[ 0];
-                        if ((result__Z1AH == (void *)NULL)) {
-                          result__Z1AH=new_lab__ARJ(new_size__AY5G);
-                          next__X1AH=(void *)((unsigned long)result__Z1AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AY5G)));
-                          ((__POINTER *)next__X1AH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__Y1AH)[ 0]=next__X1AH;
+                      typ_id__JEGH=-1;
+                      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KEGH);
+                      if ((typ_id__JEGH == (__INTEGER)(-  1))) {
+                        a__LEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__MEGH=(__UINTEGER_32)((__UINTEGER_32)(sz__KEGH + a__LEGH) & (__UINTEGER_32)(~ a__LEGH));
+                        ptr_table__MIHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MEGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                        next__LIHH=((__POINTER )(NULL));
+                        result__NIHH=((__POINTER *)ptr_table__MIHH)[ 0];
+                        if ((result__NIHH == (void *)NULL)) {
+                          result__NIHH=new_lab__MRJ(new_size__MEGH);
+                          next__LIHH=(void *)((unsigned long)result__NIHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEGH)));
+                          ((__POINTER *)next__LIHH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__MIHH)[ 0]=next__LIHH;
                         } else {
-                          next__X1AH=((__POINTER *)result__Z1AH)[ 0];
-                          if ((next__X1AH == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z1AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AY5G <<  1)) <=  4096)) {
-                              next__X1AH=(void *)((unsigned long)result__Z1AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AY5G)));
+                          next__LIHH=((__POINTER *)result__NIHH)[ 0];
+                          if ((next__LIHH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NIHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MEGH <<  1)) <=  4096)) {
+                              next__LIHH=(void *)((unsigned long)result__NIHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEGH)));
                             } else {
-                              next__X1AH=new_lab__ARJ(new_size__AY5G);
+                              next__LIHH=new_lab__MRJ(new_size__MEGH);
                             };
-                            ((__POINTER *)next__X1AH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__Y1AH)[ 0]=next__X1AH;
+                            ((__POINTER *)next__LIHH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__MIHH)[ 0]=next__LIHH;
                           } else {
-                            ((__POINTER *)result__Z1AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X1AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__Z1AH=next__X1AH;
+                            ((__POINTER *)result__NIHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LIHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__NIHH=next__LIHH;
                           };
                         };
-                        ptr__2X5G=result__Z1AH;
+                        ptr__IEGH=result__NIHH;
                       } else {
-                        t__BY5G=((__UINTEGER_32 )typ_id__3X5G);
-                        a__CY5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                        new_size__A2AH=(__UINTEGER_32)((__UINTEGER_32)(sz__4X5G + a__CY5G) & (__UINTEGER_32)(~ a__CY5G));
-                        ptr_table__31AH=((__POINTER )(&(table_type[(t__BY5G)])));
-                        lab_type__51AH=(__UINTEGER_32)(t__BY5G |  1);
-                        next__21AH=((__POINTER )(NULL));
-                        result__41AH=((__POINTER *)ptr_table__31AH)[ 0];
-                        if ((result__41AH == (void *)NULL)) {
-                          result__41AH=new_lab__ARJ(lab_type__51AH);
-                          next__21AH=(void *)((unsigned long)result__41AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2AH)));
-                          ((__POINTER *)next__21AH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__31AH)[ 0]=next__21AH;
+                        t__NEGH=((__UINTEGER_32 )typ_id__JEGH);
+                        a__OEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__UIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__KEGH + a__OEGH) & (__UINTEGER_32)(~ a__OEGH));
+                        ptr_table__RIHH=((__POINTER )(&(table_type[(t__NEGH)])));
+                        lab_type__TIHH=(__UINTEGER_32)(t__NEGH |  1);
+                        next__QIHH=((__POINTER )(NULL));
+                        result__SIHH=((__POINTER *)ptr_table__RIHH)[ 0];
+                        if ((result__SIHH == (void *)NULL)) {
+                          result__SIHH=new_lab__MRJ(lab_type__TIHH);
+                          next__QIHH=(void *)((unsigned long)result__SIHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UIHH)));
+                          ((__POINTER *)next__QIHH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__RIHH)[ 0]=next__QIHH;
                         } else {
-                          next__21AH=((__POINTER *)result__41AH)[ 0];
-                          if ((next__21AH == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__41AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__A2AH <<  1)) <=  4096)) {
-                              next__21AH=(void *)((unsigned long)result__41AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2AH)));
+                          next__QIHH=((__POINTER *)result__SIHH)[ 0];
+                          if ((next__QIHH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SIHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UIHH <<  1)) <=  4096)) {
+                              next__QIHH=(void *)((unsigned long)result__SIHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UIHH)));
                             } else {
-                              next__21AH=new_lab__ARJ(lab_type__51AH);
+                              next__QIHH=new_lab__MRJ(lab_type__TIHH);
                             };
-                            ((__POINTER *)next__21AH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__31AH)[ 0]=next__21AH;
+                            ((__POINTER *)next__QIHH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__RIHH)[ 0]=next__QIHH;
                           } else {
-                            ((__POINTER *)result__41AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__41AH=next__21AH;
+                            ((__POINTER *)result__SIHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QIHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__SIHH=next__QIHH;
                           };
                         };
-                        ptr__2X5G=result__41AH;
+                        ptr__IEGH=result__SIHH;
                       };
-                      result__1X5G=((__ITM_TYPE_PARAMETER *)ptr__2X5G);
-                      *(result__1X5G) = *(ITM_TYPE_PARAMETER__);
+                      result__HEGH=((__ITM_TYPE_PARAMETER *)ptr__IEGH);
+                      *(result__HEGH) = *(ITM_TYPE_PARAMETER__);
                     };
-                    Self__DY5G=((__ITM_TYPE_PARAMETER *)result__1X5G);
-                    Self__DY5G->parent_itm_type__RDE.name__4XP=n__UPGB;
-                    fast_put__to__HOZ(dico__GTI,Self__DY5G,n__UPGB);
-                    result__2PGB=result__1X5G;
+                    Self__PEGH=((__ITM_TYPE_PARAMETER *)result__HEGH);
+                    Self__PEGH->parent_itm_type__3DE.name__KYP=n__AQGB;
+                    fast_put__to__TOZ(dico__STI,Self__PEGH,n__AQGB);
+                    result__IQGB=result__HEGH;
                   };
-                  if (result__2PGB==NULL) {
-                    __tmp__SKE=NULL;
+                  if (result__IQGB==NULL) {
+                    __tmp__4KE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__2PGB)->__id) {
+                    switch (((struct ___OBJ *)result__IQGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__SKE=((void *)result__2PGB);
+                      __tmp__4KE=((void *)result__IQGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__SKE=NULL;
+                      __tmp__4KE=NULL;
                     } break;
                     }
                   };
-                  res__QIE=__tmp__SKE;
+                  res__2IE=__tmp__4KE;
                 };
               };
-              if (((void *)res__QIE == (void *)NULL)) {
-                pos__FHQG=current_position__3WF();
-                put_error__text__4MG( 0,(&__string_247));
-                put_position__IOG(pos__FHQG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+              if (((void *)res__2IE == (void *)NULL)) {
+                pos__VZVG=current_position__JXF();
+                put_error__text__KNG( 0,(&__string_257));
+                put_position__UOG(pos__VZVG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
-              add_last__GBBC(((__PROTOTYPE *)object__3AC)->idf_generic_list__IME,res__QIE);
-              goto while_do__OWK;
+              add_last__SBBC(((__PROTOTYPE *)object__JBC)->idf_generic_list__UME,res__2IE);
+              goto while_do__0WK;
             };
           };
-          result__B2AH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__B2AH=FALSE__;
+          result__VIHH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__VIHH=FALSE__;
           } else {
-            result__C2AH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__C2AH=((__CHARACTER )(( 0)));
+            result__WIHH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__WIHH=((__CHARACTER )(( 0)));
             } else {
-              result__C2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__WIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__C2AH == ')')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__B2AH=TRUE__;
+            if ((result__WIHH == ')')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__VIHH=TRUE__;
             };
           };
-          if ((! result__B2AH)) {
-            pos__HHQG=current_position__3WF();
-            put_error__text__4MG( 2,(&__string_248));
-            put_position__IOG(pos__HHQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if ((! result__VIHH)) {
+            pos__XZVG=current_position__JXF();
+            put_error__text__KNG( 2,(&__string_258));
+            put_position__UOG(pos__XZVG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          if (((! is_shorter__WY) && (! is_shorter2__VI))) {
-            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__3AC)->idf_generic_list__IME)->parent_arrayed_collection__HME.upper__KBBC +  1) !=  0)) {
-              pos__JHQG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_249));
-              put_position__IOG(pos__JHQG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+          if (((! is_shorter__5Y) && (! is_shorter2__VI))) {
+            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__JBC)->idf_generic_list__UME)->parent_arrayed_collection__TME.upper__WBBC +  1) !=  0)) {
+              pos__ZZVG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_259));
+              put_position__UOG(pos__ZZVG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        pos__LHQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_250));
-        put_position__IOG(pos__LHQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+        pos__1ZVG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_260));
+        put_position__UOG(pos__1ZVG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      __tmp__3OE=TRUE__;
+      __tmp__JPE=TRUE__;
     } else {
-      __tmp__3OE=FALSE__;
+      __tmp__JPE=FALSE__;
     };
-    if (__tmp__3OE) {
-      __tmp__DRE=TRUE__;
+    if (__tmp__JPE) {
+      __tmp__PRE=TRUE__;
     } else {
-      __tmp__PPE=(read_word__EPF((&__string_63)) || read_word__EPF((&__string_64)));
-      if (__tmp__PPE) {
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__NHQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__NHQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      __tmp__1PE=(read_word__QPF((&__string_63)) || read_word__QPF((&__string_64)));
+      if (__tmp__1PE) {
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__3ZVG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__3ZVG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if (((void *)read_type_list__2LO(PARSER__,FALSE__) == (void *)NULL)) {
-          pos__PHQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_251));
-          put_position__IOG(pos__PHQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (((void *)read_type_list__IMO(PARSER__,FALSE__) == (void *)NULL)) {
+          pos__5ZVG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_261));
+          put_position__UOG(pos__5ZVG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__DRE=__tmp__PPE;
+      __tmp__PRE=__tmp__1PE;
     };
-    if (__tmp__DRE) {
-      __tmp__ZSE=TRUE__;
+    if (__tmp__PRE) {
+      __tmp__FTE=TRUE__;
     } else {
-      result__U4G=read_word__EPF((&__string_65));
-      if (result__U4G) {
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__RHQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__RHQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      result__A5G=read_word__QPF((&__string_65));
+      if (result__A5G) {
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__B0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__B0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_external__USO())) {
-          pos__THQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_252));
-          put_position__IOG(pos__THQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! read_external__ATO())) {
+          pos__D0VG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_262));
+          put_position__UOG(pos__D0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        append__VNS(output_decl__RFE,(&__string_253));
-        append__VNS(output_decl__RFE,((__PROTOTYPE *)object__3AC)->parent_named__5.name__LI);
-        add_last__NLT(output_decl__RFE,'\n');
-        append__VNS(output_decl__RFE,last_string__2ZC);
-        add_last__NLT(output_decl__RFE,'\n');
+        append__BOS(output_decl__3FE,(&__string_263));
+        append__BOS(output_decl__3FE,((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI);
+        add_last__ZLT(output_decl__3FE,'\n');
+        append__BOS(output_decl__3FE,last_string__I0C);
+        add_last__ZLT(output_decl__3FE,'\n');
       };
-      __tmp__ZSE=result__U4G;
+      __tmp__FTE=result__A5G;
     };
-    if (__tmp__ZSE) {
-      __tmp__VUE=TRUE__;
+    if (__tmp__FTE) {
+      __tmp__BVE=TRUE__;
     } else {
-      result__G5G=read_word__EPF((&__string_66));
-      if (result__G5G) {
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__VHQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__VHQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      result__S5G=read_word__QPF((&__string_66));
+      if (result__S5G) {
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__F0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__F0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        v__MDE=read_expr_primary__23M(PARSER__);
-        if (((void *)v__MDE == (void *)NULL)) {
-          pos__XHQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_254));
-          put_position__IOG(pos__XHQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        v__YDE=read_expr_primary__I4M(PARSER__);
+        if (((void *)v__YDE == (void *)NULL)) {
+          pos__H0VG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_264));
+          put_position__UOG(pos__H0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if (((void *)((__PROTOTYPE *)object__3AC)->default_value__HUE != (void *)NULL)) {
-          pos__COUG=current_position__3WF();
-          put_error__text__4MG( 1,(&__string_255));
-          put_position__IOG(pos__COUG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (((void *)((__PROTOTYPE *)object__JBC)->default_value__TUE != (void *)NULL)) {
+          pos__JC0G=current_position__JXF();
+          put_error__text__KNG( 1,(&__string_265));
+          put_position__UOG(pos__JC0G);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__3AC)->default_value__HUE=v__MDE;
+        ((__PROTOTYPE *)object__JBC)->default_value__TUE=v__YDE;
       };
-      __tmp__VUE=result__G5G;
+      __tmp__BVE=result__S5G;
     };
-    if (__tmp__VUE) {
-      __tmp__RWE=TRUE__;
+    if (__tmp__BVE) {
+      __tmp__3WE=TRUE__;
     } else {
-      result__Y5G=read_word__EPF((&__string_67));
-      if (result__Y5G) {
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__ZHQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__ZHQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      result__EAH=read_word__QPF((&__string_67));
+      if (result__EAH) {
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__J0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__J0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_external__USO())) {
-          pos__1HQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_252));
-          put_position__IOG(pos__1HQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! read_external__ATO())) {
+          pos__L0VG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_262));
+          put_position__UOG(pos__L0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if (((void *)((__PROTOTYPE *)object__3AC)->type_c__CWE != (void *)NULL)) {
-          pos__WIM=current_position__3WF();
-          put_error__text__4MG( 1,(&__string_256));
-          put_position__IOG(pos__WIM);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (((void *)((__PROTOTYPE *)object__JBC)->type_c__OWE != (void *)NULL)) {
+          pos__CJM=current_position__JXF();
+          put_error__text__KNG( 1,(&__string_266));
+          put_position__UOG(pos__CJM);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__3AC)->type_c__CWE=last_string__2ZC;
+        ((__PROTOTYPE *)object__JBC)->type_c__OWE=last_string__I0C;
       };
-      __tmp__RWE=result__Y5G;
+      __tmp__3WE=result__EAH;
     };
-    if (__tmp__RWE) {
-      __tmp__4XE=TRUE__;
+    if (__tmp__3WE) {
+      __tmp__KYE=TRUE__;
     } else {
-      result__KAH=read_word__EPF((&__string_68));
-      if (result__KAH) {
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__3HQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__3HQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      result__WAH=read_word__QPF((&__string_68));
+      if (result__WAH) {
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__N0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__N0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_integer__U1P())) {
-          pos__5HQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_257));
-          put_position__IOG(pos__5HQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! read_integer__A2P())) {
+          pos__P0VG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_267));
+          put_position__UOG(pos__P0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__4XE=result__KAH;
+      __tmp__KYE=result__WAH;
     };
-    if (__tmp__4XE) {
-      __tmp__E0E=TRUE__;
+    if (__tmp__KYE) {
+      __tmp__Q0E=TRUE__;
     } else {
-      result__2AH=read_word__EPF((&__string_88));
-      if (result__2AH) {
-        if ((! read_symbol__XWJ((&__string_14)))) {
-          pos__BIQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_258));
-          put_position__IOG(pos__BIQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      result__IBH=read_word__QPF((&__string_88));
+      if (result__IBH) {
+        if ((! read_symbol__DXJ((&__string_14)))) {
+          pos__R0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_268));
+          put_position__UOG(pos__R0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__E2AH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__E2AH=FALSE__;
+        result__YIHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__YIHH=FALSE__;
         } else {
-          result__F2AH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__F2AH=((__CHARACTER )(( 0)));
+          result__ZIHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__ZIHH=((__CHARACTER )(( 0)));
           } else {
-            result__F2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__ZIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__F2AH == '(')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__E2AH=TRUE__;
+          if ((result__ZIHH == '(')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__YIHH=TRUE__;
           };
         };
-        if ((! result__E2AH)) {
-          pos__DIQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_259));
-          put_position__IOG(pos__DIQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__YIHH)) {
+          pos__T0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_269));
+          put_position__UOG(pos__T0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__AGFB:
+        while_do__MGFB:
         {
-          instr__UDE=readlip_expr__3SPB();
-          if (((void *)instr__UDE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__UDE)->__id) {
+          instr__AEE=readlip_expr__JTPB();
+          if (((void *)instr__AEE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__AEE)->__id) {
             case __LIP_AFFECT__: {
-              run__EGFC(instr__UDE);
+              run__QGFC(instr__AEE);
             } break;
             case __LIP_BINARY__: {
-              __tmp__JCQD=((__LIP_BINARY *)instr__UDE)->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ;
-              put_error__text__4MG( 2,(&__string_260));
-              put_position__IOG(__tmp__JCQD);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+              __tmp__VCQD=((__LIP_BINARY *)instr__AEE)->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
+              put_error__text__KNG( 2,(&__string_270));
+              put_position__UOG(__tmp__VCQD);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __tmp__OCQD=((__LIP_UNARY *)instr__UDE)->parent_lip_code__504B.parent_itm_object__TDE.position__BDJ;
-              put_error__text__4MG( 2,(&__string_260));
-              put_position__IOG(__tmp__OCQD);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+              __tmp__0CQD=((__LIP_UNARY *)instr__AEE)->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
+              put_error__text__KNG( 2,(&__string_270));
+              put_position__UOG(__tmp__0CQD);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__FNTE(instr__UDE);
+              run__50TE(instr__AEE);
             } break;
             case __LIP_IF__: {
-              run__QCQD(instr__UDE);
+              run__2CQD(instr__AEE);
             } break;
             case __LIP_PRINT__: {
-              run__ZRTE(instr__UDE);
+              run__T5TE(instr__AEE);
             } break;
             case __LIP_VALUE__: {
-              __tmp__EOUG=((__LIP_VALUE *)instr__UDE)->parent_lip_code__RWEE.parent_itm_object__TDE.position__BDJ;
-              put_error__text__4MG( 2,(&__string_260));
-              put_position__IOG(__tmp__EOUG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+              __tmp__LC0G=((__LIP_VALUE *)instr__AEE)->parent_lip_code__0DFE.parent_itm_object__5DE.position__NDJ;
+              put_error__text__KNG( 2,(&__string_270));
+              put_position__UOG(__tmp__LC0G);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             } break;
             };
-            result__H2AH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__H2AH=FALSE__;
+            result__1IHH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__1IHH=FALSE__;
             } else {
-              result__I2AH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__I2AH=((__CHARACTER )(( 0)));
+              result__2IHH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__2IHH=((__CHARACTER )(( 0)));
               } else {
-                result__I2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__2IHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__I2AH == ';')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__H2AH=TRUE__;
+              if ((result__2IHH == ';')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__1IHH=TRUE__;
               };
             };
-            if ((! result__H2AH)) {
-              pos__FIQG=current_position__3WF();
-              put_error__text__4MG( 2,(&__string_160));
-              put_position__IOG(pos__FIQG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+            if ((! result__1IHH)) {
+              pos__V0VG=current_position__JXF();
+              put_error__text__KNG( 2,(&__string_163));
+              put_position__UOG(pos__V0VG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__AGFB;
+            goto while_do__MGFB;
           };
         };
-        result__K2AH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__K2AH=FALSE__;
+        result__4IHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__4IHH=FALSE__;
         } else {
-          result__L2AH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__L2AH=((__CHARACTER )(( 0)));
+          result__5IHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__5IHH=((__CHARACTER )(( 0)));
           } else {
-            result__L2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__5IHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__L2AH == ')')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__K2AH=TRUE__;
+          if ((result__5IHH == ')')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__4IHH=TRUE__;
           };
         };
-        if ((! result__K2AH)) {
-          pos__HIQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_225));
-          put_position__IOG(pos__HIQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__4IHH)) {
+          pos__X0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_235));
+          put_position__UOG(pos__X0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__E0E=result__2AH;
+      __tmp__Q0E=result__IBH;
     };
-    if ((! __tmp__E0E)) {
-      if (((((((read_word__EPF((&__string_69)) || read_word__EPF((&__string_70))) || read_word__EPF((&__string_71))) || read_word__EPF((&__string_72))) || read_word__EPF((&__string_73))) || read_word__EPF((&__string_74))) || read_word__EPF((&__string_75)))) {
-        short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        if ((! read_symbol__XWJ((&__string_12)))) {
-          pos__JIQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_240));
-          put_position__IOG(pos__JIQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+    if ((! __tmp__Q0E)) {
+      if (((((((read_word__QPF((&__string_69)) || read_word__QPF((&__string_70))) || read_word__QPF((&__string_71))) || read_word__QPF((&__string_72))) || read_word__QPF((&__string_73))) || read_word__QPF((&__string_74))) || read_word__QPF((&__string_75)))) {
+        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        if ((! read_symbol__DXJ((&__string_12)))) {
+          pos__Z0VG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_250));
+          put_position__UOG(pos__Z0VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_string__5EQ())) {
-          pos__LIQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_261));
-          put_position__IOG(pos__LIQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! read_string__LFQ())) {
+          pos__10VG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_271));
+          put_position__UOG(pos__10VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        pos__NIQG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_262));
-        put_position__IOG(pos__NIQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+        pos__30VG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_272));
+        put_position__UOG(pos__30VG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__N2AH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__N2AH=FALSE__;
+    result__BJHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__BJHH=FALSE__;
     } else {
-      result__O2AH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__O2AH=((__CHARACTER )(( 0)));
+      result__CJHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__CJHH=((__CHARACTER )(( 0)));
       } else {
-        result__O2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__CJHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__O2AH == ';')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__N2AH=TRUE__;
+      if ((result__CJHH == ';')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__BJHH=TRUE__;
       };
     };
-    if ((! result__N2AH)) {
-      pos__PIQG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_229));
-      put_position__IOG(pos__PIQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    if ((! result__BJHH)) {
+      pos__50VG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_239));
+      put_position__UOG(pos__50VG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__KDE);
+  return(result__WDE);
 }
 
-static void* get_name__OUOB(void *n__QUOB)
+static void* get_name__0UOB(void *n__2UOB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__POEC,*result__SUOB;
-  __STRING_CONSTANT *Self__GY5G,*Self__LY5G,*Self__QY5G;
-  __INTEGER result__FY5G,__tmp__HY5G,Self__IY5G,typ_id__P4YB;
-  __INTEGER result__KY5G,__tmp__MY5G,Self__NY5G,idx__RXFC,idx__K2HD;
-  __INTEGER new_capacity__L2HD,i__M2HD,result__PY5G,__tmp__RY5G;
-  __INTEGER Self__SY5G,typ_id__Z4HD;
-  __SECTION_ *result__J4YB;
-  __POINTER ptr__K4YB,ptr_table__R2AH,next__Q2AH,result__S2AH;
-  __POINTER ptr_table__W2AH,next__V2AH,result__X2AH,ptr__U4HD;
-  __POINTER ptr_table__12AH,next__02AH,result__22AH,ptr_table__A3AH;
-  __POINTER next__52AH,result__B3AH;
-  __UINTEGER_32 sz__M4YB,a__A03G,new_size__B03G,t__F03G,a__E03G;
-  __UINTEGER_32 new_size__Z2AH,lab_type__Y2AH,sz__W4HD,a__QY3G;
-  __UINTEGER_32 new_size__RY3G,t__VY3G,a__UY3G,new_size__D3AH;
-  __UINTEGER_32 lab_type__C3AH;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__DOEC,*Self__HXFC;
-  void *node__OOEC,*node__SXFC,*node1__O2HD,*node2__P2HD,*__tmp__AZFC;
-  void **old_buckets__N2HD;
-  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__T4HD;
-  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__4CTD;
-  Self__DOEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__XUOB);
-  result__POEC=NULL;
-  Self__GY5G=((__STRING_CONSTANT *)n__QUOB);
-  result__FY5G= 0;
-  __tmp__HY5G=Self__GY5G->count__DD;
-  Self__IY5G= 1;
-  while ((Self__IY5G <= __tmp__HY5G)) {
-    result__FY5G=(__INTEGER)((__INTEGER)( 5 * result__FY5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GY5G->storage__JQO)[(__INTEGER)(Self__IY5G -  1)])));
-    Self__IY5G=(__INTEGER)(Self__IY5G +  1);
-  };
-  if ((result__FY5G <  0)) {
-    result__FY5G=(__INTEGER)(~ result__FY5G);
-  };
-  node__OOEC=((void **)Self__DOEC->buckets__WOEC)[(__INTEGER)(result__FY5G % Self__DOEC->capacity__ROEC)];
-  while ((! (((void *)node__OOEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__OOEC)->key__CPEC == (void *)n__QUOB)))) {
-    node__OOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__OOEC)->next__NPEC;
-  };
-  if (((void *)node__OOEC != (void *)NULL)) {
-    result__POEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__OOEC)->item__VPEC;
-  };
-  result__SUOB=result__POEC;
-  if (((void *)result__POEC == (void *)NULL)) {
-    result__J4YB=NULL;
-    ptr__K4YB=((__POINTER )(NULL));
-    typ_id__P4YB= 0;
-    sz__M4YB=((__UINTEGER_32 )sizeof(__SECTION_));
-    if ((sz__M4YB ==  0)) {
-      result__J4YB=SECTION___;
-    } else {
-      typ_id__P4YB=__SECTION___;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M4YB);
-      if ((typ_id__P4YB == (__INTEGER)(-  1))) {
-        a__A03G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__B03G=(__UINTEGER_32)((__UINTEGER_32)(sz__M4YB + a__A03G) & (__UINTEGER_32)(~ a__A03G));
-        ptr_table__R2AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B03G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__Q2AH=((__POINTER )(NULL));
-        result__S2AH=((__POINTER *)ptr_table__R2AH)[ 0];
-        if ((result__S2AH == (void *)NULL)) {
-          result__S2AH=new_lab__ARJ(new_size__B03G);
-          next__Q2AH=(void *)((unsigned long)result__S2AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B03G)));
-          ((__POINTER *)next__Q2AH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__R2AH)[ 0]=next__Q2AH;
-        } else {
-          next__Q2AH=((__POINTER *)result__S2AH)[ 0];
-          if ((next__Q2AH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S2AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__B03G <<  1)) <=  4096)) {
-              next__Q2AH=(void *)((unsigned long)result__S2AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B03G)));
+  void *result__1OEC,*result__4UOB;
+  __STRING_CONSTANT *Self__SEGH,*Self__XEGH,*Self__2EGH;
+  __INTEGER result__REGH,__tmp__TEGH,Self__UEGH,typ_id__14YB;
+  __INTEGER result__WEGH,__tmp__YEGH,Self__ZEGH,idx__3XFC,idx__W2HD;
+  __INTEGER new_capacity__X2HD,i__Y2HD,result__1EGH,__tmp__3EGH;
+  __INTEGER Self__4EGH,typ_id__F5HD;
+  __SECTION_ *result__V4YB;
+  __POINTER ptr__W4YB,ptr_table__FJHH,next__EJHH,result__GJHH;
+  __POINTER ptr_table__KJHH,next__JJHH,result__LJHH,ptr__A5HD;
+  __POINTER ptr_table__PJHH,next__OJHH,result__QJHH,ptr_table__UJHH;
+  __POINTER next__TJHH,result__VJHH;
+  __UINTEGER_32 sz__Y4YB,a__PFEH,new_size__QFEH,t__UFEH,a__TFEH;
+  __UINTEGER_32 new_size__NJHH,lab_type__MJHH,sz__C5HD,a__5DEH;
+  __UINTEGER_32 new_size__AEEH,t__EEEH,a__DEEH,new_size__XJHH;
+  __UINTEGER_32 lab_type__WJHH;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__POEC,*Self__TXFC;
+  void *node__0OEC,*node__4XFC,*node1__02HD,*node2__12HD,*__tmp__MZFC;
+  void **old_buckets__Z2HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__54HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__KDTD;
+  Self__POEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__DVOB);
+  result__1OEC=NULL;
+  Self__SEGH=((__STRING_CONSTANT *)n__2UOB);
+  result__REGH= 0;
+  __tmp__TEGH=Self__SEGH->count__DD;
+  Self__UEGH= 1;
+  while ((Self__UEGH <= __tmp__TEGH)) {
+    result__REGH=(__INTEGER)((__INTEGER)( 5 * result__REGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SEGH->storage__VQO)[(__INTEGER)(Self__UEGH -  1)])));
+    Self__UEGH=(__INTEGER)(Self__UEGH +  1);
+  };
+  if ((result__REGH <  0)) {
+    result__REGH=(__INTEGER)(~ result__REGH);
+  };
+  node__0OEC=((void **)Self__POEC->buckets__CPEC)[(__INTEGER)(result__REGH % Self__POEC->capacity__3OEC)];
+  while ((! (((void *)node__0OEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__0OEC)->key__OPEC == (void *)n__2UOB)))) {
+    node__0OEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__0OEC)->next__ZPEC;
+  };
+  if (((void *)node__0OEC != (void *)NULL)) {
+    result__1OEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__0OEC)->item__BQEC;
+  };
+  result__4UOB=result__1OEC;
+  if (((void *)result__1OEC == (void *)NULL)) {
+    result__V4YB=NULL;
+    ptr__W4YB=((__POINTER )(NULL));
+    typ_id__14YB= 0;
+    sz__Y4YB=((__UINTEGER_32 )sizeof(__SECTION_));
+    if ((sz__Y4YB ==  0)) {
+      result__V4YB=SECTION___;
+    } else {
+      typ_id__14YB=__SECTION___;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__Y4YB);
+      if ((typ_id__14YB == (__INTEGER)(-  1))) {
+        a__PFEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QFEH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y4YB + a__PFEH) & (__UINTEGER_32)(~ a__PFEH));
+        ptr_table__FJHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QFEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__EJHH=((__POINTER )(NULL));
+        result__GJHH=((__POINTER *)ptr_table__FJHH)[ 0];
+        if ((result__GJHH == (void *)NULL)) {
+          result__GJHH=new_lab__MRJ(new_size__QFEH);
+          next__EJHH=(void *)((unsigned long)result__GJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFEH)));
+          ((__POINTER *)next__EJHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FJHH)[ 0]=next__EJHH;
+        } else {
+          next__EJHH=((__POINTER *)result__GJHH)[ 0];
+          if ((next__EJHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QFEH <<  1)) <=  4096)) {
+              next__EJHH=(void *)((unsigned long)result__GJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFEH)));
             } else {
-              next__Q2AH=new_lab__ARJ(new_size__B03G);
-            };
-            ((__POINTER *)next__Q2AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__R2AH)[ 0]=next__Q2AH;
-          } else {
-            ((__POINTER *)result__S2AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q2AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__S2AH=next__Q2AH;
-          };
-        };
-        ptr__K4YB=result__S2AH;
-      } else {
-        t__F03G=((__UINTEGER_32 )typ_id__P4YB);
-        a__E03G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__Z2AH=(__UINTEGER_32)((__UINTEGER_32)(sz__M4YB + a__E03G) & (__UINTEGER_32)(~ a__E03G));
-        ptr_table__W2AH=((__POINTER )(&(table_type[(t__F03G)])));
-        lab_type__Y2AH=(__UINTEGER_32)(t__F03G |  1);
-        next__V2AH=((__POINTER )(NULL));
-        result__X2AH=((__POINTER *)ptr_table__W2AH)[ 0];
-        if ((result__X2AH == (void *)NULL)) {
-          result__X2AH=new_lab__ARJ(lab_type__Y2AH);
-          next__V2AH=(void *)((unsigned long)result__X2AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z2AH)));
-          ((__POINTER *)next__V2AH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__W2AH)[ 0]=next__V2AH;
-        } else {
-          next__V2AH=((__POINTER *)result__X2AH)[ 0];
-          if ((next__V2AH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X2AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__Z2AH <<  1)) <=  4096)) {
-              next__V2AH=(void *)((unsigned long)result__X2AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z2AH)));
+              next__EJHH=new_lab__MRJ(new_size__QFEH);
+            };
+            ((__POINTER *)next__EJHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FJHH)[ 0]=next__EJHH;
+          } else {
+            ((__POINTER *)result__GJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GJHH=next__EJHH;
+          };
+        };
+        ptr__W4YB=result__GJHH;
+      } else {
+        t__UFEH=((__UINTEGER_32 )typ_id__14YB);
+        a__TFEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y4YB + a__TFEH) & (__UINTEGER_32)(~ a__TFEH));
+        ptr_table__KJHH=((__POINTER )(&(table_type[(t__UFEH)])));
+        lab_type__MJHH=(__UINTEGER_32)(t__UFEH |  1);
+        next__JJHH=((__POINTER )(NULL));
+        result__LJHH=((__POINTER *)ptr_table__KJHH)[ 0];
+        if ((result__LJHH == (void *)NULL)) {
+          result__LJHH=new_lab__MRJ(lab_type__MJHH);
+          next__JJHH=(void *)((unsigned long)result__LJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJHH)));
+          ((__POINTER *)next__JJHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KJHH)[ 0]=next__JJHH;
+        } else {
+          next__JJHH=((__POINTER *)result__LJHH)[ 0];
+          if ((next__JJHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NJHH <<  1)) <=  4096)) {
+              next__JJHH=(void *)((unsigned long)result__LJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJHH)));
             } else {
-              next__V2AH=new_lab__ARJ(lab_type__Y2AH);
-            };
-            ((__POINTER *)next__V2AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__W2AH)[ 0]=next__V2AH;
-          } else {
-            ((__POINTER *)result__X2AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V2AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__X2AH=next__V2AH;
-          };
-        };
-        ptr__K4YB=result__X2AH;
-      };
-      result__J4YB=((__SECTION_ *)ptr__K4YB);
-      *(result__J4YB) = *(SECTION___);
-    };
-    result__SUOB=result__J4YB;
-    ((__SECTION_ *)result__J4YB)->name__WYDC=n__QUOB;
-    Self__HXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__XUOB);
-    Self__LY5G=((__STRING_CONSTANT *)n__QUOB);
-    result__KY5G= 0;
-    __tmp__MY5G=Self__LY5G->count__DD;
-    Self__NY5G= 1;
-    while ((Self__NY5G <= __tmp__MY5G)) {
-      result__KY5G=(__INTEGER)((__INTEGER)( 5 * result__KY5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LY5G->storage__JQO)[(__INTEGER)(Self__NY5G -  1)])));
-      Self__NY5G=(__INTEGER)(Self__NY5G +  1);
-    };
-    if ((result__KY5G <  0)) {
-      result__KY5G=(__INTEGER)(~ result__KY5G);
-    };
-    idx__RXFC=(__INTEGER)(result__KY5G % Self__HXFC->capacity__ROEC);
-    node__SXFC=((void **)Self__HXFC->buckets__WOEC)[idx__RXFC];
-    while ((! (((void *)node__SXFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__SXFC)->key__CPEC == (void *)n__QUOB)))) {
-      node__SXFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__SXFC)->next__NPEC;
-    };
-    if (((void *)node__SXFC == (void *)NULL)) {
-      if ((Self__HXFC->capacity__ROEC == Self__HXFC->count__TYFC)) {
-        idx__K2HD= 0;
-        node1__O2HD=NULL;
-        node2__P2HD=NULL;
-        old_buckets__N2HD=Self__HXFC->buckets__WOEC;
-        new_capacity__L2HD=prime_number_ceiling__L41((__INTEGER)(Self__HXFC->capacity__ROEC +  1));
-        Self__HXFC->buckets__WOEC=create__R1XC(new_capacity__L2HD);
-        i__M2HD=(__INTEGER)(Self__HXFC->capacity__ROEC -  1);
-        Self__HXFC->capacity__ROEC=new_capacity__L2HD;
-        while ((i__M2HD >=  0)) {
-          node1__O2HD=((void **)old_buckets__N2HD)[i__M2HD];
-          while (((void *)node1__O2HD != (void *)NULL)) {
-            node2__P2HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__O2HD)->next__NPEC;
-            Self__QY5G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__O2HD)->key__CPEC);
-            result__PY5G= 0;
-            __tmp__RY5G=Self__QY5G->count__DD;
-            Self__SY5G= 1;
-            while ((Self__SY5G <= __tmp__RY5G)) {
-              result__PY5G=(__INTEGER)((__INTEGER)( 5 * result__PY5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QY5G->storage__JQO)[(__INTEGER)(Self__SY5G -  1)])));
-              Self__SY5G=(__INTEGER)(Self__SY5G +  1);
-            };
-            if ((result__PY5G <  0)) {
-              result__PY5G=(__INTEGER)(~ result__PY5G);
-            };
-            idx__K2HD=(__INTEGER)(result__PY5G % Self__HXFC->capacity__ROEC);
-            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__O2HD)->next__NPEC=((void **)Self__HXFC->buckets__WOEC)[idx__K2HD];
-            ((void **)Self__HXFC->buckets__WOEC)[idx__K2HD]=node1__O2HD;
-            node1__O2HD=node2__P2HD;
-          };
-          i__M2HD=(__INTEGER)(i__M2HD -  1);
-        };
-        idx__RXFC=(__INTEGER)(result__KY5G % new_capacity__L2HD);
-      };
-      __tmp__AZFC=((void **)Self__HXFC->buckets__WOEC)[idx__RXFC];
-      result__T4HD=NULL;
-      ptr__U4HD=((__POINTER )(NULL));
-      typ_id__Z4HD= 0;
-      sz__W4HD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
-      if ((sz__W4HD ==  0)) {
-        result__T4HD=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
-      } else {
-        typ_id__Z4HD=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__W4HD);
-        if ((typ_id__Z4HD == (__INTEGER)(-  1))) {
-          a__QY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__RY3G=(__UINTEGER_32)((__UINTEGER_32)(sz__W4HD + a__QY3G) & (__UINTEGER_32)(~ a__QY3G));
-          ptr_table__12AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RY3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__02AH=((__POINTER )(NULL));
-          result__22AH=((__POINTER *)ptr_table__12AH)[ 0];
-          if ((result__22AH == (void *)NULL)) {
-            result__22AH=new_lab__ARJ(new_size__RY3G);
-            next__02AH=(void *)((unsigned long)result__22AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RY3G)));
-            ((__POINTER *)next__02AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__12AH)[ 0]=next__02AH;
-          } else {
-            next__02AH=((__POINTER *)result__22AH)[ 0];
-            if ((next__02AH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__22AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RY3G <<  1)) <=  4096)) {
-                next__02AH=(void *)((unsigned long)result__22AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RY3G)));
+              next__JJHH=new_lab__MRJ(lab_type__MJHH);
+            };
+            ((__POINTER *)next__JJHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KJHH)[ 0]=next__JJHH;
+          } else {
+            ((__POINTER *)result__LJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JJHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LJHH=next__JJHH;
+          };
+        };
+        ptr__W4YB=result__LJHH;
+      };
+      result__V4YB=((__SECTION_ *)ptr__W4YB);
+      *(result__V4YB) = *(SECTION___);
+    };
+    result__4UOB=result__V4YB;
+    ((__SECTION_ *)result__V4YB)->name__CZDC=n__2UOB;
+    Self__TXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__DVOB);
+    Self__XEGH=((__STRING_CONSTANT *)n__2UOB);
+    result__WEGH= 0;
+    __tmp__YEGH=Self__XEGH->count__DD;
+    Self__ZEGH= 1;
+    while ((Self__ZEGH <= __tmp__YEGH)) {
+      result__WEGH=(__INTEGER)((__INTEGER)( 5 * result__WEGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__XEGH->storage__VQO)[(__INTEGER)(Self__ZEGH -  1)])));
+      Self__ZEGH=(__INTEGER)(Self__ZEGH +  1);
+    };
+    if ((result__WEGH <  0)) {
+      result__WEGH=(__INTEGER)(~ result__WEGH);
+    };
+    idx__3XFC=(__INTEGER)(result__WEGH % Self__TXFC->capacity__3OEC);
+    node__4XFC=((void **)Self__TXFC->buckets__CPEC)[idx__3XFC];
+    while ((! (((void *)node__4XFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__4XFC)->key__OPEC == (void *)n__2UOB)))) {
+      node__4XFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__4XFC)->next__ZPEC;
+    };
+    if (((void *)node__4XFC == (void *)NULL)) {
+      if ((Self__TXFC->capacity__3OEC == Self__TXFC->count__5YFC)) {
+        idx__W2HD= 0;
+        node1__02HD=NULL;
+        node2__12HD=NULL;
+        old_buckets__Z2HD=Self__TXFC->buckets__CPEC;
+        new_capacity__X2HD=prime_number_ceiling__X41((__INTEGER)(Self__TXFC->capacity__3OEC +  1));
+        Self__TXFC->buckets__CPEC=create__31XC(new_capacity__X2HD);
+        i__Y2HD=(__INTEGER)(Self__TXFC->capacity__3OEC -  1);
+        Self__TXFC->capacity__3OEC=new_capacity__X2HD;
+        while ((i__Y2HD >=  0)) {
+          node1__02HD=((void **)old_buckets__Z2HD)[i__Y2HD];
+          while (((void *)node1__02HD != (void *)NULL)) {
+            node2__12HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__02HD)->next__ZPEC;
+            Self__2EGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__02HD)->key__OPEC);
+            result__1EGH= 0;
+            __tmp__3EGH=Self__2EGH->count__DD;
+            Self__4EGH= 1;
+            while ((Self__4EGH <= __tmp__3EGH)) {
+              result__1EGH=(__INTEGER)((__INTEGER)( 5 * result__1EGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__2EGH->storage__VQO)[(__INTEGER)(Self__4EGH -  1)])));
+              Self__4EGH=(__INTEGER)(Self__4EGH +  1);
+            };
+            if ((result__1EGH <  0)) {
+              result__1EGH=(__INTEGER)(~ result__1EGH);
+            };
+            idx__W2HD=(__INTEGER)(result__1EGH % Self__TXFC->capacity__3OEC);
+            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__02HD)->next__ZPEC=((void **)Self__TXFC->buckets__CPEC)[idx__W2HD];
+            ((void **)Self__TXFC->buckets__CPEC)[idx__W2HD]=node1__02HD;
+            node1__02HD=node2__12HD;
+          };
+          i__Y2HD=(__INTEGER)(i__Y2HD -  1);
+        };
+        idx__3XFC=(__INTEGER)(result__WEGH % new_capacity__X2HD);
+      };
+      __tmp__MZFC=((void **)Self__TXFC->buckets__CPEC)[idx__3XFC];
+      result__54HD=NULL;
+      ptr__A5HD=((__POINTER )(NULL));
+      typ_id__F5HD= 0;
+      sz__C5HD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
+      if ((sz__C5HD ==  0)) {
+        result__54HD=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+      } else {
+        typ_id__F5HD=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__C5HD);
+        if ((typ_id__F5HD == (__INTEGER)(-  1))) {
+          a__5DEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AEEH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5HD + a__5DEH) & (__UINTEGER_32)(~ a__5DEH));
+          ptr_table__PJHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AEEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OJHH=((__POINTER )(NULL));
+          result__QJHH=((__POINTER *)ptr_table__PJHH)[ 0];
+          if ((result__QJHH == (void *)NULL)) {
+            result__QJHH=new_lab__MRJ(new_size__AEEH);
+            next__OJHH=(void *)((unsigned long)result__QJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEEH)));
+            ((__POINTER *)next__OJHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PJHH)[ 0]=next__OJHH;
+          } else {
+            next__OJHH=((__POINTER *)result__QJHH)[ 0];
+            if ((next__OJHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AEEH <<  1)) <=  4096)) {
+                next__OJHH=(void *)((unsigned long)result__QJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEEH)));
               } else {
-                next__02AH=new_lab__ARJ(new_size__RY3G);
+                next__OJHH=new_lab__MRJ(new_size__AEEH);
               };
-              ((__POINTER *)next__02AH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__12AH)[ 0]=next__02AH;
+              ((__POINTER *)next__OJHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PJHH)[ 0]=next__OJHH;
             } else {
-              ((__POINTER *)result__22AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__02AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__22AH=next__02AH;
-            };
-          };
-          ptr__U4HD=result__22AH;
-        } else {
-          t__VY3G=((__UINTEGER_32 )typ_id__Z4HD);
-          a__UY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__D3AH=(__UINTEGER_32)((__UINTEGER_32)(sz__W4HD + a__UY3G) & (__UINTEGER_32)(~ a__UY3G));
-          ptr_table__A3AH=((__POINTER )(&(table_type[(t__VY3G)])));
-          lab_type__C3AH=(__UINTEGER_32)(t__VY3G |  1);
-          next__52AH=((__POINTER )(NULL));
-          result__B3AH=((__POINTER *)ptr_table__A3AH)[ 0];
-          if ((result__B3AH == (void *)NULL)) {
-            result__B3AH=new_lab__ARJ(lab_type__C3AH);
-            next__52AH=(void *)((unsigned long)result__B3AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D3AH)));
-            ((__POINTER *)next__52AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__A3AH)[ 0]=next__52AH;
-          } else {
-            next__52AH=((__POINTER *)result__B3AH)[ 0];
-            if ((next__52AH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B3AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__D3AH <<  1)) <=  4096)) {
-                next__52AH=(void *)((unsigned long)result__B3AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D3AH)));
+              ((__POINTER *)result__QJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OJHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QJHH=next__OJHH;
+            };
+          };
+          ptr__A5HD=result__QJHH;
+        } else {
+          t__EEEH=((__UINTEGER_32 )typ_id__F5HD);
+          a__DEEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5HD + a__DEEH) & (__UINTEGER_32)(~ a__DEEH));
+          ptr_table__UJHH=((__POINTER )(&(table_type[(t__EEEH)])));
+          lab_type__WJHH=(__UINTEGER_32)(t__EEEH |  1);
+          next__TJHH=((__POINTER )(NULL));
+          result__VJHH=((__POINTER *)ptr_table__UJHH)[ 0];
+          if ((result__VJHH == (void *)NULL)) {
+            result__VJHH=new_lab__MRJ(lab_type__WJHH);
+            next__TJHH=(void *)((unsigned long)result__VJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJHH)));
+            ((__POINTER *)next__TJHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UJHH)[ 0]=next__TJHH;
+          } else {
+            next__TJHH=((__POINTER *)result__VJHH)[ 0];
+            if ((next__TJHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XJHH <<  1)) <=  4096)) {
+                next__TJHH=(void *)((unsigned long)result__VJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJHH)));
               } else {
-                next__52AH=new_lab__ARJ(lab_type__C3AH);
+                next__TJHH=new_lab__MRJ(lab_type__WJHH);
               };
-              ((__POINTER *)next__52AH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__A3AH)[ 0]=next__52AH;
+              ((__POINTER *)next__TJHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UJHH)[ 0]=next__TJHH;
             } else {
-              ((__POINTER *)result__B3AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__52AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__B3AH=next__52AH;
+              ((__POINTER *)result__VJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TJHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VJHH=next__TJHH;
             };
           };
-          ptr__U4HD=result__B3AH;
+          ptr__A5HD=result__VJHH;
         };
-        result__T4HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__U4HD);
-        *(result__T4HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__54HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__A5HD);
+        *(result__54HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      Self__4CTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__T4HD);
-      Self__4CTD->item__VPEC=result__J4YB;
-      Self__4CTD->key__CPEC=n__QUOB;
-      Self__4CTD->next__NPEC=__tmp__AZFC;
-      node__SXFC=result__T4HD;
-      ((void **)Self__HXFC->buckets__WOEC)[idx__RXFC]=result__T4HD;
-      Self__HXFC->count__TYFC=(__INTEGER)(Self__HXFC->count__TYFC +  1);
+      Self__KDTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__54HD);
+      Self__KDTD->item__BQEC=result__V4YB;
+      Self__KDTD->key__OPEC=n__2UOB;
+      Self__KDTD->next__ZPEC=__tmp__MZFC;
+      node__4XFC=result__54HD;
+      ((void **)Self__TXFC->buckets__CPEC)[idx__3XFC]=result__54HD;
+      Self__TXFC->count__5YFC=(__INTEGER)(Self__TXFC->count__5YFC +  1);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__SXFC)->item__VPEC=result__J4YB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__4XFC)->item__BQEC=result__V4YB;
     };
   };
-  return(result__SUOB);
+  return(result__4UOB);
 }
 
-static void* read_type_list__2LO(__PARSER *Self__3LO,__BOOLEAN is_section__4LO)
+static void* read_type_list__IMO(__PARSER *Self__JMO,__BOOLEAN is_section__KMO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *ts__CMO,*__tmp__PMO,*__tmp__ZNO;
-  void *t__BMO;
-  __POSITION pos__1KQG,pos__3KQG,pos__5KQG;
-  void *lst__AMO,*result__UY5G;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__VY5G,*Self__WY5G;
-  __BOOLEAN result__E3AH;
-  __CHARACTER result__F3AH;
-  lst__AMO=NULL;
-  ts__CMO=NULL;
-  t__BMO=read_type__XBM(Self__3LO,FALSE__);
-  if (((void *)t__BMO != (void *)NULL)) {
-    if (is_section__4LO) {
-      if (t__BMO==NULL) {
-        __tmp__PMO=NULL;
-      } else {
-        switch (((struct ___OBJ *)t__BMO)->__id) {
+  void *ts__OMO,*__tmp__1MO,*__tmp__FOO;
+  void *t__NMO;
+  __POSITION pos__L3VG,pos__N3VG,pos__P3VG;
+  void *lst__MMO,*result__AFGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__BFGH,*Self__CFGH;
+  __BOOLEAN result__YJHH;
+  __CHARACTER result__ZJHH;
+  lst__MMO=NULL;
+  ts__OMO=NULL;
+  t__NMO=read_type__DCM(Self__JMO,FALSE__);
+  if (((void *)t__NMO != (void *)NULL)) {
+    if (is_section__KMO) {
+      if (t__NMO==NULL) {
+        __tmp__1MO=NULL;
+      } else {
+        switch (((struct ___OBJ *)t__NMO)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__PMO=((void *)t__BMO);
+          __tmp__1MO=((void *)t__NMO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__PMO=((void *)t__BMO);
+          __tmp__1MO=((void *)t__NMO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__PMO=NULL;
+          __tmp__1MO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__PMO=((void *)t__BMO);
+          __tmp__1MO=((void *)t__NMO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__PMO=((void *)t__BMO);
+          __tmp__1MO=((void *)t__NMO);
         } break;
         }
       };
-      ts__CMO=__tmp__PMO;
-      if (((void *)__tmp__PMO == (void *)NULL)) {
-        pos__1KQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_263));
-        put_position__IOG(pos__1KQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      ts__OMO=__tmp__1MO;
+      if (((void *)__tmp__1MO == (void *)NULL)) {
+        pos__L3VG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_273));
+        put_position__UOG(pos__L3VG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__UY5G=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP)->parent_arrayed_collection__3TP.upper__ZUV <  0)) {
-      result__UY5G=create_with_capacity__2ER( 16);
+    result__AFGH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP)->parent_arrayed_collection__JUP.upper__FVV <  0)) {
+      result__AFGH=create_with_capacity__IFR( 16);
     } else {
-      Self__VY5G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-      result__UY5G=((void **)Self__VY5G->parent_arrayed_collection__3TP.storage__PZV)[Self__VY5G->parent_arrayed_collection__3TP.upper__ZUV];
-      Self__WY5G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-      Self__WY5G->parent_arrayed_collection__3TP.upper__ZUV=(__INTEGER)(Self__WY5G->parent_arrayed_collection__3TP.upper__ZUV -  1);
+      Self__BFGH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+      result__AFGH=((void **)Self__BFGH->parent_arrayed_collection__JUP.storage__1ZV)[Self__BFGH->parent_arrayed_collection__JUP.upper__FVV];
+      Self__CFGH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+      Self__CFGH->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__CFGH->parent_arrayed_collection__JUP.upper__FVV -  1);
     };
-    lst__AMO=result__UY5G;
-    add_last__ONV(result__UY5G,t__BMO);
-    while_do__QUP:
+    lst__MMO=result__AFGH;
+    add_last__0NV(result__AFGH,t__NMO);
+    while_do__2UP:
     {
-      result__E3AH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__E3AH=FALSE__;
+      result__YJHH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__YJHH=FALSE__;
       } else {
-        result__F3AH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__F3AH=((__CHARACTER )(( 0)));
+        result__ZJHH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__ZJHH=((__CHARACTER )(( 0)));
         } else {
-          result__F3AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__ZJHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__F3AH == ',')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__E3AH=TRUE__;
+        if ((result__ZJHH == ',')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__YJHH=TRUE__;
         };
       };
-      if (result__E3AH) {
-        t__BMO=read_type__XBM(Self__3LO,FALSE__);
-        if (((void *)t__BMO == (void *)NULL)) {
-          pos__3KQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_251));
-          put_position__IOG(pos__3KQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (result__YJHH) {
+        t__NMO=read_type__DCM(Self__JMO,FALSE__);
+        if (((void *)t__NMO == (void *)NULL)) {
+          pos__N3VG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_261));
+          put_position__UOG(pos__N3VG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if (is_section__4LO) {
-          if (t__BMO==NULL) {
-            __tmp__ZNO=NULL;
+        if (is_section__KMO) {
+          if (t__NMO==NULL) {
+            __tmp__FOO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__BMO)->__id) {
+            switch (((struct ___OBJ *)t__NMO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__ZNO=((void *)t__BMO);
+              __tmp__FOO=((void *)t__NMO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__ZNO=((void *)t__BMO);
+              __tmp__FOO=((void *)t__NMO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__ZNO=NULL;
+              __tmp__FOO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__ZNO=((void *)t__BMO);
+              __tmp__FOO=((void *)t__NMO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__ZNO=((void *)t__BMO);
+              __tmp__FOO=((void *)t__NMO);
             } break;
             }
           };
-          ts__CMO=__tmp__ZNO;
-          if (((void *)__tmp__ZNO == (void *)NULL)) {
-            pos__5KQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_263));
-            put_position__IOG(pos__5KQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          ts__OMO=__tmp__FOO;
+          if (((void *)__tmp__FOO == (void *)NULL)) {
+            pos__P3VG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_273));
+            put_position__UOG(pos__P3VG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
         };
-        add_last__ONV(lst__AMO,t__BMO);
-        goto while_do__QUP;
+        add_last__0NV(lst__MMO,t__NMO);
+        goto while_do__2UP;
       };
     };
-    lst__AMO=alias__0UP(result__UY5G);
+    lst__MMO=alias__GVP(result__AFGH);
   };
-  return(lst__AMO);
+  return(lst__MMO);
 }
 
-static __INTEGER hash_code__D50(__FAST_ARRAYoITM_TYPE_MONOo *Self__E50)
+static __INTEGER hash_code__P50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Q50)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__G50,result__XY5G,__tmp__ZY5G,Self__0Y5G,__tmp__V50;
-  __INTEGER result__2Y5G,__tmp__4Y5G,Self__5Y5G,result__BZ5G;
-  __INTEGER __tmp__DZ5G,Self__EZ5G,result__GZ5G,__tmp__IZ5G,Self__JZ5G;
-  __INTEGER result__LZ5G,__tmp__NZ5G,Self__OZ5G,__tmp__EA1,result__QZ5G;
-  __INTEGER __tmp__SZ5G,Self__TZ5G,result__VZ5G,__tmp__XZ5G,Self__YZ5G;
-  __INTEGER result__0Z5G,__tmp__2Z5G,Self__3Z5G;
-  void *__tmp__U50,*__tmp__DA1;
-  __STRING_CONSTANT *Self__YY5G,*Self__3Y5G,*Self__CZ5G,*Self__HZ5G;
-  __STRING_CONSTANT *Self__MZ5G,*Self__RZ5G,*Self__WZ5G,*Self__1Z5G;
-  __BOOLEAN __tmp__X50;
-  result__G50= 0;
-  if ((! (Self__E50->parent_arrayed_collection__NXC.upper__4HV <  0))) {
-    if (((void *)((void **)Self__E50->parent_arrayed_collection__NXC.storage__FMV)[Self__E50->parent_arrayed_collection__NXC.upper__4HV] != (void *)NULL)) {
-      __tmp__U50=((void **)Self__E50->parent_arrayed_collection__NXC.storage__FMV)[Self__E50->parent_arrayed_collection__NXC.upper__4HV];
-      switch (((struct ___OBJ *)__tmp__U50)->__id) {
+  __INTEGER result__S50,result__DFGH,__tmp__FFGH,Self__GFGH,__tmp__BA1;
+  __INTEGER result__IFGH,__tmp__KFGH,Self__LFGH,result__NFGH;
+  __INTEGER __tmp__PFGH,Self__QFGH,result__SFGH,__tmp__UFGH,Self__VFGH;
+  __INTEGER result__XFGH,__tmp__ZFGH,Self__0FGH,__tmp__QA1,result__2FGH;
+  __INTEGER __tmp__4FGH,Self__5FGH,result__BGGH,__tmp__DGGH,Self__EGGH;
+  __INTEGER result__GGGH,__tmp__IGGH,Self__JGGH;
+  void *__tmp__AA1,*__tmp__PA1;
+  __STRING_CONSTANT *Self__EFGH,*Self__JFGH,*Self__OFGH,*Self__TFGH;
+  __STRING_CONSTANT *Self__YFGH,*Self__3FGH,*Self__CGGH,*Self__HGGH;
+  __BOOLEAN __tmp__DA1;
+  result__S50= 0;
+  if ((! (Self__Q50->parent_arrayed_collection__ZXC.upper__KIV <  0))) {
+    if (((void *)((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[Self__Q50->parent_arrayed_collection__ZXC.upper__KIV] != (void *)NULL)) {
+      __tmp__AA1=((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[Self__Q50->parent_arrayed_collection__ZXC.upper__KIV];
+      switch (((struct ___OBJ *)__tmp__AA1)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        Self__YY5G=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__U50)->parent_itm_type__RDE.name__4XP);
-        result__XY5G= 0;
-        __tmp__ZY5G=Self__YY5G->count__DD;
-        Self__0Y5G= 1;
-        while ((Self__0Y5G <= __tmp__ZY5G)) {
-          result__XY5G=(__INTEGER)((__INTEGER)( 5 * result__XY5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YY5G->storage__JQO)[(__INTEGER)(Self__0Y5G -  1)])));
-          Self__0Y5G=(__INTEGER)(Self__0Y5G +  1);
-        };
-        if ((result__XY5G <  0)) {
-          result__XY5G=(__INTEGER)(~ result__XY5G);
-        };
-        __tmp__V50=result__XY5G;
+        Self__EFGH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__AA1)->parent_itm_type__3DE.name__KYP);
+        result__DFGH= 0;
+        __tmp__FFGH=Self__EFGH->count__DD;
+        Self__GFGH= 1;
+        while ((Self__GFGH <= __tmp__FFGH)) {
+          result__DFGH=(__INTEGER)((__INTEGER)( 5 * result__DFGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EFGH->storage__VQO)[(__INTEGER)(Self__GFGH -  1)])));
+          Self__GFGH=(__INTEGER)(Self__GFGH +  1);
+        };
+        if ((result__DFGH <  0)) {
+          result__DFGH=(__INTEGER)(~ result__DFGH);
+        };
+        __tmp__BA1=result__DFGH;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        Self__3Y5G=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__U50)->name__4XP);
-        result__2Y5G= 0;
-        __tmp__4Y5G=Self__3Y5G->count__DD;
-        Self__5Y5G= 1;
-        while ((Self__5Y5G <= __tmp__4Y5G)) {
-          result__2Y5G=(__INTEGER)((__INTEGER)( 5 * result__2Y5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3Y5G->storage__JQO)[(__INTEGER)(Self__5Y5G -  1)])));
-          Self__5Y5G=(__INTEGER)(Self__5Y5G +  1);
-        };
-        if ((result__2Y5G <  0)) {
-          result__2Y5G=(__INTEGER)(~ result__2Y5G);
-        };
-        __tmp__V50=result__2Y5G;
+        Self__JFGH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__AA1)->name__KYP);
+        result__IFGH= 0;
+        __tmp__KFGH=Self__JFGH->count__DD;
+        Self__LFGH= 1;
+        while ((Self__LFGH <= __tmp__KFGH)) {
+          result__IFGH=(__INTEGER)((__INTEGER)( 5 * result__IFGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JFGH->storage__VQO)[(__INTEGER)(Self__LFGH -  1)])));
+          Self__LFGH=(__INTEGER)(Self__LFGH +  1);
+        };
+        if ((result__IFGH <  0)) {
+          result__IFGH=(__INTEGER)(~ result__IFGH);
+        };
+        __tmp__BA1=result__IFGH;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        print__KHD((&__string_264));
+        print__WHD((&__string_274));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__V50= 0;
+        __tmp__BA1= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        Self__CZ5G=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__U50)->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP);
-        result__BZ5G= 0;
-        __tmp__DZ5G=Self__CZ5G->count__DD;
-        Self__EZ5G= 1;
-        while ((Self__EZ5G <= __tmp__DZ5G)) {
-          result__BZ5G=(__INTEGER)((__INTEGER)( 5 * result__BZ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CZ5G->storage__JQO)[(__INTEGER)(Self__EZ5G -  1)])));
-          Self__EZ5G=(__INTEGER)(Self__EZ5G +  1);
-        };
-        if ((result__BZ5G <  0)) {
-          result__BZ5G=(__INTEGER)(~ result__BZ5G);
-        };
-        __tmp__V50=result__BZ5G;
+        Self__OFGH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__AA1)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP);
+        result__NFGH= 0;
+        __tmp__PFGH=Self__OFGH->count__DD;
+        Self__QFGH= 1;
+        while ((Self__QFGH <= __tmp__PFGH)) {
+          result__NFGH=(__INTEGER)((__INTEGER)( 5 * result__NFGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OFGH->storage__VQO)[(__INTEGER)(Self__QFGH -  1)])));
+          Self__QFGH=(__INTEGER)(Self__QFGH +  1);
+        };
+        if ((result__NFGH <  0)) {
+          result__NFGH=(__INTEGER)(~ result__NFGH);
+        };
+        __tmp__BA1=result__NFGH;
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__HZ5G=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__U50)->parent_itm_type_simple__VRN.name__4XP);
-        result__GZ5G= 0;
-        __tmp__IZ5G=Self__HZ5G->count__DD;
-        Self__JZ5G= 1;
-        while ((Self__JZ5G <= __tmp__IZ5G)) {
-          result__GZ5G=(__INTEGER)((__INTEGER)( 5 * result__GZ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HZ5G->storage__JQO)[(__INTEGER)(Self__JZ5G -  1)])));
-          Self__JZ5G=(__INTEGER)(Self__JZ5G +  1);
-        };
-        if ((result__GZ5G <  0)) {
-          result__GZ5G=(__INTEGER)(~ result__GZ5G);
-        };
-        __tmp__V50=result__GZ5G;
+        Self__TFGH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__AA1)->parent_itm_type_simple__BSN.name__KYP);
+        result__SFGH= 0;
+        __tmp__UFGH=Self__TFGH->count__DD;
+        Self__VFGH= 1;
+        while ((Self__VFGH <= __tmp__UFGH)) {
+          result__SFGH=(__INTEGER)((__INTEGER)( 5 * result__SFGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__TFGH->storage__VQO)[(__INTEGER)(Self__VFGH -  1)])));
+          Self__VFGH=(__INTEGER)(Self__VFGH +  1);
+        };
+        if ((result__SFGH <  0)) {
+          result__SFGH=(__INTEGER)(~ result__SFGH);
+        };
+        __tmp__BA1=result__SFGH;
       } break;
       };
-      result__G50=__tmp__V50;
-      __tmp__X50=TRUE__;
+      result__S50=__tmp__BA1;
+      __tmp__DA1=TRUE__;
     } else {
-      __tmp__X50=FALSE__;
+      __tmp__DA1=FALSE__;
     };
-    if ((! __tmp__X50)) {
-      if (((void *)((void **)Self__E50->parent_arrayed_collection__NXC.storage__FMV)[ 0] != (void *)NULL)) {
-        __tmp__DA1=((void **)Self__E50->parent_arrayed_collection__NXC.storage__FMV)[ 0];
-        switch (((struct ___OBJ *)__tmp__DA1)->__id) {
+    if ((! __tmp__DA1)) {
+      if (((void *)((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[ 0] != (void *)NULL)) {
+        __tmp__PA1=((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
+        switch (((struct ___OBJ *)__tmp__PA1)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          Self__MZ5G=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__DA1)->parent_itm_type__RDE.name__4XP);
-          result__LZ5G= 0;
-          __tmp__NZ5G=Self__MZ5G->count__DD;
-          Self__OZ5G= 1;
-          while ((Self__OZ5G <= __tmp__NZ5G)) {
-            result__LZ5G=(__INTEGER)((__INTEGER)( 5 * result__LZ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MZ5G->storage__JQO)[(__INTEGER)(Self__OZ5G -  1)])));
-            Self__OZ5G=(__INTEGER)(Self__OZ5G +  1);
-          };
-          if ((result__LZ5G <  0)) {
-            result__LZ5G=(__INTEGER)(~ result__LZ5G);
-          };
-          __tmp__EA1=result__LZ5G;
+          Self__YFGH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__PA1)->parent_itm_type__3DE.name__KYP);
+          result__XFGH= 0;
+          __tmp__ZFGH=Self__YFGH->count__DD;
+          Self__0FGH= 1;
+          while ((Self__0FGH <= __tmp__ZFGH)) {
+            result__XFGH=(__INTEGER)((__INTEGER)( 5 * result__XFGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YFGH->storage__VQO)[(__INTEGER)(Self__0FGH -  1)])));
+            Self__0FGH=(__INTEGER)(Self__0FGH +  1);
+          };
+          if ((result__XFGH <  0)) {
+            result__XFGH=(__INTEGER)(~ result__XFGH);
+          };
+          __tmp__QA1=result__XFGH;
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          Self__RZ5G=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__DA1)->name__4XP);
-          result__QZ5G= 0;
-          __tmp__SZ5G=Self__RZ5G->count__DD;
-          Self__TZ5G= 1;
-          while ((Self__TZ5G <= __tmp__SZ5G)) {
-            result__QZ5G=(__INTEGER)((__INTEGER)( 5 * result__QZ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RZ5G->storage__JQO)[(__INTEGER)(Self__TZ5G -  1)])));
-            Self__TZ5G=(__INTEGER)(Self__TZ5G +  1);
-          };
-          if ((result__QZ5G <  0)) {
-            result__QZ5G=(__INTEGER)(~ result__QZ5G);
-          };
-          __tmp__EA1=result__QZ5G;
+          Self__3FGH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__PA1)->name__KYP);
+          result__2FGH= 0;
+          __tmp__4FGH=Self__3FGH->count__DD;
+          Self__5FGH= 1;
+          while ((Self__5FGH <= __tmp__4FGH)) {
+            result__2FGH=(__INTEGER)((__INTEGER)( 5 * result__2FGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3FGH->storage__VQO)[(__INTEGER)(Self__5FGH -  1)])));
+            Self__5FGH=(__INTEGER)(Self__5FGH +  1);
+          };
+          if ((result__2FGH <  0)) {
+            result__2FGH=(__INTEGER)(~ result__2FGH);
+          };
+          __tmp__QA1=result__2FGH;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          print__KHD((&__string_264));
+          print__WHD((&__string_274));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__EA1= 0;
+          __tmp__QA1= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          Self__WZ5G=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__DA1)->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP);
-          result__VZ5G= 0;
-          __tmp__XZ5G=Self__WZ5G->count__DD;
-          Self__YZ5G= 1;
-          while ((Self__YZ5G <= __tmp__XZ5G)) {
-            result__VZ5G=(__INTEGER)((__INTEGER)( 5 * result__VZ5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WZ5G->storage__JQO)[(__INTEGER)(Self__YZ5G -  1)])));
-            Self__YZ5G=(__INTEGER)(Self__YZ5G +  1);
-          };
-          if ((result__VZ5G <  0)) {
-            result__VZ5G=(__INTEGER)(~ result__VZ5G);
-          };
-          __tmp__EA1=result__VZ5G;
+          Self__CGGH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__PA1)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP);
+          result__BGGH= 0;
+          __tmp__DGGH=Self__CGGH->count__DD;
+          Self__EGGH= 1;
+          while ((Self__EGGH <= __tmp__DGGH)) {
+            result__BGGH=(__INTEGER)((__INTEGER)( 5 * result__BGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CGGH->storage__VQO)[(__INTEGER)(Self__EGGH -  1)])));
+            Self__EGGH=(__INTEGER)(Self__EGGH +  1);
+          };
+          if ((result__BGGH <  0)) {
+            result__BGGH=(__INTEGER)(~ result__BGGH);
+          };
+          __tmp__QA1=result__BGGH;
         } break;
         case __ITM_TYPE_STYLE__: {
-          Self__1Z5G=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__DA1)->parent_itm_type_simple__VRN.name__4XP);
-          result__0Z5G= 0;
-          __tmp__2Z5G=Self__1Z5G->count__DD;
-          Self__3Z5G= 1;
-          while ((Self__3Z5G <= __tmp__2Z5G)) {
-            result__0Z5G=(__INTEGER)((__INTEGER)( 5 * result__0Z5G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1Z5G->storage__JQO)[(__INTEGER)(Self__3Z5G -  1)])));
-            Self__3Z5G=(__INTEGER)(Self__3Z5G +  1);
-          };
-          if ((result__0Z5G <  0)) {
-            result__0Z5G=(__INTEGER)(~ result__0Z5G);
-          };
-          __tmp__EA1=result__0Z5G;
+          Self__HGGH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__PA1)->parent_itm_type_simple__BSN.name__KYP);
+          result__GGGH= 0;
+          __tmp__IGGH=Self__HGGH->count__DD;
+          Self__JGGH= 1;
+          while ((Self__JGGH <= __tmp__IGGH)) {
+            result__GGGH=(__INTEGER)((__INTEGER)( 5 * result__GGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HGGH->storage__VQO)[(__INTEGER)(Self__JGGH -  1)])));
+            Self__JGGH=(__INTEGER)(Self__JGGH +  1);
+          };
+          if ((result__GGGH <  0)) {
+            result__GGGH=(__INTEGER)(~ result__GGGH);
+          };
+          __tmp__QA1=result__GGGH;
         } break;
         };
-        result__G50=__tmp__EA1;
+        result__S50=__tmp__QA1;
       };
     };
   };
-  return(result__G50);
+  return(result__S50);
 }
 
-static __CHARACTER read_style__LRF()
+static __CHARACTER read_style__XRF()
 // () With resultNo recursive, No inlinable.
 {
-  __CHARACTER result__ORF,result__I3AH,result__L3AH;
-  __BOOLEAN result__H3AH,__tmp__1RF,result__K3AH;
-  result__ORF='\0';
-  result__H3AH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__H3AH=FALSE__;
+  __CHARACTER result__0RF,result__2JHH,result__5JHH;
+  __BOOLEAN result__1JHH,__tmp__HSF,result__4JHH;
+  result__0RF='\0';
+  result__1JHH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__1JHH=FALSE__;
   } else {
-    result__I3AH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__I3AH=((__CHARACTER )(( 0)));
+    result__2JHH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__2JHH=((__CHARACTER )(( 0)));
     } else {
-      result__I3AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__2JHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__I3AH == '-')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__H3AH=TRUE__;
+    if ((result__2JHH == '-')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__1JHH=TRUE__;
     };
   };
-  if (result__H3AH) {
-    result__ORF='-';
-    short__token__to__5AD((&__string_132),(__INTEGER)(position__GBC -  1),position__GBC);
-    __tmp__1RF=TRUE__;
+  if (result__1JHH) {
+    result__0RF='-';
+    short__token__to__LBD((&__string_132),(__INTEGER)(position__SBC -  1),position__SBC);
+    __tmp__HSF=TRUE__;
   } else {
-    __tmp__1RF=FALSE__;
+    __tmp__HSF=FALSE__;
   };
-  if ((! __tmp__1RF)) {
-    result__K3AH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__K3AH=FALSE__;
+  if ((! __tmp__HSF)) {
+    result__4JHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__4JHH=FALSE__;
     } else {
-      result__L3AH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__L3AH=((__CHARACTER )(( 0)));
+      result__5JHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__5JHH=((__CHARACTER )(( 0)));
       } else {
-        result__L3AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__5JHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__L3AH == '+')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__K3AH=TRUE__;
+      if ((result__5JHH == '+')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__4JHH=TRUE__;
       };
     };
-    if (result__K3AH) {
-      result__ORF='+';
-      short__token__to__5AD((&__string_132),(__INTEGER)(position__GBC -  1),position__GBC);
+    if (result__4JHH) {
+      result__0RF='+';
+      short__token__to__LBD((&__string_132),(__INTEGER)(position__SBC -  1),position__SBC);
     } else {
-      result__ORF=' ';
+      result__0RF=' ';
     };
   };
-  return(result__ORF);
+  return(result__0RF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__FL5B(__INTEGER new_count__HL5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__RL5B(__INTEGER new_count__TL5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__K25B,ptr_table__O3AH,next__N3AH,result__P3AH;
-  __POINTER ptr_table__T3AH,next__S3AH,result__U3AH;
-  __INTEGER typ_id__P25B;
-  __UINTEGER_32 sz__M25B,a__I03G,new_size__J03G,t__N03G,a__M03G;
-  __UINTEGER_32 new_size__W3AH,lab_type__V3AH;
-  __FAST_ARRAYoITM_ARGUMENTo *result__J25B,*Self__USHC;
-  result__J25B=NULL;
-  ptr__K25B=((__POINTER )(NULL));
-  typ_id__P25B= 0;
-  sz__M25B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
-  if ((sz__M25B ==  0)) {
-    result__J25B=FAST_ARRAYoITM_ARGUMENTo__;
+  __POINTER ptr__W25B,ptr_table__CKHH,next__BKHH,result__DKHH;
+  __POINTER ptr_table__HKHH,next__GKHH,result__IKHH;
+  __INTEGER typ_id__125B;
+  __UINTEGER_32 sz__Y25B,a__XFEH,new_size__YFEH,t__2FEH,a__1FEH;
+  __UINTEGER_32 new_size__KKHH,lab_type__JKHH;
+  __FAST_ARRAYoITM_ARGUMENTo *result__V25B,*Self__ATHC;
+  result__V25B=NULL;
+  ptr__W25B=((__POINTER )(NULL));
+  typ_id__125B= 0;
+  sz__Y25B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
+  if ((sz__Y25B ==  0)) {
+    result__V25B=FAST_ARRAYoITM_ARGUMENTo__;
   } else {
-    typ_id__P25B=__FAST_ARRAYoITM_ARGUMENTo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M25B);
-    if ((typ_id__P25B == (__INTEGER)(-  1))) {
-      a__I03G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__J03G=(__UINTEGER_32)((__UINTEGER_32)(sz__M25B + a__I03G) & (__UINTEGER_32)(~ a__I03G));
-      ptr_table__O3AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J03G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__N3AH=((__POINTER )(NULL));
-      result__P3AH=((__POINTER *)ptr_table__O3AH)[ 0];
-      if ((result__P3AH == (void *)NULL)) {
-        result__P3AH=new_lab__ARJ(new_size__J03G);
-        next__N3AH=(void *)((unsigned long)result__P3AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J03G)));
-        ((__POINTER *)next__N3AH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__O3AH)[ 0]=next__N3AH;
-      } else {
-        next__N3AH=((__POINTER *)result__P3AH)[ 0];
-        if ((next__N3AH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P3AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__J03G <<  1)) <=  4096)) {
-            next__N3AH=(void *)((unsigned long)result__P3AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J03G)));
-          } else {
-            next__N3AH=new_lab__ARJ(new_size__J03G);
-          };
-          ((__POINTER *)next__N3AH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__O3AH)[ 0]=next__N3AH;
-        } else {
-          ((__POINTER *)result__P3AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N3AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__P3AH=next__N3AH;
-        };
-      };
-      ptr__K25B=result__P3AH;
-    } else {
-      t__N03G=((__UINTEGER_32 )typ_id__P25B);
-      a__M03G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__W3AH=(__UINTEGER_32)((__UINTEGER_32)(sz__M25B + a__M03G) & (__UINTEGER_32)(~ a__M03G));
-      ptr_table__T3AH=((__POINTER )(&(table_type[(t__N03G)])));
-      lab_type__V3AH=(__UINTEGER_32)(t__N03G |  1);
-      next__S3AH=((__POINTER )(NULL));
-      result__U3AH=((__POINTER *)ptr_table__T3AH)[ 0];
-      if ((result__U3AH == (void *)NULL)) {
-        result__U3AH=new_lab__ARJ(lab_type__V3AH);
-        next__S3AH=(void *)((unsigned long)result__U3AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W3AH)));
-        ((__POINTER *)next__S3AH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__T3AH)[ 0]=next__S3AH;
-      } else {
-        next__S3AH=((__POINTER *)result__U3AH)[ 0];
-        if ((next__S3AH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U3AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__W3AH <<  1)) <=  4096)) {
-            next__S3AH=(void *)((unsigned long)result__U3AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W3AH)));
-          } else {
-            next__S3AH=new_lab__ARJ(lab_type__V3AH);
-          };
-          ((__POINTER *)next__S3AH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__T3AH)[ 0]=next__S3AH;
-        } else {
-          ((__POINTER *)result__U3AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S3AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__U3AH=next__S3AH;
-        };
-      };
-      ptr__K25B=result__U3AH;
-    };
-    result__J25B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__K25B);
-    *(result__J25B) = *(FAST_ARRAYoITM_ARGUMENTo__);
-  };
-  Self__USHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__J25B);
-  if ((Self__USHC->parent_arrayed_collection__ZBZB.capacity__U5GC < new_count__HL5B)) {
-    Self__USHC->parent_arrayed_collection__ZBZB.storage__QAHC=create__KPBD(new_count__HL5B);
-    Self__USHC->parent_arrayed_collection__ZBZB.capacity__U5GC=new_count__HL5B;
-  };
-  Self__USHC->parent_arrayed_collection__ZBZB.upper__S5GC=(__INTEGER)(-  1);
-  return(result__J25B);
+    typ_id__125B=__FAST_ARRAYoITM_ARGUMENTo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__Y25B);
+    if ((typ_id__125B == (__INTEGER)(-  1))) {
+      a__XFEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YFEH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y25B + a__XFEH) & (__UINTEGER_32)(~ a__XFEH));
+      ptr_table__CKHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YFEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BKHH=((__POINTER )(NULL));
+      result__DKHH=((__POINTER *)ptr_table__CKHH)[ 0];
+      if ((result__DKHH == (void *)NULL)) {
+        result__DKHH=new_lab__MRJ(new_size__YFEH);
+        next__BKHH=(void *)((unsigned long)result__DKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFEH)));
+        ((__POINTER *)next__BKHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CKHH)[ 0]=next__BKHH;
+      } else {
+        next__BKHH=((__POINTER *)result__DKHH)[ 0];
+        if ((next__BKHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DKHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YFEH <<  1)) <=  4096)) {
+            next__BKHH=(void *)((unsigned long)result__DKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFEH)));
+          } else {
+            next__BKHH=new_lab__MRJ(new_size__YFEH);
+          };
+          ((__POINTER *)next__BKHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CKHH)[ 0]=next__BKHH;
+        } else {
+          ((__POINTER *)result__DKHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BKHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DKHH=next__BKHH;
+        };
+      };
+      ptr__W25B=result__DKHH;
+    } else {
+      t__2FEH=((__UINTEGER_32 )typ_id__125B);
+      a__1FEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y25B + a__1FEH) & (__UINTEGER_32)(~ a__1FEH));
+      ptr_table__HKHH=((__POINTER )(&(table_type[(t__2FEH)])));
+      lab_type__JKHH=(__UINTEGER_32)(t__2FEH |  1);
+      next__GKHH=((__POINTER )(NULL));
+      result__IKHH=((__POINTER *)ptr_table__HKHH)[ 0];
+      if ((result__IKHH == (void *)NULL)) {
+        result__IKHH=new_lab__MRJ(lab_type__JKHH);
+        next__GKHH=(void *)((unsigned long)result__IKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KKHH)));
+        ((__POINTER *)next__GKHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HKHH)[ 0]=next__GKHH;
+      } else {
+        next__GKHH=((__POINTER *)result__IKHH)[ 0];
+        if ((next__GKHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IKHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KKHH <<  1)) <=  4096)) {
+            next__GKHH=(void *)((unsigned long)result__IKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KKHH)));
+          } else {
+            next__GKHH=new_lab__MRJ(lab_type__JKHH);
+          };
+          ((__POINTER *)next__GKHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HKHH)[ 0]=next__GKHH;
+        } else {
+          ((__POINTER *)result__IKHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GKHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IKHH=next__GKHH;
+        };
+      };
+      ptr__W25B=result__IKHH;
+    };
+    result__V25B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__W25B);
+    *(result__V25B) = *(FAST_ARRAYoITM_ARGUMENTo__);
+  };
+  Self__ATHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__V25B);
+  if ((Self__ATHC->parent_arrayed_collection__FCZB.capacity__AAHC < new_count__TL5B)) {
+    Self__ATHC->parent_arrayed_collection__FCZB.storage__2AHC=create__WPBD(new_count__TL5B);
+    Self__ATHC->parent_arrayed_collection__FCZB.capacity__AAHC=new_count__TL5B;
+  };
+  Self__ATHC->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(-  1);
+  return(result__V25B);
 }
 
-static void* read_loc_arg__with_self__2DHB(__PARSER *Self__3DHB,__BOOLEAN mute__4DHB,__BOOLEAN self_first__5DHB)
+static void* read_loc_arg__with_self__IEHB(__PARSER *Self__JEHB,__BOOLEAN mute__KEHB,__BOOLEAN self_first__LEHB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *result__BEHB,*result__WLEE;
-  void *t__CEHB,*t__QLEE,*__tmp__PQEE,*t__CZ5B;
-  __POSITION pos__DEHB,pos__LMQG,pos__NMQG,pos__PMQG,pos__RMQG;
-  __POSITION pos__TMQG,pos__ANQG,pos__CNQG,p__AZ5B,p__BVKF,pos__MPQG;
-  __POSITION pos__OPQG;
-  void *n__GEHB,*n__BZ5B;
-  void *tb__HEHB,*__tmp__1GHB,*tb__XLEE,*__tmp__QQEE;
-  __ITM_ARG *result__23AH,*Self__E4AH,*result__AEAC,*Self__L0HC;
-  __POINTER ptr__33AH,ptr_table__J4AH,next__I4AH,result__K4AH;
-  __POINTER ptr_table__O4AH,next__N4AH,result__P4AH,ptr__BEAC;
-  __POINTER ptr_table__44AH,next__34AH,result__54AH,ptr_table__D5AH;
-  __POINTER next__C5AH,result__E5AH,ptr__WHZF,ptr_table__M5AH;
-  __POINTER next__L5AH,result__N5AH,ptr_table__R5AH,next__Q5AH;
-  __POINTER result__S5AH,ptr__FLLF,ptr_table__W5AH,next__V5AH;
-  __POINTER result__X5AH,ptr_table__15AH,next__05AH,result__25AH;
-  __INTEGER typ_id__43AH,beg__ULEE,Self__WVRF,limit_up__XVRF;
-  __INTEGER typ_id__GEAC,__tmp__0UDG,i__4PHG,h__MDPF,idx__NDPF;
-  __INTEGER idx__EG0F,new_capacity__FG0F,i__DG0F,typ_id__1HZF;
-  __INTEGER typ_id__KLLF,__tmp__FSEE,Self__KVKF;
-  __UINTEGER_32 sz__53AH,a__A4AH,new_size__B4AH,t__C4AH,a__D4AH;
-  __UINTEGER_32 new_size__R4AH,lab_type__Q4AH,sz__DEAC,a__K33G;
-  __UINTEGER_32 new_size__L33G,t__P33G,a__O33G,new_size__G5AH;
-  __UINTEGER_32 lab_type__F5AH,sz__YHZF,a__J23G,new_size__K23G,t__O23G;
-  __UINTEGER_32 a__N23G,new_size__U5AH,lab_type__T5AH,sz__HLLF,a__U23G;
-  __UINTEGER_32 new_size__V23G,t__Z23G,a__Y23G,new_size__45AH;
-  __UINTEGER_32 lab_type__35AH;
-  void *tm__RLEE;
-  __ITM_ARGS *result__ELLF,*Self__TZOF;
-  __BOOLEAN result__Y3AH,__tmp__SEHB,result__Z3AH,__tmp__VFHB;
-  __BOOLEAN __tmp__4GHB,__tmp__CHHB,__tmp__HIHB,result__S4AH,mute__VLEE;
-  __BOOLEAN result__W4AH,__tmp__CMEE,result__X4AH,__tmp__5NEE;
-  __BOOLEAN result__04AH,__tmp__WQEE,__tmp__TQEE,__tmp__ZQEE;
-  __BOOLEAN __tmp__QAPF,result__YTDG,result__55AH;
-  __CHARACTER result__03AH,result__GBYG,result__T4AH,result__Y4AH;
-  __CHARACTER result__HBYG,result__14AH,result__AABH;
-  void *type__SLEE,*result__YTP;
-  void *name__TLEE,*result__5Z5G,*result__5TKF,*e__F5OF,*result__Y5OF;
-  void *e__FDPF,*e__I5AH,*e__SLQF;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__A05G,*Self__B05G;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__VCBB,*Self__LDBB;
-  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__E5OF,*Self__EDPF;
-  void *node__X5OF,*node__J5AH,*node__1LQF,*node__ODPF,*node1__HG0F;
-  void *node2__IG0F,*__tmp__4EPF;
-  __FAST_ARRAYoSTRING_CONSTANTo *Self__VTDG,*o__ZTDG,*__tmp__FUDG;
-  void **__tmp__VUDG,**__tmp__XUDG,**Self__KPHG;
-  void **old_buckets__GG0F;
-  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__VHZF;
-  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__YP2F;
-  result__BEHB=NULL;
-  t__CEHB=NULL;
-  pos__DEHB=((__POSITION ) 0);
-  n__GEHB=NULL;
-  tb__HEHB=NULL;
-  if (self_first__5DHB) {
-    result__Y3AH=read_word__EPF((&__string_58));
-    if (is_shorter__WY) {
-      if (result__Y3AH) {
+  void *result__NEHB,*result__5YEE;
+  void *t__OEHB,*t__ZYEE,*__tmp__Y3EE,*t__OZ5B;
+  __POSITION pos__PEHB,pos__14VG,pos__34VG,pos__54VG,pos__B5VG;
+  __POSITION pos__D5VG,pos__Q5VG,pos__S5VG,p__MZ5B,p__RILF,pos__2BWG;
+  __POSITION pos__4BWG;
+  void *n__SEHB,*n__NZ5B;
+  void *tb__TEHB,*__tmp__HHHB,*tb__AZEE,*__tmp__Z3EE;
+  __ITM_ARG *result__QKHH,*Self__YKHH,*result__MEAC,*Self__X0HC;
+  __POINTER ptr__RKHH,ptr_table__3KHH,next__2KHH,result__4KHH;
+  __POINTER ptr_table__CLHH,next__BLHH,result__DLHH,ptr__NEAC;
+  __POINTER ptr_table__SLHH,next__RLHH,result__TLHH,ptr_table__XLHH;
+  __POINTER next__WLHH,result__YLHH,ptr__QD0F,ptr_table__AMHH;
+  __POINTER next__5LHH,result__BMHH,ptr_table__FMHH,next__EMHH;
+  __POINTER result__GMHH,ptr__PZLF,ptr_table__KMHH,next__JMHH;
+  __POINTER result__LMHH,ptr_table__PMHH,next__OMHH,result__QMHH;
+  __INTEGER typ_id__SKHH,beg__3YEE,Self__DFSF,limit_up__EFSF;
+  __INTEGER typ_id__SEAC,__tmp__45GG,i__HRMG,h__UGPF,idx__VGPF;
+  __INTEGER idx__KB1F,new_capacity__LB1F,i__JB1F,typ_id__VD0F;
+  __INTEGER typ_id__UZLF,__tmp__O5EE,Self__0ILF;
+  __UINTEGER_32 sz__TKHH,a__UKHH,new_size__VKHH,t__WKHH,a__XKHH;
+  __UINTEGER_32 new_size__FLHH,lab_type__ELHH,sz__PEAC,a__ZIEH;
+  __UINTEGER_32 new_size__0IEH,t__4IEH,a__3IEH,new_size__0LHH;
+  __UINTEGER_32 lab_type__ZLHH,sz__SD0F,a__YHEH,new_size__ZHEH,t__3HEH;
+  __UINTEGER_32 a__2HEH,new_size__IMHH,lab_type__HMHH,sz__RZLF,a__DIEH;
+  __UINTEGER_32 new_size__EIEH,t__IIEH,a__HIEH,new_size__SMHH;
+  __UINTEGER_32 lab_type__RMHH;
+  void *tm__0YEE;
+  __ITM_ARGS *result__OZLF,*Self__J1OF;
+  __BOOLEAN result__MKHH,__tmp__4EHB,result__NKHH,__tmp__BGHB;
+  __BOOLEAN __tmp__KHHB,__tmp__OHHB,__tmp__TIHB,result__GLHH,mute__4YEE;
+  __BOOLEAN result__KLHH,__tmp__LZEE,result__LLHH,__tmp__I1EE;
+  __BOOLEAN result__OLHH,__tmp__53EE,__tmp__23EE,__tmp__C4EE;
+  __BOOLEAN __tmp__YDPF,result__24GG,result__TMHH;
+  __CHARACTER result__OKHH,result__B23G,result__HLHH,result__MLHH;
+  __CHARACTER result__G23G,result__PLHH,result__UMHH;
+  void *type__1YEE,*result__EUP;
+  void *name__2YEE,*result__LGGH,*result__PHLF,*e__NCPF,*result__ADPF;
+  void *e__NGPF,*e__2LHH,*e__5VQF;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__MGGH,*Self__NGGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__BDBB,*Self__XDBB;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__MCPF,*Self__MGPF;
+  void *node__5CPF,*node__3LHH,*node__IWQF,*node__WGPF,*node1__NB1F;
+  void *node2__OB1F,*__tmp__GIPF;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__Z4GG,*o__34GG,*__tmp__J5GG;
+  void **__tmp__Z5GG,**__tmp__15GG,**Self__TQMG;
+  void **old_buckets__MB1F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__PD0F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__ST3F;
+  result__NEHB=NULL;
+  t__OEHB=NULL;
+  pos__PEHB=((__POSITION ) 0);
+  n__SEHB=NULL;
+  tb__TEHB=NULL;
+  if (self_first__LEHB) {
+    result__MKHH=read_word__QPF((&__string_58));
+    if (is_shorter__5Y) {
+      if (result__MKHH) {
         if (((void *)(&__string_58) == (void *)(&__string_4))) {
-          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         } else {
-          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         };
       };
     };
-    __tmp__SEHB=result__Y3AH;
+    __tmp__4EHB=result__MKHH;
   } else {
-    __tmp__SEHB=FALSE__;
+    __tmp__4EHB=FALSE__;
   };
-  if ((__tmp__SEHB || ((! self_first__5DHB) && read_identifier__55K()))) {
-    pos__DEHB=current_position__3WF();
-    n__GEHB=last_string__2ZC;
-    result__Z3AH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__Z3AH=FALSE__;
+  if ((__tmp__4EHB || ((! self_first__LEHB) && read_identifier__LAL()))) {
+    pos__PEHB=current_position__JXF();
+    n__SEHB=last_string__I0C;
+    result__NKHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__NKHH=FALSE__;
     } else {
-      result__03AH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__03AH=((__CHARACTER )(( 0)));
+      result__OKHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__OKHH=((__CHARACTER )(( 0)));
       } else {
-        result__03AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__OKHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__03AH == ':')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__Z3AH=TRUE__;
+      if ((result__OKHH == ':')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__NKHH=TRUE__;
       };
     };
-    if (result__Z3AH) {
-      result__GBYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__GBYG=((__CHARACTER )(( 0)));
+    if (result__NKHH) {
+      result__B23G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__B23G=((__CHARACTER )(( 0)));
       } else {
-        result__GBYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__B23G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      __tmp__VFHB=(result__GBYG != '=');
+      __tmp__BGHB=(result__B23G != '=');
     } else {
-      __tmp__VFHB=FALSE__;
+      __tmp__BGHB=FALSE__;
     };
-    if (__tmp__VFHB) {
-      t__CEHB=read_type__XBM(Self__3DHB,TRUE__);
-      if (((void *)t__CEHB == (void *)NULL)) {
-        pos__LMQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_265));
-        put_position__IOG(pos__LMQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+    if (__tmp__BGHB) {
+      t__OEHB=read_type__DCM(Self__JEHB,TRUE__);
+      if (((void *)t__OEHB == (void *)NULL)) {
+        pos__14VG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_275));
+        put_position__UOG(pos__14VG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      if ((self_first__5DHB && ((void *)t__CEHB != (void *)type_self__1TN))) {
-        if (((void *)((__PROTOTYPE *)object__3AC)->parent_named__5.name__LI != (void *)(&__string_40))) {
-          __tmp__4GHB=TRUE__;
+      if ((self_first__LEHB && ((void *)t__OEHB != (void *)type_self__HUN))) {
+        if (((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
+          __tmp__KHHB=TRUE__;
         } else {
-          if (t__CEHB==NULL) {
-            __tmp__1GHB=NULL;
+          if (t__OEHB==NULL) {
+            __tmp__HHHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__CEHB)->__id) {
+            switch (((struct ___OBJ *)t__OEHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__1GHB=NULL;
+              __tmp__HHHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__1GHB=NULL;
+              __tmp__HHHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__1GHB=((void *)t__CEHB);
+              __tmp__HHHB=((void *)t__OEHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__1GHB=NULL;
+              __tmp__HHHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__1GHB=NULL;
+              __tmp__HHHB=NULL;
             } break;
             }
           };
-          tb__HEHB=__tmp__1GHB;
-          __tmp__4GHB=((void *)__tmp__1GHB == (void *)NULL);
+          tb__TEHB=__tmp__HHHB;
+          __tmp__KHHB=((void *)__tmp__HHHB == (void *)NULL);
         };
-        __tmp__CHHB=__tmp__4GHB;
+        __tmp__OHHB=__tmp__KHHB;
       } else {
-        __tmp__CHHB=FALSE__;
+        __tmp__OHHB=FALSE__;
       };
-      if (__tmp__CHHB) {
-        pos__NMQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_266));
-        put_position__IOG(pos__NMQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if (__tmp__OHHB) {
+        pos__34VG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_276));
+        put_position__UOG(pos__34VG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      result__23AH=NULL;
-      ptr__33AH=((__POINTER )(NULL));
-      typ_id__43AH= 0;
-      sz__53AH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-      if ((sz__53AH ==  0)) {
-        result__23AH=ITM_ARG__;
-      } else {
-        typ_id__43AH=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__53AH);
-        if ((typ_id__43AH == (__INTEGER)(-  1))) {
-          a__A4AH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__B4AH=(__UINTEGER_32)((__UINTEGER_32)(sz__53AH + a__A4AH) & (__UINTEGER_32)(~ a__A4AH));
-          ptr_table__J4AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B4AH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__I4AH=((__POINTER )(NULL));
-          result__K4AH=((__POINTER *)ptr_table__J4AH)[ 0];
-          if ((result__K4AH == (void *)NULL)) {
-            result__K4AH=new_lab__ARJ(new_size__B4AH);
-            next__I4AH=(void *)((unsigned long)result__K4AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4AH)));
-            ((__POINTER *)next__I4AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__J4AH)[ 0]=next__I4AH;
-          } else {
-            next__I4AH=((__POINTER *)result__K4AH)[ 0];
-            if ((next__I4AH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K4AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__B4AH <<  1)) <=  4096)) {
-                next__I4AH=(void *)((unsigned long)result__K4AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4AH)));
+      result__QKHH=NULL;
+      ptr__RKHH=((__POINTER )(NULL));
+      typ_id__SKHH= 0;
+      sz__TKHH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+      if ((sz__TKHH ==  0)) {
+        result__QKHH=ITM_ARG__;
+      } else {
+        typ_id__SKHH=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TKHH);
+        if ((typ_id__SKHH == (__INTEGER)(-  1))) {
+          a__UKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TKHH + a__UKHH) & (__UINTEGER_32)(~ a__UKHH));
+          ptr_table__3KHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__2KHH=((__POINTER )(NULL));
+          result__4KHH=((__POINTER *)ptr_table__3KHH)[ 0];
+          if ((result__4KHH == (void *)NULL)) {
+            result__4KHH=new_lab__MRJ(new_size__VKHH);
+            next__2KHH=(void *)((unsigned long)result__4KHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKHH)));
+            ((__POINTER *)next__2KHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3KHH)[ 0]=next__2KHH;
+          } else {
+            next__2KHH=((__POINTER *)result__4KHH)[ 0];
+            if ((next__2KHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4KHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VKHH <<  1)) <=  4096)) {
+                next__2KHH=(void *)((unsigned long)result__4KHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKHH)));
               } else {
-                next__I4AH=new_lab__ARJ(new_size__B4AH);
+                next__2KHH=new_lab__MRJ(new_size__VKHH);
               };
-              ((__POINTER *)next__I4AH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__J4AH)[ 0]=next__I4AH;
+              ((__POINTER *)next__2KHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3KHH)[ 0]=next__2KHH;
             } else {
-              ((__POINTER *)result__K4AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I4AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__K4AH=next__I4AH;
-            };
-          };
-          ptr__33AH=result__K4AH;
-        } else {
-          t__C4AH=((__UINTEGER_32 )typ_id__43AH);
-          a__D4AH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__R4AH=(__UINTEGER_32)((__UINTEGER_32)(sz__53AH + a__D4AH) & (__UINTEGER_32)(~ a__D4AH));
-          ptr_table__O4AH=((__POINTER )(&(table_type[(t__C4AH)])));
-          lab_type__Q4AH=(__UINTEGER_32)(t__C4AH |  1);
-          next__N4AH=((__POINTER )(NULL));
-          result__P4AH=((__POINTER *)ptr_table__O4AH)[ 0];
-          if ((result__P4AH == (void *)NULL)) {
-            result__P4AH=new_lab__ARJ(lab_type__Q4AH);
-            next__N4AH=(void *)((unsigned long)result__P4AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R4AH)));
-            ((__POINTER *)next__N4AH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__O4AH)[ 0]=next__N4AH;
-          } else {
-            next__N4AH=((__POINTER *)result__P4AH)[ 0];
-            if ((next__N4AH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P4AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__R4AH <<  1)) <=  4096)) {
-                next__N4AH=(void *)((unsigned long)result__P4AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R4AH)));
+              ((__POINTER *)result__4KHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2KHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4KHH=next__2KHH;
+            };
+          };
+          ptr__RKHH=result__4KHH;
+        } else {
+          t__WKHH=((__UINTEGER_32 )typ_id__SKHH);
+          a__XKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FLHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TKHH + a__XKHH) & (__UINTEGER_32)(~ a__XKHH));
+          ptr_table__CLHH=((__POINTER )(&(table_type[(t__WKHH)])));
+          lab_type__ELHH=(__UINTEGER_32)(t__WKHH |  1);
+          next__BLHH=((__POINTER )(NULL));
+          result__DLHH=((__POINTER *)ptr_table__CLHH)[ 0];
+          if ((result__DLHH == (void *)NULL)) {
+            result__DLHH=new_lab__MRJ(lab_type__ELHH);
+            next__BLHH=(void *)((unsigned long)result__DLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLHH)));
+            ((__POINTER *)next__BLHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CLHH)[ 0]=next__BLHH;
+          } else {
+            next__BLHH=((__POINTER *)result__DLHH)[ 0];
+            if ((next__BLHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DLHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FLHH <<  1)) <=  4096)) {
+                next__BLHH=(void *)((unsigned long)result__DLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLHH)));
               } else {
-                next__N4AH=new_lab__ARJ(lab_type__Q4AH);
+                next__BLHH=new_lab__MRJ(lab_type__ELHH);
               };
-              ((__POINTER *)next__N4AH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__O4AH)[ 0]=next__N4AH;
+              ((__POINTER *)next__BLHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CLHH)[ 0]=next__BLHH;
             } else {
-              ((__POINTER *)result__P4AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N4AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__P4AH=next__N4AH;
+              ((__POINTER *)result__DLHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BLHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DLHH=next__BLHH;
             };
           };
-          ptr__33AH=result__P4AH;
+          ptr__RKHH=result__DLHH;
         };
-        result__23AH=((__ITM_ARG *)ptr__33AH);
-        *(result__23AH) = *(ITM_ARG__);
+        result__QKHH=((__ITM_ARG *)ptr__RKHH);
+        *(result__QKHH) = *(ITM_ARG__);
       };
-      Self__E4AH=((__ITM_ARG *)result__23AH);
-      Self__E4AH->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ=pos__DEHB;
-      Self__E4AH->name__P0HC=n__GEHB;
-      Self__E4AH->type__Q0HC=t__CEHB;
-      result__BEHB=result__23AH;
-      if (is_shorter__WY) {
-        add__WLHB(short_local__3BC,n__GEHB);
+      Self__YKHH=((__ITM_ARG *)result__QKHH);
+      Self__YKHH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=pos__PEHB;
+      Self__YKHH->name__10HC=n__SEHB;
+      Self__YKHH->type__20HC=t__OEHB;
+      result__NEHB=result__QKHH;
+      if (is_shorter__5Y) {
+        add__CMHB(short_local__JCC,n__SEHB);
       };
     } else {
-      if ((! mute__4DHB)) {
-        pos__PMQG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_267));
-        put_position__IOG(pos__PMQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((! mute__KEHB)) {
+        pos__54VG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_277));
+        put_position__UOG(pos__54VG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__HIHB=TRUE__;
+    __tmp__TIHB=TRUE__;
   } else {
-    __tmp__HIHB=FALSE__;
-  };
-  if ((! __tmp__HIHB)) {
-    result__S4AH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__S4AH=FALSE__;
-    } else {
-      result__T4AH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__T4AH=((__CHARACTER )(( 0)));
-      } else {
-        result__T4AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-      };
-      if ((result__T4AH == '(')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__S4AH=TRUE__;
-      };
-    };
-    if (result__S4AH) {
-      t__QLEE=NULL;
-      tm__RLEE=NULL;
-      type__SLEE=NULL;
-      name__TLEE=NULL;
-      beg__ULEE= 0;
-      result__WLEE=NULL;
-      tb__XLEE=NULL;
-      mute__VLEE=mute__4DHB;
-      if (self_first__5DHB) {
-        result__W4AH=read_word__EPF((&__string_58));
-        if (is_shorter__WY) {
-          if (result__W4AH) {
+    __tmp__TIHB=FALSE__;
+  };
+  if ((! __tmp__TIHB)) {
+    result__GLHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__GLHH=FALSE__;
+    } else {
+      result__HLHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__HLHH=((__CHARACTER )(( 0)));
+      } else {
+        result__HLHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      };
+      if ((result__HLHH == '(')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__GLHH=TRUE__;
+      };
+    };
+    if (result__GLHH) {
+      t__ZYEE=NULL;
+      tm__0YEE=NULL;
+      type__1YEE=NULL;
+      name__2YEE=NULL;
+      beg__3YEE= 0;
+      result__5YEE=NULL;
+      tb__AZEE=NULL;
+      mute__4YEE=mute__KEHB;
+      if (self_first__LEHB) {
+        result__KLHH=read_word__QPF((&__string_58));
+        if (is_shorter__5Y) {
+          if (result__KLHH) {
             if (((void *)(&__string_58) == (void *)(&__string_4))) {
-              short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+              short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
             } else {
-              short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+              short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
             };
           };
         };
-        __tmp__CMEE=result__W4AH;
+        __tmp__LZEE=result__KLHH;
       } else {
-        __tmp__CMEE=FALSE__;
+        __tmp__LZEE=FALSE__;
       };
-      if ((__tmp__CMEE || read_identifier__55K())) {
-        result__5Z5G=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K)->parent_arrayed_collection__34K.upper__OSU <  0)) {
-          result__5Z5G=create_with_capacity__VGRC( 16);
+      if ((__tmp__LZEE || read_identifier__LAL())) {
+        result__LGGH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K)->parent_arrayed_collection__J5K.upper__0SU <  0)) {
+          result__LGGH=create_with_capacity__BHRC( 16);
         } else {
-          Self__A05G=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K);
-          result__5Z5G=((void **)Self__A05G->parent_arrayed_collection__34K.storage__4UU)[Self__A05G->parent_arrayed_collection__34K.upper__OSU];
-          Self__B05G=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K);
-          Self__B05G->parent_arrayed_collection__34K.upper__OSU=(__INTEGER)(Self__B05G->parent_arrayed_collection__34K.upper__OSU -  1);
+          Self__MGGH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
+          result__LGGH=((void **)Self__MGGH->parent_arrayed_collection__J5K.storage__KVU)[Self__MGGH->parent_arrayed_collection__J5K.upper__0SU];
+          Self__NGGH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
+          Self__NGGH->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__NGGH->parent_arrayed_collection__J5K.upper__0SU -  1);
         };
-        name__TLEE=result__5Z5G;
-        result__YTP=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP)->parent_arrayed_collection__3TP.upper__ZUV <  0)) {
-          result__YTP=create_with_capacity__2ER( 16);
+        name__2YEE=result__LGGH;
+        result__EUP=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP)->parent_arrayed_collection__JUP.upper__FVV <  0)) {
+          result__EUP=create_with_capacity__IFR( 16);
         } else {
-          Self__VCBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-          result__YTP=((void **)Self__VCBB->parent_arrayed_collection__3TP.storage__PZV)[Self__VCBB->parent_arrayed_collection__3TP.upper__ZUV];
-          Self__LDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-          Self__LDBB->parent_arrayed_collection__3TP.upper__ZUV=(__INTEGER)(Self__LDBB->parent_arrayed_collection__3TP.upper__ZUV -  1);
+          Self__BDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+          result__EUP=((void **)Self__BDBB->parent_arrayed_collection__JUP.storage__1ZV)[Self__BDBB->parent_arrayed_collection__JUP.upper__FVV];
+          Self__XDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+          Self__XDBB->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__XDBB->parent_arrayed_collection__JUP.upper__FVV -  1);
         };
-        type__SLEE=result__YTP;
-        beg__ULEE= 0;
+        type__1YEE=result__EUP;
+        beg__3YEE= 0;
         do {
-          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__TLEE)->parent_arrayed_collection__14I.upper__P5OD +  1) !=  0) && (! read_identifier__55K())) && (! mute__VLEE))) {
-            pos__RMQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_268));
-            put_position__IOG(pos__RMQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__2YEE)->parent_arrayed_collection__H5I.upper__15OD +  1) !=  0) && (! read_identifier__LAL())) && (! mute__4YEE))) {
+            pos__B5VG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_278));
+            put_position__UOG(pos__B5VG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__FBPD(name__TLEE,last_string__2ZC);
-          result__X4AH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__X4AH=FALSE__;
+          add_last__RBPD(name__2YEE,last_string__I0C);
+          result__LLHH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__LLHH=FALSE__;
           } else {
-            result__Y4AH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__Y4AH=((__CHARACTER )(( 0)));
+            result__MLHH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__MLHH=((__CHARACTER )(( 0)));
             } else {
-              result__Y4AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__MLHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__Y4AH == ':')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__X4AH=TRUE__;
+            if ((result__MLHH == ':')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__LLHH=TRUE__;
             };
           };
-          if (result__X4AH) {
-            result__HBYG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__HBYG=((__CHARACTER )(( 0)));
+          if (result__LLHH) {
+            result__G23G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__G23G=((__CHARACTER )(( 0)));
             } else {
-              result__HBYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__G23G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            __tmp__5NEE=(result__HBYG != '=');
+            __tmp__I1EE=(result__G23G != '=');
           } else {
-            __tmp__5NEE=FALSE__;
+            __tmp__I1EE=FALSE__;
           };
-          if (__tmp__5NEE) {
-            mute__VLEE=FALSE__;
-            t__QLEE=read_type__XBM(Self__3DHB,TRUE__);
-            if (((void *)t__QLEE == (void *)NULL)) {
-              pos__TMQG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_269));
-              put_position__IOG(pos__TMQG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+          if (__tmp__I1EE) {
+            mute__4YEE=FALSE__;
+            t__ZYEE=read_type__DCM(Self__JEHB,TRUE__);
+            if (((void *)t__ZYEE == (void *)NULL)) {
+              pos__D5VG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_279));
+              put_position__UOG(pos__D5VG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            Self__WVRF=beg__ULEE;
-            limit_up__XVRF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__TLEE)->parent_arrayed_collection__14I.upper__P5OD;
-            while ((Self__WVRF <= limit_up__XVRF)) {
-              add_last__ONV(type__SLEE,t__QLEE);
-              Self__WVRF=(__INTEGER)(Self__WVRF +  1);
+            Self__DFSF=beg__3YEE;
+            limit_up__EFSF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__2YEE)->parent_arrayed_collection__H5I.upper__15OD;
+            while ((Self__DFSF <= limit_up__EFSF)) {
+              add_last__0NV(type__1YEE,t__ZYEE);
+              Self__DFSF=(__INTEGER)(Self__DFSF +  1);
             };
-            beg__ULEE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__TLEE)->parent_arrayed_collection__14I.upper__P5OD +  1);
+            beg__3YEE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__2YEE)->parent_arrayed_collection__H5I.upper__15OD +  1);
           };
-          result__04AH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__04AH=FALSE__;
+          result__OLHH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__OLHH=FALSE__;
           } else {
-            result__14AH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__14AH=((__CHARACTER )(( 0)));
+            result__PLHH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__PLHH=((__CHARACTER )(( 0)));
             } else {
-              result__14AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__PLHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__14AH == ',')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__04AH=TRUE__;
+            if ((result__PLHH == ',')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__OLHH=TRUE__;
             };
           };
-        } while (result__04AH);
-        if ((beg__ULEE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__5Z5G)->parent_arrayed_collection__14I.upper__P5OD +  1))) {
-          if ((! mute__VLEE)) {
-            pos__ANQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_269));
-            put_position__IOG(pos__ANQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        } while (result__OLHH);
+        if ((beg__3YEE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__LGGH)->parent_arrayed_collection__H5I.upper__15OD +  1))) {
+          if ((! mute__4YEE)) {
+            pos__Q5VG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_279));
+            put_position__UOG(pos__Q5VG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          free__OS5(result__5Z5G);
-          free__QMQ(result__YTP);
+          free__0S5(result__LGGH);
+          free__2MQ(result__EUP);
         } else {
-          if (self_first__5DHB) {
-            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__YTP)->parent_arrayed_collection__NXC.storage__FMV)[ 0] != (void *)type_self__1TN)) {
-              __tmp__WQEE=TRUE__;
+          if (self_first__LEHB) {
+            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__EUP)->parent_arrayed_collection__ZXC.storage__RMV)[ 0] != (void *)type_self__HUN)) {
+              __tmp__53EE=TRUE__;
             } else {
-              if (((void *)((__PROTOTYPE *)object__3AC)->parent_named__5.name__LI == (void *)(&__string_40))) {
-                __tmp__PQEE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__YTP)->parent_arrayed_collection__NXC.storage__FMV)[ 0];
-                if (__tmp__PQEE==NULL) {
-                  __tmp__QQEE=NULL;
+              if (((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI == (void *)(&__string_40))) {
+                __tmp__Y3EE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__EUP)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
+                if (__tmp__Y3EE==NULL) {
+                  __tmp__Z3EE=NULL;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__PQEE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__Y3EE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__QQEE=NULL;
+                    __tmp__Z3EE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__QQEE=NULL;
+                    __tmp__Z3EE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__QQEE=((void *)__tmp__PQEE);
+                    __tmp__Z3EE=((void *)__tmp__Y3EE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__QQEE=NULL;
+                    __tmp__Z3EE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__QQEE=NULL;
+                    __tmp__Z3EE=NULL;
                   } break;
                   }
                 };
-                tb__XLEE=__tmp__QQEE;
-                __tmp__TQEE=((void *)__tmp__QQEE == (void *)NULL);
+                tb__AZEE=__tmp__Z3EE;
+                __tmp__23EE=((void *)__tmp__Z3EE == (void *)NULL);
               } else {
-                __tmp__TQEE=FALSE__;
+                __tmp__23EE=FALSE__;
               };
-              __tmp__WQEE=__tmp__TQEE;
+              __tmp__53EE=__tmp__23EE;
             };
-            __tmp__ZQEE=__tmp__WQEE;
+            __tmp__C4EE=__tmp__53EE;
           } else {
-            __tmp__ZQEE=FALSE__;
+            __tmp__C4EE=FALSE__;
           };
-          if (__tmp__ZQEE) {
-            pos__CNQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_266));
-            put_position__IOG(pos__CNQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if (__tmp__C4EE) {
+            pos__S5VG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_276));
+            put_position__UOG(pos__S5VG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__5Z5G)->parent_arrayed_collection__14I.upper__P5OD +  1) ==  1)) {
-            p__AZ5B=current_position__3WF();
-            n__BZ5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__5Z5G)->parent_arrayed_collection__14I.storage__FCPD)[ 0];
-            t__CZ5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__YTP)->parent_arrayed_collection__NXC.storage__FMV)[ 0];
-            result__AEAC=NULL;
-            ptr__BEAC=((__POINTER )(NULL));
-            typ_id__GEAC= 0;
-            sz__DEAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
-            if ((sz__DEAC ==  0)) {
-              result__AEAC=ITM_ARG__;
+          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__LGGH)->parent_arrayed_collection__H5I.upper__15OD +  1) ==  1)) {
+            p__MZ5B=current_position__JXF();
+            n__NZ5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__LGGH)->parent_arrayed_collection__H5I.storage__RCPD)[ 0];
+            t__OZ5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__EUP)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
+            result__MEAC=NULL;
+            ptr__NEAC=((__POINTER )(NULL));
+            typ_id__SEAC= 0;
+            sz__PEAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
+            if ((sz__PEAC ==  0)) {
+              result__MEAC=ITM_ARG__;
             } else {
-              typ_id__GEAC=-1;
-              clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__DEAC);
-              if ((typ_id__GEAC == (__INTEGER)(-  1))) {
-                a__K33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__L33G=(__UINTEGER_32)((__UINTEGER_32)(sz__DEAC + a__K33G) & (__UINTEGER_32)(~ a__K33G));
-                ptr_table__44AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__L33G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__34AH=((__POINTER )(NULL));
-                result__54AH=((__POINTER *)ptr_table__44AH)[ 0];
-                if ((result__54AH == (void *)NULL)) {
-                  result__54AH=new_lab__ARJ(new_size__L33G);
-                  next__34AH=(void *)((unsigned long)result__54AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L33G)));
-                  ((__POINTER *)next__34AH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__44AH)[ 0]=next__34AH;
+              typ_id__SEAC=-1;
+              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PEAC);
+              if ((typ_id__SEAC == (__INTEGER)(-  1))) {
+                a__ZIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__0IEH=(__UINTEGER_32)((__UINTEGER_32)(sz__PEAC + a__ZIEH) & (__UINTEGER_32)(~ a__ZIEH));
+                ptr_table__SLHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0IEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__RLHH=((__POINTER )(NULL));
+                result__TLHH=((__POINTER *)ptr_table__SLHH)[ 0];
+                if ((result__TLHH == (void *)NULL)) {
+                  result__TLHH=new_lab__MRJ(new_size__0IEH);
+                  next__RLHH=(void *)((unsigned long)result__TLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IEH)));
+                  ((__POINTER *)next__RLHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SLHH)[ 0]=next__RLHH;
                 } else {
-                  next__34AH=((__POINTER *)result__54AH)[ 0];
-                  if ((next__34AH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__54AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__L33G <<  1)) <=  4096)) {
-                      next__34AH=(void *)((unsigned long)result__54AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L33G)));
+                  next__RLHH=((__POINTER *)result__TLHH)[ 0];
+                  if ((next__RLHH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TLHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0IEH <<  1)) <=  4096)) {
+                      next__RLHH=(void *)((unsigned long)result__TLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IEH)));
                     } else {
-                      next__34AH=new_lab__ARJ(new_size__L33G);
+                      next__RLHH=new_lab__MRJ(new_size__0IEH);
                     };
-                    ((__POINTER *)next__34AH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__44AH)[ 0]=next__34AH;
+                    ((__POINTER *)next__RLHH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__SLHH)[ 0]=next__RLHH;
                   } else {
-                    ((__POINTER *)result__54AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__54AH=next__34AH;
+                    ((__POINTER *)result__TLHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RLHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__TLHH=next__RLHH;
                   };
                 };
-                ptr__BEAC=result__54AH;
+                ptr__NEAC=result__TLHH;
               } else {
-                t__P33G=((__UINTEGER_32 )typ_id__GEAC);
-                a__O33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__G5AH=(__UINTEGER_32)((__UINTEGER_32)(sz__DEAC + a__O33G) & (__UINTEGER_32)(~ a__O33G));
-                ptr_table__D5AH=((__POINTER )(&(table_type[(t__P33G)])));
-                lab_type__F5AH=(__UINTEGER_32)(t__P33G |  1);
-                next__C5AH=((__POINTER )(NULL));
-                result__E5AH=((__POINTER *)ptr_table__D5AH)[ 0];
-                if ((result__E5AH == (void *)NULL)) {
-                  result__E5AH=new_lab__ARJ(lab_type__F5AH);
-                  next__C5AH=(void *)((unsigned long)result__E5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5AH)));
-                  ((__POINTER *)next__C5AH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__D5AH)[ 0]=next__C5AH;
+                t__4IEH=((__UINTEGER_32 )typ_id__SEAC);
+                a__3IEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__0LHH=(__UINTEGER_32)((__UINTEGER_32)(sz__PEAC + a__3IEH) & (__UINTEGER_32)(~ a__3IEH));
+                ptr_table__XLHH=((__POINTER )(&(table_type[(t__4IEH)])));
+                lab_type__ZLHH=(__UINTEGER_32)(t__4IEH |  1);
+                next__WLHH=((__POINTER )(NULL));
+                result__YLHH=((__POINTER *)ptr_table__XLHH)[ 0];
+                if ((result__YLHH == (void *)NULL)) {
+                  result__YLHH=new_lab__MRJ(lab_type__ZLHH);
+                  next__WLHH=(void *)((unsigned long)result__YLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LHH)));
+                  ((__POINTER *)next__WLHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XLHH)[ 0]=next__WLHH;
                 } else {
-                  next__C5AH=((__POINTER *)result__E5AH)[ 0];
-                  if ((next__C5AH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E5AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__G5AH <<  1)) <=  4096)) {
-                      next__C5AH=(void *)((unsigned long)result__E5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5AH)));
+                  next__WLHH=((__POINTER *)result__YLHH)[ 0];
+                  if ((next__WLHH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YLHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0LHH <<  1)) <=  4096)) {
+                      next__WLHH=(void *)((unsigned long)result__YLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LHH)));
                     } else {
-                      next__C5AH=new_lab__ARJ(lab_type__F5AH);
+                      next__WLHH=new_lab__MRJ(lab_type__ZLHH);
                     };
-                    ((__POINTER *)next__C5AH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__D5AH)[ 0]=next__C5AH;
+                    ((__POINTER *)next__WLHH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__XLHH)[ 0]=next__WLHH;
                   } else {
-                    ((__POINTER *)result__E5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__E5AH=next__C5AH;
+                    ((__POINTER *)result__YLHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WLHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__YLHH=next__WLHH;
                   };
                 };
-                ptr__BEAC=result__E5AH;
+                ptr__NEAC=result__YLHH;
               };
-              result__AEAC=((__ITM_ARG *)ptr__BEAC);
-              *(result__AEAC) = *(ITM_ARG__);
-            };
-            Self__L0HC=((__ITM_ARG *)result__AEAC);
-            Self__L0HC->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ=p__AZ5B;
-            Self__L0HC->name__P0HC=n__BZ5B;
-            Self__L0HC->type__Q0HC=t__CZ5B;
-            result__WLEE=result__AEAC;
-            free__OS5(result__5Z5G);
-            free__QMQ(result__YTP);
-          } else {
-            result__5TKF=NULL;
-            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__5Z5G)->parent_arrayed_collection__14I.upper__P5OD <  0)) {
-              result__5TKF=empty_list__GUKF;
+              result__MEAC=((__ITM_ARG *)ptr__NEAC);
+              *(result__MEAC) = *(ITM_ARG__);
+            };
+            Self__X0HC=((__ITM_ARG *)result__MEAC);
+            Self__X0HC->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=p__MZ5B;
+            Self__X0HC->name__10HC=n__NZ5B;
+            Self__X0HC->type__20HC=t__OZ5B;
+            result__5YEE=result__MEAC;
+            free__0S5(result__LGGH);
+            free__2MQ(result__EUP);
+          } else {
+            result__PHLF=NULL;
+            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__LGGH)->parent_arrayed_collection__H5I.upper__15OD <  0)) {
+              result__PHLF=empty_list__WHLF;
             } else {
-              Self__E5OF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__QUKF);
-              e__F5OF=result__5Z5G;
-              result__Y5OF=NULL;
-              node__X5OF=((void **)Self__E5OF->buckets__55OF)[(__INTEGER)(hash_code__WCQF(result__5Z5G) % Self__E5OF->capacity__05OF)];
-              until_do__4DQF:
+              Self__MCPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__AILF);
+              e__NCPF=result__LGGH;
+              result__ADPF=NULL;
+              node__5CPF=((void **)Self__MCPF->buckets__HDPF)[(__INTEGER)(hash_code__DNQF(result__LGGH) % Self__MCPF->capacity__CDPF)];
+              until_do__LOQF:
               {
-                if (((void *)node__X5OF == (void *)NULL)) {
-                  __tmp__QAPF=TRUE__;
+                if (((void *)node__5CPF == (void *)NULL)) {
+                  __tmp__YDPF=TRUE__;
                 } else {
-                  Self__VTDG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__X5OF)->item__LAPF);
-                  result__YTDG=FALSE__;
-                  o__ZTDG=NULL;
-                  if (((void *)Self__VTDG == (void *)e__F5OF)) {
-                    result__YTDG=TRUE__;
+                  Self__Z4GG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__5CPF)->item__TDPF);
+                  result__24GG=FALSE__;
+                  o__34GG=NULL;
+                  if (((void *)Self__Z4GG == (void *)e__NCPF)) {
+                    result__24GG=TRUE__;
                   } else {
-                    if (e__F5OF==NULL) {
-                      __tmp__FUDG=NULL;
+                    if (e__NCPF==NULL) {
+                      __tmp__J5GG=NULL;
                     } else {
-                      __tmp__FUDG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__F5OF);
+                      __tmp__J5GG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__NCPF);
                     };
-                    o__ZTDG=__tmp__FUDG;
-                    if ((((void *)__tmp__FUDG != (void *)NULL) && (Self__VTDG->parent_arrayed_collection__14I.upper__P5OD == __tmp__FUDG->parent_arrayed_collection__14I.upper__P5OD))) {
-                      __tmp__VUDG=Self__VTDG->parent_arrayed_collection__14I.storage__FCPD;
-                      __tmp__XUDG=__tmp__FUDG->parent_arrayed_collection__14I.storage__FCPD;
-                      __tmp__0UDG=(__INTEGER)(Self__VTDG->parent_arrayed_collection__14I.upper__P5OD +  1);
-                      Self__KPHG=((void **)__tmp__VUDG);
-                      i__4PHG=(__INTEGER)(__tmp__0UDG -  1);
-                      while (((i__4PHG >=  0) && ((void *)Self__KPHG[i__4PHG] == (void *)((void **)__tmp__XUDG)[i__4PHG]))) {
-                        i__4PHG=(__INTEGER)(i__4PHG -  1);
+                    o__34GG=__tmp__J5GG;
+                    if ((((void *)__tmp__J5GG != (void *)NULL) && (Self__Z4GG->parent_arrayed_collection__H5I.upper__15OD == __tmp__J5GG->parent_arrayed_collection__H5I.upper__15OD))) {
+                      __tmp__Z5GG=Self__Z4GG->parent_arrayed_collection__H5I.storage__RCPD;
+                      __tmp__15GG=__tmp__J5GG->parent_arrayed_collection__H5I.storage__RCPD;
+                      __tmp__45GG=(__INTEGER)(Self__Z4GG->parent_arrayed_collection__H5I.upper__15OD +  1);
+                      Self__TQMG=((void **)__tmp__Z5GG);
+                      i__HRMG=(__INTEGER)(__tmp__45GG -  1);
+                      while (((i__HRMG >=  0) && ((void *)Self__TQMG[i__HRMG] == (void *)((void **)__tmp__15GG)[i__HRMG]))) {
+                        i__HRMG=(__INTEGER)(i__HRMG -  1);
                       };
-                      result__YTDG=(i__4PHG <  0);
+                      result__24GG=(i__HRMG <  0);
                     };
                   };
-                  __tmp__QAPF=result__YTDG;
+                  __tmp__YDPF=result__24GG;
                 };
-                if ((! __tmp__QAPF)) {
-                  node__X5OF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__X5OF)->next__XAPF;
-                  goto until_do__4DQF;
+                if ((! __tmp__YDPF)) {
+                  node__5CPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__5CPF)->next__5DPF;
+                  goto until_do__LOQF;
                 };
               };
-              if (((void *)node__X5OF != (void *)NULL)) {
-                result__Y5OF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__X5OF)->item__LAPF;
+              if (((void *)node__5CPF != (void *)NULL)) {
+                result__ADPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__5CPF)->item__TDPF;
               };
-              result__5TKF=result__Y5OF;
-              if (((void *)result__Y5OF == (void *)NULL)) {
-                result__5TKF=create_with_capacity__VGRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__5Z5G)->parent_arrayed_collection__14I.upper__P5OD +  1));
-                copy__Q2RD(result__5TKF,result__5Z5G);
-                Self__EDPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__QUKF);
-                e__FDPF=result__5TKF;
-                e__I5AH=result__5TKF;
-                node__J5AH=((void **)Self__EDPF->buckets__55OF)[(__INTEGER)(hash_code__WCQF(result__5TKF) % Self__EDPF->capacity__05OF)];
-                while ((! (((void *)node__J5AH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__J5AH)->item__LAPF == (void *)e__I5AH)))) {
-                  node__J5AH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__J5AH)->next__XAPF;
+              result__PHLF=result__ADPF;
+              if (((void *)result__ADPF == (void *)NULL)) {
+                result__PHLF=create_with_capacity__BHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__LGGH)->parent_arrayed_collection__H5I.upper__15OD +  1));
+                copy__22RD(result__PHLF,result__LGGH);
+                Self__MGPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__AILF);
+                e__NGPF=result__PHLF;
+                e__2LHH=result__PHLF;
+                node__3LHH=((void **)Self__MGPF->buckets__HDPF)[(__INTEGER)(hash_code__DNQF(result__PHLF) % Self__MGPF->capacity__CDPF)];
+                while ((! (((void *)node__3LHH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3LHH)->item__TDPF == (void *)e__2LHH)))) {
+                  node__3LHH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3LHH)->next__5DPF;
                 };
-                e__SLQF=result__5TKF;
-                node__1LQF=((void **)Self__EDPF->buckets__55OF)[(__INTEGER)(hash_code__WCQF(result__5TKF) % Self__EDPF->capacity__05OF)];
-                while ((! (((void *)node__1LQF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__1LQF)->item__LAPF == (void *)e__SLQF)))) {
-                  node__1LQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__1LQF)->next__XAPF;
+                e__5VQF=result__PHLF;
+                node__IWQF=((void **)Self__MGPF->buckets__HDPF)[(__INTEGER)(hash_code__DNQF(result__PHLF) % Self__MGPF->capacity__CDPF)];
+                while ((! (((void *)node__IWQF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__IWQF)->item__TDPF == (void *)e__5VQF)))) {
+                  node__IWQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__IWQF)->next__5DPF;
                 };
-                h__MDPF=hash_code__WCQF(result__5TKF);
-                idx__NDPF=(__INTEGER)(h__MDPF % Self__EDPF->capacity__05OF);
-                node__ODPF=((void **)Self__EDPF->buckets__55OF)[idx__NDPF];
-                while ((! (((void *)node__ODPF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__ODPF)->item__LAPF == (void *)e__FDPF)))) {
-                  node__ODPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__ODPF)->next__XAPF;
+                h__UGPF=hash_code__DNQF(result__PHLF);
+                idx__VGPF=(__INTEGER)(h__UGPF % Self__MGPF->capacity__CDPF);
+                node__WGPF=((void **)Self__MGPF->buckets__HDPF)[idx__VGPF];
+                while ((! (((void *)node__WGPF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__WGPF)->item__TDPF == (void *)e__NGPF)))) {
+                  node__WGPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__WGPF)->next__5DPF;
                 };
-                if (((void *)node__ODPF == (void *)NULL)) {
-                  if ((Self__EDPF->capacity__05OF == Self__EDPF->count__REPF)) {
-                    idx__EG0F= 0;
-                    node1__HG0F=NULL;
-                    node2__IG0F=NULL;
-                    new_capacity__FG0F=prime_number_ceiling__L41((__INTEGER)(Self__EDPF->capacity__05OF +  1));
-                    old_buckets__GG0F=Self__EDPF->buckets__55OF;
-                    Self__EDPF->buckets__55OF=create__DPSF(new_capacity__FG0F);
-                    i__DG0F=(__INTEGER)(Self__EDPF->capacity__05OF -  1);
-                    Self__EDPF->capacity__05OF=new_capacity__FG0F;
-                    while ((i__DG0F >=  0)) {
-                      node1__HG0F=((void **)old_buckets__GG0F)[i__DG0F];
-                      while (((void *)node1__HG0F != (void *)NULL)) {
-                        node2__IG0F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__HG0F)->next__XAPF;
-                        idx__EG0F=(__INTEGER)(hash_code__WCQF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__HG0F)->item__LAPF) % Self__EDPF->capacity__05OF);
-                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__HG0F)->next__XAPF=((void **)Self__EDPF->buckets__55OF)[idx__EG0F];
-                        ((void **)Self__EDPF->buckets__55OF)[idx__EG0F]=node1__HG0F;
-                        node1__HG0F=node2__IG0F;
+                if (((void *)node__WGPF == (void *)NULL)) {
+                  if ((Self__MGPF->capacity__CDPF == Self__MGPF->count__ZHPF)) {
+                    idx__KB1F= 0;
+                    node1__NB1F=NULL;
+                    node2__OB1F=NULL;
+                    new_capacity__LB1F=prime_number_ceiling__X41((__INTEGER)(Self__MGPF->capacity__CDPF +  1));
+                    old_buckets__MB1F=Self__MGPF->buckets__HDPF;
+                    Self__MGPF->buckets__HDPF=create__KDTF(new_capacity__LB1F);
+                    i__JB1F=(__INTEGER)(Self__MGPF->capacity__CDPF -  1);
+                    Self__MGPF->capacity__CDPF=new_capacity__LB1F;
+                    while ((i__JB1F >=  0)) {
+                      node1__NB1F=((void **)old_buckets__MB1F)[i__JB1F];
+                      while (((void *)node1__NB1F != (void *)NULL)) {
+                        node2__OB1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__NB1F)->next__5DPF;
+                        idx__KB1F=(__INTEGER)(hash_code__DNQF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__NB1F)->item__TDPF) % Self__MGPF->capacity__CDPF);
+                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__NB1F)->next__5DPF=((void **)Self__MGPF->buckets__HDPF)[idx__KB1F];
+                        ((void **)Self__MGPF->buckets__HDPF)[idx__KB1F]=node1__NB1F;
+                        node1__NB1F=node2__OB1F;
                       };
-                      i__DG0F=(__INTEGER)(i__DG0F -  1);
+                      i__JB1F=(__INTEGER)(i__JB1F -  1);
                     };
-                    idx__NDPF=(__INTEGER)(h__MDPF % Self__EDPF->capacity__05OF);
+                    idx__VGPF=(__INTEGER)(h__UGPF % Self__MGPF->capacity__CDPF);
                   };
-                  __tmp__4EPF=((void **)Self__EDPF->buckets__55OF)[idx__NDPF];
-                  result__VHZF=NULL;
-                  ptr__WHZF=((__POINTER )(NULL));
-                  typ_id__1HZF= 0;
-                  sz__YHZF=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
-                  if ((sz__YHZF ==  0)) {
-                    result__VHZF=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                  __tmp__GIPF=((void **)Self__MGPF->buckets__HDPF)[idx__VGPF];
+                  result__PD0F=NULL;
+                  ptr__QD0F=((__POINTER )(NULL));
+                  typ_id__VD0F= 0;
+                  sz__SD0F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
+                  if ((sz__SD0F ==  0)) {
+                    result__PD0F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
                   } else {
-                    typ_id__1HZF=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
-                    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__YHZF);
-                    if ((typ_id__1HZF == (__INTEGER)(-  1))) {
-                      a__J23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                      new_size__K23G=(__UINTEGER_32)((__UINTEGER_32)(sz__YHZF + a__J23G) & (__UINTEGER_32)(~ a__J23G));
-                      ptr_table__M5AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K23G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                      next__L5AH=((__POINTER )(NULL));
-                      result__N5AH=((__POINTER *)ptr_table__M5AH)[ 0];
-                      if ((result__N5AH == (void *)NULL)) {
-                        result__N5AH=new_lab__ARJ(new_size__K23G);
-                        next__L5AH=(void *)((unsigned long)result__N5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K23G)));
-                        ((__POINTER *)next__L5AH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__M5AH)[ 0]=next__L5AH;
+                    typ_id__VD0F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SD0F);
+                    if ((typ_id__VD0F == (__INTEGER)(-  1))) {
+                      a__YHEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__ZHEH=(__UINTEGER_32)((__UINTEGER_32)(sz__SD0F + a__YHEH) & (__UINTEGER_32)(~ a__YHEH));
+                      ptr_table__AMHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZHEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                      next__5LHH=((__POINTER )(NULL));
+                      result__BMHH=((__POINTER *)ptr_table__AMHH)[ 0];
+                      if ((result__BMHH == (void *)NULL)) {
+                        result__BMHH=new_lab__MRJ(new_size__ZHEH);
+                        next__5LHH=(void *)((unsigned long)result__BMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZHEH)));
+                        ((__POINTER *)next__5LHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__AMHH)[ 0]=next__5LHH;
                       } else {
-                        next__L5AH=((__POINTER *)result__N5AH)[ 0];
-                        if ((next__L5AH == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N5AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__K23G <<  1)) <=  4096)) {
-                            next__L5AH=(void *)((unsigned long)result__N5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K23G)));
+                        next__5LHH=((__POINTER *)result__BMHH)[ 0];
+                        if ((next__5LHH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZHEH <<  1)) <=  4096)) {
+                            next__5LHH=(void *)((unsigned long)result__BMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZHEH)));
                           } else {
-                            next__L5AH=new_lab__ARJ(new_size__K23G);
+                            next__5LHH=new_lab__MRJ(new_size__ZHEH);
                           };
-                          ((__POINTER *)next__L5AH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__M5AH)[ 0]=next__L5AH;
+                          ((__POINTER *)next__5LHH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__AMHH)[ 0]=next__5LHH;
                         } else {
-                          ((__POINTER *)result__N5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__N5AH=next__L5AH;
+                          ((__POINTER *)result__BMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5LHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__BMHH=next__5LHH;
                         };
                       };
-                      ptr__WHZF=result__N5AH;
+                      ptr__QD0F=result__BMHH;
                     } else {
-                      t__O23G=((__UINTEGER_32 )typ_id__1HZF);
-                      a__N23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                      new_size__U5AH=(__UINTEGER_32)((__UINTEGER_32)(sz__YHZF + a__N23G) & (__UINTEGER_32)(~ a__N23G));
-                      ptr_table__R5AH=((__POINTER )(&(table_type[(t__O23G)])));
-                      lab_type__T5AH=(__UINTEGER_32)(t__O23G |  1);
-                      next__Q5AH=((__POINTER )(NULL));
-                      result__S5AH=((__POINTER *)ptr_table__R5AH)[ 0];
-                      if ((result__S5AH == (void *)NULL)) {
-                        result__S5AH=new_lab__ARJ(lab_type__T5AH);
-                        next__Q5AH=(void *)((unsigned long)result__S5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U5AH)));
-                        ((__POINTER *)next__Q5AH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__R5AH)[ 0]=next__Q5AH;
+                      t__3HEH=((__UINTEGER_32 )typ_id__VD0F);
+                      a__2HEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__IMHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SD0F + a__2HEH) & (__UINTEGER_32)(~ a__2HEH));
+                      ptr_table__FMHH=((__POINTER )(&(table_type[(t__3HEH)])));
+                      lab_type__HMHH=(__UINTEGER_32)(t__3HEH |  1);
+                      next__EMHH=((__POINTER )(NULL));
+                      result__GMHH=((__POINTER *)ptr_table__FMHH)[ 0];
+                      if ((result__GMHH == (void *)NULL)) {
+                        result__GMHH=new_lab__MRJ(lab_type__HMHH);
+                        next__EMHH=(void *)((unsigned long)result__GMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IMHH)));
+                        ((__POINTER *)next__EMHH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__FMHH)[ 0]=next__EMHH;
                       } else {
-                        next__Q5AH=((__POINTER *)result__S5AH)[ 0];
-                        if ((next__Q5AH == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S5AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__U5AH <<  1)) <=  4096)) {
-                            next__Q5AH=(void *)((unsigned long)result__S5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U5AH)));
+                        next__EMHH=((__POINTER *)result__GMHH)[ 0];
+                        if ((next__EMHH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IMHH <<  1)) <=  4096)) {
+                            next__EMHH=(void *)((unsigned long)result__GMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IMHH)));
                           } else {
-                            next__Q5AH=new_lab__ARJ(lab_type__T5AH);
+                            next__EMHH=new_lab__MRJ(lab_type__HMHH);
                           };
-                          ((__POINTER *)next__Q5AH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__R5AH)[ 0]=next__Q5AH;
+                          ((__POINTER *)next__EMHH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__FMHH)[ 0]=next__EMHH;
                         } else {
-                          ((__POINTER *)result__S5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__S5AH=next__Q5AH;
+                          ((__POINTER *)result__GMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EMHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__GMHH=next__EMHH;
                         };
                       };
-                      ptr__WHZF=result__S5AH;
+                      ptr__QD0F=result__GMHH;
                     };
-                    result__VHZF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__WHZF);
-                    *(result__VHZF) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__PD0F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__QD0F);
+                    *(result__PD0F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  Self__YP2F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__VHZF);
-                  Self__YP2F->item__LAPF=result__5TKF;
-                  Self__YP2F->next__XAPF=__tmp__4EPF;
-                  node__ODPF=result__VHZF;
-                  ((void **)Self__EDPF->buckets__55OF)[idx__NDPF]=result__VHZF;
-                  Self__EDPF->count__REPF=(__INTEGER)(Self__EDPF->count__REPF +  1);
+                  Self__ST3F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__PD0F);
+                  Self__ST3F->item__TDPF=result__PHLF;
+                  Self__ST3F->next__5DPF=__tmp__GIPF;
+                  node__WGPF=result__PD0F;
+                  ((void **)Self__MGPF->buckets__HDPF)[idx__VGPF]=result__PD0F;
+                  Self__MGPF->count__ZHPF=(__INTEGER)(Self__MGPF->count__ZHPF +  1);
                 };
               };
             };
-            free__OS5(result__5Z5G);
-            name__TLEE=result__5TKF;
-            type__SLEE=alias__0UP(result__YTP);
-            tm__RLEE=get__WIP(type__SLEE);
-            p__BVKF=current_position__3WF();
-            result__ELLF=NULL;
-            ptr__FLLF=((__POINTER )(NULL));
-            typ_id__KLLF= 0;
-            sz__HLLF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
-            if ((sz__HLLF ==  0)) {
-              result__ELLF=ITM_ARGS__;
+            free__0S5(result__LGGH);
+            name__2YEE=result__PHLF;
+            type__1YEE=alias__GVP(result__EUP);
+            tm__0YEE=get__CJP(type__1YEE);
+            p__RILF=current_position__JXF();
+            result__OZLF=NULL;
+            ptr__PZLF=((__POINTER )(NULL));
+            typ_id__UZLF= 0;
+            sz__RZLF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
+            if ((sz__RZLF ==  0)) {
+              result__OZLF=ITM_ARGS__;
             } else {
-              typ_id__KLLF=-1;
-              clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__HLLF);
-              if ((typ_id__KLLF == (__INTEGER)(-  1))) {
-                a__U23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__V23G=(__UINTEGER_32)((__UINTEGER_32)(sz__HLLF + a__U23G) & (__UINTEGER_32)(~ a__U23G));
-                ptr_table__W5AH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V23G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__V5AH=((__POINTER )(NULL));
-                result__X5AH=((__POINTER *)ptr_table__W5AH)[ 0];
-                if ((result__X5AH == (void *)NULL)) {
-                  result__X5AH=new_lab__ARJ(new_size__V23G);
-                  next__V5AH=(void *)((unsigned long)result__X5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V23G)));
-                  ((__POINTER *)next__V5AH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__W5AH)[ 0]=next__V5AH;
+              typ_id__UZLF=-1;
+              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__RZLF);
+              if ((typ_id__UZLF == (__INTEGER)(-  1))) {
+                a__DIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__EIEH=(__UINTEGER_32)((__UINTEGER_32)(sz__RZLF + a__DIEH) & (__UINTEGER_32)(~ a__DIEH));
+                ptr_table__KMHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EIEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__JMHH=((__POINTER )(NULL));
+                result__LMHH=((__POINTER *)ptr_table__KMHH)[ 0];
+                if ((result__LMHH == (void *)NULL)) {
+                  result__LMHH=new_lab__MRJ(new_size__EIEH);
+                  next__JMHH=(void *)((unsigned long)result__LMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIEH)));
+                  ((__POINTER *)next__JMHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KMHH)[ 0]=next__JMHH;
                 } else {
-                  next__V5AH=((__POINTER *)result__X5AH)[ 0];
-                  if ((next__V5AH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X5AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__V23G <<  1)) <=  4096)) {
-                      next__V5AH=(void *)((unsigned long)result__X5AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V23G)));
+                  next__JMHH=((__POINTER *)result__LMHH)[ 0];
+                  if ((next__JMHH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EIEH <<  1)) <=  4096)) {
+                      next__JMHH=(void *)((unsigned long)result__LMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIEH)));
                     } else {
-                      next__V5AH=new_lab__ARJ(new_size__V23G);
+                      next__JMHH=new_lab__MRJ(new_size__EIEH);
                     };
-                    ((__POINTER *)next__V5AH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__W5AH)[ 0]=next__V5AH;
+                    ((__POINTER *)next__JMHH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__KMHH)[ 0]=next__JMHH;
                   } else {
-                    ((__POINTER *)result__X5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__X5AH=next__V5AH;
+                    ((__POINTER *)result__LMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JMHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__LMHH=next__JMHH;
                   };
                 };
-                ptr__FLLF=result__X5AH;
+                ptr__PZLF=result__LMHH;
               } else {
-                t__Z23G=((__UINTEGER_32 )typ_id__KLLF);
-                a__Y23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__45AH=(__UINTEGER_32)((__UINTEGER_32)(sz__HLLF + a__Y23G) & (__UINTEGER_32)(~ a__Y23G));
-                ptr_table__15AH=((__POINTER )(&(table_type[(t__Z23G)])));
-                lab_type__35AH=(__UINTEGER_32)(t__Z23G |  1);
-                next__05AH=((__POINTER )(NULL));
-                result__25AH=((__POINTER *)ptr_table__15AH)[ 0];
-                if ((result__25AH == (void *)NULL)) {
-                  result__25AH=new_lab__ARJ(lab_type__35AH);
-                  next__05AH=(void *)((unsigned long)result__25AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__45AH)));
-                  ((__POINTER *)next__05AH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__15AH)[ 0]=next__05AH;
+                t__IIEH=((__UINTEGER_32 )typ_id__UZLF);
+                a__HIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__SMHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RZLF + a__HIEH) & (__UINTEGER_32)(~ a__HIEH));
+                ptr_table__PMHH=((__POINTER )(&(table_type[(t__IIEH)])));
+                lab_type__RMHH=(__UINTEGER_32)(t__IIEH |  1);
+                next__OMHH=((__POINTER )(NULL));
+                result__QMHH=((__POINTER *)ptr_table__PMHH)[ 0];
+                if ((result__QMHH == (void *)NULL)) {
+                  result__QMHH=new_lab__MRJ(lab_type__RMHH);
+                  next__OMHH=(void *)((unsigned long)result__QMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SMHH)));
+                  ((__POINTER *)next__OMHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PMHH)[ 0]=next__OMHH;
                 } else {
-                  next__05AH=((__POINTER *)result__25AH)[ 0];
-                  if ((next__05AH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__25AH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__45AH <<  1)) <=  4096)) {
-                      next__05AH=(void *)((unsigned long)result__25AH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__45AH)));
+                  next__OMHH=((__POINTER *)result__QMHH)[ 0];
+                  if ((next__OMHH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SMHH <<  1)) <=  4096)) {
+                      next__OMHH=(void *)((unsigned long)result__QMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SMHH)));
                     } else {
-                      next__05AH=new_lab__ARJ(lab_type__35AH);
+                      next__OMHH=new_lab__MRJ(lab_type__RMHH);
                     };
-                    ((__POINTER *)next__05AH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__15AH)[ 0]=next__05AH;
+                    ((__POINTER *)next__OMHH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__PMHH)[ 0]=next__OMHH;
                   } else {
-                    ((__POINTER *)result__25AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__05AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__25AH=next__05AH;
+                    ((__POINTER *)result__QMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OMHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__QMHH=next__OMHH;
                   };
                 };
-                ptr__FLLF=result__25AH;
+                ptr__PZLF=result__QMHH;
               };
-              result__ELLF=((__ITM_ARGS *)ptr__FLLF);
-              *(result__ELLF) = *(ITM_ARGS__);
+              result__OZLF=((__ITM_ARGS *)ptr__PZLF);
+              *(result__OZLF) = *(ITM_ARGS__);
             };
-            Self__TZOF=((__ITM_ARGS *)result__ELLF);
-            Self__TZOF->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ=p__BVKF;
-            Self__TZOF->name__QPOF=result__5TKF;
-            Self__TZOF->type__VQOF=tm__RLEE;
-            result__WLEE=result__ELLF;
+            Self__J1OF=((__ITM_ARGS *)result__OZLF);
+            Self__J1OF->parent_itm_argument__B5EE.parent_itm_code__S4M.position__NDJ=p__RILF;
+            Self__J1OF->name__N1OF=result__PHLF;
+            Self__J1OF->type__O1OF=tm__0YEE;
+            result__5YEE=result__OZLF;
           };
-          if (is_shorter__WY) {
-            __tmp__FSEE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__TLEE)->parent_arrayed_collection__14I.upper__P5OD;
-            Self__KVKF= 0;
-            while ((Self__KVKF <= __tmp__FSEE)) {
-              add__WLHB(short_local__3BC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__TLEE)->parent_arrayed_collection__14I.storage__FCPD)[Self__KVKF]);
-              Self__KVKF=(__INTEGER)(Self__KVKF +  1);
+          if (is_shorter__5Y) {
+            __tmp__O5EE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__2YEE)->parent_arrayed_collection__H5I.upper__15OD;
+            Self__0ILF= 0;
+            while ((Self__0ILF <= __tmp__O5EE)) {
+              add__CMHB(short_local__JCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__2YEE)->parent_arrayed_collection__H5I.storage__RCPD)[Self__0ILF]);
+              Self__0ILF=(__INTEGER)(Self__0ILF +  1);
             };
           };
         };
       };
-      result__BEHB=result__WLEE;
-      if (((void *)result__WLEE == (void *)NULL)) {
-        if ((! mute__4DHB)) {
-          pos__MPQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_270));
-          put_position__IOG(pos__MPQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      result__NEHB=result__5YEE;
+      if (((void *)result__5YEE == (void *)NULL)) {
+        if ((! mute__KEHB)) {
+          pos__2BWG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_280));
+          put_position__UOG(pos__2BWG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__55AH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__55AH=FALSE__;
+        result__TMHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__TMHH=FALSE__;
         } else {
-          result__AABH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__AABH=((__CHARACTER )(( 0)));
+          result__UMHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__UMHH=((__CHARACTER )(( 0)));
           } else {
-            result__AABH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__UMHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__AABH == ')')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__55AH=TRUE__;
+          if ((result__UMHH == ')')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__TMHH=TRUE__;
           };
         };
-        if ((! result__55AH)) {
-          pos__OPQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_248));
-          put_position__IOG(pos__OPQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__TMHH)) {
+          pos__4BWG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_258));
+          put_position__UOG(pos__4BWG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__BEHB);
+  return(result__NEHB);
 }
 
-static void* read_slot_operator__ZT5B(void *list_arg__1T5B)
+static void* read_slot_operator__FU5B(void *list_arg__HU5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  void *associativity__5T5B,*name__3T5B,*pretty_name__4T5B;
-  void *arg__BU5B;
-  __POSITION pos__QPQG,pos__SPQG,pos__UPQG,pos__ZPQG,pos__1PQG;
-  __POSITION pos__3PQG,__tmp__1Y5B;
-  void *__tmp__2Y5B;
-  __ITM_SLOT_OPERATOR *result__KLAC,*Self__U1HC;
-  __POINTER ptr__LLAC,ptr_table__KABH,next__JABH,result__LABH;
-  __POINTER ptr_table__PABH,next__OABH,result__QABH;
-  __INTEGER typ_id__QLAC;
-  __UINTEGER_32 sz__NLAC,a__C33G,new_size__D33G,t__H33G,a__G33G;
-  __UINTEGER_32 new_size__SABH,lab_type__RABH;
-  __BOOLEAN result__CABH,result__GABH,__tmp__AW5B,result__IABH;
-  __CHARACTER result__DABH;
-  associativity__5T5B=NULL;
-  arg__BU5B=NULL;
-  if ((! read_operator__1MM())) {
-    pos__QPQG=current_position__3WF();
-    put_error__text__4MG( 0,(&__string_271));
-    put_position__IOG(pos__QPQG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  void *associativity__LU5B,*name__JU5B,*pretty_name__KU5B;
+  __INTEGER priority__MU5B,typ_id__2LAC;
+  void *arg__NU5B;
+  __POSITION pos__ACWG,pos__CCWG,pos__ECWG,pos__JCWG,pos__LCWG;
+  __POSITION pos__NCWG,__tmp__HZ5B;
+  void *__tmp__IZ5B;
+  __ITM_SLOT_OPERATOR *result__WLAC,*Self__A2HC,*Self__B0HC;
+  __POINTER ptr__XLAC,ptr_table__4MHH,next__3MHH,result__5MHH;
+  __POINTER ptr_table__DNHH,next__CNHH,result__ENHH;
+  __UINTEGER_32 sz__ZLAC,a__RIEH,new_size__SIEH,t__WIEH,a__VIEH;
+  __UINTEGER_32 new_size__GNHH,lab_type__FNHH;
+  __BOOLEAN result__WMHH,result__0MHH,__tmp__MW5B,result__2MHH;
+  __CHARACTER result__XMHH;
+  associativity__LU5B=NULL;
+  priority__MU5B= 0;
+  arg__NU5B=NULL;
+  if ((! read_operator__HNM())) {
+    pos__ACWG=current_position__JXF();
+    put_error__text__KNG( 0,(&__string_281));
+    put_position__UOG(pos__ACWG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  if ((((void *)last_string__2ZC == (void *)(&__string_16)) || ((void *)last_string__2ZC == (void *)(&__string_17)))) {
-    pos__SPQG=current_position__3WF();
-    put_error__text__4MG( 0,(&__string_272));
-    put_position__IOG(pos__SPQG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if ((((void *)last_string__I0C == (void *)(&__string_16)) || ((void *)last_string__I0C == (void *)(&__string_17)))) {
+    pos__CCWG=current_position__JXF();
+    put_error__text__KNG( 0,(&__string_282));
+    put_position__UOG(pos__CCWG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  name__3T5B=last_string__2ZC;
-  pretty_name__4T5B=name__3T5B;
-  result__CABH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__CABH=FALSE__;
+  name__JU5B=last_string__I0C;
+  pretty_name__KU5B=name__JU5B;
+  result__WMHH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__WMHH=FALSE__;
   } else {
-    result__DABH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__DABH=((__CHARACTER )(( 0)));
+    result__XMHH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__XMHH=((__CHARACTER )(( 0)));
     } else {
-      result__DABH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__XMHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__DABH == '\'')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__CABH=TRUE__;
+    if ((result__XMHH == '\'')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__WMHH=TRUE__;
     };
   };
-  if ((! result__CABH)) {
-    pos__UPQG=current_position__3WF();
-    put_error__text__4MG( 2,(&__string_273));
-    put_position__IOG(pos__UPQG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if ((! result__WMHH)) {
+    pos__ECWG=current_position__JXF();
+    put_error__text__KNG( 2,(&__string_283));
+    put_position__UOG(pos__ECWG);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  result__GABH=read_word__EPF((&__string_6));
-  if (is_shorter__WY) {
-    if (result__GABH) {
+  result__0MHH=read_word__QPF((&__string_6));
+  if (is_shorter__5Y) {
+    if (result__0MHH) {
       if (((void *)(&__string_6) == (void *)(&__string_4))) {
-        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       } else {
-        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       };
     };
   };
-  if (result__GABH) {
-    __tmp__AW5B=TRUE__;
+  if (result__0MHH) {
+    __tmp__MW5B=TRUE__;
   } else {
-    result__IABH=read_word__EPF((&__string_5));
-    if (is_shorter__WY) {
-      if (result__IABH) {
+    result__2MHH=read_word__QPF((&__string_5));
+    if (is_shorter__5Y) {
+      if (result__2MHH) {
         if (((void *)(&__string_5) == (void *)(&__string_4))) {
-          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         } else {
-          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         };
       };
     };
-    __tmp__AW5B=result__IABH;
+    __tmp__MW5B=result__2MHH;
   };
-  if (__tmp__AW5B) {
-    associativity__5T5B=last_string__2ZC;
-    read_integer__U1P();
+  if (__tmp__MW5B) {
+    associativity__LU5B=last_string__I0C;
+    if (read_integer__A2P()) {
+      priority__MU5B=((__INTEGER )last_integer__ZRO);
+    };
   };
-  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__1T5B)->parent_arrayed_collection__ZBZB.upper__S5GC <  0)) {
-    arg__BU5B=read_loc_arg__with_self__2DHB(PARSER__,FALSE__,TRUE__);
-    if (((void *)arg__BU5B == (void *)NULL)) {
-      pos__ZPQG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_274));
-      put_position__IOG(pos__ZPQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__HU5B)->parent_arrayed_collection__FCZB.upper__45GC <  0)) {
+    arg__NU5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,TRUE__);
+    if (((void *)arg__NU5B == (void *)NULL)) {
+      pos__JCWG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_284));
+      put_position__UOG(pos__JCWG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    add_last__O5GC(list_arg__1T5B,arg__BU5B);
-    name__3T5B=operator__name__RDO((&__string_83),name__3T5B);
-    if (((void *)associativity__5T5B != (void *)NULL)) {
-      pos__1PQG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_275));
-      put_position__IOG(pos__1PQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    add_last__05GC(list_arg__HU5B,arg__NU5B);
+    name__JU5B=operator__name__3DO((&__string_83),name__JU5B);
+    if (((void *)associativity__LU5B != (void *)NULL)) {
+      pos__LCWG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_285));
+      put_position__UOG(pos__LCWG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    arg__BU5B=read_loc_arg__with_self__2DHB(PARSER__,FALSE__,FALSE__);
-    if (((void *)arg__BU5B != (void *)NULL)) {
-      add_last__O5GC(list_arg__1T5B,arg__BU5B);
-      name__3T5B=operator__name__RDO((&__string_81),name__3T5B);
-      if (((void *)associativity__5T5B == (void *)NULL)) {
-        associativity__5T5B=(&__string_6);
-      };
-    } else {
-      name__3T5B=operator__name__RDO((&__string_82),name__3T5B);
-      if (((void *)associativity__5T5B != (void *)NULL)) {
-        pos__3PQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_276));
-        put_position__IOG(pos__3PQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+    arg__NU5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__NU5B != (void *)NULL)) {
+      add_last__05GC(list_arg__HU5B,arg__NU5B);
+      name__JU5B=operator__name__3DO((&__string_81),name__JU5B);
+      if (((void *)associativity__LU5B == (void *)NULL)) {
+        associativity__LU5B=(&__string_6);
+      };
+    } else {
+      name__JU5B=operator__name__3DO((&__string_82),name__JU5B);
+      if (((void *)associativity__LU5B != (void *)NULL)) {
+        pos__NCWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_286));
+        put_position__UOG(pos__NCWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  __tmp__1Y5B=current_position__3WF();
-  __tmp__2Y5B=last_section__L0C;
-  result__KLAC=NULL;
-  ptr__LLAC=((__POINTER )(NULL));
-  typ_id__QLAC= 0;
-  sz__NLAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
-  if ((sz__NLAC ==  0)) {
-    result__KLAC=ITM_SLOT_OPERATOR__;
+  __tmp__HZ5B=current_position__JXF();
+  __tmp__IZ5B=last_section__X0C;
+  result__WLAC=NULL;
+  ptr__XLAC=((__POINTER )(NULL));
+  typ_id__2LAC= 0;
+  sz__ZLAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
+  if ((sz__ZLAC ==  0)) {
+    result__WLAC=ITM_SLOT_OPERATOR__;
   } else {
-    typ_id__QLAC=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__NLAC);
-    if ((typ_id__QLAC == (__INTEGER)(-  1))) {
-      a__C33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__D33G=(__UINTEGER_32)((__UINTEGER_32)(sz__NLAC + a__C33G) & (__UINTEGER_32)(~ a__C33G));
-      ptr_table__KABH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D33G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JABH=((__POINTER )(NULL));
-      result__LABH=((__POINTER *)ptr_table__KABH)[ 0];
-      if ((result__LABH == (void *)NULL)) {
-        result__LABH=new_lab__ARJ(new_size__D33G);
-        next__JABH=(void *)((unsigned long)result__LABH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D33G)));
-        ((__POINTER *)next__JABH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KABH)[ 0]=next__JABH;
-      } else {
-        next__JABH=((__POINTER *)result__LABH)[ 0];
-        if ((next__JABH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LABH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__D33G <<  1)) <=  4096)) {
-            next__JABH=(void *)((unsigned long)result__LABH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D33G)));
-          } else {
-            next__JABH=new_lab__ARJ(new_size__D33G);
-          };
-          ((__POINTER *)next__JABH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KABH)[ 0]=next__JABH;
-        } else {
-          ((__POINTER *)result__LABH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JABH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LABH=next__JABH;
-        };
-      };
-      ptr__LLAC=result__LABH;
-    } else {
-      t__H33G=((__UINTEGER_32 )typ_id__QLAC);
-      a__G33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SABH=(__UINTEGER_32)((__UINTEGER_32)(sz__NLAC + a__G33G) & (__UINTEGER_32)(~ a__G33G));
-      ptr_table__PABH=((__POINTER )(&(table_type[(t__H33G)])));
-      lab_type__RABH=(__UINTEGER_32)(t__H33G |  1);
-      next__OABH=((__POINTER )(NULL));
-      result__QABH=((__POINTER *)ptr_table__PABH)[ 0];
-      if ((result__QABH == (void *)NULL)) {
-        result__QABH=new_lab__ARJ(lab_type__RABH);
-        next__OABH=(void *)((unsigned long)result__QABH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SABH)));
-        ((__POINTER *)next__OABH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PABH)[ 0]=next__OABH;
-      } else {
-        next__OABH=((__POINTER *)result__QABH)[ 0];
-        if ((next__OABH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QABH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SABH <<  1)) <=  4096)) {
-            next__OABH=(void *)((unsigned long)result__QABH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SABH)));
-          } else {
-            next__OABH=new_lab__ARJ(lab_type__RABH);
-          };
-          ((__POINTER *)next__OABH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PABH)[ 0]=next__OABH;
-        } else {
-          ((__POINTER *)result__QABH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OABH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QABH=next__OABH;
-        };
-      };
-      ptr__LLAC=result__QABH;
-    };
-    result__KLAC=((__ITM_SLOT_OPERATOR *)ptr__LLAC);
-    *(result__KLAC) = *(ITM_SLOT_OPERATOR__);
-  };
-  Self__U1HC=((__ITM_SLOT_OPERATOR *)result__KLAC);
-  Self__U1HC->parent_itm_slot__CU5B.parent_named__G5.name__LI=name__3T5B;
-  Self__U1HC->parent_itm_slot__CU5B.parent_named__G5.parent_itm_object__4.position__BDJ=__tmp__1Y5B;
-  Self__U1HC->parent_itm_slot__CU5B.id_section__M1C=__tmp__2Y5B;
-  ((__ITM_SLOT_OPERATOR *)result__KLAC)->pretty_name__J0HC=pretty_name__4T5B;
-  return(result__KLAC);
+    typ_id__2LAC=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZLAC);
+    if ((typ_id__2LAC == (__INTEGER)(-  1))) {
+      a__RIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SIEH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLAC + a__RIEH) & (__UINTEGER_32)(~ a__RIEH));
+      ptr_table__4MHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SIEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3MHH=((__POINTER )(NULL));
+      result__5MHH=((__POINTER *)ptr_table__4MHH)[ 0];
+      if ((result__5MHH == (void *)NULL)) {
+        result__5MHH=new_lab__MRJ(new_size__SIEH);
+        next__3MHH=(void *)((unsigned long)result__5MHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIEH)));
+        ((__POINTER *)next__3MHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4MHH)[ 0]=next__3MHH;
+      } else {
+        next__3MHH=((__POINTER *)result__5MHH)[ 0];
+        if ((next__3MHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5MHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SIEH <<  1)) <=  4096)) {
+            next__3MHH=(void *)((unsigned long)result__5MHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIEH)));
+          } else {
+            next__3MHH=new_lab__MRJ(new_size__SIEH);
+          };
+          ((__POINTER *)next__3MHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4MHH)[ 0]=next__3MHH;
+        } else {
+          ((__POINTER *)result__5MHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3MHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5MHH=next__3MHH;
+        };
+      };
+      ptr__XLAC=result__5MHH;
+    } else {
+      t__WIEH=((__UINTEGER_32 )typ_id__2LAC);
+      a__VIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GNHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLAC + a__VIEH) & (__UINTEGER_32)(~ a__VIEH));
+      ptr_table__DNHH=((__POINTER )(&(table_type[(t__WIEH)])));
+      lab_type__FNHH=(__UINTEGER_32)(t__WIEH |  1);
+      next__CNHH=((__POINTER )(NULL));
+      result__ENHH=((__POINTER *)ptr_table__DNHH)[ 0];
+      if ((result__ENHH == (void *)NULL)) {
+        result__ENHH=new_lab__MRJ(lab_type__FNHH);
+        next__CNHH=(void *)((unsigned long)result__ENHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GNHH)));
+        ((__POINTER *)next__CNHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DNHH)[ 0]=next__CNHH;
+      } else {
+        next__CNHH=((__POINTER *)result__ENHH)[ 0];
+        if ((next__CNHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ENHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GNHH <<  1)) <=  4096)) {
+            next__CNHH=(void *)((unsigned long)result__ENHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GNHH)));
+          } else {
+            next__CNHH=new_lab__MRJ(lab_type__FNHH);
+          };
+          ((__POINTER *)next__CNHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DNHH)[ 0]=next__CNHH;
+        } else {
+          ((__POINTER *)result__ENHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CNHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ENHH=next__CNHH;
+        };
+      };
+      ptr__XLAC=result__ENHH;
+    };
+    result__WLAC=((__ITM_SLOT_OPERATOR *)ptr__XLAC);
+    *(result__WLAC) = *(ITM_SLOT_OPERATOR__);
+  };
+  Self__A2HC=((__ITM_SLOT_OPERATOR *)result__WLAC);
+  Self__A2HC->parent_itm_slot__OU5B.parent_named__P5.name__LI=name__JU5B;
+  Self__A2HC->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ=__tmp__HZ5B;
+  Self__A2HC->parent_itm_slot__OU5B.id_section__Y1C=__tmp__IZ5B;
+  Self__B0HC=((__ITM_SLOT_OPERATOR *)result__WLAC);
+  if (((void *)associativity__LU5B == (void *)(&__string_6))) {
+    Self__B0HC->priority_and_level__K0HC=priority__MU5B;
+  } else {
+    Self__B0HC->priority_and_level__K0HC=(__INTEGER)(- priority__MU5B);
+  };
+  ((__ITM_SLOT_OPERATOR *)result__WLAC)->pretty_name__V0HC=pretty_name__KU5B;
+  return(result__WLAC);
 }
 
-static void add_last__O5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__P5GC,void *element__Q5GC)
+static void add_last__05GC(__FAST_ARRAYoITM_ARGUMENTo *Self__15GC,void *element__25GC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__R5GC,__tmp__0AHC,__tmp__CHTD,Self__V1WE;
-  __BOOLEAN __tmp__BAHC;
-  void **__tmp__ZAHC,**new__OGTD;
-  new_capacity__R5GC= 0;
-  if (((__INTEGER)(Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC +  1) <= (__INTEGER)(Self__P5GC->parent_arrayed_collection__ZBZB.capacity__U5GC -  1))) {
-    Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC=(__INTEGER)(Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC +  1);
-    __tmp__BAHC=TRUE__;
+  __INTEGER new_capacity__35GC,__tmp__GBHC,__tmp__OHTD,Self__ZNXE;
+  __BOOLEAN __tmp__NAHC;
+  void **__tmp__FBHC,**new__0GTD;
+  new_capacity__35GC= 0;
+  if (((__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.upper__45GC +  1) <= (__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC -  1))) {
+    Self__15GC->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.upper__45GC +  1);
+    __tmp__NAHC=TRUE__;
   } else {
-    __tmp__BAHC=FALSE__;
-  };
-  if ((! __tmp__BAHC)) {
-    if ((Self__P5GC->parent_arrayed_collection__ZBZB.capacity__U5GC ==  0)) {
-      Self__P5GC->parent_arrayed_collection__ZBZB.storage__QAHC=create__KPBD( 2);
-      Self__P5GC->parent_arrayed_collection__ZBZB.capacity__U5GC= 2;
-      Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC= 0;
-    } else {
-      new_capacity__R5GC=(__INTEGER)(Self__P5GC->parent_arrayed_collection__ZBZB.capacity__U5GC <<  1);
-      __tmp__ZAHC=Self__P5GC->parent_arrayed_collection__ZBZB.storage__QAHC;
-      __tmp__0AHC=Self__P5GC->parent_arrayed_collection__ZBZB.capacity__U5GC;
-      new__OGTD=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__ZAHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__0AHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__R5GC * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__CHTD=(__INTEGER)(new_capacity__R5GC -  1);
-      Self__V1WE=__tmp__0AHC;
-      while ((Self__V1WE <= __tmp__CHTD)) {
-        new__OGTD[Self__V1WE]=NULL;
-        Self__V1WE=(__INTEGER)(Self__V1WE +  1);
-      };
-      Self__P5GC->parent_arrayed_collection__ZBZB.storage__QAHC=new__OGTD;
-      Self__P5GC->parent_arrayed_collection__ZBZB.capacity__U5GC=new_capacity__R5GC;
-      Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC=(__INTEGER)(Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC +  1);
-    };
-  };
-  ((void **)Self__P5GC->parent_arrayed_collection__ZBZB.storage__QAHC)[Self__P5GC->parent_arrayed_collection__ZBZB.upper__S5GC]=element__Q5GC;
+    __tmp__NAHC=FALSE__;
+  };
+  if ((! __tmp__NAHC)) {
+    if ((Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC ==  0)) {
+      Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC=create__WPBD( 2);
+      Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC= 2;
+      Self__15GC->parent_arrayed_collection__FCZB.upper__45GC= 0;
+    } else {
+      new_capacity__35GC=(__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC <<  1);
+      __tmp__FBHC=Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC;
+      __tmp__GBHC=Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC;
+      new__0GTD=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__FBHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__GBHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__35GC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__OHTD=(__INTEGER)(new_capacity__35GC -  1);
+      Self__ZNXE=__tmp__GBHC;
+      while ((Self__ZNXE <= __tmp__OHTD)) {
+        new__0GTD[Self__ZNXE]=NULL;
+        Self__ZNXE=(__INTEGER)(Self__ZNXE +  1);
+      };
+      Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC=new__0GTD;
+      Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC=new_capacity__35GC;
+      Self__15GC->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.upper__45GC +  1);
+    };
+  };
+  ((void **)Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC)[Self__15GC->parent_arrayed_collection__FCZB.upper__45GC]=element__25GC;
 }
 
-static void* read_slot_keyword__GZ5B(void *list_arg__IZ5B)
+static void* read_slot_keyword__SZ5B(void *list_arg__UZ5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  void *n__KZ5B,*result__UNP;
-  void *arg__LZ5B;
-  void *result__MZ5B;
-  __POSITION pos__ZRQG,pos__1RQG,p__3ABH;
-  void *result__EQP;
-  void *sec__4ABH;
-  __ITM_SLOT *result__TABH,*Self__1ABH;
-  __POINTER ptr__UABH,ptr_table__ABBH,next__5ABH,result__BBBH;
-  __POINTER ptr_table__FBBH,next__EBBH,result__GBBH;
-  __INTEGER typ_id__VABH;
-  __UINTEGER_32 sz__WABH,a__XABH,new_size__YABH,t__ZABH,a__0ABH;
-  __UINTEGER_32 new_size__IBBH,lab_type__HBBH;
-  __FAST_ARRAYoSTRINGo *Self__W2AB,*Self__M3AB;
-  n__KZ5B=NULL;
-  arg__LZ5B=NULL;
-  result__MZ5B=NULL;
-  if (read_identifier__55K()) {
-    short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-    result__UNP=NULL;
-    if ((((__FAST_ARRAYoSTRINGo *)free__VNP)->parent_arrayed_collection__XJC.upper__0JC <  0)) {
-      result__UNP=create__EBB( 128);
-    } else {
-      Self__W2AB=((__FAST_ARRAYoSTRINGo *)free__VNP);
-      result__UNP=((void **)Self__W2AB->parent_arrayed_collection__XJC.storage__LGT)[Self__W2AB->parent_arrayed_collection__XJC.upper__0JC];
-      Self__M3AB=((__FAST_ARRAYoSTRINGo *)free__VNP);
-      Self__M3AB->parent_arrayed_collection__XJC.upper__0JC=(__INTEGER)(Self__M3AB->parent_arrayed_collection__XJC.upper__0JC -  1);
-    };
-    n__KZ5B=result__UNP;
-    copy__NCS(result__UNP,last_string__2ZC);
-    arg__LZ5B=read_loc_arg__with_self__2DHB(PARSER__,FALSE__,FALSE__);
-    if (((void *)arg__LZ5B != (void *)NULL)) {
-      add_last__O5GC(list_arg__IZ5B,arg__LZ5B);
-      if (read_identifier__55K()) {
-        if (((void *)((__SECTION_ *)last_section__L0C)->name__WYDC == (void *)(&__string_30))) {
-          pos__ZRQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_277));
-          put_position__IOG(pos__ZRQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+  void *n__WZ5B,*result__AOP;
+  void *arg__XZ5B;
+  void *result__YZ5B;
+  __POSITION pos__JEWG,pos__LEWG,p__RNHH;
+  void *result__QQP;
+  void *sec__SNHH;
+  __ITM_SLOT *result__HNHH,*Self__PNHH;
+  __POINTER ptr__INHH,ptr_table__UNHH,next__TNHH,result__VNHH;
+  __POINTER ptr_table__ZNHH,next__YNHH,result__0NHH;
+  __INTEGER typ_id__JNHH;
+  __UINTEGER_32 sz__KNHH,a__LNHH,new_size__MNHH,t__NNHH,a__ONHH;
+  __UINTEGER_32 new_size__2NHH,lab_type__1NHH;
+  __FAST_ARRAYoSTRINGo *Self__C3AB,*Self__Y3AB;
+  n__WZ5B=NULL;
+  arg__XZ5B=NULL;
+  result__YZ5B=NULL;
+  if (read_identifier__LAL()) {
+    short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+    result__AOP=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__BOP)->parent_arrayed_collection__DKC.upper__GKC <  0)) {
+      result__AOP=create__NBB( 128);
+    } else {
+      Self__C3AB=((__FAST_ARRAYoSTRINGo *)free__BOP);
+      result__AOP=((void **)Self__C3AB->parent_arrayed_collection__DKC.storage__XGT)[Self__C3AB->parent_arrayed_collection__DKC.upper__GKC];
+      Self__Y3AB=((__FAST_ARRAYoSTRINGo *)free__BOP);
+      Self__Y3AB->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__Y3AB->parent_arrayed_collection__DKC.upper__GKC -  1);
+    };
+    n__WZ5B=result__AOP;
+    copy__ZCS(result__AOP,last_string__I0C);
+    arg__XZ5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__XZ5B != (void *)NULL)) {
+      add_last__05GC(list_arg__UZ5B,arg__XZ5B);
+      if (read_identifier__LAL()) {
+        if (((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_30))) {
+          pos__JEWG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_287));
+          put_position__UOG(pos__JEWG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
         do {
-          short__token__to__5AD((&__string_130),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-          append__VNS(n__KZ5B,(&__string_112));
-          append__VNS(n__KZ5B,last_string__2ZC);
-          arg__LZ5B=read_loc_arg__with_self__2DHB(PARSER__,FALSE__,FALSE__);
-          if (((void *)arg__LZ5B == (void *)NULL)) {
-            pos__1RQG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_161));
-            put_position__IOG(pos__1RQG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          append__BOS(n__WZ5B,(&__string_112));
+          append__BOS(n__WZ5B,last_string__I0C);
+          arg__XZ5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,FALSE__);
+          if (((void *)arg__XZ5B == (void *)NULL)) {
+            pos__LEWG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_164));
+            put_position__UOG(pos__LEWG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__O5GC(list_arg__IZ5B,arg__LZ5B);
-        } while (read_identifier__55K());
-      };
-    };
-    result__EQP=get__2VB(result__UNP);
-    add_last__URV(free__VNP,result__UNP);
-    ((__STRING *)result__UNP)->count__KFC= 0;
-    p__3ABH=current_position__3WF();
-    sec__4ABH=last_section__L0C;
-    result__TABH=NULL;
-    ptr__UABH=((__POINTER )(NULL));
-    typ_id__VABH= 0;
-    sz__WABH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-    if ((sz__WABH ==  0)) {
-      result__TABH=ITM_SLOT__;
-    } else {
-      typ_id__VABH=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__WABH);
-      if ((typ_id__VABH == (__INTEGER)(-  1))) {
-        a__XABH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YABH=(__UINTEGER_32)((__UINTEGER_32)(sz__WABH + a__XABH) & (__UINTEGER_32)(~ a__XABH));
-        ptr_table__ABBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YABH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__5ABH=((__POINTER )(NULL));
-        result__BBBH=((__POINTER *)ptr_table__ABBH)[ 0];
-        if ((result__BBBH == (void *)NULL)) {
-          result__BBBH=new_lab__ARJ(new_size__YABH);
-          next__5ABH=(void *)((unsigned long)result__BBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YABH)));
-          ((__POINTER *)next__5ABH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ABBH)[ 0]=next__5ABH;
-        } else {
-          next__5ABH=((__POINTER *)result__BBBH)[ 0];
-          if ((next__5ABH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BBBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__YABH <<  1)) <=  4096)) {
-              next__5ABH=(void *)((unsigned long)result__BBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YABH)));
+          add_last__05GC(list_arg__UZ5B,arg__XZ5B);
+        } while (read_identifier__LAL());
+      };
+    };
+    result__QQP=get__IWB(result__AOP);
+    add_last__ASV(free__BOP,result__AOP);
+    ((__STRING *)result__AOP)->count__WFC= 0;
+    p__RNHH=current_position__JXF();
+    sec__SNHH=last_section__X0C;
+    result__HNHH=NULL;
+    ptr__INHH=((__POINTER )(NULL));
+    typ_id__JNHH= 0;
+    sz__KNHH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__KNHH ==  0)) {
+      result__HNHH=ITM_SLOT__;
+    } else {
+      typ_id__JNHH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KNHH);
+      if ((typ_id__JNHH == (__INTEGER)(-  1))) {
+        a__LNHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MNHH=(__UINTEGER_32)((__UINTEGER_32)(sz__KNHH + a__LNHH) & (__UINTEGER_32)(~ a__LNHH));
+        ptr_table__UNHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MNHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TNHH=((__POINTER )(NULL));
+        result__VNHH=((__POINTER *)ptr_table__UNHH)[ 0];
+        if ((result__VNHH == (void *)NULL)) {
+          result__VNHH=new_lab__MRJ(new_size__MNHH);
+          next__TNHH=(void *)((unsigned long)result__VNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MNHH)));
+          ((__POINTER *)next__TNHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UNHH)[ 0]=next__TNHH;
+        } else {
+          next__TNHH=((__POINTER *)result__VNHH)[ 0];
+          if ((next__TNHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VNHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MNHH <<  1)) <=  4096)) {
+              next__TNHH=(void *)((unsigned long)result__VNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MNHH)));
             } else {
-              next__5ABH=new_lab__ARJ(new_size__YABH);
-            };
-            ((__POINTER *)next__5ABH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ABBH)[ 0]=next__5ABH;
-          } else {
-            ((__POINTER *)result__BBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ABH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BBBH=next__5ABH;
-          };
-        };
-        ptr__UABH=result__BBBH;
-      } else {
-        t__ZABH=((__UINTEGER_32 )typ_id__VABH);
-        a__0ABH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__IBBH=(__UINTEGER_32)((__UINTEGER_32)(sz__WABH + a__0ABH) & (__UINTEGER_32)(~ a__0ABH));
-        ptr_table__FBBH=((__POINTER )(&(table_type[(t__ZABH)])));
-        lab_type__HBBH=(__UINTEGER_32)(t__ZABH |  1);
-        next__EBBH=((__POINTER )(NULL));
-        result__GBBH=((__POINTER *)ptr_table__FBBH)[ 0];
-        if ((result__GBBH == (void *)NULL)) {
-          result__GBBH=new_lab__ARJ(lab_type__HBBH);
-          next__EBBH=(void *)((unsigned long)result__GBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IBBH)));
-          ((__POINTER *)next__EBBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FBBH)[ 0]=next__EBBH;
-        } else {
-          next__EBBH=((__POINTER *)result__GBBH)[ 0];
-          if ((next__EBBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GBBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__IBBH <<  1)) <=  4096)) {
-              next__EBBH=(void *)((unsigned long)result__GBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IBBH)));
+              next__TNHH=new_lab__MRJ(new_size__MNHH);
+            };
+            ((__POINTER *)next__TNHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UNHH)[ 0]=next__TNHH;
+          } else {
+            ((__POINTER *)result__VNHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TNHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VNHH=next__TNHH;
+          };
+        };
+        ptr__INHH=result__VNHH;
+      } else {
+        t__NNHH=((__UINTEGER_32 )typ_id__JNHH);
+        a__ONHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2NHH=(__UINTEGER_32)((__UINTEGER_32)(sz__KNHH + a__ONHH) & (__UINTEGER_32)(~ a__ONHH));
+        ptr_table__ZNHH=((__POINTER )(&(table_type[(t__NNHH)])));
+        lab_type__1NHH=(__UINTEGER_32)(t__NNHH |  1);
+        next__YNHH=((__POINTER )(NULL));
+        result__0NHH=((__POINTER *)ptr_table__ZNHH)[ 0];
+        if ((result__0NHH == (void *)NULL)) {
+          result__0NHH=new_lab__MRJ(lab_type__1NHH);
+          next__YNHH=(void *)((unsigned long)result__0NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NHH)));
+          ((__POINTER *)next__YNHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZNHH)[ 0]=next__YNHH;
+        } else {
+          next__YNHH=((__POINTER *)result__0NHH)[ 0];
+          if ((next__YNHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0NHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2NHH <<  1)) <=  4096)) {
+              next__YNHH=(void *)((unsigned long)result__0NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NHH)));
             } else {
-              next__EBBH=new_lab__ARJ(lab_type__HBBH);
+              next__YNHH=new_lab__MRJ(lab_type__1NHH);
             };
-            ((__POINTER *)next__EBBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FBBH)[ 0]=next__EBBH;
+            ((__POINTER *)next__YNHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZNHH)[ 0]=next__YNHH;
           } else {
-            ((__POINTER *)result__GBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EBBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GBBH=next__EBBH;
+            ((__POINTER *)result__0NHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YNHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0NHH=next__YNHH;
           };
         };
-        ptr__UABH=result__GBBH;
+        ptr__INHH=result__0NHH;
       };
-      result__TABH=((__ITM_SLOT *)ptr__UABH);
-      *(result__TABH) = *(ITM_SLOT__);
+      result__HNHH=((__ITM_SLOT *)ptr__INHH);
+      *(result__HNHH) = *(ITM_SLOT__);
     };
-    Self__1ABH=((__ITM_SLOT *)result__TABH);
-    Self__1ABH->parent_named__G5.name__LI=result__EQP;
-    Self__1ABH->parent_named__G5.parent_itm_object__4.position__BDJ=p__3ABH;
-    Self__1ABH->id_section__M1C=sec__4ABH;
-    result__MZ5B=result__TABH;
+    Self__PNHH=((__ITM_SLOT *)result__HNHH);
+    Self__PNHH->parent_named__P5.name__LI=result__QQP;
+    Self__PNHH->parent_named__P5.parent_itm_object__4.position__NDJ=p__RNHH;
+    Self__PNHH->id_section__Y1C=sec__SNHH;
+    result__YZ5B=result__HNHH;
   };
-  return(result__MZ5B);
+  return(result__YZ5B);
 }
 
-static void** create__KPBD(__INTEGER nb_elements__MPBD)
+static void** create__WPBD(__INTEGER nb_elements__YPBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__Q21G,a__V21G,new_size__R21G,new_size2__S21G,a__S33G;
-  __UINTEGER_32 new_size__T33G;
-  __POINTER result__P21G,ptr_table__KBBH,next__JBBH,result__LBBH;
-  void *result__OBBH;
-  __INTEGER Self__YEXD;
-  void **Result__GDGD;
-  sz__Q21G=((__UINTEGER_32 )(__INTEGER)(nb_elements__MPBD * ((__INTEGER )(sizeof(void *)))));
-  result__P21G=((__POINTER )(NULL));
-  a__V21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__R21G=(__UINTEGER_32)((__UINTEGER_32)(sz__Q21G + a__V21G) & (__UINTEGER_32)(~ a__V21G));
-  new_size2__S21G=(__UINTEGER_32)(new_size__R21G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__S21G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__S33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__T33G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__S21G + a__S33G) & (__UINTEGER_32)(~ a__S33G));
-    ptr_table__KBBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T33G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__JBBH=((__POINTER )(NULL));
-    result__LBBH=((__POINTER *)ptr_table__KBBH)[ 0];
-    if ((result__LBBH == (void *)NULL)) {
-      result__LBBH=new_lab__ARJ(new_size__T33G);
-      next__JBBH=(void *)((unsigned long)result__LBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T33G)));
-      ((__POINTER *)next__JBBH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__KBBH)[ 0]=next__JBBH;
-    } else {
-      next__JBBH=((__POINTER *)result__LBBH)[ 0];
-      if ((next__JBBH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LBBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__T33G <<  1)) <=  4096)) {
-          next__JBBH=(void *)((unsigned long)result__LBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T33G)));
-        } else {
-          next__JBBH=new_lab__ARJ(new_size__T33G);
-        };
-        ((__POINTER *)next__JBBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KBBH)[ 0]=next__JBBH;
-      } else {
-        ((__POINTER *)result__LBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JBBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__LBBH=next__JBBH;
-      };
-    };
-    ((__POINTER *)result__LBBH)[ 0]=((__POINTER ) 3);
-    result__P21G=(void *)((unsigned long)result__LBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__UJCH,a__ZJCH,new_size__VJCH,new_size2__WJCH,a__BJEH;
+  __UINTEGER_32 new_size__CJEH;
+  __POINTER result__TJCH,ptr_table__4NHH,next__3NHH,result__5NHH;
+  void *result__COHH;
+  __INTEGER Self__RFXD;
+  void **Result__SDGD;
+  sz__UJCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__YPBD * ((__INTEGER )(sizeof(void *)))));
+  result__TJCH=((__POINTER )(NULL));
+  a__ZJCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VJCH=(__UINTEGER_32)((__UINTEGER_32)(sz__UJCH + a__ZJCH) & (__UINTEGER_32)(~ a__ZJCH));
+  new_size2__WJCH=(__UINTEGER_32)(new_size__VJCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WJCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CJEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WJCH + a__BJEH) & (__UINTEGER_32)(~ a__BJEH));
+    ptr_table__4NHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CJEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__3NHH=((__POINTER )(NULL));
+    result__5NHH=((__POINTER *)ptr_table__4NHH)[ 0];
+    if ((result__5NHH == (void *)NULL)) {
+      result__5NHH=new_lab__MRJ(new_size__CJEH);
+      next__3NHH=(void *)((unsigned long)result__5NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJEH)));
+      ((__POINTER *)next__3NHH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__4NHH)[ 0]=next__3NHH;
+    } else {
+      next__3NHH=((__POINTER *)result__5NHH)[ 0];
+      if ((next__3NHH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5NHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CJEH <<  1)) <=  4096)) {
+          next__3NHH=(void *)((unsigned long)result__5NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJEH)));
+        } else {
+          next__3NHH=new_lab__MRJ(new_size__CJEH);
+        };
+        ((__POINTER *)next__3NHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4NHH)[ 0]=next__3NHH;
+      } else {
+        ((__POINTER *)result__5NHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3NHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__5NHH=next__3NHH;
+      };
+    };
+    ((__POINTER *)result__5NHH)[ 0]=((__POINTER ) 3);
+    result__TJCH=(void *)((unsigned long)result__5NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__OBBH=first_free__LDVB;
-    while ((((void *)result__OBBH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OBBH)->map_size_and_id__2SB &  4294967292LU) < new_size__R21G))) {
-      result__OBBH=((__MEMORY *)result__OBBH)->map_next_free__3SB;
+    result__COHH=first_free__XDVB;
+    while ((((void *)result__COHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__COHH)->map_size_and_id__ITB &  4294967292LU) < new_size__VJCH))) {
+      result__COHH=((__MEMORY *)result__COHH)->map_next_free__JTB;
     };
-    if (((void *)result__OBBH == (void *)NULL)) {
-      result__OBBH=new_page__CA5();
+    if (((void *)result__COHH == (void *)NULL)) {
+      result__COHH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__OBBH,new_size__R21G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OBBH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__P21G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OBBH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__COHH,new_size__VJCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__COHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__TJCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__COHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__GDGD=((void **)result__P21G);
-  Self__YEXD=(__INTEGER)(nb_elements__MPBD -  1);
-  while ((Self__YEXD >=  0)) {
-    Result__GDGD[Self__YEXD]=NULL;
-    Self__YEXD=(__INTEGER)(Self__YEXD -  1);
+  Result__SDGD=((void **)result__TJCH);
+  Self__RFXD=(__INTEGER)(nb_elements__YPBD -  1);
+  while ((Self__RFXD >=  0)) {
+    Result__SDGD[Self__RFXD]=NULL;
+    Self__RFXD=(__INTEGER)(Self__RFXD -  1);
   };
-  return(Result__GDGD);
+  return(Result__SDGD);
 }
 
-static void set_argument_list__JCHC(__ITM_SLOT *Self__KCHC,void *p__LCHC)
+static void set_argument_list__VCHC(__ITM_SLOT *Self__WCHC,void *p__XCHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__TCHC,*__tmp__FDHC,*__tmp__SDHC;
-  __INTEGER __tmp__UCHC;
-  __POSITION __tmp__GDHC,__tmp__TDHC;
-  __SECTION_ *Self__XOUG;
-  __BOOLEAN __tmp__YCHC;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__Y33G,*Self__JWID;
-  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__LCHC)->parent_arrayed_collection__ZBZB.upper__S5GC +  1) >  1)) {
-    __tmp__YCHC=TRUE__;
+  void *__tmp__5CHC,*__tmp__RDHC,*__tmp__4DHC;
+  __INTEGER __tmp__ADHC;
+  __POSITION __tmp__SDHC,__tmp__5DHC;
+  __SECTION_ *Self__4C0G;
+  __BOOLEAN __tmp__EDHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__HJEH,*Self__VWID;
+  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC)->parent_arrayed_collection__FCZB.upper__45GC +  1) >  1)) {
+    __tmp__EDHC=TRUE__;
   } else {
-    __tmp__TCHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__LCHC)->parent_arrayed_collection__ZBZB.storage__QAHC)[ 0];
-    if (((struct ___OBJ *)__tmp__TCHC)->__id==__ITM_ARG__) {
-      __tmp__UCHC= 1;
+    __tmp__5CHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
+    if (((struct ___OBJ *)__tmp__5CHC)->__id==__ITM_ARG__) {
+      __tmp__ADHC= 1;
     } else {
-      __tmp__UCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__TCHC)->name__QPOF)->parent_arrayed_collection__14I.upper__P5OD +  1);
+      __tmp__ADHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__5CHC)->name__N1OF)->parent_arrayed_collection__H5I.upper__15OD +  1);
     };
-    __tmp__YCHC=(__tmp__UCHC >  1);
+    __tmp__EDHC=(__tmp__ADHC >  1);
   };
-  if (__tmp__YCHC) {
-    if (((void *)((__SECTION_ *)Self__KCHC->id_section__M1C)->name__WYDC == (void *)(&__string_25))) {
-      Self__Y33G=((__FAST_ARRAYoITM_ARGUMENTo *)p__LCHC);
-      __tmp__FDHC=((void **)Self__Y33G->parent_arrayed_collection__ZBZB.storage__QAHC)[Self__Y33G->parent_arrayed_collection__ZBZB.upper__S5GC];
-      if (((struct ___OBJ *)__tmp__FDHC)->__id==__ITM_ARG__) {
-        __tmp__GDHC=((__ITM_ARG *)__tmp__FDHC)->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ;
+  if (__tmp__EDHC) {
+    if (((void *)((__SECTION_ *)Self__WCHC->id_section__Y1C)->name__CZDC == (void *)(&__string_25))) {
+      Self__HJEH=((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC);
+      __tmp__RDHC=((void **)Self__HJEH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__HJEH->parent_arrayed_collection__FCZB.upper__45GC];
+      if (((struct ___OBJ *)__tmp__RDHC)->__id==__ITM_ARG__) {
+        __tmp__SDHC=((__ITM_ARG *)__tmp__RDHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
       } else {
-        __tmp__GDHC=((__ITM_ARGS *)__tmp__FDHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
+        __tmp__SDHC=((__ITM_ARGS *)__tmp__RDHC)->parent_itm_argument__B5EE.parent_itm_code__S4M.position__NDJ;
       };
-      put_error__text__4MG( 1,(&__string_221));
-      put_position__IOG(__tmp__GDHC);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+      put_error__text__KNG( 1,(&__string_231));
+      put_position__UOG(__tmp__SDHC);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    Self__XOUG=((__SECTION_ *)Self__KCHC->id_section__M1C);
-    if ((((void *)Self__XOUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__XOUG->name__WYDC == (void *)(&__string_24)))) {
-      Self__JWID=((__FAST_ARRAYoITM_ARGUMENTo *)p__LCHC);
-      __tmp__SDHC=((void **)Self__JWID->parent_arrayed_collection__ZBZB.storage__QAHC)[Self__JWID->parent_arrayed_collection__ZBZB.upper__S5GC];
-      if (((struct ___OBJ *)__tmp__SDHC)->__id==__ITM_ARG__) {
-        __tmp__TDHC=((__ITM_ARG *)__tmp__SDHC)->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ;
+    Self__4C0G=((__SECTION_ *)Self__WCHC->id_section__Y1C);
+    if ((((void *)Self__4C0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__4C0G->name__CZDC == (void *)(&__string_24)))) {
+      Self__VWID=((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC);
+      __tmp__4DHC=((void **)Self__VWID->parent_arrayed_collection__FCZB.storage__2AHC)[Self__VWID->parent_arrayed_collection__FCZB.upper__45GC];
+      if (((struct ___OBJ *)__tmp__4DHC)->__id==__ITM_ARG__) {
+        __tmp__5DHC=((__ITM_ARG *)__tmp__4DHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
       } else {
-        __tmp__TDHC=((__ITM_ARGS *)__tmp__SDHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
+        __tmp__5DHC=((__ITM_ARGS *)__tmp__4DHC)->parent_itm_argument__B5EE.parent_itm_code__S4M.position__NDJ;
       };
-      put_error__text__4MG( 1,(&__string_222));
-      put_position__IOG(__tmp__TDHC);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+      put_error__text__KNG( 1,(&__string_232));
+      put_position__UOG(__tmp__5DHC);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__KCHC->argument_list__0DHC=p__LCHC;
+  Self__WCHC->argument_list__GEHC=p__XCHC;
 }
 
-static __ITM_TYPE_MULTI* get__WIP(void *lt__YIP)
+static __ITM_TYPE_MULTI* get__CJP(void *lt__EJP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __ITM_TYPE_MULTI *result__0IP,*__tmp__MKP,*result__L2HB;
-  __INTEGER idx__1IP,typ_id__R2HB,new_capacity__JZAB,__tmp__N0AB;
-  __INTEGER __tmp__ENFC,Self__HXVD;
-  void *__tmp__LKP;
-  __POINTER ptr__M2HB,ptr_table__SBBH,next__RBBH,result__TBBH;
-  __POINTER ptr_table__XBBH,next__WBBH,result__YBBH;
-  __UINTEGER_32 sz__O2HB,a__C43G,new_size__D43G,t__H43G,a__G43G;
-  __UINTEGER_32 new_size__0BBH,lab_type__ZBBH;
-  __FAST_ARRAYoITM_TYPE_MULTIo *Self__HZAB;
-  __BOOLEAN __tmp__XZAB;
-  void **__tmp__M0AB,**new__QMFC;
-  result__0IP=NULL;
-  idx__1IP= 0;
-  while (((idx__1IP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__BJP)->parent_arrayed_collection__AJP.upper__KJP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__BJP)->parent_arrayed_collection__AJP.storage__21V)[idx__1IP])->list_type__UJP != (void *)lt__YIP))) {
-    idx__1IP=(__INTEGER)(idx__1IP +  1);
-  };
-  if ((idx__1IP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__BJP)->parent_arrayed_collection__AJP.upper__KJP)) {
-    __tmp__LKP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__BJP)->parent_arrayed_collection__AJP.storage__21V)[idx__1IP];
-    if (__tmp__LKP==NULL) {
-      __tmp__MKP=NULL;
-    } else {
-      __tmp__MKP=((__ITM_TYPE_MULTI *)__tmp__LKP);
-    };
-    result__0IP=__tmp__MKP;
+  __ITM_TYPE_MULTI *result__GJP,*__tmp__YKP,*result__X2HB;
+  __INTEGER idx__HJP,typ_id__32HB,new_capacity__VZAB,__tmp__Z0AB;
+  __INTEGER __tmp__QNFC,Self__AYVD;
+  void *__tmp__XKP;
+  __POINTER ptr__Y2HB,ptr_table__GOHH,next__FOHH,result__HOHH;
+  __POINTER ptr_table__LOHH,next__KOHH,result__MOHH;
+  __UINTEGER_32 sz__02HB,a__RJEH,new_size__SJEH,t__WJEH,a__VJEH;
+  __UINTEGER_32 new_size__OOHH,lab_type__NOHH;
+  __FAST_ARRAYoITM_TYPE_MULTIo *Self__TZAB;
+  __BOOLEAN __tmp__D0AB;
+  void **__tmp__Y0AB,**new__2MFC;
+  result__GJP=NULL;
+  idx__HJP= 0;
+  while (((idx__HJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.upper__WJP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.storage__I2V)[idx__HJP])->list_type__AKP != (void *)lt__EJP))) {
+    idx__HJP=(__INTEGER)(idx__HJP +  1);
+  };
+  if ((idx__HJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.upper__WJP)) {
+    __tmp__XKP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.storage__I2V)[idx__HJP];
+    if (__tmp__XKP==NULL) {
+      __tmp__YKP=NULL;
+    } else {
+      __tmp__YKP=((__ITM_TYPE_MULTI *)__tmp__XKP);
+    };
+    result__GJP=__tmp__YKP;
   } else {
-    result__L2HB=NULL;
-    ptr__M2HB=((__POINTER )(NULL));
-    typ_id__R2HB= 0;
-    sz__O2HB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
-    if ((sz__O2HB ==  0)) {
-      result__L2HB=ITM_TYPE_MULTI__;
-    } else {
-      typ_id__R2HB=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__O2HB);
-      if ((typ_id__R2HB == (__INTEGER)(-  1))) {
-        a__C43G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__D43G=(__UINTEGER_32)((__UINTEGER_32)(sz__O2HB + a__C43G) & (__UINTEGER_32)(~ a__C43G));
-        ptr_table__SBBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D43G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__RBBH=((__POINTER )(NULL));
-        result__TBBH=((__POINTER *)ptr_table__SBBH)[ 0];
-        if ((result__TBBH == (void *)NULL)) {
-          result__TBBH=new_lab__ARJ(new_size__D43G);
-          next__RBBH=(void *)((unsigned long)result__TBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D43G)));
-          ((__POINTER *)next__RBBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SBBH)[ 0]=next__RBBH;
-        } else {
-          next__RBBH=((__POINTER *)result__TBBH)[ 0];
-          if ((next__RBBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TBBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__D43G <<  1)) <=  4096)) {
-              next__RBBH=(void *)((unsigned long)result__TBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D43G)));
+    result__X2HB=NULL;
+    ptr__Y2HB=((__POINTER )(NULL));
+    typ_id__32HB= 0;
+    sz__02HB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
+    if ((sz__02HB ==  0)) {
+      result__X2HB=ITM_TYPE_MULTI__;
+    } else {
+      typ_id__32HB=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__02HB);
+      if ((typ_id__32HB == (__INTEGER)(-  1))) {
+        a__RJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SJEH=(__UINTEGER_32)((__UINTEGER_32)(sz__02HB + a__RJEH) & (__UINTEGER_32)(~ a__RJEH));
+        ptr_table__GOHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SJEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__FOHH=((__POINTER )(NULL));
+        result__HOHH=((__POINTER *)ptr_table__GOHH)[ 0];
+        if ((result__HOHH == (void *)NULL)) {
+          result__HOHH=new_lab__MRJ(new_size__SJEH);
+          next__FOHH=(void *)((unsigned long)result__HOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJEH)));
+          ((__POINTER *)next__FOHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GOHH)[ 0]=next__FOHH;
+        } else {
+          next__FOHH=((__POINTER *)result__HOHH)[ 0];
+          if ((next__FOHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HOHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SJEH <<  1)) <=  4096)) {
+              next__FOHH=(void *)((unsigned long)result__HOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJEH)));
             } else {
-              next__RBBH=new_lab__ARJ(new_size__D43G);
-            };
-            ((__POINTER *)next__RBBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SBBH)[ 0]=next__RBBH;
-          } else {
-            ((__POINTER *)result__TBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__TBBH=next__RBBH;
-          };
-        };
-        ptr__M2HB=result__TBBH;
-      } else {
-        t__H43G=((__UINTEGER_32 )typ_id__R2HB);
-        a__G43G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__0BBH=(__UINTEGER_32)((__UINTEGER_32)(sz__O2HB + a__G43G) & (__UINTEGER_32)(~ a__G43G));
-        ptr_table__XBBH=((__POINTER )(&(table_type[(t__H43G)])));
-        lab_type__ZBBH=(__UINTEGER_32)(t__H43G |  1);
-        next__WBBH=((__POINTER )(NULL));
-        result__YBBH=((__POINTER *)ptr_table__XBBH)[ 0];
-        if ((result__YBBH == (void *)NULL)) {
-          result__YBBH=new_lab__ARJ(lab_type__ZBBH);
-          next__WBBH=(void *)((unsigned long)result__YBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BBH)));
-          ((__POINTER *)next__WBBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XBBH)[ 0]=next__WBBH;
-        } else {
-          next__WBBH=((__POINTER *)result__YBBH)[ 0];
-          if ((next__WBBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0BBH <<  1)) <=  4096)) {
-              next__WBBH=(void *)((unsigned long)result__YBBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BBH)));
+              next__FOHH=new_lab__MRJ(new_size__SJEH);
+            };
+            ((__POINTER *)next__FOHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GOHH)[ 0]=next__FOHH;
+          } else {
+            ((__POINTER *)result__HOHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HOHH=next__FOHH;
+          };
+        };
+        ptr__Y2HB=result__HOHH;
+      } else {
+        t__WJEH=((__UINTEGER_32 )typ_id__32HB);
+        a__VJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__02HB + a__VJEH) & (__UINTEGER_32)(~ a__VJEH));
+        ptr_table__LOHH=((__POINTER )(&(table_type[(t__WJEH)])));
+        lab_type__NOHH=(__UINTEGER_32)(t__WJEH |  1);
+        next__KOHH=((__POINTER )(NULL));
+        result__MOHH=((__POINTER *)ptr_table__LOHH)[ 0];
+        if ((result__MOHH == (void *)NULL)) {
+          result__MOHH=new_lab__MRJ(lab_type__NOHH);
+          next__KOHH=(void *)((unsigned long)result__MOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOHH)));
+          ((__POINTER *)next__KOHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LOHH)[ 0]=next__KOHH;
+        } else {
+          next__KOHH=((__POINTER *)result__MOHH)[ 0];
+          if ((next__KOHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MOHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OOHH <<  1)) <=  4096)) {
+              next__KOHH=(void *)((unsigned long)result__MOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOHH)));
             } else {
-              next__WBBH=new_lab__ARJ(lab_type__ZBBH);
+              next__KOHH=new_lab__MRJ(lab_type__NOHH);
             };
-            ((__POINTER *)next__WBBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XBBH)[ 0]=next__WBBH;
+            ((__POINTER *)next__KOHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LOHH)[ 0]=next__KOHH;
           } else {
-            ((__POINTER *)result__YBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YBBH=next__WBBH;
+            ((__POINTER *)result__MOHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MOHH=next__KOHH;
           };
         };
-        ptr__M2HB=result__YBBH;
+        ptr__Y2HB=result__MOHH;
       };
-      result__L2HB=((__ITM_TYPE_MULTI *)ptr__M2HB);
-      *(result__L2HB) = *(ITM_TYPE_MULTI__);
+      result__X2HB=((__ITM_TYPE_MULTI *)ptr__Y2HB);
+      *(result__X2HB) = *(ITM_TYPE_MULTI__);
     };
-    ((__ITM_TYPE_MULTI *)result__L2HB)->list_type__UJP=lt__YIP;
-    result__0IP=result__L2HB;
-    Self__HZAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__BJP);
-    new_capacity__JZAB= 0;
-    if (((__INTEGER)(Self__HZAB->parent_arrayed_collection__AJP.upper__KJP +  1) <= (__INTEGER)(Self__HZAB->parent_arrayed_collection__AJP.capacity__R1V -  1))) {
-      Self__HZAB->parent_arrayed_collection__AJP.upper__KJP=(__INTEGER)(Self__HZAB->parent_arrayed_collection__AJP.upper__KJP +  1);
-      __tmp__XZAB=TRUE__;
+    ((__ITM_TYPE_MULTI *)result__X2HB)->list_type__AKP=lt__EJP;
+    result__GJP=result__X2HB;
+    Self__TZAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP);
+    new_capacity__VZAB= 0;
+    if (((__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.upper__WJP +  1) <= (__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.capacity__31V -  1))) {
+      Self__TZAB->parent_arrayed_collection__MJP.upper__WJP=(__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.upper__WJP +  1);
+      __tmp__D0AB=TRUE__;
     } else {
-      __tmp__XZAB=FALSE__;
+      __tmp__D0AB=FALSE__;
     };
-    if ((! __tmp__XZAB)) {
-      if ((Self__HZAB->parent_arrayed_collection__AJP.capacity__R1V ==  0)) {
-        Self__HZAB->parent_arrayed_collection__AJP.storage__21V=create__JLXB( 2);
-        Self__HZAB->parent_arrayed_collection__AJP.capacity__R1V= 2;
-        Self__HZAB->parent_arrayed_collection__AJP.upper__KJP= 0;
+    if ((! __tmp__D0AB)) {
+      if ((Self__TZAB->parent_arrayed_collection__MJP.capacity__31V ==  0)) {
+        Self__TZAB->parent_arrayed_collection__MJP.storage__I2V=create__VLXB( 2);
+        Self__TZAB->parent_arrayed_collection__MJP.capacity__31V= 2;
+        Self__TZAB->parent_arrayed_collection__MJP.upper__WJP= 0;
       } else {
-        new_capacity__JZAB=(__INTEGER)(Self__HZAB->parent_arrayed_collection__AJP.capacity__R1V <<  1);
-        __tmp__M0AB=Self__HZAB->parent_arrayed_collection__AJP.storage__21V;
-        __tmp__N0AB=Self__HZAB->parent_arrayed_collection__AJP.capacity__R1V;
-        new__QMFC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__M0AB)),((__UINTEGER_32 )(__INTEGER)(__tmp__N0AB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__JZAB * ((__INTEGER )(sizeof(void *)))))));
-        __tmp__ENFC=(__INTEGER)(new_capacity__JZAB -  1);
-        Self__HXVD=__tmp__N0AB;
-        while ((Self__HXVD <= __tmp__ENFC)) {
-          new__QMFC[Self__HXVD]=NULL;
-          Self__HXVD=(__INTEGER)(Self__HXVD +  1);
+        new_capacity__VZAB=(__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.capacity__31V <<  1);
+        __tmp__Y0AB=Self__TZAB->parent_arrayed_collection__MJP.storage__I2V;
+        __tmp__Z0AB=Self__TZAB->parent_arrayed_collection__MJP.capacity__31V;
+        new__2MFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__Y0AB)),((__UINTEGER_32 )(__INTEGER)(__tmp__Z0AB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VZAB * ((__INTEGER )(sizeof(void *)))))));
+        __tmp__QNFC=(__INTEGER)(new_capacity__VZAB -  1);
+        Self__AYVD=__tmp__Z0AB;
+        while ((Self__AYVD <= __tmp__QNFC)) {
+          new__2MFC[Self__AYVD]=NULL;
+          Self__AYVD=(__INTEGER)(Self__AYVD +  1);
         };
-        Self__HZAB->parent_arrayed_collection__AJP.storage__21V=new__QMFC;
-        Self__HZAB->parent_arrayed_collection__AJP.capacity__R1V=new_capacity__JZAB;
-        Self__HZAB->parent_arrayed_collection__AJP.upper__KJP=(__INTEGER)(Self__HZAB->parent_arrayed_collection__AJP.upper__KJP +  1);
+        Self__TZAB->parent_arrayed_collection__MJP.storage__I2V=new__2MFC;
+        Self__TZAB->parent_arrayed_collection__MJP.capacity__31V=new_capacity__VZAB;
+        Self__TZAB->parent_arrayed_collection__MJP.upper__WJP=(__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.upper__WJP +  1);
       };
     };
-    ((void **)Self__HZAB->parent_arrayed_collection__AJP.storage__21V)[Self__HZAB->parent_arrayed_collection__AJP.upper__KJP]=result__L2HB;
+    ((void **)Self__TZAB->parent_arrayed_collection__MJP.storage__I2V)[Self__TZAB->parent_arrayed_collection__MJP.upper__WJP]=result__X2HB;
   };
-  return(result__0IP);
+  return(result__GJP);
 }
 
-static void* read_type__XBM(__PARSER *Self__YBM,__BOOLEAN is_local__ZBM)
+static void* read_type__DCM(__PARSER *Self__ECM,__BOOLEAN is_local__FCM)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  void *style__1BM;
-  void *result__2BM;
-  void *typ_arg__4BM,*typ_res__5BM,*typ_arg__JLN,*typ_res__KLN;
-  __POSITION pos__KVQG,pos__MVQG,pos__OVQG,__tmp__CFM,pos__SVQG;
-  __POSITION pos__RXQG,pos__TXQG;
-  __ITM_TYPE_STYLE *Self__D53G;
-  void *result__MLN;
-  __INTEGER idx__NLN,typ_id__50GB,new_capacity__NMAB,__tmp__RNAB;
-  __INTEGER __tmp__WKFC,Self__IVVD;
-  __ITM_TYPE_BLOCK *result__Z0GB,*Self__VYCC;
-  __POINTER ptr__00GB,ptr_table__OCBH,next__NCBH,result__PCBH;
-  __POINTER ptr_table__TCBH,next__SCBH,result__UCBH;
-  __UINTEGER_32 sz__20GB,a__M53G,new_size__N53G,t__R53G,a__Q53G;
-  __UINTEGER_32 new_size__WCBH,lab_type__VCBH;
-  void *lst__3BM;
-  __BOOLEAN result__1BBH,result__4BBH,result__BCBH,result__ECBH;
-  __BOOLEAN result__HCBH,result__KCBH,__tmp__1MAB,result__YCBH;
-  __BOOLEAN __tmp__BHM,result__0CBH;
-  __CHARACTER result__2BBH,result__5BBH,result__CCBH,result__FCBH;
-  __CHARACTER result__ICBH,result__LCBH;
-  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__LMAB;
-  void **__tmp__QNAB,**new__CKFC;
-  style__1BM=NULL;
-  result__2BM=NULL;
-  lst__3BM=NULL;
-  typ_arg__4BM=NULL;
-  typ_res__5BM=NULL;
-  result__1BBH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__1BBH=FALSE__;
+  void *style__HCM;
+  void *result__ICM;
+  void *typ_arg__KCM,*typ_res__LCM,*typ_arg__VLN,*typ_res__WLN;
+  __POSITION pos__0HWG,pos__2HWG,pos__4HWG,__tmp__OFM,pos__CIWG;
+  __POSITION pos__BKWG,pos__DKWG;
+  __ITM_TYPE_STYLE *Self__SKEH;
+  void *result__YLN;
+  __INTEGER idx__ZLN,typ_id__L1GB,new_capacity__ZMAB,__tmp__3NAB;
+  __INTEGER __tmp__CLFC,Self__BWVD;
+  __ITM_TYPE_BLOCK *result__F1GB,*Self__BZCC;
+  __POINTER ptr__G1GB,ptr_table__CPHH,next__BPHH,result__DPHH;
+  __POINTER ptr_table__HPHH,next__GPHH,result__IPHH;
+  __UINTEGER_32 sz__I1GB,a__1KEH,new_size__2KEH,t__ALEH,a__5KEH;
+  __UINTEGER_32 new_size__KPHH,lab_type__JPHH;
+  void *lst__JCM;
+  __BOOLEAN result__POHH,result__SOHH,result__VOHH,result__YOHH;
+  __BOOLEAN result__1OHH,result__4OHH,__tmp__HNAB,result__MPHH;
+  __BOOLEAN __tmp__NHM,result__OPHH;
+  __CHARACTER result__QOHH,result__TOHH,result__WOHH,result__ZOHH;
+  __CHARACTER result__2OHH,result__5OHH;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__XMAB;
+  void **__tmp__2NAB,**new__OKFC;
+  style__HCM=NULL;
+  result__ICM=NULL;
+  lst__JCM=NULL;
+  typ_arg__KCM=NULL;
+  typ_res__LCM=NULL;
+  result__POHH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__POHH=FALSE__;
   } else {
-    result__2BBH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__2BBH=((__CHARACTER )(( 0)));
+    result__QOHH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__QOHH=((__CHARACTER )(( 0)));
     } else {
-      result__2BBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__QOHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__2BBH == '{')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__1BBH=TRUE__;
+    if ((result__QOHH == '{')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__POHH=TRUE__;
     };
   };
-  if (result__1BBH) {
-    result__4BBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__4BBH=FALSE__;
+  if (result__POHH) {
+    result__SOHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__SOHH=FALSE__;
     } else {
-      result__5BBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__5BBH=((__CHARACTER )(( 0)));
+      result__TOHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__TOHH=((__CHARACTER )(( 0)));
       } else {
-        result__5BBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__TOHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__5BBH == '(')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__4BBH=TRUE__;
+      if ((result__TOHH == '(')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__SOHH=TRUE__;
       };
     };
-    if (result__4BBH) {
-      lst__3BM=read_type_list__2LO(Self__YBM,FALSE__);
-      if (((void *)lst__3BM == (void *)NULL)) {
-        pos__KVQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_251));
-        put_position__IOG(pos__KVQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+    if (result__SOHH) {
+      lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
+      if (((void *)lst__JCM == (void *)NULL)) {
+        pos__0HWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_261));
+        put_position__UOG(pos__0HWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3BM)->parent_arrayed_collection__NXC.upper__4HV +  1) ==  1)) {
-        typ_arg__4BM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3BM)->parent_arrayed_collection__NXC.storage__FMV)[ 0];
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.upper__KIV +  1) ==  1)) {
+        typ_arg__KCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
       } else {
-        typ_arg__4BM=get__WIP(lst__3BM);
+        typ_arg__KCM=get__CJP(lst__JCM);
       };
-      result__BCBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__BCBH=FALSE__;
+      result__VOHH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__VOHH=FALSE__;
       } else {
-        result__CCBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__CCBH=((__CHARACTER )(( 0)));
+        result__WOHH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__WOHH=((__CHARACTER )(( 0)));
         } else {
-          result__CCBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__WOHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__CCBH == ')')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__BCBH=TRUE__;
+        if ((result__WOHH == ')')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__VOHH=TRUE__;
         };
       };
-      if ((! result__BCBH)) {
-        pos__MVQG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_248));
-        put_position__IOG(pos__MVQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((! result__VOHH)) {
+        pos__2HWG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_258));
+        put_position__UOG(pos__2HWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      result__ECBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__ECBH=FALSE__;
+      result__YOHH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__YOHH=FALSE__;
       } else {
-        result__FCBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__FCBH=((__CHARACTER )(( 0)));
+        result__ZOHH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__ZOHH=((__CHARACTER )(( 0)));
         } else {
-          result__FCBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__ZOHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__FCBH == ';')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__ECBH=TRUE__;
+        if ((result__ZOHH == ';')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__YOHH=TRUE__;
         };
       };
-      if ((! result__ECBH)) {
-        pos__OVQG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_229));
-        put_position__IOG(pos__OVQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((! result__YOHH)) {
+        pos__4HWG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_239));
+        put_position__UOG(pos__4HWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      lst__3BM=read_type_list__2LO(Self__YBM,FALSE__);
+      lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
     } else {
-      lst__3BM=read_type_list__2LO(Self__YBM,FALSE__);
-      if (((void *)lst__3BM != (void *)NULL)) {
-        result__HCBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__HCBH=FALSE__;
+      lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
+      if (((void *)lst__JCM != (void *)NULL)) {
+        result__1OHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__1OHH=FALSE__;
         } else {
-          result__ICBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__ICBH=((__CHARACTER )(( 0)));
+          result__2OHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__2OHH=((__CHARACTER )(( 0)));
           } else {
-            result__ICBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__2OHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__ICBH == ';')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__HCBH=TRUE__;
+          if ((result__2OHH == ';')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__1OHH=TRUE__;
           };
         };
-        if (result__HCBH) {
-          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3BM)->parent_arrayed_collection__NXC.upper__4HV +  1) ==  1)) {
-            typ_arg__4BM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3BM)->parent_arrayed_collection__NXC.storage__FMV)[ 0];
+        if (result__1OHH) {
+          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.upper__KIV +  1) ==  1)) {
+            typ_arg__KCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
           } else {
-            typ_arg__4BM=get__WIP(lst__3BM);
-            copy__NCS(string_tmp__VH,(&__string_278));
-            switch (((struct ___OBJ *)typ_arg__4BM)->__id) {
+            typ_arg__KCM=get__CJP(lst__JCM);
+            copy__ZCS(string_tmp__VH,(&__string_288));
+            switch (((struct ___OBJ *)typ_arg__KCM)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__VNS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__4BM)->parent_itm_type__RDE.name__4XP);
+              append__BOS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__KCM)->parent_itm_type__3DE.name__KYP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__VNS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__4BM)->name__4XP);
+              append__BOS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__KCM)->name__KYP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__GIBC(typ_arg__4BM,string_tmp__VH);
+              append_in__SIBC(typ_arg__KCM,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__CGPD(typ_arg__4BM,string_tmp__VH);
+              append_in__OGPD(typ_arg__KCM,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__GHPD(typ_arg__4BM,string_tmp__VH);
+              append_in__SHPD(typ_arg__KCM,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              Self__D53G=((__ITM_TYPE_STYLE *)typ_arg__4BM);
-              if (((void *)Self__D53G->style__HYP != (void *)NULL)) {
-                append__VNS(string_tmp__VH,Self__D53G->style__HYP);
-                add_last__NLT(string_tmp__VH,' ');
+              Self__SKEH=((__ITM_TYPE_STYLE *)typ_arg__KCM);
+              if (((void *)Self__SKEH->style__TYP != (void *)NULL)) {
+                append__BOS(string_tmp__VH,Self__SKEH->style__TYP);
+                add_last__ZLT(string_tmp__VH,' ');
               };
-              append__VNS(string_tmp__VH,Self__D53G->parent_itm_type_simple__VRN.name__4XP);
+              append__BOS(string_tmp__VH,Self__SKEH->parent_itm_type_simple__BSN.name__KYP);
             } break;
             };
-            append__VNS(string_tmp__VH,(&__string_279));
-            __tmp__CFM=current_position__3WF();
-            put_error__text__4MG( 2,string_tmp__VH);
-            put_position__IOG(__tmp__CFM);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+            append__BOS(string_tmp__VH,(&__string_289));
+            __tmp__OFM=current_position__JXF();
+            put_error__text__KNG( 2,string_tmp__VH);
+            put_position__UOG(__tmp__OFM);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          lst__3BM=read_type_list__2LO(Self__YBM,FALSE__);
+          lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
         };
       };
     };
-    if (((void *)lst__3BM != (void *)NULL)) {
-      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3BM)->parent_arrayed_collection__NXC.upper__4HV +  1) ==  1)) {
-        typ_res__5BM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__3BM)->parent_arrayed_collection__NXC.storage__FMV)[ 0];
+    if (((void *)lst__JCM != (void *)NULL)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.upper__KIV +  1) ==  1)) {
+        typ_res__LCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
       } else {
-        typ_res__5BM=get__WIP(lst__3BM);
+        typ_res__LCM=get__CJP(lst__JCM);
       };
     };
-    result__KCBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__KCBH=FALSE__;
+    result__4OHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__4OHH=FALSE__;
     } else {
-      result__LCBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__LCBH=((__CHARACTER )(( 0)));
+      result__5OHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__5OHH=((__CHARACTER )(( 0)));
       } else {
-        result__LCBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__5OHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__LCBH == '}')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__KCBH=TRUE__;
+      if ((result__5OHH == '}')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__4OHH=TRUE__;
       };
     };
-    if ((! result__KCBH)) {
-      pos__SVQG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_280));
-      put_position__IOG(pos__SVQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    if ((! result__4OHH)) {
+      pos__CIWG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_290));
+      put_position__UOG(pos__CIWG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    typ_arg__JLN=typ_arg__4BM;
-    typ_res__KLN=typ_res__5BM;
-    result__MLN=NULL;
-    idx__NLN= 0;
-    while (((idx__NLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__TLN)->parent_arrayed_collection__SLN.upper__2LN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__TLN)->parent_arrayed_collection__SLN.storage__FKV)[idx__NLN])->type_argument__KMN != (void *)typ_arg__JLN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__TLN)->parent_arrayed_collection__SLN.storage__FKV)[idx__NLN])->type_result__UMN != (void *)typ_res__KLN)))) {
-      idx__NLN=(__INTEGER)(idx__NLN +  1);
-    };
-    if ((idx__NLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__TLN)->parent_arrayed_collection__SLN.upper__2LN)) {
-      result__MLN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__TLN)->parent_arrayed_collection__SLN.storage__FKV)[idx__NLN];
-    } else {
-      result__Z0GB=NULL;
-      ptr__00GB=((__POINTER )(NULL));
-      typ_id__50GB= 0;
-      sz__20GB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
-      if ((sz__20GB ==  0)) {
-        result__Z0GB=ITM_TYPE_BLOCK__;
-      } else {
-        typ_id__50GB=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__20GB);
-        if ((typ_id__50GB == (__INTEGER)(-  1))) {
-          a__M53G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__N53G=(__UINTEGER_32)((__UINTEGER_32)(sz__20GB + a__M53G) & (__UINTEGER_32)(~ a__M53G));
-          ptr_table__OCBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N53G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__NCBH=((__POINTER )(NULL));
-          result__PCBH=((__POINTER *)ptr_table__OCBH)[ 0];
-          if ((result__PCBH == (void *)NULL)) {
-            result__PCBH=new_lab__ARJ(new_size__N53G);
-            next__NCBH=(void *)((unsigned long)result__PCBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N53G)));
-            ((__POINTER *)next__NCBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OCBH)[ 0]=next__NCBH;
-          } else {
-            next__NCBH=((__POINTER *)result__PCBH)[ 0];
-            if ((next__NCBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PCBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__N53G <<  1)) <=  4096)) {
-                next__NCBH=(void *)((unsigned long)result__PCBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N53G)));
+    typ_arg__VLN=typ_arg__KCM;
+    typ_res__WLN=typ_res__LCM;
+    result__YLN=NULL;
+    idx__ZLN= 0;
+    while (((idx__ZLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.upper__IMN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.storage__RKV)[idx__ZLN])->type_argument__WMN != (void *)typ_arg__VLN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.storage__RKV)[idx__ZLN])->type_result__ANN != (void *)typ_res__WLN)))) {
+      idx__ZLN=(__INTEGER)(idx__ZLN +  1);
+    };
+    if ((idx__ZLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.upper__IMN)) {
+      result__YLN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.storage__RKV)[idx__ZLN];
+    } else {
+      result__F1GB=NULL;
+      ptr__G1GB=((__POINTER )(NULL));
+      typ_id__L1GB= 0;
+      sz__I1GB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
+      if ((sz__I1GB ==  0)) {
+        result__F1GB=ITM_TYPE_BLOCK__;
+      } else {
+        typ_id__L1GB=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__I1GB);
+        if ((typ_id__L1GB == (__INTEGER)(-  1))) {
+          a__1KEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__2KEH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1GB + a__1KEH) & (__UINTEGER_32)(~ a__1KEH));
+          ptr_table__CPHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2KEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__BPHH=((__POINTER )(NULL));
+          result__DPHH=((__POINTER *)ptr_table__CPHH)[ 0];
+          if ((result__DPHH == (void *)NULL)) {
+            result__DPHH=new_lab__MRJ(new_size__2KEH);
+            next__BPHH=(void *)((unsigned long)result__DPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KEH)));
+            ((__POINTER *)next__BPHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CPHH)[ 0]=next__BPHH;
+          } else {
+            next__BPHH=((__POINTER *)result__DPHH)[ 0];
+            if ((next__BPHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DPHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2KEH <<  1)) <=  4096)) {
+                next__BPHH=(void *)((unsigned long)result__DPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KEH)));
               } else {
-                next__NCBH=new_lab__ARJ(new_size__N53G);
+                next__BPHH=new_lab__MRJ(new_size__2KEH);
               };
-              ((__POINTER *)next__NCBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__OCBH)[ 0]=next__NCBH;
+              ((__POINTER *)next__BPHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CPHH)[ 0]=next__BPHH;
             } else {
-              ((__POINTER *)result__PCBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NCBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__PCBH=next__NCBH;
-            };
-          };
-          ptr__00GB=result__PCBH;
-        } else {
-          t__R53G=((__UINTEGER_32 )typ_id__50GB);
-          a__Q53G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__WCBH=(__UINTEGER_32)((__UINTEGER_32)(sz__20GB + a__Q53G) & (__UINTEGER_32)(~ a__Q53G));
-          ptr_table__TCBH=((__POINTER )(&(table_type[(t__R53G)])));
-          lab_type__VCBH=(__UINTEGER_32)(t__R53G |  1);
-          next__SCBH=((__POINTER )(NULL));
-          result__UCBH=((__POINTER *)ptr_table__TCBH)[ 0];
-          if ((result__UCBH == (void *)NULL)) {
-            result__UCBH=new_lab__ARJ(lab_type__VCBH);
-            next__SCBH=(void *)((unsigned long)result__UCBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCBH)));
-            ((__POINTER *)next__SCBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TCBH)[ 0]=next__SCBH;
-          } else {
-            next__SCBH=((__POINTER *)result__UCBH)[ 0];
-            if ((next__SCBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UCBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WCBH <<  1)) <=  4096)) {
-                next__SCBH=(void *)((unsigned long)result__UCBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WCBH)));
+              ((__POINTER *)result__DPHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BPHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DPHH=next__BPHH;
+            };
+          };
+          ptr__G1GB=result__DPHH;
+        } else {
+          t__ALEH=((__UINTEGER_32 )typ_id__L1GB);
+          a__5KEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KPHH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1GB + a__5KEH) & (__UINTEGER_32)(~ a__5KEH));
+          ptr_table__HPHH=((__POINTER )(&(table_type[(t__ALEH)])));
+          lab_type__JPHH=(__UINTEGER_32)(t__ALEH |  1);
+          next__GPHH=((__POINTER )(NULL));
+          result__IPHH=((__POINTER *)ptr_table__HPHH)[ 0];
+          if ((result__IPHH == (void *)NULL)) {
+            result__IPHH=new_lab__MRJ(lab_type__JPHH);
+            next__GPHH=(void *)((unsigned long)result__IPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPHH)));
+            ((__POINTER *)next__GPHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HPHH)[ 0]=next__GPHH;
+          } else {
+            next__GPHH=((__POINTER *)result__IPHH)[ 0];
+            if ((next__GPHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IPHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KPHH <<  1)) <=  4096)) {
+                next__GPHH=(void *)((unsigned long)result__IPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPHH)));
               } else {
-                next__SCBH=new_lab__ARJ(lab_type__VCBH);
+                next__GPHH=new_lab__MRJ(lab_type__JPHH);
               };
-              ((__POINTER *)next__SCBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__TCBH)[ 0]=next__SCBH;
+              ((__POINTER *)next__GPHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HPHH)[ 0]=next__GPHH;
             } else {
-              ((__POINTER *)result__UCBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SCBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__UCBH=next__SCBH;
+              ((__POINTER *)result__IPHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GPHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__IPHH=next__GPHH;
             };
           };
-          ptr__00GB=result__UCBH;
+          ptr__G1GB=result__IPHH;
         };
-        result__Z0GB=((__ITM_TYPE_BLOCK *)ptr__00GB);
-        *(result__Z0GB) = *(ITM_TYPE_BLOCK__);
+        result__F1GB=((__ITM_TYPE_BLOCK *)ptr__G1GB);
+        *(result__F1GB) = *(ITM_TYPE_BLOCK__);
       };
-      Self__VYCC=((__ITM_TYPE_BLOCK *)result__Z0GB);
-      Self__VYCC->type_argument__KMN=typ_arg__4BM;
-      Self__VYCC->type_result__UMN=typ_res__5BM;
-      result__MLN=result__Z0GB;
-      Self__LMAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__TLN);
-      new_capacity__NMAB= 0;
-      if (((__INTEGER)(Self__LMAB->parent_arrayed_collection__SLN.upper__2LN +  1) <= (__INTEGER)(Self__LMAB->parent_arrayed_collection__SLN.capacity__0JV -  1))) {
-        Self__LMAB->parent_arrayed_collection__SLN.upper__2LN=(__INTEGER)(Self__LMAB->parent_arrayed_collection__SLN.upper__2LN +  1);
-        __tmp__1MAB=TRUE__;
+      Self__BZCC=((__ITM_TYPE_BLOCK *)result__F1GB);
+      Self__BZCC->type_argument__WMN=typ_arg__KCM;
+      Self__BZCC->type_result__ANN=typ_res__LCM;
+      result__YLN=result__F1GB;
+      Self__XMAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN);
+      new_capacity__ZMAB= 0;
+      if (((__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.upper__IMN +  1) <= (__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV -  1))) {
+        Self__XMAB->parent_arrayed_collection__4LN.upper__IMN=(__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.upper__IMN +  1);
+        __tmp__HNAB=TRUE__;
       } else {
-        __tmp__1MAB=FALSE__;
+        __tmp__HNAB=FALSE__;
       };
-      if ((! __tmp__1MAB)) {
-        if ((Self__LMAB->parent_arrayed_collection__SLN.capacity__0JV ==  0)) {
-          Self__LMAB->parent_arrayed_collection__SLN.storage__FKV=create__EUWB( 2);
-          Self__LMAB->parent_arrayed_collection__SLN.capacity__0JV= 2;
-          Self__LMAB->parent_arrayed_collection__SLN.upper__2LN= 0;
+      if ((! __tmp__HNAB)) {
+        if ((Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV ==  0)) {
+          Self__XMAB->parent_arrayed_collection__4LN.storage__RKV=create__QUWB( 2);
+          Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV= 2;
+          Self__XMAB->parent_arrayed_collection__4LN.upper__IMN= 0;
         } else {
-          new_capacity__NMAB=(__INTEGER)(Self__LMAB->parent_arrayed_collection__SLN.capacity__0JV <<  1);
-          __tmp__QNAB=Self__LMAB->parent_arrayed_collection__SLN.storage__FKV;
-          __tmp__RNAB=Self__LMAB->parent_arrayed_collection__SLN.capacity__0JV;
-          new__CKFC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__QNAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__RNAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__NMAB * ((__INTEGER )(sizeof(void *)))))));
-          __tmp__WKFC=(__INTEGER)(new_capacity__NMAB -  1);
-          Self__IVVD=__tmp__RNAB;
-          while ((Self__IVVD <= __tmp__WKFC)) {
-            new__CKFC[Self__IVVD]=NULL;
-            Self__IVVD=(__INTEGER)(Self__IVVD +  1);
+          new_capacity__ZMAB=(__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV <<  1);
+          __tmp__2NAB=Self__XMAB->parent_arrayed_collection__4LN.storage__RKV;
+          __tmp__3NAB=Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV;
+          new__OKFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__2NAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__3NAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZMAB * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__CLFC=(__INTEGER)(new_capacity__ZMAB -  1);
+          Self__BWVD=__tmp__3NAB;
+          while ((Self__BWVD <= __tmp__CLFC)) {
+            new__OKFC[Self__BWVD]=NULL;
+            Self__BWVD=(__INTEGER)(Self__BWVD +  1);
           };
-          Self__LMAB->parent_arrayed_collection__SLN.storage__FKV=new__CKFC;
-          Self__LMAB->parent_arrayed_collection__SLN.capacity__0JV=new_capacity__NMAB;
-          Self__LMAB->parent_arrayed_collection__SLN.upper__2LN=(__INTEGER)(Self__LMAB->parent_arrayed_collection__SLN.upper__2LN +  1);
+          Self__XMAB->parent_arrayed_collection__4LN.storage__RKV=new__OKFC;
+          Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV=new_capacity__ZMAB;
+          Self__XMAB->parent_arrayed_collection__4LN.upper__IMN=(__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.upper__IMN +  1);
         };
       };
-      ((void **)Self__LMAB->parent_arrayed_collection__SLN.storage__FKV)[Self__LMAB->parent_arrayed_collection__SLN.upper__2LN]=result__Z0GB;
+      ((void **)Self__XMAB->parent_arrayed_collection__4LN.storage__RKV)[Self__XMAB->parent_arrayed_collection__4LN.upper__IMN]=result__F1GB;
     };
-    result__2BM=result__MLN;
+    result__ICM=result__YLN;
   } else {
-    result__YCBH=read_word__EPF((&__string_9));
-    if (is_shorter__WY) {
-      if (result__YCBH) {
+    result__MPHH=read_word__QPF((&__string_9));
+    if (is_shorter__5Y) {
+      if (result__MPHH) {
         if (((void *)(&__string_9) == (void *)(&__string_4))) {
-          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         } else {
-          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         };
       };
     };
-    if (result__YCBH) {
-      __tmp__BHM=TRUE__;
+    if (result__MPHH) {
+      __tmp__NHM=TRUE__;
     } else {
-      result__0CBH=read_word__EPF((&__string_10));
-      if (is_shorter__WY) {
-        if (result__0CBH) {
+      result__OPHH=read_word__QPF((&__string_10));
+      if (is_shorter__5Y) {
+        if (result__OPHH) {
           if (((void *)(&__string_10) == (void *)(&__string_4))) {
-            short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+            short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
           } else {
-            short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+            short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
           };
         };
       };
-      __tmp__BHM=result__0CBH;
+      __tmp__NHM=result__OPHH;
     };
-    if (__tmp__BHM) {
-      style__1BM=last_string__2ZC;
-      if ((is_local__ZBM && ((void *)last_string__2ZC == (void *)(&__string_9)))) {
-        pos__RXQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_281));
-        put_position__IOG(pos__RXQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+    if (__tmp__NHM) {
+      style__HCM=last_string__I0C;
+      if ((is_local__FCM && ((void *)last_string__I0C == (void *)(&__string_9)))) {
+        pos__BKWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_291));
+        put_position__UOG(pos__BKWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__2BM=read_prototype__1NN(Self__YBM,style__1BM);
-    if (((void *)read_contract__1SF(Self__YBM) != (void *)NULL)) {
-      pos__TXQG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_246));
-      put_position__IOG(pos__TXQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    result__ICM=read_prototype__HON(Self__ECM,style__HCM);
+    if (((void *)read_contract__HTF(Self__ECM) != (void *)NULL)) {
+      pos__DKWG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_256));
+      put_position__UOG(pos__DKWG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__2BM);
+  return(result__ICM);
 }
 
-static void set_result_type__E3FC(__ITM_SLOT *Self__F3FC,void *t__G3FC)
+static void set_result_type__Q3FC(__ITM_SLOT *Self__R3FC,void *t__S3FC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  void *tm__H3FC,*__tmp__Q3FC;
-  __SECTION_ *Self__3OUG;
-  __POSITION pos__XYID;
-  tm__H3FC=NULL;
-  Self__3OUG=((__SECTION_ *)Self__F3FC->id_section__M1C);
-  if ((((void *)Self__3OUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__3OUG->name__WYDC == (void *)(&__string_24)))) {
-    if (t__G3FC==NULL) {
-      __tmp__Q3FC=NULL;
-    } else {
-      switch (((struct ___OBJ *)t__G3FC)->__id) {
+  void *tm__T3FC,*__tmp__23FC;
+  __SECTION_ *Self__ED0G;
+  __POSITION pos__DZID;
+  tm__T3FC=NULL;
+  Self__ED0G=((__SECTION_ *)Self__R3FC->id_section__Y1C);
+  if ((((void *)Self__ED0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__ED0G->name__CZDC == (void *)(&__string_24)))) {
+    if (t__S3FC==NULL) {
+      __tmp__23FC=NULL;
+    } else {
+      switch (((struct ___OBJ *)t__S3FC)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__Q3FC=((void *)t__G3FC);
+        __tmp__23FC=((void *)t__S3FC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__Q3FC=((void *)t__G3FC);
+        __tmp__23FC=((void *)t__S3FC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__Q3FC=NULL;
+        __tmp__23FC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__Q3FC=((void *)t__G3FC);
+        __tmp__23FC=((void *)t__S3FC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__Q3FC=((void *)t__G3FC);
+        __tmp__23FC=((void *)t__S3FC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__Q3FC=((void *)t__G3FC);
+        __tmp__23FC=((void *)t__S3FC);
       } break;
       }
     };
-    tm__H3FC=__tmp__Q3FC;
-    if (((((void *)__tmp__Q3FC == (void *)NULL) || ((void *)__tmp__Q3FC == (void *)type_self__1TN)) || ((void *)__tmp__Q3FC == (void *)type_void__SVF))) {
-      pos__XYID=Self__F3FC->parent_named__G5.parent_itm_object__4.position__BDJ;
-      put_error__text__4MG( 1,(&__string_226));
-      put_position__IOG(pos__XYID);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    tm__T3FC=__tmp__23FC;
+    if (((((void *)__tmp__23FC == (void *)NULL) || ((void *)__tmp__23FC == (void *)type_self__HUN)) || ((void *)__tmp__23FC == (void *)type_void__4VF))) {
+      pos__DZID=Self__R3FC->parent_named__P5.parent_itm_object__4.position__NDJ;
+      put_error__text__KNG( 1,(&__string_236));
+      put_position__UOG(pos__DZID);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__F3FC->result_type__O4FC=t__G3FC;
+  Self__R3FC->result_type__04FC=t__S3FC;
 }
 
-static void* read_contract__1SF(__PARSER *Self__2SF)
+static void* read_contract__HTF(__PARSER *Self__ITF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *e__5SF;
-  void *result__ATF;
-  __POSITION p__GDBH,p__1WL,pos__1XQG,pos__3XQG,p__JEBH;
-  __ITM_LIST *result__4CBH;
-  __POINTER ptr__5CBH,ptr_table__IDBH,next__HDBH,result__JDBH;
-  __POINTER ptr_table__NDBH,next__MDBH,result__ODBH,ptr__F3L;
-  __POINTER ptr_table__SDBH,next__RDBH,result__TDBH,ptr_table__XDBH;
-  __POINTER next__WDBH,result__YDBH,ptr__CEBH,ptr_table__LEBH;
-  __POINTER next__KEBH,result__MEBH,ptr_table__QEBH,next__PEBH;
-  __POINTER result__REBH;
-  __INTEGER typ_id__ADBH,typ_id__K3L,typ_id__DEBH;
-  __UINTEGER_32 sz__BDBH,a__CDBH,new_size__DDBH,t__EDBH,a__FDBH;
-  __UINTEGER_32 new_size__QDBH,lab_type__PDBH,sz__H3L,a__053G;
-  __UINTEGER_32 new_size__153G,t__553G,a__453G,new_size__0DBH;
-  __UINTEGER_32 lab_type__ZDBH,sz__EEBH,a__FEBH,new_size__GEBH,t__HEBH;
-  __UINTEGER_32 a__IEBH,new_size__TEBH,lab_type__SEBH;
-  __ITM_LDOTS *result__E3L;
-  __ITM_PROTOTYPE *result__BEBH;
-  __BOOLEAN continue__4SF,result__1CBH,result__1DBH,result__4DBH;
-  void *lst__GTF,*result__C05G;
-  __CHARACTER result__2CBH,result__2DBH,result__5DBH;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__D05G,*Self__E05G;
-  continue__4SF=FALSE__;
-  e__5SF=NULL;
-  result__ATF=NULL;
-  lst__GTF=NULL;
-  result__1CBH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__1CBH=FALSE__;
+  void *e__LTF;
+  void *result__MTF;
+  __POSITION p__0PHH,p__HXL,pos__LKWG,pos__NKWG,p__3QHH;
+  __ITM_LIST *result__SPHH;
+  __POINTER ptr__TPHH,ptr_table__2PHH,next__1PHH,result__3PHH;
+  __POINTER ptr_table__BQHH,next__AQHH,result__CQHH,ptr__R3L;
+  __POINTER ptr_table__GQHH,next__FQHH,result__HQHH,ptr_table__LQHH;
+  __POINTER next__KQHH,result__MQHH,ptr__WQHH,ptr_table__5QHH;
+  __POINTER next__4QHH,result__ARHH,ptr_table__ERHH,next__DRHH;
+  __POINTER result__FRHH;
+  __INTEGER typ_id__UPHH,typ_id__W3L,typ_id__XQHH;
+  __UINTEGER_32 sz__VPHH,a__WPHH,new_size__XPHH,t__YPHH,a__ZPHH;
+  __UINTEGER_32 new_size__EQHH,lab_type__DQHH,sz__T3L,a__JLEH;
+  __UINTEGER_32 new_size__KLEH,t__OLEH,a__NLEH,new_size__OQHH;
+  __UINTEGER_32 lab_type__NQHH,sz__YQHH,a__ZQHH,new_size__0QHH,t__1QHH;
+  __UINTEGER_32 a__2QHH,new_size__HRHH,lab_type__GRHH;
+  __ITM_LDOTS *result__Q3L;
+  __ITM_PROTOTYPE *result__VQHH;
+  __BOOLEAN continue__KTF,result__PPHH,result__PQHH,result__SQHH;
+  void *lst__STF,*result__OGGH;
+  __CHARACTER result__QPHH,result__QQHH,result__TQHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__PGGH,*Self__QGGH;
+  continue__KTF=FALSE__;
+  e__LTF=NULL;
+  result__MTF=NULL;
+  lst__STF=NULL;
+  result__PPHH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__PPHH=FALSE__;
   } else {
-    result__2CBH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__2CBH=((__CHARACTER )(( 0)));
-    } else {
-      result__2CBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-    };
-    if ((result__2CBH == '[')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__1CBH=TRUE__;
-    };
-  };
-  if (result__1CBH) {
-    p__GDBH=current_position__3WF();
-    result__4CBH=NULL;
-    ptr__5CBH=((__POINTER )(NULL));
-    typ_id__ADBH= 0;
-    sz__BDBH=((__UINTEGER_32 )sizeof(__ITM_LIST));
-    if ((sz__BDBH ==  0)) {
-      result__4CBH=ITM_LIST__;
-    } else {
-      typ_id__ADBH=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BDBH);
-      if ((typ_id__ADBH == (__INTEGER)(-  1))) {
-        a__CDBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__DDBH=(__UINTEGER_32)((__UINTEGER_32)(sz__BDBH + a__CDBH) & (__UINTEGER_32)(~ a__CDBH));
-        ptr_table__IDBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DDBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__HDBH=((__POINTER )(NULL));
-        result__JDBH=((__POINTER *)ptr_table__IDBH)[ 0];
-        if ((result__JDBH == (void *)NULL)) {
-          result__JDBH=new_lab__ARJ(new_size__DDBH);
-          next__HDBH=(void *)((unsigned long)result__JDBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DDBH)));
-          ((__POINTER *)next__HDBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IDBH)[ 0]=next__HDBH;
-        } else {
-          next__HDBH=((__POINTER *)result__JDBH)[ 0];
-          if ((next__HDBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JDBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DDBH <<  1)) <=  4096)) {
-              next__HDBH=(void *)((unsigned long)result__JDBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DDBH)));
+    result__QPHH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__QPHH=((__CHARACTER )(( 0)));
+    } else {
+      result__QPHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    };
+    if ((result__QPHH == '[')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__PPHH=TRUE__;
+    };
+  };
+  if (result__PPHH) {
+    p__0PHH=current_position__JXF();
+    result__SPHH=NULL;
+    ptr__TPHH=((__POINTER )(NULL));
+    typ_id__UPHH= 0;
+    sz__VPHH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+    if ((sz__VPHH ==  0)) {
+      result__SPHH=ITM_LIST__;
+    } else {
+      typ_id__UPHH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__VPHH);
+      if ((typ_id__UPHH == (__INTEGER)(-  1))) {
+        a__WPHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XPHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VPHH + a__WPHH) & (__UINTEGER_32)(~ a__WPHH));
+        ptr_table__2PHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XPHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__1PHH=((__POINTER )(NULL));
+        result__3PHH=((__POINTER *)ptr_table__2PHH)[ 0];
+        if ((result__3PHH == (void *)NULL)) {
+          result__3PHH=new_lab__MRJ(new_size__XPHH);
+          next__1PHH=(void *)((unsigned long)result__3PHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XPHH)));
+          ((__POINTER *)next__1PHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2PHH)[ 0]=next__1PHH;
+        } else {
+          next__1PHH=((__POINTER *)result__3PHH)[ 0];
+          if ((next__1PHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3PHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XPHH <<  1)) <=  4096)) {
+              next__1PHH=(void *)((unsigned long)result__3PHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XPHH)));
             } else {
-              next__HDBH=new_lab__ARJ(new_size__DDBH);
-            };
-            ((__POINTER *)next__HDBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__IDBH)[ 0]=next__HDBH;
-          } else {
-            ((__POINTER *)result__JDBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__JDBH=next__HDBH;
-          };
-        };
-        ptr__5CBH=result__JDBH;
-      } else {
-        t__EDBH=((__UINTEGER_32 )typ_id__ADBH);
-        a__FDBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__QDBH=(__UINTEGER_32)((__UINTEGER_32)(sz__BDBH + a__FDBH) & (__UINTEGER_32)(~ a__FDBH));
-        ptr_table__NDBH=((__POINTER )(&(table_type[(t__EDBH)])));
-        lab_type__PDBH=(__UINTEGER_32)(t__EDBH |  1);
-        next__MDBH=((__POINTER )(NULL));
-        result__ODBH=((__POINTER *)ptr_table__NDBH)[ 0];
-        if ((result__ODBH == (void *)NULL)) {
-          result__ODBH=new_lab__ARJ(lab_type__PDBH);
-          next__MDBH=(void *)((unsigned long)result__ODBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QDBH)));
-          ((__POINTER *)next__MDBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NDBH)[ 0]=next__MDBH;
-        } else {
-          next__MDBH=((__POINTER *)result__ODBH)[ 0];
-          if ((next__MDBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ODBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__QDBH <<  1)) <=  4096)) {
-              next__MDBH=(void *)((unsigned long)result__ODBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QDBH)));
+              next__1PHH=new_lab__MRJ(new_size__XPHH);
+            };
+            ((__POINTER *)next__1PHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2PHH)[ 0]=next__1PHH;
+          } else {
+            ((__POINTER *)result__3PHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3PHH=next__1PHH;
+          };
+        };
+        ptr__TPHH=result__3PHH;
+      } else {
+        t__YPHH=((__UINTEGER_32 )typ_id__UPHH);
+        a__ZPHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EQHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VPHH + a__ZPHH) & (__UINTEGER_32)(~ a__ZPHH));
+        ptr_table__BQHH=((__POINTER )(&(table_type[(t__YPHH)])));
+        lab_type__DQHH=(__UINTEGER_32)(t__YPHH |  1);
+        next__AQHH=((__POINTER )(NULL));
+        result__CQHH=((__POINTER *)ptr_table__BQHH)[ 0];
+        if ((result__CQHH == (void *)NULL)) {
+          result__CQHH=new_lab__MRJ(lab_type__DQHH);
+          next__AQHH=(void *)((unsigned long)result__CQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQHH)));
+          ((__POINTER *)next__AQHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BQHH)[ 0]=next__AQHH;
+        } else {
+          next__AQHH=((__POINTER *)result__CQHH)[ 0];
+          if ((next__AQHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CQHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EQHH <<  1)) <=  4096)) {
+              next__AQHH=(void *)((unsigned long)result__CQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQHH)));
             } else {
-              next__MDBH=new_lab__ARJ(lab_type__PDBH);
+              next__AQHH=new_lab__MRJ(lab_type__DQHH);
             };
-            ((__POINTER *)next__MDBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NDBH)[ 0]=next__MDBH;
+            ((__POINTER *)next__AQHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BQHH)[ 0]=next__AQHH;
           } else {
-            ((__POINTER *)result__ODBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ODBH=next__MDBH;
+            ((__POINTER *)result__CQHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CQHH=next__AQHH;
           };
         };
-        ptr__5CBH=result__ODBH;
+        ptr__TPHH=result__CQHH;
       };
-      result__4CBH=((__ITM_LIST *)ptr__5CBH);
-      *(result__4CBH) = *(ITM_LIST__);
+      result__SPHH=((__ITM_LIST *)ptr__TPHH);
+      *(result__SPHH) = *(ITM_LIST__);
     };
-    ((__ITM_LIST *)result__4CBH)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ=p__GDBH;
-    last_group__PTF=result__4CBH;
-    result__ATF=result__4CBH;
-    read_def_local__R0H(Self__2SF);
-    result__C05G=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H)->parent_arrayed_collection__U3H.upper__2VT <  0)) {
-      result__C05G=create_with_capacity__GVI( 16);
+    ((__ITM_LIST *)result__SPHH)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ=p__0PHH;
+    last_group__1TF=result__SPHH;
+    result__MTF=result__SPHH;
+    read_def_local__30H(Self__ITF);
+    result__OGGH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
+      result__OGGH=create_with_capacity__SVI( 16);
     } else {
-      Self__D05G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-      result__C05G=((void **)Self__D05G->parent_arrayed_collection__U3H.storage__KAU)[Self__D05G->parent_arrayed_collection__U3H.upper__2VT];
-      Self__E05G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-      Self__E05G->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(Self__E05G->parent_arrayed_collection__U3H.upper__2VT -  1);
+      Self__PGGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+      result__OGGH=((void **)Self__PGGH->parent_arrayed_collection__A4H.storage__WAU)[Self__PGGH->parent_arrayed_collection__A4H.upper__IWT];
+      Self__QGGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+      Self__QGGH->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__QGGH->parent_arrayed_collection__A4H.upper__IWT -  1);
     };
-    lst__GTF=result__C05G;
+    lst__STF=result__OGGH;
     do {
-      e__5SF=read_expr__S4I(Self__2SF);
-      if (((void *)e__5SF == (void *)NULL)) {
-        continue__4SF=read_word__EPF((&__string_7));
-        if (continue__4SF) {
-          p__1WL=current_position__3WF();
-          result__E3L=NULL;
-          ptr__F3L=((__POINTER )(NULL));
-          typ_id__K3L= 0;
-          sz__H3L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
-          if ((sz__H3L ==  0)) {
-            result__E3L=ITM_LDOTS__;
-          } else {
-            typ_id__K3L=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__H3L);
-            if ((typ_id__K3L == (__INTEGER)(-  1))) {
-              a__053G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__153G=(__UINTEGER_32)((__UINTEGER_32)(sz__H3L + a__053G) & (__UINTEGER_32)(~ a__053G));
-              ptr_table__SDBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__153G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__RDBH=((__POINTER )(NULL));
-              result__TDBH=((__POINTER *)ptr_table__SDBH)[ 0];
-              if ((result__TDBH == (void *)NULL)) {
-                result__TDBH=new_lab__ARJ(new_size__153G);
-                next__RDBH=(void *)((unsigned long)result__TDBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__153G)));
-                ((__POINTER *)next__RDBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SDBH)[ 0]=next__RDBH;
+      e__LTF=read_expr__44I(Self__ITF);
+      if (((void *)e__LTF == (void *)NULL)) {
+        continue__KTF=read_word__QPF((&__string_7));
+        if (continue__KTF) {
+          p__HXL=current_position__JXF();
+          result__Q3L=NULL;
+          ptr__R3L=((__POINTER )(NULL));
+          typ_id__W3L= 0;
+          sz__T3L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
+          if ((sz__T3L ==  0)) {
+            result__Q3L=ITM_LDOTS__;
+          } else {
+            typ_id__W3L=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__T3L);
+            if ((typ_id__W3L == (__INTEGER)(-  1))) {
+              a__JLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__KLEH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3L + a__JLEH) & (__UINTEGER_32)(~ a__JLEH));
+              ptr_table__GQHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KLEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__FQHH=((__POINTER )(NULL));
+              result__HQHH=((__POINTER *)ptr_table__GQHH)[ 0];
+              if ((result__HQHH == (void *)NULL)) {
+                result__HQHH=new_lab__MRJ(new_size__KLEH);
+                next__FQHH=(void *)((unsigned long)result__HQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KLEH)));
+                ((__POINTER *)next__FQHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GQHH)[ 0]=next__FQHH;
               } else {
-                next__RDBH=((__POINTER *)result__TDBH)[ 0];
-                if ((next__RDBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TDBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__153G <<  1)) <=  4096)) {
-                    next__RDBH=(void *)((unsigned long)result__TDBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__153G)));
+                next__FQHH=((__POINTER *)result__HQHH)[ 0];
+                if ((next__FQHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HQHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KLEH <<  1)) <=  4096)) {
+                    next__FQHH=(void *)((unsigned long)result__HQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KLEH)));
                   } else {
-                    next__RDBH=new_lab__ARJ(new_size__153G);
+                    next__FQHH=new_lab__MRJ(new_size__KLEH);
                   };
-                  ((__POINTER *)next__RDBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SDBH)[ 0]=next__RDBH;
+                  ((__POINTER *)next__FQHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GQHH)[ 0]=next__FQHH;
                 } else {
-                  ((__POINTER *)result__TDBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TDBH=next__RDBH;
+                  ((__POINTER *)result__HQHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HQHH=next__FQHH;
                 };
               };
-              ptr__F3L=result__TDBH;
+              ptr__R3L=result__HQHH;
             } else {
-              t__553G=((__UINTEGER_32 )typ_id__K3L);
-              a__453G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__0DBH=(__UINTEGER_32)((__UINTEGER_32)(sz__H3L + a__453G) & (__UINTEGER_32)(~ a__453G));
-              ptr_table__XDBH=((__POINTER )(&(table_type[(t__553G)])));
-              lab_type__ZDBH=(__UINTEGER_32)(t__553G |  1);
-              next__WDBH=((__POINTER )(NULL));
-              result__YDBH=((__POINTER *)ptr_table__XDBH)[ 0];
-              if ((result__YDBH == (void *)NULL)) {
-                result__YDBH=new_lab__ARJ(lab_type__ZDBH);
-                next__WDBH=(void *)((unsigned long)result__YDBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0DBH)));
-                ((__POINTER *)next__WDBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XDBH)[ 0]=next__WDBH;
+              t__OLEH=((__UINTEGER_32 )typ_id__W3L);
+              a__NLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__OQHH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3L + a__NLEH) & (__UINTEGER_32)(~ a__NLEH));
+              ptr_table__LQHH=((__POINTER )(&(table_type[(t__OLEH)])));
+              lab_type__NQHH=(__UINTEGER_32)(t__OLEH |  1);
+              next__KQHH=((__POINTER )(NULL));
+              result__MQHH=((__POINTER *)ptr_table__LQHH)[ 0];
+              if ((result__MQHH == (void *)NULL)) {
+                result__MQHH=new_lab__MRJ(lab_type__NQHH);
+                next__KQHH=(void *)((unsigned long)result__MQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQHH)));
+                ((__POINTER *)next__KQHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LQHH)[ 0]=next__KQHH;
               } else {
-                next__WDBH=((__POINTER *)result__YDBH)[ 0];
-                if ((next__WDBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YDBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0DBH <<  1)) <=  4096)) {
-                    next__WDBH=(void *)((unsigned long)result__YDBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0DBH)));
+                next__KQHH=((__POINTER *)result__MQHH)[ 0];
+                if ((next__KQHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MQHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OQHH <<  1)) <=  4096)) {
+                    next__KQHH=(void *)((unsigned long)result__MQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQHH)));
                   } else {
-                    next__WDBH=new_lab__ARJ(lab_type__ZDBH);
+                    next__KQHH=new_lab__MRJ(lab_type__NQHH);
                   };
-                  ((__POINTER *)next__WDBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XDBH)[ 0]=next__WDBH;
+                  ((__POINTER *)next__KQHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LQHH)[ 0]=next__KQHH;
                 } else {
-                  ((__POINTER *)result__YDBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__YDBH=next__WDBH;
+                  ((__POINTER *)result__MQHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MQHH=next__KQHH;
                 };
               };
-              ptr__F3L=result__YDBH;
+              ptr__R3L=result__MQHH;
             };
-            result__E3L=((__ITM_LDOTS *)ptr__F3L);
-            *(result__E3L) = *(ITM_LDOTS__);
+            result__Q3L=((__ITM_LDOTS *)ptr__R3L);
+            *(result__Q3L) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__E3L)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ=p__1WL;
-          add_last__I5U(lst__GTF,result__E3L);
+          ((__ITM_LDOTS *)result__Q3L)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ=p__HXL;
+          add_last__U5U(lst__STF,result__Q3L);
         };
       } else {
-        add_last__I5U(lst__GTF,e__5SF);
-        result__1DBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__1DBH=FALSE__;
+        add_last__U5U(lst__STF,e__LTF);
+        result__PQHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__PQHH=FALSE__;
         } else {
-          result__2DBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__2DBH=((__CHARACTER )(( 0)));
+          result__QQHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__QQHH=((__CHARACTER )(( 0)));
           } else {
-            result__2DBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__QQHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__2DBH == ';')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__1DBH=TRUE__;
+          if ((result__QQHH == ';')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__PQHH=TRUE__;
           };
         };
-        if ((! result__1DBH)) {
-          pos__1XQG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_229));
-          put_position__IOG(pos__1XQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__PQHH)) {
+          pos__LKWG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_239));
+          put_position__UOG(pos__LKWG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        continue__4SF=TRUE__;
+        continue__KTF=TRUE__;
       };
-    } while (continue__4SF);
-    result__4DBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__4DBH=FALSE__;
+    } while (continue__KTF);
+    result__SQHH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__SQHH=FALSE__;
     } else {
-      result__5DBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__5DBH=((__CHARACTER )(( 0)));
+      result__TQHH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__TQHH=((__CHARACTER )(( 0)));
       } else {
-        result__5DBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__TQHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__5DBH == ']')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__4DBH=TRUE__;
+      if ((result__TQHH == ']')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__SQHH=TRUE__;
       };
     };
-    if ((! result__4DBH)) {
-      pos__3XQG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_282));
-      put_position__IOG(pos__3XQG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    if ((! result__SQHH)) {
+      pos__NKWG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_292));
+      put_position__UOG(pos__NKWG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    p__JEBH=current_position__3WF();
-    result__BEBH=NULL;
-    ptr__CEBH=((__POINTER )(NULL));
-    typ_id__DEBH= 0;
-    sz__EEBH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-    if ((sz__EEBH ==  0)) {
-      result__BEBH=ITM_PROTOTYPE__;
-    } else {
-      typ_id__DEBH=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__EEBH);
-      if ((typ_id__DEBH == (__INTEGER)(-  1))) {
-        a__FEBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__GEBH=(__UINTEGER_32)((__UINTEGER_32)(sz__EEBH + a__FEBH) & (__UINTEGER_32)(~ a__FEBH));
-        ptr_table__LEBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GEBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__KEBH=((__POINTER )(NULL));
-        result__MEBH=((__POINTER *)ptr_table__LEBH)[ 0];
-        if ((result__MEBH == (void *)NULL)) {
-          result__MEBH=new_lab__ARJ(new_size__GEBH);
-          next__KEBH=(void *)((unsigned long)result__MEBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GEBH)));
-          ((__POINTER *)next__KEBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LEBH)[ 0]=next__KEBH;
-        } else {
-          next__KEBH=((__POINTER *)result__MEBH)[ 0];
-          if ((next__KEBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MEBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__GEBH <<  1)) <=  4096)) {
-              next__KEBH=(void *)((unsigned long)result__MEBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GEBH)));
+    p__3QHH=current_position__JXF();
+    result__VQHH=NULL;
+    ptr__WQHH=((__POINTER )(NULL));
+    typ_id__XQHH= 0;
+    sz__YQHH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__YQHH ==  0)) {
+      result__VQHH=ITM_PROTOTYPE__;
+    } else {
+      typ_id__XQHH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YQHH);
+      if ((typ_id__XQHH == (__INTEGER)(-  1))) {
+        a__ZQHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0QHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YQHH + a__ZQHH) & (__UINTEGER_32)(~ a__ZQHH));
+        ptr_table__5QHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0QHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__4QHH=((__POINTER )(NULL));
+        result__ARHH=((__POINTER *)ptr_table__5QHH)[ 0];
+        if ((result__ARHH == (void *)NULL)) {
+          result__ARHH=new_lab__MRJ(new_size__0QHH);
+          next__4QHH=(void *)((unsigned long)result__ARHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0QHH)));
+          ((__POINTER *)next__4QHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5QHH)[ 0]=next__4QHH;
+        } else {
+          next__4QHH=((__POINTER *)result__ARHH)[ 0];
+          if ((next__4QHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ARHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0QHH <<  1)) <=  4096)) {
+              next__4QHH=(void *)((unsigned long)result__ARHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0QHH)));
             } else {
-              next__KEBH=new_lab__ARJ(new_size__GEBH);
-            };
-            ((__POINTER *)next__KEBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LEBH)[ 0]=next__KEBH;
-          } else {
-            ((__POINTER *)result__MEBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KEBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MEBH=next__KEBH;
-          };
-        };
-        ptr__CEBH=result__MEBH;
-      } else {
-        t__HEBH=((__UINTEGER_32 )typ_id__DEBH);
-        a__IEBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__TEBH=(__UINTEGER_32)((__UINTEGER_32)(sz__EEBH + a__IEBH) & (__UINTEGER_32)(~ a__IEBH));
-        ptr_table__QEBH=((__POINTER )(&(table_type[(t__HEBH)])));
-        lab_type__SEBH=(__UINTEGER_32)(t__HEBH |  1);
-        next__PEBH=((__POINTER )(NULL));
-        result__REBH=((__POINTER *)ptr_table__QEBH)[ 0];
-        if ((result__REBH == (void *)NULL)) {
-          result__REBH=new_lab__ARJ(lab_type__SEBH);
-          next__PEBH=(void *)((unsigned long)result__REBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TEBH)));
-          ((__POINTER *)next__PEBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QEBH)[ 0]=next__PEBH;
-        } else {
-          next__PEBH=((__POINTER *)result__REBH)[ 0];
-          if ((next__PEBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__REBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TEBH <<  1)) <=  4096)) {
-              next__PEBH=(void *)((unsigned long)result__REBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TEBH)));
+              next__4QHH=new_lab__MRJ(new_size__0QHH);
+            };
+            ((__POINTER *)next__4QHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5QHH)[ 0]=next__4QHH;
+          } else {
+            ((__POINTER *)result__ARHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4QHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ARHH=next__4QHH;
+          };
+        };
+        ptr__WQHH=result__ARHH;
+      } else {
+        t__1QHH=((__UINTEGER_32 )typ_id__XQHH);
+        a__2QHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HRHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YQHH + a__2QHH) & (__UINTEGER_32)(~ a__2QHH));
+        ptr_table__ERHH=((__POINTER )(&(table_type[(t__1QHH)])));
+        lab_type__GRHH=(__UINTEGER_32)(t__1QHH |  1);
+        next__DRHH=((__POINTER )(NULL));
+        result__FRHH=((__POINTER *)ptr_table__ERHH)[ 0];
+        if ((result__FRHH == (void *)NULL)) {
+          result__FRHH=new_lab__MRJ(lab_type__GRHH);
+          next__DRHH=(void *)((unsigned long)result__FRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRHH)));
+          ((__POINTER *)next__DRHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ERHH)[ 0]=next__DRHH;
+        } else {
+          next__DRHH=((__POINTER *)result__FRHH)[ 0];
+          if ((next__DRHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FRHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HRHH <<  1)) <=  4096)) {
+              next__DRHH=(void *)((unsigned long)result__FRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRHH)));
             } else {
-              next__PEBH=new_lab__ARJ(lab_type__SEBH);
+              next__DRHH=new_lab__MRJ(lab_type__GRHH);
             };
-            ((__POINTER *)next__PEBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QEBH)[ 0]=next__PEBH;
+            ((__POINTER *)next__DRHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ERHH)[ 0]=next__DRHH;
           } else {
-            ((__POINTER *)result__REBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PEBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__REBH=next__PEBH;
+            ((__POINTER *)result__FRHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DRHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FRHH=next__DRHH;
           };
         };
-        ptr__CEBH=result__REBH;
+        ptr__WQHH=result__FRHH;
       };
-      result__BEBH=((__ITM_PROTOTYPE *)ptr__CEBH);
-      *(result__BEBH) = *(ITM_PROTOTYPE__);
+      result__VQHH=((__ITM_PROTOTYPE *)ptr__WQHH);
+      *(result__VQHH) = *(ITM_PROTOTYPE__);
     };
-    ((__ITM_PROTOTYPE *)result__BEBH)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=p__JEBH;
-    e__5SF=result__BEBH;
-    add_last__I5U(result__C05G,result__BEBH);
-    copy__E5H(result__C05G);
+    ((__ITM_PROTOTYPE *)result__VQHH)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=p__3QHH;
+    e__LTF=result__VQHH;
+    add_last__U5U(result__OGGH,result__VQHH);
+    copy__Q5H(result__OGGH);
   };
-  return(result__ATF);
+  return(result__MTF);
 }
 
-static void* read_expr__S4I(__PARSER *Self__T4I)
+static void* read_expr__44I(__PARSER *Self__54I)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *result__V4I,*value__W4I,*result__VEL,*expr__WEL,*__tmp__2HL;
-  void *__tmp__DJL,*__tmp__JKL;
-  __INTEGER p__34I,typ_id__O40C,typ_id__JFBH,typ_id__2FBH,typ_id__PGBH;
-  __INTEGER typ_id__RMJD,typ_id__P0JD,typ_id__EOJD,last_msg__0EL;
-  __INTEGER first_msg__1EL,typ_id__AIBH,typ_id__NSP,typ_id__5IBH;
-  __INTEGER index__UJBH,__tmp__SJBH,i__VJBH,typ_id__ZJBH,__tmp__FE1C;
-  __INTEGER i__XHCD,typ_id__BXO,typ_id__UYO;
-  void *name__44I,*n__IIBH,*n__EHP;
-  __POSITION p__KERC,pos__GYQG,p__PFBH,pos__IYQG,pos__KYQG,__tmp__YDJ;
-  __POSITION p__VGBH,pos__OYQG,__tmp__ZGJ,__tmp__DHJ,__tmp__MHJ,p__HIBH;
-  __POSITION pos__ZYQG,p__DHP,__tmp__AIL,__tmp__GJL,__tmp__NKL;
-  __ITM_LIST_IDF *result__I40C;
-  __POINTER ptr__J40C,ptr_table__4EBH,next__3EBH,result__5EBH;
-  __POINTER ptr_table__DFBH,next__CFBH,result__EFBH,ptr__IFBH;
-  __POINTER ptr_table__RFBH,next__QFBH,result__SFBH,ptr_table__WFBH;
-  __POINTER next__VFBH,result__XFBH,ptr__1FBH,ptr_table__EGBH;
-  __POINTER next__DGBH,result__FGBH,ptr_table__JGBH,next__IGBH;
-  __POINTER result__KGBH,ptr__OGBH,ptr_table__XGBH,next__WGBH;
-  __POINTER result__YGBH,ptr_table__2GBH,next__1GBH,result__3GBH;
-  __POINTER ptr__MMJD,ptr_table__BHBH,next__AHBH,result__CHBH;
-  __POINTER ptr_table__GHBH,next__FHBH,result__HHBH,ptr__K0JD;
-  __POINTER ptr_table__LHBH,next__KHBH,result__MHBH,ptr_table__QHBH;
-  __POINTER next__PHBH,result__RHBH,ptr__5NJD,ptr_table__VHBH;
-  __POINTER next__UHBH,result__WHBH,ptr_table__0HBH,next__ZHBH;
-  __POINTER result__1HBH,ptr__5HBH,ptr_table__KIBH,next__JIBH;
-  __POINTER result__LIBH,ptr_table__PIBH,next__OIBH,result__QIBH;
-  __POINTER ptr__ISP,ptr_table__UIBH,next__TIBH,result__VIBH;
-  __POINTER ptr_table__ZIBH,next__YIBH,result__0IBH,ptr__4IBH;
-  __POINTER ptr_table__HJBH,next__GJBH,result__IJBH,ptr_table__MJBH;
-  __POINTER next__LJBH,result__NJBH,ptr__YJBH,ptr_table__BKBH;
-  __POINTER next__AKBH,result__CKBH,ptr_table__GKBH,next__FKBH;
-  __POINTER result__HKBH,ptr__2WO,ptr_table__LKBH,next__KKBH;
-  __POINTER result__MKBH,ptr_table__QKBH,next__PKBH,result__RKBH;
-  __POINTER ptr__PYO,ptr_table__VKBH,next__UKBH,result__WKBH;
-  __POINTER ptr_table__0KBH,next__ZKBH,result__1KBH;
-  __UINTEGER_32 sz__L40C,a__CA4G,new_size__DA4G,t__HA4G,a__GA4G;
-  __UINTEGER_32 new_size__GFBH,lab_type__FFBH,sz__KFBH,a__LFBH;
-  __UINTEGER_32 new_size__MFBH,t__NFBH,a__OFBH,new_size__ZFBH;
-  __UINTEGER_32 lab_type__YFBH,sz__3FBH,a__4FBH,new_size__5FBH,t__AGBH;
-  __UINTEGER_32 a__BGBH,new_size__MGBH,lab_type__LGBH,sz__QGBH,a__RGBH;
-  __UINTEGER_32 new_size__SGBH,t__TGBH,a__UGBH,new_size__5GBH;
-  __UINTEGER_32 lab_type__4GBH,sz__OMJD,a__TP4G,new_size__UP4G,t__YP4G;
-  __UINTEGER_32 a__XP4G,new_size__JHBH,lab_type__IHBH,sz__M0JD,a__KA4G;
-  __UINTEGER_32 new_size__LA4G,t__PA4G,a__OA4G,new_size__THBH;
-  __UINTEGER_32 lab_type__SHBH,sz__BOJD,a__1P4G,new_size__2P4G,t__AQ4G;
-  __UINTEGER_32 a__5P4G,new_size__3HBH,lab_type__2HBH,sz__BIBH,a__CIBH;
-  __UINTEGER_32 new_size__DIBH,t__EIBH,a__FIBH,new_size__SIBH;
-  __UINTEGER_32 lab_type__RIBH,sz__KSP,a__LQ4G,new_size__MQ4G,t__QQ4G;
-  __UINTEGER_32 a__PQ4G,new_size__2IBH,lab_type__1IBH,sz__AJBH,a__BJBH;
-  __UINTEGER_32 new_size__CJBH,t__DJBH,a__EJBH,new_size__PJBH;
-  __UINTEGER_32 lab_type__OJBH,sz__0JBH,a__1JBH,new_size__2JBH,t__3JBH;
-  __UINTEGER_32 a__4JBH,new_size__JKBH,lab_type__IKBH,sz__4WO,a__BR4G;
-  __UINTEGER_32 new_size__CR4G,t__GR4G,a__FR4G,new_size__TKBH;
-  __UINTEGER_32 lab_type__SKBH,sz__RYO,a__KC4G,new_size__LC4G,t__PC4G;
-  __UINTEGER_32 a__OC4G,new_size__3KBH,lab_type__2KBH;
-  __ITM_WRITE_VALUE *result__HFBH,*result__LMJD;
-  __ITM_WRITE_CAST *result__0FBH,*result__4NJD;
-  __ITM_READ *result__NGBH;
-  __ITM_WRITE_CODE *result__J0JD;
-  void *itm_op__ZEL,*__tmp__3HL,*__tmp__EJL,*__tmp__KKL;
-  __ITM_OPERATOR *result__4HBH,*Self__GIBH,*result__HSP,*Self__LNV;
-  __ITM_READ_ARG1 *result__3IBH,*result__XJBH;
-  __ITM_READ_ARG2 *result__1WO;
-  __ITM_EXPRESSION *result__OYO;
-  __CHARACTER affect__X4I,result__VEBH,result__YEBH,result__1EBH;
-  __BOOLEAN again__Y4I,result__UEBH,result__XEBH,result__0EBH;
-  __BOOLEAN __tmp__CCJ,__tmp__EEJ,__tmp__2JL;
-  void *l_assignment__24I,*result__Y4K,*result__EERC;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__SV5,*Self__IW5;
-  void *result__P3H,*l_expr__XEL;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__PN4,*Self__FO4;
-  __FAST_ARRAYoITM_CODEo *Self__QJBH,*Self__1D1C;
-  void **__tmp__RJBH,**Self__TJBH,**__tmp__EE1C,**Self__GHCD;
-  result__V4I=NULL;
-  value__W4I=NULL;
-  affect__X4I='\0';
-  again__Y4I=FALSE__;
-  l_assignment__24I=NULL;
-  p__34I= 0;
-  name__44I=NULL;
-  old_position__XQI=position__GBC;
-  old_pos_cur__ZQI=pos_cur__JBC;
-  old_pos_line__1QI=pos_line__KBC;
-  old_pos_col__3QI=pos_col__LBC;
-  old_short_derive__5QI=short_derive__VBC;
-  result__UEBH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__UEBH=FALSE__;
+  void *result__B5I,*value__C5I,*result__BFL,*expr__CFL,*__tmp__IIL;
+  void *__tmp__PJL,*__tmp__VKL;
+  __INTEGER p__J5I,typ_id__040C,typ_id__3RHH,typ_id__QSHH,typ_id__DTHH;
+  __INTEGER typ_id__3MJD,typ_id__10JD,typ_id__QOJD,last_msg__GFL;
+  __INTEGER first_msg__HFL,typ_id__UUHH,typ_id__ZSP,typ_id__TVHH;
+  __INTEGER index__IWHH,__tmp__GWHH,i__JWHH,typ_id__NWHH,__tmp__RE1C;
+  __INTEGER i__DICD,typ_id__NXO,typ_id__AZO;
+  void *name__K5I,*n__2UHH,*n__QHP;
+  __POSITION p__WERC,pos__WKWG,p__DSHH,pos__YKWG,pos__0KWG,__tmp__EEJ;
+  __POSITION p__JTHH,pos__4KWG,__tmp__FHJ,__tmp__PHJ,__tmp__YHJ,p__1UHH;
+  __POSITION pos__JLWG,p__PHP,__tmp__MIL,__tmp__SJL,__tmp__ZKL;
+  __ITM_LIST_IDF *result__U40C;
+  __POINTER ptr__V40C,ptr_table__SRHH,next__RRHH,result__TRHH;
+  __POINTER ptr_table__XRHH,next__WRHH,result__YRHH,ptr__2RHH;
+  __POINTER ptr_table__FSHH,next__ESHH,result__GSHH,ptr_table__KSHH;
+  __POINTER next__JSHH,result__LSHH,ptr__PSHH,ptr_table__YSHH;
+  __POINTER next__XSHH,result__ZSHH,ptr_table__3SHH,next__2SHH;
+  __POINTER result__4SHH,ptr__CTHH,ptr_table__LTHH,next__KTHH;
+  __POINTER result__MTHH,ptr_table__QTHH,next__PTHH,result__RTHH;
+  __POINTER ptr__YMJD,ptr_table__VTHH,next__UTHH,result__WTHH;
+  __POINTER ptr_table__0THH,next__ZTHH,result__1THH,ptr__W0JD;
+  __POINTER ptr_table__5THH,next__4THH,result__AUHH,ptr_table__EUHH;
+  __POINTER next__DUHH,result__FUHH,ptr__LOJD,ptr_table__JUHH;
+  __POINTER next__IUHH,result__KUHH,ptr_table__OUHH,next__NUHH;
+  __POINTER result__PUHH,ptr__TUHH,ptr_table__4UHH,next__3UHH;
+  __POINTER result__5UHH,ptr_table__DVHH,next__CVHH,result__EVHH;
+  __POINTER ptr__USP,ptr_table__IVHH,next__HVHH,result__JVHH;
+  __POINTER ptr_table__NVHH,next__MVHH,result__OVHH,ptr__SVHH;
+  __POINTER ptr_table__1VHH,next__0VHH,result__2VHH,ptr_table__AWHH;
+  __POINTER next__5VHH,result__BWHH,ptr__MWHH,ptr_table__VWHH;
+  __POINTER next__UWHH,result__WWHH,ptr_table__0WHH,next__ZWHH;
+  __POINTER result__1WHH,ptr__IXO,ptr_table__5WHH,next__4WHH;
+  __POINTER result__AXHH,ptr_table__EXHH,next__DXHH,result__FXHH;
+  __POINTER ptr__1YO,ptr_table__JXHH,next__IXHH,result__KXHH;
+  __POINTER ptr_table__OXHH,next__NXHH,result__PXHH;
+  __UINTEGER_32 sz__X40C,a__RLEH,new_size__SLEH,t__WLEH,a__VLEH;
+  __UINTEGER_32 new_size__0RHH,lab_type__ZRHH,sz__4RHH,a__5RHH;
+  __UINTEGER_32 new_size__ASHH,t__BSHH,a__CSHH,new_size__NSHH;
+  __UINTEGER_32 lab_type__MSHH,sz__RSHH,a__SSHH,new_size__TSHH,t__USHH;
+  __UINTEGER_32 a__VSHH,new_size__ATHH,lab_type__5SHH,sz__ETHH,a__FTHH;
+  __UINTEGER_32 new_size__GTHH,t__HTHH,a__ITHH,new_size__TTHH;
+  __UINTEGER_32 lab_type__STHH,sz__0MJD,a__I1EH,new_size__J1EH,t__N1EH;
+  __UINTEGER_32 a__M1EH,new_size__3THH,lab_type__2THH,sz__Y0JD,a__ZLEH;
+  __UINTEGER_32 new_size__0LEH,t__4LEH,a__3LEH,new_size__HUHH;
+  __UINTEGER_32 lab_type__GUHH,sz__NOJD,a__Q1EH,new_size__R1EH,t__V1EH;
+  __UINTEGER_32 a__U1EH,new_size__RUHH,lab_type__QUHH,sz__VUHH,a__WUHH;
+  __UINTEGER_32 new_size__XUHH,t__YUHH,a__ZUHH,new_size__GVHH;
+  __UINTEGER_32 lab_type__FVHH,sz__WSP,a__A2EH,new_size__B2EH,t__F2EH;
+  __UINTEGER_32 a__E2EH,new_size__QVHH,lab_type__PVHH,sz__UVHH,a__VVHH;
+  __UINTEGER_32 new_size__WVHH,t__XVHH,a__YVHH,new_size__DWHH;
+  __UINTEGER_32 lab_type__CWHH,sz__OWHH,a__PWHH,new_size__QWHH,t__RWHH;
+  __UINTEGER_32 a__SWHH,new_size__3WHH,lab_type__2WHH,sz__KXO,a__W2EH;
+  __UINTEGER_32 new_size__X2EH,t__12EH,a__02EH,new_size__HXHH;
+  __UINTEGER_32 lab_type__GXHH,sz__3YO,a__ZNEH,new_size__0NEH,t__4NEH;
+  __UINTEGER_32 a__3NEH,new_size__RXHH,lab_type__QXHH;
+  __ITM_WRITE_VALUE *result__1RHH,*result__XMJD;
+  __ITM_WRITE_CAST *result__OSHH,*result__KOJD;
+  __ITM_READ *result__BTHH;
+  __ITM_WRITE_CODE *result__V0JD;
+  void *itm_op__FFL,*__tmp__JIL,*__tmp__QJL,*__tmp__WKL;
+  __ITM_OPERATOR *result__SUHH,*Self__0UHH,*result__TSP,*Self__XNV;
+  __ITM_READ_ARG1 *result__RVHH,*result__LWHH;
+  __ITM_READ_ARG2 *result__HXO;
+  __ITM_EXPRESSION *result__0YO;
+  __CHARACTER affect__D5I,result__JRHH,result__MRHH,result__PRHH;
+  __BOOLEAN again__E5I,result__IRHH,result__LRHH,result__ORHH;
+  __BOOLEAN __tmp__OCJ,__tmp__QEJ,__tmp__IKL;
+  void *l_assignment__I5I,*result__E5K,*result__QERC;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__4V5,*Self__UW5;
+  void *result__13H,*l_expr__DFL;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__1N4,*Self__RO4;
+  __FAST_ARRAYoITM_CODEo *Self__EWHH,*Self__HE1C;
+  void **__tmp__FWHH,**Self__HWHH,**__tmp__QE1C,**Self__SHCD;
+  result__B5I=NULL;
+  value__C5I=NULL;
+  affect__D5I='\0';
+  again__E5I=FALSE__;
+  l_assignment__I5I=NULL;
+  p__J5I= 0;
+  name__K5I=NULL;
+  old_position__DRI=position__SBC;
+  old_pos_cur__FRI=pos_cur__VBC;
+  old_pos_line__HRI=pos_line__WBC;
+  old_pos_col__JRI=pos_col__XBC;
+  old_short_derive__LRI=short_derive__BCC;
+  result__IRHH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__IRHH=FALSE__;
   } else {
-    result__VEBH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__VEBH=((__CHARACTER )(( 0)));
+    result__JRHH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__JRHH=((__CHARACTER )(( 0)));
     } else {
-      result__VEBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__JRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__VEBH == '(')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__UEBH=TRUE__;
+    if ((result__JRHH == '(')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__IRHH=TRUE__;
     };
   };
-  if (result__UEBH) {
-    result__Y4K=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K)->parent_arrayed_collection__34K.upper__OSU <  0)) {
-      result__Y4K=create_with_capacity__VGRC( 16);
+  if (result__IRHH) {
+    result__E5K=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K)->parent_arrayed_collection__J5K.upper__0SU <  0)) {
+      result__E5K=create_with_capacity__BHRC( 16);
     } else {
-      Self__SV5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K);
-      result__Y4K=((void **)Self__SV5->parent_arrayed_collection__34K.storage__4UU)[Self__SV5->parent_arrayed_collection__34K.upper__OSU];
-      Self__IW5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K);
-      Self__IW5->parent_arrayed_collection__34K.upper__OSU=(__INTEGER)(Self__IW5->parent_arrayed_collection__34K.upper__OSU -  1);
+      Self__4V5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
+      result__E5K=((void **)Self__4V5->parent_arrayed_collection__J5K.storage__KVU)[Self__4V5->parent_arrayed_collection__J5K.upper__0SU];
+      Self__UW5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
+      Self__UW5->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__UW5->parent_arrayed_collection__J5K.upper__0SU -  1);
     };
-    l_assignment__24I=result__Y4K;
+    l_assignment__I5I=result__E5K;
     do {
-      again__Y4I=FALSE__;
-      if (read_identifier__55K()) {
-        p__34I=(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD);
-        copy__NCS(string_tmp2__V5I,last_string__2ZC);
-        while (read_identifier__55K()) {
-          append__VNS(string_tmp2__V5I,(&__string_112));
-          append__VNS(string_tmp2__V5I,last_string__2ZC);
-        };
-        name__44I=get__2VB(string_tmp2__V5I);
-        add_last__FBPD(l_assignment__24I,name__44I);
-        if (is_shorter__WY) {
-          if ((! fast_has__RDV(short_local__3BC,name__44I))) {
-            short__token__to__5AD((&__string_131),p__34I,position__GBC);
-          };
-        };
-        result__XEBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__XEBH=FALSE__;
-        } else {
-          result__YEBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__YEBH=((__CHARACTER )(( 0)));
-          } else {
-            result__YEBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-          };
-          if ((result__YEBH == ',')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__XEBH=TRUE__;
-          };
-        };
-        if (result__XEBH) {
-          again__Y4I=TRUE__;
-        };
-      };
-    } while (again__Y4I);
-    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__Y4K)->parent_arrayed_collection__14I.upper__P5OD <  0))) {
-      result__0EBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__0EBH=FALSE__;
-      } else {
-        result__1EBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__1EBH=((__CHARACTER )(( 0)));
-        } else {
-          result__1EBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-        };
-        if ((result__1EBH == ')')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__0EBH=TRUE__;
-        };
-      };
-      __tmp__CCJ=result__0EBH;
-    } else {
-      __tmp__CCJ=FALSE__;
-    };
-    if ((__tmp__CCJ && ((read_symbol__XWJ((&__string_12)) || read_symbol__XWJ((&__string_13))) || read_symbol__XWJ((&__string_14))))) {
-      result__EERC=create_with_capacity__VGRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__Y4K)->parent_arrayed_collection__14I.upper__P5OD +  1));
-      copy__Q2RD(result__EERC,result__Y4K);
-      free__OS5(result__Y4K);
-      l_assignment__24I=result__EERC;
-      p__KERC=current_position__3WF();
-      result__I40C=NULL;
-      ptr__J40C=((__POINTER )(NULL));
-      typ_id__O40C= 0;
-      sz__L40C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
-      if ((sz__L40C ==  0)) {
-        result__I40C=ITM_LIST_IDF__;
-      } else {
-        typ_id__O40C=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__L40C);
-        if ((typ_id__O40C == (__INTEGER)(-  1))) {
-          a__CA4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__DA4G=(__UINTEGER_32)((__UINTEGER_32)(sz__L40C + a__CA4G) & (__UINTEGER_32)(~ a__CA4G));
-          ptr_table__4EBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DA4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__3EBH=((__POINTER )(NULL));
-          result__5EBH=((__POINTER *)ptr_table__4EBH)[ 0];
-          if ((result__5EBH == (void *)NULL)) {
-            result__5EBH=new_lab__ARJ(new_size__DA4G);
-            next__3EBH=(void *)((unsigned long)result__5EBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DA4G)));
-            ((__POINTER *)next__3EBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4EBH)[ 0]=next__3EBH;
-          } else {
-            next__3EBH=((__POINTER *)result__5EBH)[ 0];
-            if ((next__3EBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5EBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DA4G <<  1)) <=  4096)) {
-                next__3EBH=(void *)((unsigned long)result__5EBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DA4G)));
+      again__E5I=FALSE__;
+      if (read_identifier__LAL()) {
+        p__J5I=(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD);
+        copy__ZCS(string_tmp2__BAJ,last_string__I0C);
+        while (read_identifier__LAL()) {
+          append__BOS(string_tmp2__BAJ,(&__string_112));
+          append__BOS(string_tmp2__BAJ,last_string__I0C);
+        };
+        name__K5I=get__IWB(string_tmp2__BAJ);
+        add_last__RBPD(l_assignment__I5I,name__K5I);
+        if (is_shorter__5Y) {
+          if ((! fast_has__3DV(short_local__JCC,name__K5I))) {
+            short__token__to__LBD((&__string_131),p__J5I,position__SBC);
+          };
+        };
+        result__LRHH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__LRHH=FALSE__;
+        } else {
+          result__MRHH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__MRHH=((__CHARACTER )(( 0)));
+          } else {
+            result__MRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          };
+          if ((result__MRHH == ',')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__LRHH=TRUE__;
+          };
+        };
+        if (result__LRHH) {
+          again__E5I=TRUE__;
+        };
+      };
+    } while (again__E5I);
+    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__E5K)->parent_arrayed_collection__H5I.upper__15OD <  0))) {
+      result__ORHH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__ORHH=FALSE__;
+      } else {
+        result__PRHH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__PRHH=((__CHARACTER )(( 0)));
+        } else {
+          result__PRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        };
+        if ((result__PRHH == ')')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__ORHH=TRUE__;
+        };
+      };
+      __tmp__OCJ=result__ORHH;
+    } else {
+      __tmp__OCJ=FALSE__;
+    };
+    if ((__tmp__OCJ && ((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14))))) {
+      result__QERC=create_with_capacity__BHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__E5K)->parent_arrayed_collection__H5I.upper__15OD +  1));
+      copy__22RD(result__QERC,result__E5K);
+      free__0S5(result__E5K);
+      l_assignment__I5I=result__QERC;
+      p__WERC=current_position__JXF();
+      result__U40C=NULL;
+      ptr__V40C=((__POINTER )(NULL));
+      typ_id__040C= 0;
+      sz__X40C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
+      if ((sz__X40C ==  0)) {
+        result__U40C=ITM_LIST_IDF__;
+      } else {
+        typ_id__040C=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__X40C);
+        if ((typ_id__040C == (__INTEGER)(-  1))) {
+          a__RLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__SLEH=(__UINTEGER_32)((__UINTEGER_32)(sz__X40C + a__RLEH) & (__UINTEGER_32)(~ a__RLEH));
+          ptr_table__SRHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SLEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__RRHH=((__POINTER )(NULL));
+          result__TRHH=((__POINTER *)ptr_table__SRHH)[ 0];
+          if ((result__TRHH == (void *)NULL)) {
+            result__TRHH=new_lab__MRJ(new_size__SLEH);
+            next__RRHH=(void *)((unsigned long)result__TRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLEH)));
+            ((__POINTER *)next__RRHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SRHH)[ 0]=next__RRHH;
+          } else {
+            next__RRHH=((__POINTER *)result__TRHH)[ 0];
+            if ((next__RRHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TRHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SLEH <<  1)) <=  4096)) {
+                next__RRHH=(void *)((unsigned long)result__TRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLEH)));
               } else {
-                next__3EBH=new_lab__ARJ(new_size__DA4G);
+                next__RRHH=new_lab__MRJ(new_size__SLEH);
               };
-              ((__POINTER *)next__3EBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4EBH)[ 0]=next__3EBH;
+              ((__POINTER *)next__RRHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SRHH)[ 0]=next__RRHH;
             } else {
-              ((__POINTER *)result__5EBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3EBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5EBH=next__3EBH;
-            };
-          };
-          ptr__J40C=result__5EBH;
-        } else {
-          t__HA4G=((__UINTEGER_32 )typ_id__O40C);
-          a__GA4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__GFBH=(__UINTEGER_32)((__UINTEGER_32)(sz__L40C + a__GA4G) & (__UINTEGER_32)(~ a__GA4G));
-          ptr_table__DFBH=((__POINTER )(&(table_type[(t__HA4G)])));
-          lab_type__FFBH=(__UINTEGER_32)(t__HA4G |  1);
-          next__CFBH=((__POINTER )(NULL));
-          result__EFBH=((__POINTER *)ptr_table__DFBH)[ 0];
-          if ((result__EFBH == (void *)NULL)) {
-            result__EFBH=new_lab__ARJ(lab_type__FFBH);
-            next__CFBH=(void *)((unsigned long)result__EFBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFBH)));
-            ((__POINTER *)next__CFBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DFBH)[ 0]=next__CFBH;
-          } else {
-            next__CFBH=((__POINTER *)result__EFBH)[ 0];
-            if ((next__CFBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EFBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__GFBH <<  1)) <=  4096)) {
-                next__CFBH=(void *)((unsigned long)result__EFBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFBH)));
+              ((__POINTER *)result__TRHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RRHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TRHH=next__RRHH;
+            };
+          };
+          ptr__V40C=result__TRHH;
+        } else {
+          t__WLEH=((__UINTEGER_32 )typ_id__040C);
+          a__VLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0RHH=(__UINTEGER_32)((__UINTEGER_32)(sz__X40C + a__VLEH) & (__UINTEGER_32)(~ a__VLEH));
+          ptr_table__XRHH=((__POINTER )(&(table_type[(t__WLEH)])));
+          lab_type__ZRHH=(__UINTEGER_32)(t__WLEH |  1);
+          next__WRHH=((__POINTER )(NULL));
+          result__YRHH=((__POINTER *)ptr_table__XRHH)[ 0];
+          if ((result__YRHH == (void *)NULL)) {
+            result__YRHH=new_lab__MRJ(lab_type__ZRHH);
+            next__WRHH=(void *)((unsigned long)result__YRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RHH)));
+            ((__POINTER *)next__WRHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XRHH)[ 0]=next__WRHH;
+          } else {
+            next__WRHH=((__POINTER *)result__YRHH)[ 0];
+            if ((next__WRHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YRHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0RHH <<  1)) <=  4096)) {
+                next__WRHH=(void *)((unsigned long)result__YRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RHH)));
               } else {
-                next__CFBH=new_lab__ARJ(lab_type__FFBH);
+                next__WRHH=new_lab__MRJ(lab_type__ZRHH);
               };
-              ((__POINTER *)next__CFBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DFBH)[ 0]=next__CFBH;
+              ((__POINTER *)next__WRHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XRHH)[ 0]=next__WRHH;
             } else {
-              ((__POINTER *)result__EFBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__EFBH=next__CFBH;
+              ((__POINTER *)result__YRHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WRHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YRHH=next__WRHH;
             };
           };
-          ptr__J40C=result__EFBH;
+          ptr__V40C=result__YRHH;
         };
-        result__I40C=((__ITM_LIST_IDF *)ptr__J40C);
-        *(result__I40C) = *(ITM_LIST_IDF__);
+        result__U40C=((__ITM_LIST_IDF *)ptr__V40C);
+        *(result__U40C) = *(ITM_LIST_IDF__);
       };
-      ((__ITM_LIST_IDF *)result__I40C)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ=p__KERC;
-      result__V4I=result__I40C;
-      affect__X4I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[ 0];
-      value__W4I=read_expr__S4I(Self__T4I);
-      if (((void *)value__W4I == (void *)NULL)) {
-        pos__GYQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_227));
-        put_position__IOG(pos__GYQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      ((__ITM_LIST_IDF *)result__U40C)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ=p__WERC;
+      result__B5I=result__U40C;
+      affect__D5I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
+      value__C5I=read_expr__44I(Self__54I);
+      if (((void *)value__C5I == (void *)NULL)) {
+        pos__WKWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_237));
+        put_position__UOG(pos__WKWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      if ((affect__X4I == ':')) {
-        p__PFBH=result__I40C->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
-        result__HFBH=NULL;
-        ptr__IFBH=((__POINTER )(NULL));
-        typ_id__JFBH= 0;
-        sz__KFBH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
-        if ((sz__KFBH ==  0)) {
-          result__HFBH=ITM_WRITE_VALUE__;
-        } else {
-          typ_id__JFBH=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__KFBH);
-          if ((typ_id__JFBH == (__INTEGER)(-  1))) {
-            a__LFBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__MFBH=(__UINTEGER_32)((__UINTEGER_32)(sz__KFBH + a__LFBH) & (__UINTEGER_32)(~ a__LFBH));
-            ptr_table__RFBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MFBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__QFBH=((__POINTER )(NULL));
-            result__SFBH=((__POINTER *)ptr_table__RFBH)[ 0];
-            if ((result__SFBH == (void *)NULL)) {
-              result__SFBH=new_lab__ARJ(new_size__MFBH);
-              next__QFBH=(void *)((unsigned long)result__SFBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MFBH)));
-              ((__POINTER *)next__QFBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RFBH)[ 0]=next__QFBH;
+      if ((affect__D5I == ':')) {
+        p__DSHH=result__U40C->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+        result__1RHH=NULL;
+        ptr__2RHH=((__POINTER )(NULL));
+        typ_id__3RHH= 0;
+        sz__4RHH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+        if ((sz__4RHH ==  0)) {
+          result__1RHH=ITM_WRITE_VALUE__;
+        } else {
+          typ_id__3RHH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4RHH);
+          if ((typ_id__3RHH == (__INTEGER)(-  1))) {
+            a__5RHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ASHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RHH + a__5RHH) & (__UINTEGER_32)(~ a__5RHH));
+            ptr_table__FSHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ASHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ESHH=((__POINTER )(NULL));
+            result__GSHH=((__POINTER *)ptr_table__FSHH)[ 0];
+            if ((result__GSHH == (void *)NULL)) {
+              result__GSHH=new_lab__MRJ(new_size__ASHH);
+              next__ESHH=(void *)((unsigned long)result__GSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASHH)));
+              ((__POINTER *)next__ESHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FSHH)[ 0]=next__ESHH;
             } else {
-              next__QFBH=((__POINTER *)result__SFBH)[ 0];
-              if ((next__QFBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SFBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MFBH <<  1)) <=  4096)) {
-                  next__QFBH=(void *)((unsigned long)result__SFBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MFBH)));
+              next__ESHH=((__POINTER *)result__GSHH)[ 0];
+              if ((next__ESHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GSHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ASHH <<  1)) <=  4096)) {
+                  next__ESHH=(void *)((unsigned long)result__GSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASHH)));
                 } else {
-                  next__QFBH=new_lab__ARJ(new_size__MFBH);
+                  next__ESHH=new_lab__MRJ(new_size__ASHH);
                 };
-                ((__POINTER *)next__QFBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RFBH)[ 0]=next__QFBH;
+                ((__POINTER *)next__ESHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FSHH)[ 0]=next__ESHH;
               } else {
-                ((__POINTER *)result__SFBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QFBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__SFBH=next__QFBH;
+                ((__POINTER *)result__GSHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ESHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GSHH=next__ESHH;
               };
             };
-            ptr__IFBH=result__SFBH;
-          } else {
-            t__NFBH=((__UINTEGER_32 )typ_id__JFBH);
-            a__OFBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__ZFBH=(__UINTEGER_32)((__UINTEGER_32)(sz__KFBH + a__OFBH) & (__UINTEGER_32)(~ a__OFBH));
-            ptr_table__WFBH=((__POINTER )(&(table_type[(t__NFBH)])));
-            lab_type__YFBH=(__UINTEGER_32)(t__NFBH |  1);
-            next__VFBH=((__POINTER )(NULL));
-            result__XFBH=((__POINTER *)ptr_table__WFBH)[ 0];
-            if ((result__XFBH == (void *)NULL)) {
-              result__XFBH=new_lab__ARJ(lab_type__YFBH);
-              next__VFBH=(void *)((unsigned long)result__XFBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFBH)));
-              ((__POINTER *)next__VFBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WFBH)[ 0]=next__VFBH;
+            ptr__2RHH=result__GSHH;
+          } else {
+            t__BSHH=((__UINTEGER_32 )typ_id__3RHH);
+            a__CSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NSHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RHH + a__CSHH) & (__UINTEGER_32)(~ a__CSHH));
+            ptr_table__KSHH=((__POINTER )(&(table_type[(t__BSHH)])));
+            lab_type__MSHH=(__UINTEGER_32)(t__BSHH |  1);
+            next__JSHH=((__POINTER )(NULL));
+            result__LSHH=((__POINTER *)ptr_table__KSHH)[ 0];
+            if ((result__LSHH == (void *)NULL)) {
+              result__LSHH=new_lab__MRJ(lab_type__MSHH);
+              next__JSHH=(void *)((unsigned long)result__LSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NSHH)));
+              ((__POINTER *)next__JSHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KSHH)[ 0]=next__JSHH;
             } else {
-              next__VFBH=((__POINTER *)result__XFBH)[ 0];
-              if ((next__VFBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XFBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZFBH <<  1)) <=  4096)) {
-                  next__VFBH=(void *)((unsigned long)result__XFBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFBH)));
+              next__JSHH=((__POINTER *)result__LSHH)[ 0];
+              if ((next__JSHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LSHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NSHH <<  1)) <=  4096)) {
+                  next__JSHH=(void *)((unsigned long)result__LSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NSHH)));
                 } else {
-                  next__VFBH=new_lab__ARJ(lab_type__YFBH);
+                  next__JSHH=new_lab__MRJ(lab_type__MSHH);
                 };
-                ((__POINTER *)next__VFBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WFBH)[ 0]=next__VFBH;
+                ((__POINTER *)next__JSHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KSHH)[ 0]=next__JSHH;
               } else {
-                ((__POINTER *)result__XFBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VFBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__XFBH=next__VFBH;
+                ((__POINTER *)result__LSHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JSHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LSHH=next__JSHH;
               };
             };
-            ptr__IFBH=result__XFBH;
+            ptr__2RHH=result__LSHH;
           };
-          result__HFBH=((__ITM_WRITE_VALUE *)ptr__IFBH);
-          *(result__HFBH) = *(ITM_WRITE_VALUE__);
+          result__1RHH=((__ITM_WRITE_VALUE *)ptr__2RHH);
+          *(result__1RHH) = *(ITM_WRITE_VALUE__);
         };
-        ((__ITM_WRITE_VALUE *)result__HFBH)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ=p__PFBH;
-        result__V4I=result__HFBH;
+        ((__ITM_WRITE_VALUE *)result__1RHH)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=p__DSHH;
+        result__B5I=result__1RHH;
       };
-      if ((affect__X4I == '<')) {
-        pos__IYQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_283));
-        put_position__IOG(pos__IYQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((affect__D5I == '<')) {
+        pos__YKWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_293));
+        put_position__UOG(pos__YKWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      if ((affect__X4I == '?')) {
-        pos__KYQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_284));
-        put_position__IOG(pos__KYQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((affect__D5I == '?')) {
+        pos__0KWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_294));
+        put_position__UOG(pos__0KWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__V4I)->__id) {
+        switch (((struct ___OBJ *)result__B5I)->__id) {
         case __ITM_LIST__: {
-          __tmp__YDJ=((__ITM_LIST *)result__V4I)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_LIST *)result__B5I)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__YDJ=((__ITM_LDOTS *)result__V4I)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_LDOTS *)result__B5I)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__YDJ=((__ITM_PROTOTYPE *)result__V4I)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_PROTOTYPE *)result__B5I)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__YDJ=((__ITM_LIST_IDF *)result__V4I)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_LIST_IDF *)result__B5I)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__YDJ=((__ITM_WRITE_VALUE *)result__V4I)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_WRITE_VALUE *)result__B5I)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__YDJ=((__ITM_WRITE_CAST *)result__V4I)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_WRITE_CAST *)result__B5I)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_READ__: {
-          __tmp__YDJ=((__ITM_READ *)result__V4I)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_READ *)result__B5I)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__YDJ=((__ITM_WRITE_CODE *)result__V4I)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_WRITE_CODE *)result__B5I)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__YDJ=((__ITM_OPERATOR *)result__V4I)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_OPERATOR *)result__B5I)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__YDJ=((__ITM_READ_ARG1 *)result__V4I)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_READ_ARG1 *)result__B5I)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__YDJ=((__ITM_READ_ARG2 *)result__V4I)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_READ_ARG2 *)result__B5I)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__YDJ=position__ZC5B(result__V4I);
+          __tmp__EEJ=position__FD5B(result__B5I);
         } break;
         case __ITM_OLD__: {
-          __tmp__YDJ=((__ITM_OLD *)result__V4I)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_OLD *)result__B5I)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__YDJ=((__ITM_EXTERNAL_TYPE *)result__V4I)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_EXTERNAL_TYPE *)result__B5I)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__YDJ=((__ITM_LIST *)((__ITM_BLOCK *)result__V4I)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_LIST *)((__ITM_BLOCK *)result__B5I)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__YDJ=((__ITM_EXTERNAL *)result__V4I)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_EXTERNAL *)result__B5I)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__YDJ=((__ITM_READ_ARGS *)result__V4I)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_READ_ARGS *)result__B5I)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__YDJ=((__ITM_REAL *)result__V4I)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_REAL *)result__B5I)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__YDJ=((__ITM_NUMBER *)result__V4I)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_NUMBER *)result__B5I)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__YDJ=((__ITM_CHARACTER *)result__V4I)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_CHARACTER *)result__B5I)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__YDJ=((__ITM_STRING *)result__V4I)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+          __tmp__EEJ=((__ITM_STRING *)result__B5I)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__YDJ=position__ZIHC(result__V4I);
+          __tmp__EEJ=position__FJHC(result__B5I);
         } break;
         };
-        result__0FBH=NULL;
-        ptr__1FBH=((__POINTER )(NULL));
-        typ_id__2FBH= 0;
-        sz__3FBH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
-        if ((sz__3FBH ==  0)) {
-          result__0FBH=ITM_WRITE_CAST__;
-        } else {
-          typ_id__2FBH=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__3FBH);
-          if ((typ_id__2FBH == (__INTEGER)(-  1))) {
-            a__4FBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__5FBH=(__UINTEGER_32)((__UINTEGER_32)(sz__3FBH + a__4FBH) & (__UINTEGER_32)(~ a__4FBH));
-            ptr_table__EGBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5FBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__DGBH=((__POINTER )(NULL));
-            result__FGBH=((__POINTER *)ptr_table__EGBH)[ 0];
-            if ((result__FGBH == (void *)NULL)) {
-              result__FGBH=new_lab__ARJ(new_size__5FBH);
-              next__DGBH=(void *)((unsigned long)result__FGBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FBH)));
-              ((__POINTER *)next__DGBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EGBH)[ 0]=next__DGBH;
+        result__OSHH=NULL;
+        ptr__PSHH=((__POINTER )(NULL));
+        typ_id__QSHH= 0;
+        sz__RSHH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+        if ((sz__RSHH ==  0)) {
+          result__OSHH=ITM_WRITE_CAST__;
+        } else {
+          typ_id__QSHH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__RSHH);
+          if ((typ_id__QSHH == (__INTEGER)(-  1))) {
+            a__SSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TSHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSHH + a__SSHH) & (__UINTEGER_32)(~ a__SSHH));
+            ptr_table__YSHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TSHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__XSHH=((__POINTER )(NULL));
+            result__ZSHH=((__POINTER *)ptr_table__YSHH)[ 0];
+            if ((result__ZSHH == (void *)NULL)) {
+              result__ZSHH=new_lab__MRJ(new_size__TSHH);
+              next__XSHH=(void *)((unsigned long)result__ZSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSHH)));
+              ((__POINTER *)next__XSHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YSHH)[ 0]=next__XSHH;
             } else {
-              next__DGBH=((__POINTER *)result__FGBH)[ 0];
-              if ((next__DGBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FGBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5FBH <<  1)) <=  4096)) {
-                  next__DGBH=(void *)((unsigned long)result__FGBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FBH)));
+              next__XSHH=((__POINTER *)result__ZSHH)[ 0];
+              if ((next__XSHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZSHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TSHH <<  1)) <=  4096)) {
+                  next__XSHH=(void *)((unsigned long)result__ZSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSHH)));
                 } else {
-                  next__DGBH=new_lab__ARJ(new_size__5FBH);
+                  next__XSHH=new_lab__MRJ(new_size__TSHH);
                 };
-                ((__POINTER *)next__DGBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__EGBH)[ 0]=next__DGBH;
+                ((__POINTER *)next__XSHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YSHH)[ 0]=next__XSHH;
               } else {
-                ((__POINTER *)result__FGBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__FGBH=next__DGBH;
+                ((__POINTER *)result__ZSHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XSHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZSHH=next__XSHH;
               };
             };
-            ptr__1FBH=result__FGBH;
-          } else {
-            t__AGBH=((__UINTEGER_32 )typ_id__2FBH);
-            a__BGBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__MGBH=(__UINTEGER_32)((__UINTEGER_32)(sz__3FBH + a__BGBH) & (__UINTEGER_32)(~ a__BGBH));
-            ptr_table__JGBH=((__POINTER )(&(table_type[(t__AGBH)])));
-            lab_type__LGBH=(__UINTEGER_32)(t__AGBH |  1);
-            next__IGBH=((__POINTER )(NULL));
-            result__KGBH=((__POINTER *)ptr_table__JGBH)[ 0];
-            if ((result__KGBH == (void *)NULL)) {
-              result__KGBH=new_lab__ARJ(lab_type__LGBH);
-              next__IGBH=(void *)((unsigned long)result__KGBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGBH)));
-              ((__POINTER *)next__IGBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JGBH)[ 0]=next__IGBH;
+            ptr__PSHH=result__ZSHH;
+          } else {
+            t__USHH=((__UINTEGER_32 )typ_id__QSHH);
+            a__VSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ATHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSHH + a__VSHH) & (__UINTEGER_32)(~ a__VSHH));
+            ptr_table__3SHH=((__POINTER )(&(table_type[(t__USHH)])));
+            lab_type__5SHH=(__UINTEGER_32)(t__USHH |  1);
+            next__2SHH=((__POINTER )(NULL));
+            result__4SHH=((__POINTER *)ptr_table__3SHH)[ 0];
+            if ((result__4SHH == (void *)NULL)) {
+              result__4SHH=new_lab__MRJ(lab_type__5SHH);
+              next__2SHH=(void *)((unsigned long)result__4SHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATHH)));
+              ((__POINTER *)next__2SHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3SHH)[ 0]=next__2SHH;
             } else {
-              next__IGBH=((__POINTER *)result__KGBH)[ 0];
-              if ((next__IGBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KGBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MGBH <<  1)) <=  4096)) {
-                  next__IGBH=(void *)((unsigned long)result__KGBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGBH)));
+              next__2SHH=((__POINTER *)result__4SHH)[ 0];
+              if ((next__2SHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4SHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ATHH <<  1)) <=  4096)) {
+                  next__2SHH=(void *)((unsigned long)result__4SHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATHH)));
                 } else {
-                  next__IGBH=new_lab__ARJ(lab_type__LGBH);
+                  next__2SHH=new_lab__MRJ(lab_type__5SHH);
                 };
-                ((__POINTER *)next__IGBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__JGBH)[ 0]=next__IGBH;
+                ((__POINTER *)next__2SHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3SHH)[ 0]=next__2SHH;
               } else {
-                ((__POINTER *)result__KGBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__KGBH=next__IGBH;
+                ((__POINTER *)result__4SHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2SHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4SHH=next__2SHH;
               };
             };
-            ptr__1FBH=result__KGBH;
+            ptr__PSHH=result__4SHH;
           };
-          result__0FBH=((__ITM_WRITE_CAST *)ptr__1FBH);
-          *(result__0FBH) = *(ITM_WRITE_CAST__);
+          result__OSHH=((__ITM_WRITE_CAST *)ptr__PSHH);
+          *(result__OSHH) = *(ITM_WRITE_CAST__);
         };
-        ((__ITM_WRITE_CAST *)result__0FBH)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ=__tmp__YDJ;
-        result__V4I=result__0FBH;
+        ((__ITM_WRITE_CAST *)result__OSHH)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__EEJ;
+        result__B5I=result__OSHH;
       };
     } else {
-      free__OS5(l_assignment__24I);
+      free__0S5(l_assignment__I5I);
     };
-    __tmp__EEJ=TRUE__;
+    __tmp__QEJ=TRUE__;
   } else {
-    __tmp__EEJ=FALSE__;
-  };
-  if ((! __tmp__EEJ)) {
-    if (read_identifier__55K()) {
-      p__34I=(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD);
-      copy__NCS(string_tmp2__V5I,last_string__2ZC);
-      while (read_identifier__55K()) {
-        append__VNS(string_tmp2__V5I,(&__string_112));
-        append__VNS(string_tmp2__V5I,last_string__2ZC);
-      };
-      name__44I=get__2VB(string_tmp2__V5I);
-      if (is_shorter__WY) {
-        if ((! fast_has__RDV(short_local__3BC,name__44I))) {
-          short__token__to__5AD((&__string_131),p__34I,position__GBC);
-        };
-      };
-      if (((read_symbol__XWJ((&__string_12)) || read_symbol__XWJ((&__string_13))) || read_symbol__XWJ((&__string_14)))) {
-        p__VGBH=current_position__3WF();
-        result__NGBH=NULL;
-        ptr__OGBH=((__POINTER )(NULL));
-        typ_id__PGBH= 0;
-        sz__QGBH=((__UINTEGER_32 )sizeof(__ITM_READ));
-        if ((sz__QGBH ==  0)) {
-          result__NGBH=ITM_READ__;
-        } else {
-          typ_id__PGBH=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__QGBH);
-          if ((typ_id__PGBH == (__INTEGER)(-  1))) {
-            a__RGBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__SGBH=(__UINTEGER_32)((__UINTEGER_32)(sz__QGBH + a__RGBH) & (__UINTEGER_32)(~ a__RGBH));
-            ptr_table__XGBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SGBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__WGBH=((__POINTER )(NULL));
-            result__YGBH=((__POINTER *)ptr_table__XGBH)[ 0];
-            if ((result__YGBH == (void *)NULL)) {
-              result__YGBH=new_lab__ARJ(new_size__SGBH);
-              next__WGBH=(void *)((unsigned long)result__YGBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGBH)));
-              ((__POINTER *)next__WGBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XGBH)[ 0]=next__WGBH;
+    __tmp__QEJ=FALSE__;
+  };
+  if ((! __tmp__QEJ)) {
+    if (read_identifier__LAL()) {
+      p__J5I=(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD);
+      copy__ZCS(string_tmp2__BAJ,last_string__I0C);
+      while (read_identifier__LAL()) {
+        append__BOS(string_tmp2__BAJ,(&__string_112));
+        append__BOS(string_tmp2__BAJ,last_string__I0C);
+      };
+      name__K5I=get__IWB(string_tmp2__BAJ);
+      if (is_shorter__5Y) {
+        if ((! fast_has__3DV(short_local__JCC,name__K5I))) {
+          short__token__to__LBD((&__string_131),p__J5I,position__SBC);
+        };
+      };
+      if (((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14)))) {
+        p__JTHH=current_position__JXF();
+        result__BTHH=NULL;
+        ptr__CTHH=((__POINTER )(NULL));
+        typ_id__DTHH= 0;
+        sz__ETHH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__ETHH ==  0)) {
+          result__BTHH=ITM_READ__;
+        } else {
+          typ_id__DTHH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ETHH);
+          if ((typ_id__DTHH == (__INTEGER)(-  1))) {
+            a__FTHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__GTHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ETHH + a__FTHH) & (__UINTEGER_32)(~ a__FTHH));
+            ptr_table__LTHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GTHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__KTHH=((__POINTER )(NULL));
+            result__MTHH=((__POINTER *)ptr_table__LTHH)[ 0];
+            if ((result__MTHH == (void *)NULL)) {
+              result__MTHH=new_lab__MRJ(new_size__GTHH);
+              next__KTHH=(void *)((unsigned long)result__MTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GTHH)));
+              ((__POINTER *)next__KTHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LTHH)[ 0]=next__KTHH;
             } else {
-              next__WGBH=((__POINTER *)result__YGBH)[ 0];
-              if ((next__WGBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YGBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SGBH <<  1)) <=  4096)) {
-                  next__WGBH=(void *)((unsigned long)result__YGBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGBH)));
+              next__KTHH=((__POINTER *)result__MTHH)[ 0];
+              if ((next__KTHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MTHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GTHH <<  1)) <=  4096)) {
+                  next__KTHH=(void *)((unsigned long)result__MTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GTHH)));
                 } else {
-                  next__WGBH=new_lab__ARJ(new_size__SGBH);
+                  next__KTHH=new_lab__MRJ(new_size__GTHH);
                 };
-                ((__POINTER *)next__WGBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XGBH)[ 0]=next__WGBH;
+                ((__POINTER *)next__KTHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LTHH)[ 0]=next__KTHH;
               } else {
-                ((__POINTER *)result__YGBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WGBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__YGBH=next__WGBH;
+                ((__POINTER *)result__MTHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KTHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__MTHH=next__KTHH;
               };
             };
-            ptr__OGBH=result__YGBH;
-          } else {
-            t__TGBH=((__UINTEGER_32 )typ_id__PGBH);
-            a__UGBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__5GBH=(__UINTEGER_32)((__UINTEGER_32)(sz__QGBH + a__UGBH) & (__UINTEGER_32)(~ a__UGBH));
-            ptr_table__2GBH=((__POINTER )(&(table_type[(t__TGBH)])));
-            lab_type__4GBH=(__UINTEGER_32)(t__TGBH |  1);
-            next__1GBH=((__POINTER )(NULL));
-            result__3GBH=((__POINTER *)ptr_table__2GBH)[ 0];
-            if ((result__3GBH == (void *)NULL)) {
-              result__3GBH=new_lab__ARJ(lab_type__4GBH);
-              next__1GBH=(void *)((unsigned long)result__3GBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5GBH)));
-              ((__POINTER *)next__1GBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2GBH)[ 0]=next__1GBH;
+            ptr__CTHH=result__MTHH;
+          } else {
+            t__HTHH=((__UINTEGER_32 )typ_id__DTHH);
+            a__ITHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TTHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ETHH + a__ITHH) & (__UINTEGER_32)(~ a__ITHH));
+            ptr_table__QTHH=((__POINTER )(&(table_type[(t__HTHH)])));
+            lab_type__STHH=(__UINTEGER_32)(t__HTHH |  1);
+            next__PTHH=((__POINTER )(NULL));
+            result__RTHH=((__POINTER *)ptr_table__QTHH)[ 0];
+            if ((result__RTHH == (void *)NULL)) {
+              result__RTHH=new_lab__MRJ(lab_type__STHH);
+              next__PTHH=(void *)((unsigned long)result__RTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTHH)));
+              ((__POINTER *)next__PTHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QTHH)[ 0]=next__PTHH;
             } else {
-              next__1GBH=((__POINTER *)result__3GBH)[ 0];
-              if ((next__1GBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3GBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5GBH <<  1)) <=  4096)) {
-                  next__1GBH=(void *)((unsigned long)result__3GBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5GBH)));
+              next__PTHH=((__POINTER *)result__RTHH)[ 0];
+              if ((next__PTHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RTHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TTHH <<  1)) <=  4096)) {
+                  next__PTHH=(void *)((unsigned long)result__RTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTHH)));
                 } else {
-                  next__1GBH=new_lab__ARJ(lab_type__4GBH);
+                  next__PTHH=new_lab__MRJ(lab_type__STHH);
                 };
-                ((__POINTER *)next__1GBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__2GBH)[ 0]=next__1GBH;
+                ((__POINTER *)next__PTHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QTHH)[ 0]=next__PTHH;
               } else {
-                ((__POINTER *)result__3GBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1GBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__3GBH=next__1GBH;
+                ((__POINTER *)result__RTHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PTHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RTHH=next__PTHH;
               };
             };
-            ptr__OGBH=result__3GBH;
-          };
-          result__NGBH=((__ITM_READ *)ptr__OGBH);
-          *(result__NGBH) = *(ITM_READ__);
-        };
-        ((__ITM_READ *)result__NGBH)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__VGBH;
-        result__V4I=result__NGBH;
-        affect__X4I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[ 0];
-        value__W4I=read_expr__S4I(Self__T4I);
-        if (((void *)value__W4I == (void *)NULL)) {
-          pos__OYQG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_227));
-          put_position__IOG(pos__OYQG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+            ptr__CTHH=result__RTHH;
+          };
+          result__BTHH=((__ITM_READ *)ptr__CTHH);
+          *(result__BTHH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__BTHH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__JTHH;
+        result__B5I=result__BTHH;
+        affect__D5I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
+        value__C5I=read_expr__44I(Self__54I);
+        if (((void *)value__C5I == (void *)NULL)) {
+          pos__4KWG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_237));
+          put_position__UOG(pos__4KWG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if ((affect__X4I == ':')) {
-          __tmp__ZGJ=result__NGBH->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
-          result__LMJD=NULL;
-          ptr__MMJD=((__POINTER )(NULL));
-          typ_id__RMJD= 0;
-          sz__OMJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
-          if ((sz__OMJD ==  0)) {
-            result__LMJD=ITM_WRITE_VALUE__;
-          } else {
-            typ_id__RMJD=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__OMJD);
-            if ((typ_id__RMJD == (__INTEGER)(-  1))) {
-              a__TP4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__UP4G=(__UINTEGER_32)((__UINTEGER_32)(sz__OMJD + a__TP4G) & (__UINTEGER_32)(~ a__TP4G));
-              ptr_table__BHBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UP4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__AHBH=((__POINTER )(NULL));
-              result__CHBH=((__POINTER *)ptr_table__BHBH)[ 0];
-              if ((result__CHBH == (void *)NULL)) {
-                result__CHBH=new_lab__ARJ(new_size__UP4G);
-                next__AHBH=(void *)((unsigned long)result__CHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UP4G)));
-                ((__POINTER *)next__AHBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__BHBH)[ 0]=next__AHBH;
+        if ((affect__D5I == ':')) {
+          __tmp__FHJ=result__BTHH->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+          result__XMJD=NULL;
+          ptr__YMJD=((__POINTER )(NULL));
+          typ_id__3MJD= 0;
+          sz__0MJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+          if ((sz__0MJD ==  0)) {
+            result__XMJD=ITM_WRITE_VALUE__;
+          } else {
+            typ_id__3MJD=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0MJD);
+            if ((typ_id__3MJD == (__INTEGER)(-  1))) {
+              a__I1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__J1EH=(__UINTEGER_32)((__UINTEGER_32)(sz__0MJD + a__I1EH) & (__UINTEGER_32)(~ a__I1EH));
+              ptr_table__VTHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J1EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__UTHH=((__POINTER )(NULL));
+              result__WTHH=((__POINTER *)ptr_table__VTHH)[ 0];
+              if ((result__WTHH == (void *)NULL)) {
+                result__WTHH=new_lab__MRJ(new_size__J1EH);
+                next__UTHH=(void *)((unsigned long)result__WTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1EH)));
+                ((__POINTER *)next__UTHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VTHH)[ 0]=next__UTHH;
               } else {
-                next__AHBH=((__POINTER *)result__CHBH)[ 0];
-                if ((next__AHBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CHBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UP4G <<  1)) <=  4096)) {
-                    next__AHBH=(void *)((unsigned long)result__CHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UP4G)));
+                next__UTHH=((__POINTER *)result__WTHH)[ 0];
+                if ((next__UTHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WTHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J1EH <<  1)) <=  4096)) {
+                    next__UTHH=(void *)((unsigned long)result__WTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1EH)));
                   } else {
-                    next__AHBH=new_lab__ARJ(new_size__UP4G);
+                    next__UTHH=new_lab__MRJ(new_size__J1EH);
                   };
-                  ((__POINTER *)next__AHBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BHBH)[ 0]=next__AHBH;
+                  ((__POINTER *)next__UTHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VTHH)[ 0]=next__UTHH;
                 } else {
-                  ((__POINTER *)result__CHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__CHBH=next__AHBH;
+                  ((__POINTER *)result__WTHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UTHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WTHH=next__UTHH;
                 };
               };
-              ptr__MMJD=result__CHBH;
+              ptr__YMJD=result__WTHH;
             } else {
-              t__YP4G=((__UINTEGER_32 )typ_id__RMJD);
-              a__XP4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__JHBH=(__UINTEGER_32)((__UINTEGER_32)(sz__OMJD + a__XP4G) & (__UINTEGER_32)(~ a__XP4G));
-              ptr_table__GHBH=((__POINTER )(&(table_type[(t__YP4G)])));
-              lab_type__IHBH=(__UINTEGER_32)(t__YP4G |  1);
-              next__FHBH=((__POINTER )(NULL));
-              result__HHBH=((__POINTER *)ptr_table__GHBH)[ 0];
-              if ((result__HHBH == (void *)NULL)) {
-                result__HHBH=new_lab__ARJ(lab_type__IHBH);
-                next__FHBH=(void *)((unsigned long)result__HHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JHBH)));
-                ((__POINTER *)next__FHBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__GHBH)[ 0]=next__FHBH;
+              t__N1EH=((__UINTEGER_32 )typ_id__3MJD);
+              a__M1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3THH=(__UINTEGER_32)((__UINTEGER_32)(sz__0MJD + a__M1EH) & (__UINTEGER_32)(~ a__M1EH));
+              ptr_table__0THH=((__POINTER )(&(table_type[(t__N1EH)])));
+              lab_type__2THH=(__UINTEGER_32)(t__N1EH |  1);
+              next__ZTHH=((__POINTER )(NULL));
+              result__1THH=((__POINTER *)ptr_table__0THH)[ 0];
+              if ((result__1THH == (void *)NULL)) {
+                result__1THH=new_lab__MRJ(lab_type__2THH);
+                next__ZTHH=(void *)((unsigned long)result__1THH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3THH)));
+                ((__POINTER *)next__ZTHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0THH)[ 0]=next__ZTHH;
               } else {
-                next__FHBH=((__POINTER *)result__HHBH)[ 0];
-                if ((next__FHBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HHBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JHBH <<  1)) <=  4096)) {
-                    next__FHBH=(void *)((unsigned long)result__HHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JHBH)));
+                next__ZTHH=((__POINTER *)result__1THH)[ 0];
+                if ((next__ZTHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1THH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3THH <<  1)) <=  4096)) {
+                    next__ZTHH=(void *)((unsigned long)result__1THH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3THH)));
                   } else {
-                    next__FHBH=new_lab__ARJ(lab_type__IHBH);
+                    next__ZTHH=new_lab__MRJ(lab_type__2THH);
                   };
-                  ((__POINTER *)next__FHBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GHBH)[ 0]=next__FHBH;
+                  ((__POINTER *)next__ZTHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0THH)[ 0]=next__ZTHH;
                 } else {
-                  ((__POINTER *)result__HHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HHBH=next__FHBH;
+                  ((__POINTER *)result__1THH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZTHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1THH=next__ZTHH;
                 };
               };
-              ptr__MMJD=result__HHBH;
+              ptr__YMJD=result__1THH;
             };
-            result__LMJD=((__ITM_WRITE_VALUE *)ptr__MMJD);
-            *(result__LMJD) = *(ITM_WRITE_VALUE__);
+            result__XMJD=((__ITM_WRITE_VALUE *)ptr__YMJD);
+            *(result__XMJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__ITM_WRITE_VALUE *)result__LMJD)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ=__tmp__ZGJ;
-          result__V4I=result__LMJD;
+          ((__ITM_WRITE_VALUE *)result__XMJD)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__FHJ;
+          result__B5I=result__XMJD;
         };
-        if ((affect__X4I == '<')) {
-          switch (((struct ___OBJ *)result__V4I)->__id) {
+        if ((affect__D5I == '<')) {
+          switch (((struct ___OBJ *)result__B5I)->__id) {
           case __ITM_LIST__: {
-            __tmp__DHJ=((__ITM_LIST *)result__V4I)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_LIST *)result__B5I)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__DHJ=((__ITM_LDOTS *)result__V4I)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_LDOTS *)result__B5I)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__DHJ=((__ITM_PROTOTYPE *)result__V4I)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_PROTOTYPE *)result__B5I)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__DHJ=((__ITM_LIST_IDF *)result__V4I)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_LIST_IDF *)result__B5I)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__DHJ=((__ITM_WRITE_VALUE *)result__V4I)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_WRITE_VALUE *)result__B5I)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__DHJ=((__ITM_WRITE_CAST *)result__V4I)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_WRITE_CAST *)result__B5I)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ__: {
-            __tmp__DHJ=((__ITM_READ *)result__V4I)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_READ *)result__B5I)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__DHJ=((__ITM_WRITE_CODE *)result__V4I)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_WRITE_CODE *)result__B5I)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__DHJ=((__ITM_OPERATOR *)result__V4I)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_OPERATOR *)result__B5I)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__DHJ=((__ITM_READ_ARG1 *)result__V4I)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_READ_ARG1 *)result__B5I)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__DHJ=((__ITM_READ_ARG2 *)result__V4I)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_READ_ARG2 *)result__B5I)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__DHJ=position__ZC5B(result__V4I);
+            __tmp__PHJ=position__FD5B(result__B5I);
           } break;
           case __ITM_OLD__: {
-            __tmp__DHJ=((__ITM_OLD *)result__V4I)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_OLD *)result__B5I)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__DHJ=((__ITM_EXTERNAL_TYPE *)result__V4I)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_EXTERNAL_TYPE *)result__B5I)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__DHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__V4I)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__B5I)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__DHJ=((__ITM_EXTERNAL *)result__V4I)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_EXTERNAL *)result__B5I)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__DHJ=((__ITM_READ_ARGS *)result__V4I)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_READ_ARGS *)result__B5I)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__DHJ=((__ITM_REAL *)result__V4I)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_REAL *)result__B5I)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__DHJ=((__ITM_NUMBER *)result__V4I)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_NUMBER *)result__B5I)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__DHJ=((__ITM_CHARACTER *)result__V4I)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_CHARACTER *)result__B5I)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__DHJ=((__ITM_STRING *)result__V4I)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__PHJ=((__ITM_STRING *)result__B5I)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__DHJ=position__ZIHC(result__V4I);
+            __tmp__PHJ=position__FJHC(result__B5I);
           } break;
           };
-          result__J0JD=NULL;
-          ptr__K0JD=((__POINTER )(NULL));
-          typ_id__P0JD= 0;
-          sz__M0JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
-          if ((sz__M0JD ==  0)) {
-            result__J0JD=ITM_WRITE_CODE__;
-          } else {
-            typ_id__P0JD=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M0JD);
-            if ((typ_id__P0JD == (__INTEGER)(-  1))) {
-              a__KA4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__LA4G=(__UINTEGER_32)((__UINTEGER_32)(sz__M0JD + a__KA4G) & (__UINTEGER_32)(~ a__KA4G));
-              ptr_table__LHBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LA4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__KHBH=((__POINTER )(NULL));
-              result__MHBH=((__POINTER *)ptr_table__LHBH)[ 0];
-              if ((result__MHBH == (void *)NULL)) {
-                result__MHBH=new_lab__ARJ(new_size__LA4G);
-                next__KHBH=(void *)((unsigned long)result__MHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LA4G)));
-                ((__POINTER *)next__KHBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LHBH)[ 0]=next__KHBH;
+          result__V0JD=NULL;
+          ptr__W0JD=((__POINTER )(NULL));
+          typ_id__10JD= 0;
+          sz__Y0JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
+          if ((sz__Y0JD ==  0)) {
+            result__V0JD=ITM_WRITE_CODE__;
+          } else {
+            typ_id__10JD=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__Y0JD);
+            if ((typ_id__10JD == (__INTEGER)(-  1))) {
+              a__ZLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__0LEH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0JD + a__ZLEH) & (__UINTEGER_32)(~ a__ZLEH));
+              ptr_table__5THH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0LEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__4THH=((__POINTER )(NULL));
+              result__AUHH=((__POINTER *)ptr_table__5THH)[ 0];
+              if ((result__AUHH == (void *)NULL)) {
+                result__AUHH=new_lab__MRJ(new_size__0LEH);
+                next__4THH=(void *)((unsigned long)result__AUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LEH)));
+                ((__POINTER *)next__4THH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5THH)[ 0]=next__4THH;
               } else {
-                next__KHBH=((__POINTER *)result__MHBH)[ 0];
-                if ((next__KHBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MHBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LA4G <<  1)) <=  4096)) {
-                    next__KHBH=(void *)((unsigned long)result__MHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LA4G)));
+                next__4THH=((__POINTER *)result__AUHH)[ 0];
+                if ((next__4THH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0LEH <<  1)) <=  4096)) {
+                    next__4THH=(void *)((unsigned long)result__AUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LEH)));
                   } else {
-                    next__KHBH=new_lab__ARJ(new_size__LA4G);
+                    next__4THH=new_lab__MRJ(new_size__0LEH);
                   };
-                  ((__POINTER *)next__KHBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__LHBH)[ 0]=next__KHBH;
+                  ((__POINTER *)next__4THH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5THH)[ 0]=next__4THH;
                 } else {
-                  ((__POINTER *)result__MHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__MHBH=next__KHBH;
+                  ((__POINTER *)result__AUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4THH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__AUHH=next__4THH;
                 };
               };
-              ptr__K0JD=result__MHBH;
+              ptr__W0JD=result__AUHH;
             } else {
-              t__PA4G=((__UINTEGER_32 )typ_id__P0JD);
-              a__OA4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__THBH=(__UINTEGER_32)((__UINTEGER_32)(sz__M0JD + a__OA4G) & (__UINTEGER_32)(~ a__OA4G));
-              ptr_table__QHBH=((__POINTER )(&(table_type[(t__PA4G)])));
-              lab_type__SHBH=(__UINTEGER_32)(t__PA4G |  1);
-              next__PHBH=((__POINTER )(NULL));
-              result__RHBH=((__POINTER *)ptr_table__QHBH)[ 0];
-              if ((result__RHBH == (void *)NULL)) {
-                result__RHBH=new_lab__ARJ(lab_type__SHBH);
-                next__PHBH=(void *)((unsigned long)result__RHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__THBH)));
-                ((__POINTER *)next__PHBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QHBH)[ 0]=next__PHBH;
+              t__4LEH=((__UINTEGER_32 )typ_id__10JD);
+              a__3LEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__HUHH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0JD + a__3LEH) & (__UINTEGER_32)(~ a__3LEH));
+              ptr_table__EUHH=((__POINTER )(&(table_type[(t__4LEH)])));
+              lab_type__GUHH=(__UINTEGER_32)(t__4LEH |  1);
+              next__DUHH=((__POINTER )(NULL));
+              result__FUHH=((__POINTER *)ptr_table__EUHH)[ 0];
+              if ((result__FUHH == (void *)NULL)) {
+                result__FUHH=new_lab__MRJ(lab_type__GUHH);
+                next__DUHH=(void *)((unsigned long)result__FUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUHH)));
+                ((__POINTER *)next__DUHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EUHH)[ 0]=next__DUHH;
               } else {
-                next__PHBH=((__POINTER *)result__RHBH)[ 0];
-                if ((next__PHBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RHBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__THBH <<  1)) <=  4096)) {
-                    next__PHBH=(void *)((unsigned long)result__RHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__THBH)));
+                next__DUHH=((__POINTER *)result__FUHH)[ 0];
+                if ((next__DUHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HUHH <<  1)) <=  4096)) {
+                    next__DUHH=(void *)((unsigned long)result__FUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HUHH)));
                   } else {
-                    next__PHBH=new_lab__ARJ(lab_type__SHBH);
+                    next__DUHH=new_lab__MRJ(lab_type__GUHH);
                   };
-                  ((__POINTER *)next__PHBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__QHBH)[ 0]=next__PHBH;
+                  ((__POINTER *)next__DUHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__EUHH)[ 0]=next__DUHH;
                 } else {
-                  ((__POINTER *)result__RHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__RHBH=next__PHBH;
+                  ((__POINTER *)result__FUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__FUHH=next__DUHH;
                 };
               };
-              ptr__K0JD=result__RHBH;
+              ptr__W0JD=result__FUHH;
             };
-            result__J0JD=((__ITM_WRITE_CODE *)ptr__K0JD);
-            *(result__J0JD) = *(ITM_WRITE_CODE__);
+            result__V0JD=((__ITM_WRITE_CODE *)ptr__W0JD);
+            *(result__V0JD) = *(ITM_WRITE_CODE__);
           };
-          ((__ITM_WRITE_CODE *)result__J0JD)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ=__tmp__DHJ;
-          result__V4I=result__J0JD;
+          ((__ITM_WRITE_CODE *)result__V0JD)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__PHJ;
+          result__B5I=result__V0JD;
         };
-        if ((affect__X4I == '?')) {
-          switch (((struct ___OBJ *)result__V4I)->__id) {
+        if ((affect__D5I == '?')) {
+          switch (((struct ___OBJ *)result__B5I)->__id) {
           case __ITM_LIST__: {
-            __tmp__MHJ=((__ITM_LIST *)result__V4I)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_LIST *)result__B5I)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__MHJ=((__ITM_LDOTS *)result__V4I)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_LDOTS *)result__B5I)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__MHJ=((__ITM_PROTOTYPE *)result__V4I)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_PROTOTYPE *)result__B5I)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__MHJ=((__ITM_LIST_IDF *)result__V4I)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_LIST_IDF *)result__B5I)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__MHJ=((__ITM_WRITE_VALUE *)result__V4I)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_WRITE_VALUE *)result__B5I)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__MHJ=((__ITM_WRITE_CAST *)result__V4I)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_WRITE_CAST *)result__B5I)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ__: {
-            __tmp__MHJ=((__ITM_READ *)result__V4I)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_READ *)result__B5I)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__MHJ=((__ITM_WRITE_CODE *)result__V4I)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_WRITE_CODE *)result__B5I)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__MHJ=((__ITM_OPERATOR *)result__V4I)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_OPERATOR *)result__B5I)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__MHJ=((__ITM_READ_ARG1 *)result__V4I)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_READ_ARG1 *)result__B5I)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__MHJ=((__ITM_READ_ARG2 *)result__V4I)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_READ_ARG2 *)result__B5I)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__MHJ=position__ZC5B(result__V4I);
+            __tmp__YHJ=position__FD5B(result__B5I);
           } break;
           case __ITM_OLD__: {
-            __tmp__MHJ=((__ITM_OLD *)result__V4I)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_OLD *)result__B5I)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__MHJ=((__ITM_EXTERNAL_TYPE *)result__V4I)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_EXTERNAL_TYPE *)result__B5I)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__MHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__V4I)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__B5I)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__MHJ=((__ITM_EXTERNAL *)result__V4I)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_EXTERNAL *)result__B5I)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__MHJ=((__ITM_READ_ARGS *)result__V4I)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_READ_ARGS *)result__B5I)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__MHJ=((__ITM_REAL *)result__V4I)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_REAL *)result__B5I)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__MHJ=((__ITM_NUMBER *)result__V4I)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_NUMBER *)result__B5I)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__MHJ=((__ITM_CHARACTER *)result__V4I)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_CHARACTER *)result__B5I)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__MHJ=((__ITM_STRING *)result__V4I)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+            __tmp__YHJ=((__ITM_STRING *)result__B5I)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__MHJ=position__ZIHC(result__V4I);
+            __tmp__YHJ=position__FJHC(result__B5I);
           } break;
           };
-          result__4NJD=NULL;
-          ptr__5NJD=((__POINTER )(NULL));
-          typ_id__EOJD= 0;
-          sz__BOJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
-          if ((sz__BOJD ==  0)) {
-            result__4NJD=ITM_WRITE_CAST__;
-          } else {
-            typ_id__EOJD=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BOJD);
-            if ((typ_id__EOJD == (__INTEGER)(-  1))) {
-              a__1P4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__2P4G=(__UINTEGER_32)((__UINTEGER_32)(sz__BOJD + a__1P4G) & (__UINTEGER_32)(~ a__1P4G));
-              ptr_table__VHBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2P4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__UHBH=((__POINTER )(NULL));
-              result__WHBH=((__POINTER *)ptr_table__VHBH)[ 0];
-              if ((result__WHBH == (void *)NULL)) {
-                result__WHBH=new_lab__ARJ(new_size__2P4G);
-                next__UHBH=(void *)((unsigned long)result__WHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2P4G)));
-                ((__POINTER *)next__UHBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VHBH)[ 0]=next__UHBH;
+          result__KOJD=NULL;
+          ptr__LOJD=((__POINTER )(NULL));
+          typ_id__QOJD= 0;
+          sz__NOJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+          if ((sz__NOJD ==  0)) {
+            result__KOJD=ITM_WRITE_CAST__;
+          } else {
+            typ_id__QOJD=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NOJD);
+            if ((typ_id__QOJD == (__INTEGER)(-  1))) {
+              a__Q1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__R1EH=(__UINTEGER_32)((__UINTEGER_32)(sz__NOJD + a__Q1EH) & (__UINTEGER_32)(~ a__Q1EH));
+              ptr_table__JUHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__R1EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__IUHH=((__POINTER )(NULL));
+              result__KUHH=((__POINTER *)ptr_table__JUHH)[ 0];
+              if ((result__KUHH == (void *)NULL)) {
+                result__KUHH=new_lab__MRJ(new_size__R1EH);
+                next__IUHH=(void *)((unsigned long)result__KUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R1EH)));
+                ((__POINTER *)next__IUHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JUHH)[ 0]=next__IUHH;
               } else {
-                next__UHBH=((__POINTER *)result__WHBH)[ 0];
-                if ((next__UHBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WHBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__2P4G <<  1)) <=  4096)) {
-                    next__UHBH=(void *)((unsigned long)result__WHBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2P4G)));
+                next__IUHH=((__POINTER *)result__KUHH)[ 0];
+                if ((next__IUHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__R1EH <<  1)) <=  4096)) {
+                    next__IUHH=(void *)((unsigned long)result__KUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R1EH)));
                   } else {
-                    next__UHBH=new_lab__ARJ(new_size__2P4G);
+                    next__IUHH=new_lab__MRJ(new_size__R1EH);
                   };
-                  ((__POINTER *)next__UHBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__VHBH)[ 0]=next__UHBH;
+                  ((__POINTER *)next__IUHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__JUHH)[ 0]=next__IUHH;
                 } else {
-                  ((__POINTER *)result__WHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__WHBH=next__UHBH;
+                  ((__POINTER *)result__KUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__KUHH=next__IUHH;
                 };
               };
-              ptr__5NJD=result__WHBH;
+              ptr__LOJD=result__KUHH;
             } else {
-              t__AQ4G=((__UINTEGER_32 )typ_id__EOJD);
-              a__5P4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__3HBH=(__UINTEGER_32)((__UINTEGER_32)(sz__BOJD + a__5P4G) & (__UINTEGER_32)(~ a__5P4G));
-              ptr_table__0HBH=((__POINTER )(&(table_type[(t__AQ4G)])));
-              lab_type__2HBH=(__UINTEGER_32)(t__AQ4G |  1);
-              next__ZHBH=((__POINTER )(NULL));
-              result__1HBH=((__POINTER *)ptr_table__0HBH)[ 0];
-              if ((result__1HBH == (void *)NULL)) {
-                result__1HBH=new_lab__ARJ(lab_type__2HBH);
-                next__ZHBH=(void *)((unsigned long)result__1HBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HBH)));
-                ((__POINTER *)next__ZHBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0HBH)[ 0]=next__ZHBH;
+              t__V1EH=((__UINTEGER_32 )typ_id__QOJD);
+              a__U1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RUHH=(__UINTEGER_32)((__UINTEGER_32)(sz__NOJD + a__U1EH) & (__UINTEGER_32)(~ a__U1EH));
+              ptr_table__OUHH=((__POINTER )(&(table_type[(t__V1EH)])));
+              lab_type__QUHH=(__UINTEGER_32)(t__V1EH |  1);
+              next__NUHH=((__POINTER )(NULL));
+              result__PUHH=((__POINTER *)ptr_table__OUHH)[ 0];
+              if ((result__PUHH == (void *)NULL)) {
+                result__PUHH=new_lab__MRJ(lab_type__QUHH);
+                next__NUHH=(void *)((unsigned long)result__PUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RUHH)));
+                ((__POINTER *)next__NUHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OUHH)[ 0]=next__NUHH;
               } else {
-                next__ZHBH=((__POINTER *)result__1HBH)[ 0];
-                if ((next__ZHBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1HBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3HBH <<  1)) <=  4096)) {
-                    next__ZHBH=(void *)((unsigned long)result__1HBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HBH)));
+                next__NUHH=((__POINTER *)result__PUHH)[ 0];
+                if ((next__NUHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RUHH <<  1)) <=  4096)) {
+                    next__NUHH=(void *)((unsigned long)result__PUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RUHH)));
                   } else {
-                    next__ZHBH=new_lab__ARJ(lab_type__2HBH);
+                    next__NUHH=new_lab__MRJ(lab_type__QUHH);
                   };
-                  ((__POINTER *)next__ZHBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0HBH)[ 0]=next__ZHBH;
+                  ((__POINTER *)next__NUHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OUHH)[ 0]=next__NUHH;
                 } else {
-                  ((__POINTER *)result__1HBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__1HBH=next__ZHBH;
+                  ((__POINTER *)result__PUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PUHH=next__NUHH;
                 };
               };
-              ptr__5NJD=result__1HBH;
-            };
-            result__4NJD=((__ITM_WRITE_CAST *)ptr__5NJD);
-            *(result__4NJD) = *(ITM_WRITE_CAST__);
-          };
-          ((__ITM_WRITE_CAST *)result__4NJD)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ=__tmp__MHJ;
-          result__V4I=result__4NJD;
-        };
-      };
-    };
-  };
-  if (((void *)result__V4I == (void *)NULL)) {
-    restore_context__HDL();
-    result__VEL=NULL;
-    expr__WEL=NULL;
-    itm_op__ZEL=NULL;
-    last_msg__0EL= 0;
-    first_msg__1EL= 0;
-    result__P3H=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H)->parent_arrayed_collection__U3H.upper__2VT <  0)) {
-      result__P3H=create_with_capacity__GVI( 16);
-    } else {
-      Self__PN4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-      result__P3H=((void **)Self__PN4->parent_arrayed_collection__U3H.storage__KAU)[Self__PN4->parent_arrayed_collection__U3H.upper__2VT];
-      Self__FO4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-      Self__FO4->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(Self__FO4->parent_arrayed_collection__U3H.upper__2VT -  1);
-    };
-    l_expr__XEL=result__P3H;
-    while (read_operator__1MM()) {
-      p__HIBH=current_position__3WF();
-      n__IIBH=last_string__2ZC;
-      result__4HBH=NULL;
-      ptr__5HBH=((__POINTER )(NULL));
-      typ_id__AIBH= 0;
-      sz__BIBH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
-      if ((sz__BIBH ==  0)) {
-        result__4HBH=ITM_OPERATOR__;
-      } else {
-        typ_id__AIBH=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BIBH);
-        if ((typ_id__AIBH == (__INTEGER)(-  1))) {
-          a__CIBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__DIBH=(__UINTEGER_32)((__UINTEGER_32)(sz__BIBH + a__CIBH) & (__UINTEGER_32)(~ a__CIBH));
-          ptr_table__KIBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DIBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__JIBH=((__POINTER )(NULL));
-          result__LIBH=((__POINTER *)ptr_table__KIBH)[ 0];
-          if ((result__LIBH == (void *)NULL)) {
-            result__LIBH=new_lab__ARJ(new_size__DIBH);
-            next__JIBH=(void *)((unsigned long)result__LIBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DIBH)));
-            ((__POINTER *)next__JIBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KIBH)[ 0]=next__JIBH;
-          } else {
-            next__JIBH=((__POINTER *)result__LIBH)[ 0];
-            if ((next__JIBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LIBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DIBH <<  1)) <=  4096)) {
-                next__JIBH=(void *)((unsigned long)result__LIBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DIBH)));
+              ptr__LOJD=result__PUHH;
+            };
+            result__KOJD=((__ITM_WRITE_CAST *)ptr__LOJD);
+            *(result__KOJD) = *(ITM_WRITE_CAST__);
+          };
+          ((__ITM_WRITE_CAST *)result__KOJD)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__YHJ;
+          result__B5I=result__KOJD;
+        };
+      };
+    };
+  };
+  if (((void *)result__B5I == (void *)NULL)) {
+    restore_context__TDL();
+    result__BFL=NULL;
+    expr__CFL=NULL;
+    itm_op__FFL=NULL;
+    last_msg__GFL= 0;
+    first_msg__HFL= 0;
+    result__13H=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
+      result__13H=create_with_capacity__SVI( 16);
+    } else {
+      Self__1N4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+      result__13H=((void **)Self__1N4->parent_arrayed_collection__A4H.storage__WAU)[Self__1N4->parent_arrayed_collection__A4H.upper__IWT];
+      Self__RO4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+      Self__RO4->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__RO4->parent_arrayed_collection__A4H.upper__IWT -  1);
+    };
+    l_expr__DFL=result__13H;
+    while (read_operator__HNM()) {
+      p__1UHH=current_position__JXF();
+      n__2UHH=last_string__I0C;
+      result__SUHH=NULL;
+      ptr__TUHH=((__POINTER )(NULL));
+      typ_id__UUHH= 0;
+      sz__VUHH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+      if ((sz__VUHH ==  0)) {
+        result__SUHH=ITM_OPERATOR__;
+      } else {
+        typ_id__UUHH=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__VUHH);
+        if ((typ_id__UUHH == (__INTEGER)(-  1))) {
+          a__WUHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XUHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VUHH + a__WUHH) & (__UINTEGER_32)(~ a__WUHH));
+          ptr_table__4UHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XUHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__3UHH=((__POINTER )(NULL));
+          result__5UHH=((__POINTER *)ptr_table__4UHH)[ 0];
+          if ((result__5UHH == (void *)NULL)) {
+            result__5UHH=new_lab__MRJ(new_size__XUHH);
+            next__3UHH=(void *)((unsigned long)result__5UHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUHH)));
+            ((__POINTER *)next__3UHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4UHH)[ 0]=next__3UHH;
+          } else {
+            next__3UHH=((__POINTER *)result__5UHH)[ 0];
+            if ((next__3UHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5UHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XUHH <<  1)) <=  4096)) {
+                next__3UHH=(void *)((unsigned long)result__5UHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUHH)));
               } else {
-                next__JIBH=new_lab__ARJ(new_size__DIBH);
+                next__3UHH=new_lab__MRJ(new_size__XUHH);
               };
-              ((__POINTER *)next__JIBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KIBH)[ 0]=next__JIBH;
+              ((__POINTER *)next__3UHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4UHH)[ 0]=next__3UHH;
             } else {
-              ((__POINTER *)result__LIBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__LIBH=next__JIBH;
-            };
-          };
-          ptr__5HBH=result__LIBH;
-        } else {
-          t__EIBH=((__UINTEGER_32 )typ_id__AIBH);
-          a__FIBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__SIBH=(__UINTEGER_32)((__UINTEGER_32)(sz__BIBH + a__FIBH) & (__UINTEGER_32)(~ a__FIBH));
-          ptr_table__PIBH=((__POINTER )(&(table_type[(t__EIBH)])));
-          lab_type__RIBH=(__UINTEGER_32)(t__EIBH |  1);
-          next__OIBH=((__POINTER )(NULL));
-          result__QIBH=((__POINTER *)ptr_table__PIBH)[ 0];
-          if ((result__QIBH == (void *)NULL)) {
-            result__QIBH=new_lab__ARJ(lab_type__RIBH);
-            next__OIBH=(void *)((unsigned long)result__QIBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIBH)));
-            ((__POINTER *)next__OIBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PIBH)[ 0]=next__OIBH;
-          } else {
-            next__OIBH=((__POINTER *)result__QIBH)[ 0];
-            if ((next__OIBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QIBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SIBH <<  1)) <=  4096)) {
-                next__OIBH=(void *)((unsigned long)result__QIBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIBH)));
+              ((__POINTER *)result__5UHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3UHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5UHH=next__3UHH;
+            };
+          };
+          ptr__TUHH=result__5UHH;
+        } else {
+          t__YUHH=((__UINTEGER_32 )typ_id__UUHH);
+          a__ZUHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VUHH + a__ZUHH) & (__UINTEGER_32)(~ a__ZUHH));
+          ptr_table__DVHH=((__POINTER )(&(table_type[(t__YUHH)])));
+          lab_type__FVHH=(__UINTEGER_32)(t__YUHH |  1);
+          next__CVHH=((__POINTER )(NULL));
+          result__EVHH=((__POINTER *)ptr_table__DVHH)[ 0];
+          if ((result__EVHH == (void *)NULL)) {
+            result__EVHH=new_lab__MRJ(lab_type__FVHH);
+            next__CVHH=(void *)((unsigned long)result__EVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GVHH)));
+            ((__POINTER *)next__CVHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DVHH)[ 0]=next__CVHH;
+          } else {
+            next__CVHH=((__POINTER *)result__EVHH)[ 0];
+            if ((next__CVHH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EVHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GVHH <<  1)) <=  4096)) {
+                next__CVHH=(void *)((unsigned long)result__EVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GVHH)));
               } else {
-                next__OIBH=new_lab__ARJ(lab_type__RIBH);
+                next__CVHH=new_lab__MRJ(lab_type__FVHH);
               };
-              ((__POINTER *)next__OIBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PIBH)[ 0]=next__OIBH;
+              ((__POINTER *)next__CVHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DVHH)[ 0]=next__CVHH;
             } else {
-              ((__POINTER *)result__QIBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__QIBH=next__OIBH;
+              ((__POINTER *)result__EVHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CVHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EVHH=next__CVHH;
             };
           };
-          ptr__5HBH=result__QIBH;
+          ptr__TUHH=result__EVHH;
         };
-        result__4HBH=((__ITM_OPERATOR *)ptr__5HBH);
-        *(result__4HBH) = *(ITM_OPERATOR__);
+        result__SUHH=((__ITM_OPERATOR *)ptr__TUHH);
+        *(result__SUHH) = *(ITM_OPERATOR__);
       };
-      Self__GIBH=((__ITM_OPERATOR *)result__4HBH);
-      Self__GIBH->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ=p__HIBH;
-      Self__GIBH->name__DIL=n__IIBH;
-      expr__WEL=result__4HBH;
-      add_last__I5U(l_expr__XEL,result__4HBH);
+      Self__0UHH=((__ITM_OPERATOR *)result__SUHH);
+      Self__0UHH->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ=p__1UHH;
+      Self__0UHH->name__PIL=n__2UHH;
+      expr__CFL=result__SUHH;
+      add_last__U5U(l_expr__DFL,result__SUHH);
     };
-    expr__WEL=read_expr_message__OVL(Self__T4I);
-    if (((void *)expr__WEL == (void *)NULL)) {
-      if ((! (((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.upper__QHL <  0))) {
-        pos__ZYQG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_227));
-        put_position__IOG(pos__ZYQG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+    expr__CFL=read_expr_message__0VL(Self__54I);
+    if (((void *)expr__CFL == (void *)NULL)) {
+      if ((! (((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL <  0))) {
+        pos__JLWG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_237));
+        put_position__UOG(pos__JLWG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      free__MVI(result__P3H);
+      free__YVI(result__13H);
     } else {
-      first_msg__1EL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.upper__QHL +  1);
+      first_msg__HFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL +  1);
       do {
-        last_msg__0EL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__XEL)->parent_arrayed_collection__FTF.upper__QHL +  1);
-        add_last__I5U(l_expr__XEL,expr__WEL);
-        if (read_operator__1MM()) {
+        last_msg__GFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.upper__2HL +  1);
+        add_last__U5U(l_expr__DFL,expr__CFL);
+        if (read_operator__HNM()) {
           do {
-            p__DHP=current_position__3WF();
-            n__EHP=last_string__2ZC;
-            result__HSP=NULL;
-            ptr__ISP=((__POINTER )(NULL));
-            typ_id__NSP= 0;
-            sz__KSP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
-            if ((sz__KSP ==  0)) {
-              result__HSP=ITM_OPERATOR__;
+            p__PHP=current_position__JXF();
+            n__QHP=last_string__I0C;
+            result__TSP=NULL;
+            ptr__USP=((__POINTER )(NULL));
+            typ_id__ZSP= 0;
+            sz__WSP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+            if ((sz__WSP ==  0)) {
+              result__TSP=ITM_OPERATOR__;
             } else {
-              typ_id__NSP=-1;
-              clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__KSP);
-              if ((typ_id__NSP == (__INTEGER)(-  1))) {
-                a__LQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__MQ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__KSP + a__LQ4G) & (__UINTEGER_32)(~ a__LQ4G));
-                ptr_table__UIBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MQ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__TIBH=((__POINTER )(NULL));
-                result__VIBH=((__POINTER *)ptr_table__UIBH)[ 0];
-                if ((result__VIBH == (void *)NULL)) {
-                  result__VIBH=new_lab__ARJ(new_size__MQ4G);
-                  next__TIBH=(void *)((unsigned long)result__VIBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQ4G)));
-                  ((__POINTER *)next__TIBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__UIBH)[ 0]=next__TIBH;
+              typ_id__ZSP=-1;
+              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WSP);
+              if ((typ_id__ZSP == (__INTEGER)(-  1))) {
+                a__A2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__B2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__WSP + a__A2EH) & (__UINTEGER_32)(~ a__A2EH));
+                ptr_table__IVHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__HVHH=((__POINTER )(NULL));
+                result__JVHH=((__POINTER *)ptr_table__IVHH)[ 0];
+                if ((result__JVHH == (void *)NULL)) {
+                  result__JVHH=new_lab__MRJ(new_size__B2EH);
+                  next__HVHH=(void *)((unsigned long)result__JVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B2EH)));
+                  ((__POINTER *)next__HVHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__IVHH)[ 0]=next__HVHH;
                 } else {
-                  next__TIBH=((__POINTER *)result__VIBH)[ 0];
-                  if ((next__TIBH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VIBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MQ4G <<  1)) <=  4096)) {
-                      next__TIBH=(void *)((unsigned long)result__VIBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQ4G)));
+                  next__HVHH=((__POINTER *)result__JVHH)[ 0];
+                  if ((next__HVHH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JVHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__B2EH <<  1)) <=  4096)) {
+                      next__HVHH=(void *)((unsigned long)result__JVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B2EH)));
                     } else {
-                      next__TIBH=new_lab__ARJ(new_size__MQ4G);
+                      next__HVHH=new_lab__MRJ(new_size__B2EH);
                     };
-                    ((__POINTER *)next__TIBH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__UIBH)[ 0]=next__TIBH;
+                    ((__POINTER *)next__HVHH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__IVHH)[ 0]=next__HVHH;
                   } else {
-                    ((__POINTER *)result__VIBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__VIBH=next__TIBH;
+                    ((__POINTER *)result__JVHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HVHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__JVHH=next__HVHH;
                   };
                 };
-                ptr__ISP=result__VIBH;
+                ptr__USP=result__JVHH;
               } else {
-                t__QQ4G=((__UINTEGER_32 )typ_id__NSP);
-                a__PQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__2IBH=(__UINTEGER_32)((__UINTEGER_32)(sz__KSP + a__PQ4G) & (__UINTEGER_32)(~ a__PQ4G));
-                ptr_table__ZIBH=((__POINTER )(&(table_type[(t__QQ4G)])));
-                lab_type__1IBH=(__UINTEGER_32)(t__QQ4G |  1);
-                next__YIBH=((__POINTER )(NULL));
-                result__0IBH=((__POINTER *)ptr_table__ZIBH)[ 0];
-                if ((result__0IBH == (void *)NULL)) {
-                  result__0IBH=new_lab__ARJ(lab_type__1IBH);
-                  next__YIBH=(void *)((unsigned long)result__0IBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2IBH)));
-                  ((__POINTER *)next__YIBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ZIBH)[ 0]=next__YIBH;
+                t__F2EH=((__UINTEGER_32 )typ_id__ZSP);
+                a__E2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__QVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WSP + a__E2EH) & (__UINTEGER_32)(~ a__E2EH));
+                ptr_table__NVHH=((__POINTER )(&(table_type[(t__F2EH)])));
+                lab_type__PVHH=(__UINTEGER_32)(t__F2EH |  1);
+                next__MVHH=((__POINTER )(NULL));
+                result__OVHH=((__POINTER *)ptr_table__NVHH)[ 0];
+                if ((result__OVHH == (void *)NULL)) {
+                  result__OVHH=new_lab__MRJ(lab_type__PVHH);
+                  next__MVHH=(void *)((unsigned long)result__OVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QVHH)));
+                  ((__POINTER *)next__MVHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NVHH)[ 0]=next__MVHH;
                 } else {
-                  next__YIBH=((__POINTER *)result__0IBH)[ 0];
-                  if ((next__YIBH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0IBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__2IBH <<  1)) <=  4096)) {
-                      next__YIBH=(void *)((unsigned long)result__0IBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2IBH)));
+                  next__MVHH=((__POINTER *)result__OVHH)[ 0];
+                  if ((next__MVHH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OVHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QVHH <<  1)) <=  4096)) {
+                      next__MVHH=(void *)((unsigned long)result__OVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QVHH)));
                     } else {
-                      next__YIBH=new_lab__ARJ(lab_type__1IBH);
+                      next__MVHH=new_lab__MRJ(lab_type__PVHH);
                     };
-                    ((__POINTER *)next__YIBH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__ZIBH)[ 0]=next__YIBH;
+                    ((__POINTER *)next__MVHH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__NVHH)[ 0]=next__MVHH;
                   } else {
-                    ((__POINTER *)result__0IBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__0IBH=next__YIBH;
+                    ((__POINTER *)result__OVHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MVHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__OVHH=next__MVHH;
                   };
                 };
-                ptr__ISP=result__0IBH;
+                ptr__USP=result__OVHH;
               };
-              result__HSP=((__ITM_OPERATOR *)ptr__ISP);
-              *(result__HSP) = *(ITM_OPERATOR__);
-            };
-            Self__LNV=((__ITM_OPERATOR *)result__HSP);
-            Self__LNV->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ=p__DHP;
-            Self__LNV->name__DIL=n__EHP;
-            expr__WEL=result__HSP;
-            add_last__I5U(l_expr__XEL,result__HSP);
-          } while (read_operator__1MM());
-          expr__WEL=read_expr_message__OVL(Self__T4I);
-        } else {
-          expr__WEL=NULL;
-        };
-      } while (((void *)expr__WEL != (void *)NULL));
-      while ((last_msg__0EL < ((__FAST_ARRAYoITM_CODEo *)l_expr__XEL)->parent_arrayed_collection__FTF.upper__QHL)) {
-        __tmp__2HL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__XEL)->parent_arrayed_collection__FTF.storage__ZXT)[(__INTEGER)(last_msg__0EL +  1)];
-        if (__tmp__2HL==NULL) {
-          __tmp__3HL=NULL;
-        } else {
-          switch (((struct ___OBJ *)__tmp__2HL)->__id) {
+              result__TSP=((__ITM_OPERATOR *)ptr__USP);
+              *(result__TSP) = *(ITM_OPERATOR__);
+            };
+            Self__XNV=((__ITM_OPERATOR *)result__TSP);
+            Self__XNV->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ=p__PHP;
+            Self__XNV->name__PIL=n__QHP;
+            expr__CFL=result__TSP;
+            add_last__U5U(l_expr__DFL,result__TSP);
+          } while (read_operator__HNM());
+          expr__CFL=read_expr_message__0VL(Self__54I);
+        } else {
+          expr__CFL=NULL;
+        };
+      } while (((void *)expr__CFL != (void *)NULL));
+      while ((last_msg__GFL < ((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.upper__2HL)) {
+        __tmp__IIL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[(__INTEGER)(last_msg__GFL +  1)];
+        if (__tmp__IIL==NULL) {
+          __tmp__JIL=NULL;
+        } else {
+          switch (((struct ___OBJ *)__tmp__IIL)->__id) {
           case __ITM_LIST__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__3HL=((void *)__tmp__2HL);
+            __tmp__JIL=((void *)__tmp__IIL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__3HL=NULL;
+            __tmp__JIL=NULL;
           } break;
           }
         };
-        itm_op__ZEL=__tmp__3HL;
-        __tmp__AIL=((__ITM_OPERATOR *)__tmp__3HL)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
-        operator__name__RDO((&__string_82),((__ITM_OPERATOR *)__tmp__3HL)->name__DIL);
-        result__3IBH=NULL;
-        ptr__4IBH=((__POINTER )(NULL));
-        typ_id__5IBH= 0;
-        sz__AJBH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-        if ((sz__AJBH ==  0)) {
-          result__3IBH=ITM_READ_ARG1__;
-        } else {
-          typ_id__5IBH=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__AJBH);
-          if ((typ_id__5IBH == (__INTEGER)(-  1))) {
-            a__BJBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__CJBH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJBH + a__BJBH) & (__UINTEGER_32)(~ a__BJBH));
-            ptr_table__HJBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CJBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__GJBH=((__POINTER )(NULL));
-            result__IJBH=((__POINTER *)ptr_table__HJBH)[ 0];
-            if ((result__IJBH == (void *)NULL)) {
-              result__IJBH=new_lab__ARJ(new_size__CJBH);
-              next__GJBH=(void *)((unsigned long)result__IJBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJBH)));
-              ((__POINTER *)next__GJBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HJBH)[ 0]=next__GJBH;
+        itm_op__FFL=__tmp__JIL;
+        __tmp__MIL=((__ITM_OPERATOR *)__tmp__JIL)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+        operator__name__3DO((&__string_82),((__ITM_OPERATOR *)__tmp__JIL)->name__PIL);
+        result__RVHH=NULL;
+        ptr__SVHH=((__POINTER )(NULL));
+        typ_id__TVHH= 0;
+        sz__UVHH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__UVHH ==  0)) {
+          result__RVHH=ITM_READ_ARG1__;
+        } else {
+          typ_id__TVHH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__UVHH);
+          if ((typ_id__TVHH == (__INTEGER)(-  1))) {
+            a__VVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__WVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVHH + a__VVHH) & (__UINTEGER_32)(~ a__VVHH));
+            ptr_table__1VHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WVHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__0VHH=((__POINTER )(NULL));
+            result__2VHH=((__POINTER *)ptr_table__1VHH)[ 0];
+            if ((result__2VHH == (void *)NULL)) {
+              result__2VHH=new_lab__MRJ(new_size__WVHH);
+              next__0VHH=(void *)((unsigned long)result__2VHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVHH)));
+              ((__POINTER *)next__0VHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1VHH)[ 0]=next__0VHH;
             } else {
-              next__GJBH=((__POINTER *)result__IJBH)[ 0];
-              if ((next__GJBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IJBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CJBH <<  1)) <=  4096)) {
-                  next__GJBH=(void *)((unsigned long)result__IJBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJBH)));
+              next__0VHH=((__POINTER *)result__2VHH)[ 0];
+              if ((next__0VHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2VHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WVHH <<  1)) <=  4096)) {
+                  next__0VHH=(void *)((unsigned long)result__2VHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVHH)));
                 } else {
-                  next__GJBH=new_lab__ARJ(new_size__CJBH);
+                  next__0VHH=new_lab__MRJ(new_size__WVHH);
                 };
-                ((__POINTER *)next__GJBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HJBH)[ 0]=next__GJBH;
+                ((__POINTER *)next__0VHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1VHH)[ 0]=next__0VHH;
               } else {
-                ((__POINTER *)result__IJBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GJBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IJBH=next__GJBH;
+                ((__POINTER *)result__2VHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2VHH=next__0VHH;
               };
             };
-            ptr__4IBH=result__IJBH;
-          } else {
-            t__DJBH=((__UINTEGER_32 )typ_id__5IBH);
-            a__EJBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__PJBH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJBH + a__EJBH) & (__UINTEGER_32)(~ a__EJBH));
-            ptr_table__MJBH=((__POINTER )(&(table_type[(t__DJBH)])));
-            lab_type__OJBH=(__UINTEGER_32)(t__DJBH |  1);
-            next__LJBH=((__POINTER )(NULL));
-            result__NJBH=((__POINTER *)ptr_table__MJBH)[ 0];
-            if ((result__NJBH == (void *)NULL)) {
-              result__NJBH=new_lab__ARJ(lab_type__OJBH);
-              next__LJBH=(void *)((unsigned long)result__NJBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJBH)));
-              ((__POINTER *)next__LJBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MJBH)[ 0]=next__LJBH;
+            ptr__SVHH=result__2VHH;
+          } else {
+            t__XVHH=((__UINTEGER_32 )typ_id__TVHH);
+            a__YVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__DWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__UVHH + a__YVHH) & (__UINTEGER_32)(~ a__YVHH));
+            ptr_table__AWHH=((__POINTER )(&(table_type[(t__XVHH)])));
+            lab_type__CWHH=(__UINTEGER_32)(t__XVHH |  1);
+            next__5VHH=((__POINTER )(NULL));
+            result__BWHH=((__POINTER *)ptr_table__AWHH)[ 0];
+            if ((result__BWHH == (void *)NULL)) {
+              result__BWHH=new_lab__MRJ(lab_type__CWHH);
+              next__5VHH=(void *)((unsigned long)result__BWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DWHH)));
+              ((__POINTER *)next__5VHH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AWHH)[ 0]=next__5VHH;
             } else {
-              next__LJBH=((__POINTER *)result__NJBH)[ 0];
-              if ((next__LJBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NJBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PJBH <<  1)) <=  4096)) {
-                  next__LJBH=(void *)((unsigned long)result__NJBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJBH)));
+              next__5VHH=((__POINTER *)result__BWHH)[ 0];
+              if ((next__5VHH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BWHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DWHH <<  1)) <=  4096)) {
+                  next__5VHH=(void *)((unsigned long)result__BWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DWHH)));
                 } else {
-                  next__LJBH=new_lab__ARJ(lab_type__OJBH);
+                  next__5VHH=new_lab__MRJ(lab_type__CWHH);
                 };
-                ((__POINTER *)next__LJBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MJBH)[ 0]=next__LJBH;
+                ((__POINTER *)next__5VHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AWHH)[ 0]=next__5VHH;
               } else {
-                ((__POINTER *)result__NJBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NJBH=next__LJBH;
+                ((__POINTER *)result__BWHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5VHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BWHH=next__5VHH;
               };
             };
-            ptr__4IBH=result__NJBH;
-          };
-          result__3IBH=((__ITM_READ_ARG1 *)ptr__4IBH);
-          *(result__3IBH) = *(ITM_READ_ARG1__);
-        };
-        ((__ITM_READ_ARG1 *)result__3IBH)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__AIL;
-        expr__WEL=result__3IBH;
-        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__XEL)->parent_arrayed_collection__FTF.storage__ZXT)[last_msg__0EL]=result__3IBH;
-        Self__QJBH=((__FAST_ARRAYoITM_CODEo *)l_expr__XEL);
-        index__UJBH=(__INTEGER)(last_msg__0EL +  1);
-        __tmp__RJBH=Self__QJBH->parent_arrayed_collection__FTF.storage__ZXT;
-        __tmp__SJBH=Self__QJBH->parent_arrayed_collection__FTF.upper__QHL;
-        Self__TJBH=((void **)__tmp__RJBH);
-        i__VJBH=index__UJBH;
-        while ((i__VJBH != __tmp__SJBH)) {
-          Self__TJBH[i__VJBH]=Self__TJBH[(__INTEGER)(i__VJBH +  1)];
-          i__VJBH=(__INTEGER)(i__VJBH +  1);
-        };
-        Self__QJBH->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(Self__QJBH->parent_arrayed_collection__FTF.upper__QHL -  1);
-      };
-      if (((__INTEGER)(last_msg__0EL - first_msg__1EL) <  3)) {
-        while ((first_msg__1EL !=  0)) {
-          __tmp__DJL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__XEL)->parent_arrayed_collection__FTF.storage__ZXT)[(__INTEGER)(first_msg__1EL -  1)];
-          if (__tmp__DJL==NULL) {
-            __tmp__EJL=NULL;
-          } else {
-            switch (((struct ___OBJ *)__tmp__DJL)->__id) {
+            ptr__SVHH=result__BWHH;
+          };
+          result__RVHH=((__ITM_READ_ARG1 *)ptr__SVHH);
+          *(result__RVHH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__RVHH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__MIL;
+        expr__CFL=result__RVHH;
+        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[last_msg__GFL]=result__RVHH;
+        Self__EWHH=((__FAST_ARRAYoITM_CODEo *)l_expr__DFL);
+        index__IWHH=(__INTEGER)(last_msg__GFL +  1);
+        __tmp__FWHH=Self__EWHH->parent_arrayed_collection__RTF.storage__FYT;
+        __tmp__GWHH=Self__EWHH->parent_arrayed_collection__RTF.upper__2HL;
+        Self__HWHH=((void **)__tmp__FWHH);
+        i__JWHH=index__IWHH;
+        while ((i__JWHH != __tmp__GWHH)) {
+          Self__HWHH[i__JWHH]=Self__HWHH[(__INTEGER)(i__JWHH +  1)];
+          i__JWHH=(__INTEGER)(i__JWHH +  1);
+        };
+        Self__EWHH->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__EWHH->parent_arrayed_collection__RTF.upper__2HL -  1);
+      };
+      if (((__INTEGER)(last_msg__GFL - first_msg__HFL) <  3)) {
+        while ((first_msg__HFL !=  0)) {
+          __tmp__PJL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[(__INTEGER)(first_msg__HFL -  1)];
+          if (__tmp__PJL==NULL) {
+            __tmp__QJL=NULL;
+          } else {
+            switch (((struct ___OBJ *)__tmp__PJL)->__id) {
             case __ITM_LIST__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__EJL=((void *)__tmp__DJL);
+              __tmp__QJL=((void *)__tmp__PJL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__EJL=NULL;
+              __tmp__QJL=NULL;
             } break;
             }
           };
-          itm_op__ZEL=__tmp__EJL;
-          __tmp__GJL=((__ITM_OPERATOR *)__tmp__EJL)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
-          operator__name__RDO((&__string_83),((__ITM_OPERATOR *)__tmp__EJL)->name__DIL);
-          result__XJBH=NULL;
-          ptr__YJBH=((__POINTER )(NULL));
-          typ_id__ZJBH= 0;
-          sz__0JBH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-          if ((sz__0JBH ==  0)) {
-            result__XJBH=ITM_READ_ARG1__;
-          } else {
-            typ_id__ZJBH=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__0JBH);
-            if ((typ_id__ZJBH == (__INTEGER)(-  1))) {
-              a__1JBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__2JBH=(__UINTEGER_32)((__UINTEGER_32)(sz__0JBH + a__1JBH) & (__UINTEGER_32)(~ a__1JBH));
-              ptr_table__BKBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2JBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__AKBH=((__POINTER )(NULL));
-              result__CKBH=((__POINTER *)ptr_table__BKBH)[ 0];
-              if ((result__CKBH == (void *)NULL)) {
-                result__CKBH=new_lab__ARJ(new_size__2JBH);
-                next__AKBH=(void *)((unsigned long)result__CKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JBH)));
-                ((__POINTER *)next__AKBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__BKBH)[ 0]=next__AKBH;
+          itm_op__FFL=__tmp__QJL;
+          __tmp__SJL=((__ITM_OPERATOR *)__tmp__QJL)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+          operator__name__3DO((&__string_83),((__ITM_OPERATOR *)__tmp__QJL)->name__PIL);
+          result__LWHH=NULL;
+          ptr__MWHH=((__POINTER )(NULL));
+          typ_id__NWHH= 0;
+          sz__OWHH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+          if ((sz__OWHH ==  0)) {
+            result__LWHH=ITM_READ_ARG1__;
+          } else {
+            typ_id__NWHH=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OWHH);
+            if ((typ_id__NWHH == (__INTEGER)(-  1))) {
+              a__PWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__QWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWHH + a__PWHH) & (__UINTEGER_32)(~ a__PWHH));
+              ptr_table__VWHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QWHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__UWHH=((__POINTER )(NULL));
+              result__WWHH=((__POINTER *)ptr_table__VWHH)[ 0];
+              if ((result__WWHH == (void *)NULL)) {
+                result__WWHH=new_lab__MRJ(new_size__QWHH);
+                next__UWHH=(void *)((unsigned long)result__WWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWHH)));
+                ((__POINTER *)next__UWHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VWHH)[ 0]=next__UWHH;
               } else {
-                next__AKBH=((__POINTER *)result__CKBH)[ 0];
-                if ((next__AKBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CKBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__2JBH <<  1)) <=  4096)) {
-                    next__AKBH=(void *)((unsigned long)result__CKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JBH)));
+                next__UWHH=((__POINTER *)result__WWHH)[ 0];
+                if ((next__UWHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WWHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QWHH <<  1)) <=  4096)) {
+                    next__UWHH=(void *)((unsigned long)result__WWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWHH)));
                   } else {
-                    next__AKBH=new_lab__ARJ(new_size__2JBH);
+                    next__UWHH=new_lab__MRJ(new_size__QWHH);
                   };
-                  ((__POINTER *)next__AKBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BKBH)[ 0]=next__AKBH;
+                  ((__POINTER *)next__UWHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VWHH)[ 0]=next__UWHH;
                 } else {
-                  ((__POINTER *)result__CKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__CKBH=next__AKBH;
+                  ((__POINTER *)result__WWHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UWHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WWHH=next__UWHH;
                 };
               };
-              ptr__YJBH=result__CKBH;
+              ptr__MWHH=result__WWHH;
             } else {
-              t__3JBH=((__UINTEGER_32 )typ_id__ZJBH);
-              a__4JBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__JKBH=(__UINTEGER_32)((__UINTEGER_32)(sz__0JBH + a__4JBH) & (__UINTEGER_32)(~ a__4JBH));
-              ptr_table__GKBH=((__POINTER )(&(table_type[(t__3JBH)])));
-              lab_type__IKBH=(__UINTEGER_32)(t__3JBH |  1);
-              next__FKBH=((__POINTER )(NULL));
-              result__HKBH=((__POINTER *)ptr_table__GKBH)[ 0];
-              if ((result__HKBH == (void *)NULL)) {
-                result__HKBH=new_lab__ARJ(lab_type__IKBH);
-                next__FKBH=(void *)((unsigned long)result__HKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKBH)));
-                ((__POINTER *)next__FKBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__GKBH)[ 0]=next__FKBH;
+              t__RWHH=((__UINTEGER_32 )typ_id__NWHH);
+              a__SWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__3WHH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWHH + a__SWHH) & (__UINTEGER_32)(~ a__SWHH));
+              ptr_table__0WHH=((__POINTER )(&(table_type[(t__RWHH)])));
+              lab_type__2WHH=(__UINTEGER_32)(t__RWHH |  1);
+              next__ZWHH=((__POINTER )(NULL));
+              result__1WHH=((__POINTER *)ptr_table__0WHH)[ 0];
+              if ((result__1WHH == (void *)NULL)) {
+                result__1WHH=new_lab__MRJ(lab_type__2WHH);
+                next__ZWHH=(void *)((unsigned long)result__1WHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3WHH)));
+                ((__POINTER *)next__ZWHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0WHH)[ 0]=next__ZWHH;
               } else {
-                next__FKBH=((__POINTER *)result__HKBH)[ 0];
-                if ((next__FKBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HKBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JKBH <<  1)) <=  4096)) {
-                    next__FKBH=(void *)((unsigned long)result__HKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKBH)));
+                next__ZWHH=((__POINTER *)result__1WHH)[ 0];
+                if ((next__ZWHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1WHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3WHH <<  1)) <=  4096)) {
+                    next__ZWHH=(void *)((unsigned long)result__1WHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3WHH)));
                   } else {
-                    next__FKBH=new_lab__ARJ(lab_type__IKBH);
+                    next__ZWHH=new_lab__MRJ(lab_type__2WHH);
                   };
-                  ((__POINTER *)next__FKBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GKBH)[ 0]=next__FKBH;
+                  ((__POINTER *)next__ZWHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0WHH)[ 0]=next__ZWHH;
                 } else {
-                  ((__POINTER *)result__HKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HKBH=next__FKBH;
+                  ((__POINTER *)result__1WHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZWHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1WHH=next__ZWHH;
                 };
               };
-              ptr__YJBH=result__HKBH;
+              ptr__MWHH=result__1WHH;
             };
-            result__XJBH=((__ITM_READ_ARG1 *)ptr__YJBH);
-            *(result__XJBH) = *(ITM_READ_ARG1__);
+            result__LWHH=((__ITM_READ_ARG1 *)ptr__MWHH);
+            *(result__LWHH) = *(ITM_READ_ARG1__);
           };
-          ((__ITM_READ_ARG1 *)result__XJBH)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__GJL;
-          expr__WEL=result__XJBH;
-          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__XEL)->parent_arrayed_collection__FTF.storage__ZXT)[first_msg__1EL]=result__XJBH;
-          first_msg__1EL=(__INTEGER)(first_msg__1EL -  1);
-          Self__1D1C=((__FAST_ARRAYoITM_CODEo *)l_expr__XEL);
-          __tmp__EE1C=Self__1D1C->parent_arrayed_collection__FTF.storage__ZXT;
-          __tmp__FE1C=Self__1D1C->parent_arrayed_collection__FTF.upper__QHL;
-          Self__GHCD=((void **)__tmp__EE1C);
-          i__XHCD=first_msg__1EL;
-          while ((i__XHCD != __tmp__FE1C)) {
-            Self__GHCD[i__XHCD]=Self__GHCD[(__INTEGER)(i__XHCD +  1)];
-            i__XHCD=(__INTEGER)(i__XHCD +  1);
+          ((__ITM_READ_ARG1 *)result__LWHH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__SJL;
+          expr__CFL=result__LWHH;
+          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[first_msg__HFL]=result__LWHH;
+          first_msg__HFL=(__INTEGER)(first_msg__HFL -  1);
+          Self__HE1C=((__FAST_ARRAYoITM_CODEo *)l_expr__DFL);
+          __tmp__QE1C=Self__HE1C->parent_arrayed_collection__RTF.storage__FYT;
+          __tmp__RE1C=Self__HE1C->parent_arrayed_collection__RTF.upper__2HL;
+          Self__SHCD=((void **)__tmp__QE1C);
+          i__DICD=first_msg__HFL;
+          while ((i__DICD != __tmp__RE1C)) {
+            Self__SHCD[i__DICD]=Self__SHCD[(__INTEGER)(i__DICD +  1)];
+            i__DICD=(__INTEGER)(i__DICD +  1);
           };
-          Self__1D1C->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(Self__1D1C->parent_arrayed_collection__FTF.upper__QHL -  1);
+          Self__HE1C->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__HE1C->parent_arrayed_collection__RTF.upper__2HL -  1);
         };
       };
-      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.upper__QHL +  1) ==  1)) {
-        result__VEL=((void **)((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.storage__ZXT)[ 0];
-        free__MVI(result__P3H);
-        __tmp__2JL=TRUE__;
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL +  1) ==  1)) {
+        result__BFL=((void **)((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.storage__FYT)[ 0];
+        free__YVI(result__13H);
+        __tmp__IKL=TRUE__;
       } else {
-        __tmp__2JL=FALSE__;
+        __tmp__IKL=FALSE__;
       };
-      if ((! __tmp__2JL)) {
-        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.upper__QHL +  1) ==  3)) {
-          __tmp__JKL=((void **)((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.storage__ZXT)[ 1];
-          if (__tmp__JKL==NULL) {
-            __tmp__KKL=NULL;
+      if ((! __tmp__IKL)) {
+        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL +  1) ==  3)) {
+          __tmp__VKL=((void **)((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.storage__FYT)[ 1];
+          if (__tmp__VKL==NULL) {
+            __tmp__WKL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__JKL)->__id) {
+            switch (((struct ___OBJ *)__tmp__VKL)->__id) {
             case __ITM_LIST__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__KKL=((void *)__tmp__JKL);
+              __tmp__WKL=((void *)__tmp__VKL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__KKL=NULL;
+              __tmp__WKL=NULL;
             } break;
             }
           };
-          itm_op__ZEL=__tmp__KKL;
-          __tmp__NKL=((__ITM_OPERATOR *)__tmp__KKL)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
-          operator__name__RDO((&__string_81),((__ITM_OPERATOR *)__tmp__KKL)->name__DIL);
-          result__1WO=NULL;
-          ptr__2WO=((__POINTER )(NULL));
-          typ_id__BXO= 0;
-          sz__4WO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
-          if ((sz__4WO ==  0)) {
-            result__1WO=ITM_READ_ARG2__;
-          } else {
-            typ_id__BXO=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__4WO);
-            if ((typ_id__BXO == (__INTEGER)(-  1))) {
-              a__BR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__CR4G=(__UINTEGER_32)((__UINTEGER_32)(sz__4WO + a__BR4G) & (__UINTEGER_32)(~ a__BR4G));
-              ptr_table__LKBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CR4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__KKBH=((__POINTER )(NULL));
-              result__MKBH=((__POINTER *)ptr_table__LKBH)[ 0];
-              if ((result__MKBH == (void *)NULL)) {
-                result__MKBH=new_lab__ARJ(new_size__CR4G);
-                next__KKBH=(void *)((unsigned long)result__MKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CR4G)));
-                ((__POINTER *)next__KKBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LKBH)[ 0]=next__KKBH;
+          itm_op__FFL=__tmp__WKL;
+          __tmp__ZKL=((__ITM_OPERATOR *)__tmp__WKL)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+          operator__name__3DO((&__string_81),((__ITM_OPERATOR *)__tmp__WKL)->name__PIL);
+          result__HXO=NULL;
+          ptr__IXO=((__POINTER )(NULL));
+          typ_id__NXO= 0;
+          sz__KXO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+          if ((sz__KXO ==  0)) {
+            result__HXO=ITM_READ_ARG2__;
+          } else {
+            typ_id__NXO=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KXO);
+            if ((typ_id__NXO == (__INTEGER)(-  1))) {
+              a__W2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__X2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__KXO + a__W2EH) & (__UINTEGER_32)(~ a__W2EH));
+              ptr_table__5WHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__4WHH=((__POINTER )(NULL));
+              result__AXHH=((__POINTER *)ptr_table__5WHH)[ 0];
+              if ((result__AXHH == (void *)NULL)) {
+                result__AXHH=new_lab__MRJ(new_size__X2EH);
+                next__4WHH=(void *)((unsigned long)result__AXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X2EH)));
+                ((__POINTER *)next__4WHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5WHH)[ 0]=next__4WHH;
               } else {
-                next__KKBH=((__POINTER *)result__MKBH)[ 0];
-                if ((next__KKBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MKBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CR4G <<  1)) <=  4096)) {
-                    next__KKBH=(void *)((unsigned long)result__MKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CR4G)));
+                next__4WHH=((__POINTER *)result__AXHH)[ 0];
+                if ((next__4WHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__X2EH <<  1)) <=  4096)) {
+                    next__4WHH=(void *)((unsigned long)result__AXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X2EH)));
                   } else {
-                    next__KKBH=new_lab__ARJ(new_size__CR4G);
+                    next__4WHH=new_lab__MRJ(new_size__X2EH);
                   };
-                  ((__POINTER *)next__KKBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__LKBH)[ 0]=next__KKBH;
+                  ((__POINTER *)next__4WHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5WHH)[ 0]=next__4WHH;
                 } else {
-                  ((__POINTER *)result__MKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__MKBH=next__KKBH;
+                  ((__POINTER *)result__AXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4WHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__AXHH=next__4WHH;
                 };
               };
-              ptr__2WO=result__MKBH;
+              ptr__IXO=result__AXHH;
             } else {
-              t__GR4G=((__UINTEGER_32 )typ_id__BXO);
-              a__FR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__TKBH=(__UINTEGER_32)((__UINTEGER_32)(sz__4WO + a__FR4G) & (__UINTEGER_32)(~ a__FR4G));
-              ptr_table__QKBH=((__POINTER )(&(table_type[(t__GR4G)])));
-              lab_type__SKBH=(__UINTEGER_32)(t__GR4G |  1);
-              next__PKBH=((__POINTER )(NULL));
-              result__RKBH=((__POINTER *)ptr_table__QKBH)[ 0];
-              if ((result__RKBH == (void *)NULL)) {
-                result__RKBH=new_lab__ARJ(lab_type__SKBH);
-                next__PKBH=(void *)((unsigned long)result__RKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TKBH)));
-                ((__POINTER *)next__PKBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QKBH)[ 0]=next__PKBH;
+              t__12EH=((__UINTEGER_32 )typ_id__NXO);
+              a__02EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__HXHH=(__UINTEGER_32)((__UINTEGER_32)(sz__KXO + a__02EH) & (__UINTEGER_32)(~ a__02EH));
+              ptr_table__EXHH=((__POINTER )(&(table_type[(t__12EH)])));
+              lab_type__GXHH=(__UINTEGER_32)(t__12EH |  1);
+              next__DXHH=((__POINTER )(NULL));
+              result__FXHH=((__POINTER *)ptr_table__EXHH)[ 0];
+              if ((result__FXHH == (void *)NULL)) {
+                result__FXHH=new_lab__MRJ(lab_type__GXHH);
+                next__DXHH=(void *)((unsigned long)result__FXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HXHH)));
+                ((__POINTER *)next__DXHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EXHH)[ 0]=next__DXHH;
               } else {
-                next__PKBH=((__POINTER *)result__RKBH)[ 0];
-                if ((next__PKBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RKBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TKBH <<  1)) <=  4096)) {
-                    next__PKBH=(void *)((unsigned long)result__RKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TKBH)));
+                next__DXHH=((__POINTER *)result__FXHH)[ 0];
+                if ((next__DXHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HXHH <<  1)) <=  4096)) {
+                    next__DXHH=(void *)((unsigned long)result__FXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HXHH)));
                   } else {
-                    next__PKBH=new_lab__ARJ(lab_type__SKBH);
+                    next__DXHH=new_lab__MRJ(lab_type__GXHH);
                   };
-                  ((__POINTER *)next__PKBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__QKBH)[ 0]=next__PKBH;
+                  ((__POINTER *)next__DXHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__EXHH)[ 0]=next__DXHH;
                 } else {
-                  ((__POINTER *)result__RKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__RKBH=next__PKBH;
+                  ((__POINTER *)result__FXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__FXHH=next__DXHH;
                 };
               };
-              ptr__2WO=result__RKBH;
-            };
-            result__1WO=((__ITM_READ_ARG2 *)ptr__2WO);
-            *(result__1WO) = *(ITM_READ_ARG2__);
-          };
-          ((__ITM_READ_ARG2 *)result__1WO)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__NKL;
-          result__VEL=result__1WO;
-          free__MVI(result__P3H);
-        } else {
-          l_expr__XEL=copy__E5H(result__P3H);
-          result__OYO=NULL;
-          ptr__PYO=((__POINTER )(NULL));
-          typ_id__UYO= 0;
-          sz__RYO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
-          if ((sz__RYO ==  0)) {
-            result__OYO=ITM_EXPRESSION__;
-          } else {
-            typ_id__UYO=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__RYO);
-            if ((typ_id__UYO == (__INTEGER)(-  1))) {
-              a__KC4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__LC4G=(__UINTEGER_32)((__UINTEGER_32)(sz__RYO + a__KC4G) & (__UINTEGER_32)(~ a__KC4G));
-              ptr_table__VKBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LC4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__UKBH=((__POINTER )(NULL));
-              result__WKBH=((__POINTER *)ptr_table__VKBH)[ 0];
-              if ((result__WKBH == (void *)NULL)) {
-                result__WKBH=new_lab__ARJ(new_size__LC4G);
-                next__UKBH=(void *)((unsigned long)result__WKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LC4G)));
-                ((__POINTER *)next__UKBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VKBH)[ 0]=next__UKBH;
+              ptr__IXO=result__FXHH;
+            };
+            result__HXO=((__ITM_READ_ARG2 *)ptr__IXO);
+            *(result__HXO) = *(ITM_READ_ARG2__);
+          };
+          ((__ITM_READ_ARG2 *)result__HXO)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__ZKL;
+          result__BFL=result__HXO;
+          free__YVI(result__13H);
+        } else {
+          l_expr__DFL=copy__Q5H(result__13H);
+          result__0YO=NULL;
+          ptr__1YO=((__POINTER )(NULL));
+          typ_id__AZO= 0;
+          sz__3YO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
+          if ((sz__3YO ==  0)) {
+            result__0YO=ITM_EXPRESSION__;
+          } else {
+            typ_id__AZO=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__3YO);
+            if ((typ_id__AZO == (__INTEGER)(-  1))) {
+              a__ZNEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__0NEH=(__UINTEGER_32)((__UINTEGER_32)(sz__3YO + a__ZNEH) & (__UINTEGER_32)(~ a__ZNEH));
+              ptr_table__JXHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0NEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__IXHH=((__POINTER )(NULL));
+              result__KXHH=((__POINTER *)ptr_table__JXHH)[ 0];
+              if ((result__KXHH == (void *)NULL)) {
+                result__KXHH=new_lab__MRJ(new_size__0NEH);
+                next__IXHH=(void *)((unsigned long)result__KXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0NEH)));
+                ((__POINTER *)next__IXHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JXHH)[ 0]=next__IXHH;
               } else {
-                next__UKBH=((__POINTER *)result__WKBH)[ 0];
-                if ((next__UKBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WKBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LC4G <<  1)) <=  4096)) {
-                    next__UKBH=(void *)((unsigned long)result__WKBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LC4G)));
+                next__IXHH=((__POINTER *)result__KXHH)[ 0];
+                if ((next__IXHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0NEH <<  1)) <=  4096)) {
+                    next__IXHH=(void *)((unsigned long)result__KXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0NEH)));
                   } else {
-                    next__UKBH=new_lab__ARJ(new_size__LC4G);
+                    next__IXHH=new_lab__MRJ(new_size__0NEH);
                   };
-                  ((__POINTER *)next__UKBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__VKBH)[ 0]=next__UKBH;
+                  ((__POINTER *)next__IXHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__JXHH)[ 0]=next__IXHH;
                 } else {
-                  ((__POINTER *)result__WKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__WKBH=next__UKBH;
+                  ((__POINTER *)result__KXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__KXHH=next__IXHH;
                 };
               };
-              ptr__PYO=result__WKBH;
+              ptr__1YO=result__KXHH;
             } else {
-              t__PC4G=((__UINTEGER_32 )typ_id__UYO);
-              a__OC4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__3KBH=(__UINTEGER_32)((__UINTEGER_32)(sz__RYO + a__OC4G) & (__UINTEGER_32)(~ a__OC4G));
-              ptr_table__0KBH=((__POINTER )(&(table_type[(t__PC4G)])));
-              lab_type__2KBH=(__UINTEGER_32)(t__PC4G |  1);
-              next__ZKBH=((__POINTER )(NULL));
-              result__1KBH=((__POINTER *)ptr_table__0KBH)[ 0];
-              if ((result__1KBH == (void *)NULL)) {
-                result__1KBH=new_lab__ARJ(lab_type__2KBH);
-                next__ZKBH=(void *)((unsigned long)result__1KBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3KBH)));
-                ((__POINTER *)next__ZKBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0KBH)[ 0]=next__ZKBH;
+              t__4NEH=((__UINTEGER_32 )typ_id__AZO);
+              a__3NEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RXHH=(__UINTEGER_32)((__UINTEGER_32)(sz__3YO + a__3NEH) & (__UINTEGER_32)(~ a__3NEH));
+              ptr_table__OXHH=((__POINTER )(&(table_type[(t__4NEH)])));
+              lab_type__QXHH=(__UINTEGER_32)(t__4NEH |  1);
+              next__NXHH=((__POINTER )(NULL));
+              result__PXHH=((__POINTER *)ptr_table__OXHH)[ 0];
+              if ((result__PXHH == (void *)NULL)) {
+                result__PXHH=new_lab__MRJ(lab_type__QXHH);
+                next__NXHH=(void *)((unsigned long)result__PXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RXHH)));
+                ((__POINTER *)next__NXHH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OXHH)[ 0]=next__NXHH;
               } else {
-                next__ZKBH=((__POINTER *)result__1KBH)[ 0];
-                if ((next__ZKBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1KBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3KBH <<  1)) <=  4096)) {
-                    next__ZKBH=(void *)((unsigned long)result__1KBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3KBH)));
+                next__NXHH=((__POINTER *)result__PXHH)[ 0];
+                if ((next__NXHH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RXHH <<  1)) <=  4096)) {
+                    next__NXHH=(void *)((unsigned long)result__PXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RXHH)));
                   } else {
-                    next__ZKBH=new_lab__ARJ(lab_type__2KBH);
+                    next__NXHH=new_lab__MRJ(lab_type__QXHH);
                   };
-                  ((__POINTER *)next__ZKBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0KBH)[ 0]=next__ZKBH;
+                  ((__POINTER *)next__NXHH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OXHH)[ 0]=next__NXHH;
                 } else {
-                  ((__POINTER *)result__1KBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__1KBH=next__ZKBH;
+                  ((__POINTER *)result__PXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PXHH=next__NXHH;
                 };
               };
-              ptr__PYO=result__1KBH;
+              ptr__1YO=result__PXHH;
             };
-            result__OYO=((__ITM_EXPRESSION *)ptr__PYO);
-            *(result__OYO) = *(ITM_EXPRESSION__);
+            result__0YO=((__ITM_EXPRESSION *)ptr__1YO);
+            *(result__0YO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__OYO)->value_list__PJV=l_expr__XEL;
-          result__VEL=result__OYO;
+          ((__ITM_EXPRESSION *)result__0YO)->value_list__1JV=l_expr__DFL;
+          result__BFL=result__0YO;
         };
       };
     };
-    result__V4I=result__VEL;
+    result__B5I=result__BFL;
   };
-  return(result__V4I);
+  return(result__B5I);
 }
 
-static void set_value__type__NFHC(__ITM_SLOT *Self__OFHC,void *e__PFHC,void *p__QFHC)
+static void set_value__type__ZFHC(__ITM_SLOT *Self__0FHC,void *e__1FHC,void *p__2FHC)
 // ({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__RBBD;
-  void *sec__SBBD;
-  __POSITION __tmp__4BBD,__tmp__GCBD,__tmp__0CBD,__tmp__DDBD;
-  __ITM_ARG *result__J05G,*Self__R05G;
-  __POINTER ptr__K05G,ptr_table__5KBH,next__4KBH,result__ALBH;
-  __POINTER ptr_table__ELBH,next__DLBH,result__FLBH,ptr__ASAC;
-  __POINTER ptr_table__JLBH,next__ILBH,result__KLBH,ptr_table__OLBH;
-  __POINTER next__NLBH,result__PLBH,ptr__3TI,ptr_table__TLBH,next__SLBH;
-  __POINTER result__ULBH,ptr_table__YLBH,next__XLBH,result__ZLBH;
-  __POINTER ptr__CFCD,ptr_table__3LBH,next__2LBH,result__4LBH;
-  __POINTER ptr_table__CMBH,next__BMBH,result__DMBH;
-  __INTEGER typ_id__L05G,typ_id__FSAC,typ_id__CUI,typ_id__HFCD;
-  __UINTEGER_32 sz__M05G,a__N05G,new_size__O05G,t__P05G,a__Q05G;
-  __UINTEGER_32 new_size__HLBH,lab_type__GLBH,sz__CSAC,a__VC4G;
-  __UINTEGER_32 new_size__WC4G,t__0C4G,a__ZC4G,new_size__RLBH;
-  __UINTEGER_32 lab_type__QLBH,sz__5TI,a__RD4G,new_size__SD4G,t__WD4G;
-  __UINTEGER_32 a__VD4G,new_size__1LBH,lab_type__0LBH,sz__EFCD,a__ZD4G;
-  __UINTEGER_32 new_size__0D4G,t__4D4G,a__3D4G,new_size__FMBH;
-  __UINTEGER_32 lab_type__EMBH;
-  __ITM_SLOT *result__5RAC,*Self__31HC;
-  __ITM_PROTOTYPE *result__2TI;
-  __ITM_READ_ARG1 *result__BFCD;
-  void *larg__TBBD;
-  if ((Self__OFHC->affect__35FC != '<')) {
-    copy__NCS(string_tmp__VH,(&__string_228));
-    append__VNS(string_tmp__VH,Self__OFHC->parent_named__G5.name__LI);
-    n__RBBD=get__2VB(string_tmp__VH);
-    sec__SBBD=get_name__OUOB((&__string_27));
-    larg__TBBD=create_with_capacity__FL5B( 1);
-    switch (((struct ___OBJ *)e__PFHC)->__id) {
+  void *n__3BBD;
+  void *sec__4BBD;
+  __POSITION __tmp__KCBD,__tmp__SCBD,__tmp__GDBD,__tmp__PDBD;
+  __ITM_ARG *result__VGGH,*Self__3GGH;
+  __POINTER ptr__WGGH,ptr_table__TXHH,next__SXHH,result__UXHH;
+  __POINTER ptr_table__YXHH,next__XXHH,result__ZXHH,ptr__MSAC;
+  __POINTER ptr_table__3XHH,next__2XHH,result__4XHH,ptr_table__CYHH;
+  __POINTER next__BYHH,result__DYHH,ptr__JUI,ptr_table__HYHH,next__GYHH;
+  __POINTER result__IYHH,ptr_table__MYHH,next__LYHH,result__NYHH;
+  __POINTER ptr__OFCD,ptr_table__RYHH,next__QYHH,result__SYHH;
+  __POINTER ptr_table__WYHH,next__VYHH,result__XYHH;
+  __INTEGER typ_id__XGGH,typ_id__RSAC,typ_id__OUI,typ_id__TFCD;
+  __UINTEGER_32 sz__YGGH,a__ZGGH,new_size__0GGH,t__1GGH,a__2GGH;
+  __UINTEGER_32 new_size__1XHH,lab_type__0XHH,sz__OSAC,a__EOEH;
+  __UINTEGER_32 new_size__FOEH,t__JOEH,a__IOEH,new_size__FYHH;
+  __UINTEGER_32 lab_type__EYHH,sz__LUI,a__APEH,new_size__BPEH,t__FPEH;
+  __UINTEGER_32 a__EPEH,new_size__PYHH,lab_type__OYHH,sz__QFCD,a__IPEH;
+  __UINTEGER_32 new_size__JPEH,t__NPEH,a__MPEH,new_size__ZYHH;
+  __UINTEGER_32 lab_type__YYHH;
+  __ITM_SLOT *result__LSAC,*Self__J2HC;
+  __ITM_PROTOTYPE *result__IUI;
+  __ITM_READ_ARG1 *result__NFCD;
+  void *larg__5BBD;
+  if ((Self__0FHC->affect__JAGC != '<')) {
+    copy__ZCS(string_tmp__VH,(&__string_238));
+    append__BOS(string_tmp__VH,Self__0FHC->parent_named__P5.name__LI);
+    n__3BBD=get__IWB(string_tmp__VH);
+    sec__4BBD=get_name__0UOB((&__string_27));
+    larg__5BBD=create_with_capacity__RL5B( 1);
+    switch (((struct ___OBJ *)e__1FHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__4BBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__4BBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__4BBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__4BBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__4BBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__4BBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__4BBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__4BBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__4BBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__4BBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__4BBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__4BBD=position__ZC5B(e__PFHC);
+      __tmp__KCBD=position__FD5B(e__1FHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__4BBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__4BBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__4BBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__4BBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__4BBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__4BBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__4BBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__4BBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__4BBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__KCBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__4BBD=position__ZIHC(e__PFHC);
+      __tmp__KCBD=position__FJHC(e__1FHC);
     } break;
     };
-    result__J05G=NULL;
-    ptr__K05G=((__POINTER )(NULL));
-    typ_id__L05G= 0;
-    sz__M05G=((__UINTEGER_32 )sizeof(__ITM_ARG));
-    if ((sz__M05G ==  0)) {
-      result__J05G=ITM_ARG__;
-    } else {
-      typ_id__L05G=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M05G);
-      if ((typ_id__L05G == (__INTEGER)(-  1))) {
-        a__N05G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__O05G=(__UINTEGER_32)((__UINTEGER_32)(sz__M05G + a__N05G) & (__UINTEGER_32)(~ a__N05G));
-        ptr_table__5KBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O05G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__4KBH=((__POINTER )(NULL));
-        result__ALBH=((__POINTER *)ptr_table__5KBH)[ 0];
-        if ((result__ALBH == (void *)NULL)) {
-          result__ALBH=new_lab__ARJ(new_size__O05G);
-          next__4KBH=(void *)((unsigned long)result__ALBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O05G)));
-          ((__POINTER *)next__4KBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5KBH)[ 0]=next__4KBH;
-        } else {
-          next__4KBH=((__POINTER *)result__ALBH)[ 0];
-          if ((next__4KBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ALBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__O05G <<  1)) <=  4096)) {
-              next__4KBH=(void *)((unsigned long)result__ALBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O05G)));
+    result__VGGH=NULL;
+    ptr__WGGH=((__POINTER )(NULL));
+    typ_id__XGGH= 0;
+    sz__YGGH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+    if ((sz__YGGH ==  0)) {
+      result__VGGH=ITM_ARG__;
+    } else {
+      typ_id__XGGH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YGGH);
+      if ((typ_id__XGGH == (__INTEGER)(-  1))) {
+        a__ZGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0GGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YGGH + a__ZGGH) & (__UINTEGER_32)(~ a__ZGGH));
+        ptr_table__TXHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0GGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__SXHH=((__POINTER )(NULL));
+        result__UXHH=((__POINTER *)ptr_table__TXHH)[ 0];
+        if ((result__UXHH == (void *)NULL)) {
+          result__UXHH=new_lab__MRJ(new_size__0GGH);
+          next__SXHH=(void *)((unsigned long)result__UXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GGH)));
+          ((__POINTER *)next__SXHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TXHH)[ 0]=next__SXHH;
+        } else {
+          next__SXHH=((__POINTER *)result__UXHH)[ 0];
+          if ((next__SXHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0GGH <<  1)) <=  4096)) {
+              next__SXHH=(void *)((unsigned long)result__UXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GGH)));
             } else {
-              next__4KBH=new_lab__ARJ(new_size__O05G);
-            };
-            ((__POINTER *)next__4KBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5KBH)[ 0]=next__4KBH;
-          } else {
-            ((__POINTER *)result__ALBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4KBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ALBH=next__4KBH;
-          };
-        };
-        ptr__K05G=result__ALBH;
-      } else {
-        t__P05G=((__UINTEGER_32 )typ_id__L05G);
-        a__Q05G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__HLBH=(__UINTEGER_32)((__UINTEGER_32)(sz__M05G + a__Q05G) & (__UINTEGER_32)(~ a__Q05G));
-        ptr_table__ELBH=((__POINTER )(&(table_type[(t__P05G)])));
-        lab_type__GLBH=(__UINTEGER_32)(t__P05G |  1);
-        next__DLBH=((__POINTER )(NULL));
-        result__FLBH=((__POINTER *)ptr_table__ELBH)[ 0];
-        if ((result__FLBH == (void *)NULL)) {
-          result__FLBH=new_lab__ARJ(lab_type__GLBH);
-          next__DLBH=(void *)((unsigned long)result__FLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLBH)));
-          ((__POINTER *)next__DLBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ELBH)[ 0]=next__DLBH;
-        } else {
-          next__DLBH=((__POINTER *)result__FLBH)[ 0];
-          if ((next__DLBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FLBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HLBH <<  1)) <=  4096)) {
-              next__DLBH=(void *)((unsigned long)result__FLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLBH)));
+              next__SXHH=new_lab__MRJ(new_size__0GGH);
+            };
+            ((__POINTER *)next__SXHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TXHH)[ 0]=next__SXHH;
+          } else {
+            ((__POINTER *)result__UXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UXHH=next__SXHH;
+          };
+        };
+        ptr__WGGH=result__UXHH;
+      } else {
+        t__1GGH=((__UINTEGER_32 )typ_id__XGGH);
+        a__2GGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1XHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YGGH + a__2GGH) & (__UINTEGER_32)(~ a__2GGH));
+        ptr_table__YXHH=((__POINTER )(&(table_type[(t__1GGH)])));
+        lab_type__0XHH=(__UINTEGER_32)(t__1GGH |  1);
+        next__XXHH=((__POINTER )(NULL));
+        result__ZXHH=((__POINTER *)ptr_table__YXHH)[ 0];
+        if ((result__ZXHH == (void *)NULL)) {
+          result__ZXHH=new_lab__MRJ(lab_type__0XHH);
+          next__XXHH=(void *)((unsigned long)result__ZXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1XHH)));
+          ((__POINTER *)next__XXHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YXHH)[ 0]=next__XXHH;
+        } else {
+          next__XXHH=((__POINTER *)result__ZXHH)[ 0];
+          if ((next__XXHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1XHH <<  1)) <=  4096)) {
+              next__XXHH=(void *)((unsigned long)result__ZXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1XHH)));
             } else {
-              next__DLBH=new_lab__ARJ(lab_type__GLBH);
+              next__XXHH=new_lab__MRJ(lab_type__0XHH);
             };
-            ((__POINTER *)next__DLBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ELBH)[ 0]=next__DLBH;
+            ((__POINTER *)next__XXHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YXHH)[ 0]=next__XXHH;
           } else {
-            ((__POINTER *)result__FLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FLBH=next__DLBH;
+            ((__POINTER *)result__ZXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZXHH=next__XXHH;
           };
         };
-        ptr__K05G=result__FLBH;
+        ptr__WGGH=result__ZXHH;
       };
-      result__J05G=((__ITM_ARG *)ptr__K05G);
-      *(result__J05G) = *(ITM_ARG__);
+      result__VGGH=((__ITM_ARG *)ptr__WGGH);
+      *(result__VGGH) = *(ITM_ARG__);
     };
-    Self__R05G=((__ITM_ARG *)result__J05G);
-    Self__R05G->parent_itm_argument__NHHB.parent_itm_code__G4M.position__BDJ=__tmp__4BBD;
-    Self__R05G->name__P0HC=(&__string_58);
-    Self__R05G->type__Q0HC=type_self__1TN;
-    add_last__O5GC(larg__TBBD,result__J05G);
-    switch (((struct ___OBJ *)e__PFHC)->__id) {
+    Self__3GGH=((__ITM_ARG *)result__VGGH);
+    Self__3GGH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=__tmp__KCBD;
+    Self__3GGH->name__10HC=(&__string_58);
+    Self__3GGH->type__20HC=type_self__HUN;
+    add_last__05GC(larg__5BBD,result__VGGH);
+    switch (((struct ___OBJ *)e__1FHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__GCBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__GCBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__GCBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__GCBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__GCBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__GCBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__GCBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__GCBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__GCBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__GCBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__GCBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__GCBD=position__ZC5B(e__PFHC);
+      __tmp__SCBD=position__FD5B(e__1FHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__GCBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__GCBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__GCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__GCBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__GCBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__GCBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__GCBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__GCBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__GCBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__SCBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__GCBD=position__ZIHC(e__PFHC);
+      __tmp__SCBD=position__FJHC(e__1FHC);
     } break;
     };
-    result__5RAC=NULL;
-    ptr__ASAC=((__POINTER )(NULL));
-    typ_id__FSAC= 0;
-    sz__CSAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-    if ((sz__CSAC ==  0)) {
-      result__5RAC=ITM_SLOT__;
-    } else {
-      typ_id__FSAC=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__CSAC);
-      if ((typ_id__FSAC == (__INTEGER)(-  1))) {
-        a__VC4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__WC4G=(__UINTEGER_32)((__UINTEGER_32)(sz__CSAC + a__VC4G) & (__UINTEGER_32)(~ a__VC4G));
-        ptr_table__JLBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WC4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ILBH=((__POINTER )(NULL));
-        result__KLBH=((__POINTER *)ptr_table__JLBH)[ 0];
-        if ((result__KLBH == (void *)NULL)) {
-          result__KLBH=new_lab__ARJ(new_size__WC4G);
-          next__ILBH=(void *)((unsigned long)result__KLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WC4G)));
-          ((__POINTER *)next__ILBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JLBH)[ 0]=next__ILBH;
-        } else {
-          next__ILBH=((__POINTER *)result__KLBH)[ 0];
-          if ((next__ILBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KLBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__WC4G <<  1)) <=  4096)) {
-              next__ILBH=(void *)((unsigned long)result__KLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WC4G)));
+    result__LSAC=NULL;
+    ptr__MSAC=((__POINTER )(NULL));
+    typ_id__RSAC= 0;
+    sz__OSAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__OSAC ==  0)) {
+      result__LSAC=ITM_SLOT__;
+    } else {
+      typ_id__RSAC=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OSAC);
+      if ((typ_id__RSAC == (__INTEGER)(-  1))) {
+        a__EOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FOEH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSAC + a__EOEH) & (__UINTEGER_32)(~ a__EOEH));
+        ptr_table__3XHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FOEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__2XHH=((__POINTER )(NULL));
+        result__4XHH=((__POINTER *)ptr_table__3XHH)[ 0];
+        if ((result__4XHH == (void *)NULL)) {
+          result__4XHH=new_lab__MRJ(new_size__FOEH);
+          next__2XHH=(void *)((unsigned long)result__4XHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FOEH)));
+          ((__POINTER *)next__2XHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3XHH)[ 0]=next__2XHH;
+        } else {
+          next__2XHH=((__POINTER *)result__4XHH)[ 0];
+          if ((next__2XHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4XHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FOEH <<  1)) <=  4096)) {
+              next__2XHH=(void *)((unsigned long)result__4XHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FOEH)));
             } else {
-              next__ILBH=new_lab__ARJ(new_size__WC4G);
-            };
-            ((__POINTER *)next__ILBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JLBH)[ 0]=next__ILBH;
-          } else {
-            ((__POINTER *)result__KLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ILBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KLBH=next__ILBH;
-          };
-        };
-        ptr__ASAC=result__KLBH;
-      } else {
-        t__0C4G=((__UINTEGER_32 )typ_id__FSAC);
-        a__ZC4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__RLBH=(__UINTEGER_32)((__UINTEGER_32)(sz__CSAC + a__ZC4G) & (__UINTEGER_32)(~ a__ZC4G));
-        ptr_table__OLBH=((__POINTER )(&(table_type[(t__0C4G)])));
-        lab_type__QLBH=(__UINTEGER_32)(t__0C4G |  1);
-        next__NLBH=((__POINTER )(NULL));
-        result__PLBH=((__POINTER *)ptr_table__OLBH)[ 0];
-        if ((result__PLBH == (void *)NULL)) {
-          result__PLBH=new_lab__ARJ(lab_type__QLBH);
-          next__NLBH=(void *)((unsigned long)result__PLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RLBH)));
-          ((__POINTER *)next__NLBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OLBH)[ 0]=next__NLBH;
-        } else {
-          next__NLBH=((__POINTER *)result__PLBH)[ 0];
-          if ((next__NLBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PLBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RLBH <<  1)) <=  4096)) {
-              next__NLBH=(void *)((unsigned long)result__PLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RLBH)));
+              next__2XHH=new_lab__MRJ(new_size__FOEH);
+            };
+            ((__POINTER *)next__2XHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3XHH)[ 0]=next__2XHH;
+          } else {
+            ((__POINTER *)result__4XHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2XHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4XHH=next__2XHH;
+          };
+        };
+        ptr__MSAC=result__4XHH;
+      } else {
+        t__JOEH=((__UINTEGER_32 )typ_id__RSAC);
+        a__IOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSAC + a__IOEH) & (__UINTEGER_32)(~ a__IOEH));
+        ptr_table__CYHH=((__POINTER )(&(table_type[(t__JOEH)])));
+        lab_type__EYHH=(__UINTEGER_32)(t__JOEH |  1);
+        next__BYHH=((__POINTER )(NULL));
+        result__DYHH=((__POINTER *)ptr_table__CYHH)[ 0];
+        if ((result__DYHH == (void *)NULL)) {
+          result__DYHH=new_lab__MRJ(lab_type__EYHH);
+          next__BYHH=(void *)((unsigned long)result__DYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYHH)));
+          ((__POINTER *)next__BYHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CYHH)[ 0]=next__BYHH;
+        } else {
+          next__BYHH=((__POINTER *)result__DYHH)[ 0];
+          if ((next__BYHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FYHH <<  1)) <=  4096)) {
+              next__BYHH=(void *)((unsigned long)result__DYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYHH)));
             } else {
-              next__NLBH=new_lab__ARJ(lab_type__QLBH);
+              next__BYHH=new_lab__MRJ(lab_type__EYHH);
             };
-            ((__POINTER *)next__NLBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OLBH)[ 0]=next__NLBH;
+            ((__POINTER *)next__BYHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CYHH)[ 0]=next__BYHH;
           } else {
-            ((__POINTER *)result__PLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PLBH=next__NLBH;
+            ((__POINTER *)result__DYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DYHH=next__BYHH;
           };
         };
-        ptr__ASAC=result__PLBH;
+        ptr__MSAC=result__DYHH;
       };
-      result__5RAC=((__ITM_SLOT *)ptr__ASAC);
-      *(result__5RAC) = *(ITM_SLOT__);
+      result__LSAC=((__ITM_SLOT *)ptr__MSAC);
+      *(result__LSAC) = *(ITM_SLOT__);
     };
-    Self__31HC=((__ITM_SLOT *)result__5RAC);
-    Self__31HC->parent_named__G5.name__LI=n__RBBD;
-    Self__31HC->parent_named__G5.parent_itm_object__4.position__BDJ=__tmp__GCBD;
-    Self__31HC->id_section__M1C=sec__SBBD;
-    ((__ITM_SLOT *)result__5RAC)->affect__35FC='<';
-    set_value__type__NFHC(result__5RAC,e__PFHC,p__QFHC);
-    set_argument_list__JCHC(result__5RAC,larg__TBBD);
-    set_result_type__E3FC(result__5RAC,Self__OFHC->result_type__O4FC);
-    fast_put__to__VNGC(((__PROTOTYPE *)p__QFHC)->slot_list__QUS,result__5RAC,result__5RAC->parent_named__G5.name__LI);
-    switch (((struct ___OBJ *)e__PFHC)->__id) {
+    Self__J2HC=((__ITM_SLOT *)result__LSAC);
+    Self__J2HC->parent_named__P5.name__LI=n__3BBD;
+    Self__J2HC->parent_named__P5.parent_itm_object__4.position__NDJ=__tmp__SCBD;
+    Self__J2HC->id_section__Y1C=sec__4BBD;
+    ((__ITM_SLOT *)result__LSAC)->affect__JAGC='<';
+    set_value__type__ZFHC(result__LSAC,e__1FHC,p__2FHC);
+    set_argument_list__VCHC(result__LSAC,larg__5BBD);
+    set_result_type__Q3FC(result__LSAC,Self__0FHC->result_type__04FC);
+    fast_put__to__BOGC(((__PROTOTYPE *)p__2FHC)->slot_list__2US,result__LSAC,result__LSAC->parent_named__P5.name__LI);
+    switch (((struct ___OBJ *)e__1FHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__0CBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__0CBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__0CBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__0CBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__0CBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__0CBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__0CBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__0CBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__0CBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__0CBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__0CBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__0CBD=position__ZC5B(e__PFHC);
+      __tmp__GDBD=position__FD5B(e__1FHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__0CBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__0CBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__0CBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__0CBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__0CBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__0CBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__0CBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__0CBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__0CBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__GDBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__0CBD=position__ZIHC(e__PFHC);
+      __tmp__GDBD=position__FJHC(e__1FHC);
     } break;
     };
-    get__XSI(((__PROTOTYPE *)p__QFHC)->parent_named__5.name__LI);
-    result__2TI=NULL;
-    ptr__3TI=((__POINTER )(NULL));
-    typ_id__CUI= 0;
-    sz__5TI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-    if ((sz__5TI ==  0)) {
-      result__2TI=ITM_PROTOTYPE__;
-    } else {
-      typ_id__CUI=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__5TI);
-      if ((typ_id__CUI == (__INTEGER)(-  1))) {
-        a__RD4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__SD4G=(__UINTEGER_32)((__UINTEGER_32)(sz__5TI + a__RD4G) & (__UINTEGER_32)(~ a__RD4G));
-        ptr_table__TLBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SD4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__SLBH=((__POINTER )(NULL));
-        result__ULBH=((__POINTER *)ptr_table__TLBH)[ 0];
-        if ((result__ULBH == (void *)NULL)) {
-          result__ULBH=new_lab__ARJ(new_size__SD4G);
-          next__SLBH=(void *)((unsigned long)result__ULBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SD4G)));
-          ((__POINTER *)next__SLBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TLBH)[ 0]=next__SLBH;
-        } else {
-          next__SLBH=((__POINTER *)result__ULBH)[ 0];
-          if ((next__SLBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ULBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SD4G <<  1)) <=  4096)) {
-              next__SLBH=(void *)((unsigned long)result__ULBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SD4G)));
+    get__DTI(((__PROTOTYPE *)p__2FHC)->parent_named__5.name__LI);
+    result__IUI=NULL;
+    ptr__JUI=((__POINTER )(NULL));
+    typ_id__OUI= 0;
+    sz__LUI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__LUI ==  0)) {
+      result__IUI=ITM_PROTOTYPE__;
+    } else {
+      typ_id__OUI=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__LUI);
+      if ((typ_id__OUI == (__INTEGER)(-  1))) {
+        a__APEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BPEH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUI + a__APEH) & (__UINTEGER_32)(~ a__APEH));
+        ptr_table__HYHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BPEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__GYHH=((__POINTER )(NULL));
+        result__IYHH=((__POINTER *)ptr_table__HYHH)[ 0];
+        if ((result__IYHH == (void *)NULL)) {
+          result__IYHH=new_lab__MRJ(new_size__BPEH);
+          next__GYHH=(void *)((unsigned long)result__IYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPEH)));
+          ((__POINTER *)next__GYHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HYHH)[ 0]=next__GYHH;
+        } else {
+          next__GYHH=((__POINTER *)result__IYHH)[ 0];
+          if ((next__GYHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BPEH <<  1)) <=  4096)) {
+              next__GYHH=(void *)((unsigned long)result__IYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPEH)));
             } else {
-              next__SLBH=new_lab__ARJ(new_size__SD4G);
-            };
-            ((__POINTER *)next__SLBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TLBH)[ 0]=next__SLBH;
-          } else {
-            ((__POINTER *)result__ULBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ULBH=next__SLBH;
-          };
-        };
-        ptr__3TI=result__ULBH;
-      } else {
-        t__WD4G=((__UINTEGER_32 )typ_id__CUI);
-        a__VD4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__1LBH=(__UINTEGER_32)((__UINTEGER_32)(sz__5TI + a__VD4G) & (__UINTEGER_32)(~ a__VD4G));
-        ptr_table__YLBH=((__POINTER )(&(table_type[(t__WD4G)])));
-        lab_type__0LBH=(__UINTEGER_32)(t__WD4G |  1);
-        next__XLBH=((__POINTER )(NULL));
-        result__ZLBH=((__POINTER *)ptr_table__YLBH)[ 0];
-        if ((result__ZLBH == (void *)NULL)) {
-          result__ZLBH=new_lab__ARJ(lab_type__0LBH);
-          next__XLBH=(void *)((unsigned long)result__ZLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LBH)));
-          ((__POINTER *)next__XLBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YLBH)[ 0]=next__XLBH;
-        } else {
-          next__XLBH=((__POINTER *)result__ZLBH)[ 0];
-          if ((next__XLBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZLBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1LBH <<  1)) <=  4096)) {
-              next__XLBH=(void *)((unsigned long)result__ZLBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LBH)));
+              next__GYHH=new_lab__MRJ(new_size__BPEH);
+            };
+            ((__POINTER *)next__GYHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HYHH)[ 0]=next__GYHH;
+          } else {
+            ((__POINTER *)result__IYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IYHH=next__GYHH;
+          };
+        };
+        ptr__JUI=result__IYHH;
+      } else {
+        t__FPEH=((__UINTEGER_32 )typ_id__OUI);
+        a__EPEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUI + a__EPEH) & (__UINTEGER_32)(~ a__EPEH));
+        ptr_table__MYHH=((__POINTER )(&(table_type[(t__FPEH)])));
+        lab_type__OYHH=(__UINTEGER_32)(t__FPEH |  1);
+        next__LYHH=((__POINTER )(NULL));
+        result__NYHH=((__POINTER *)ptr_table__MYHH)[ 0];
+        if ((result__NYHH == (void *)NULL)) {
+          result__NYHH=new_lab__MRJ(lab_type__OYHH);
+          next__LYHH=(void *)((unsigned long)result__NYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PYHH)));
+          ((__POINTER *)next__LYHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MYHH)[ 0]=next__LYHH;
+        } else {
+          next__LYHH=((__POINTER *)result__NYHH)[ 0];
+          if ((next__LYHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PYHH <<  1)) <=  4096)) {
+              next__LYHH=(void *)((unsigned long)result__NYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PYHH)));
             } else {
-              next__XLBH=new_lab__ARJ(lab_type__0LBH);
+              next__LYHH=new_lab__MRJ(lab_type__OYHH);
             };
-            ((__POINTER *)next__XLBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YLBH)[ 0]=next__XLBH;
+            ((__POINTER *)next__LYHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MYHH)[ 0]=next__LYHH;
           } else {
-            ((__POINTER *)result__ZLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZLBH=next__XLBH;
+            ((__POINTER *)result__NYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NYHH=next__LYHH;
           };
         };
-        ptr__3TI=result__ZLBH;
+        ptr__JUI=result__NYHH;
       };
-      result__2TI=((__ITM_PROTOTYPE *)ptr__3TI);
-      *(result__2TI) = *(ITM_PROTOTYPE__);
+      result__IUI=((__ITM_PROTOTYPE *)ptr__JUI);
+      *(result__IUI) = *(ITM_PROTOTYPE__);
     };
-    ((__ITM_PROTOTYPE *)result__2TI)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__0CBD;
-    switch (((struct ___OBJ *)e__PFHC)->__id) {
+    ((__ITM_PROTOTYPE *)result__IUI)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__GDBD;
+    switch (((struct ___OBJ *)e__1FHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__DDBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__DDBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__DDBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__DDBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__DDBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__DDBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__DDBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__DDBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__DDBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__DDBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__DDBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__DDBD=position__ZC5B(e__PFHC);
+      __tmp__PDBD=position__FD5B(e__1FHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__DDBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__DDBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__DDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__DDBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__DDBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__DDBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__DDBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__DDBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__DDBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+      __tmp__PDBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__DDBD=position__ZIHC(e__PFHC);
+      __tmp__PDBD=position__FJHC(e__1FHC);
     } break;
     };
-    result__BFCD=NULL;
-    ptr__CFCD=((__POINTER )(NULL));
-    typ_id__HFCD= 0;
-    sz__EFCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-    if ((sz__EFCD ==  0)) {
-      result__BFCD=ITM_READ_ARG1__;
-    } else {
-      typ_id__HFCD=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__EFCD);
-      if ((typ_id__HFCD == (__INTEGER)(-  1))) {
-        a__ZD4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__0D4G=(__UINTEGER_32)((__UINTEGER_32)(sz__EFCD + a__ZD4G) & (__UINTEGER_32)(~ a__ZD4G));
-        ptr_table__3LBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0D4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__2LBH=((__POINTER )(NULL));
-        result__4LBH=((__POINTER *)ptr_table__3LBH)[ 0];
-        if ((result__4LBH == (void *)NULL)) {
-          result__4LBH=new_lab__ARJ(new_size__0D4G);
-          next__2LBH=(void *)((unsigned long)result__4LBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0D4G)));
-          ((__POINTER *)next__2LBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3LBH)[ 0]=next__2LBH;
-        } else {
-          next__2LBH=((__POINTER *)result__4LBH)[ 0];
-          if ((next__2LBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4LBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0D4G <<  1)) <=  4096)) {
-              next__2LBH=(void *)((unsigned long)result__4LBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0D4G)));
+    result__NFCD=NULL;
+    ptr__OFCD=((__POINTER )(NULL));
+    typ_id__TFCD= 0;
+    sz__QFCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+    if ((sz__QFCD ==  0)) {
+      result__NFCD=ITM_READ_ARG1__;
+    } else {
+      typ_id__TFCD=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QFCD);
+      if ((typ_id__TFCD == (__INTEGER)(-  1))) {
+        a__IPEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JPEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QFCD + a__IPEH) & (__UINTEGER_32)(~ a__IPEH));
+        ptr_table__RYHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JPEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QYHH=((__POINTER )(NULL));
+        result__SYHH=((__POINTER *)ptr_table__RYHH)[ 0];
+        if ((result__SYHH == (void *)NULL)) {
+          result__SYHH=new_lab__MRJ(new_size__JPEH);
+          next__QYHH=(void *)((unsigned long)result__SYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPEH)));
+          ((__POINTER *)next__QYHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RYHH)[ 0]=next__QYHH;
+        } else {
+          next__QYHH=((__POINTER *)result__SYHH)[ 0];
+          if ((next__QYHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JPEH <<  1)) <=  4096)) {
+              next__QYHH=(void *)((unsigned long)result__SYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPEH)));
             } else {
-              next__2LBH=new_lab__ARJ(new_size__0D4G);
-            };
-            ((__POINTER *)next__2LBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3LBH)[ 0]=next__2LBH;
-          } else {
-            ((__POINTER *)result__4LBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2LBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__4LBH=next__2LBH;
-          };
-        };
-        ptr__CFCD=result__4LBH;
-      } else {
-        t__4D4G=((__UINTEGER_32 )typ_id__HFCD);
-        a__3D4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__FMBH=(__UINTEGER_32)((__UINTEGER_32)(sz__EFCD + a__3D4G) & (__UINTEGER_32)(~ a__3D4G));
-        ptr_table__CMBH=((__POINTER )(&(table_type[(t__4D4G)])));
-        lab_type__EMBH=(__UINTEGER_32)(t__4D4G |  1);
-        next__BMBH=((__POINTER )(NULL));
-        result__DMBH=((__POINTER *)ptr_table__CMBH)[ 0];
-        if ((result__DMBH == (void *)NULL)) {
-          result__DMBH=new_lab__ARJ(lab_type__EMBH);
-          next__BMBH=(void *)((unsigned long)result__DMBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMBH)));
-          ((__POINTER *)next__BMBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CMBH)[ 0]=next__BMBH;
-        } else {
-          next__BMBH=((__POINTER *)result__DMBH)[ 0];
-          if ((next__BMBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DMBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FMBH <<  1)) <=  4096)) {
-              next__BMBH=(void *)((unsigned long)result__DMBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMBH)));
+              next__QYHH=new_lab__MRJ(new_size__JPEH);
+            };
+            ((__POINTER *)next__QYHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RYHH)[ 0]=next__QYHH;
+          } else {
+            ((__POINTER *)result__SYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SYHH=next__QYHH;
+          };
+        };
+        ptr__OFCD=result__SYHH;
+      } else {
+        t__NPEH=((__UINTEGER_32 )typ_id__TFCD);
+        a__MPEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__QFCD + a__MPEH) & (__UINTEGER_32)(~ a__MPEH));
+        ptr_table__WYHH=((__POINTER )(&(table_type[(t__NPEH)])));
+        lab_type__YYHH=(__UINTEGER_32)(t__NPEH |  1);
+        next__VYHH=((__POINTER )(NULL));
+        result__XYHH=((__POINTER *)ptr_table__WYHH)[ 0];
+        if ((result__XYHH == (void *)NULL)) {
+          result__XYHH=new_lab__MRJ(lab_type__YYHH);
+          next__VYHH=(void *)((unsigned long)result__XYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYHH)));
+          ((__POINTER *)next__VYHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WYHH)[ 0]=next__VYHH;
+        } else {
+          next__VYHH=((__POINTER *)result__XYHH)[ 0];
+          if ((next__VYHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZYHH <<  1)) <=  4096)) {
+              next__VYHH=(void *)((unsigned long)result__XYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYHH)));
             } else {
-              next__BMBH=new_lab__ARJ(lab_type__EMBH);
+              next__VYHH=new_lab__MRJ(lab_type__YYHH);
             };
-            ((__POINTER *)next__BMBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CMBH)[ 0]=next__BMBH;
+            ((__POINTER *)next__VYHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WYHH)[ 0]=next__VYHH;
           } else {
-            ((__POINTER *)result__DMBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DMBH=next__BMBH;
+            ((__POINTER *)result__XYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XYHH=next__VYHH;
           };
         };
-        ptr__CFCD=result__DMBH;
+        ptr__OFCD=result__XYHH;
       };
-      result__BFCD=((__ITM_READ_ARG1 *)ptr__CFCD);
-      *(result__BFCD) = *(ITM_READ_ARG1__);
+      result__NFCD=((__ITM_READ_ARG1 *)ptr__OFCD);
+      *(result__NFCD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__BFCD)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__DDBD;
+    ((__ITM_READ_ARG1 *)result__NFCD)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__PDBD;
   };
 }
 
-static __POSITION position__ZC5B(__ITM_EXPRESSION *Self__0C5B)
+static __POSITION position__FD5B(__ITM_EXPRESSION *Self__GD5B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  void *__tmp__3C5B;
-  __POSITION __tmp__4C5B;
-  __tmp__3C5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__0C5B->value_list__PJV)->parent_arrayed_collection__FTF.storage__ZXT)[ 0];
-  switch (((struct ___OBJ *)__tmp__3C5B)->__id) {
+  void *__tmp__JD5B;
+  __POSITION __tmp__KD5B;
+  __tmp__JD5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__GD5B->value_list__1JV)->parent_arrayed_collection__RTF.storage__FYT)[ 0];
+  switch (((struct ___OBJ *)__tmp__JD5B)->__id) {
   case __ITM_LIST__: {
-    __tmp__4C5B=((__ITM_LIST *)__tmp__3C5B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_LIST *)__tmp__JD5B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__4C5B=((__ITM_LDOTS *)__tmp__3C5B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_LDOTS *)__tmp__JD5B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__4C5B=((__ITM_PROTOTYPE *)__tmp__3C5B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_PROTOTYPE *)__tmp__JD5B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__4C5B=((__ITM_LIST_IDF *)__tmp__3C5B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_LIST_IDF *)__tmp__JD5B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__4C5B=((__ITM_WRITE_VALUE *)__tmp__3C5B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_WRITE_VALUE *)__tmp__JD5B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__4C5B=((__ITM_WRITE_CAST *)__tmp__3C5B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_WRITE_CAST *)__tmp__JD5B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ__: {
-    __tmp__4C5B=((__ITM_READ *)__tmp__3C5B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_READ *)__tmp__JD5B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__4C5B=((__ITM_WRITE_CODE *)__tmp__3C5B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_WRITE_CODE *)__tmp__JD5B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__4C5B=((__ITM_OPERATOR *)__tmp__3C5B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_OPERATOR *)__tmp__JD5B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__4C5B=((__ITM_READ_ARG1 *)__tmp__3C5B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_READ_ARG1 *)__tmp__JD5B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__4C5B=((__ITM_READ_ARG2 *)__tmp__3C5B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_READ_ARG2 *)__tmp__JD5B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__4C5B=position__ZC5B(__tmp__3C5B);
+    __tmp__KD5B=position__FD5B(__tmp__JD5B);
   } break;
   case __ITM_OLD__: {
-    __tmp__4C5B=((__ITM_OLD *)__tmp__3C5B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_OLD *)__tmp__JD5B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__4C5B=((__ITM_EXTERNAL_TYPE *)__tmp__3C5B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_EXTERNAL_TYPE *)__tmp__JD5B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__4C5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__3C5B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__JD5B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__4C5B=((__ITM_EXTERNAL *)__tmp__3C5B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_EXTERNAL *)__tmp__JD5B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__4C5B=((__ITM_READ_ARGS *)__tmp__3C5B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_READ_ARGS *)__tmp__JD5B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__4C5B=((__ITM_REAL *)__tmp__3C5B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_REAL *)__tmp__JD5B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__4C5B=((__ITM_NUMBER *)__tmp__3C5B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_NUMBER *)__tmp__JD5B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__4C5B=((__ITM_CHARACTER *)__tmp__3C5B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_CHARACTER *)__tmp__JD5B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__4C5B=((__ITM_STRING *)__tmp__3C5B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__KD5B=((__ITM_STRING *)__tmp__JD5B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__4C5B=position__ZIHC(__tmp__3C5B);
+    __tmp__KD5B=position__FJHC(__tmp__JD5B);
   } break;
   };
-  return(__tmp__4C5B);
+  return(__tmp__KD5B);
 }
 
-static __POSITION position__ZIHC(__ITM_RESULT *Self__0IHC)
+static __POSITION position__FJHC(__ITM_RESULT *Self__GJHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__2IHC;
-  __POSITION __tmp__3IHC;
-  __tmp__2IHC=Self__0IHC->value__ALFC;
-  switch (((struct ___OBJ *)__tmp__2IHC)->__id) {
+  void *__tmp__IJHC;
+  __POSITION __tmp__JJHC;
+  __tmp__IJHC=Self__GJHC->value__MLFC;
+  switch (((struct ___OBJ *)__tmp__IJHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__3IHC=((__ITM_LIST *)__tmp__2IHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_LIST *)__tmp__IJHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__3IHC=((__ITM_LDOTS *)__tmp__2IHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_LDOTS *)__tmp__IJHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__3IHC=((__ITM_PROTOTYPE *)__tmp__2IHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_PROTOTYPE *)__tmp__IJHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__3IHC=((__ITM_LIST_IDF *)__tmp__2IHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_LIST_IDF *)__tmp__IJHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__3IHC=((__ITM_WRITE_VALUE *)__tmp__2IHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_WRITE_VALUE *)__tmp__IJHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__3IHC=((__ITM_WRITE_CAST *)__tmp__2IHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_WRITE_CAST *)__tmp__IJHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ__: {
-    __tmp__3IHC=((__ITM_READ *)__tmp__2IHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_READ *)__tmp__IJHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__3IHC=((__ITM_WRITE_CODE *)__tmp__2IHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_WRITE_CODE *)__tmp__IJHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__3IHC=((__ITM_OPERATOR *)__tmp__2IHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_OPERATOR *)__tmp__IJHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__3IHC=((__ITM_READ_ARG1 *)__tmp__2IHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_READ_ARG1 *)__tmp__IJHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__3IHC=((__ITM_READ_ARG2 *)__tmp__2IHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_READ_ARG2 *)__tmp__IJHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__3IHC=position__ZC5B(__tmp__2IHC);
+    __tmp__JJHC=position__FD5B(__tmp__IJHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__3IHC=((__ITM_OLD *)__tmp__2IHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_OLD *)__tmp__IJHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__3IHC=((__ITM_EXTERNAL_TYPE *)__tmp__2IHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_EXTERNAL_TYPE *)__tmp__IJHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__3IHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__2IHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__IJHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__3IHC=((__ITM_EXTERNAL *)__tmp__2IHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_EXTERNAL *)__tmp__IJHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__3IHC=((__ITM_READ_ARGS *)__tmp__2IHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_READ_ARGS *)__tmp__IJHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__3IHC=((__ITM_REAL *)__tmp__2IHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_REAL *)__tmp__IJHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__3IHC=((__ITM_NUMBER *)__tmp__2IHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_NUMBER *)__tmp__IJHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__3IHC=((__ITM_CHARACTER *)__tmp__2IHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_CHARACTER *)__tmp__IJHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__3IHC=((__ITM_STRING *)__tmp__2IHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
+    __tmp__JJHC=((__ITM_STRING *)__tmp__IJHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__3IHC=position__ZIHC(__tmp__2IHC);
+    __tmp__JJHC=position__FJHC(__tmp__IJHC);
   } break;
   };
-  return(__tmp__3IHC);
+  return(__tmp__JJHC);
 }
 
-static void fast_put__to__VNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__WNGC,void *v__XNGC,void *k__YNGC)
+static void fast_put__to__BOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__COGC,void *v__DOGC,void *k__EOGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__W05G,*Self__105G;
-  __INTEGER result__V05G,__tmp__X05G,Self__Y05G,idx__AOGC,idx__NMID;
-  __INTEGER new_capacity__OMID,i__PMID,result__005G,__tmp__205G;
-  __INTEGER Self__305G,typ_id__2OID;
-  __POINTER ptr__XOID,ptr_table__HMBH,next__GMBH,result__IMBH;
-  __POINTER ptr_table__MMBH,next__LMBH,result__NMBH;
-  __UINTEGER_32 sz__ZOID,a__JD4G,new_size__KD4G,t__OD4G,a__ND4G;
-  __UINTEGER_32 new_size__PMBH,lab_type__OMBH;
-  void *node__BOGC,*node1__RMID,*node2__SMID,*__tmp__PPGC;
-  void **old_buckets__QMID;
-  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__WOID;
-  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__YETD;
-  Self__W05G=((__STRING_CONSTANT *)k__YNGC);
-  result__V05G= 0;
-  __tmp__X05G=Self__W05G->count__DD;
-  Self__Y05G= 1;
-  while ((Self__Y05G <= __tmp__X05G)) {
-    result__V05G=(__INTEGER)((__INTEGER)( 5 * result__V05G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__W05G->storage__JQO)[(__INTEGER)(Self__Y05G -  1)])));
-    Self__Y05G=(__INTEGER)(Self__Y05G +  1);
-  };
-  if ((result__V05G <  0)) {
-    result__V05G=(__INTEGER)(~ result__V05G);
-  };
-  idx__AOGC=(__INTEGER)(result__V05G % Self__WNGC->capacity__Q4BC);
-  node__BOGC=((void **)Self__WNGC->buckets__XAGC)[idx__AOGC];
-  while ((! (((void *)node__BOGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__BOGC)->key__DBGC == (void *)k__YNGC)))) {
-    node__BOGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__BOGC)->next__OBGC;
-  };
-  if (((void *)node__BOGC == (void *)NULL)) {
-    if ((Self__WNGC->capacity__Q4BC == Self__WNGC->count__CPGC)) {
-      idx__NMID= 0;
-      node1__RMID=NULL;
-      node2__SMID=NULL;
-      old_buckets__QMID=Self__WNGC->buckets__XAGC;
-      new_capacity__OMID=prime_number_ceiling__L41((__INTEGER)(Self__WNGC->capacity__Q4BC +  1));
-      Self__WNGC->buckets__XAGC=create__RQSC(new_capacity__OMID);
-      i__PMID=(__INTEGER)(Self__WNGC->capacity__Q4BC -  1);
-      Self__WNGC->capacity__Q4BC=new_capacity__OMID;
-      while ((i__PMID >=  0)) {
-        node1__RMID=((void **)old_buckets__QMID)[i__PMID];
-        while (((void *)node1__RMID != (void *)NULL)) {
-          node2__SMID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__RMID)->next__OBGC;
-          Self__105G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__RMID)->key__DBGC);
-          result__005G= 0;
-          __tmp__205G=Self__105G->count__DD;
-          Self__305G= 1;
-          while ((Self__305G <= __tmp__205G)) {
-            result__005G=(__INTEGER)((__INTEGER)( 5 * result__005G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__105G->storage__JQO)[(__INTEGER)(Self__305G -  1)])));
-            Self__305G=(__INTEGER)(Self__305G +  1);
-          };
-          if ((result__005G <  0)) {
-            result__005G=(__INTEGER)(~ result__005G);
-          };
-          idx__NMID=(__INTEGER)(result__005G % Self__WNGC->capacity__Q4BC);
-          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__RMID)->next__OBGC=((void **)Self__WNGC->buckets__XAGC)[idx__NMID];
-          ((void **)Self__WNGC->buckets__XAGC)[idx__NMID]=node1__RMID;
-          node1__RMID=node2__SMID;
-        };
-        i__PMID=(__INTEGER)(i__PMID -  1);
-      };
-      idx__AOGC=(__INTEGER)(result__V05G % new_capacity__OMID);
-    };
-    __tmp__PPGC=((void **)Self__WNGC->buckets__XAGC)[idx__AOGC];
-    result__WOID=NULL;
-    ptr__XOID=((__POINTER )(NULL));
-    typ_id__2OID= 0;
-    sz__ZOID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
-    if ((sz__ZOID ==  0)) {
-      result__WOID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
-    } else {
-      typ_id__2OID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ZOID);
-      if ((typ_id__2OID == (__INTEGER)(-  1))) {
-        a__JD4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__KD4G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZOID + a__JD4G) & (__UINTEGER_32)(~ a__JD4G));
-        ptr_table__HMBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KD4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__GMBH=((__POINTER )(NULL));
-        result__IMBH=((__POINTER *)ptr_table__HMBH)[ 0];
-        if ((result__IMBH == (void *)NULL)) {
-          result__IMBH=new_lab__ARJ(new_size__KD4G);
-          next__GMBH=(void *)((unsigned long)result__IMBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KD4G)));
-          ((__POINTER *)next__GMBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HMBH)[ 0]=next__GMBH;
-        } else {
-          next__GMBH=((__POINTER *)result__IMBH)[ 0];
-          if ((next__GMBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IMBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__KD4G <<  1)) <=  4096)) {
-              next__GMBH=(void *)((unsigned long)result__IMBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KD4G)));
+  __STRING_CONSTANT *Self__CHGH,*Self__HHGH;
+  __INTEGER result__BHGH,__tmp__DHGH,Self__EHGH,idx__MOGC,idx__ZMID;
+  __INTEGER new_capacity__0MID,i__1MID,result__GHGH,__tmp__IHGH;
+  __INTEGER Self__JHGH,typ_id__IPID;
+  __POINTER ptr__DPID,ptr_table__1YHH,next__0YHH,result__2YHH;
+  __POINTER ptr_table__AZHH,next__5YHH,result__BZHH;
+  __UINTEGER_32 sz__FPID,a__YOEH,new_size__ZOEH,t__3OEH,a__2OEH;
+  __UINTEGER_32 new_size__DZHH,lab_type__CZHH;
+  void *node__NOGC,*node1__3MID,*node2__4MID,*__tmp__1PGC;
+  void **old_buckets__2MID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__CPID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__EFTD;
+  Self__CHGH=((__STRING_CONSTANT *)k__EOGC);
+  result__BHGH= 0;
+  __tmp__DHGH=Self__CHGH->count__DD;
+  Self__EHGH= 1;
+  while ((Self__EHGH <= __tmp__DHGH)) {
+    result__BHGH=(__INTEGER)((__INTEGER)( 5 * result__BHGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CHGH->storage__VQO)[(__INTEGER)(Self__EHGH -  1)])));
+    Self__EHGH=(__INTEGER)(Self__EHGH +  1);
+  };
+  if ((result__BHGH <  0)) {
+    result__BHGH=(__INTEGER)(~ result__BHGH);
+  };
+  idx__MOGC=(__INTEGER)(result__BHGH % Self__COGC->capacity__24BC);
+  node__NOGC=((void **)Self__COGC->buckets__DBGC)[idx__MOGC];
+  while ((! (((void *)node__NOGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__NOGC)->key__PBGC == (void *)k__EOGC)))) {
+    node__NOGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__NOGC)->next__0BGC;
+  };
+  if (((void *)node__NOGC == (void *)NULL)) {
+    if ((Self__COGC->capacity__24BC == Self__COGC->count__OPGC)) {
+      idx__ZMID= 0;
+      node1__3MID=NULL;
+      node2__4MID=NULL;
+      old_buckets__2MID=Self__COGC->buckets__DBGC;
+      new_capacity__0MID=prime_number_ceiling__X41((__INTEGER)(Self__COGC->capacity__24BC +  1));
+      Self__COGC->buckets__DBGC=create__3QSC(new_capacity__0MID);
+      i__1MID=(__INTEGER)(Self__COGC->capacity__24BC -  1);
+      Self__COGC->capacity__24BC=new_capacity__0MID;
+      while ((i__1MID >=  0)) {
+        node1__3MID=((void **)old_buckets__2MID)[i__1MID];
+        while (((void *)node1__3MID != (void *)NULL)) {
+          node2__4MID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__3MID)->next__0BGC;
+          Self__HHGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__3MID)->key__PBGC);
+          result__GHGH= 0;
+          __tmp__IHGH=Self__HHGH->count__DD;
+          Self__JHGH= 1;
+          while ((Self__JHGH <= __tmp__IHGH)) {
+            result__GHGH=(__INTEGER)((__INTEGER)( 5 * result__GHGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HHGH->storage__VQO)[(__INTEGER)(Self__JHGH -  1)])));
+            Self__JHGH=(__INTEGER)(Self__JHGH +  1);
+          };
+          if ((result__GHGH <  0)) {
+            result__GHGH=(__INTEGER)(~ result__GHGH);
+          };
+          idx__ZMID=(__INTEGER)(result__GHGH % Self__COGC->capacity__24BC);
+          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__3MID)->next__0BGC=((void **)Self__COGC->buckets__DBGC)[idx__ZMID];
+          ((void **)Self__COGC->buckets__DBGC)[idx__ZMID]=node1__3MID;
+          node1__3MID=node2__4MID;
+        };
+        i__1MID=(__INTEGER)(i__1MID -  1);
+      };
+      idx__MOGC=(__INTEGER)(result__BHGH % new_capacity__0MID);
+    };
+    __tmp__1PGC=((void **)Self__COGC->buckets__DBGC)[idx__MOGC];
+    result__CPID=NULL;
+    ptr__DPID=((__POINTER )(NULL));
+    typ_id__IPID= 0;
+    sz__FPID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
+    if ((sz__FPID ==  0)) {
+      result__CPID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+    } else {
+      typ_id__IPID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FPID);
+      if ((typ_id__IPID == (__INTEGER)(-  1))) {
+        a__YOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZOEH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPID + a__YOEH) & (__UINTEGER_32)(~ a__YOEH));
+        ptr_table__1YHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZOEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__0YHH=((__POINTER )(NULL));
+        result__2YHH=((__POINTER *)ptr_table__1YHH)[ 0];
+        if ((result__2YHH == (void *)NULL)) {
+          result__2YHH=new_lab__MRJ(new_size__ZOEH);
+          next__0YHH=(void *)((unsigned long)result__2YHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOEH)));
+          ((__POINTER *)next__0YHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1YHH)[ 0]=next__0YHH;
+        } else {
+          next__0YHH=((__POINTER *)result__2YHH)[ 0];
+          if ((next__0YHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2YHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZOEH <<  1)) <=  4096)) {
+              next__0YHH=(void *)((unsigned long)result__2YHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOEH)));
             } else {
-              next__GMBH=new_lab__ARJ(new_size__KD4G);
-            };
-            ((__POINTER *)next__GMBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HMBH)[ 0]=next__GMBH;
-          } else {
-            ((__POINTER *)result__IMBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GMBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IMBH=next__GMBH;
-          };
-        };
-        ptr__XOID=result__IMBH;
-      } else {
-        t__OD4G=((__UINTEGER_32 )typ_id__2OID);
-        a__ND4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__PMBH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZOID + a__ND4G) & (__UINTEGER_32)(~ a__ND4G));
-        ptr_table__MMBH=((__POINTER )(&(table_type[(t__OD4G)])));
-        lab_type__OMBH=(__UINTEGER_32)(t__OD4G |  1);
-        next__LMBH=((__POINTER )(NULL));
-        result__NMBH=((__POINTER *)ptr_table__MMBH)[ 0];
-        if ((result__NMBH == (void *)NULL)) {
-          result__NMBH=new_lab__ARJ(lab_type__OMBH);
-          next__LMBH=(void *)((unsigned long)result__NMBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMBH)));
-          ((__POINTER *)next__LMBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MMBH)[ 0]=next__LMBH;
-        } else {
-          next__LMBH=((__POINTER *)result__NMBH)[ 0];
-          if ((next__LMBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NMBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PMBH <<  1)) <=  4096)) {
-              next__LMBH=(void *)((unsigned long)result__NMBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMBH)));
+              next__0YHH=new_lab__MRJ(new_size__ZOEH);
+            };
+            ((__POINTER *)next__0YHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1YHH)[ 0]=next__0YHH;
+          } else {
+            ((__POINTER *)result__2YHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0YHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2YHH=next__0YHH;
+          };
+        };
+        ptr__DPID=result__2YHH;
+      } else {
+        t__3OEH=((__UINTEGER_32 )typ_id__IPID);
+        a__2OEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPID + a__2OEH) & (__UINTEGER_32)(~ a__2OEH));
+        ptr_table__AZHH=((__POINTER )(&(table_type[(t__3OEH)])));
+        lab_type__CZHH=(__UINTEGER_32)(t__3OEH |  1);
+        next__5YHH=((__POINTER )(NULL));
+        result__BZHH=((__POINTER *)ptr_table__AZHH)[ 0];
+        if ((result__BZHH == (void *)NULL)) {
+          result__BZHH=new_lab__MRJ(lab_type__CZHH);
+          next__5YHH=(void *)((unsigned long)result__BZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZHH)));
+          ((__POINTER *)next__5YHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AZHH)[ 0]=next__5YHH;
+        } else {
+          next__5YHH=((__POINTER *)result__BZHH)[ 0];
+          if ((next__5YHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BZHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DZHH <<  1)) <=  4096)) {
+              next__5YHH=(void *)((unsigned long)result__BZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZHH)));
             } else {
-              next__LMBH=new_lab__ARJ(lab_type__OMBH);
+              next__5YHH=new_lab__MRJ(lab_type__CZHH);
             };
-            ((__POINTER *)next__LMBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MMBH)[ 0]=next__LMBH;
+            ((__POINTER *)next__5YHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AZHH)[ 0]=next__5YHH;
           } else {
-            ((__POINTER *)result__NMBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LMBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NMBH=next__LMBH;
+            ((__POINTER *)result__BZHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5YHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BZHH=next__5YHH;
           };
         };
-        ptr__XOID=result__NMBH;
+        ptr__DPID=result__BZHH;
       };
-      result__WOID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__XOID);
-      *(result__WOID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+      result__CPID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__DPID);
+      *(result__CPID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
     };
-    Self__YETD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__WOID);
-    Self__YETD->item__WBGC=v__XNGC;
-    Self__YETD->key__DBGC=k__YNGC;
-    Self__YETD->next__OBGC=__tmp__PPGC;
-    node__BOGC=result__WOID;
-    ((void **)Self__WNGC->buckets__XAGC)[idx__AOGC]=result__WOID;
-    Self__WNGC->count__CPGC=(__INTEGER)(Self__WNGC->count__CPGC +  1);
+    Self__EFTD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__CPID);
+    Self__EFTD->item__CCGC=v__DOGC;
+    Self__EFTD->key__PBGC=k__EOGC;
+    Self__EFTD->next__0BGC=__tmp__1PGC;
+    node__NOGC=result__CPID;
+    ((void **)Self__COGC->buckets__DBGC)[idx__MOGC]=result__CPID;
+    Self__COGC->count__OPGC=(__INTEGER)(Self__COGC->count__OPGC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__BOGC)->item__WBGC=v__XNGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__NOGC)->item__CCGC=v__DOGC;
   };
 }
 
-static void* fast_reference_at__EAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__FAGC,void *k__GAGC)
+static void* fast_reference_at__QAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__RAGC,void *k__SAGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__RAGC;
-  __STRING_CONSTANT *Self__A15G;
-  __INTEGER result__505G,__tmp__B15G,Self__C15G;
-  void *node__QAGC;
-  result__RAGC=NULL;
-  Self__A15G=((__STRING_CONSTANT *)k__GAGC);
-  result__505G= 0;
-  __tmp__B15G=Self__A15G->count__DD;
-  Self__C15G= 1;
-  while ((Self__C15G <= __tmp__B15G)) {
-    result__505G=(__INTEGER)((__INTEGER)( 5 * result__505G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__A15G->storage__JQO)[(__INTEGER)(Self__C15G -  1)])));
-    Self__C15G=(__INTEGER)(Self__C15G +  1);
-  };
-  if ((result__505G <  0)) {
-    result__505G=(__INTEGER)(~ result__505G);
-  };
-  node__QAGC=((void **)Self__FAGC->buckets__XAGC)[(__INTEGER)(result__505G % Self__FAGC->capacity__Q4BC)];
-  while ((! (((void *)node__QAGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__QAGC)->key__DBGC == (void *)k__GAGC)))) {
-    node__QAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__QAGC)->next__OBGC;
-  };
-  if (((void *)node__QAGC != (void *)NULL)) {
-    result__RAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__QAGC)->item__WBGC;
-  };
-  return(result__RAGC);
+  void *result__3AGC;
+  __STRING_CONSTANT *Self__MHGH;
+  __INTEGER result__LHGH,__tmp__NHGH,Self__OHGH;
+  void *node__2AGC;
+  result__3AGC=NULL;
+  Self__MHGH=((__STRING_CONSTANT *)k__SAGC);
+  result__LHGH= 0;
+  __tmp__NHGH=Self__MHGH->count__DD;
+  Self__OHGH= 1;
+  while ((Self__OHGH <= __tmp__NHGH)) {
+    result__LHGH=(__INTEGER)((__INTEGER)( 5 * result__LHGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MHGH->storage__VQO)[(__INTEGER)(Self__OHGH -  1)])));
+    Self__OHGH=(__INTEGER)(Self__OHGH +  1);
+  };
+  if ((result__LHGH <  0)) {
+    result__LHGH=(__INTEGER)(~ result__LHGH);
+  };
+  node__2AGC=((void **)Self__RAGC->buckets__DBGC)[(__INTEGER)(result__LHGH % Self__RAGC->capacity__24BC)];
+  while ((! (((void *)node__2AGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__2AGC)->key__PBGC == (void *)k__SAGC)))) {
+    node__2AGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__2AGC)->next__0BGC;
+  };
+  if (((void *)node__2AGC != (void *)NULL)) {
+    result__3AGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__2AGC)->item__CCGC;
+  };
+  return(result__3AGC);
 }
 
-static void* fast_reference_at__TR4D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UR4D,void *k__VR4D)
+static void* fast_reference_at__E34D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__F34D,void *k__G34D)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__E15G,__tmp__G15G,Self__H15G;
-  void *result__5R4D;
-  void *node__4R4D;
-  result__5R4D=NULL;
-  result__E15G= 0;
-  __tmp__G15G=((__STRING_CONSTANT *)k__VR4D)->count__DD;
-  Self__H15G= 1;
-  while ((Self__H15G <= __tmp__G15G)) {
-    result__E15G=(__INTEGER)((__INTEGER)( 5 * result__E15G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__VR4D)->storage__JQO)[(__INTEGER)(Self__H15G -  1)])));
-    Self__H15G=(__INTEGER)(Self__H15G +  1);
-  };
-  if ((result__E15G <  0)) {
-    result__E15G=(__INTEGER)(~ result__E15G);
-  };
-  node__4R4D=((void **)Self__UR4D->buckets__TCT)[(__INTEGER)(result__E15G % Self__UR4D->capacity__OCT)];
-  while ((! (((void *)node__4R4D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4R4D)->key__5CT == (void *)k__VR4D)))) {
-    node__4R4D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4R4D)->next__KDT;
-  };
-  if (((void *)node__4R4D != (void *)NULL)) {
-    result__5R4D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4R4D)->item__1X3;
-  };
-  return(result__5R4D);
+  __INTEGER result__QHGH,__tmp__SHGH,Self__THGH;
+  void *result__Q34D;
+  void *node__P34D;
+  result__Q34D=NULL;
+  result__QHGH= 0;
+  __tmp__SHGH=((__STRING_CONSTANT *)k__G34D)->count__DD;
+  Self__THGH= 1;
+  while ((Self__THGH <= __tmp__SHGH)) {
+    result__QHGH=(__INTEGER)((__INTEGER)( 5 * result__QHGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__G34D)->storage__VQO)[(__INTEGER)(Self__THGH -  1)])));
+    Self__THGH=(__INTEGER)(Self__THGH +  1);
+  };
+  if ((result__QHGH <  0)) {
+    result__QHGH=(__INTEGER)(~ result__QHGH);
+  };
+  node__P34D=((void **)Self__F34D->buckets__5CT)[(__INTEGER)(result__QHGH % Self__F34D->capacity__0CT)];
+  while ((! (((void *)node__P34D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__P34D)->key__LDT == (void *)k__G34D)))) {
+    node__P34D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__P34D)->next__WDT;
+  };
+  if (((void *)node__P34D != (void *)NULL)) {
+    result__Q34D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__P34D)->item__HY3;
+  };
+  return(result__Q34D);
 }
 
-static void put__to__like__QJIF(void *tok__SJIF,void *buf__TJIF,void *key__UJIF)
+static void put__to__like__PT5F(void *tok__RT5F,void *buf__ST5F,void *key__TT5F)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__AKIF,Self__EPLF;
-  void *lst__VJIF;
-  lst__VJIF=fast_reference_at__TR4D(short_dico__QD,key__UJIF);
-  if (((void *)lst__VJIF != (void *)NULL)) {
-    __tmp__AKIF=((__LINKED_LISToSTRING_CONSTANTo *)lst__VJIF)->parent_linked_collection__LD.upper__TCD;
-    Self__EPLF= 1;
-    while ((Self__EPLF <= __tmp__AKIF)) {
-      if (((void *)item__M0ND(lst__VJIF,Self__EPLF) == (void *)NULL)) {
-        append__VNS(buf__TJIF,tok__SJIF);
+  __INTEGER __tmp__5T5F,Self__2WEG;
+  void *lst__UT5F;
+  lst__UT5F=fast_reference_at__E34D(short_dico__QD,key__TT5F);
+  if (((void *)lst__UT5F != (void *)NULL)) {
+    __tmp__5T5F=((__LINKED_LISToSTRING_CONSTANTo *)lst__UT5F)->parent_linked_collection__LD.upper__5CD;
+    Self__2WEG= 1;
+    while ((Self__2WEG <= __tmp__5T5F)) {
+      if (((void *)item__Y0ND(lst__UT5F,Self__2WEG) == (void *)NULL)) {
+        append__BOS(buf__ST5F,tok__RT5F);
       } else {
-        append__VNS(buf__TJIF,item__M0ND(lst__VJIF,Self__EPLF));
+        append__BOS(buf__ST5F,item__Y0ND(lst__UT5F,Self__2WEG));
       };
-      Self__EPLF=(__INTEGER)(Self__EPLF +  1);
+      Self__2WEG=(__INTEGER)(Self__2WEG +  1);
     };
   };
 }
 
-static void shorter_in__CIIF(__ITM_ARG *Self__DIIF,void *buf__EIIF)
+static void shorter_in__QQ5F(__ITM_ARG *Self__RQ5F,void *buf__SQ5F)
 // ({ITM_ARG},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__YIIF;
-  __ITM_TYPE_PARAMETER *Self__G31G;
-  __ITM_TYPE_SIMPLE *Self__I31G;
-  __ITM_TYPE_STYLE *Self__QMBH;
-  if (((void *)Self__DIIF->name__P0HC == (void *)(&__string_58))) {
-    put__to__like__2MLF(Self__DIIF->name__P0HC,buf__EIIF,(&__string_119));
+  void *__tmp__GR5F;
+  __ITM_TYPE_PARAMETER *Self__ELCH;
+  __ITM_TYPE_SIMPLE *Self__GLCH;
+  __ITM_TYPE_STYLE *Self__EZHH;
+  if (((void *)Self__RQ5F->name__10HC == (void *)(&__string_58))) {
+    put__to__like__UUEG(Self__RQ5F->name__10HC,buf__SQ5F,(&__string_119));
   } else {
-    put__to__like__2MLF(Self__DIIF->name__P0HC,buf__EIIF,(&__string_134));
+    put__to__like__UUEG(Self__RQ5F->name__10HC,buf__SQ5F,(&__string_134));
   };
-  add_last__NLT(buf__EIIF,':');
-  __tmp__YIIF=Self__DIIF->type__Q0HC;
-  switch (((struct ___OBJ *)__tmp__YIIF)->__id) {
+  add_last__ZLT(buf__SQ5F,':');
+  __tmp__GR5F=Self__RQ5F->type__20HC;
+  switch (((struct ___OBJ *)__tmp__GR5F)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    Self__G31G=((__ITM_TYPE_PARAMETER *)__tmp__YIIF);
-    if (((void *)Self__G31G == (void *)type_self__1TN)) {
-      put__to__like__L3LF(Self__G31G->parent_itm_type__RDE.name__4XP,buf__EIIF,(&__string_126));
+    Self__ELCH=((__ITM_TYPE_PARAMETER *)__tmp__GR5F);
+    if (((void *)Self__ELCH == (void *)type_self__HUN)) {
+      put__to__like__QCFG(Self__ELCH->parent_itm_type__3DE.name__KYP,buf__SQ5F,(&__string_126));
     } else {
-      put__to__like__L3LF(Self__G31G->parent_itm_type__RDE.name__4XP,buf__EIIF,(&__string_125));
+      put__to__like__QCFG(Self__ELCH->parent_itm_type__3DE.name__KYP,buf__SQ5F,(&__string_125));
     };
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    Self__I31G=((__ITM_TYPE_SIMPLE *)__tmp__YIIF);
-    if (((void *)Self__I31G == (void *)type_self__1TN)) {
-      put__to__like__C5LF(Self__I31G->name__4XP,buf__EIIF,(&__string_126));
+    Self__GLCH=((__ITM_TYPE_SIMPLE *)__tmp__GR5F);
+    if (((void *)Self__GLCH == (void *)type_self__HUN)) {
+      put__to__like__HEFG(Self__GLCH->name__KYP,buf__SQ5F,(&__string_126));
     } else {
-      put__to__like__C5LF(Self__I31G->name__4XP,buf__EIIF,(&__string_125));
+      put__to__like__HEFG(Self__GLCH->name__KYP,buf__SQ5F,(&__string_125));
     };
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__FXJF(__tmp__YIIF,buf__EIIF);
+    shorter_in__YVBG(__tmp__GR5F,buf__SQ5F);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__NYJF(__tmp__YIIF,buf__EIIF);
+    shorter_in__AXBG(__tmp__GR5F,buf__SQ5F);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__QMBH=((__ITM_TYPE_STYLE *)__tmp__YIIF);
-    if (((void *)Self__QMBH->style__HYP != (void *)NULL)) {
-      put__to__like__HBMF(Self__QMBH->style__HYP,buf__EIIF,(&__string_119));
-      add_last__NLT(buf__EIIF,' ');
+    Self__EZHH=((__ITM_TYPE_STYLE *)__tmp__GR5F);
+    if (((void *)Self__EZHH->style__TYP != (void *)NULL)) {
+      put__to__like__MGFG(Self__EZHH->style__TYP,buf__SQ5F,(&__string_119));
+      add_last__ZLT(buf__SQ5F,' ');
     };
-    if (((void *)Self__QMBH == (void *)type_self__1TN)) {
-      put__to__like__HBMF(Self__QMBH->parent_itm_type_simple__VRN.name__4XP,buf__EIIF,(&__string_126));
+    if (((void *)Self__EZHH == (void *)type_self__HUN)) {
+      put__to__like__MGFG(Self__EZHH->parent_itm_type_simple__BSN.name__KYP,buf__SQ5F,(&__string_126));
     } else {
-      put__to__like__HBMF(Self__QMBH->parent_itm_type_simple__VRN.name__4XP,buf__EIIF,(&__string_125));
+      put__to__like__MGFG(Self__EZHH->parent_itm_type_simple__BSN.name__KYP,buf__SQ5F,(&__string_125));
     };
   } break;
   };
 }
 
-static void shorter_in__NPOF(__ITM_ARGS *Self__OPOF,void *buf__PPOF)
+static void shorter_in__HR5F(__ITM_ARGS *Self__IR5F,void *buf__JR5F)
 // ({ITM_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__XPOF,Self__ERPF;
-  void *__tmp__XQOF,*__tmp__5QOF;
-  __ITM_TYPE_PARAMETER *Self__K31G,*Self__GVJF;
-  __ITM_TYPE_SIMPLE *Self__M31G,*Self__GWJF;
-  __ITM_TYPE_STYLE *Self__SMBH,*Self__UMBH;
-  __FAST_ARRAYoSTRING_CONSTANTo *Self__VK5G;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__VE4G;
-  add_last__NLT(buf__PPOF,'(');
-  __tmp__XPOF=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__OPOF->name__QPOF)->parent_arrayed_collection__14I.upper__P5OD -  1);
-  Self__ERPF= 0;
-  while ((Self__ERPF <= __tmp__XPOF)) {
-    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__OPOF->name__QPOF)->parent_arrayed_collection__14I.storage__FCPD)[Self__ERPF] == (void *)(&__string_58))) {
-      put__to__like__VRPF(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__OPOF->name__QPOF)->parent_arrayed_collection__14I.storage__FCPD)[Self__ERPF],buf__PPOF,(&__string_119));
-    } else {
-      put__to__like__VRPF(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__OPOF->name__QPOF)->parent_arrayed_collection__14I.storage__FCPD)[Self__ERPF],buf__PPOF,(&__string_134));
-    };
-    add_last__NLT(buf__PPOF,':');
-    __tmp__XQOF=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__OPOF->type__VQOF)->list_type__UJP)->parent_arrayed_collection__NXC.storage__FMV)[Self__ERPF];
-    switch (((struct ___OBJ *)__tmp__XQOF)->__id) {
+  __INTEGER __tmp__QR5F,Self__GZBG;
+  void *__tmp__PS5F,*__tmp__XS5F;
+  __ITM_TYPE_PARAMETER *Self__ILCH,*Self__ZTBG;
+  __ITM_TYPE_SIMPLE *Self__KLCH,*Self__ZUBG;
+  __ITM_TYPE_STYLE *Self__GZHH,*Self__IZHH;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__BXFH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__KQEH;
+  add_last__ZLT(buf__JR5F,'(');
+  __tmp__QR5F=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IR5F->name__N1OF)->parent_arrayed_collection__H5I.upper__15OD -  1);
+  Self__GZBG= 0;
+  while ((Self__GZBG <= __tmp__QR5F)) {
+    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IR5F->name__N1OF)->parent_arrayed_collection__H5I.storage__RCPD)[Self__GZBG] == (void *)(&__string_58))) {
+      put__to__like__YZBG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IR5F->name__N1OF)->parent_arrayed_collection__H5I.storage__RCPD)[Self__GZBG],buf__JR5F,(&__string_119));
+    } else {
+      put__to__like__YZBG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IR5F->name__N1OF)->parent_arrayed_collection__H5I.storage__RCPD)[Self__GZBG],buf__JR5F,(&__string_134));
+    };
+    add_last__ZLT(buf__JR5F,':');
+    __tmp__PS5F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__IR5F->type__O1OF)->list_type__AKP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__GZBG];
+    switch (((struct ___OBJ *)__tmp__PS5F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      Self__K31G=((__ITM_TYPE_PARAMETER *)__tmp__XQOF);
-      if (((void *)Self__K31G == (void *)type_self__1TN)) {
-        put__to__like__L3LF(Self__K31G->parent_itm_type__RDE.name__4XP,buf__PPOF,(&__string_126));
+      Self__ILCH=((__ITM_TYPE_PARAMETER *)__tmp__PS5F);
+      if (((void *)Self__ILCH == (void *)type_self__HUN)) {
+        put__to__like__QCFG(Self__ILCH->parent_itm_type__3DE.name__KYP,buf__JR5F,(&__string_126));
       } else {
-        put__to__like__L3LF(Self__K31G->parent_itm_type__RDE.name__4XP,buf__PPOF,(&__string_125));
+        put__to__like__QCFG(Self__ILCH->parent_itm_type__3DE.name__KYP,buf__JR5F,(&__string_125));
       };
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      Self__M31G=((__ITM_TYPE_SIMPLE *)__tmp__XQOF);
-      if (((void *)Self__M31G == (void *)type_self__1TN)) {
-        put__to__like__C5LF(Self__M31G->name__4XP,buf__PPOF,(&__string_126));
+      Self__KLCH=((__ITM_TYPE_SIMPLE *)__tmp__PS5F);
+      if (((void *)Self__KLCH == (void *)type_self__HUN)) {
+        put__to__like__HEFG(Self__KLCH->name__KYP,buf__JR5F,(&__string_126));
       } else {
-        put__to__like__C5LF(Self__M31G->name__4XP,buf__PPOF,(&__string_125));
+        put__to__like__HEFG(Self__KLCH->name__KYP,buf__JR5F,(&__string_125));
       };
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__FXJF(__tmp__XQOF,buf__PPOF);
+      shorter_in__YVBG(__tmp__PS5F,buf__JR5F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__NYJF(__tmp__XQOF,buf__PPOF);
+      shorter_in__AXBG(__tmp__PS5F,buf__JR5F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__SMBH=((__ITM_TYPE_STYLE *)__tmp__XQOF);
-      if (((void *)Self__SMBH->style__HYP != (void *)NULL)) {
-        put__to__like__HBMF(Self__SMBH->style__HYP,buf__PPOF,(&__string_119));
-        add_last__NLT(buf__PPOF,' ');
+      Self__GZHH=((__ITM_TYPE_STYLE *)__tmp__PS5F);
+      if (((void *)Self__GZHH->style__TYP != (void *)NULL)) {
+        put__to__like__MGFG(Self__GZHH->style__TYP,buf__JR5F,(&__string_119));
+        add_last__ZLT(buf__JR5F,' ');
       };
-      if (((void *)Self__SMBH == (void *)type_self__1TN)) {
-        put__to__like__HBMF(Self__SMBH->parent_itm_type_simple__VRN.name__4XP,buf__PPOF,(&__string_126));
+      if (((void *)Self__GZHH == (void *)type_self__HUN)) {
+        put__to__like__MGFG(Self__GZHH->parent_itm_type_simple__BSN.name__KYP,buf__JR5F,(&__string_126));
       } else {
-        put__to__like__HBMF(Self__SMBH->parent_itm_type_simple__VRN.name__4XP,buf__PPOF,(&__string_125));
+        put__to__like__MGFG(Self__GZHH->parent_itm_type_simple__BSN.name__KYP,buf__JR5F,(&__string_125));
       };
     } break;
     };
-    add_last__NLT(buf__PPOF,',');
-    Self__ERPF=(__INTEGER)(Self__ERPF +  1);
+    add_last__ZLT(buf__JR5F,',');
+    Self__GZBG=(__INTEGER)(Self__GZBG +  1);
   };
-  Self__VK5G=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__OPOF->name__QPOF);
-  put__to__like__VRPF(((void **)Self__VK5G->parent_arrayed_collection__14I.storage__FCPD)[Self__VK5G->parent_arrayed_collection__14I.upper__P5OD],buf__PPOF,(&__string_134));
-  add_last__NLT(buf__PPOF,':');
-  Self__VE4G=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__OPOF->type__VQOF)->list_type__UJP);
-  __tmp__5QOF=((void **)Self__VE4G->parent_arrayed_collection__NXC.storage__FMV)[Self__VE4G->parent_arrayed_collection__NXC.upper__4HV];
-  switch (((struct ___OBJ *)__tmp__5QOF)->__id) {
+  Self__BXFH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__IR5F->name__N1OF);
+  put__to__like__YZBG(((void **)Self__BXFH->parent_arrayed_collection__H5I.storage__RCPD)[Self__BXFH->parent_arrayed_collection__H5I.upper__15OD],buf__JR5F,(&__string_134));
+  add_last__ZLT(buf__JR5F,':');
+  Self__KQEH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__IR5F->type__O1OF)->list_type__AKP);
+  __tmp__XS5F=((void **)Self__KQEH->parent_arrayed_collection__ZXC.storage__RMV)[Self__KQEH->parent_arrayed_collection__ZXC.upper__KIV];
+  switch (((struct ___OBJ *)__tmp__XS5F)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    Self__GVJF=((__ITM_TYPE_PARAMETER *)__tmp__5QOF);
-    if (((void *)Self__GVJF == (void *)type_self__1TN)) {
-      put__to__like__L3LF(Self__GVJF->parent_itm_type__RDE.name__4XP,buf__PPOF,(&__string_126));
+    Self__ZTBG=((__ITM_TYPE_PARAMETER *)__tmp__XS5F);
+    if (((void *)Self__ZTBG == (void *)type_self__HUN)) {
+      put__to__like__QCFG(Self__ZTBG->parent_itm_type__3DE.name__KYP,buf__JR5F,(&__string_126));
     } else {
-      put__to__like__L3LF(Self__GVJF->parent_itm_type__RDE.name__4XP,buf__PPOF,(&__string_125));
+      put__to__like__QCFG(Self__ZTBG->parent_itm_type__3DE.name__KYP,buf__JR5F,(&__string_125));
     };
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    Self__GWJF=((__ITM_TYPE_SIMPLE *)__tmp__5QOF);
-    if (((void *)Self__GWJF == (void *)type_self__1TN)) {
-      put__to__like__C5LF(Self__GWJF->name__4XP,buf__PPOF,(&__string_126));
+    Self__ZUBG=((__ITM_TYPE_SIMPLE *)__tmp__XS5F);
+    if (((void *)Self__ZUBG == (void *)type_self__HUN)) {
+      put__to__like__HEFG(Self__ZUBG->name__KYP,buf__JR5F,(&__string_126));
     } else {
-      put__to__like__C5LF(Self__GWJF->name__4XP,buf__PPOF,(&__string_125));
+      put__to__like__HEFG(Self__ZUBG->name__KYP,buf__JR5F,(&__string_125));
     };
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__FXJF(__tmp__5QOF,buf__PPOF);
+    shorter_in__YVBG(__tmp__XS5F,buf__JR5F);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__NYJF(__tmp__5QOF,buf__PPOF);
+    shorter_in__AXBG(__tmp__XS5F,buf__JR5F);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__UMBH=((__ITM_TYPE_STYLE *)__tmp__5QOF);
-    if (((void *)Self__UMBH->style__HYP != (void *)NULL)) {
-      put__to__like__HBMF(Self__UMBH->style__HYP,buf__PPOF,(&__string_119));
-      add_last__NLT(buf__PPOF,' ');
+    Self__IZHH=((__ITM_TYPE_STYLE *)__tmp__XS5F);
+    if (((void *)Self__IZHH->style__TYP != (void *)NULL)) {
+      put__to__like__MGFG(Self__IZHH->style__TYP,buf__JR5F,(&__string_119));
+      add_last__ZLT(buf__JR5F,' ');
     };
-    if (((void *)Self__UMBH == (void *)type_self__1TN)) {
-      put__to__like__HBMF(Self__UMBH->parent_itm_type_simple__VRN.name__4XP,buf__PPOF,(&__string_126));
+    if (((void *)Self__IZHH == (void *)type_self__HUN)) {
+      put__to__like__MGFG(Self__IZHH->parent_itm_type_simple__BSN.name__KYP,buf__JR5F,(&__string_126));
     } else {
-      put__to__like__HBMF(Self__UMBH->parent_itm_type_simple__VRN.name__4XP,buf__PPOF,(&__string_125));
+      put__to__like__MGFG(Self__IZHH->parent_itm_type_simple__BSN.name__KYP,buf__JR5F,(&__string_125));
     };
   } break;
   };
-  add_last__NLT(buf__PPOF,')');
+  add_last__ZLT(buf__JR5F,')');
 }
 
-static void put__to__like__L3LF(void *tok__N3LF,void *buf__O3LF,void *key__P3LF)
+static void put__to__like__QCFG(void *tok__SCFG,void *buf__TCFG,void *key__UCFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__13LF,Self__M4MF;
-  void *lst__Q3LF;
-  lst__Q3LF=fast_reference_at__TR4D(short_dico__QD,key__P3LF);
-  if (((void *)lst__Q3LF != (void *)NULL)) {
-    __tmp__13LF=((__LINKED_LISToSTRING_CONSTANTo *)lst__Q3LF)->parent_linked_collection__LD.upper__TCD;
-    Self__M4MF= 1;
-    while ((Self__M4MF <= __tmp__13LF)) {
-      if (((void *)item__M0ND(lst__Q3LF,Self__M4MF) == (void *)NULL)) {
-        append__VNS(buf__O3LF,tok__N3LF);
+  __INTEGER __tmp__ADFG,Self__5GGG;
+  void *lst__VCFG;
+  lst__VCFG=fast_reference_at__E34D(short_dico__QD,key__UCFG);
+  if (((void *)lst__VCFG != (void *)NULL)) {
+    __tmp__ADFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__VCFG)->parent_linked_collection__LD.upper__5CD;
+    Self__5GGG= 1;
+    while ((Self__5GGG <= __tmp__ADFG)) {
+      if (((void *)item__Y0ND(lst__VCFG,Self__5GGG) == (void *)NULL)) {
+        append__BOS(buf__TCFG,tok__SCFG);
       } else {
-        append__VNS(buf__O3LF,item__M0ND(lst__Q3LF,Self__M4MF));
+        append__BOS(buf__TCFG,item__Y0ND(lst__VCFG,Self__5GGG));
       };
-      Self__M4MF=(__INTEGER)(Self__M4MF +  1);
+      Self__5GGG=(__INTEGER)(Self__5GGG +  1);
     };
   };
 }
 
-static void put__to__like__C5LF(void *tok__E5LF,void *buf__F5LF,void *key__G5LF)
+static void put__to__like__HEFG(void *tok__JEFG,void *buf__KEFG,void *key__LEFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__S5LF,Self__34MF;
-  void *lst__H5LF;
-  lst__H5LF=fast_reference_at__TR4D(short_dico__QD,key__G5LF);
-  if (((void *)lst__H5LF != (void *)NULL)) {
-    __tmp__S5LF=((__LINKED_LISToSTRING_CONSTANTo *)lst__H5LF)->parent_linked_collection__LD.upper__TCD;
-    Self__34MF= 1;
-    while ((Self__34MF <= __tmp__S5LF)) {
-      if (((void *)item__M0ND(lst__H5LF,Self__34MF) == (void *)NULL)) {
-        append__VNS(buf__F5LF,tok__E5LF);
+  __INTEGER __tmp__XEFG,Self__QHGG;
+  void *lst__MEFG;
+  lst__MEFG=fast_reference_at__E34D(short_dico__QD,key__LEFG);
+  if (((void *)lst__MEFG != (void *)NULL)) {
+    __tmp__XEFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__MEFG)->parent_linked_collection__LD.upper__5CD;
+    Self__QHGG= 1;
+    while ((Self__QHGG <= __tmp__XEFG)) {
+      if (((void *)item__Y0ND(lst__MEFG,Self__QHGG) == (void *)NULL)) {
+        append__BOS(buf__KEFG,tok__JEFG);
       } else {
-        append__VNS(buf__F5LF,item__M0ND(lst__H5LF,Self__34MF));
+        append__BOS(buf__KEFG,item__Y0ND(lst__MEFG,Self__QHGG));
       };
-      Self__34MF=(__INTEGER)(Self__34MF +  1);
+      Self__QHGG=(__INTEGER)(Self__QHGG +  1);
     };
   };
 }
 
-static void shorter_raw_in__Z1KF(__ITM_TYPE_MULTI *Self__01KF,void *buf__11KF)
+static void shorter_raw_in__U1DG(__ITM_TYPE_MULTI *Self__V1DG,void *buf__W1DG)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__C2KF,Self__VPLF;
-  void *__tmp__J2KF,*__tmp__M2KF;
-  __ITM_TYPE_PARAMETER *Self__0LYG,*Self__4LYG;
-  __ITM_TYPE_SIMPLE *Self__2LYG,*Self__AMYG;
-  __ITM_TYPE_STYLE *Self__WMBH,*Self__YMBH;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__FF4G;
-  __tmp__C2KF=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__01KF->list_type__UJP)->parent_arrayed_collection__NXC.upper__4HV -  1);
-  Self__VPLF= 0;
-  while ((Self__VPLF <= __tmp__C2KF)) {
-    __tmp__J2KF=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__01KF->list_type__UJP)->parent_arrayed_collection__NXC.storage__FMV)[Self__VPLF];
-    switch (((struct ___OBJ *)__tmp__J2KF)->__id) {
+  __INTEGER __tmp__31DG,Self__NXEG;
+  void *__tmp__E2DG,*__tmp__H2DG;
+  __ITM_TYPE_PARAMETER *Self__WI4G,*Self__0I4G;
+  __ITM_TYPE_SIMPLE *Self__YI4G,*Self__2I4G;
+  __ITM_TYPE_STYLE *Self__KZHH,*Self__MZHH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__0QEH;
+  __tmp__31DG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__V1DG->list_type__AKP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
+  Self__NXEG= 0;
+  while ((Self__NXEG <= __tmp__31DG)) {
+    __tmp__E2DG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__V1DG->list_type__AKP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__NXEG];
+    switch (((struct ___OBJ *)__tmp__E2DG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      Self__0LYG=((__ITM_TYPE_PARAMETER *)__tmp__J2KF);
-      if (((void *)Self__0LYG == (void *)type_self__1TN)) {
-        put__to__like__L3LF(Self__0LYG->parent_itm_type__RDE.name__4XP,buf__11KF,(&__string_126));
+      Self__WI4G=((__ITM_TYPE_PARAMETER *)__tmp__E2DG);
+      if (((void *)Self__WI4G == (void *)type_self__HUN)) {
+        put__to__like__QCFG(Self__WI4G->parent_itm_type__3DE.name__KYP,buf__W1DG,(&__string_126));
       } else {
-        put__to__like__L3LF(Self__0LYG->parent_itm_type__RDE.name__4XP,buf__11KF,(&__string_125));
+        put__to__like__QCFG(Self__WI4G->parent_itm_type__3DE.name__KYP,buf__W1DG,(&__string_125));
       };
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      Self__2LYG=((__ITM_TYPE_SIMPLE *)__tmp__J2KF);
-      if (((void *)Self__2LYG == (void *)type_self__1TN)) {
-        put__to__like__C5LF(Self__2LYG->name__4XP,buf__11KF,(&__string_126));
+      Self__YI4G=((__ITM_TYPE_SIMPLE *)__tmp__E2DG);
+      if (((void *)Self__YI4G == (void *)type_self__HUN)) {
+        put__to__like__HEFG(Self__YI4G->name__KYP,buf__W1DG,(&__string_126));
       } else {
-        put__to__like__C5LF(Self__2LYG->name__4XP,buf__11KF,(&__string_125));
+        put__to__like__HEFG(Self__YI4G->name__KYP,buf__W1DG,(&__string_125));
       };
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__FXJF(__tmp__J2KF,buf__11KF);
+      shorter_in__YVBG(__tmp__E2DG,buf__W1DG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__NYJF(__tmp__J2KF,buf__11KF);
+      shorter_in__AXBG(__tmp__E2DG,buf__W1DG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__WMBH=((__ITM_TYPE_STYLE *)__tmp__J2KF);
-      if (((void *)Self__WMBH->style__HYP != (void *)NULL)) {
-        put__to__like__HBMF(Self__WMBH->style__HYP,buf__11KF,(&__string_119));
-        add_last__NLT(buf__11KF,' ');
+      Self__KZHH=((__ITM_TYPE_STYLE *)__tmp__E2DG);
+      if (((void *)Self__KZHH->style__TYP != (void *)NULL)) {
+        put__to__like__MGFG(Self__KZHH->style__TYP,buf__W1DG,(&__string_119));
+        add_last__ZLT(buf__W1DG,' ');
       };
-      if (((void *)Self__WMBH == (void *)type_self__1TN)) {
-        put__to__like__HBMF(Self__WMBH->parent_itm_type_simple__VRN.name__4XP,buf__11KF,(&__string_126));
+      if (((void *)Self__KZHH == (void *)type_self__HUN)) {
+        put__to__like__MGFG(Self__KZHH->parent_itm_type_simple__BSN.name__KYP,buf__W1DG,(&__string_126));
       } else {
-        put__to__like__HBMF(Self__WMBH->parent_itm_type_simple__VRN.name__4XP,buf__11KF,(&__string_125));
+        put__to__like__MGFG(Self__KZHH->parent_itm_type_simple__BSN.name__KYP,buf__W1DG,(&__string_125));
       };
     } break;
     };
-    add_last__NLT(buf__11KF,',');
-    Self__VPLF=(__INTEGER)(Self__VPLF +  1);
+    add_last__ZLT(buf__W1DG,',');
+    Self__NXEG=(__INTEGER)(Self__NXEG +  1);
   };
-  Self__FF4G=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__01KF->list_type__UJP);
-  __tmp__M2KF=((void **)Self__FF4G->parent_arrayed_collection__NXC.storage__FMV)[Self__FF4G->parent_arrayed_collection__NXC.upper__4HV];
-  switch (((struct ___OBJ *)__tmp__M2KF)->__id) {
+  Self__0QEH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__V1DG->list_type__AKP);
+  __tmp__H2DG=((void **)Self__0QEH->parent_arrayed_collection__ZXC.storage__RMV)[Self__0QEH->parent_arrayed_collection__ZXC.upper__KIV];
+  switch (((struct ___OBJ *)__tmp__H2DG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    Self__4LYG=((__ITM_TYPE_PARAMETER *)__tmp__M2KF);
-    if (((void *)Self__4LYG == (void *)type_self__1TN)) {
-      put__to__like__L3LF(Self__4LYG->parent_itm_type__RDE.name__4XP,buf__11KF,(&__string_126));
+    Self__0I4G=((__ITM_TYPE_PARAMETER *)__tmp__H2DG);
+    if (((void *)Self__0I4G == (void *)type_self__HUN)) {
+      put__to__like__QCFG(Self__0I4G->parent_itm_type__3DE.name__KYP,buf__W1DG,(&__string_126));
     } else {
-      put__to__like__L3LF(Self__4LYG->parent_itm_type__RDE.name__4XP,buf__11KF,(&__string_125));
+      put__to__like__QCFG(Self__0I4G->parent_itm_type__3DE.name__KYP,buf__W1DG,(&__string_125));
     };
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    Self__AMYG=((__ITM_TYPE_SIMPLE *)__tmp__M2KF);
-    if (((void *)Self__AMYG == (void *)type_self__1TN)) {
-      put__to__like__C5LF(Self__AMYG->name__4XP,buf__11KF,(&__string_126));
+    Self__2I4G=((__ITM_TYPE_SIMPLE *)__tmp__H2DG);
+    if (((void *)Self__2I4G == (void *)type_self__HUN)) {
+      put__to__like__HEFG(Self__2I4G->name__KYP,buf__W1DG,(&__string_126));
     } else {
-      put__to__like__C5LF(Self__AMYG->name__4XP,buf__11KF,(&__string_125));
+      put__to__like__HEFG(Self__2I4G->name__KYP,buf__W1DG,(&__string_125));
     };
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__FXJF(__tmp__M2KF,buf__11KF);
+    shorter_in__YVBG(__tmp__H2DG,buf__W1DG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__NYJF(__tmp__M2KF,buf__11KF);
+    shorter_in__AXBG(__tmp__H2DG,buf__W1DG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__YMBH=((__ITM_TYPE_STYLE *)__tmp__M2KF);
-    if (((void *)Self__YMBH->style__HYP != (void *)NULL)) {
-      put__to__like__HBMF(Self__YMBH->style__HYP,buf__11KF,(&__string_119));
-      add_last__NLT(buf__11KF,' ');
+    Self__MZHH=((__ITM_TYPE_STYLE *)__tmp__H2DG);
+    if (((void *)Self__MZHH->style__TYP != (void *)NULL)) {
+      put__to__like__MGFG(Self__MZHH->style__TYP,buf__W1DG,(&__string_119));
+      add_last__ZLT(buf__W1DG,' ');
     };
-    if (((void *)Self__YMBH == (void *)type_self__1TN)) {
-      put__to__like__HBMF(Self__YMBH->parent_itm_type_simple__VRN.name__4XP,buf__11KF,(&__string_126));
+    if (((void *)Self__MZHH == (void *)type_self__HUN)) {
+      put__to__like__MGFG(Self__MZHH->parent_itm_type_simple__BSN.name__KYP,buf__W1DG,(&__string_126));
     } else {
-      put__to__like__HBMF(Self__YMBH->parent_itm_type_simple__VRN.name__4XP,buf__11KF,(&__string_125));
+      put__to__like__MGFG(Self__MZHH->parent_itm_type_simple__BSN.name__KYP,buf__W1DG,(&__string_125));
     };
   } break;
   };
 }
 
-static void shorter_in__FXJF(__ITM_TYPE_BLOCK *Self__GXJF,void *buf__HXJF)
+static void shorter_in__YVBG(__ITM_TYPE_BLOCK *Self__ZVBG,void *buf__0VBG)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *typ_mul__IXJF,*__tmp__2XJF;
-  void *__tmp__RXJF,*__tmp__1XJF,*__tmp__CYJF;
-  __ITM_TYPE_PARAMETER *Self__CMYG,*Self__GMYG;
-  __ITM_TYPE_SIMPLE *Self__EMYG,*Self__IMYG;
-  __ITM_TYPE_MULTI *Self__X3QG,*Self__Z3QG;
-  __ITM_TYPE_STYLE *Self__0MBH,*Self__2MBH;
-  typ_mul__IXJF=NULL;
-  put__to__like__3WKF((&__string_285),buf__HXJF);
-  if (((void *)Self__GXJF->type_argument__KMN != (void *)NULL)) {
-    __tmp__RXJF=Self__GXJF->type_argument__KMN;
-    switch (((struct ___OBJ *)__tmp__RXJF)->__id) {
+  void *typ_mul__1VBG,*__tmp__PWBG;
+  void *__tmp__EWBG,*__tmp__OWBG,*__tmp__VWBG;
+  __ITM_TYPE_PARAMETER *Self__4I4G,*Self__CJ4G;
+  __ITM_TYPE_SIMPLE *Self__AJ4G,*Self__EJ4G;
+  __ITM_TYPE_MULTI *Self__HRWG,*Self__JRWG;
+  __ITM_TYPE_STYLE *Self__OZHH,*Self__QZHH;
+  typ_mul__1VBG=NULL;
+  put__to__like__GWDG((&__string_295),buf__0VBG);
+  if (((void *)Self__ZVBG->type_argument__WMN != (void *)NULL)) {
+    __tmp__EWBG=Self__ZVBG->type_argument__WMN;
+    switch (((struct ___OBJ *)__tmp__EWBG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      Self__CMYG=((__ITM_TYPE_PARAMETER *)__tmp__RXJF);
-      if (((void *)Self__CMYG == (void *)type_self__1TN)) {
-        put__to__like__L3LF(Self__CMYG->parent_itm_type__RDE.name__4XP,buf__HXJF,(&__string_126));
+      Self__4I4G=((__ITM_TYPE_PARAMETER *)__tmp__EWBG);
+      if (((void *)Self__4I4G == (void *)type_self__HUN)) {
+        put__to__like__QCFG(Self__4I4G->parent_itm_type__3DE.name__KYP,buf__0VBG,(&__string_126));
       } else {
-        put__to__like__L3LF(Self__CMYG->parent_itm_type__RDE.name__4XP,buf__HXJF,(&__string_125));
+        put__to__like__QCFG(Self__4I4G->parent_itm_type__3DE.name__KYP,buf__0VBG,(&__string_125));
       };
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      Self__EMYG=((__ITM_TYPE_SIMPLE *)__tmp__RXJF);
-      if (((void *)Self__EMYG == (void *)type_self__1TN)) {
-        put__to__like__C5LF(Self__EMYG->name__4XP,buf__HXJF,(&__string_126));
+      Self__AJ4G=((__ITM_TYPE_SIMPLE *)__tmp__EWBG);
+      if (((void *)Self__AJ4G == (void *)type_self__HUN)) {
+        put__to__like__HEFG(Self__AJ4G->name__KYP,buf__0VBG,(&__string_126));
       } else {
-        put__to__like__C5LF(Self__EMYG->name__4XP,buf__HXJF,(&__string_125));
+        put__to__like__HEFG(Self__AJ4G->name__KYP,buf__0VBG,(&__string_125));
       };
     } break;
     case __ITM_TYPE_MULTI__: {
-      Self__X3QG=((__ITM_TYPE_MULTI *)__tmp__RXJF);
-      add_last__NLT(buf__HXJF,'(');
-      shorter_raw_in__Z1KF(Self__X3QG,buf__HXJF);
-      add_last__NLT(buf__HXJF,')');
+      Self__HRWG=((__ITM_TYPE_MULTI *)__tmp__EWBG);
+      add_last__ZLT(buf__0VBG,'(');
+      shorter_raw_in__U1DG(Self__HRWG,buf__0VBG);
+      add_last__ZLT(buf__0VBG,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__FXJF(__tmp__RXJF,buf__HXJF);
+      shorter_in__YVBG(__tmp__EWBG,buf__0VBG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__NYJF(__tmp__RXJF,buf__HXJF);
+      shorter_in__AXBG(__tmp__EWBG,buf__0VBG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__0MBH=((__ITM_TYPE_STYLE *)__tmp__RXJF);
-      if (((void *)Self__0MBH->style__HYP != (void *)NULL)) {
-        put__to__like__HBMF(Self__0MBH->style__HYP,buf__HXJF,(&__string_119));
-        add_last__NLT(buf__HXJF,' ');
+      Self__OZHH=((__ITM_TYPE_STYLE *)__tmp__EWBG);
+      if (((void *)Self__OZHH->style__TYP != (void *)NULL)) {
+        put__to__like__MGFG(Self__OZHH->style__TYP,buf__0VBG,(&__string_119));
+        add_last__ZLT(buf__0VBG,' ');
       };
-      if (((void *)Self__0MBH == (void *)type_self__1TN)) {
-        put__to__like__HBMF(Self__0MBH->parent_itm_type_simple__VRN.name__4XP,buf__HXJF,(&__string_126));
+      if (((void *)Self__OZHH == (void *)type_self__HUN)) {
+        put__to__like__MGFG(Self__OZHH->parent_itm_type_simple__BSN.name__KYP,buf__0VBG,(&__string_126));
       } else {
-        put__to__like__HBMF(Self__0MBH->parent_itm_type_simple__VRN.name__4XP,buf__HXJF,(&__string_125));
+        put__to__like__MGFG(Self__OZHH->parent_itm_type_simple__BSN.name__KYP,buf__0VBG,(&__string_125));
       };
     } break;
     };
-    add_last__NLT(buf__HXJF,';');
-    add_last__NLT(buf__HXJF,' ');
+    add_last__ZLT(buf__0VBG,';');
+    add_last__ZLT(buf__0VBG,' ');
   };
-  if (((void *)Self__GXJF->type_result__UMN != (void *)NULL)) {
-    __tmp__1XJF=Self__GXJF->type_result__UMN;
-    if (__tmp__1XJF==NULL) {
-      __tmp__2XJF=NULL;
+  if (((void *)Self__ZVBG->type_result__ANN != (void *)NULL)) {
+    __tmp__OWBG=Self__ZVBG->type_result__ANN;
+    if (__tmp__OWBG==NULL) {
+      __tmp__PWBG=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__1XJF)->__id) {
+      switch (((struct ___OBJ *)__tmp__OWBG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__2XJF=NULL;
+        __tmp__PWBG=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__2XJF=NULL;
+        __tmp__PWBG=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__2XJF=((void *)__tmp__1XJF);
+        __tmp__PWBG=((void *)__tmp__OWBG);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__2XJF=NULL;
+        __tmp__PWBG=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__2XJF=NULL;
+        __tmp__PWBG=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__2XJF=NULL;
+        __tmp__PWBG=NULL;
       } break;
       }
     };
-    typ_mul__IXJF=__tmp__2XJF;
-    if (((void *)__tmp__2XJF == (void *)NULL)) {
-      __tmp__CYJF=Self__GXJF->type_result__UMN;
-      switch (((struct ___OBJ *)__tmp__CYJF)->__id) {
+    typ_mul__1VBG=__tmp__PWBG;
+    if (((void *)__tmp__PWBG == (void *)NULL)) {
+      __tmp__VWBG=Self__ZVBG->type_result__ANN;
+      switch (((struct ___OBJ *)__tmp__VWBG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        Self__GMYG=((__ITM_TYPE_PARAMETER *)__tmp__CYJF);
-        if (((void *)Self__GMYG == (void *)type_self__1TN)) {
-          put__to__like__L3LF(Self__GMYG->parent_itm_type__RDE.name__4XP,buf__HXJF,(&__string_126));
+        Self__CJ4G=((__ITM_TYPE_PARAMETER *)__tmp__VWBG);
+        if (((void *)Self__CJ4G == (void *)type_self__HUN)) {
+          put__to__like__QCFG(Self__CJ4G->parent_itm_type__3DE.name__KYP,buf__0VBG,(&__string_126));
         } else {
-          put__to__like__L3LF(Self__GMYG->parent_itm_type__RDE.name__4XP,buf__HXJF,(&__string_125));
+          put__to__like__QCFG(Self__CJ4G->parent_itm_type__3DE.name__KYP,buf__0VBG,(&__string_125));
         };
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        Self__IMYG=((__ITM_TYPE_SIMPLE *)__tmp__CYJF);
-        if (((void *)Self__IMYG == (void *)type_self__1TN)) {
-          put__to__like__C5LF(Self__IMYG->name__4XP,buf__HXJF,(&__string_126));
+        Self__EJ4G=((__ITM_TYPE_SIMPLE *)__tmp__VWBG);
+        if (((void *)Self__EJ4G == (void *)type_self__HUN)) {
+          put__to__like__HEFG(Self__EJ4G->name__KYP,buf__0VBG,(&__string_126));
         } else {
-          put__to__like__C5LF(Self__IMYG->name__4XP,buf__HXJF,(&__string_125));
+          put__to__like__HEFG(Self__EJ4G->name__KYP,buf__0VBG,(&__string_125));
         };
       } break;
       case __ITM_TYPE_MULTI__: {
-        Self__Z3QG=((__ITM_TYPE_MULTI *)__tmp__CYJF);
-        add_last__NLT(buf__HXJF,'(');
-        shorter_raw_in__Z1KF(Self__Z3QG,buf__HXJF);
-        add_last__NLT(buf__HXJF,')');
+        Self__JRWG=((__ITM_TYPE_MULTI *)__tmp__VWBG);
+        add_last__ZLT(buf__0VBG,'(');
+        shorter_raw_in__U1DG(Self__JRWG,buf__0VBG);
+        add_last__ZLT(buf__0VBG,')');
       } break;
       case __ITM_TYPE_BLOCK__: {
-        shorter_in__FXJF(__tmp__CYJF,buf__HXJF);
+        shorter_in__YVBG(__tmp__VWBG,buf__0VBG);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        shorter_in__NYJF(__tmp__CYJF,buf__HXJF);
+        shorter_in__AXBG(__tmp__VWBG,buf__0VBG);
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__2MBH=((__ITM_TYPE_STYLE *)__tmp__CYJF);
-        if (((void *)Self__2MBH->style__HYP != (void *)NULL)) {
-          put__to__like__HBMF(Self__2MBH->style__HYP,buf__HXJF,(&__string_119));
-          add_last__NLT(buf__HXJF,' ');
+        Self__QZHH=((__ITM_TYPE_STYLE *)__tmp__VWBG);
+        if (((void *)Self__QZHH->style__TYP != (void *)NULL)) {
+          put__to__like__MGFG(Self__QZHH->style__TYP,buf__0VBG,(&__string_119));
+          add_last__ZLT(buf__0VBG,' ');
         };
-        if (((void *)Self__2MBH == (void *)type_self__1TN)) {
-          put__to__like__HBMF(Self__2MBH->parent_itm_type_simple__VRN.name__4XP,buf__HXJF,(&__string_126));
+        if (((void *)Self__QZHH == (void *)type_self__HUN)) {
+          put__to__like__MGFG(Self__QZHH->parent_itm_type_simple__BSN.name__KYP,buf__0VBG,(&__string_126));
         } else {
-          put__to__like__HBMF(Self__2MBH->parent_itm_type_simple__VRN.name__4XP,buf__HXJF,(&__string_125));
+          put__to__like__MGFG(Self__QZHH->parent_itm_type_simple__BSN.name__KYP,buf__0VBG,(&__string_125));
         };
       } break;
       };
     } else {
-      shorter_raw_in__Z1KF(__tmp__2XJF,buf__HXJF);
+      shorter_raw_in__U1DG(__tmp__PWBG,buf__0VBG);
     };
   };
-  put__to__like__3WKF((&__string_286),buf__HXJF);
+  put__to__like__GWDG((&__string_296),buf__0VBG);
 }
 
-static void shorter_in__NYJF(__ITM_TYPE_GENERIC *Self__OYJF,void *buf__PYJF)
+static void shorter_in__AXBG(__ITM_TYPE_GENERIC *Self__BXBG,void *buf__CXBG)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__EZJF,Self__U0KF;
-  void *__tmp__LZJF,*__tmp__OZJF;
-  __ITM_TYPE_PARAMETER *Self__KMYG,*Self__OMYG;
-  __ITM_TYPE_SIMPLE *Self__MMYG,*Self__QMYG;
-  __ITM_TYPE_STYLE *Self__4MBH,*Self__QZJF;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__NCRB;
-  if (((void *)Self__OYJF->parent_itm_type_style__WRN.style__HYP != (void *)NULL)) {
-    put__to__like__JZKF(Self__OYJF->parent_itm_type_style__WRN.style__HYP,buf__PYJF,(&__string_119));
-    add_last__NLT(buf__PYJF,' ');
-  };
-  put__to__like__JZKF(Self__OYJF->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_125));
-  add_last__NLT(buf__PYJF,'(');
-  __tmp__EZJF=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__OYJF->list_type__RYP)->parent_arrayed_collection__NXC.upper__4HV -  1);
-  Self__U0KF= 0;
-  while ((Self__U0KF <= __tmp__EZJF)) {
-    __tmp__LZJF=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__OYJF->list_type__RYP)->parent_arrayed_collection__NXC.storage__FMV)[Self__U0KF];
-    switch (((struct ___OBJ *)__tmp__LZJF)->__id) {
+  __INTEGER __tmp__XXBG,Self__3ZDG;
+  void *__tmp__4XBG,*__tmp__BYBG;
+  __ITM_TYPE_PARAMETER *Self__GJ4G,*Self__KJ4G;
+  __ITM_TYPE_SIMPLE *Self__IJ4G,*Self__MJ4G;
+  __ITM_TYPE_STYLE *Self__SZHH,*Self__DYBG;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__ZCRB;
+  if (((void *)Self__BXBG->parent_itm_type_style__CSN.style__TYP != (void *)NULL)) {
+    put__to__like__SYDG(Self__BXBG->parent_itm_type_style__CSN.style__TYP,buf__CXBG,(&__string_119));
+    add_last__ZLT(buf__CXBG,' ');
+  };
+  put__to__like__SYDG(Self__BXBG->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP,buf__CXBG,(&__string_125));
+  add_last__ZLT(buf__CXBG,'(');
+  __tmp__XXBG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__BXBG->list_type__3YP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
+  Self__3ZDG= 0;
+  while ((Self__3ZDG <= __tmp__XXBG)) {
+    __tmp__4XBG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__BXBG->list_type__3YP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__3ZDG];
+    switch (((struct ___OBJ *)__tmp__4XBG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      Self__KMYG=((__ITM_TYPE_PARAMETER *)__tmp__LZJF);
-      if (((void *)Self__KMYG == (void *)type_self__1TN)) {
-        put__to__like__L3LF(Self__KMYG->parent_itm_type__RDE.name__4XP,buf__PYJF,(&__string_126));
+      Self__GJ4G=((__ITM_TYPE_PARAMETER *)__tmp__4XBG);
+      if (((void *)Self__GJ4G == (void *)type_self__HUN)) {
+        put__to__like__QCFG(Self__GJ4G->parent_itm_type__3DE.name__KYP,buf__CXBG,(&__string_126));
       } else {
-        put__to__like__L3LF(Self__KMYG->parent_itm_type__RDE.name__4XP,buf__PYJF,(&__string_125));
+        put__to__like__QCFG(Self__GJ4G->parent_itm_type__3DE.name__KYP,buf__CXBG,(&__string_125));
       };
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      Self__MMYG=((__ITM_TYPE_SIMPLE *)__tmp__LZJF);
-      if (((void *)Self__MMYG == (void *)type_self__1TN)) {
-        put__to__like__C5LF(Self__MMYG->name__4XP,buf__PYJF,(&__string_126));
+      Self__IJ4G=((__ITM_TYPE_SIMPLE *)__tmp__4XBG);
+      if (((void *)Self__IJ4G == (void *)type_self__HUN)) {
+        put__to__like__HEFG(Self__IJ4G->name__KYP,buf__CXBG,(&__string_126));
       } else {
-        put__to__like__C5LF(Self__MMYG->name__4XP,buf__PYJF,(&__string_125));
+        put__to__like__HEFG(Self__IJ4G->name__KYP,buf__CXBG,(&__string_125));
       };
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__FXJF(__tmp__LZJF,buf__PYJF);
+      shorter_in__YVBG(__tmp__4XBG,buf__CXBG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__NYJF(__tmp__LZJF,buf__PYJF);
+      shorter_in__AXBG(__tmp__4XBG,buf__CXBG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__4MBH=((__ITM_TYPE_STYLE *)__tmp__LZJF);
-      if (((void *)Self__4MBH->style__HYP != (void *)NULL)) {
-        put__to__like__HBMF(Self__4MBH->style__HYP,buf__PYJF,(&__string_119));
-        add_last__NLT(buf__PYJF,' ');
+      Self__SZHH=((__ITM_TYPE_STYLE *)__tmp__4XBG);
+      if (((void *)Self__SZHH->style__TYP != (void *)NULL)) {
+        put__to__like__MGFG(Self__SZHH->style__TYP,buf__CXBG,(&__string_119));
+        add_last__ZLT(buf__CXBG,' ');
       };
-      if (((void *)Self__4MBH == (void *)type_self__1TN)) {
-        put__to__like__HBMF(Self__4MBH->parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_126));
+      if (((void *)Self__SZHH == (void *)type_self__HUN)) {
+        put__to__like__MGFG(Self__SZHH->parent_itm_type_simple__BSN.name__KYP,buf__CXBG,(&__string_126));
       } else {
-        put__to__like__HBMF(Self__4MBH->parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_125));
+        put__to__like__MGFG(Self__SZHH->parent_itm_type_simple__BSN.name__KYP,buf__CXBG,(&__string_125));
       };
     } break;
     };
-    add_last__NLT(buf__PYJF,',');
-    Self__U0KF=(__INTEGER)(Self__U0KF +  1);
+    add_last__ZLT(buf__CXBG,',');
+    Self__3ZDG=(__INTEGER)(Self__3ZDG +  1);
   };
-  Self__NCRB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__OYJF->list_type__RYP);
-  __tmp__OZJF=((void **)Self__NCRB->parent_arrayed_collection__NXC.storage__FMV)[Self__NCRB->parent_arrayed_collection__NXC.upper__4HV];
-  switch (((struct ___OBJ *)__tmp__OZJF)->__id) {
+  Self__ZCRB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__BXBG->list_type__3YP);
+  __tmp__BYBG=((void **)Self__ZCRB->parent_arrayed_collection__ZXC.storage__RMV)[Self__ZCRB->parent_arrayed_collection__ZXC.upper__KIV];
+  switch (((struct ___OBJ *)__tmp__BYBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    Self__OMYG=((__ITM_TYPE_PARAMETER *)__tmp__OZJF);
-    if (((void *)Self__OMYG == (void *)type_self__1TN)) {
-      put__to__like__L3LF(Self__OMYG->parent_itm_type__RDE.name__4XP,buf__PYJF,(&__string_126));
+    Self__KJ4G=((__ITM_TYPE_PARAMETER *)__tmp__BYBG);
+    if (((void *)Self__KJ4G == (void *)type_self__HUN)) {
+      put__to__like__QCFG(Self__KJ4G->parent_itm_type__3DE.name__KYP,buf__CXBG,(&__string_126));
     } else {
-      put__to__like__L3LF(Self__OMYG->parent_itm_type__RDE.name__4XP,buf__PYJF,(&__string_125));
+      put__to__like__QCFG(Self__KJ4G->parent_itm_type__3DE.name__KYP,buf__CXBG,(&__string_125));
     };
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    Self__QMYG=((__ITM_TYPE_SIMPLE *)__tmp__OZJF);
-    if (((void *)Self__QMYG == (void *)type_self__1TN)) {
-      put__to__like__C5LF(Self__QMYG->name__4XP,buf__PYJF,(&__string_126));
+    Self__MJ4G=((__ITM_TYPE_SIMPLE *)__tmp__BYBG);
+    if (((void *)Self__MJ4G == (void *)type_self__HUN)) {
+      put__to__like__HEFG(Self__MJ4G->name__KYP,buf__CXBG,(&__string_126));
     } else {
-      put__to__like__C5LF(Self__QMYG->name__4XP,buf__PYJF,(&__string_125));
+      put__to__like__HEFG(Self__MJ4G->name__KYP,buf__CXBG,(&__string_125));
     };
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__FXJF(__tmp__OZJF,buf__PYJF);
+    shorter_in__YVBG(__tmp__BYBG,buf__CXBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__NYJF(__tmp__OZJF,buf__PYJF);
+    shorter_in__AXBG(__tmp__BYBG,buf__CXBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__QZJF=((__ITM_TYPE_STYLE *)__tmp__OZJF);
-    if (((void *)Self__QZJF->style__HYP != (void *)NULL)) {
-      put__to__like__HBMF(Self__QZJF->style__HYP,buf__PYJF,(&__string_119));
-      add_last__NLT(buf__PYJF,' ');
+    Self__DYBG=((__ITM_TYPE_STYLE *)__tmp__BYBG);
+    if (((void *)Self__DYBG->style__TYP != (void *)NULL)) {
+      put__to__like__MGFG(Self__DYBG->style__TYP,buf__CXBG,(&__string_119));
+      add_last__ZLT(buf__CXBG,' ');
     };
-    if (((void *)Self__QZJF == (void *)type_self__1TN)) {
-      put__to__like__HBMF(Self__QZJF->parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_126));
+    if (((void *)Self__DYBG == (void *)type_self__HUN)) {
+      put__to__like__MGFG(Self__DYBG->parent_itm_type_simple__BSN.name__KYP,buf__CXBG,(&__string_126));
     } else {
-      put__to__like__HBMF(Self__QZJF->parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_125));
+      put__to__like__MGFG(Self__DYBG->parent_itm_type_simple__BSN.name__KYP,buf__CXBG,(&__string_125));
     };
   } break;
   };
-  add_last__NLT(buf__PYJF,')');
+  add_last__ZLT(buf__CXBG,')');
 }
 
-static void put__to__like__HBMF(void *tok__JBMF,void *buf__KBMF,void *key__LBMF)
+static void put__to__like__MGFG(void *tok__OGFG,void *buf__PGFG,void *key__QGFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__XBMF,Self__O5MF;
-  void *lst__MBMF;
-  lst__MBMF=fast_reference_at__TR4D(short_dico__QD,key__LBMF);
-  if (((void *)lst__MBMF != (void *)NULL)) {
-    __tmp__XBMF=((__LINKED_LISToSTRING_CONSTANTo *)lst__MBMF)->parent_linked_collection__LD.upper__TCD;
-    Self__O5MF= 1;
-    while ((Self__O5MF <= __tmp__XBMF)) {
-      if (((void *)item__M0ND(lst__MBMF,Self__O5MF) == (void *)NULL)) {
-        append__VNS(buf__KBMF,tok__JBMF);
+  __INTEGER __tmp__2GFG,Self__BIGG;
+  void *lst__RGFG;
+  lst__RGFG=fast_reference_at__E34D(short_dico__QD,key__QGFG);
+  if (((void *)lst__RGFG != (void *)NULL)) {
+    __tmp__2GFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__RGFG)->parent_linked_collection__LD.upper__5CD;
+    Self__BIGG= 1;
+    while ((Self__BIGG <= __tmp__2GFG)) {
+      if (((void *)item__Y0ND(lst__RGFG,Self__BIGG) == (void *)NULL)) {
+        append__BOS(buf__PGFG,tok__OGFG);
       } else {
-        append__VNS(buf__KBMF,item__M0ND(lst__MBMF,Self__O5MF));
+        append__BOS(buf__PGFG,item__Y0ND(lst__RGFG,Self__BIGG));
       };
-      Self__O5MF=(__INTEGER)(Self__O5MF +  1);
+      Self__BIGG=(__INTEGER)(Self__BIGG +  1);
     };
   };
 }
 
-static void put__to__like__B1JF(void *tok__D1JF,void *buf__E1JF,void *key__F1JF)
-// ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
+static void put__to__like__X1BG(void *tok__Z1BG,void *buf__01BG,void *key__11BG)
+// ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__R1JF,Self__QDMF;
-  void *lst__G1JF;
-  lst__G1JF=fast_reference_at__TR4D(short_dico__QD,key__F1JF);
-  if (((void *)lst__G1JF != (void *)NULL)) {
-    __tmp__R1JF=((__LINKED_LISToSTRING_CONSTANTo *)lst__G1JF)->parent_linked_collection__LD.upper__TCD;
-    Self__QDMF= 1;
-    while ((Self__QDMF <= __tmp__R1JF)) {
-      if (((void *)item__M0ND(lst__G1JF,Self__QDMF) == (void *)NULL)) {
-        append__VNS(buf__E1JF,tok__D1JF);
+  __INTEGER __tmp__H2BG,Self__IJFG;
+  void *lst__21BG;
+  lst__21BG=fast_reference_at__E34D(short_dico__QD,key__11BG);
+  if (((void *)lst__21BG != (void *)NULL)) {
+    __tmp__H2BG=((__LINKED_LISToSTRING_CONSTANTo *)lst__21BG)->parent_linked_collection__LD.upper__5CD;
+    Self__IJFG= 1;
+    while ((Self__IJFG <= __tmp__H2BG)) {
+      if (((void *)item__Y0ND(lst__21BG,Self__IJFG) == (void *)NULL)) {
+        append__BOS(buf__01BG,tok__Z1BG);
       } else {
-        append__VNS(buf__E1JF,item__M0ND(lst__G1JF,Self__QDMF));
+        append__BOS(buf__01BG,item__Y0ND(lst__21BG,Self__IJFG));
       };
-      Self__QDMF=(__INTEGER)(Self__QDMF +  1);
+      Self__IJFG=(__INTEGER)(Self__IJFG +  1);
     };
   };
 }
 
-static void set_path__CNT(__DIRECTORY_UNIX *Self__DNT,void *n__ENT)
+static void set_path__ONT(__DIRECTORY_UNIX *Self__PNT,void *n__QNT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *result__J15G,*Self__131G,*Self__431G,*result__R15G;
-  __STRING_CONSTANT *Self__UOLG;
-  __POINTER ptr__K15G,ptr_table__BNBH,next__ANBH,result__CNBH;
-  __POINTER ptr_table__GNBH,next__FNBH,result__HNBH,ptr__S15G;
-  __POINTER ptr_table__LNBH,next__KNBH,result__MNBH,ptr_table__QNBH;
-  __POINTER next__PNBH,result__RNBH,ptr__AQYG;
-  __INTEGER typ_id__L15G,c__331G,Self__RG4G,idx__YK5G,idx__FNT;
-  __INTEGER typ_id__T15G,__tmp__1NT;
-  __UINTEGER_32 sz__M15G,a__N15G,new_size__O15G,t__P15G,a__Q15G;
-  __UINTEGER_32 new_size__JNBH,lab_type__INBH,sz__U15G,a__V15G;
-  __UINTEGER_32 new_size__W15G,t__X15G,a__Y15G,new_size__TNBH;
-  __UINTEGER_32 lab_type__SNBH;
-  void *__tmp__TNT;
-  __CHARACTER *Self__SG4G,*model__TG4G,*Self__0K5G,*__tmp__XNT;
-  result__J15G=NULL;
-  ptr__K15G=((__POINTER )(NULL));
-  typ_id__L15G= 0;
-  sz__M15G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-  if ((sz__M15G ==  0)) {
-    result__J15G=STRING_CONSTANT__;
+  __STRING_CONSTANT *result__VHGH,*Self__ZLCH,*Self__2LCH,*result__3HGH;
+  __STRING_CONSTANT *Self__1ZQG;
+  __POINTER ptr__WHGH,ptr_table__VZHH,next__UZHH,result__WZHH;
+  __POINTER ptr_table__0ZHH,next__ZZHH,result__1ZHH,ptr__4HGH;
+  __POINTER ptr_table__5ZHH,next__4ZHH,result__A0HH,ptr_table__E0HH;
+  __POINTER next__D0HH,result__F0HH,ptr__5M4G;
+  __INTEGER typ_id__XHGH,c__1LCH,Self__GSEH,idx__EXFH,idx__RNT;
+  __INTEGER typ_id__5HGH,__tmp__HOT;
+  __UINTEGER_32 sz__YHGH,a__ZHGH,new_size__0HGH,t__1HGH,a__2HGH;
+  __UINTEGER_32 new_size__3ZHH,lab_type__2ZHH,sz__AIGH,a__BIGH;
+  __UINTEGER_32 new_size__CIGH,t__DIGH,a__EIGH,new_size__H0HH;
+  __UINTEGER_32 lab_type__G0HH;
+  void *__tmp__5NT;
+  __CHARACTER *Self__HSEH,*model__ISEH,*Self__GXFH,*__tmp__DOT;
+  result__VHGH=NULL;
+  ptr__WHGH=((__POINTER )(NULL));
+  typ_id__XHGH= 0;
+  sz__YHGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__YHGH ==  0)) {
+    result__VHGH=STRING_CONSTANT__;
   } else {
-    typ_id__L15G=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M15G);
-    if ((typ_id__L15G == (__INTEGER)(-  1))) {
-      a__N15G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__O15G=(__UINTEGER_32)((__UINTEGER_32)(sz__M15G + a__N15G) & (__UINTEGER_32)(~ a__N15G));
-      ptr_table__BNBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O15G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ANBH=((__POINTER )(NULL));
-      result__CNBH=((__POINTER *)ptr_table__BNBH)[ 0];
-      if ((result__CNBH == (void *)NULL)) {
-        result__CNBH=new_lab__ARJ(new_size__O15G);
-        next__ANBH=(void *)((unsigned long)result__CNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O15G)));
-        ((__POINTER *)next__ANBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BNBH)[ 0]=next__ANBH;
-      } else {
-        next__ANBH=((__POINTER *)result__CNBH)[ 0];
-        if ((next__ANBH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CNBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__O15G <<  1)) <=  4096)) {
-            next__ANBH=(void *)((unsigned long)result__CNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O15G)));
-          } else {
-            next__ANBH=new_lab__ARJ(new_size__O15G);
-          };
-          ((__POINTER *)next__ANBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BNBH)[ 0]=next__ANBH;
-        } else {
-          ((__POINTER *)result__CNBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CNBH=next__ANBH;
-        };
-      };
-      ptr__K15G=result__CNBH;
-    } else {
-      t__P15G=((__UINTEGER_32 )typ_id__L15G);
-      a__Q15G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__JNBH=(__UINTEGER_32)((__UINTEGER_32)(sz__M15G + a__Q15G) & (__UINTEGER_32)(~ a__Q15G));
-      ptr_table__GNBH=((__POINTER )(&(table_type[(t__P15G)])));
-      lab_type__INBH=(__UINTEGER_32)(t__P15G |  1);
-      next__FNBH=((__POINTER )(NULL));
-      result__HNBH=((__POINTER *)ptr_table__GNBH)[ 0];
-      if ((result__HNBH == (void *)NULL)) {
-        result__HNBH=new_lab__ARJ(lab_type__INBH);
-        next__FNBH=(void *)((unsigned long)result__HNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNBH)));
-        ((__POINTER *)next__FNBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GNBH)[ 0]=next__FNBH;
-      } else {
-        next__FNBH=((__POINTER *)result__HNBH)[ 0];
-        if ((next__FNBH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HNBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JNBH <<  1)) <=  4096)) {
-            next__FNBH=(void *)((unsigned long)result__HNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNBH)));
-          } else {
-            next__FNBH=new_lab__ARJ(lab_type__INBH);
-          };
-          ((__POINTER *)next__FNBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GNBH)[ 0]=next__FNBH;
-        } else {
-          ((__POINTER *)result__HNBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FNBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HNBH=next__FNBH;
-        };
-      };
-      ptr__K15G=result__HNBH;
-    };
-    result__J15G=((__STRING_CONSTANT *)ptr__K15G);
-    *(result__J15G) = *(STRING_CONSTANT__);
-  };
-  Self__131G=((__STRING_CONSTANT *)result__J15G);
-  c__331G=((__STRING *)n__ENT)->count__KFC;
-  if ((c__331G !=  0)) {
-    Self__131G->storage__JQO=create__VLEB((__INTEGER)(c__331G +  1));
-    Self__SG4G=((__CHARACTER *)Self__131G->storage__JQO);
-    model__TG4G=((__STRING *)n__ENT)->storage__VBS;
-    Self__RG4G=(__INTEGER)(c__331G -  1);
-    while ((Self__RG4G >=  0)) {
-      Self__SG4G[Self__RG4G]=((__CHARACTER *)model__TG4G)[Self__RG4G];
-      Self__RG4G=(__INTEGER)(Self__RG4G -  1);
-    };
-    ((__CHARACTER *)Self__131G->storage__JQO)[c__331G]='\0';
-    Self__131G->count__DD=c__331G;
-  };
-  Self__DNT->parent_entry_unix__NED.parent_entry__MED.path__BD=result__J15G;
-  Self__431G=((__STRING_CONSTANT *)Self__DNT->parent_entry_unix__NED.parent_entry__MED.path__BD);
-  Self__0K5G=((__CHARACTER *)Self__431G->storage__JQO);
-  idx__YK5G=(__INTEGER)(Self__431G->count__DD -  1);
-  while ((! ((idx__YK5G <  0) || ('/' == Self__0K5G[idx__YK5G])))) {
-    idx__YK5G=(__INTEGER)(idx__YK5G -  1);
-  };
-  idx__FNT=(__INTEGER)( 1 + idx__YK5G);
-  if (((void *)Self__DNT->parent_entry_unix__NED.parent_entry__MED.name__JNT == (void *)NULL)) {
-    result__R15G=NULL;
-    ptr__S15G=((__POINTER )(NULL));
-    typ_id__T15G= 0;
-    sz__U15G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__U15G ==  0)) {
-      result__R15G=STRING_CONSTANT__;
-    } else {
-      typ_id__T15G=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__U15G);
-      if ((typ_id__T15G == (__INTEGER)(-  1))) {
-        a__V15G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__W15G=(__UINTEGER_32)((__UINTEGER_32)(sz__U15G + a__V15G) & (__UINTEGER_32)(~ a__V15G));
-        ptr_table__LNBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W15G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__KNBH=((__POINTER )(NULL));
-        result__MNBH=((__POINTER *)ptr_table__LNBH)[ 0];
-        if ((result__MNBH == (void *)NULL)) {
-          result__MNBH=new_lab__ARJ(new_size__W15G);
-          next__KNBH=(void *)((unsigned long)result__MNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W15G)));
-          ((__POINTER *)next__KNBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LNBH)[ 0]=next__KNBH;
-        } else {
-          next__KNBH=((__POINTER *)result__MNBH)[ 0];
-          if ((next__KNBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MNBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__W15G <<  1)) <=  4096)) {
-              next__KNBH=(void *)((unsigned long)result__MNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W15G)));
+    typ_id__XHGH=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YHGH);
+    if ((typ_id__XHGH == (__INTEGER)(-  1))) {
+      a__ZHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0HGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YHGH + a__ZHGH) & (__UINTEGER_32)(~ a__ZHGH));
+      ptr_table__VZHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0HGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UZHH=((__POINTER )(NULL));
+      result__WZHH=((__POINTER *)ptr_table__VZHH)[ 0];
+      if ((result__WZHH == (void *)NULL)) {
+        result__WZHH=new_lab__MRJ(new_size__0HGH);
+        next__UZHH=(void *)((unsigned long)result__WZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0HGH)));
+        ((__POINTER *)next__UZHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VZHH)[ 0]=next__UZHH;
+      } else {
+        next__UZHH=((__POINTER *)result__WZHH)[ 0];
+        if ((next__UZHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WZHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0HGH <<  1)) <=  4096)) {
+            next__UZHH=(void *)((unsigned long)result__WZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0HGH)));
+          } else {
+            next__UZHH=new_lab__MRJ(new_size__0HGH);
+          };
+          ((__POINTER *)next__UZHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VZHH)[ 0]=next__UZHH;
+        } else {
+          ((__POINTER *)result__WZHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WZHH=next__UZHH;
+        };
+      };
+      ptr__WHGH=result__WZHH;
+    } else {
+      t__1HGH=((__UINTEGER_32 )typ_id__XHGH);
+      a__2HGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3ZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YHGH + a__2HGH) & (__UINTEGER_32)(~ a__2HGH));
+      ptr_table__0ZHH=((__POINTER )(&(table_type[(t__1HGH)])));
+      lab_type__2ZHH=(__UINTEGER_32)(t__1HGH |  1);
+      next__ZZHH=((__POINTER )(NULL));
+      result__1ZHH=((__POINTER *)ptr_table__0ZHH)[ 0];
+      if ((result__1ZHH == (void *)NULL)) {
+        result__1ZHH=new_lab__MRJ(lab_type__2ZHH);
+        next__ZZHH=(void *)((unsigned long)result__1ZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZHH)));
+        ((__POINTER *)next__ZZHH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0ZHH)[ 0]=next__ZZHH;
+      } else {
+        next__ZZHH=((__POINTER *)result__1ZHH)[ 0];
+        if ((next__ZZHH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1ZHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3ZHH <<  1)) <=  4096)) {
+            next__ZZHH=(void *)((unsigned long)result__1ZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZHH)));
+          } else {
+            next__ZZHH=new_lab__MRJ(lab_type__2ZHH);
+          };
+          ((__POINTER *)next__ZZHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0ZHH)[ 0]=next__ZZHH;
+        } else {
+          ((__POINTER *)result__1ZHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1ZHH=next__ZZHH;
+        };
+      };
+      ptr__WHGH=result__1ZHH;
+    };
+    result__VHGH=((__STRING_CONSTANT *)ptr__WHGH);
+    *(result__VHGH) = *(STRING_CONSTANT__);
+  };
+  Self__ZLCH=((__STRING_CONSTANT *)result__VHGH);
+  c__1LCH=((__STRING *)n__QNT)->count__WFC;
+  if ((c__1LCH !=  0)) {
+    Self__ZLCH->storage__VQO=create__BMEB((__INTEGER)(c__1LCH +  1));
+    Self__HSEH=((__CHARACTER *)Self__ZLCH->storage__VQO);
+    model__ISEH=((__STRING *)n__QNT)->storage__BCS;
+    Self__GSEH=(__INTEGER)(c__1LCH -  1);
+    while ((Self__GSEH >=  0)) {
+      Self__HSEH[Self__GSEH]=((__CHARACTER *)model__ISEH)[Self__GSEH];
+      Self__GSEH=(__INTEGER)(Self__GSEH -  1);
+    };
+    ((__CHARACTER *)Self__ZLCH->storage__VQO)[c__1LCH]='\0';
+    Self__ZLCH->count__DD=c__1LCH;
+  };
+  Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD=result__VHGH;
+  Self__2LCH=((__STRING_CONSTANT *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD);
+  Self__GXFH=((__CHARACTER *)Self__2LCH->storage__VQO);
+  idx__EXFH=(__INTEGER)(Self__2LCH->count__DD -  1);
+  while ((! ((idx__EXFH <  0) || ('/' == Self__GXFH[idx__EXFH])))) {
+    idx__EXFH=(__INTEGER)(idx__EXFH -  1);
+  };
+  idx__RNT=(__INTEGER)( 1 + idx__EXFH);
+  if (((void *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.name__VNT == (void *)NULL)) {
+    result__3HGH=NULL;
+    ptr__4HGH=((__POINTER )(NULL));
+    typ_id__5HGH= 0;
+    sz__AIGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__AIGH ==  0)) {
+      result__3HGH=STRING_CONSTANT__;
+    } else {
+      typ_id__5HGH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__AIGH);
+      if ((typ_id__5HGH == (__INTEGER)(-  1))) {
+        a__BIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CIGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AIGH + a__BIGH) & (__UINTEGER_32)(~ a__BIGH));
+        ptr_table__5ZHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CIGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__4ZHH=((__POINTER )(NULL));
+        result__A0HH=((__POINTER *)ptr_table__5ZHH)[ 0];
+        if ((result__A0HH == (void *)NULL)) {
+          result__A0HH=new_lab__MRJ(new_size__CIGH);
+          next__4ZHH=(void *)((unsigned long)result__A0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIGH)));
+          ((__POINTER *)next__4ZHH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5ZHH)[ 0]=next__4ZHH;
+        } else {
+          next__4ZHH=((__POINTER *)result__A0HH)[ 0];
+          if ((next__4ZHH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CIGH <<  1)) <=  4096)) {
+              next__4ZHH=(void *)((unsigned long)result__A0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIGH)));
             } else {
-              next__KNBH=new_lab__ARJ(new_size__W15G);
-            };
-            ((__POINTER *)next__KNBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LNBH)[ 0]=next__KNBH;
-          } else {
-            ((__POINTER *)result__MNBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KNBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MNBH=next__KNBH;
-          };
-        };
-        ptr__S15G=result__MNBH;
-      } else {
-        t__X15G=((__UINTEGER_32 )typ_id__T15G);
-        a__Y15G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__TNBH=(__UINTEGER_32)((__UINTEGER_32)(sz__U15G + a__Y15G) & (__UINTEGER_32)(~ a__Y15G));
-        ptr_table__QNBH=((__POINTER )(&(table_type[(t__X15G)])));
-        lab_type__SNBH=(__UINTEGER_32)(t__X15G |  1);
-        next__PNBH=((__POINTER )(NULL));
-        result__RNBH=((__POINTER *)ptr_table__QNBH)[ 0];
-        if ((result__RNBH == (void *)NULL)) {
-          result__RNBH=new_lab__ARJ(lab_type__SNBH);
-          next__PNBH=(void *)((unsigned long)result__RNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNBH)));
-          ((__POINTER *)next__PNBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QNBH)[ 0]=next__PNBH;
-        } else {
-          next__PNBH=((__POINTER *)result__RNBH)[ 0];
-          if ((next__PNBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RNBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TNBH <<  1)) <=  4096)) {
-              next__PNBH=(void *)((unsigned long)result__RNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNBH)));
+              next__4ZHH=new_lab__MRJ(new_size__CIGH);
+            };
+            ((__POINTER *)next__4ZHH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5ZHH)[ 0]=next__4ZHH;
+          } else {
+            ((__POINTER *)result__A0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4ZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__A0HH=next__4ZHH;
+          };
+        };
+        ptr__4HGH=result__A0HH;
+      } else {
+        t__DIGH=((__UINTEGER_32 )typ_id__5HGH);
+        a__EIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__H0HH=(__UINTEGER_32)((__UINTEGER_32)(sz__AIGH + a__EIGH) & (__UINTEGER_32)(~ a__EIGH));
+        ptr_table__E0HH=((__POINTER )(&(table_type[(t__DIGH)])));
+        lab_type__G0HH=(__UINTEGER_32)(t__DIGH |  1);
+        next__D0HH=((__POINTER )(NULL));
+        result__F0HH=((__POINTER *)ptr_table__E0HH)[ 0];
+        if ((result__F0HH == (void *)NULL)) {
+          result__F0HH=new_lab__MRJ(lab_type__G0HH);
+          next__D0HH=(void *)((unsigned long)result__F0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H0HH)));
+          ((__POINTER *)next__D0HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__E0HH)[ 0]=next__D0HH;
+        } else {
+          next__D0HH=((__POINTER *)result__F0HH)[ 0];
+          if ((next__D0HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__H0HH <<  1)) <=  4096)) {
+              next__D0HH=(void *)((unsigned long)result__F0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H0HH)));
             } else {
-              next__PNBH=new_lab__ARJ(lab_type__SNBH);
+              next__D0HH=new_lab__MRJ(lab_type__G0HH);
             };
-            ((__POINTER *)next__PNBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QNBH)[ 0]=next__PNBH;
+            ((__POINTER *)next__D0HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__E0HH)[ 0]=next__D0HH;
           } else {
-            ((__POINTER *)result__RNBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PNBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__RNBH=next__PNBH;
+            ((__POINTER *)result__F0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__F0HH=next__D0HH;
           };
         };
-        ptr__S15G=result__RNBH;
+        ptr__4HGH=result__F0HH;
       };
-      result__R15G=((__STRING_CONSTANT *)ptr__S15G);
-      *(result__R15G) = *(STRING_CONSTANT__);
+      result__3HGH=((__STRING_CONSTANT *)ptr__4HGH);
+      *(result__3HGH) = *(STRING_CONSTANT__);
     };
-    Self__DNT->parent_entry_unix__NED.parent_entry__MED.name__JNT=result__R15G;
+    Self__PNT->parent_entry_unix__ZED.parent_entry__YED.name__VNT=result__3HGH;
   };
-  __tmp__TNT=Self__DNT->parent_entry_unix__NED.parent_entry__MED.name__JNT;
-  ptr__AQYG=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__DNT->parent_entry_unix__NED.parent_entry__MED.path__BD)->storage__JQO));
-  ptr__AQYG=(void *)((unsigned long)ptr__AQYG - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__FNT)));
-  __tmp__XNT=((__CHARACTER *)ptr__AQYG);
-  __tmp__1NT=(__INTEGER)(((__STRING_CONSTANT *)Self__DNT->parent_entry_unix__NED.parent_entry__MED.path__BD)->count__DD - idx__FNT);
-  Self__UOLG=((__STRING_CONSTANT *)__tmp__TNT);
-  Self__UOLG->storage__JQO=__tmp__XNT;
-  Self__UOLG->count__DD=__tmp__1NT;
+  __tmp__5NT=Self__PNT->parent_entry_unix__ZED.parent_entry__YED.name__VNT;
+  ptr__5M4G=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD)->storage__VQO));
+  ptr__5M4G=(void *)((unsigned long)ptr__5M4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__RNT)));
+  __tmp__DOT=((__CHARACTER *)ptr__5M4G);
+  __tmp__HOT=(__INTEGER)(((__STRING_CONSTANT *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD)->count__DD - idx__RNT);
+  Self__1ZQG=((__STRING_CONSTANT *)__tmp__5NT);
+  Self__1ZQG->storage__VQO=__tmp__DOT;
+  Self__1ZQG->count__DD=__tmp__HOT;
 }
 
-static void set_path__3NT(__FILE_UNIX *Self__4NT,void *n__5NT)
+static void set_path__JOT(__FILE_UNIX *Self__KOT,void *n__LOT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *result__Z15G,*Self__D41G,*Self__G41G,*result__B25G;
-  __STRING_CONSTANT *Self__ZOLG;
-  __POINTER ptr__015G,ptr_table__VNBH,next__UNBH,result__WNBH;
-  __POINTER ptr_table__0NBH,next__ZNBH,result__1NBH,ptr__C25G;
-  __POINTER ptr_table__5NBH,next__4NBH,result__AOBH,ptr_table__EOBH;
-  __POINTER next__DOBH,result__FOBH,ptr__BOY;
-  __INTEGER typ_id__115G,c__F41G,Self__2G4G,idx__3K5G,idx__AOT;
-  __INTEGER typ_id__D25G,__tmp__VOT;
-  __UINTEGER_32 sz__215G,a__315G,new_size__415G,t__515G,a__A25G;
-  __UINTEGER_32 new_size__3NBH,lab_type__2NBH,sz__E25G,a__F25G;
-  __UINTEGER_32 new_size__G25G,t__H25G,a__I25G,new_size__HOBH;
-  __UINTEGER_32 lab_type__GOBH;
-  void *__tmp__NOT;
-  __CHARACTER *Self__3G4G,*model__4G4G,*Self__5K5G,*__tmp__ROT;
-  result__Z15G=NULL;
-  ptr__015G=((__POINTER )(NULL));
-  typ_id__115G= 0;
-  sz__215G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-  if ((sz__215G ==  0)) {
-    result__Z15G=STRING_CONSTANT__;
+  __STRING_CONSTANT *result__FIGH,*Self__BMCH,*Self__EMCH,*result__NIGH;
+  __STRING_CONSTANT *Self__A0QG;
+  __POINTER ptr__GIGH,ptr_table__J0HH,next__I0HH,result__K0HH;
+  __POINTER ptr_table__O0HH,next__N0HH,result__P0HH,ptr__OIGH;
+  __POINTER ptr_table__T0HH,next__S0HH,result__U0HH,ptr_table__Y0HH;
+  __POINTER next__X0HH,result__Z0HH,ptr__NOY;
+  __INTEGER typ_id__HIGH,c__DMCH,Self__RSEH,idx__JXFH,idx__MOT;
+  __INTEGER typ_id__PIGH,__tmp__BPT;
+  __UINTEGER_32 sz__IIGH,a__JIGH,new_size__KIGH,t__LIGH,a__MIGH;
+  __UINTEGER_32 new_size__R0HH,lab_type__Q0HH,sz__QIGH,a__RIGH;
+  __UINTEGER_32 new_size__SIGH,t__TIGH,a__UIGH,new_size__10HH;
+  __UINTEGER_32 lab_type__00HH;
+  void *__tmp__ZOT;
+  __CHARACTER *Self__SSEH,*model__TSEH,*Self__LXFH,*__tmp__3OT;
+  result__FIGH=NULL;
+  ptr__GIGH=((__POINTER )(NULL));
+  typ_id__HIGH= 0;
+  sz__IIGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__IIGH ==  0)) {
+    result__FIGH=STRING_CONSTANT__;
   } else {
-    typ_id__115G=-1;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__215G);
-    if ((typ_id__115G == (__INTEGER)(-  1))) {
-      a__315G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__415G=(__UINTEGER_32)((__UINTEGER_32)(sz__215G + a__315G) & (__UINTEGER_32)(~ a__315G));
-      ptr_table__VNBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__415G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__UNBH=((__POINTER )(NULL));
-      result__WNBH=((__POINTER *)ptr_table__VNBH)[ 0];
-      if ((result__WNBH == (void *)NULL)) {
-        result__WNBH=new_lab__ARJ(new_size__415G);
-        next__UNBH=(void *)((unsigned long)result__WNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__415G)));
-        ((__POINTER *)next__UNBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VNBH)[ 0]=next__UNBH;
-      } else {
-        next__UNBH=((__POINTER *)result__WNBH)[ 0];
-        if ((next__UNBH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WNBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__415G <<  1)) <=  4096)) {
-            next__UNBH=(void *)((unsigned long)result__WNBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__415G)));
-          } else {
-            next__UNBH=new_lab__ARJ(new_size__415G);
-          };
-          ((__POINTER *)next__UNBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VNBH)[ 0]=next__UNBH;
-        } else {
-          ((__POINTER *)result__WNBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UNBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WNBH=next__UNBH;
-        };
-      };
-      ptr__015G=result__WNBH;
-    } else {
-      t__515G=((__UINTEGER_32 )typ_id__115G);
-      a__A25G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__3NBH=(__UINTEGER_32)((__UINTEGER_32)(sz__215G + a__A25G) & (__UINTEGER_32)(~ a__A25G));
-      ptr_table__0NBH=((__POINTER )(&(table_type[(t__515G)])));
-      lab_type__2NBH=(__UINTEGER_32)(t__515G |  1);
-      next__ZNBH=((__POINTER )(NULL));
-      result__1NBH=((__POINTER *)ptr_table__0NBH)[ 0];
-      if ((result__1NBH == (void *)NULL)) {
-        result__1NBH=new_lab__ARJ(lab_type__2NBH);
-        next__ZNBH=(void *)((unsigned long)result__1NBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NBH)));
-        ((__POINTER *)next__ZNBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0NBH)[ 0]=next__ZNBH;
-      } else {
-        next__ZNBH=((__POINTER *)result__1NBH)[ 0];
-        if ((next__ZNBH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1NBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3NBH <<  1)) <=  4096)) {
-            next__ZNBH=(void *)((unsigned long)result__1NBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NBH)));
-          } else {
-            next__ZNBH=new_lab__ARJ(lab_type__2NBH);
-          };
-          ((__POINTER *)next__ZNBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0NBH)[ 0]=next__ZNBH;
-        } else {
-          ((__POINTER *)result__1NBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZNBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1NBH=next__ZNBH;
-        };
-      };
-      ptr__015G=result__1NBH;
-    };
-    result__Z15G=((__STRING_CONSTANT *)ptr__015G);
-    *(result__Z15G) = *(STRING_CONSTANT__);
-  };
-  Self__D41G=((__STRING_CONSTANT *)result__Z15G);
-  c__F41G=((__STRING *)n__5NT)->count__KFC;
-  if ((c__F41G !=  0)) {
-    Self__D41G->storage__JQO=create__VLEB((__INTEGER)(c__F41G +  1));
-    Self__3G4G=((__CHARACTER *)Self__D41G->storage__JQO);
-    model__4G4G=((__STRING *)n__5NT)->storage__VBS;
-    Self__2G4G=(__INTEGER)(c__F41G -  1);
-    while ((Self__2G4G >=  0)) {
-      Self__3G4G[Self__2G4G]=((__CHARACTER *)model__4G4G)[Self__2G4G];
-      Self__2G4G=(__INTEGER)(Self__2G4G -  1);
-    };
-    ((__CHARACTER *)Self__D41G->storage__JQO)[c__F41G]='\0';
-    Self__D41G->count__DD=c__F41G;
-  };
-  Self__4NT->parent_entry_unix__QCF.parent_entry__MED.path__BD=result__Z15G;
-  Self__G41G=((__STRING_CONSTANT *)Self__4NT->parent_entry_unix__QCF.parent_entry__MED.path__BD);
-  Self__5K5G=((__CHARACTER *)Self__G41G->storage__JQO);
-  idx__3K5G=(__INTEGER)(Self__G41G->count__DD -  1);
-  while ((! ((idx__3K5G <  0) || ('/' == Self__5K5G[idx__3K5G])))) {
-    idx__3K5G=(__INTEGER)(idx__3K5G -  1);
-  };
-  idx__AOT=(__INTEGER)( 1 + idx__3K5G);
-  if (((void *)Self__4NT->parent_entry_unix__QCF.parent_entry__MED.name__JNT == (void *)NULL)) {
-    result__B25G=NULL;
-    ptr__C25G=((__POINTER )(NULL));
-    typ_id__D25G= 0;
-    sz__E25G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__E25G ==  0)) {
-      result__B25G=STRING_CONSTANT__;
-    } else {
-      typ_id__D25G=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__E25G);
-      if ((typ_id__D25G == (__INTEGER)(-  1))) {
-        a__F25G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__G25G=(__UINTEGER_32)((__UINTEGER_32)(sz__E25G + a__F25G) & (__UINTEGER_32)(~ a__F25G));
-        ptr_table__5NBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G25G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__4NBH=((__POINTER )(NULL));
-        result__AOBH=((__POINTER *)ptr_table__5NBH)[ 0];
-        if ((result__AOBH == (void *)NULL)) {
-          result__AOBH=new_lab__ARJ(new_size__G25G);
-          next__4NBH=(void *)((unsigned long)result__AOBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G25G)));
-          ((__POINTER *)next__4NBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5NBH)[ 0]=next__4NBH;
-        } else {
-          next__4NBH=((__POINTER *)result__AOBH)[ 0];
-          if ((next__4NBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AOBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__G25G <<  1)) <=  4096)) {
-              next__4NBH=(void *)((unsigned long)result__AOBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G25G)));
+    typ_id__HIGH=-1;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IIGH);
+    if ((typ_id__HIGH == (__INTEGER)(-  1))) {
+      a__JIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KIGH=(__UINTEGER_32)((__UINTEGER_32)(sz__IIGH + a__JIGH) & (__UINTEGER_32)(~ a__JIGH));
+      ptr_table__J0HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KIGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__I0HH=((__POINTER )(NULL));
+      result__K0HH=((__POINTER *)ptr_table__J0HH)[ 0];
+      if ((result__K0HH == (void *)NULL)) {
+        result__K0HH=new_lab__MRJ(new_size__KIGH);
+        next__I0HH=(void *)((unsigned long)result__K0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KIGH)));
+        ((__POINTER *)next__I0HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__J0HH)[ 0]=next__I0HH;
+      } else {
+        next__I0HH=((__POINTER *)result__K0HH)[ 0];
+        if ((next__I0HH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KIGH <<  1)) <=  4096)) {
+            next__I0HH=(void *)((unsigned long)result__K0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KIGH)));
+          } else {
+            next__I0HH=new_lab__MRJ(new_size__KIGH);
+          };
+          ((__POINTER *)next__I0HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__J0HH)[ 0]=next__I0HH;
+        } else {
+          ((__POINTER *)result__K0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__K0HH=next__I0HH;
+        };
+      };
+      ptr__GIGH=result__K0HH;
+    } else {
+      t__LIGH=((__UINTEGER_32 )typ_id__HIGH);
+      a__MIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__R0HH=(__UINTEGER_32)((__UINTEGER_32)(sz__IIGH + a__MIGH) & (__UINTEGER_32)(~ a__MIGH));
+      ptr_table__O0HH=((__POINTER )(&(table_type[(t__LIGH)])));
+      lab_type__Q0HH=(__UINTEGER_32)(t__LIGH |  1);
+      next__N0HH=((__POINTER )(NULL));
+      result__P0HH=((__POINTER *)ptr_table__O0HH)[ 0];
+      if ((result__P0HH == (void *)NULL)) {
+        result__P0HH=new_lab__MRJ(lab_type__Q0HH);
+        next__N0HH=(void *)((unsigned long)result__P0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0HH)));
+        ((__POINTER *)next__N0HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__O0HH)[ 0]=next__N0HH;
+      } else {
+        next__N0HH=((__POINTER *)result__P0HH)[ 0];
+        if ((next__N0HH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__R0HH <<  1)) <=  4096)) {
+            next__N0HH=(void *)((unsigned long)result__P0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0HH)));
+          } else {
+            next__N0HH=new_lab__MRJ(lab_type__Q0HH);
+          };
+          ((__POINTER *)next__N0HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__O0HH)[ 0]=next__N0HH;
+        } else {
+          ((__POINTER *)result__P0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__P0HH=next__N0HH;
+        };
+      };
+      ptr__GIGH=result__P0HH;
+    };
+    result__FIGH=((__STRING_CONSTANT *)ptr__GIGH);
+    *(result__FIGH) = *(STRING_CONSTANT__);
+  };
+  Self__BMCH=((__STRING_CONSTANT *)result__FIGH);
+  c__DMCH=((__STRING *)n__LOT)->count__WFC;
+  if ((c__DMCH !=  0)) {
+    Self__BMCH->storage__VQO=create__BMEB((__INTEGER)(c__DMCH +  1));
+    Self__SSEH=((__CHARACTER *)Self__BMCH->storage__VQO);
+    model__TSEH=((__STRING *)n__LOT)->storage__BCS;
+    Self__RSEH=(__INTEGER)(c__DMCH -  1);
+    while ((Self__RSEH >=  0)) {
+      Self__SSEH[Self__RSEH]=((__CHARACTER *)model__TSEH)[Self__RSEH];
+      Self__RSEH=(__INTEGER)(Self__RSEH -  1);
+    };
+    ((__CHARACTER *)Self__BMCH->storage__VQO)[c__DMCH]='\0';
+    Self__BMCH->count__DD=c__DMCH;
+  };
+  Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD=result__FIGH;
+  Self__EMCH=((__STRING_CONSTANT *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD);
+  Self__LXFH=((__CHARACTER *)Self__EMCH->storage__VQO);
+  idx__JXFH=(__INTEGER)(Self__EMCH->count__DD -  1);
+  while ((! ((idx__JXFH <  0) || ('/' == Self__LXFH[idx__JXFH])))) {
+    idx__JXFH=(__INTEGER)(idx__JXFH -  1);
+  };
+  idx__MOT=(__INTEGER)( 1 + idx__JXFH);
+  if (((void *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.name__VNT == (void *)NULL)) {
+    result__NIGH=NULL;
+    ptr__OIGH=((__POINTER )(NULL));
+    typ_id__PIGH= 0;
+    sz__QIGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__QIGH ==  0)) {
+      result__NIGH=STRING_CONSTANT__;
+    } else {
+      typ_id__PIGH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QIGH);
+      if ((typ_id__PIGH == (__INTEGER)(-  1))) {
+        a__RIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SIGH=(__UINTEGER_32)((__UINTEGER_32)(sz__QIGH + a__RIGH) & (__UINTEGER_32)(~ a__RIGH));
+        ptr_table__T0HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SIGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__S0HH=((__POINTER )(NULL));
+        result__U0HH=((__POINTER *)ptr_table__T0HH)[ 0];
+        if ((result__U0HH == (void *)NULL)) {
+          result__U0HH=new_lab__MRJ(new_size__SIGH);
+          next__S0HH=(void *)((unsigned long)result__U0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIGH)));
+          ((__POINTER *)next__S0HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__T0HH)[ 0]=next__S0HH;
+        } else {
+          next__S0HH=((__POINTER *)result__U0HH)[ 0];
+          if ((next__S0HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SIGH <<  1)) <=  4096)) {
+              next__S0HH=(void *)((unsigned long)result__U0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIGH)));
             } else {
-              next__4NBH=new_lab__ARJ(new_size__G25G);
-            };
-            ((__POINTER *)next__4NBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5NBH)[ 0]=next__4NBH;
-          } else {
-            ((__POINTER *)result__AOBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4NBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__AOBH=next__4NBH;
-          };
-        };
-        ptr__C25G=result__AOBH;
-      } else {
-        t__H25G=((__UINTEGER_32 )typ_id__D25G);
-        a__I25G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__HOBH=(__UINTEGER_32)((__UINTEGER_32)(sz__E25G + a__I25G) & (__UINTEGER_32)(~ a__I25G));
-        ptr_table__EOBH=((__POINTER )(&(table_type[(t__H25G)])));
-        lab_type__GOBH=(__UINTEGER_32)(t__H25G |  1);
-        next__DOBH=((__POINTER )(NULL));
-        result__FOBH=((__POINTER *)ptr_table__EOBH)[ 0];
-        if ((result__FOBH == (void *)NULL)) {
-          result__FOBH=new_lab__ARJ(lab_type__GOBH);
-          next__DOBH=(void *)((unsigned long)result__FOBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOBH)));
-          ((__POINTER *)next__DOBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EOBH)[ 0]=next__DOBH;
-        } else {
-          next__DOBH=((__POINTER *)result__FOBH)[ 0];
-          if ((next__DOBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FOBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__HOBH <<  1)) <=  4096)) {
-              next__DOBH=(void *)((unsigned long)result__FOBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOBH)));
+              next__S0HH=new_lab__MRJ(new_size__SIGH);
+            };
+            ((__POINTER *)next__S0HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__T0HH)[ 0]=next__S0HH;
+          } else {
+            ((__POINTER *)result__U0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__U0HH=next__S0HH;
+          };
+        };
+        ptr__OIGH=result__U0HH;
+      } else {
+        t__TIGH=((__UINTEGER_32 )typ_id__PIGH);
+        a__UIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__10HH=(__UINTEGER_32)((__UINTEGER_32)(sz__QIGH + a__UIGH) & (__UINTEGER_32)(~ a__UIGH));
+        ptr_table__Y0HH=((__POINTER )(&(table_type[(t__TIGH)])));
+        lab_type__00HH=(__UINTEGER_32)(t__TIGH |  1);
+        next__X0HH=((__POINTER )(NULL));
+        result__Z0HH=((__POINTER *)ptr_table__Y0HH)[ 0];
+        if ((result__Z0HH == (void *)NULL)) {
+          result__Z0HH=new_lab__MRJ(lab_type__00HH);
+          next__X0HH=(void *)((unsigned long)result__Z0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__10HH)));
+          ((__POINTER *)next__X0HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Y0HH)[ 0]=next__X0HH;
+        } else {
+          next__X0HH=((__POINTER *)result__Z0HH)[ 0];
+          if ((next__X0HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__10HH <<  1)) <=  4096)) {
+              next__X0HH=(void *)((unsigned long)result__Z0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__10HH)));
             } else {
-              next__DOBH=new_lab__ARJ(lab_type__GOBH);
+              next__X0HH=new_lab__MRJ(lab_type__00HH);
             };
-            ((__POINTER *)next__DOBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EOBH)[ 0]=next__DOBH;
+            ((__POINTER *)next__X0HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Y0HH)[ 0]=next__X0HH;
           } else {
-            ((__POINTER *)result__FOBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FOBH=next__DOBH;
+            ((__POINTER *)result__Z0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Z0HH=next__X0HH;
           };
         };
-        ptr__C25G=result__FOBH;
+        ptr__OIGH=result__Z0HH;
       };
-      result__B25G=((__STRING_CONSTANT *)ptr__C25G);
-      *(result__B25G) = *(STRING_CONSTANT__);
+      result__NIGH=((__STRING_CONSTANT *)ptr__OIGH);
+      *(result__NIGH) = *(STRING_CONSTANT__);
     };
-    Self__4NT->parent_entry_unix__QCF.parent_entry__MED.name__JNT=result__B25G;
+    Self__KOT->parent_entry_unix__2CF.parent_entry__YED.name__VNT=result__NIGH;
   };
-  __tmp__NOT=Self__4NT->parent_entry_unix__QCF.parent_entry__MED.name__JNT;
-  ptr__BOY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__4NT->parent_entry_unix__QCF.parent_entry__MED.path__BD)->storage__JQO));
-  ptr__BOY=(void *)((unsigned long)ptr__BOY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__AOT)));
-  __tmp__ROT=((__CHARACTER *)ptr__BOY);
-  __tmp__VOT=(__INTEGER)(((__STRING_CONSTANT *)Self__4NT->parent_entry_unix__QCF.parent_entry__MED.path__BD)->count__DD - idx__AOT);
-  Self__ZOLG=((__STRING_CONSTANT *)__tmp__NOT);
-  Self__ZOLG->storage__JQO=__tmp__ROT;
-  Self__ZOLG->count__DD=__tmp__VOT;
+  __tmp__ZOT=Self__KOT->parent_entry_unix__2CF.parent_entry__YED.name__VNT;
+  ptr__NOY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO));
+  ptr__NOY=(void *)((unsigned long)ptr__NOY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__MOT)));
+  __tmp__3OT=((__CHARACTER *)ptr__NOY);
+  __tmp__BPT=(__INTEGER)(((__STRING_CONSTANT *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD)->count__DD - idx__MOT);
+  Self__A0QG=((__STRING_CONSTANT *)__tmp__ZOT);
+  Self__A0QG->storage__VQO=__tmp__3OT;
+  Self__A0QG->count__DD=__tmp__BPT;
 }
 
-static void insert_string__to__OXU(__STRING *Self__PXU,void *s__QXU,__INTEGER i__RXU)
+static void insert_string__to__0XU(__STRING *Self__1XU,void *s__2XU,__INTEGER i__3XU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__SXU,__tmp__FYU,dest__EL5G,src_capacity__IL5G,i2__DL5G;
-  __INTEGER i1__FL5G;
-  __CHARACTER *__tmp__VYU,*__tmp__WYU,*Self__GL5G,*src__HL5G;
-  j__SXU=Self__PXU->count__KFC;
-  if (((struct ___OBJ *)s__QXU)->__id==__STRING_CONSTANT__) {
-    __tmp__FYU=((__STRING_CONSTANT *)s__QXU)->count__DD;
+  __INTEGER j__4XU,__tmp__RYU,dest__QXFH,src_capacity__UXFH,i2__PXFH;
+  __INTEGER i1__RXFH;
+  __CHARACTER *__tmp__BZU,*__tmp__CZU,*Self__SXFH,*src__TXFH;
+  j__4XU=Self__1XU->count__WFC;
+  if (((struct ___OBJ *)s__2XU)->__id==__STRING_CONSTANT__) {
+    __tmp__RYU=((__STRING_CONSTANT *)s__2XU)->count__DD;
   } else {
-    __tmp__FYU=((__STRING *)s__QXU)->count__KFC;
+    __tmp__RYU=((__STRING *)s__2XU)->count__WFC;
   };
-  resize__MXZ(Self__PXU,(__INTEGER)(j__SXU + __tmp__FYU));
-  if ((i__RXU <= j__SXU)) {
-    move__to__by__VVCC(Self__PXU->storage__VBS,(__INTEGER)(i__RXU -  1),(__INTEGER)(j__SXU -  1),__tmp__FYU);
+  resize__YXZ(Self__1XU,(__INTEGER)(j__4XU + __tmp__RYU));
+  if ((i__3XU <= j__4XU)) {
+    move__to__by__BWCC(Self__1XU->storage__BCS,(__INTEGER)(i__3XU -  1),(__INTEGER)(j__4XU -  1),__tmp__RYU);
   };
-  __tmp__VYU=Self__PXU->storage__VBS;
-  if (((struct ___OBJ *)s__QXU)->__id==__STRING_CONSTANT__) {
-    __tmp__WYU=((__STRING_CONSTANT *)s__QXU)->storage__JQO;
+  __tmp__BZU=Self__1XU->storage__BCS;
+  if (((struct ___OBJ *)s__2XU)->__id==__STRING_CONSTANT__) {
+    __tmp__CZU=((__STRING_CONSTANT *)s__2XU)->storage__VQO;
   } else {
-    __tmp__WYU=((__STRING *)s__QXU)->storage__VBS;
-  };
-  Self__GL5G=((__CHARACTER *)__tmp__VYU);
-  src__HL5G=__tmp__WYU;
-  dest__EL5G=(__INTEGER)(i__RXU -  1);
-  src_capacity__IL5G=__tmp__FYU;
-  i2__DL5G= 0;
-  i1__FL5G=dest__EL5G;
-  while ((i2__DL5G != src_capacity__IL5G)) {
-    Self__GL5G[i1__FL5G]=((__CHARACTER *)src__HL5G)[i2__DL5G];
-    i2__DL5G=(__INTEGER)(i2__DL5G +  1);
-    i1__FL5G=(__INTEGER)(i1__FL5G +  1);
+    __tmp__CZU=((__STRING *)s__2XU)->storage__BCS;
+  };
+  Self__SXFH=((__CHARACTER *)__tmp__BZU);
+  src__TXFH=__tmp__CZU;
+  dest__QXFH=(__INTEGER)(i__3XU -  1);
+  src_capacity__UXFH=__tmp__RYU;
+  i2__PXFH= 0;
+  i1__RXFH=dest__QXFH;
+  while ((i2__PXFH != src_capacity__UXFH)) {
+    Self__SXFH[i1__RXFH]=((__CHARACTER *)src__TXFH)[i2__PXFH];
+    i2__PXFH=(__INTEGER)(i2__PXFH +  1);
+    i1__RXFH=(__INTEGER)(i1__RXFH +  1);
   };
 }
 
-static void read_escape_character__PIJF()
+static void read_escape_character__R1JF()
 // () VoidNo recursive, No inlinable.
 {
-  __INTEGER val__SIJF;
-  __STRING *Self__GH4G;
-  __POSITION pos__0HRG,pos__HIRG,pos__XIRG,pos__ZIRG;
-  __CHARACTER result__EUYG,result__FUYG,result__HUYG,result__IUYG;
-  __CHARACTER result__JUYG,result__KUYG,result__LUYG,result__MUYG;
-  __CHARACTER result__NUYG,result__OUYG,result__PUYG,result__QUYG;
-  __CHARACTER result__RUYG,result__SUYG,result__TUYG,result__UUYG;
-  __CHARACTER result__VUYG,result__WUYG,result__1UYG,result__2UYG;
-  __CHARACTER result__AVYG,result__BVYG;
-  __BOOLEAN __tmp__LJJF,__tmp__5JJF,__tmp__SKJF,__tmp__HNJF,__tmp__INJF;
-  __BOOLEAN __tmp__JNJF,__tmp__KNJF,__tmp__LNJF,__tmp__MNJF,__tmp__NNJF;
-  __BOOLEAN __tmp__ONJF,__tmp__PNJF,__tmp__QNJF,__tmp__1NJF;
-  val__SIJF= 0;
-  result__EUYG='\0';
-  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-    result__EUYG=((__CHARACTER )(( 0)));
+  __INTEGER val__U1JF;
+  __STRING *Self__1SEH;
+  __POSITION pos__B0WG,pos__O0WG,pos__10WG,pos__30WG;
+  __CHARACTER result__CQ4G,result__HQ4G,result__RQ4G,result__WQ4G;
+  __CHARACTER result__1Q4G,result__ER4G,result__NR4G,result__SR4G;
+  __CHARACTER result__XR4G,result__2R4G,result__BS4G,result__GS4G;
+  __CHARACTER result__LS4G,result__QS4G,result__VS4G,result__0S4G;
+  __CHARACTER result__5S4G,result__ET4G,result__NT4G,result__ST4G;
+  __CHARACTER result__0T4G,result__5T4G;
+  __BOOLEAN __tmp__N2JF,__tmp__B3JF,__tmp__U3JF,__tmp__JAKF,__tmp__KAKF;
+  __BOOLEAN __tmp__LAKF,__tmp__MAKF,__tmp__NAKF,__tmp__OAKF,__tmp__PAKF;
+  __BOOLEAN __tmp__QAKF,__tmp__RAKF,__tmp__SAKF,__tmp__3AKF;
+  val__U1JF= 0;
+  result__CQ4G='\0';
+  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+    result__CQ4G=((__CHARACTER )(( 0)));
   } else {
-    result__EUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+    result__CQ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
   };
-  if ((((((((result__EUYG == ' ') || (result__EUYG == '\t')) || (result__EUYG == '\n')) || (result__EUYG == '\r')) || (result__EUYG == '\0')) || (result__EUYG == '\f')) || (result__EUYG == '\v'))) {
-    position__GBC=(__INTEGER)(position__GBC +  1);
-    until_do__WYLF:
+  if ((((((((result__CQ4G == ' ') || (result__CQ4G == '\t')) || (result__CQ4G == '\n')) || (result__CQ4G == '\r')) || (result__CQ4G == '\0')) || (result__CQ4G == '\f')) || (result__CQ4G == '\v'))) {
+    position__SBC=(__INTEGER)(position__SBC +  1);
+    until_do__4FMF:
     {
-      result__FUYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__FUYG=((__CHARACTER )(( 0)));
+      result__HQ4G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__HQ4G=((__CHARACTER )(( 0)));
       } else {
-        result__FUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__HQ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__FUYG == ((__CHARACTER )(( 0))))) {
-        __tmp__LJJF=TRUE__;
+      if ((result__HQ4G == ((__CHARACTER )(( 0))))) {
+        __tmp__N2JF=TRUE__;
       } else {
-        result__HUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__HUYG=((__CHARACTER )(( 0)));
+        result__RQ4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__RQ4G=((__CHARACTER )(( 0)));
         } else {
-          result__HUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__RQ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__LJJF=(! (((((((result__HUYG == ' ') || (result__HUYG == '\t')) || (result__HUYG == '\n')) || (result__HUYG == '\r')) || (result__HUYG == '\0')) || (result__HUYG == '\f')) || (result__HUYG == '\v')));
+        __tmp__N2JF=(! (((((((result__RQ4G == ' ') || (result__RQ4G == '\t')) || (result__RQ4G == '\n')) || (result__RQ4G == '\r')) || (result__RQ4G == '\0')) || (result__RQ4G == '\f')) || (result__RQ4G == '\v')));
       };
-      if ((! __tmp__LJJF)) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto until_do__WYLF;
+      if ((! __tmp__N2JF)) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto until_do__4FMF;
       };
     };
-    result__IUYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__IUYG=((__CHARACTER )(( 0)));
+    result__WQ4G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__WQ4G=((__CHARACTER )(( 0)));
     } else {
-      result__IUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__WQ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__IUYG == '\\')) {
-      Self__GH4G=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__GH4G->count__KFC)) {
-        Self__GH4G->count__KFC= 0;
+    if ((result__WQ4G == '\\')) {
+      Self__1SEH=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__1SEH->count__WFC)) {
+        Self__1SEH->count__WFC= 0;
       } else {
-        Self__GH4G->count__KFC=(__INTEGER)(Self__GH4G->count__KFC -  1);
+        Self__1SEH->count__WFC=(__INTEGER)(Self__1SEH->count__WFC -  1);
       };
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      __tmp__5JJF=TRUE__;
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      __tmp__B3JF=TRUE__;
     } else {
-      __tmp__5JJF=FALSE__;
+      __tmp__B3JF=FALSE__;
     };
-    if ((! __tmp__5JJF)) {
-      result__JUYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__JUYG=((__CHARACTER )(( 0)));
+    if ((! __tmp__B3JF)) {
+      result__1Q4G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__1Q4G=((__CHARACTER )(( 0)));
       } else {
-        result__JUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__1Q4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__JUYG != ((__CHARACTER )(( 0))))) {
-        pos__0HRG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_287));
-        put_position__IOG(pos__0HRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((result__1Q4G != ((__CHARACTER )(( 0))))) {
+        pos__B0WG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_297));
+        put_position__UOG(pos__B0WG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__SKJF=TRUE__;
+    __tmp__U3JF=TRUE__;
   } else {
-    __tmp__SKJF=FALSE__;
+    __tmp__U3JF=FALSE__;
   };
-  if ((! __tmp__SKJF)) {
-    result__KUYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__KUYG=((__CHARACTER )(( 0)));
+  if ((! __tmp__U3JF)) {
+    result__ER4G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__ER4G=((__CHARACTER )(( 0)));
     } else {
-      result__KUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__ER4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__KUYG != ((__CHARACTER )(( 0))))) {
-      result__LUYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__LUYG=((__CHARACTER )(( 0)));
+    if ((result__ER4G != ((__CHARACTER )(( 0))))) {
+      result__NR4G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__NR4G=((__CHARACTER )(( 0)));
       } else {
-        result__LUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__NR4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__LUYG == 'a')) {
-        __tmp__HNJF=TRUE__;
+      if ((result__NR4G == 'a')) {
+        __tmp__JAKF=TRUE__;
       } else {
-        result__MUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__MUYG=((__CHARACTER )(( 0)));
+        result__SR4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__SR4G=((__CHARACTER )(( 0)));
         } else {
-          result__MUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__SR4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__HNJF=(result__MUYG == 'b');
+        __tmp__JAKF=(result__SR4G == 'b');
       };
-      if (__tmp__HNJF) {
-        __tmp__INJF=TRUE__;
+      if (__tmp__JAKF) {
+        __tmp__KAKF=TRUE__;
       } else {
-        result__NUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__NUYG=((__CHARACTER )(( 0)));
+        result__XR4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__XR4G=((__CHARACTER )(( 0)));
         } else {
-          result__NUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__XR4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__INJF=(result__NUYG == 'f');
+        __tmp__KAKF=(result__XR4G == 'f');
       };
-      if (__tmp__INJF) {
-        __tmp__JNJF=TRUE__;
+      if (__tmp__KAKF) {
+        __tmp__LAKF=TRUE__;
       } else {
-        result__OUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__OUYG=((__CHARACTER )(( 0)));
+        result__2R4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__2R4G=((__CHARACTER )(( 0)));
         } else {
-          result__OUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__2R4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__JNJF=(result__OUYG == 'n');
+        __tmp__LAKF=(result__2R4G == 'n');
       };
-      if (__tmp__JNJF) {
-        __tmp__KNJF=TRUE__;
+      if (__tmp__LAKF) {
+        __tmp__MAKF=TRUE__;
       } else {
-        result__PUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__PUYG=((__CHARACTER )(( 0)));
+        result__BS4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__BS4G=((__CHARACTER )(( 0)));
         } else {
-          result__PUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__BS4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__KNJF=(result__PUYG == 'r');
+        __tmp__MAKF=(result__BS4G == 'r');
       };
-      if (__tmp__KNJF) {
-        __tmp__LNJF=TRUE__;
+      if (__tmp__MAKF) {
+        __tmp__NAKF=TRUE__;
       } else {
-        result__QUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__QUYG=((__CHARACTER )(( 0)));
+        result__GS4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__GS4G=((__CHARACTER )(( 0)));
         } else {
-          result__QUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__GS4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__LNJF=(result__QUYG == 't');
+        __tmp__NAKF=(result__GS4G == 't');
       };
-      if (__tmp__LNJF) {
-        __tmp__MNJF=TRUE__;
+      if (__tmp__NAKF) {
+        __tmp__OAKF=TRUE__;
       } else {
-        result__RUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__RUYG=((__CHARACTER )(( 0)));
+        result__LS4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__LS4G=((__CHARACTER )(( 0)));
         } else {
-          result__RUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__LS4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__MNJF=(result__RUYG == 'v');
+        __tmp__OAKF=(result__LS4G == 'v');
       };
-      if (__tmp__MNJF) {
-        __tmp__NNJF=TRUE__;
+      if (__tmp__OAKF) {
+        __tmp__PAKF=TRUE__;
       } else {
-        result__SUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__SUYG=((__CHARACTER )(( 0)));
+        result__QS4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__QS4G=((__CHARACTER )(( 0)));
         } else {
-          result__SUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__QS4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__NNJF=(result__SUYG == '\\');
+        __tmp__PAKF=(result__QS4G == '\\');
       };
-      if (__tmp__NNJF) {
-        __tmp__ONJF=TRUE__;
+      if (__tmp__PAKF) {
+        __tmp__QAKF=TRUE__;
       } else {
-        result__TUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__TUYG=((__CHARACTER )(( 0)));
+        result__VS4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__VS4G=((__CHARACTER )(( 0)));
         } else {
-          result__TUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__VS4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__ONJF=(result__TUYG == '?');
+        __tmp__QAKF=(result__VS4G == '?');
       };
-      if (__tmp__ONJF) {
-        __tmp__PNJF=TRUE__;
+      if (__tmp__QAKF) {
+        __tmp__RAKF=TRUE__;
       } else {
-        result__UUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__UUYG=((__CHARACTER )(( 0)));
+        result__0S4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__0S4G=((__CHARACTER )(( 0)));
         } else {
-          result__UUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__0S4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__PNJF=(result__UUYG == '\'');
+        __tmp__RAKF=(result__0S4G == '\'');
       };
-      if (__tmp__PNJF) {
-        __tmp__QNJF=TRUE__;
+      if (__tmp__RAKF) {
+        __tmp__SAKF=TRUE__;
       } else {
-        result__VUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__VUYG=((__CHARACTER )(( 0)));
+        result__5S4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__5S4G=((__CHARACTER )(( 0)));
         } else {
-          result__VUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__5S4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__QNJF=(result__VUYG == '\"');
+        __tmp__SAKF=(result__5S4G == '\"');
       };
-      if (__tmp__QNJF) {
-        result__WUYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__WUYG=((__CHARACTER )(( 0)));
+      if (__tmp__SAKF) {
+        result__ET4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__ET4G=((__CHARACTER )(( 0)));
         } else {
-          result__WUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__ET4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        add_last__NLT(string_tmp__VH,result__WUYG);
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        __tmp__1NJF=TRUE__;
+        add_last__ZLT(string_tmp__VH,result__ET4G);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        __tmp__3AKF=TRUE__;
       } else {
-        __tmp__1NJF=FALSE__;
+        __tmp__3AKF=FALSE__;
       };
-      if ((! __tmp__1NJF)) {
-        result__1UYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__1UYG=((__CHARACTER )(( 0)));
+      if ((! __tmp__3AKF)) {
+        result__NT4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__NT4G=((__CHARACTER )(( 0)));
         } else {
-          result__1UYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__NT4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if (((((__INTEGER_8 )result__1UYG) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__1UYG) <= ((__INTEGER_8 )'9')))) {
-          result__2UYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__2UYG=((__CHARACTER )(( 0)));
+        if (((((__INTEGER_8 )result__NT4G) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__NT4G) <= ((__INTEGER_8 )'9')))) {
+          result__ST4G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__ST4G=((__CHARACTER )(( 0)));
           } else {
-            result__2UYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__ST4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((((result__2UYG == '0') && (position__GBC < ((__STRING *)source__DBC)->count__KFC)) && (! is_hexadecimal_digit__X4IE(((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)((__INTEGER)(position__GBC +  1) -  1)])))) {
-            result__AVYG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__AVYG=((__CHARACTER )(( 0)));
+          if ((((result__ST4G == '0') && (position__SBC < ((__STRING *)source__PBC)->count__WFC)) && (! is_hexadecimal_digit__AOJE(((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)])))) {
+            result__0T4G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__0T4G=((__CHARACTER )(( 0)));
             } else {
-              result__AVYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-            };
-            add_last__NLT(string_tmp__VH,result__AVYG);
-            position__GBC=(__INTEGER)(position__GBC +  1);
-          } else {
-            copy__NCS(string_tmp2__V5I,string_tmp__VH);
-            read_integer__U1P();
-            copy__NCS(string_tmp__VH,string_tmp2__V5I);
-            if ((last_integer__NRO >  255)) {
-              pos__HIRG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_288));
-              put_position__IOG(pos__HIRG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+              result__0T4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            };
+            add_last__ZLT(string_tmp__VH,result__0T4G);
+            position__SBC=(__INTEGER)(position__SBC +  1);
+          } else {
+            copy__ZCS(string_tmp2__BAJ,string_tmp__VH);
+            read_integer__A2P();
+            copy__ZCS(string_tmp__VH,string_tmp2__BAJ);
+            if ((last_integer__ZRO >  255)) {
+              pos__O0WG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_298));
+              put_position__UOG(pos__O0WG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            val__SIJF=((__INTEGER )last_integer__NRO);
-            add_last__NLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__SIJF >>  6)) + ((__INTEGER_8 )'0'))))));
-            add_last__NLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__SIJF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
-            add_last__NLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__SIJF &  7)) + ((__INTEGER_8 )'0'))))));
-            result__BVYG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__BVYG=((__CHARACTER )(( 0)));
+            val__U1JF=((__INTEGER )last_integer__ZRO);
+            add_last__ZLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__U1JF >>  6)) + ((__INTEGER_8 )'0'))))));
+            add_last__ZLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__U1JF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
+            add_last__ZLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__U1JF &  7)) + ((__INTEGER_8 )'0'))))));
+            result__5T4G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__5T4G=((__CHARACTER )(( 0)));
             } else {
-              result__BVYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__5T4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__BVYG == '\\')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
+            if ((result__5T4G == '\\')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
             } else {
-              pos__XIRG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_289));
-              put_position__IOG(pos__XIRG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+              pos__10WG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_299));
+              put_position__UOG(pos__10WG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          pos__ZIRG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_287));
-          put_position__IOG(pos__ZIRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+          pos__30WG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_297));
+          put_position__UOG(pos__30WG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
@@ -25836,10212 +26561,10212 @@ static void read_escape_character__PIJF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__GZJ()
+static __BOOLEAN read_cap_identifier__SZJ()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__JZJ,idx__KZJ;
-  __POSITION pos__MKRG;
-  __BOOLEAN result__LZJ,__tmp__ZZJ,result__1VYG,__tmp__N1J,result__IWYG;
-  __BOOLEAN result__JD2G,__tmp__J1J,__tmp__K1J,result__WD2G,__tmp__31J;
-  __CHARACTER result__AWYG,result__GWYG,result__HWYG,result__NWYG;
-  __CHARACTER result__OWYG,result__PWYG,result__QWYG;
-  posold__JZJ= 0;
-  idx__KZJ= 0;
-  result__LZJ=FALSE__;
-  if ((! read_space__RRD())) {
-    __tmp__ZZJ=TRUE__;
+  __INTEGER posold__VZJ,idx__WZJ;
+  __POSITION pos__Q2WG;
+  __BOOLEAN result__XZJ,__tmp__F0J,result__BV4G,__tmp__Z1J,result__4V4G;
+  __BOOLEAN result__HQCH,__tmp__V1J,__tmp__W1J,result__SQCH,__tmp__J2J;
+  __CHARACTER result__GV4G,result__QV4G,result__VV4G,result__DW4G;
+  __CHARACTER result__IW4G,result__NW4G,result__SW4G;
+  posold__VZJ= 0;
+  idx__WZJ= 0;
+  result__XZJ=FALSE__;
+  if ((! read_space__3RD())) {
+    __tmp__F0J=TRUE__;
   } else {
-    result__AWYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__AWYG=((__CHARACTER )(( 0)));
+    result__GV4G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__GV4G=((__CHARACTER )(( 0)));
     } else {
-      result__AWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__GV4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    result__1VYG=FALSE__;
-    if ((((__INTEGER_8 )result__AWYG) >= ((__INTEGER_8 )'A'))) {
-      result__1VYG=(((__INTEGER_8 )result__AWYG) <= ((__INTEGER_8 )'Z'));
+    result__BV4G=FALSE__;
+    if ((((__INTEGER_8 )result__GV4G) >= ((__INTEGER_8 )'A'))) {
+      result__BV4G=(((__INTEGER_8 )result__GV4G) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__ZZJ=(! result__1VYG);
+    __tmp__F0J=(! result__BV4G);
   };
-  if (__tmp__ZZJ) {
-    result__LZJ=FALSE__;
+  if (__tmp__F0J) {
+    result__XZJ=FALSE__;
   } else {
-    posold__JZJ=position__GBC;
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    result__GWYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__GWYG=((__CHARACTER )(( 0)));
-    } else {
-      result__GWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-    };
-    add_last__NLT(string_tmp__VH,result__GWYG);
-    position__GBC=(__INTEGER)(position__GBC +  1);
-    is_parameter_type__2JE=TRUE__;
-    until_do__AIYE:
+    posold__VZJ=position__SBC;
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    result__QV4G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__QV4G=((__CHARACTER )(( 0)));
+    } else {
+      result__QV4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    };
+    add_last__ZLT(string_tmp__VH,result__QV4G);
+    position__SBC=(__INTEGER)(position__SBC +  1);
+    is_parameter_type__IKE=TRUE__;
+    until_do__DDZE:
     {
-      result__HWYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__HWYG=((__CHARACTER )(( 0)));
+      result__VV4G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__VV4G=((__CHARACTER )(( 0)));
       } else {
-        result__HWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__VV4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__HWYG == ((__CHARACTER )(( 0))))) {
-        __tmp__N1J=TRUE__;
+      if ((result__VV4G == ((__CHARACTER )(( 0))))) {
+        __tmp__Z1J=TRUE__;
       } else {
-        result__NWYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__NWYG=((__CHARACTER )(( 0)));
+        result__DW4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__DW4G=((__CHARACTER )(( 0)));
         } else {
-          result__NWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__DW4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        result__IWYG=FALSE__;
-        if ((((__INTEGER_8 )result__NWYG) >= ((__INTEGER_8 )'A'))) {
-          result__IWYG=(((__INTEGER_8 )result__NWYG) <= ((__INTEGER_8 )'Z'));
+        result__4V4G=FALSE__;
+        if ((((__INTEGER_8 )result__DW4G) >= ((__INTEGER_8 )'A'))) {
+          result__4V4G=(((__INTEGER_8 )result__DW4G) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__IWYG)) {
-          result__OWYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__OWYG=((__CHARACTER )(( 0)));
+        if ((! result__4V4G)) {
+          result__IW4G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__IW4G=((__CHARACTER )(( 0)));
           } else {
-            result__OWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__IW4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          result__JD2G=FALSE__;
-          if ((((__INTEGER_8 )result__OWYG) >= ((__INTEGER_8 )'0'))) {
-            result__JD2G=(((__INTEGER_8 )result__OWYG) <= ((__INTEGER_8 )'9'));
+          result__HQCH=FALSE__;
+          if ((((__INTEGER_8 )result__IW4G) >= ((__INTEGER_8 )'0'))) {
+            result__HQCH=(((__INTEGER_8 )result__IW4G) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__J1J=(! result__JD2G);
+          __tmp__V1J=(! result__HQCH);
         } else {
-          __tmp__J1J=FALSE__;
+          __tmp__V1J=FALSE__;
         };
-        if (__tmp__J1J) {
-          result__PWYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__PWYG=((__CHARACTER )(( 0)));
+        if (__tmp__V1J) {
+          result__NW4G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__NW4G=((__CHARACTER )(( 0)));
           } else {
-            result__PWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__NW4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__K1J=(result__PWYG != '_');
+          __tmp__W1J=(result__NW4G != '_');
         } else {
-          __tmp__K1J=FALSE__;
+          __tmp__W1J=FALSE__;
         };
-        __tmp__N1J=__tmp__K1J;
+        __tmp__Z1J=__tmp__W1J;
       };
-      if ((! __tmp__N1J)) {
-        result__QWYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__QWYG=((__CHARACTER )(( 0)));
+      if ((! __tmp__Z1J)) {
+        result__SW4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__SW4G=((__CHARACTER )(( 0)));
         } else {
-          result__QWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__SW4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if (is_parameter_type__2JE) {
-          result__WD2G=FALSE__;
-          if ((((__INTEGER_8 )result__QWYG) >= ((__INTEGER_8 )'0'))) {
-            result__WD2G=(((__INTEGER_8 )result__QWYG) <= ((__INTEGER_8 )'9'));
+        if (is_parameter_type__IKE) {
+          result__SQCH=FALSE__;
+          if ((((__INTEGER_8 )result__SW4G) >= ((__INTEGER_8 )'0'))) {
+            result__SQCH=(((__INTEGER_8 )result__SW4G) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__31J=result__WD2G;
+          __tmp__J2J=result__SQCH;
         } else {
-          __tmp__31J=FALSE__;
+          __tmp__J2J=FALSE__;
         };
-        is_parameter_type__2JE=__tmp__31J;
-        add_last__NLT(string_tmp__VH,result__QWYG);
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto until_do__AIYE;
+        is_parameter_type__IKE=__tmp__J2J;
+        add_last__ZLT(string_tmp__VH,result__SW4G);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto until_do__DDZE;
       };
     };
-    idx__KZJ=first_substring_index__OIYE(string_tmp__VH);
-    if ((idx__KZJ !=  0)) {
-      position__GBC=(__INTEGER)(posold__JZJ + idx__KZJ);
-      pos__MKRG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_194));
-      put_position__IOG(pos__MKRG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    idx__WZJ=first_substring_index__RDZE(string_tmp__VH);
+    if ((idx__WZJ !=  0)) {
+      position__SBC=(__INTEGER)(posold__VZJ + idx__WZJ);
+      pos__Q2WG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_204));
+      put_position__UOG(pos__Q2WG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__2ZC=get__2VB(string_tmp__VH);
-    result__LZJ=TRUE__;
+    last_string__I0C=get__IWB(string_tmp__VH);
+    result__XZJ=TRUE__;
   };
-  return(result__LZJ);
+  return(result__XZJ);
 }
 
-static void add_last__GBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__HBBC,void *element__IBBC)
+static void add_last__SBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__TBBC,void *element__UBBC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__JBBC,__tmp__SCBC,__tmp__2ZSD,Self__WZWE;
-  __BOOLEAN __tmp__ZBBC;
-  void **__tmp__RCBC,**new__IZSD;
-  new_capacity__JBBC= 0;
-  if (((__INTEGER)(Self__HBBC->parent_arrayed_collection__HME.upper__KBBC +  1) <= (__INTEGER)(Self__HBBC->parent_arrayed_collection__HME.capacity__MBBC -  1))) {
-    Self__HBBC->parent_arrayed_collection__HME.upper__KBBC=(__INTEGER)(Self__HBBC->parent_arrayed_collection__HME.upper__KBBC +  1);
-    __tmp__ZBBC=TRUE__;
+  __INTEGER new_capacity__VBBC,__tmp__4CBC,__tmp__I0SD,Self__0LXE;
+  __BOOLEAN __tmp__FCBC;
+  void **__tmp__3CBC,**new__UZSD;
+  new_capacity__VBBC= 0;
+  if (((__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.upper__WBBC +  1) <= (__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC -  1))) {
+    Self__TBBC->parent_arrayed_collection__TME.upper__WBBC=(__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.upper__WBBC +  1);
+    __tmp__FCBC=TRUE__;
   } else {
-    __tmp__ZBBC=FALSE__;
-  };
-  if ((! __tmp__ZBBC)) {
-    if ((Self__HBBC->parent_arrayed_collection__HME.capacity__MBBC ==  0)) {
-      Self__HBBC->parent_arrayed_collection__HME.storage__ICBC=create__JY1C( 2);
-      Self__HBBC->parent_arrayed_collection__HME.capacity__MBBC= 2;
-      Self__HBBC->parent_arrayed_collection__HME.upper__KBBC= 0;
-    } else {
-      new_capacity__JBBC=(__INTEGER)(Self__HBBC->parent_arrayed_collection__HME.capacity__MBBC <<  1);
-      __tmp__RCBC=Self__HBBC->parent_arrayed_collection__HME.storage__ICBC;
-      __tmp__SCBC=Self__HBBC->parent_arrayed_collection__HME.capacity__MBBC;
-      new__IZSD=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__RCBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__SCBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__JBBC * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__2ZSD=(__INTEGER)(new_capacity__JBBC -  1);
-      Self__WZWE=__tmp__SCBC;
-      while ((Self__WZWE <= __tmp__2ZSD)) {
-        new__IZSD[Self__WZWE]=NULL;
-        Self__WZWE=(__INTEGER)(Self__WZWE +  1);
-      };
-      Self__HBBC->parent_arrayed_collection__HME.storage__ICBC=new__IZSD;
-      Self__HBBC->parent_arrayed_collection__HME.capacity__MBBC=new_capacity__JBBC;
-      Self__HBBC->parent_arrayed_collection__HME.upper__KBBC=(__INTEGER)(Self__HBBC->parent_arrayed_collection__HME.upper__KBBC +  1);
-    };
-  };
-  ((void **)Self__HBBC->parent_arrayed_collection__HME.storage__ICBC)[Self__HBBC->parent_arrayed_collection__HME.upper__KBBC]=element__IBBC;
+    __tmp__FCBC=FALSE__;
+  };
+  if ((! __tmp__FCBC)) {
+    if ((Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC ==  0)) {
+      Self__TBBC->parent_arrayed_collection__TME.storage__UCBC=create__VY1C( 2);
+      Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC= 2;
+      Self__TBBC->parent_arrayed_collection__TME.upper__WBBC= 0;
+    } else {
+      new_capacity__VBBC=(__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC <<  1);
+      __tmp__3CBC=Self__TBBC->parent_arrayed_collection__TME.storage__UCBC;
+      __tmp__4CBC=Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC;
+      new__UZSD=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__3CBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__4CBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VBBC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__I0SD=(__INTEGER)(new_capacity__VBBC -  1);
+      Self__0LXE=__tmp__4CBC;
+      while ((Self__0LXE <= __tmp__I0SD)) {
+        new__UZSD[Self__0LXE]=NULL;
+        Self__0LXE=(__INTEGER)(Self__0LXE +  1);
+      };
+      Self__TBBC->parent_arrayed_collection__TME.storage__UCBC=new__UZSD;
+      Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC=new_capacity__VBBC;
+      Self__TBBC->parent_arrayed_collection__TME.upper__WBBC=(__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.upper__WBBC +  1);
+    };
+  };
+  ((void **)Self__TBBC->parent_arrayed_collection__TME.storage__UCBC)[Self__TBBC->parent_arrayed_collection__TME.upper__WBBC]=element__UBBC;
 }
 
-static __BOOLEAN read_external__USO()
+static __BOOLEAN read_external__ATO()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos_old__YSO;
-  __BOOLEAN result__XSO,__tmp__DTO;
-  __CHARACTER result__BYYG,result__HYYG,result__IYYG,result__JYYG;
-  __CHARACTER result__KYYG,result__LYYG,result__MYYG,result__NYYG;
-  result__XSO=FALSE__;
-  pos_old__YSO= 0;
-  if ((! read_space__RRD())) {
-    __tmp__DTO=TRUE__;
+  __INTEGER pos_old__ETO;
+  __BOOLEAN result__DTO,__tmp__PTO;
+  __CHARACTER result__HY4G,result__RY4G,result__0Y4G,result__5Y4G;
+  __CHARACTER result__EZ4G,result__JZ4G,result__OZ4G,result__XZ4G;
+  result__DTO=FALSE__;
+  pos_old__ETO= 0;
+  if ((! read_space__3RD())) {
+    __tmp__PTO=TRUE__;
   } else {
-    result__BYYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__BYYG=((__CHARACTER )(( 0)));
+    result__HY4G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__HY4G=((__CHARACTER )(( 0)));
     } else {
-      result__BYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__HY4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    __tmp__DTO=(result__BYYG != '`');
+    __tmp__PTO=(result__HY4G != '`');
   };
-  if (__tmp__DTO) {
-    result__XSO=FALSE__;
+  if (__tmp__PTO) {
+    result__DTO=FALSE__;
   } else {
-    pos_old__YSO=position__GBC;
-    position__GBC=(__INTEGER)(position__GBC +  1);
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    until_do__OHRC:
+    pos_old__ETO=position__SBC;
+    position__SBC=(__INTEGER)(position__SBC +  1);
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    until_do__0HRC:
     {
-      result__HYYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__HYYG=((__CHARACTER )(( 0)));
+      result__RY4G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__RY4G=((__CHARACTER )(( 0)));
       } else {
-        result__HYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__RY4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      result__IYYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__IYYG=((__CHARACTER )(( 0)));
+      result__0Y4G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__0Y4G=((__CHARACTER )(( 0)));
       } else {
-        result__IYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__0Y4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((! ((result__HYYG == ((__CHARACTER )(( 0)))) | (result__IYYG == '`')))) {
-        result__JYYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__JYYG=((__CHARACTER )(( 0)));
+      if ((! ((result__RY4G == ((__CHARACTER )(( 0)))) | (result__0Y4G == '`')))) {
+        result__5Y4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__5Y4G=((__CHARACTER )(( 0)));
         } else {
-          result__JYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__5Y4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        add_last__NLT(string_tmp__VH,result__JYYG);
-        result__KYYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__KYYG=((__CHARACTER )(( 0)));
+        add_last__ZLT(string_tmp__VH,result__5Y4G);
+        result__EZ4G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__EZ4G=((__CHARACTER )(( 0)));
         } else {
-          result__KYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__EZ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__KYYG == '\\')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__LYYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__LYYG=((__CHARACTER )(( 0)));
+        if ((result__EZ4G == '\\')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__JZ4G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__JZ4G=((__CHARACTER )(( 0)));
           } else {
-            result__LYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__JZ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__LYYG);
-          result__MYYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__MYYG=((__CHARACTER )(( 0)));
+          add_last__ZLT(string_tmp__VH,result__JZ4G);
+          result__OZ4G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__OZ4G=((__CHARACTER )(( 0)));
           } else {
-            result__MYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__OZ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__MYYG != ((__CHARACTER )(( 0))))) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
+          if ((result__OZ4G != ((__CHARACTER )(( 0))))) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
           };
         } else {
-          position__GBC=(__INTEGER)(position__GBC +  1);
+          position__SBC=(__INTEGER)(position__SBC +  1);
         };
-        goto until_do__OHRC;
+        goto until_do__0HRC;
       };
     };
-    result__NYYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__NYYG=((__CHARACTER )(( 0)));
+    result__XZ4G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__XZ4G=((__CHARACTER )(( 0)));
     } else {
-      result__NYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__XZ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__NYYG != ((__CHARACTER )(( 0))))) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      last_string__2ZC=get__2VB(string_tmp__VH);
-      result__XSO=TRUE__;
-      short__token__to__5AD((&__string_65),pos_old__YSO,position__GBC);
+    if ((result__XZ4G != ((__CHARACTER )(( 0))))) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      last_string__I0C=get__IWB(string_tmp__VH);
+      result__DTO=TRUE__;
+      short__token__to__LBD((&__string_65),pos_old__ETO,position__SBC);
     } else {
-      result__XSO=FALSE__;
+      result__DTO=FALSE__;
     };
   };
-  return(result__XSO);
+  return(result__DTO);
 }
 
-static void* read_expr_primary__23M(__PARSER *Self__33M)
+static void* read_expr_primary__I4M(__PARSER *Self__J4M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__53M;
-  void *type__A4M;
-  void *group_sav__F4M,*lst__3JHB;
-  __POSITION p__SOBH,pos__WMRG,p__RLAB,p__R25G,p__4PBH,pos__YMRG,p__N0H;
-  __POSITION pos__0MRG,pos__CNRG,__tmp__JFN,__tmp__RFN,pos__QNRG;
-  __POSITION pos__SNRG,pos__UNRG,pos__WNRG;
-  __ITM_READ *result__KOBH,*result__MYGB;
-  __POINTER ptr__LOBH,ptr_table__UOBH,next__TOBH,result__VOBH;
-  __POINTER ptr_table__ZOBH,next__YOBH,result__0OBH,ptr__NYGB;
-  __POINTER ptr_table__APBH,next__5OBH,result__BPBH,ptr_table__FPBH;
-  __POINTER next__EPBH,result__GPBH,ptr__K25G,ptr_table__KPBH;
-  __POINTER next__JPBH,result__LPBH,ptr_table__PPBH,next__OPBH;
-  __POINTER result__QPBH,ptr__XPBH,ptr_table__AQBH,next__5PBH;
-  __POINTER result__BQBH,ptr_table__FQBH,next__EQBH,result__GQBH;
-  __POINTER ptr__LPI,ptr_table__QQBH,next__PQBH,result__RQBH;
-  __POINTER ptr_table__VQBH,next__UQBH,result__WQBH,ptr__VHMB;
-  __POINTER ptr_table__3QBH,next__2QBH,result__4QBH,ptr_table__CRBH;
-  __POINTER next__BRBH,result__DRBH,ptr__OVTB,ptr_table__NRBH;
-  __POINTER next__MRBH,result__ORBH,ptr_table__SRBH,next__RRBH;
-  __POINTER result__TRBH,ptr__CXTB,ptr_table__0RBH,next__ZRBH;
-  __POINTER result__1RBH,ptr_table__5RBH,next__4RBH,result__ASBH;
-  __INTEGER typ_id__MOBH,typ_id__SYGB,typ_id__L25G,typ_id__YPBH;
-  __INTEGER typ_id__QPI,typ_id__0HMB,typ_id__TVTB,typ_id__HXTB;
-  __UINTEGER_32 sz__NOBH,a__OOBH,new_size__POBH,t__QOBH,a__ROBH;
-  __UINTEGER_32 new_size__2OBH,lab_type__1OBH,sz__PYGB,a__DQ4G;
-  __UINTEGER_32 new_size__EQ4G,t__IQ4G,a__HQ4G,new_size__IPBH;
-  __UINTEGER_32 lab_type__HPBH,sz__M25G,a__N25G,new_size__O25G,t__P25G;
-  __UINTEGER_32 a__Q25G,new_size__SPBH,lab_type__RPBH,sz__ZPBH,a__0PBH;
-  __UINTEGER_32 new_size__1PBH,t__2PBH,a__3PBH,new_size__IQBH;
-  __UINTEGER_32 lab_type__HQBH,sz__NPI,a__LO4G,new_size__MO4G,t__QO4G;
-  __UINTEGER_32 a__PO4G,new_size__YQBH,lab_type__XQBH,sz__XHMB,a__QH4G;
-  __UINTEGER_32 new_size__RH4G,t__VH4G,a__UH4G,new_size__FRBH;
-  __UINTEGER_32 lab_type__ERBH,sz__QVTB,a__YH4G,new_size__ZH4G,t__3H4G;
-  __UINTEGER_32 a__2H4G,new_size__VRBH,lab_type__URBH,sz__EXTB,a__AI4G;
-  __UINTEGER_32 new_size__BI4G,t__FI4G,a__EI4G,new_size__CSBH;
-  __UINTEGER_32 lab_type__BSBH;
-  __ITM_PROTOTYPE *result__J25G;
-  __ITM_LIST *result__WPBH,*result__KPI;
-  __ITM_BLOCK *result__UHMB;
-  __ITM_EXTERNAL *result__NVTB;
-  __ITM_EXTERNAL_TYPE *result__BXTB,*Self__TZEC;
-  __BOOLEAN result__JOBH,__tmp__V4M,__tmp__YAN,result__4OBH;
-  __BOOLEAN result__OF2G,__tmp__HBN,result__VZN,__tmp__VBN,__tmp__SCN;
-  __BOOLEAN result__TPBH,result__JQBH,__tmp__VEN,result__MQBH;
-  __BOOLEAN result__ZQBH,result__GRBH,result__JRBH,result__WRBH;
-  __BOOLEAN result__DSBH,result__GSBH,result__JSBH,__tmp__LHN;
-  __CHARACTER result__OYYG,result__PYYG,result__QYYG,result__UPBH;
-  __CHARACTER result__KQBH,result__NQBH,result__0QBH,result__HRBH;
-  __CHARACTER result__KRBH,result__XRBH,result__ESBH,result__HSBH;
-  __CHARACTER result__KSBH;
-  result__53M=NULL;
-  type__A4M=NULL;
-  group_sav__F4M=NULL;
-  result__JOBH=read_word__EPF((&__string_58));
-  if (is_shorter__WY) {
-    if (result__JOBH) {
+  void *result__L4M;
+  void *type__M4M;
+  void *group_sav__R4M,*lst__JKHB;
+  __POSITION p__G1HH,pos__04WG,p__3LAB,p__3IGH,p__S2HH,pos__24WG,p__Z0H;
+  __POSITION pos__44WG,pos__G5WG,__tmp__VFN,__tmp__3FN,pos__U5WG;
+  __POSITION pos__W5WG,pos__Y5WG,pos__05WG;
+  __ITM_READ *result__40HH,*result__YYGB;
+  __POINTER ptr__50HH,ptr_table__I1HH,next__H1HH,result__J1HH;
+  __POINTER ptr_table__N1HH,next__M1HH,result__O1HH,ptr__ZYGB;
+  __POINTER ptr_table__U1HH,next__T1HH,result__V1HH,ptr_table__Z1HH;
+  __POINTER next__Y1HH,result__01HH,ptr__WIGH,ptr_table__41HH;
+  __POINTER next__31HH,result__51HH,ptr_table__D2HH,next__C2HH;
+  __POINTER result__E2HH,ptr__L2HH,ptr_table__U2HH,next__T2HH;
+  __POINTER result__V2HH,ptr_table__Z2HH,next__Y2HH,result__02HH;
+  __POINTER ptr__XPI,ptr_table__E3HH,next__D3HH,result__F3HH;
+  __POINTER ptr_table__J3HH,next__I3HH,result__K3HH,ptr__BIMB;
+  __POINTER ptr_table__R3HH,next__Q3HH,result__S3HH,ptr_table__W3HH;
+  __POINTER next__V3HH,result__X3HH,ptr__0VTB,ptr_table__B4HH;
+  __POINTER next__A4HH,result__C4HH,ptr_table__G4HH,next__F4HH;
+  __POINTER result__H4HH,ptr__OXTB,ptr_table__O4HH,next__N4HH;
+  __POINTER result__P4HH,ptr_table__T4HH,next__S4HH,result__U4HH;
+  __INTEGER typ_id__A1HH,typ_id__4YGB,typ_id__XIGH,typ_id__M2HH;
+  __INTEGER typ_id__2PI,typ_id__GIMB,typ_id__5VTB,typ_id__TXTB;
+  __UINTEGER_32 sz__B1HH,a__C1HH,new_size__D1HH,t__E1HH,a__F1HH;
+  __UINTEGER_32 new_size__Q1HH,lab_type__P1HH,sz__1YGB,a__Y1EH;
+  __UINTEGER_32 new_size__Z1EH,t__31EH,a__21EH,new_size__21HH;
+  __UINTEGER_32 lab_type__11HH,sz__YIGH,a__ZIGH,new_size__0IGH,t__1IGH;
+  __UINTEGER_32 a__2IGH,new_size__G2HH,lab_type__F2HH,sz__N2HH,a__O2HH;
+  __UINTEGER_32 new_size__P2HH,t__Q2HH,a__R2HH,new_size__22HH;
+  __UINTEGER_32 lab_type__12HH,sz__ZPI,a__A0EH,new_size__B0EH,t__F0EH;
+  __UINTEGER_32 a__E0EH,new_size__M3HH,lab_type__L3HH,sz__DIMB,a__FTEH;
+  __UINTEGER_32 new_size__GTEH,t__KTEH,a__JTEH,new_size__Z3HH;
+  __UINTEGER_32 lab_type__Y3HH,sz__2VTB,a__NTEH,new_size__OTEH,t__STEH;
+  __UINTEGER_32 a__RTEH,new_size__J4HH,lab_type__I4HH,sz__QXTB,a__VTEH;
+  __UINTEGER_32 new_size__WTEH,t__0TEH,a__ZTEH,new_size__W4HH;
+  __UINTEGER_32 lab_type__V4HH;
+  __ITM_PROTOTYPE *result__VIGH;
+  __ITM_LIST *result__K2HH,*result__WPI;
+  __ITM_BLOCK *result__AIMB;
+  __ITM_EXTERNAL *result__ZVTB;
+  __ITM_EXTERNAL_TYPE *result__NXTB,*Self__5ZEC;
+  __BOOLEAN result__30HH,__tmp__B5M,__tmp__EBN,result__S1HH;
+  __BOOLEAN result__3RCH,__tmp__TBN,result__B0N,__tmp__BCN,__tmp__4CN;
+  __BOOLEAN result__H2HH,result__32HH,__tmp__BFN,result__A3HH;
+  __BOOLEAN result__N3HH,result__03HH,result__33HH,result__K4HH;
+  __BOOLEAN result__X4HH,result__04HH,result__34HH,__tmp__XHN;
+  __CHARACTER result__A04G,result__F04G,result__K04G,result__I2HH;
+  __CHARACTER result__42HH,result__B3HH,result__O3HH,result__13HH;
+  __CHARACTER result__43HH,result__L4HH,result__Y4HH,result__14HH;
+  __CHARACTER result__44HH;
+  result__L4M=NULL;
+  type__M4M=NULL;
+  group_sav__R4M=NULL;
+  result__30HH=read_word__QPF((&__string_58));
+  if (is_shorter__5Y) {
+    if (result__30HH) {
       if (((void *)(&__string_58) == (void *)(&__string_4))) {
-        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-      } else {
-        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-      };
-    };
-  };
-  if (result__JOBH) {
-    p__SOBH=current_position__3WF();
-    result__KOBH=NULL;
-    ptr__LOBH=((__POINTER )(NULL));
-    typ_id__MOBH= 0;
-    sz__NOBH=((__UINTEGER_32 )sizeof(__ITM_READ));
-    if ((sz__NOBH ==  0)) {
-      result__KOBH=ITM_READ__;
-    } else {
-      typ_id__MOBH=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__NOBH);
-      if ((typ_id__MOBH == (__INTEGER)(-  1))) {
-        a__OOBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__POBH=(__UINTEGER_32)((__UINTEGER_32)(sz__NOBH + a__OOBH) & (__UINTEGER_32)(~ a__OOBH));
-        ptr_table__UOBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__POBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__TOBH=((__POINTER )(NULL));
-        result__VOBH=((__POINTER *)ptr_table__UOBH)[ 0];
-        if ((result__VOBH == (void *)NULL)) {
-          result__VOBH=new_lab__ARJ(new_size__POBH);
-          next__TOBH=(void *)((unsigned long)result__VOBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POBH)));
-          ((__POINTER *)next__TOBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UOBH)[ 0]=next__TOBH;
-        } else {
-          next__TOBH=((__POINTER *)result__VOBH)[ 0];
-          if ((next__TOBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VOBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__POBH <<  1)) <=  4096)) {
-              next__TOBH=(void *)((unsigned long)result__VOBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POBH)));
+        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+      } else {
+        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+      };
+    };
+  };
+  if (result__30HH) {
+    p__G1HH=current_position__JXF();
+    result__40HH=NULL;
+    ptr__50HH=((__POINTER )(NULL));
+    typ_id__A1HH= 0;
+    sz__B1HH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__B1HH ==  0)) {
+      result__40HH=ITM_READ__;
+    } else {
+      typ_id__A1HH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__B1HH);
+      if ((typ_id__A1HH == (__INTEGER)(-  1))) {
+        a__C1HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__D1HH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1HH + a__C1HH) & (__UINTEGER_32)(~ a__C1HH));
+        ptr_table__I1HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D1HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__H1HH=((__POINTER )(NULL));
+        result__J1HH=((__POINTER *)ptr_table__I1HH)[ 0];
+        if ((result__J1HH == (void *)NULL)) {
+          result__J1HH=new_lab__MRJ(new_size__D1HH);
+          next__H1HH=(void *)((unsigned long)result__J1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D1HH)));
+          ((__POINTER *)next__H1HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I1HH)[ 0]=next__H1HH;
+        } else {
+          next__H1HH=((__POINTER *)result__J1HH)[ 0];
+          if ((next__H1HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J1HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__D1HH <<  1)) <=  4096)) {
+              next__H1HH=(void *)((unsigned long)result__J1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D1HH)));
             } else {
-              next__TOBH=new_lab__ARJ(new_size__POBH);
-            };
-            ((__POINTER *)next__TOBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UOBH)[ 0]=next__TOBH;
-          } else {
-            ((__POINTER *)result__VOBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TOBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VOBH=next__TOBH;
-          };
-        };
-        ptr__LOBH=result__VOBH;
-      } else {
-        t__QOBH=((__UINTEGER_32 )typ_id__MOBH);
-        a__ROBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__2OBH=(__UINTEGER_32)((__UINTEGER_32)(sz__NOBH + a__ROBH) & (__UINTEGER_32)(~ a__ROBH));
-        ptr_table__ZOBH=((__POINTER )(&(table_type[(t__QOBH)])));
-        lab_type__1OBH=(__UINTEGER_32)(t__QOBH |  1);
-        next__YOBH=((__POINTER )(NULL));
-        result__0OBH=((__POINTER *)ptr_table__ZOBH)[ 0];
-        if ((result__0OBH == (void *)NULL)) {
-          result__0OBH=new_lab__ARJ(lab_type__1OBH);
-          next__YOBH=(void *)((unsigned long)result__0OBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OBH)));
-          ((__POINTER *)next__YOBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZOBH)[ 0]=next__YOBH;
-        } else {
-          next__YOBH=((__POINTER *)result__0OBH)[ 0];
-          if ((next__YOBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0OBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__2OBH <<  1)) <=  4096)) {
-              next__YOBH=(void *)((unsigned long)result__0OBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OBH)));
+              next__H1HH=new_lab__MRJ(new_size__D1HH);
+            };
+            ((__POINTER *)next__H1HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__I1HH)[ 0]=next__H1HH;
+          } else {
+            ((__POINTER *)result__J1HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__J1HH=next__H1HH;
+          };
+        };
+        ptr__50HH=result__J1HH;
+      } else {
+        t__E1HH=((__UINTEGER_32 )typ_id__A1HH);
+        a__F1HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Q1HH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1HH + a__F1HH) & (__UINTEGER_32)(~ a__F1HH));
+        ptr_table__N1HH=((__POINTER )(&(table_type[(t__E1HH)])));
+        lab_type__P1HH=(__UINTEGER_32)(t__E1HH |  1);
+        next__M1HH=((__POINTER )(NULL));
+        result__O1HH=((__POINTER *)ptr_table__N1HH)[ 0];
+        if ((result__O1HH == (void *)NULL)) {
+          result__O1HH=new_lab__MRJ(lab_type__P1HH);
+          next__M1HH=(void *)((unsigned long)result__O1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q1HH)));
+          ((__POINTER *)next__M1HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N1HH)[ 0]=next__M1HH;
+        } else {
+          next__M1HH=((__POINTER *)result__O1HH)[ 0];
+          if ((next__M1HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O1HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q1HH <<  1)) <=  4096)) {
+              next__M1HH=(void *)((unsigned long)result__O1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q1HH)));
             } else {
-              next__YOBH=new_lab__ARJ(lab_type__1OBH);
+              next__M1HH=new_lab__MRJ(lab_type__P1HH);
             };
-            ((__POINTER *)next__YOBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZOBH)[ 0]=next__YOBH;
+            ((__POINTER *)next__M1HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__N1HH)[ 0]=next__M1HH;
           } else {
-            ((__POINTER *)result__0OBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0OBH=next__YOBH;
+            ((__POINTER *)result__O1HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__O1HH=next__M1HH;
           };
         };
-        ptr__LOBH=result__0OBH;
+        ptr__50HH=result__O1HH;
       };
-      result__KOBH=((__ITM_READ *)ptr__LOBH);
-      *(result__KOBH) = *(ITM_READ__);
+      result__40HH=((__ITM_READ *)ptr__50HH);
+      *(result__40HH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__KOBH)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__SOBH;
-    result__53M=result__KOBH;
-    __tmp__V4M=TRUE__;
+    ((__ITM_READ *)result__40HH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__G1HH;
+    result__L4M=result__40HH;
+    __tmp__B5M=TRUE__;
   } else {
-    __tmp__V4M=FALSE__;
+    __tmp__B5M=FALSE__;
   };
-  if (__tmp__V4M) {
-    __tmp__YAN=TRUE__;
+  if (__tmp__B5M) {
+    __tmp__EBN=TRUE__;
   } else {
-    result__4OBH=read_word__EPF((&__string_11));
-    if (is_shorter__WY) {
-      if (result__4OBH) {
+    result__S1HH=read_word__QPF((&__string_11));
+    if (is_shorter__5Y) {
+      if (result__S1HH) {
         if (((void *)(&__string_11) == (void *)(&__string_4))) {
-          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         } else {
-          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
         };
       };
     };
-    if (result__4OBH) {
-      result__OYYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__OYYG=((__CHARACTER )(( 0)));
+    if (result__S1HH) {
+      result__A04G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__A04G=((__CHARACTER )(( 0)));
       } else {
-        result__OYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__A04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__OYYG == '_')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        copy__NCS(string_tmp__VH,(&__string_11));
-        add_last__NLT(string_tmp__VH,'_');
-        while_do__YVQB:
+      if ((result__A04G == '_')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        copy__ZCS(string_tmp__VH,(&__string_11));
+        add_last__ZLT(string_tmp__VH,'_');
+        while_do__EWQB:
         {
-          result__PYYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__PYYG=((__CHARACTER )(( 0)));
+          result__F04G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__F04G=((__CHARACTER )(( 0)));
           } else {
-            result__PYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__F04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          result__OF2G=FALSE__;
-          if ((((__INTEGER_8 )result__PYYG) >= ((__INTEGER_8 )'0'))) {
-            result__OF2G=(((__INTEGER_8 )result__PYYG) <= ((__INTEGER_8 )'9'));
+          result__3RCH=FALSE__;
+          if ((((__INTEGER_8 )result__F04G) >= ((__INTEGER_8 )'0'))) {
+            result__3RCH=(((__INTEGER_8 )result__F04G) <= ((__INTEGER_8 )'9'));
           };
-          if (result__OF2G) {
-            result__QYYG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__QYYG=((__CHARACTER )(( 0)));
+          if (result__3RCH) {
+            result__K04G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__K04G=((__CHARACTER )(( 0)));
             } else {
-              result__QYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__K04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            add_last__NLT(string_tmp__VH,result__QYYG);
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            goto while_do__YVQB;
+            add_last__ZLT(string_tmp__VH,result__K04G);
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            goto while_do__EWQB;
           };
         };
-        if ((((__STRING *)string_tmp__VH)->count__KFC ==  0)) {
-          pos__WMRG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_290));
-          put_position__IOG(pos__WMRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((((__STRING *)string_tmp__VH)->count__WFC ==  0)) {
+          pos__04WG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_300));
+          put_position__UOG(pos__04WG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        get__2VB(string_tmp__VH);
-      };
-      p__RLAB=current_position__3WF();
-      result__MYGB=NULL;
-      ptr__NYGB=((__POINTER )(NULL));
-      typ_id__SYGB= 0;
-      sz__PYGB=((__UINTEGER_32 )sizeof(__ITM_READ));
-      if ((sz__PYGB ==  0)) {
-        result__MYGB=ITM_READ__;
-      } else {
-        typ_id__SYGB=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__PYGB);
-        if ((typ_id__SYGB == (__INTEGER)(-  1))) {
-          a__DQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__EQ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__PYGB + a__DQ4G) & (__UINTEGER_32)(~ a__DQ4G));
-          ptr_table__APBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EQ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__5OBH=((__POINTER )(NULL));
-          result__BPBH=((__POINTER *)ptr_table__APBH)[ 0];
-          if ((result__BPBH == (void *)NULL)) {
-            result__BPBH=new_lab__ARJ(new_size__EQ4G);
-            next__5OBH=(void *)((unsigned long)result__BPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQ4G)));
-            ((__POINTER *)next__5OBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__APBH)[ 0]=next__5OBH;
-          } else {
-            next__5OBH=((__POINTER *)result__BPBH)[ 0];
-            if ((next__5OBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BPBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__EQ4G <<  1)) <=  4096)) {
-                next__5OBH=(void *)((unsigned long)result__BPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQ4G)));
+        get__IWB(string_tmp__VH);
+      };
+      p__3LAB=current_position__JXF();
+      result__YYGB=NULL;
+      ptr__ZYGB=((__POINTER )(NULL));
+      typ_id__4YGB= 0;
+      sz__1YGB=((__UINTEGER_32 )sizeof(__ITM_READ));
+      if ((sz__1YGB ==  0)) {
+        result__YYGB=ITM_READ__;
+      } else {
+        typ_id__4YGB=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1YGB);
+        if ((typ_id__4YGB == (__INTEGER)(-  1))) {
+          a__Y1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z1EH=(__UINTEGER_32)((__UINTEGER_32)(sz__1YGB + a__Y1EH) & (__UINTEGER_32)(~ a__Y1EH));
+          ptr_table__U1HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z1EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__T1HH=((__POINTER )(NULL));
+          result__V1HH=((__POINTER *)ptr_table__U1HH)[ 0];
+          if ((result__V1HH == (void *)NULL)) {
+            result__V1HH=new_lab__MRJ(new_size__Z1EH);
+            next__T1HH=(void *)((unsigned long)result__V1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1EH)));
+            ((__POINTER *)next__T1HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__U1HH)[ 0]=next__T1HH;
+          } else {
+            next__T1HH=((__POINTER *)result__V1HH)[ 0];
+            if ((next__T1HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V1HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Z1EH <<  1)) <=  4096)) {
+                next__T1HH=(void *)((unsigned long)result__V1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1EH)));
               } else {
-                next__5OBH=new_lab__ARJ(new_size__EQ4G);
+                next__T1HH=new_lab__MRJ(new_size__Z1EH);
               };
-              ((__POINTER *)next__5OBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__APBH)[ 0]=next__5OBH;
+              ((__POINTER *)next__T1HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__U1HH)[ 0]=next__T1HH;
             } else {
-              ((__POINTER *)result__BPBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BPBH=next__5OBH;
-            };
-          };
-          ptr__NYGB=result__BPBH;
-        } else {
-          t__IQ4G=((__UINTEGER_32 )typ_id__SYGB);
-          a__HQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__IPBH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYGB + a__HQ4G) & (__UINTEGER_32)(~ a__HQ4G));
-          ptr_table__FPBH=((__POINTER )(&(table_type[(t__IQ4G)])));
-          lab_type__HPBH=(__UINTEGER_32)(t__IQ4G |  1);
-          next__EPBH=((__POINTER )(NULL));
-          result__GPBH=((__POINTER *)ptr_table__FPBH)[ 0];
-          if ((result__GPBH == (void *)NULL)) {
-            result__GPBH=new_lab__ARJ(lab_type__HPBH);
-            next__EPBH=(void *)((unsigned long)result__GPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IPBH)));
-            ((__POINTER *)next__EPBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FPBH)[ 0]=next__EPBH;
-          } else {
-            next__EPBH=((__POINTER *)result__GPBH)[ 0];
-            if ((next__EPBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GPBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__IPBH <<  1)) <=  4096)) {
-                next__EPBH=(void *)((unsigned long)result__GPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IPBH)));
+              ((__POINTER *)result__V1HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__V1HH=next__T1HH;
+            };
+          };
+          ptr__ZYGB=result__V1HH;
+        } else {
+          t__31EH=((__UINTEGER_32 )typ_id__4YGB);
+          a__21EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__21HH=(__UINTEGER_32)((__UINTEGER_32)(sz__1YGB + a__21EH) & (__UINTEGER_32)(~ a__21EH));
+          ptr_table__Z1HH=((__POINTER )(&(table_type[(t__31EH)])));
+          lab_type__11HH=(__UINTEGER_32)(t__31EH |  1);
+          next__Y1HH=((__POINTER )(NULL));
+          result__01HH=((__POINTER *)ptr_table__Z1HH)[ 0];
+          if ((result__01HH == (void *)NULL)) {
+            result__01HH=new_lab__MRJ(lab_type__11HH);
+            next__Y1HH=(void *)((unsigned long)result__01HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21HH)));
+            ((__POINTER *)next__Y1HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Z1HH)[ 0]=next__Y1HH;
+          } else {
+            next__Y1HH=((__POINTER *)result__01HH)[ 0];
+            if ((next__Y1HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__01HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__21HH <<  1)) <=  4096)) {
+                next__Y1HH=(void *)((unsigned long)result__01HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21HH)));
               } else {
-                next__EPBH=new_lab__ARJ(lab_type__HPBH);
+                next__Y1HH=new_lab__MRJ(lab_type__11HH);
               };
-              ((__POINTER *)next__EPBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FPBH)[ 0]=next__EPBH;
+              ((__POINTER *)next__Y1HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Z1HH)[ 0]=next__Y1HH;
             } else {
-              ((__POINTER *)result__GPBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EPBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GPBH=next__EPBH;
+              ((__POINTER *)result__01HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__01HH=next__Y1HH;
             };
           };
-          ptr__NYGB=result__GPBH;
+          ptr__ZYGB=result__01HH;
         };
-        result__MYGB=((__ITM_READ *)ptr__NYGB);
-        *(result__MYGB) = *(ITM_READ__);
+        result__YYGB=((__ITM_READ *)ptr__ZYGB);
+        *(result__YYGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__MYGB)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__RLAB;
-      result__53M=result__MYGB;
+      ((__ITM_READ *)result__YYGB)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__3LAB;
+      result__L4M=result__YYGB;
     };
-    __tmp__YAN=result__4OBH;
+    __tmp__EBN=result__S1HH;
   };
-  if (__tmp__YAN) {
-    __tmp__HBN=TRUE__;
+  if (__tmp__EBN) {
+    __tmp__TBN=TRUE__;
   } else {
-    type__A4M=read_prototype__1NN(Self__33M,NULL);
-    result__VZN=((void *)type__A4M != (void *)NULL);
-    if (result__VZN) {
-      p__R25G=current_position__3WF();
-      result__J25G=NULL;
-      ptr__K25G=((__POINTER )(NULL));
-      typ_id__L25G= 0;
-      sz__M25G=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-      if ((sz__M25G ==  0)) {
-        result__J25G=ITM_PROTOTYPE__;
-      } else {
-        typ_id__L25G=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M25G);
-        if ((typ_id__L25G == (__INTEGER)(-  1))) {
-          a__N25G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__O25G=(__UINTEGER_32)((__UINTEGER_32)(sz__M25G + a__N25G) & (__UINTEGER_32)(~ a__N25G));
-          ptr_table__KPBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O25G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__JPBH=((__POINTER )(NULL));
-          result__LPBH=((__POINTER *)ptr_table__KPBH)[ 0];
-          if ((result__LPBH == (void *)NULL)) {
-            result__LPBH=new_lab__ARJ(new_size__O25G);
-            next__JPBH=(void *)((unsigned long)result__LPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O25G)));
-            ((__POINTER *)next__JPBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KPBH)[ 0]=next__JPBH;
-          } else {
-            next__JPBH=((__POINTER *)result__LPBH)[ 0];
-            if ((next__JPBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LPBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__O25G <<  1)) <=  4096)) {
-                next__JPBH=(void *)((unsigned long)result__LPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O25G)));
+    type__M4M=read_prototype__HON(Self__J4M,NULL);
+    result__B0N=((void *)type__M4M != (void *)NULL);
+    if (result__B0N) {
+      p__3IGH=current_position__JXF();
+      result__VIGH=NULL;
+      ptr__WIGH=((__POINTER )(NULL));
+      typ_id__XIGH= 0;
+      sz__YIGH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+      if ((sz__YIGH ==  0)) {
+        result__VIGH=ITM_PROTOTYPE__;
+      } else {
+        typ_id__XIGH=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YIGH);
+        if ((typ_id__XIGH == (__INTEGER)(-  1))) {
+          a__ZIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0IGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YIGH + a__ZIGH) & (__UINTEGER_32)(~ a__ZIGH));
+          ptr_table__41HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0IGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__31HH=((__POINTER )(NULL));
+          result__51HH=((__POINTER *)ptr_table__41HH)[ 0];
+          if ((result__51HH == (void *)NULL)) {
+            result__51HH=new_lab__MRJ(new_size__0IGH);
+            next__31HH=(void *)((unsigned long)result__51HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IGH)));
+            ((__POINTER *)next__31HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__41HH)[ 0]=next__31HH;
+          } else {
+            next__31HH=((__POINTER *)result__51HH)[ 0];
+            if ((next__31HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__51HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0IGH <<  1)) <=  4096)) {
+                next__31HH=(void *)((unsigned long)result__51HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IGH)));
               } else {
-                next__JPBH=new_lab__ARJ(new_size__O25G);
+                next__31HH=new_lab__MRJ(new_size__0IGH);
               };
-              ((__POINTER *)next__JPBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KPBH)[ 0]=next__JPBH;
+              ((__POINTER *)next__31HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__41HH)[ 0]=next__31HH;
             } else {
-              ((__POINTER *)result__LPBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JPBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__LPBH=next__JPBH;
-            };
-          };
-          ptr__K25G=result__LPBH;
-        } else {
-          t__P25G=((__UINTEGER_32 )typ_id__L25G);
-          a__Q25G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__SPBH=(__UINTEGER_32)((__UINTEGER_32)(sz__M25G + a__Q25G) & (__UINTEGER_32)(~ a__Q25G));
-          ptr_table__PPBH=((__POINTER )(&(table_type[(t__P25G)])));
-          lab_type__RPBH=(__UINTEGER_32)(t__P25G |  1);
-          next__OPBH=((__POINTER )(NULL));
-          result__QPBH=((__POINTER *)ptr_table__PPBH)[ 0];
-          if ((result__QPBH == (void *)NULL)) {
-            result__QPBH=new_lab__ARJ(lab_type__RPBH);
-            next__OPBH=(void *)((unsigned long)result__QPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SPBH)));
-            ((__POINTER *)next__OPBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PPBH)[ 0]=next__OPBH;
-          } else {
-            next__OPBH=((__POINTER *)result__QPBH)[ 0];
-            if ((next__OPBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QPBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SPBH <<  1)) <=  4096)) {
-                next__OPBH=(void *)((unsigned long)result__QPBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SPBH)));
+              ((__POINTER *)result__51HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__31HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__51HH=next__31HH;
+            };
+          };
+          ptr__WIGH=result__51HH;
+        } else {
+          t__1IGH=((__UINTEGER_32 )typ_id__XIGH);
+          a__2IGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__G2HH=(__UINTEGER_32)((__UINTEGER_32)(sz__YIGH + a__2IGH) & (__UINTEGER_32)(~ a__2IGH));
+          ptr_table__D2HH=((__POINTER )(&(table_type[(t__1IGH)])));
+          lab_type__F2HH=(__UINTEGER_32)(t__1IGH |  1);
+          next__C2HH=((__POINTER )(NULL));
+          result__E2HH=((__POINTER *)ptr_table__D2HH)[ 0];
+          if ((result__E2HH == (void *)NULL)) {
+            result__E2HH=new_lab__MRJ(lab_type__F2HH);
+            next__C2HH=(void *)((unsigned long)result__E2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2HH)));
+            ((__POINTER *)next__C2HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__D2HH)[ 0]=next__C2HH;
+          } else {
+            next__C2HH=((__POINTER *)result__E2HH)[ 0];
+            if ((next__C2HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__G2HH <<  1)) <=  4096)) {
+                next__C2HH=(void *)((unsigned long)result__E2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2HH)));
               } else {
-                next__OPBH=new_lab__ARJ(lab_type__RPBH);
+                next__C2HH=new_lab__MRJ(lab_type__F2HH);
               };
-              ((__POINTER *)next__OPBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PPBH)[ 0]=next__OPBH;
+              ((__POINTER *)next__C2HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__D2HH)[ 0]=next__C2HH;
             } else {
-              ((__POINTER *)result__QPBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OPBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__QPBH=next__OPBH;
+              ((__POINTER *)result__E2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__E2HH=next__C2HH;
             };
           };
-          ptr__K25G=result__QPBH;
+          ptr__WIGH=result__E2HH;
         };
-        result__J25G=((__ITM_PROTOTYPE *)ptr__K25G);
-        *(result__J25G) = *(ITM_PROTOTYPE__);
+        result__VIGH=((__ITM_PROTOTYPE *)ptr__WIGH);
+        *(result__VIGH) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__J25G)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=p__R25G;
-      result__53M=result__J25G;
+      ((__ITM_PROTOTYPE *)result__VIGH)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=p__3IGH;
+      result__L4M=result__VIGH;
     };
-    __tmp__HBN=result__VZN;
+    __tmp__TBN=result__B0N;
   };
-  if (__tmp__HBN) {
-    __tmp__VBN=TRUE__;
+  if (__tmp__TBN) {
+    __tmp__BCN=TRUE__;
   } else {
-    result__53M=read_constant__PQO();
-    __tmp__VBN=((void *)result__53M != (void *)NULL);
+    result__L4M=read_constant__1QO();
+    __tmp__BCN=((void *)result__L4M != (void *)NULL);
   };
-  if (__tmp__VBN) {
-    __tmp__SCN=TRUE__;
+  if (__tmp__BCN) {
+    __tmp__4CN=TRUE__;
   } else {
-    result__TPBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__TPBH=FALSE__;
-    } else {
-      result__UPBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__UPBH=((__CHARACTER )(( 0)));
-      } else {
-        result__UPBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-      };
-      if ((result__UPBH == '(')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__TPBH=TRUE__;
-      };
-    };
-    if (result__TPBH) {
-      group_sav__F4M=last_group__PTF;
-      p__4PBH=current_position__3WF();
-      result__WPBH=NULL;
-      ptr__XPBH=((__POINTER )(NULL));
-      typ_id__YPBH= 0;
-      sz__ZPBH=((__UINTEGER_32 )sizeof(__ITM_LIST));
-      if ((sz__ZPBH ==  0)) {
-        result__WPBH=ITM_LIST__;
-      } else {
-        typ_id__YPBH=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ZPBH);
-        if ((typ_id__YPBH == (__INTEGER)(-  1))) {
-          a__0PBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__1PBH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZPBH + a__0PBH) & (__UINTEGER_32)(~ a__0PBH));
-          ptr_table__AQBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__5PBH=((__POINTER )(NULL));
-          result__BQBH=((__POINTER *)ptr_table__AQBH)[ 0];
-          if ((result__BQBH == (void *)NULL)) {
-            result__BQBH=new_lab__ARJ(new_size__1PBH);
-            next__5PBH=(void *)((unsigned long)result__BQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PBH)));
-            ((__POINTER *)next__5PBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AQBH)[ 0]=next__5PBH;
-          } else {
-            next__5PBH=((__POINTER *)result__BQBH)[ 0];
-            if ((next__5PBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BQBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1PBH <<  1)) <=  4096)) {
-                next__5PBH=(void *)((unsigned long)result__BQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PBH)));
+    result__H2HH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__H2HH=FALSE__;
+    } else {
+      result__I2HH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__I2HH=((__CHARACTER )(( 0)));
+      } else {
+        result__I2HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      };
+      if ((result__I2HH == '(')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__H2HH=TRUE__;
+      };
+    };
+    if (result__H2HH) {
+      group_sav__R4M=last_group__1TF;
+      p__S2HH=current_position__JXF();
+      result__K2HH=NULL;
+      ptr__L2HH=((__POINTER )(NULL));
+      typ_id__M2HH= 0;
+      sz__N2HH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__N2HH ==  0)) {
+        result__K2HH=ITM_LIST__;
+      } else {
+        typ_id__M2HH=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__N2HH);
+        if ((typ_id__M2HH == (__INTEGER)(-  1))) {
+          a__O2HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__P2HH=(__UINTEGER_32)((__UINTEGER_32)(sz__N2HH + a__O2HH) & (__UINTEGER_32)(~ a__O2HH));
+          ptr_table__U2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P2HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__T2HH=((__POINTER )(NULL));
+          result__V2HH=((__POINTER *)ptr_table__U2HH)[ 0];
+          if ((result__V2HH == (void *)NULL)) {
+            result__V2HH=new_lab__MRJ(new_size__P2HH);
+            next__T2HH=(void *)((unsigned long)result__V2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P2HH)));
+            ((__POINTER *)next__T2HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__U2HH)[ 0]=next__T2HH;
+          } else {
+            next__T2HH=((__POINTER *)result__V2HH)[ 0];
+            if ((next__T2HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__P2HH <<  1)) <=  4096)) {
+                next__T2HH=(void *)((unsigned long)result__V2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P2HH)));
               } else {
-                next__5PBH=new_lab__ARJ(new_size__1PBH);
+                next__T2HH=new_lab__MRJ(new_size__P2HH);
               };
-              ((__POINTER *)next__5PBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AQBH)[ 0]=next__5PBH;
+              ((__POINTER *)next__T2HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__U2HH)[ 0]=next__T2HH;
             } else {
-              ((__POINTER *)result__BQBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BQBH=next__5PBH;
-            };
-          };
-          ptr__XPBH=result__BQBH;
-        } else {
-          t__2PBH=((__UINTEGER_32 )typ_id__YPBH);
-          a__3PBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__IQBH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZPBH + a__3PBH) & (__UINTEGER_32)(~ a__3PBH));
-          ptr_table__FQBH=((__POINTER )(&(table_type[(t__2PBH)])));
-          lab_type__HQBH=(__UINTEGER_32)(t__2PBH |  1);
-          next__EQBH=((__POINTER )(NULL));
-          result__GQBH=((__POINTER *)ptr_table__FQBH)[ 0];
-          if ((result__GQBH == (void *)NULL)) {
-            result__GQBH=new_lab__ARJ(lab_type__HQBH);
-            next__EQBH=(void *)((unsigned long)result__GQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IQBH)));
-            ((__POINTER *)next__EQBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FQBH)[ 0]=next__EQBH;
-          } else {
-            next__EQBH=((__POINTER *)result__GQBH)[ 0];
-            if ((next__EQBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GQBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__IQBH <<  1)) <=  4096)) {
-                next__EQBH=(void *)((unsigned long)result__GQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IQBH)));
+              ((__POINTER *)result__V2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__V2HH=next__T2HH;
+            };
+          };
+          ptr__L2HH=result__V2HH;
+        } else {
+          t__Q2HH=((__UINTEGER_32 )typ_id__M2HH);
+          a__R2HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__22HH=(__UINTEGER_32)((__UINTEGER_32)(sz__N2HH + a__R2HH) & (__UINTEGER_32)(~ a__R2HH));
+          ptr_table__Z2HH=((__POINTER )(&(table_type[(t__Q2HH)])));
+          lab_type__12HH=(__UINTEGER_32)(t__Q2HH |  1);
+          next__Y2HH=((__POINTER )(NULL));
+          result__02HH=((__POINTER *)ptr_table__Z2HH)[ 0];
+          if ((result__02HH == (void *)NULL)) {
+            result__02HH=new_lab__MRJ(lab_type__12HH);
+            next__Y2HH=(void *)((unsigned long)result__02HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22HH)));
+            ((__POINTER *)next__Y2HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Z2HH)[ 0]=next__Y2HH;
+          } else {
+            next__Y2HH=((__POINTER *)result__02HH)[ 0];
+            if ((next__Y2HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__02HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__22HH <<  1)) <=  4096)) {
+                next__Y2HH=(void *)((unsigned long)result__02HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22HH)));
               } else {
-                next__EQBH=new_lab__ARJ(lab_type__HQBH);
+                next__Y2HH=new_lab__MRJ(lab_type__12HH);
               };
-              ((__POINTER *)next__EQBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FQBH)[ 0]=next__EQBH;
+              ((__POINTER *)next__Y2HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Z2HH)[ 0]=next__Y2HH;
             } else {
-              ((__POINTER *)result__GQBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EQBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GQBH=next__EQBH;
+              ((__POINTER *)result__02HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__02HH=next__Y2HH;
             };
           };
-          ptr__XPBH=result__GQBH;
+          ptr__L2HH=result__02HH;
         };
-        result__WPBH=((__ITM_LIST *)ptr__XPBH);
-        *(result__WPBH) = *(ITM_LIST__);
+        result__K2HH=((__ITM_LIST *)ptr__L2HH);
+        *(result__K2HH) = *(ITM_LIST__);
       };
-      ((__ITM_LIST *)result__WPBH)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ=p__4PBH;
-      last_group__PTF=result__WPBH;
-      result__53M=result__WPBH;
-      read_group__3AHB(Self__33M);
-      result__JQBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__JQBH=FALSE__;
+      ((__ITM_LIST *)result__K2HH)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ=p__S2HH;
+      last_group__1TF=result__K2HH;
+      result__L4M=result__K2HH;
+      read_group__JBHB(Self__J4M);
+      result__32HH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__32HH=FALSE__;
       } else {
-        result__KQBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__KQBH=((__CHARACTER )(( 0)));
+        result__42HH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__42HH=((__CHARACTER )(( 0)));
         } else {
-          result__KQBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__42HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__KQBH == ')')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__JQBH=TRUE__;
+        if ((result__42HH == ')')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__32HH=TRUE__;
         };
       };
-      if ((! result__JQBH)) {
-        pos__YMRG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_248));
-        put_position__IOG(pos__YMRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((! result__32HH)) {
+        pos__24WG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_258));
+        put_position__UOG(pos__24WG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      last_group__PTF=group_sav__F4M;
+      last_group__1TF=group_sav__R4M;
     };
-    __tmp__SCN=result__TPBH;
+    __tmp__4CN=result__H2HH;
   };
-  if (__tmp__SCN) {
-    __tmp__VEN=TRUE__;
+  if (__tmp__4CN) {
+    __tmp__BFN=TRUE__;
   } else {
-    result__MQBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__MQBH=FALSE__;
-    } else {
-      result__NQBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__NQBH=((__CHARACTER )(( 0)));
-      } else {
-        result__NQBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-      };
-      if ((result__NQBH == '{')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__MQBH=TRUE__;
-      };
-    };
-    if (result__MQBH) {
-      short__token__to__5AD((&__string_133),(__INTEGER)(position__GBC -  1),position__GBC);
-      group_sav__F4M=last_group__PTF;
-      p__N0H=current_position__3WF();
-      result__KPI=NULL;
-      ptr__LPI=((__POINTER )(NULL));
-      typ_id__QPI= 0;
-      sz__NPI=((__UINTEGER_32 )sizeof(__ITM_LIST));
-      if ((sz__NPI ==  0)) {
-        result__KPI=ITM_LIST__;
-      } else {
-        typ_id__QPI=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__NPI);
-        if ((typ_id__QPI == (__INTEGER)(-  1))) {
-          a__LO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__MO4G=(__UINTEGER_32)((__UINTEGER_32)(sz__NPI + a__LO4G) & (__UINTEGER_32)(~ a__LO4G));
-          ptr_table__QQBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MO4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__PQBH=((__POINTER )(NULL));
-          result__RQBH=((__POINTER *)ptr_table__QQBH)[ 0];
-          if ((result__RQBH == (void *)NULL)) {
-            result__RQBH=new_lab__ARJ(new_size__MO4G);
-            next__PQBH=(void *)((unsigned long)result__RQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MO4G)));
-            ((__POINTER *)next__PQBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QQBH)[ 0]=next__PQBH;
-          } else {
-            next__PQBH=((__POINTER *)result__RQBH)[ 0];
-            if ((next__PQBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RQBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MO4G <<  1)) <=  4096)) {
-                next__PQBH=(void *)((unsigned long)result__RQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MO4G)));
+    result__A3HH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__A3HH=FALSE__;
+    } else {
+      result__B3HH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__B3HH=((__CHARACTER )(( 0)));
+      } else {
+        result__B3HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      };
+      if ((result__B3HH == '{')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__A3HH=TRUE__;
+      };
+    };
+    if (result__A3HH) {
+      short__token__to__LBD((&__string_133),(__INTEGER)(position__SBC -  1),position__SBC);
+      group_sav__R4M=last_group__1TF;
+      p__Z0H=current_position__JXF();
+      result__WPI=NULL;
+      ptr__XPI=((__POINTER )(NULL));
+      typ_id__2PI= 0;
+      sz__ZPI=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__ZPI ==  0)) {
+        result__WPI=ITM_LIST__;
+      } else {
+        typ_id__2PI=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZPI);
+        if ((typ_id__2PI == (__INTEGER)(-  1))) {
+          a__A0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__B0EH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZPI + a__A0EH) & (__UINTEGER_32)(~ a__A0EH));
+          ptr_table__E3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B0EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__D3HH=((__POINTER )(NULL));
+          result__F3HH=((__POINTER *)ptr_table__E3HH)[ 0];
+          if ((result__F3HH == (void *)NULL)) {
+            result__F3HH=new_lab__MRJ(new_size__B0EH);
+            next__D3HH=(void *)((unsigned long)result__F3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0EH)));
+            ((__POINTER *)next__D3HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__E3HH)[ 0]=next__D3HH;
+          } else {
+            next__D3HH=((__POINTER *)result__F3HH)[ 0];
+            if ((next__D3HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__B0EH <<  1)) <=  4096)) {
+                next__D3HH=(void *)((unsigned long)result__F3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0EH)));
               } else {
-                next__PQBH=new_lab__ARJ(new_size__MO4G);
+                next__D3HH=new_lab__MRJ(new_size__B0EH);
               };
-              ((__POINTER *)next__PQBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QQBH)[ 0]=next__PQBH;
+              ((__POINTER *)next__D3HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__E3HH)[ 0]=next__D3HH;
             } else {
-              ((__POINTER *)result__RQBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__RQBH=next__PQBH;
-            };
-          };
-          ptr__LPI=result__RQBH;
-        } else {
-          t__QO4G=((__UINTEGER_32 )typ_id__QPI);
-          a__PO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__YQBH=(__UINTEGER_32)((__UINTEGER_32)(sz__NPI + a__PO4G) & (__UINTEGER_32)(~ a__PO4G));
-          ptr_table__VQBH=((__POINTER )(&(table_type[(t__QO4G)])));
-          lab_type__XQBH=(__UINTEGER_32)(t__QO4G |  1);
-          next__UQBH=((__POINTER )(NULL));
-          result__WQBH=((__POINTER *)ptr_table__VQBH)[ 0];
-          if ((result__WQBH == (void *)NULL)) {
-            result__WQBH=new_lab__ARJ(lab_type__XQBH);
-            next__UQBH=(void *)((unsigned long)result__WQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YQBH)));
-            ((__POINTER *)next__UQBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VQBH)[ 0]=next__UQBH;
-          } else {
-            next__UQBH=((__POINTER *)result__WQBH)[ 0];
-            if ((next__UQBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WQBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__YQBH <<  1)) <=  4096)) {
-                next__UQBH=(void *)((unsigned long)result__WQBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YQBH)));
+              ((__POINTER *)result__F3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__F3HH=next__D3HH;
+            };
+          };
+          ptr__XPI=result__F3HH;
+        } else {
+          t__F0EH=((__UINTEGER_32 )typ_id__2PI);
+          a__E0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__M3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZPI + a__E0EH) & (__UINTEGER_32)(~ a__E0EH));
+          ptr_table__J3HH=((__POINTER )(&(table_type[(t__F0EH)])));
+          lab_type__L3HH=(__UINTEGER_32)(t__F0EH |  1);
+          next__I3HH=((__POINTER )(NULL));
+          result__K3HH=((__POINTER *)ptr_table__J3HH)[ 0];
+          if ((result__K3HH == (void *)NULL)) {
+            result__K3HH=new_lab__MRJ(lab_type__L3HH);
+            next__I3HH=(void *)((unsigned long)result__K3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M3HH)));
+            ((__POINTER *)next__I3HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__J3HH)[ 0]=next__I3HH;
+          } else {
+            next__I3HH=((__POINTER *)result__K3HH)[ 0];
+            if ((next__I3HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__M3HH <<  1)) <=  4096)) {
+                next__I3HH=(void *)((unsigned long)result__K3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M3HH)));
               } else {
-                next__UQBH=new_lab__ARJ(lab_type__XQBH);
+                next__I3HH=new_lab__MRJ(lab_type__L3HH);
               };
-              ((__POINTER *)next__UQBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VQBH)[ 0]=next__UQBH;
+              ((__POINTER *)next__I3HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__J3HH)[ 0]=next__I3HH;
             } else {
-              ((__POINTER *)result__WQBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UQBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__WQBH=next__UQBH;
+              ((__POINTER *)result__K3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__K3HH=next__I3HH;
             };
           };
-          ptr__LPI=result__WQBH;
+          ptr__XPI=result__K3HH;
         };
-        result__KPI=((__ITM_LIST *)ptr__LPI);
-        *(result__KPI) = *(ITM_LIST__);
+        result__WPI=((__ITM_LIST *)ptr__XPI);
+        *(result__WPI) = *(ITM_LIST__);
       };
-      ((__ITM_LIST *)result__KPI)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ=p__N0H;
-      last_group__PTF=result__KPI;
-      old_position__XQI=position__GBC;
-      old_pos_cur__ZQI=pos_cur__JBC;
-      old_pos_line__1QI=pos_line__KBC;
-      old_pos_col__3QI=pos_col__LBC;
-      old_short_derive__5QI=short_derive__VBC;
-      if (((void *)read_loc_arg__with_self__2DHB(Self__33M,TRUE__,FALSE__) != (void *)NULL)) {
-        result__ZQBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__ZQBH=FALSE__;
+      ((__ITM_LIST *)result__WPI)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ=p__Z0H;
+      last_group__1TF=result__WPI;
+      old_position__DRI=position__SBC;
+      old_pos_cur__FRI=pos_cur__VBC;
+      old_pos_line__HRI=pos_line__WBC;
+      old_pos_col__JRI=pos_col__XBC;
+      old_short_derive__LRI=short_derive__BCC;
+      if (((void *)read_loc_arg__with_self__IEHB(Self__J4M,TRUE__,FALSE__) != (void *)NULL)) {
+        result__N3HH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__N3HH=FALSE__;
         } else {
-          result__0QBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__0QBH=((__CHARACTER )(( 0)));
+          result__O3HH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__O3HH=((__CHARACTER )(( 0)));
           } else {
-            result__0QBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__O3HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__0QBH == ';')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__ZQBH=TRUE__;
+          if ((result__O3HH == ';')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__N3HH=TRUE__;
           };
         };
-        if ((! result__ZQBH)) {
-          pos__0MRG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_229));
-          put_position__IOG(pos__0MRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__N3HH)) {
+          pos__44WG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_239));
+          put_position__UOG(pos__44WG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        restore_context__HDL();
-      };
-      lst__3JHB=last_group__PTF;
-      result__UHMB=NULL;
-      ptr__VHMB=((__POINTER )(NULL));
-      typ_id__0HMB= 0;
-      sz__XHMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
-      if ((sz__XHMB ==  0)) {
-        result__UHMB=ITM_BLOCK__;
-      } else {
-        typ_id__0HMB=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__XHMB);
-        if ((typ_id__0HMB == (__INTEGER)(-  1))) {
-          a__QH4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__RH4G=(__UINTEGER_32)((__UINTEGER_32)(sz__XHMB + a__QH4G) & (__UINTEGER_32)(~ a__QH4G));
-          ptr_table__3QBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RH4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__2QBH=((__POINTER )(NULL));
-          result__4QBH=((__POINTER *)ptr_table__3QBH)[ 0];
-          if ((result__4QBH == (void *)NULL)) {
-            result__4QBH=new_lab__ARJ(new_size__RH4G);
-            next__2QBH=(void *)((unsigned long)result__4QBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RH4G)));
-            ((__POINTER *)next__2QBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3QBH)[ 0]=next__2QBH;
-          } else {
-            next__2QBH=((__POINTER *)result__4QBH)[ 0];
-            if ((next__2QBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4QBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RH4G <<  1)) <=  4096)) {
-                next__2QBH=(void *)((unsigned long)result__4QBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RH4G)));
+        restore_context__TDL();
+      };
+      lst__JKHB=last_group__1TF;
+      result__AIMB=NULL;
+      ptr__BIMB=((__POINTER )(NULL));
+      typ_id__GIMB= 0;
+      sz__DIMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
+      if ((sz__DIMB ==  0)) {
+        result__AIMB=ITM_BLOCK__;
+      } else {
+        typ_id__GIMB=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__DIMB);
+        if ((typ_id__GIMB == (__INTEGER)(-  1))) {
+          a__FTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIMB + a__FTEH) & (__UINTEGER_32)(~ a__FTEH));
+          ptr_table__R3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GTEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__Q3HH=((__POINTER )(NULL));
+          result__S3HH=((__POINTER *)ptr_table__R3HH)[ 0];
+          if ((result__S3HH == (void *)NULL)) {
+            result__S3HH=new_lab__MRJ(new_size__GTEH);
+            next__Q3HH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GTEH)));
+            ((__POINTER *)next__Q3HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__R3HH)[ 0]=next__Q3HH;
+          } else {
+            next__Q3HH=((__POINTER *)result__S3HH)[ 0];
+            if ((next__Q3HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GTEH <<  1)) <=  4096)) {
+                next__Q3HH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GTEH)));
               } else {
-                next__2QBH=new_lab__ARJ(new_size__RH4G);
+                next__Q3HH=new_lab__MRJ(new_size__GTEH);
               };
-              ((__POINTER *)next__2QBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3QBH)[ 0]=next__2QBH;
+              ((__POINTER *)next__Q3HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__R3HH)[ 0]=next__Q3HH;
             } else {
-              ((__POINTER *)result__4QBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2QBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4QBH=next__2QBH;
-            };
-          };
-          ptr__VHMB=result__4QBH;
-        } else {
-          t__VH4G=((__UINTEGER_32 )typ_id__0HMB);
-          a__UH4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__FRBH=(__UINTEGER_32)((__UINTEGER_32)(sz__XHMB + a__UH4G) & (__UINTEGER_32)(~ a__UH4G));
-          ptr_table__CRBH=((__POINTER )(&(table_type[(t__VH4G)])));
-          lab_type__ERBH=(__UINTEGER_32)(t__VH4G |  1);
-          next__BRBH=((__POINTER )(NULL));
-          result__DRBH=((__POINTER *)ptr_table__CRBH)[ 0];
-          if ((result__DRBH == (void *)NULL)) {
-            result__DRBH=new_lab__ARJ(lab_type__ERBH);
-            next__BRBH=(void *)((unsigned long)result__DRBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FRBH)));
-            ((__POINTER *)next__BRBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CRBH)[ 0]=next__BRBH;
-          } else {
-            next__BRBH=((__POINTER *)result__DRBH)[ 0];
-            if ((next__BRBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DRBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FRBH <<  1)) <=  4096)) {
-                next__BRBH=(void *)((unsigned long)result__DRBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FRBH)));
+              ((__POINTER *)result__S3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__S3HH=next__Q3HH;
+            };
+          };
+          ptr__BIMB=result__S3HH;
+        } else {
+          t__KTEH=((__UINTEGER_32 )typ_id__GIMB);
+          a__JTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIMB + a__JTEH) & (__UINTEGER_32)(~ a__JTEH));
+          ptr_table__W3HH=((__POINTER )(&(table_type[(t__KTEH)])));
+          lab_type__Y3HH=(__UINTEGER_32)(t__KTEH |  1);
+          next__V3HH=((__POINTER )(NULL));
+          result__X3HH=((__POINTER *)ptr_table__W3HH)[ 0];
+          if ((result__X3HH == (void *)NULL)) {
+            result__X3HH=new_lab__MRJ(lab_type__Y3HH);
+            next__V3HH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3HH)));
+            ((__POINTER *)next__V3HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__W3HH)[ 0]=next__V3HH;
+          } else {
+            next__V3HH=((__POINTER *)result__X3HH)[ 0];
+            if ((next__V3HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Z3HH <<  1)) <=  4096)) {
+                next__V3HH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3HH)));
               } else {
-                next__BRBH=new_lab__ARJ(lab_type__ERBH);
+                next__V3HH=new_lab__MRJ(lab_type__Y3HH);
               };
-              ((__POINTER *)next__BRBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CRBH)[ 0]=next__BRBH;
+              ((__POINTER *)next__V3HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__W3HH)[ 0]=next__V3HH;
             } else {
-              ((__POINTER *)result__DRBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__DRBH=next__BRBH;
+              ((__POINTER *)result__X3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__X3HH=next__V3HH;
             };
           };
-          ptr__VHMB=result__DRBH;
+          ptr__BIMB=result__X3HH;
         };
-        result__UHMB=((__ITM_BLOCK *)ptr__VHMB);
-        *(result__UHMB) = *(ITM_BLOCK__);
+        result__AIMB=((__ITM_BLOCK *)ptr__BIMB);
+        *(result__AIMB) = *(ITM_BLOCK__);
       };
-      ((__ITM_BLOCK *)result__UHMB)->list__UMDC=lst__3JHB;
-      result__53M=result__UHMB;
-      read_group__3AHB(Self__33M);
-      result__GRBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__GRBH=FALSE__;
+      ((__ITM_BLOCK *)result__AIMB)->list__ANDC=lst__JKHB;
+      result__L4M=result__AIMB;
+      read_group__JBHB(Self__J4M);
+      result__03HH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__03HH=FALSE__;
       } else {
-        result__HRBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__HRBH=((__CHARACTER )(( 0)));
+        result__13HH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__13HH=((__CHARACTER )(( 0)));
         } else {
-          result__HRBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__13HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__HRBH == '}')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__GRBH=TRUE__;
+        if ((result__13HH == '}')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__03HH=TRUE__;
         };
       };
-      if ((! result__GRBH)) {
-        pos__CNRG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_280));
-        put_position__IOG(pos__CNRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((! result__03HH)) {
+        pos__G5WG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_290));
+        put_position__UOG(pos__G5WG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      short__token__to__5AD((&__string_133),(__INTEGER)(position__GBC -  1),position__GBC);
-      last_group__PTF=group_sav__F4M;
-    };
-    __tmp__VEN=result__MQBH;
-  };
-  if ((! __tmp__VEN)) {
-    if (read_external__USO()) {
-      result__JRBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__JRBH=FALSE__;
-      } else {
-        result__KRBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__KRBH=((__CHARACTER )(( 0)));
-        } else {
-          result__KRBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-        };
-        if ((result__KRBH == ':')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__JRBH=TRUE__;
-        };
-      };
-      if ((! result__JRBH)) {
-        __tmp__JFN=current_position__3WF();
-        result__NVTB=NULL;
-        ptr__OVTB=((__POINTER )(NULL));
-        typ_id__TVTB= 0;
-        sz__QVTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
-        if ((sz__QVTB ==  0)) {
-          result__NVTB=ITM_EXTERNAL__;
-        } else {
-          typ_id__TVTB=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__QVTB);
-          if ((typ_id__TVTB == (__INTEGER)(-  1))) {
-            a__YH4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__ZH4G=(__UINTEGER_32)((__UINTEGER_32)(sz__QVTB + a__YH4G) & (__UINTEGER_32)(~ a__YH4G));
-            ptr_table__NRBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZH4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__MRBH=((__POINTER )(NULL));
-            result__ORBH=((__POINTER *)ptr_table__NRBH)[ 0];
-            if ((result__ORBH == (void *)NULL)) {
-              result__ORBH=new_lab__ARJ(new_size__ZH4G);
-              next__MRBH=(void *)((unsigned long)result__ORBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZH4G)));
-              ((__POINTER *)next__MRBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NRBH)[ 0]=next__MRBH;
+      short__token__to__LBD((&__string_133),(__INTEGER)(position__SBC -  1),position__SBC);
+      last_group__1TF=group_sav__R4M;
+    };
+    __tmp__BFN=result__A3HH;
+  };
+  if ((! __tmp__BFN)) {
+    if (read_external__ATO()) {
+      result__33HH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__33HH=FALSE__;
+      } else {
+        result__43HH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__43HH=((__CHARACTER )(( 0)));
+        } else {
+          result__43HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        };
+        if ((result__43HH == ':')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__33HH=TRUE__;
+        };
+      };
+      if ((! result__33HH)) {
+        __tmp__VFN=current_position__JXF();
+        result__ZVTB=NULL;
+        ptr__0VTB=((__POINTER )(NULL));
+        typ_id__5VTB= 0;
+        sz__2VTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
+        if ((sz__2VTB ==  0)) {
+          result__ZVTB=ITM_EXTERNAL__;
+        } else {
+          typ_id__5VTB=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2VTB);
+          if ((typ_id__5VTB == (__INTEGER)(-  1))) {
+            a__NTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__OTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__2VTB + a__NTEH) & (__UINTEGER_32)(~ a__NTEH));
+            ptr_table__B4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OTEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__A4HH=((__POINTER )(NULL));
+            result__C4HH=((__POINTER *)ptr_table__B4HH)[ 0];
+            if ((result__C4HH == (void *)NULL)) {
+              result__C4HH=new_lab__MRJ(new_size__OTEH);
+              next__A4HH=(void *)((unsigned long)result__C4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OTEH)));
+              ((__POINTER *)next__A4HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B4HH)[ 0]=next__A4HH;
             } else {
-              next__MRBH=((__POINTER *)result__ORBH)[ 0];
-              if ((next__MRBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ORBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZH4G <<  1)) <=  4096)) {
-                  next__MRBH=(void *)((unsigned long)result__ORBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZH4G)));
+              next__A4HH=((__POINTER *)result__C4HH)[ 0];
+              if ((next__A4HH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C4HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OTEH <<  1)) <=  4096)) {
+                  next__A4HH=(void *)((unsigned long)result__C4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OTEH)));
                 } else {
-                  next__MRBH=new_lab__ARJ(new_size__ZH4G);
+                  next__A4HH=new_lab__MRJ(new_size__OTEH);
                 };
-                ((__POINTER *)next__MRBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NRBH)[ 0]=next__MRBH;
+                ((__POINTER *)next__A4HH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__B4HH)[ 0]=next__A4HH;
               } else {
-                ((__POINTER *)result__ORBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ORBH=next__MRBH;
+                ((__POINTER *)result__C4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__C4HH=next__A4HH;
               };
             };
-            ptr__OVTB=result__ORBH;
-          } else {
-            t__3H4G=((__UINTEGER_32 )typ_id__TVTB);
-            a__2H4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__VRBH=(__UINTEGER_32)((__UINTEGER_32)(sz__QVTB + a__2H4G) & (__UINTEGER_32)(~ a__2H4G));
-            ptr_table__SRBH=((__POINTER )(&(table_type[(t__3H4G)])));
-            lab_type__URBH=(__UINTEGER_32)(t__3H4G |  1);
-            next__RRBH=((__POINTER )(NULL));
-            result__TRBH=((__POINTER *)ptr_table__SRBH)[ 0];
-            if ((result__TRBH == (void *)NULL)) {
-              result__TRBH=new_lab__ARJ(lab_type__URBH);
-              next__RRBH=(void *)((unsigned long)result__TRBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VRBH)));
-              ((__POINTER *)next__RRBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SRBH)[ 0]=next__RRBH;
+            ptr__0VTB=result__C4HH;
+          } else {
+            t__STEH=((__UINTEGER_32 )typ_id__5VTB);
+            a__RTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__J4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__2VTB + a__RTEH) & (__UINTEGER_32)(~ a__RTEH));
+            ptr_table__G4HH=((__POINTER )(&(table_type[(t__STEH)])));
+            lab_type__I4HH=(__UINTEGER_32)(t__STEH |  1);
+            next__F4HH=((__POINTER )(NULL));
+            result__H4HH=((__POINTER *)ptr_table__G4HH)[ 0];
+            if ((result__H4HH == (void *)NULL)) {
+              result__H4HH=new_lab__MRJ(lab_type__I4HH);
+              next__F4HH=(void *)((unsigned long)result__H4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J4HH)));
+              ((__POINTER *)next__F4HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__G4HH)[ 0]=next__F4HH;
             } else {
-              next__RRBH=((__POINTER *)result__TRBH)[ 0];
-              if ((next__RRBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TRBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VRBH <<  1)) <=  4096)) {
-                  next__RRBH=(void *)((unsigned long)result__TRBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VRBH)));
+              next__F4HH=((__POINTER *)result__H4HH)[ 0];
+              if ((next__F4HH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H4HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J4HH <<  1)) <=  4096)) {
+                  next__F4HH=(void *)((unsigned long)result__H4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J4HH)));
                 } else {
-                  next__RRBH=new_lab__ARJ(lab_type__URBH);
+                  next__F4HH=new_lab__MRJ(lab_type__I4HH);
                 };
-                ((__POINTER *)next__RRBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SRBH)[ 0]=next__RRBH;
+                ((__POINTER *)next__F4HH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__G4HH)[ 0]=next__F4HH;
               } else {
-                ((__POINTER *)result__TRBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__TRBH=next__RRBH;
+                ((__POINTER *)result__H4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__H4HH=next__F4HH;
               };
             };
-            ptr__OVTB=result__TRBH;
-          };
-          result__NVTB=((__ITM_EXTERNAL *)ptr__OVTB);
-          *(result__NVTB) = *(ITM_EXTERNAL__);
-        };
-        ((__ITM_EXTERNAL *)result__NVTB)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ=__tmp__JFN;
-        result__53M=result__NVTB;
-      } else {
-        __tmp__RFN=current_position__3WF();
-        result__WRBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__WRBH=FALSE__;
-        } else {
-          result__XRBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__XRBH=((__CHARACTER )(( 0)));
-          } else {
-            result__XRBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-          };
-          if ((result__XRBH == '(')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__WRBH=TRUE__;
-          };
-        };
-        result__BXTB=NULL;
-        ptr__CXTB=((__POINTER )(NULL));
-        typ_id__HXTB= 0;
-        sz__EXTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
-        if ((sz__EXTB ==  0)) {
-          result__BXTB=ITM_EXTERNAL_TYPE__;
-        } else {
-          typ_id__HXTB=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__EXTB);
-          if ((typ_id__HXTB == (__INTEGER)(-  1))) {
-            a__AI4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__BI4G=(__UINTEGER_32)((__UINTEGER_32)(sz__EXTB + a__AI4G) & (__UINTEGER_32)(~ a__AI4G));
-            ptr_table__0RBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BI4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__ZRBH=((__POINTER )(NULL));
-            result__1RBH=((__POINTER *)ptr_table__0RBH)[ 0];
-            if ((result__1RBH == (void *)NULL)) {
-              result__1RBH=new_lab__ARJ(new_size__BI4G);
-              next__ZRBH=(void *)((unsigned long)result__1RBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BI4G)));
-              ((__POINTER *)next__ZRBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0RBH)[ 0]=next__ZRBH;
+            ptr__0VTB=result__H4HH;
+          };
+          result__ZVTB=((__ITM_EXTERNAL *)ptr__0VTB);
+          *(result__ZVTB) = *(ITM_EXTERNAL__);
+        };
+        ((__ITM_EXTERNAL *)result__ZVTB)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ=__tmp__VFN;
+        result__L4M=result__ZVTB;
+      } else {
+        __tmp__3FN=current_position__JXF();
+        result__K4HH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__K4HH=FALSE__;
+        } else {
+          result__L4HH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__L4HH=((__CHARACTER )(( 0)));
+          } else {
+            result__L4HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          };
+          if ((result__L4HH == '(')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__K4HH=TRUE__;
+          };
+        };
+        result__NXTB=NULL;
+        ptr__OXTB=((__POINTER )(NULL));
+        typ_id__TXTB= 0;
+        sz__QXTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
+        if ((sz__QXTB ==  0)) {
+          result__NXTB=ITM_EXTERNAL_TYPE__;
+        } else {
+          typ_id__TXTB=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QXTB);
+          if ((typ_id__TXTB == (__INTEGER)(-  1))) {
+            a__VTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__WTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXTB + a__VTEH) & (__UINTEGER_32)(~ a__VTEH));
+            ptr_table__O4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WTEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__N4HH=((__POINTER )(NULL));
+            result__P4HH=((__POINTER *)ptr_table__O4HH)[ 0];
+            if ((result__P4HH == (void *)NULL)) {
+              result__P4HH=new_lab__MRJ(new_size__WTEH);
+              next__N4HH=(void *)((unsigned long)result__P4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTEH)));
+              ((__POINTER *)next__N4HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__O4HH)[ 0]=next__N4HH;
             } else {
-              next__ZRBH=((__POINTER *)result__1RBH)[ 0];
-              if ((next__ZRBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1RBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BI4G <<  1)) <=  4096)) {
-                  next__ZRBH=(void *)((unsigned long)result__1RBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BI4G)));
+              next__N4HH=((__POINTER *)result__P4HH)[ 0];
+              if ((next__N4HH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P4HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WTEH <<  1)) <=  4096)) {
+                  next__N4HH=(void *)((unsigned long)result__P4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTEH)));
                 } else {
-                  next__ZRBH=new_lab__ARJ(new_size__BI4G);
+                  next__N4HH=new_lab__MRJ(new_size__WTEH);
                 };
-                ((__POINTER *)next__ZRBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0RBH)[ 0]=next__ZRBH;
+                ((__POINTER *)next__N4HH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__O4HH)[ 0]=next__N4HH;
               } else {
-                ((__POINTER *)result__1RBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__1RBH=next__ZRBH;
+                ((__POINTER *)result__P4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__P4HH=next__N4HH;
               };
             };
-            ptr__CXTB=result__1RBH;
-          } else {
-            t__FI4G=((__UINTEGER_32 )typ_id__HXTB);
-            a__EI4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__CSBH=(__UINTEGER_32)((__UINTEGER_32)(sz__EXTB + a__EI4G) & (__UINTEGER_32)(~ a__EI4G));
-            ptr_table__5RBH=((__POINTER )(&(table_type[(t__FI4G)])));
-            lab_type__BSBH=(__UINTEGER_32)(t__FI4G |  1);
-            next__4RBH=((__POINTER )(NULL));
-            result__ASBH=((__POINTER *)ptr_table__5RBH)[ 0];
-            if ((result__ASBH == (void *)NULL)) {
-              result__ASBH=new_lab__ARJ(lab_type__BSBH);
-              next__4RBH=(void *)((unsigned long)result__ASBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSBH)));
-              ((__POINTER *)next__4RBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5RBH)[ 0]=next__4RBH;
+            ptr__OXTB=result__P4HH;
+          } else {
+            t__0TEH=((__UINTEGER_32 )typ_id__TXTB);
+            a__ZTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__W4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXTB + a__ZTEH) & (__UINTEGER_32)(~ a__ZTEH));
+            ptr_table__T4HH=((__POINTER )(&(table_type[(t__0TEH)])));
+            lab_type__V4HH=(__UINTEGER_32)(t__0TEH |  1);
+            next__S4HH=((__POINTER )(NULL));
+            result__U4HH=((__POINTER *)ptr_table__T4HH)[ 0];
+            if ((result__U4HH == (void *)NULL)) {
+              result__U4HH=new_lab__MRJ(lab_type__V4HH);
+              next__S4HH=(void *)((unsigned long)result__U4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W4HH)));
+              ((__POINTER *)next__S4HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__T4HH)[ 0]=next__S4HH;
             } else {
-              next__4RBH=((__POINTER *)result__ASBH)[ 0];
-              if ((next__4RBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ASBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CSBH <<  1)) <=  4096)) {
-                  next__4RBH=(void *)((unsigned long)result__ASBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSBH)));
+              next__S4HH=((__POINTER *)result__U4HH)[ 0];
+              if ((next__S4HH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U4HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__W4HH <<  1)) <=  4096)) {
+                  next__S4HH=(void *)((unsigned long)result__U4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W4HH)));
                 } else {
-                  next__4RBH=new_lab__ARJ(lab_type__BSBH);
+                  next__S4HH=new_lab__MRJ(lab_type__V4HH);
                 };
-                ((__POINTER *)next__4RBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5RBH)[ 0]=next__4RBH;
+                ((__POINTER *)next__S4HH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__T4HH)[ 0]=next__S4HH;
               } else {
-                ((__POINTER *)result__ASBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ASBH=next__4RBH;
+                ((__POINTER *)result__U4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__U4HH=next__S4HH;
               };
             };
-            ptr__CXTB=result__ASBH;
-          };
-          result__BXTB=((__ITM_EXTERNAL_TYPE *)ptr__CXTB);
-          *(result__BXTB) = *(ITM_EXTERNAL_TYPE__);
-        };
-        Self__TZEC=((__ITM_EXTERNAL_TYPE *)result__BXTB);
-        Self__TZEC->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ=__tmp__RFN;
-        Self__TZEC->is_persistant__AHN=result__WRBH;
-        type__A4M=read_type__XBM(Self__33M,FALSE__);
-        if (((void *)type__A4M == (void *)NULL)) {
-          pos__QNRG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_265));
-          put_position__IOG(pos__QNRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+            ptr__OXTB=result__U4HH;
+          };
+          result__NXTB=((__ITM_EXTERNAL_TYPE *)ptr__OXTB);
+          *(result__NXTB) = *(ITM_EXTERNAL_TYPE__);
+        };
+        Self__5ZEC=((__ITM_EXTERNAL_TYPE *)result__NXTB);
+        Self__5ZEC->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ=__tmp__3FN;
+        Self__5ZEC->is_persistant__MHN=result__K4HH;
+        type__M4M=read_type__DCM(Self__J4M,FALSE__);
+        if (((void *)type__M4M == (void *)NULL)) {
+          pos__U5WG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_275));
+          put_position__UOG(pos__U5WG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__DSBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__DSBH=FALSE__;
+        result__X4HH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__X4HH=FALSE__;
         } else {
-          result__ESBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__ESBH=((__CHARACTER )(( 0)));
+          result__Y4HH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__Y4HH=((__CHARACTER )(( 0)));
           } else {
-            result__ESBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__Y4HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__ESBH == '{')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__DSBH=TRUE__;
+          if ((result__Y4HH == '{')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__X4HH=TRUE__;
           };
         };
-        if (result__DSBH) {
-          if (((void *)read_type_list__2LO(Self__33M,FALSE__) == (void *)NULL)) {
-            pos__SNRG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_291));
-            put_position__IOG(pos__SNRG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        if (result__X4HH) {
+          if (((void *)read_type_list__IMO(Self__J4M,FALSE__) == (void *)NULL)) {
+            pos__W5WG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_301));
+            put_position__UOG(pos__W5WG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          result__GSBH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__GSBH=FALSE__;
+          result__04HH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__04HH=FALSE__;
           } else {
-            result__HSBH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__HSBH=((__CHARACTER )(( 0)));
+            result__14HH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__14HH=((__CHARACTER )(( 0)));
             } else {
-              result__HSBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__14HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__HSBH == '}')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__GSBH=TRUE__;
+            if ((result__14HH == '}')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__04HH=TRUE__;
             };
           };
-          if ((! result__GSBH)) {
-            pos__UNRG=current_position__3WF();
-            put_error__text__4MG( 2,(&__string_280));
-            put_position__IOG(pos__UNRG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if ((! result__04HH)) {
+            pos__Y5WG=current_position__JXF();
+            put_error__text__KNG( 2,(&__string_290));
+            put_position__UOG(pos__Y5WG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
         };
-        if (result__BXTB->is_persistant__AHN) {
-          result__JSBH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__JSBH=FALSE__;
+        if (result__NXTB->is_persistant__MHN) {
+          result__34HH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__34HH=FALSE__;
           } else {
-            result__KSBH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__KSBH=((__CHARACTER )(( 0)));
+            result__44HH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__44HH=((__CHARACTER )(( 0)));
             } else {
-              result__KSBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__44HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__KSBH == ')')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__JSBH=TRUE__;
+            if ((result__44HH == ')')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__34HH=TRUE__;
             };
           };
-          __tmp__LHN=(! result__JSBH);
+          __tmp__XHN=(! result__34HH);
         } else {
-          __tmp__LHN=FALSE__;
+          __tmp__XHN=FALSE__;
         };
-        if (__tmp__LHN) {
-          pos__WNRG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_248));
-          put_position__IOG(pos__WNRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (__tmp__XHN) {
+          pos__05WG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_258));
+          put_position__UOG(pos__05WG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__53M=result__BXTB;
+        result__L4M=result__NXTB;
       };
     };
   };
-  return(result__53M);
+  return(result__L4M);
 }
 
-static __BOOLEAN read_integer__U1P()
+static __BOOLEAN read_integer__A2P()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER_64 result__ZAJE,__tmp__LBJE,result__D5OE,result__1PQE;
-  __INTEGER pos_old__Y1P,__tmp__EBJE,Self__UWNE,result__BORE,j__U3OE;
-  __INTEGER __tmp__O5OE,Self__ZXPE,i__FOQE,__tmp__GQQE,Self__3SRE;
-  __INTEGER state__IRQE,value__JRQE,i__HRQE,state__DZQE,result__GZQE;
-  __INTEGER i__CZQE;
-  __STRING *Self__XAJE,*Self__DH2G,*Self__GI4G,*Self__R3OE,*Self__B5OE;
-  __STRING *Self__DOQE,*Self__ZPQE,*Self__FRQE,*Self__AZQE;
-  __POSITION pos__EPRG,pos__YPRG,pos__HQRG;
-  __BOOLEAN result__X1P,result__1F2G,__tmp__D2P,__tmp__32P,__tmp__YORE;
-  __BOOLEAN result__T3OE,__tmp__M4OE,result__LZSE,__tmp__F5P;
-  __BOOLEAN result__GOQE,negative__KRQE,result__LRQE,__tmp__ZSQE;
-  __BOOLEAN result__BAJG,__tmp__FTQE,result__OAJG,result__DQ2G;
-  __BOOLEAN __tmp__ZTQE,__tmp__YUQE,result__ONEF,result__GQ2G;
-  __BOOLEAN __tmp__MXQE,result__AOEF,result__JQ2G,__tmp__ZWQE;
-  __BOOLEAN negative__FZQE,__tmp__S0QE,result__QBJG,__tmp__F1QE;
-  __BOOLEAN __tmp__01QE,result__OPEF,__tmp__B3QE,result__AQEF;
-  __BOOLEAN result__DI2G;
-  __CHARACTER result__RYYG,result__XYYG,result__YYYG,result__ZYYG;
-  __CHARACTER result__0YYG,result__1YYG,result__2YYG,Self__5NRE;
-  __CHARACTER result__MZYG,Self__JZSE,result__2ZYG,Self__4LEF;
-  __CHARACTER result__A0YG,cc__MRQE,cc__EZQE;
-  result__X1P=FALSE__;
-  pos_old__Y1P= 0;
-  if (read_space__RRD()) {
-    result__RYYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__RYYG=((__CHARACTER )(( 0)));
-    } else {
-      result__RYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-    };
-    result__1F2G=FALSE__;
-    if ((((__INTEGER_8 )result__RYYG) >= ((__INTEGER_8 )'0'))) {
-      result__1F2G=(((__INTEGER_8 )result__RYYG) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__D2P=result__1F2G;
+  __INTEGER_64 result__CQJE,__tmp__UQJE,result__RPPE,result__Z5QE;
+  __INTEGER pos_old__E2P,__tmp__NQJE,Self__WGOE,result__J3RE,j__COPE;
+  __INTEGER __tmp__2PPE,Self__YJQE,i__D4QE,__tmp__EARE,Self__FCSE;
+  __INTEGER state__GBRE,value__HBRE,i__FBRE,state__BJRE,result__EJRE;
+  __INTEGER i__AJRE;
+  __STRING *Self__AQJE,*Self__HTCH,*Self__1TEH,*Self__5NPE,*Self__PPPE;
+  __STRING *Self__B4QE,*Self__X5QE,*Self__DBRE,*Self__4IRE;
+  __POSITION pos__IBXG,pos__2BXG,pos__LCXG;
+  __BOOLEAN result__D2P,result__ISCH,__tmp__P2P,__tmp__J3P,__tmp__A4RE;
+  __BOOLEAN result__BOPE,__tmp__0OPE,result__HHTE,__tmp__R5P;
+  __BOOLEAN result__E4QE,negative__IBRE,result__JBRE,__tmp__XCRE;
+  __BOOLEAN result__HGOG,__tmp__DDRE,result__UGOG,result__B1CH;
+  __BOOLEAN __tmp__XDRE,__tmp__WERE,result__JCFF,result__E1CH;
+  __BOOLEAN __tmp__KHRE,result__1CFF,result__H1CH,__tmp__XGRE;
+  __BOOLEAN negative__DJRE,__tmp__QKRE,result__WHOG,__tmp__DLRE;
+  __BOOLEAN __tmp__YLRE,result__JEFF,__tmp__5MRE,result__1EFF;
+  __BOOLEAN result__DUCH;
+  __CHARACTER result__P04G,result__Z04G,result__404G,result__D14G;
+  __CHARACTER result__I14G,result__N14G,result__S14G,Self__H3RE;
+  __CHARACTER result__V24G,Self__FHTE,result__Q34G,Self__ZAFF;
+  __CHARACTER result__034G,cc__KBRE,cc__CJRE;
+  result__D2P=FALSE__;
+  pos_old__E2P= 0;
+  if (read_space__3RD()) {
+    result__P04G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__P04G=((__CHARACTER )(( 0)));
+    } else {
+      result__P04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    };
+    result__ISCH=FALSE__;
+    if ((((__INTEGER_8 )result__P04G) >= ((__INTEGER_8 )'0'))) {
+      result__ISCH=(((__INTEGER_8 )result__P04G) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__P2P=result__ISCH;
   } else {
-    __tmp__D2P=FALSE__;
+    __tmp__P2P=FALSE__;
   };
-  if (__tmp__D2P) {
-    result__X1P=TRUE__;
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    result__XYYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__XYYG=((__CHARACTER )(( 0)));
+  if (__tmp__P2P) {
+    result__D2P=TRUE__;
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    result__Z04G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__Z04G=((__CHARACTER )(( 0)));
     } else {
-      result__XYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__Z04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    add_last__NLT(string_tmp__VH,result__XYYG);
-    pos_old__Y1P=position__GBC;
-    position__GBC=(__INTEGER)(position__GBC +  1);
-    while_do__BSZD:
+    add_last__ZLT(string_tmp__VH,result__Z04G);
+    pos_old__E2P=position__SBC;
+    position__SBC=(__INTEGER)(position__SBC +  1);
+    while_do__S3ZD:
     {
-      result__YYYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__YYYG=((__CHARACTER )(( 0)));
+      result__404G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__404G=((__CHARACTER )(( 0)));
       } else {
-        result__YYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__404G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if (is_hexadecimal_digit__X4IE(result__YYYG)) {
-        __tmp__32P=TRUE__;
+      if (is_hexadecimal_digit__AOJE(result__404G)) {
+        __tmp__J3P=TRUE__;
       } else {
-        result__ZYYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__ZYYG=((__CHARACTER )(( 0)));
+        result__D14G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__D14G=((__CHARACTER )(( 0)));
         } else {
-          result__ZYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__D14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__32P=(result__ZYYG == '_');
+        __tmp__J3P=(result__D14G == '_');
       };
-      if (__tmp__32P) {
-        result__0YYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__0YYG=((__CHARACTER )(( 0)));
+      if (__tmp__J3P) {
+        result__I14G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__I14G=((__CHARACTER )(( 0)));
         } else {
-          result__0YYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__I14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__0YYG != '_')) {
-          result__1YYG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__1YYG=((__CHARACTER )(( 0)));
+        if ((result__I14G != '_')) {
+          result__N14G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__N14G=((__CHARACTER )(( 0)));
           } else {
-            result__1YYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__N14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__1YYG);
+          add_last__ZLT(string_tmp__VH,result__N14G);
         };
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto while_do__BSZD;
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto while_do__S3ZD;
       };
     };
-    result__2YYG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__2YYG=((__CHARACTER )(( 0)));
+    result__S14G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__S14G=((__CHARACTER )(( 0)));
     } else {
-      result__2YYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__S14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__2YYG == 'h')) {
-      Self__XAJE=((__STRING *)string_tmp__VH);
-      result__ZAJE= 0;
-      __tmp__EBJE=Self__XAJE->count__KFC;
-      Self__UWNE= 1;
-      while ((Self__UWNE <= __tmp__EBJE)) {
-        __tmp__LBJE=(__INTEGER_64)(result__ZAJE <<  4);
-        Self__5NRE=((__CHARACTER *)Self__XAJE->storage__VBS)[(__INTEGER)(Self__UWNE -  1)];
-        result__BORE= 0;
-        if ((((__INTEGER_8 )Self__5NRE) < ((__INTEGER_8 )'A'))) {
-          result__BORE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__5NRE) -  48));
-          __tmp__YORE=TRUE__;
+    if ((result__S14G == 'h')) {
+      Self__AQJE=((__STRING *)string_tmp__VH);
+      result__CQJE= 0;
+      __tmp__NQJE=Self__AQJE->count__WFC;
+      Self__WGOE= 1;
+      while ((Self__WGOE <= __tmp__NQJE)) {
+        __tmp__UQJE=(__INTEGER_64)(result__CQJE <<  4);
+        Self__H3RE=((__CHARACTER *)Self__AQJE->storage__BCS)[(__INTEGER)(Self__WGOE -  1)];
+        result__J3RE= 0;
+        if ((((__INTEGER_8 )Self__H3RE) < ((__INTEGER_8 )'A'))) {
+          result__J3RE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__H3RE) -  48));
+          __tmp__A4RE=TRUE__;
         } else {
-          __tmp__YORE=FALSE__;
+          __tmp__A4RE=FALSE__;
         };
-        if ((! __tmp__YORE)) {
-          if ((((__INTEGER_8 )Self__5NRE) < ((__INTEGER_8 )'a'))) {
-            result__BORE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__5NRE) -  55));
+        if ((! __tmp__A4RE)) {
+          if ((((__INTEGER_8 )Self__H3RE) < ((__INTEGER_8 )'a'))) {
+            result__J3RE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__H3RE) -  55));
           } else {
-            result__BORE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__5NRE) -  87));
+            result__J3RE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__H3RE) -  87));
           };
         };
-        result__ZAJE=(__INTEGER_64)(__tmp__LBJE | ((__INTEGER_64 )result__BORE));
-        Self__UWNE=(__INTEGER)(Self__UWNE +  1);
+        result__CQJE=(__INTEGER_64)(__tmp__UQJE | ((__INTEGER_64 )result__J3RE));
+        Self__WGOE=(__INTEGER)(Self__WGOE +  1);
       };
-      last_integer__NRO=result__ZAJE;
-      position__GBC=(__INTEGER)(position__GBC +  1);
+      last_integer__ZRO=result__CQJE;
+      position__SBC=(__INTEGER)(position__SBC +  1);
     } else {
-      Self__DH2G=((__STRING *)string_tmp__VH);
-      if ((((__INTEGER_8 )((__CHARACTER *)Self__DH2G->storage__VBS)[(__INTEGER)(Self__DH2G->count__KFC -  1)]) > ((__INTEGER_8 )'9'))) {
-        Self__GI4G=((__STRING *)string_tmp__VH);
-        if (( 1 > Self__GI4G->count__KFC)) {
-          Self__GI4G->count__KFC= 0;
+      Self__HTCH=((__STRING *)string_tmp__VH);
+      if ((((__INTEGER_8 )((__CHARACTER *)Self__HTCH->storage__BCS)[(__INTEGER)(Self__HTCH->count__WFC -  1)]) > ((__INTEGER_8 )'9'))) {
+        Self__1TEH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__1TEH->count__WFC)) {
+          Self__1TEH->count__WFC= 0;
         } else {
-          Self__GI4G->count__KFC=(__INTEGER)(Self__GI4G->count__KFC -  1);
+          Self__1TEH->count__WFC=(__INTEGER)(Self__1TEH->count__WFC -  1);
         };
-        position__GBC=(__INTEGER)(position__GBC -  1);
+        position__SBC=(__INTEGER)(position__SBC -  1);
       };
-      result__MZYG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__MZYG=((__CHARACTER )(( 0)));
+      result__V24G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__V24G=((__CHARACTER )(( 0)));
       } else {
-        result__MZYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__V24G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__MZYG == 'o')) {
-        Self__R3OE=((__STRING *)string_tmp__VH);
-        result__T3OE=FALSE__;
-        j__U3OE= 0;
-        if ((Self__R3OE->count__KFC !=  0)) {
-          j__U3OE= 1;
-          until_do__MQRE:
+      if ((result__V24G == 'o')) {
+        Self__5NPE=((__STRING *)string_tmp__VH);
+        result__BOPE=FALSE__;
+        j__COPE= 0;
+        if ((Self__5NPE->count__WFC !=  0)) {
+          j__COPE= 1;
+          until_do__U5RE:
           {
-            if ((j__U3OE > Self__R3OE->count__KFC)) {
-              __tmp__M4OE=TRUE__;
+            if ((j__COPE > Self__5NPE->count__WFC)) {
+              __tmp__0OPE=TRUE__;
             } else {
-              Self__JZSE=((__CHARACTER *)Self__R3OE->storage__VBS)[(__INTEGER)(j__U3OE -  1)];
-              result__LZSE=FALSE__;
-              if ((((__INTEGER_8 )Self__JZSE) >= ((__INTEGER_8 )'0'))) {
-                result__LZSE=(((__INTEGER_8 )Self__JZSE) <= ((__INTEGER_8 )'7'));
+              Self__FHTE=((__CHARACTER *)Self__5NPE->storage__BCS)[(__INTEGER)(j__COPE -  1)];
+              result__HHTE=FALSE__;
+              if ((((__INTEGER_8 )Self__FHTE) >= ((__INTEGER_8 )'0'))) {
+                result__HHTE=(((__INTEGER_8 )Self__FHTE) <= ((__INTEGER_8 )'7'));
               };
-              __tmp__M4OE=(! result__LZSE);
+              __tmp__0OPE=(! result__HHTE);
             };
-            if ((! __tmp__M4OE)) {
-              j__U3OE=(__INTEGER)(j__U3OE +  1);
-              goto until_do__MQRE;
+            if ((! __tmp__0OPE)) {
+              j__COPE=(__INTEGER)(j__COPE +  1);
+              goto until_do__U5RE;
             };
           };
-          result__T3OE=(j__U3OE > Self__R3OE->count__KFC);
+          result__BOPE=(j__COPE > Self__5NPE->count__WFC);
         };
-        if ((! result__T3OE)) {
-          pos__EPRG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_292));
-          put_position__IOG(pos__EPRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__BOPE)) {
+          pos__IBXG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_302));
+          put_position__UOG(pos__IBXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        Self__B5OE=((__STRING *)string_tmp__VH);
-        result__D5OE= 0;
-        __tmp__O5OE=Self__B5OE->count__KFC;
-        Self__ZXPE= 1;
-        while ((Self__ZXPE <= __tmp__O5OE)) {
-          result__D5OE=(__INTEGER_64)((__INTEGER_64)(result__D5OE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__B5OE->storage__VBS)[(__INTEGER)(Self__ZXPE -  1)]) -  48))));
-          Self__ZXPE=(__INTEGER)(Self__ZXPE +  1);
-        };
-        last_integer__NRO=result__D5OE;
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        __tmp__F5P=TRUE__;
-      } else {
-        __tmp__F5P=FALSE__;
-      };
-      if ((! __tmp__F5P)) {
-        result__2ZYG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__2ZYG=((__CHARACTER )(( 0)));
-        } else {
-          result__2ZYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-        };
-        if ((result__2ZYG == 'b')) {
-          Self__DOQE=((__STRING *)string_tmp__VH);
-          i__FOQE=Self__DOQE->count__KFC;
-          result__GOQE=TRUE__;
-          while ((! ((! result__GOQE) || (i__FOQE ==  0)))) {
-            Self__4LEF=((__CHARACTER *)Self__DOQE->storage__VBS)[(__INTEGER)(i__FOQE -  1)];
-            result__GOQE=((Self__4LEF == '0') || (Self__4LEF == '1'));
-            i__FOQE=(__INTEGER)(i__FOQE -  1);
-          };
-          if ((! result__GOQE)) {
-            pos__YPRG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_293));
-            put_position__IOG(pos__YPRG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        Self__PPPE=((__STRING *)string_tmp__VH);
+        result__RPPE= 0;
+        __tmp__2PPE=Self__PPPE->count__WFC;
+        Self__YJQE= 1;
+        while ((Self__YJQE <= __tmp__2PPE)) {
+          result__RPPE=(__INTEGER_64)((__INTEGER_64)(result__RPPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__PPPE->storage__BCS)[(__INTEGER)(Self__YJQE -  1)]) -  48))));
+          Self__YJQE=(__INTEGER)(Self__YJQE +  1);
+        };
+        last_integer__ZRO=result__RPPE;
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        __tmp__R5P=TRUE__;
+      } else {
+        __tmp__R5P=FALSE__;
+      };
+      if ((! __tmp__R5P)) {
+        result__Q34G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__Q34G=((__CHARACTER )(( 0)));
+        } else {
+          result__Q34G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        };
+        if ((result__Q34G == 'b')) {
+          Self__B4QE=((__STRING *)string_tmp__VH);
+          i__D4QE=Self__B4QE->count__WFC;
+          result__E4QE=TRUE__;
+          while ((! ((! result__E4QE) || (i__D4QE ==  0)))) {
+            Self__ZAFF=((__CHARACTER *)Self__B4QE->storage__BCS)[(__INTEGER)(i__D4QE -  1)];
+            result__E4QE=((Self__ZAFF == '0') || (Self__ZAFF == '1'));
+            i__D4QE=(__INTEGER)(i__D4QE -  1);
+          };
+          if ((! result__E4QE)) {
+            pos__2BXG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_303));
+            put_position__UOG(pos__2BXG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          Self__ZPQE=((__STRING *)string_tmp__VH);
-          result__1PQE= 0;
-          __tmp__GQQE=Self__ZPQE->count__KFC;
-          Self__3SRE= 1;
-          while ((Self__3SRE <= __tmp__GQQE)) {
-            result__1PQE=(__INTEGER_64)(result__1PQE <<  1);
-            if ((((__CHARACTER *)Self__ZPQE->storage__VBS)[(__INTEGER)(Self__3SRE -  1)] == '1')) {
-              result__1PQE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__1PQE) &  -2));
-            };
-            Self__3SRE=(__INTEGER)(Self__3SRE +  1);
-          };
-          last_integer__NRO=result__1PQE;
-          position__GBC=(__INTEGER)(position__GBC +  1);
-        } else {
-          result__A0YG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__A0YG=((__CHARACTER )(( 0)));
-          } else {
-            result__A0YG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-          };
-          if ((result__A0YG == 'd')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-          };
-          Self__FRQE=((__STRING *)string_tmp__VH);
-          state__IRQE= 0;
-          value__JRQE= 0;
-          negative__KRQE=FALSE__;
-          result__LRQE=FALSE__;
-          cc__MRQE='\0';
-          i__HRQE= 1;
-          while ((! ((state__IRQE ==  4) || (i__HRQE > Self__FRQE->count__KFC)))) {
-            cc__MRQE=((__CHARACTER *)Self__FRQE->storage__VBS)[(__INTEGER)(i__HRQE -  1)];
-            if ((state__IRQE ==  0)) {
-              if ((((((((cc__MRQE == ' ') || (cc__MRQE == '\t')) || (cc__MRQE == '\n')) || (cc__MRQE == '\r')) || (cc__MRQE == '\0')) || (cc__MRQE == '\f')) || (cc__MRQE == '\v'))) {
-                __tmp__ZSQE=TRUE__;
+          Self__X5QE=((__STRING *)string_tmp__VH);
+          result__Z5QE= 0;
+          __tmp__EARE=Self__X5QE->count__WFC;
+          Self__FCSE= 1;
+          while ((Self__FCSE <= __tmp__EARE)) {
+            result__Z5QE=(__INTEGER_64)(result__Z5QE <<  1);
+            if ((((__CHARACTER *)Self__X5QE->storage__BCS)[(__INTEGER)(Self__FCSE -  1)] == '1')) {
+              result__Z5QE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__Z5QE) &  -2));
+            };
+            Self__FCSE=(__INTEGER)(Self__FCSE +  1);
+          };
+          last_integer__ZRO=result__Z5QE;
+          position__SBC=(__INTEGER)(position__SBC +  1);
+        } else {
+          result__034G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__034G=((__CHARACTER )(( 0)));
+          } else {
+            result__034G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          };
+          if ((result__034G == 'd')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+          };
+          Self__DBRE=((__STRING *)string_tmp__VH);
+          state__GBRE= 0;
+          value__HBRE= 0;
+          negative__IBRE=FALSE__;
+          result__JBRE=FALSE__;
+          cc__KBRE='\0';
+          i__FBRE= 1;
+          while ((! ((state__GBRE ==  4) || (i__FBRE > Self__DBRE->count__WFC)))) {
+            cc__KBRE=((__CHARACTER *)Self__DBRE->storage__BCS)[(__INTEGER)(i__FBRE -  1)];
+            if ((state__GBRE ==  0)) {
+              if ((((((((cc__KBRE == ' ') || (cc__KBRE == '\t')) || (cc__KBRE == '\n')) || (cc__KBRE == '\r')) || (cc__KBRE == '\0')) || (cc__KBRE == '\f')) || (cc__KBRE == '\v'))) {
+                __tmp__XCRE=TRUE__;
               } else {
-                result__BAJG=(cc__MRQE == '+');
-                if (result__BAJG) {
-                  state__IRQE= 1;
+                result__HGOG=(cc__KBRE == '+');
+                if (result__HGOG) {
+                  state__GBRE= 1;
                 };
-                __tmp__ZSQE=result__BAJG;
+                __tmp__XCRE=result__HGOG;
               };
-              if (__tmp__ZSQE) {
-                __tmp__FTQE=TRUE__;
+              if (__tmp__XCRE) {
+                __tmp__DDRE=TRUE__;
               } else {
-                result__OAJG=(cc__MRQE == '-');
-                if (result__OAJG) {
-                  negative__KRQE=TRUE__;
-                  state__IRQE= 1;
+                result__UGOG=(cc__KBRE == '-');
+                if (result__UGOG) {
+                  negative__IBRE=TRUE__;
+                  state__GBRE= 1;
                 };
-                __tmp__FTQE=result__OAJG;
+                __tmp__DDRE=result__UGOG;
               };
-              if ((! __tmp__FTQE)) {
-                result__DQ2G=FALSE__;
-                if ((((__INTEGER_8 )cc__MRQE) >= ((__INTEGER_8 )'0'))) {
-                  result__DQ2G=(((__INTEGER_8 )cc__MRQE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__DDRE)) {
+                result__B1CH=FALSE__;
+                if ((((__INTEGER_8 )cc__KBRE) >= ((__INTEGER_8 )'0'))) {
+                  result__B1CH=(((__INTEGER_8 )cc__KBRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__DQ2G) {
-                  value__JRQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48);
-                  state__IRQE= 2;
+                if (result__B1CH) {
+                  value__HBRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KBRE)) -  48);
+                  state__GBRE= 2;
                 } else {
-                  state__IRQE= 4;
+                  state__GBRE= 4;
                 };
               };
-              __tmp__ZTQE=TRUE__;
+              __tmp__XDRE=TRUE__;
             } else {
-              __tmp__ZTQE=FALSE__;
+              __tmp__XDRE=FALSE__;
             };
-            if (__tmp__ZTQE) {
-              __tmp__YUQE=TRUE__;
+            if (__tmp__XDRE) {
+              __tmp__WERE=TRUE__;
             } else {
-              result__ONEF=(state__IRQE ==  1);
-              if (result__ONEF) {
-                result__GQ2G=FALSE__;
-                if ((((__INTEGER_8 )cc__MRQE) >= ((__INTEGER_8 )'0'))) {
-                  result__GQ2G=(((__INTEGER_8 )cc__MRQE) <= ((__INTEGER_8 )'9'));
+              result__JCFF=(state__GBRE ==  1);
+              if (result__JCFF) {
+                result__E1CH=FALSE__;
+                if ((((__INTEGER_8 )cc__KBRE) >= ((__INTEGER_8 )'0'))) {
+                  result__E1CH=(((__INTEGER_8 )cc__KBRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__GQ2G) {
-                  value__JRQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48);
-                  if (negative__KRQE) {
-                    value__JRQE=(__INTEGER)(- value__JRQE);
+                if (result__E1CH) {
+                  value__HBRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KBRE)) -  48);
+                  if (negative__IBRE) {
+                    value__HBRE=(__INTEGER)(- value__HBRE);
                   };
-                  state__IRQE= 2;
+                  state__GBRE= 2;
                 } else {
-                  state__IRQE= 4;
+                  state__GBRE= 4;
                 };
               };
-              __tmp__YUQE=result__ONEF;
+              __tmp__WERE=result__JCFF;
             };
-            if (__tmp__YUQE) {
-              __tmp__MXQE=TRUE__;
+            if (__tmp__WERE) {
+              __tmp__KHRE=TRUE__;
             } else {
-              result__AOEF=(state__IRQE ==  2);
-              if (result__AOEF) {
-                result__JQ2G=FALSE__;
-                if ((((__INTEGER_8 )cc__MRQE) >= ((__INTEGER_8 )'0'))) {
-                  result__JQ2G=(((__INTEGER_8 )cc__MRQE) <= ((__INTEGER_8 )'9'));
+              result__1CFF=(state__GBRE ==  2);
+              if (result__1CFF) {
+                result__H1CH=FALSE__;
+                if ((((__INTEGER_8 )cc__KBRE) >= ((__INTEGER_8 )'0'))) {
+                  result__H1CH=(((__INTEGER_8 )cc__KBRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__JQ2G) {
-                  if (negative__KRQE) {
-                    value__JRQE=(__INTEGER)((__INTEGER)( 10 * value__JRQE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48));
+                if (result__H1CH) {
+                  if (negative__IBRE) {
+                    value__HBRE=(__INTEGER)((__INTEGER)( 10 * value__HBRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KBRE)) -  48));
                   } else {
-                    value__JRQE=(__INTEGER)((__INTEGER)( 10 * value__JRQE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48));
+                    value__HBRE=(__INTEGER)((__INTEGER)( 10 * value__HBRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KBRE)) -  48));
                   };
-                  if (((negative__KRQE && (value__JRQE >  0)) || ((! negative__KRQE) && (value__JRQE <  0)))) {
-                    state__IRQE= 4;
+                  if (((negative__IBRE && (value__HBRE >  0)) || ((! negative__IBRE) && (value__HBRE <  0)))) {
+                    state__GBRE= 4;
                   };
-                  __tmp__ZWQE=TRUE__;
+                  __tmp__XGRE=TRUE__;
                 } else {
-                  __tmp__ZWQE=FALSE__;
+                  __tmp__XGRE=FALSE__;
                 };
-                if ((! __tmp__ZWQE)) {
-                  if ((((((((cc__MRQE == ' ') || (cc__MRQE == '\t')) || (cc__MRQE == '\n')) || (cc__MRQE == '\r')) || (cc__MRQE == '\0')) || (cc__MRQE == '\f')) || (cc__MRQE == '\v'))) {
-                    state__IRQE= 3;
+                if ((! __tmp__XGRE)) {
+                  if ((((((((cc__KBRE == ' ') || (cc__KBRE == '\t')) || (cc__KBRE == '\n')) || (cc__KBRE == '\r')) || (cc__KBRE == '\0')) || (cc__KBRE == '\f')) || (cc__KBRE == '\v'))) {
+                    state__GBRE= 3;
                   } else {
-                    state__IRQE= 4;
+                    state__GBRE= 4;
                   };
                 };
               };
-              __tmp__MXQE=result__AOEF;
+              __tmp__KHRE=result__1CFF;
             };
-            if ((! __tmp__MXQE)) {
-              if ((state__IRQE ==  3)) {
-                if ((! (((((((cc__MRQE == ' ') || (cc__MRQE == '\t')) || (cc__MRQE == '\n')) || (cc__MRQE == '\r')) || (cc__MRQE == '\0')) || (cc__MRQE == '\f')) || (cc__MRQE == '\v')))) {
-                  state__IRQE= 4;
+            if ((! __tmp__KHRE)) {
+              if ((state__GBRE ==  3)) {
+                if ((! (((((((cc__KBRE == ' ') || (cc__KBRE == '\t')) || (cc__KBRE == '\n')) || (cc__KBRE == '\r')) || (cc__KBRE == '\0')) || (cc__KBRE == '\f')) || (cc__KBRE == '\v')))) {
+                  state__GBRE= 4;
                 };
               };
             };
-            i__HRQE=(__INTEGER)(i__HRQE +  1);
+            i__FBRE=(__INTEGER)(i__FBRE +  1);
           };
-          if (((state__IRQE !=  0) && (state__IRQE !=  4))) {
-            result__LRQE=TRUE__;
+          if (((state__GBRE !=  0) && (state__GBRE !=  4))) {
+            result__JBRE=TRUE__;
           };
-          if ((! result__LRQE)) {
-            pos__HQRG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_294));
-            put_position__IOG(pos__HQRG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if ((! result__JBRE)) {
+            pos__LCXG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_304));
+            put_position__UOG(pos__LCXG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          Self__AZQE=((__STRING *)string_tmp__VH);
-          state__DZQE= 0;
-          cc__EZQE='\0';
-          negative__FZQE=FALSE__;
-          result__GZQE= 0;
-          i__CZQE= 1;
-          while ((i__CZQE <= Self__AZQE->count__KFC)) {
-            cc__EZQE=((__CHARACTER *)Self__AZQE->storage__VBS)[(__INTEGER)(i__CZQE -  1)];
-            if ((state__DZQE ==  0)) {
-              if ((((((((cc__EZQE == ' ') || (cc__EZQE == '\t')) || (cc__EZQE == '\n')) || (cc__EZQE == '\r')) || (cc__EZQE == '\0')) || (cc__EZQE == '\f')) || (cc__EZQE == '\v'))) {
-                __tmp__S0QE=TRUE__;
+          Self__4IRE=((__STRING *)string_tmp__VH);
+          state__BJRE= 0;
+          cc__CJRE='\0';
+          negative__DJRE=FALSE__;
+          result__EJRE= 0;
+          i__AJRE= 1;
+          while ((i__AJRE <= Self__4IRE->count__WFC)) {
+            cc__CJRE=((__CHARACTER *)Self__4IRE->storage__BCS)[(__INTEGER)(i__AJRE -  1)];
+            if ((state__BJRE ==  0)) {
+              if ((((((((cc__CJRE == ' ') || (cc__CJRE == '\t')) || (cc__CJRE == '\n')) || (cc__CJRE == '\r')) || (cc__CJRE == '\0')) || (cc__CJRE == '\f')) || (cc__CJRE == '\v'))) {
+                __tmp__QKRE=TRUE__;
               } else {
-                result__QBJG=(cc__EZQE == '+');
-                if (result__QBJG) {
-                  state__DZQE= 1;
+                result__WHOG=(cc__CJRE == '+');
+                if (result__WHOG) {
+                  state__BJRE= 1;
                 };
-                __tmp__S0QE=result__QBJG;
+                __tmp__QKRE=result__WHOG;
               };
-              if ((! __tmp__S0QE)) {
-                if ((cc__EZQE == '-')) {
-                  negative__FZQE=TRUE__;
-                  state__DZQE= 1;
+              if ((! __tmp__QKRE)) {
+                if ((cc__CJRE == '-')) {
+                  negative__DJRE=TRUE__;
+                  state__BJRE= 1;
                 } else {
-                  result__GZQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48);
-                  state__DZQE= 2;
+                  result__EJRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CJRE)) -  48);
+                  state__BJRE= 2;
                 };
               };
-              __tmp__F1QE=TRUE__;
+              __tmp__DLRE=TRUE__;
             } else {
-              __tmp__F1QE=FALSE__;
+              __tmp__DLRE=FALSE__;
             };
-            if (__tmp__F1QE) {
-              __tmp__01QE=TRUE__;
+            if (__tmp__DLRE) {
+              __tmp__YLRE=TRUE__;
             } else {
-              result__OPEF=(state__DZQE ==  1);
-              if (result__OPEF) {
-                result__GZQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48);
-                if (negative__FZQE) {
-                  result__GZQE=(__INTEGER)(- result__GZQE);
+              result__JEFF=(state__BJRE ==  1);
+              if (result__JEFF) {
+                result__EJRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CJRE)) -  48);
+                if (negative__DJRE) {
+                  result__EJRE=(__INTEGER)(- result__EJRE);
                 };
-                state__DZQE= 2;
+                state__BJRE= 2;
               };
-              __tmp__01QE=result__OPEF;
+              __tmp__YLRE=result__JEFF;
             };
-            if (__tmp__01QE) {
-              __tmp__B3QE=TRUE__;
+            if (__tmp__YLRE) {
+              __tmp__5MRE=TRUE__;
             } else {
-              result__AQEF=(state__DZQE ==  2);
-              if (result__AQEF) {
-                result__DI2G=FALSE__;
-                if ((((__INTEGER_8 )cc__EZQE) >= ((__INTEGER_8 )'0'))) {
-                  result__DI2G=(((__INTEGER_8 )cc__EZQE) <= ((__INTEGER_8 )'9'));
+              result__1EFF=(state__BJRE ==  2);
+              if (result__1EFF) {
+                result__DUCH=FALSE__;
+                if ((((__INTEGER_8 )cc__CJRE) >= ((__INTEGER_8 )'0'))) {
+                  result__DUCH=(((__INTEGER_8 )cc__CJRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__DI2G) {
-                  if (negative__FZQE) {
-                    result__GZQE=(__INTEGER)((__INTEGER)( 10 * result__GZQE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48));
+                if (result__DUCH) {
+                  if (negative__DJRE) {
+                    result__EJRE=(__INTEGER)((__INTEGER)( 10 * result__EJRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CJRE)) -  48));
                   } else {
-                    result__GZQE=(__INTEGER)((__INTEGER)( 10 * result__GZQE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48));
+                    result__EJRE=(__INTEGER)((__INTEGER)( 10 * result__EJRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CJRE)) -  48));
                   };
                 } else {
-                  state__DZQE= 3;
+                  state__BJRE= 3;
                 };
               };
-              __tmp__B3QE=result__AQEF;
+              __tmp__5MRE=result__1EFF;
             };
-            if ((! __tmp__B3QE)) {
-              if ((state__DZQE ==  3)) {
-                i__CZQE=Self__AZQE->count__KFC;
+            if ((! __tmp__5MRE)) {
+              if ((state__BJRE ==  3)) {
+                i__AJRE=Self__4IRE->count__WFC;
               };
             };
-            i__CZQE=(__INTEGER)(i__CZQE +  1);
+            i__AJRE=(__INTEGER)(i__AJRE +  1);
           };
-          last_integer__NRO=((__INTEGER_64 )result__GZQE);
+          last_integer__ZRO=((__INTEGER_64 )result__EJRE);
         };
       };
     };
   };
-  if (result__X1P) {
-    short__token__to__5AD((&__string_121),pos_old__Y1P,position__GBC);
+  if (result__D2P) {
+    short__token__to__LBD((&__string_121),pos_old__E2P,position__SBC);
   };
-  return(result__X1P);
+  return(result__D2P);
 }
 
-static void* readlip_expr__3SPB()
+static void* readlip_expr__JTPB()
 // () With resultRecursive, No inlinable.
 {
-  void *result__ATPB,*val__BTPB,*result__2KYC,*val__ELYC;
-  void *nam__CTPB;
-  __POSITION pos__SQRG,p__LN3B,pos__0QRG,pos__2QRG,pos__4QRG,pos__ARRG;
-  __POSITION pos__CRRG,pos__ERRG,p__OLID,p__KHHE,pos__SRRG;
-  __LIP_AFFECT *result__IY4B,*Self__3HHC;
-  __POINTER ptr__JY4B,ptr_table__NSBH,next__MSBH,result__OSBH;
-  __POINTER ptr_table__SSBH,next__RSBH,result__TSBH,ptr__ERKD;
-  __POINTER ptr_table__MTBH,next__LTBH,result__NTBH,ptr_table__RTBH;
-  __POINTER next__QTBH,result__STBH,ptr__NSME,ptr_table__WTBH;
-  __POINTER next__VTBH,result__XTBH,ptr_table__1TBH,next__0TBH;
-  __POINTER result__2TBH;
-  __INTEGER typ_id__OY4B,typ_id__JRKD,typ_id__SSME;
-  __UINTEGER_32 sz__LY4B,a__KI4G,new_size__LI4G,t__PI4G,a__OI4G;
-  __UINTEGER_32 new_size__VSBH,lab_type__USBH,sz__GRKD,a__SI4G;
-  __UINTEGER_32 new_size__TI4G,t__XI4G,a__WI4G,new_size__UTBH;
-  __UINTEGER_32 lab_type__TTBH,sz__PSME,a__0I4G,new_size__1I4G,t__5I4G;
-  __UINTEGER_32 a__4I4G,new_size__4TBH,lab_type__3TBH;
-  __LIP_IF *result__DRKD,*Self__WPTD;
-  __LIP_PRINT *result__MSME,*Self__FNVE;
-  __BOOLEAN result__WSBH,__tmp__WUPB,result__ZSBH,result__2SBH;
-  __BOOLEAN result__5SBH,result__CTBH,result__FTBH,result__ITBH;
-  __BOOLEAN __tmp__WOYC;
-  __CHARACTER result__XSBH,result__0SBH,result__3SBH,result__ATBH;
-  __CHARACTER result__DTBH,result__GTBH,result__JTBH;
-  void *the__CLYC,*els__DLYC,*result__S25G,*result__UJID;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__T25G,*Self__U25G,*Self__XX4D;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__NY4D;
-  result__ATPB=NULL;
-  val__BTPB=NULL;
-  nam__CTPB=NULL;
-  old_position__XQI=position__GBC;
-  old_pos_cur__ZQI=pos_cur__JBC;
-  old_pos_line__1QI=pos_line__KBC;
-  old_pos_col__3QI=pos_col__LBC;
-  old_short_derive__5QI=short_derive__VBC;
-  if (read_identifier__55K()) {
-    nam__CTPB=last_string__2ZC;
-    if (read_symbol__XWJ((&__string_12))) {
-      val__BTPB=readlip_expr_operator__AOZB(PARSER__);
-      if (((void *)val__BTPB == (void *)NULL)) {
-        pos__SQRG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_227));
-        put_position__IOG(pos__SQRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+  void *result__MTPB,*val__NTPB,*result__ILYC,*val__QLYC;
+  void *nam__OTPB;
+  __POSITION pos__WCXG,p__XN3B,pos__4CXG,pos__ADXG,pos__CDXG,pos__EDXG;
+  __POSITION pos__GDXG,pos__IDXG,p__0LID,p__TUHE,pos__WDXG;
+  __LIP_AFFECT *result__UY4B,*Self__JIHC;
+  __POINTER ptr__VY4B,ptr_table__B5HH,next__A5HH,result__C5HH;
+  __POINTER ptr_table__G5HH,next__F5HH,result__H5HH,ptr__QRKD;
+  __POINTER ptr_table__AAIH,next__55HH,result__BAIH,ptr_table__FAIH;
+  __POINTER next__EAIH,result__GAIH,ptr__WBNE,ptr_table__KAIH;
+  __POINTER next__JAIH,result__LAIH,ptr_table__PAIH,next__OAIH;
+  __POINTER result__QAIH;
+  __INTEGER typ_id__0Y4B,typ_id__VRKD,typ_id__1BNE;
+  __UINTEGER_32 sz__XY4B,a__5TEH,new_size__AUEH,t__EUEH,a__DUEH;
+  __UINTEGER_32 new_size__J5HH,lab_type__I5HH,sz__SRKD,a__HUEH;
+  __UINTEGER_32 new_size__IUEH,t__MUEH,a__LUEH,new_size__IAIH;
+  __UINTEGER_32 lab_type__HAIH,sz__YBNE,a__PUEH,new_size__QUEH,t__UUEH;
+  __UINTEGER_32 a__TUEH,new_size__SAIH,lab_type__RAIH;
+  __LIP_IF *result__PRKD,*Self__PQTD;
+  __LIP_PRINT *result__VBNE,*Self__K3VE;
+  __BOOLEAN result__K5HH,__tmp__CVPB,result__N5HH,result__Q5HH;
+  __BOOLEAN result__T5HH,result__W5HH,result__Z5HH,result__25HH;
+  __BOOLEAN __tmp__CPYC;
+  __CHARACTER result__L5HH,result__O5HH,result__R5HH,result__U5HH;
+  __CHARACTER result__X5HH,result__05HH,result__35HH;
+  void *the__OLYC,*els__PLYC,*result__4IGH,*result__AKID;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__5IGH,*Self__AJGH,*Self__AF5D;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__WF5D;
+  result__MTPB=NULL;
+  val__NTPB=NULL;
+  nam__OTPB=NULL;
+  old_position__DRI=position__SBC;
+  old_pos_cur__FRI=pos_cur__VBC;
+  old_pos_line__HRI=pos_line__WBC;
+  old_pos_col__JRI=pos_col__XBC;
+  old_short_derive__LRI=short_derive__BCC;
+  if (read_identifier__LAL()) {
+    nam__OTPB=last_string__I0C;
+    if (read_symbol__DXJ((&__string_12))) {
+      val__NTPB=readlip_expr_operator__MOZB(PARSER__);
+      if (((void *)val__NTPB == (void *)NULL)) {
+        pos__WCXG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_237));
+        put_position__UOG(pos__WCXG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      p__LN3B=current_position__3WF();
-      result__IY4B=NULL;
-      ptr__JY4B=((__POINTER )(NULL));
-      typ_id__OY4B= 0;
-      sz__LY4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
-      if ((sz__LY4B ==  0)) {
-        result__IY4B=LIP_AFFECT__;
-      } else {
-        typ_id__OY4B=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__LY4B);
-        if ((typ_id__OY4B == (__INTEGER)(-  1))) {
-          a__KI4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__LI4G=(__UINTEGER_32)((__UINTEGER_32)(sz__LY4B + a__KI4G) & (__UINTEGER_32)(~ a__KI4G));
-          ptr_table__NSBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LI4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__MSBH=((__POINTER )(NULL));
-          result__OSBH=((__POINTER *)ptr_table__NSBH)[ 0];
-          if ((result__OSBH == (void *)NULL)) {
-            result__OSBH=new_lab__ARJ(new_size__LI4G);
-            next__MSBH=(void *)((unsigned long)result__OSBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LI4G)));
-            ((__POINTER *)next__MSBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NSBH)[ 0]=next__MSBH;
-          } else {
-            next__MSBH=((__POINTER *)result__OSBH)[ 0];
-            if ((next__MSBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OSBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__LI4G <<  1)) <=  4096)) {
-                next__MSBH=(void *)((unsigned long)result__OSBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LI4G)));
+      p__XN3B=current_position__JXF();
+      result__UY4B=NULL;
+      ptr__VY4B=((__POINTER )(NULL));
+      typ_id__0Y4B= 0;
+      sz__XY4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
+      if ((sz__XY4B ==  0)) {
+        result__UY4B=LIP_AFFECT__;
+      } else {
+        typ_id__0Y4B=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XY4B);
+        if ((typ_id__0Y4B == (__INTEGER)(-  1))) {
+          a__5TEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__XY4B + a__5TEH) & (__UINTEGER_32)(~ a__5TEH));
+          ptr_table__B5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__A5HH=((__POINTER )(NULL));
+          result__C5HH=((__POINTER *)ptr_table__B5HH)[ 0];
+          if ((result__C5HH == (void *)NULL)) {
+            result__C5HH=new_lab__MRJ(new_size__AUEH);
+            next__A5HH=(void *)((unsigned long)result__C5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUEH)));
+            ((__POINTER *)next__A5HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__B5HH)[ 0]=next__A5HH;
+          } else {
+            next__A5HH=((__POINTER *)result__C5HH)[ 0];
+            if ((next__A5HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AUEH <<  1)) <=  4096)) {
+                next__A5HH=(void *)((unsigned long)result__C5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUEH)));
               } else {
-                next__MSBH=new_lab__ARJ(new_size__LI4G);
+                next__A5HH=new_lab__MRJ(new_size__AUEH);
               };
-              ((__POINTER *)next__MSBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NSBH)[ 0]=next__MSBH;
+              ((__POINTER *)next__A5HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B5HH)[ 0]=next__A5HH;
             } else {
-              ((__POINTER *)result__OSBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MSBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__OSBH=next__MSBH;
-            };
-          };
-          ptr__JY4B=result__OSBH;
-        } else {
-          t__PI4G=((__UINTEGER_32 )typ_id__OY4B);
-          a__OI4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__VSBH=(__UINTEGER_32)((__UINTEGER_32)(sz__LY4B + a__OI4G) & (__UINTEGER_32)(~ a__OI4G));
-          ptr_table__SSBH=((__POINTER )(&(table_type[(t__PI4G)])));
-          lab_type__USBH=(__UINTEGER_32)(t__PI4G |  1);
-          next__RSBH=((__POINTER )(NULL));
-          result__TSBH=((__POINTER *)ptr_table__SSBH)[ 0];
-          if ((result__TSBH == (void *)NULL)) {
-            result__TSBH=new_lab__ARJ(lab_type__USBH);
-            next__RSBH=(void *)((unsigned long)result__TSBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSBH)));
-            ((__POINTER *)next__RSBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SSBH)[ 0]=next__RSBH;
-          } else {
-            next__RSBH=((__POINTER *)result__TSBH)[ 0];
-            if ((next__RSBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TSBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VSBH <<  1)) <=  4096)) {
-                next__RSBH=(void *)((unsigned long)result__TSBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSBH)));
+              ((__POINTER *)result__C5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__C5HH=next__A5HH;
+            };
+          };
+          ptr__VY4B=result__C5HH;
+        } else {
+          t__EUEH=((__UINTEGER_32 )typ_id__0Y4B);
+          a__DUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__J5HH=(__UINTEGER_32)((__UINTEGER_32)(sz__XY4B + a__DUEH) & (__UINTEGER_32)(~ a__DUEH));
+          ptr_table__G5HH=((__POINTER )(&(table_type[(t__EUEH)])));
+          lab_type__I5HH=(__UINTEGER_32)(t__EUEH |  1);
+          next__F5HH=((__POINTER )(NULL));
+          result__H5HH=((__POINTER *)ptr_table__G5HH)[ 0];
+          if ((result__H5HH == (void *)NULL)) {
+            result__H5HH=new_lab__MRJ(lab_type__I5HH);
+            next__F5HH=(void *)((unsigned long)result__H5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J5HH)));
+            ((__POINTER *)next__F5HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__G5HH)[ 0]=next__F5HH;
+          } else {
+            next__F5HH=((__POINTER *)result__H5HH)[ 0];
+            if ((next__F5HH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J5HH <<  1)) <=  4096)) {
+                next__F5HH=(void *)((unsigned long)result__H5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J5HH)));
               } else {
-                next__RSBH=new_lab__ARJ(lab_type__USBH);
+                next__F5HH=new_lab__MRJ(lab_type__I5HH);
               };
-              ((__POINTER *)next__RSBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SSBH)[ 0]=next__RSBH;
+              ((__POINTER *)next__F5HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__G5HH)[ 0]=next__F5HH;
             } else {
-              ((__POINTER *)result__TSBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TSBH=next__RSBH;
+              ((__POINTER *)result__H5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__H5HH=next__F5HH;
             };
           };
-          ptr__JY4B=result__TSBH;
+          ptr__VY4B=result__H5HH;
         };
-        result__IY4B=((__LIP_AFFECT *)ptr__JY4B);
-        *(result__IY4B) = *(LIP_AFFECT__);
+        result__UY4B=((__LIP_AFFECT *)ptr__VY4B);
+        *(result__UY4B) = *(LIP_AFFECT__);
       };
-      Self__3HHC=((__LIP_AFFECT *)result__IY4B);
-      Self__3HHC->parent_lip_code__3TPB.parent_itm_object__TDE.position__BDJ=p__LN3B;
-      Self__3HHC->name__KGFC=nam__CTPB;
-      Self__3HHC->value__2GFC=val__BTPB;
-      result__ATPB=result__IY4B;
+      Self__JIHC=((__LIP_AFFECT *)result__UY4B);
+      Self__JIHC->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ=p__XN3B;
+      Self__JIHC->name__WGFC=nam__OTPB;
+      Self__JIHC->value__IHFC=val__NTPB;
+      result__MTPB=result__UY4B;
     } else {
-      restore_context__HDL();
+      restore_context__TDL();
     };
   };
-  if (((void *)result__ATPB == (void *)NULL)) {
-    result__ATPB=readlip_expr_operator__AOZB(PARSER__);
-    if (((void *)result__ATPB != (void *)NULL)) {
-      result__WSBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__WSBH=FALSE__;
+  if (((void *)result__MTPB == (void *)NULL)) {
+    result__MTPB=readlip_expr_operator__MOZB(PARSER__);
+    if (((void *)result__MTPB != (void *)NULL)) {
+      result__K5HH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__K5HH=FALSE__;
       } else {
-        result__XSBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__XSBH=((__CHARACTER )(( 0)));
+        result__L5HH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__L5HH=((__CHARACTER )(( 0)));
         } else {
-          result__XSBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__L5HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__XSBH == '.')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__WSBH=TRUE__;
+        if ((result__L5HH == '.')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__K5HH=TRUE__;
         };
       };
-      __tmp__WUPB=result__WSBH;
+      __tmp__CVPB=result__K5HH;
     } else {
-      __tmp__WUPB=FALSE__;
+      __tmp__CVPB=FALSE__;
     };
-    if (__tmp__WUPB) {
-      result__2KYC=NULL;
-      the__CLYC=NULL;
-      els__DLYC=NULL;
-      val__ELYC=NULL;
-      if (read_word__EPF((&__string_89))) {
-        result__S25G=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID)->parent_arrayed_collection__ZJID.upper__WNTD <  0)) {
-          result__S25G=create_with_capacity__QQKD( 16);
+    if (__tmp__CVPB) {
+      result__ILYC=NULL;
+      the__OLYC=NULL;
+      els__PLYC=NULL;
+      val__QLYC=NULL;
+      if (read_word__QPF((&__string_89))) {
+        result__4IGH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID)->parent_arrayed_collection__FKID.upper__POTD <  0)) {
+          result__4IGH=create_with_capacity__2QKD( 16);
         } else {
-          Self__T25G=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID);
-          result__S25G=((void **)Self__T25G->parent_arrayed_collection__ZJID.storage__TAUD)[Self__T25G->parent_arrayed_collection__ZJID.upper__WNTD];
-          Self__U25G=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID);
-          Self__U25G->parent_arrayed_collection__ZJID.upper__WNTD=(__INTEGER)(Self__U25G->parent_arrayed_collection__ZJID.upper__WNTD -  1);
+          Self__5IGH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
+          result__4IGH=((void **)Self__5IGH->parent_arrayed_collection__FKID.storage__MBUD)[Self__5IGH->parent_arrayed_collection__FKID.upper__POTD];
+          Self__AJGH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
+          Self__AJGH->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__AJGH->parent_arrayed_collection__FKID.upper__POTD -  1);
         };
-        the__CLYC=result__S25G;
-        result__ZSBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__ZSBH=FALSE__;
+        the__OLYC=result__4IGH;
+        result__N5HH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__N5HH=FALSE__;
         } else {
-          result__0SBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__0SBH=((__CHARACTER )(( 0)));
+          result__O5HH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__O5HH=((__CHARACTER )(( 0)));
           } else {
-            result__0SBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__O5HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__0SBH == '{')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__ZSBH=TRUE__;
+          if ((result__O5HH == '{')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__N5HH=TRUE__;
           };
         };
-        if ((! result__ZSBH)) {
-          pos__0QRG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_259));
-          put_position__IOG(pos__0QRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__N5HH)) {
+          pos__4CXG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_269));
+          put_position__UOG(pos__4CXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__PKID:
+        while_do__1KID:
         {
-          val__ELYC=readlip_expr__3SPB();
-          if (((void *)val__ELYC != (void *)NULL)) {
-            add_last__QIUD(the__CLYC,val__ELYC);
-            result__2SBH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__2SBH=FALSE__;
+          val__QLYC=readlip_expr__JTPB();
+          if (((void *)val__QLYC != (void *)NULL)) {
+            add_last__JJUD(the__OLYC,val__QLYC);
+            result__Q5HH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__Q5HH=FALSE__;
             } else {
-              result__3SBH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__3SBH=((__CHARACTER )(( 0)));
+              result__R5HH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__R5HH=((__CHARACTER )(( 0)));
               } else {
-                result__3SBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__R5HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__3SBH == ';')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__2SBH=TRUE__;
+              if ((result__R5HH == ';')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__Q5HH=TRUE__;
               };
             };
-            if ((! result__2SBH)) {
-              pos__2QRG=current_position__3WF();
-              put_error__text__4MG( 2,(&__string_160));
-              put_position__IOG(pos__2QRG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+            if ((! result__Q5HH)) {
+              pos__ADXG=current_position__JXF();
+              put_error__text__KNG( 2,(&__string_163));
+              put_position__UOG(pos__ADXG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__PKID;
+            goto while_do__1KID;
           };
         };
-        result__5SBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__5SBH=FALSE__;
+        result__T5HH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__T5HH=FALSE__;
         } else {
-          result__ATBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__ATBH=((__CHARACTER )(( 0)));
+          result__U5HH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__U5HH=((__CHARACTER )(( 0)));
           } else {
-            result__ATBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__U5HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__ATBH == '}')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__5SBH=TRUE__;
+          if ((result__U5HH == '}')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__T5HH=TRUE__;
           };
         };
-        if ((! result__5SBH)) {
-          pos__4QRG=current_position__3WF();
-          put_error__text__4MG( 2,(&__string_259));
-          put_position__IOG(pos__4QRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if ((! result__T5HH)) {
+          pos__CDXG=current_position__JXF();
+          put_error__text__KNG( 2,(&__string_269));
+          put_position__UOG(pos__CDXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        the__CLYC=copy__2KID(result__S25G);
-        if (read_word__EPF((&__string_90))) {
-          result__UJID=NULL;
-          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID)->parent_arrayed_collection__ZJID.upper__WNTD <  0)) {
-            result__UJID=create_with_capacity__QQKD( 16);
+        the__OLYC=copy__ILID(result__4IGH);
+        if (read_word__QPF((&__string_90))) {
+          result__AKID=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID)->parent_arrayed_collection__FKID.upper__POTD <  0)) {
+            result__AKID=create_with_capacity__2QKD( 16);
           } else {
-            Self__XX4D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID);
-            result__UJID=((void **)Self__XX4D->parent_arrayed_collection__ZJID.storage__TAUD)[Self__XX4D->parent_arrayed_collection__ZJID.upper__WNTD];
-            Self__NY4D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID);
-            Self__NY4D->parent_arrayed_collection__ZJID.upper__WNTD=(__INTEGER)(Self__NY4D->parent_arrayed_collection__ZJID.upper__WNTD -  1);
+            Self__AF5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
+            result__AKID=((void **)Self__AF5D->parent_arrayed_collection__FKID.storage__MBUD)[Self__AF5D->parent_arrayed_collection__FKID.upper__POTD];
+            Self__WF5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
+            Self__WF5D->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__WF5D->parent_arrayed_collection__FKID.upper__POTD -  1);
           };
-          els__DLYC=result__UJID;
-          result__CTBH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__CTBH=FALSE__;
+          els__PLYC=result__AKID;
+          result__W5HH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__W5HH=FALSE__;
           } else {
-            result__DTBH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__DTBH=((__CHARACTER )(( 0)));
+            result__X5HH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__X5HH=((__CHARACTER )(( 0)));
             } else {
-              result__DTBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__X5HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__DTBH == '{')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__CTBH=TRUE__;
+            if ((result__X5HH == '{')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__W5HH=TRUE__;
             };
           };
-          if ((! result__CTBH)) {
-            pos__ARRG=current_position__3WF();
-            put_error__text__4MG( 2,(&__string_259));
-            put_position__IOG(pos__ARRG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if ((! result__W5HH)) {
+            pos__EDXG=current_position__JXF();
+            put_error__text__KNG( 2,(&__string_269));
+            put_position__UOG(pos__EDXG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          while_do__S2LD:
+          while_do__42LD:
           {
-            val__ELYC=readlip_expr__3SPB();
-            if (((void *)val__ELYC != (void *)NULL)) {
-              add_last__QIUD(els__DLYC,val__ELYC);
-              result__FTBH=FALSE__;
-              if ((! read_space__RRD())) {
-                result__FTBH=FALSE__;
+            val__QLYC=readlip_expr__JTPB();
+            if (((void *)val__QLYC != (void *)NULL)) {
+              add_last__JJUD(els__PLYC,val__QLYC);
+              result__Z5HH=FALSE__;
+              if ((! read_space__3RD())) {
+                result__Z5HH=FALSE__;
               } else {
-                result__GTBH='\0';
-                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                  result__GTBH=((__CHARACTER )(( 0)));
+                result__05HH='\0';
+                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                  result__05HH=((__CHARACTER )(( 0)));
                 } else {
-                  result__GTBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                  result__05HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
                 };
-                if ((result__GTBH == ';')) {
-                  position__GBC=(__INTEGER)(position__GBC +  1);
-                  result__FTBH=TRUE__;
+                if ((result__05HH == ';')) {
+                  position__SBC=(__INTEGER)(position__SBC +  1);
+                  result__Z5HH=TRUE__;
                 };
               };
-              if ((! result__FTBH)) {
-                pos__CRRG=current_position__3WF();
-                put_error__text__4MG( 2,(&__string_160));
-                put_position__IOG(pos__CRRG);
-                put_string__I1F(msg_err__DNG);
-                if ((type_error__CNG !=  2)) {
+              if ((! result__Z5HH)) {
+                pos__GDXG=current_position__JXF();
+                put_error__text__KNG( 2,(&__string_163));
+                put_position__UOG(pos__GDXG);
+                put_string__U1F(msg_err__PNG);
+                if ((type_error__ONG !=  2)) {
                   exit(( 1));
                 };
               };
-              goto while_do__S2LD;
+              goto while_do__42LD;
             };
           };
-          result__ITBH=FALSE__;
-          if ((! read_space__RRD())) {
-            result__ITBH=FALSE__;
+          result__25HH=FALSE__;
+          if ((! read_space__3RD())) {
+            result__25HH=FALSE__;
           } else {
-            result__JTBH='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__JTBH=((__CHARACTER )(( 0)));
+            result__35HH='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__35HH=((__CHARACTER )(( 0)));
             } else {
-              result__JTBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__35HH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            if ((result__JTBH == '}')) {
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              result__ITBH=TRUE__;
+            if ((result__35HH == '}')) {
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              result__25HH=TRUE__;
             };
           };
-          if ((! result__ITBH)) {
-            pos__ERRG=current_position__3WF();
-            put_error__text__4MG( 2,(&__string_259));
-            put_position__IOG(pos__ERRG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+          if ((! result__25HH)) {
+            pos__IDXG=current_position__JXF();
+            put_error__text__KNG( 2,(&__string_269));
+            put_position__UOG(pos__IDXG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          els__DLYC=copy__2KID(result__UJID);
-        };
-        p__OLID=current_position__3WF();
-        result__DRKD=NULL;
-        ptr__ERKD=((__POINTER )(NULL));
-        typ_id__JRKD= 0;
-        sz__GRKD=((__UINTEGER_32 )sizeof(__LIP_IF));
-        if ((sz__GRKD ==  0)) {
-          result__DRKD=LIP_IF__;
-        } else {
-          typ_id__JRKD=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__GRKD);
-          if ((typ_id__JRKD == (__INTEGER)(-  1))) {
-            a__SI4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__TI4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GRKD + a__SI4G) & (__UINTEGER_32)(~ a__SI4G));
-            ptr_table__MTBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TI4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__LTBH=((__POINTER )(NULL));
-            result__NTBH=((__POINTER *)ptr_table__MTBH)[ 0];
-            if ((result__NTBH == (void *)NULL)) {
-              result__NTBH=new_lab__ARJ(new_size__TI4G);
-              next__LTBH=(void *)((unsigned long)result__NTBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TI4G)));
-              ((__POINTER *)next__LTBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MTBH)[ 0]=next__LTBH;
+          els__PLYC=copy__ILID(result__AKID);
+        };
+        p__0LID=current_position__JXF();
+        result__PRKD=NULL;
+        ptr__QRKD=((__POINTER )(NULL));
+        typ_id__VRKD= 0;
+        sz__SRKD=((__UINTEGER_32 )sizeof(__LIP_IF));
+        if ((sz__SRKD ==  0)) {
+          result__PRKD=LIP_IF__;
+        } else {
+          typ_id__VRKD=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SRKD);
+          if ((typ_id__VRKD == (__INTEGER)(-  1))) {
+            a__HUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__IUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRKD + a__HUEH) & (__UINTEGER_32)(~ a__HUEH));
+            ptr_table__AAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__55HH=((__POINTER )(NULL));
+            result__BAIH=((__POINTER *)ptr_table__AAIH)[ 0];
+            if ((result__BAIH == (void *)NULL)) {
+              result__BAIH=new_lab__MRJ(new_size__IUEH);
+              next__55HH=(void *)((unsigned long)result__BAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IUEH)));
+              ((__POINTER *)next__55HH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AAIH)[ 0]=next__55HH;
             } else {
-              next__LTBH=((__POINTER *)result__NTBH)[ 0];
-              if ((next__LTBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NTBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__TI4G <<  1)) <=  4096)) {
-                  next__LTBH=(void *)((unsigned long)result__NTBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TI4G)));
+              next__55HH=((__POINTER *)result__BAIH)[ 0];
+              if ((next__55HH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IUEH <<  1)) <=  4096)) {
+                  next__55HH=(void *)((unsigned long)result__BAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IUEH)));
                 } else {
-                  next__LTBH=new_lab__ARJ(new_size__TI4G);
+                  next__55HH=new_lab__MRJ(new_size__IUEH);
                 };
-                ((__POINTER *)next__LTBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MTBH)[ 0]=next__LTBH;
+                ((__POINTER *)next__55HH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AAIH)[ 0]=next__55HH;
               } else {
-                ((__POINTER *)result__NTBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LTBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NTBH=next__LTBH;
+                ((__POINTER *)result__BAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__55HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BAIH=next__55HH;
               };
             };
-            ptr__ERKD=result__NTBH;
-          } else {
-            t__XI4G=((__UINTEGER_32 )typ_id__JRKD);
-            a__WI4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__UTBH=(__UINTEGER_32)((__UINTEGER_32)(sz__GRKD + a__WI4G) & (__UINTEGER_32)(~ a__WI4G));
-            ptr_table__RTBH=((__POINTER )(&(table_type[(t__XI4G)])));
-            lab_type__TTBH=(__UINTEGER_32)(t__XI4G |  1);
-            next__QTBH=((__POINTER )(NULL));
-            result__STBH=((__POINTER *)ptr_table__RTBH)[ 0];
-            if ((result__STBH == (void *)NULL)) {
-              result__STBH=new_lab__ARJ(lab_type__TTBH);
-              next__QTBH=(void *)((unsigned long)result__STBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTBH)));
-              ((__POINTER *)next__QTBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RTBH)[ 0]=next__QTBH;
+            ptr__QRKD=result__BAIH;
+          } else {
+            t__MUEH=((__UINTEGER_32 )typ_id__VRKD);
+            a__LUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__IAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRKD + a__LUEH) & (__UINTEGER_32)(~ a__LUEH));
+            ptr_table__FAIH=((__POINTER )(&(table_type[(t__MUEH)])));
+            lab_type__HAIH=(__UINTEGER_32)(t__MUEH |  1);
+            next__EAIH=((__POINTER )(NULL));
+            result__GAIH=((__POINTER *)ptr_table__FAIH)[ 0];
+            if ((result__GAIH == (void *)NULL)) {
+              result__GAIH=new_lab__MRJ(lab_type__HAIH);
+              next__EAIH=(void *)((unsigned long)result__GAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAIH)));
+              ((__POINTER *)next__EAIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FAIH)[ 0]=next__EAIH;
             } else {
-              next__QTBH=((__POINTER *)result__STBH)[ 0];
-              if ((next__QTBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__STBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UTBH <<  1)) <=  4096)) {
-                  next__QTBH=(void *)((unsigned long)result__STBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTBH)));
+              next__EAIH=((__POINTER *)result__GAIH)[ 0];
+              if ((next__EAIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IAIH <<  1)) <=  4096)) {
+                  next__EAIH=(void *)((unsigned long)result__GAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAIH)));
                 } else {
-                  next__QTBH=new_lab__ARJ(lab_type__TTBH);
+                  next__EAIH=new_lab__MRJ(lab_type__HAIH);
                 };
-                ((__POINTER *)next__QTBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RTBH)[ 0]=next__QTBH;
+                ((__POINTER *)next__EAIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FAIH)[ 0]=next__EAIH;
               } else {
-                ((__POINTER *)result__STBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QTBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__STBH=next__QTBH;
+                ((__POINTER *)result__GAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GAIH=next__EAIH;
               };
             };
-            ptr__ERKD=result__STBH;
-          };
-          result__DRKD=((__LIP_IF *)ptr__ERKD);
-          *(result__DRKD) = *(LIP_IF__);
-        };
-        Self__WPTD=((__LIP_IF *)result__DRKD);
-        Self__WPTD->parent_lip_code__SOYC.parent_itm_object__TDE.position__BDJ=p__OLID;
-        Self__WPTD->condition__UCQD=result__ATPB;
-        Self__WPTD->then__KDQD=the__CLYC;
-        Self__WPTD->else__BEQD=els__DLYC;
-        result__2KYC=result__DRKD;
-        __tmp__WOYC=TRUE__;
-      } else {
-        __tmp__WOYC=FALSE__;
-      };
-      if ((! __tmp__WOYC)) {
-        if (read_word__EPF((&__string_91))) {
-          p__KHHE=current_position__3WF();
-          result__MSME=NULL;
-          ptr__NSME=((__POINTER )(NULL));
-          typ_id__SSME= 0;
-          sz__PSME=((__UINTEGER_32 )sizeof(__LIP_PRINT));
-          if ((sz__PSME ==  0)) {
-            result__MSME=LIP_PRINT__;
-          } else {
-            typ_id__SSME=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__PSME);
-            if ((typ_id__SSME == (__INTEGER)(-  1))) {
-              a__0I4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__1I4G=(__UINTEGER_32)((__UINTEGER_32)(sz__PSME + a__0I4G) & (__UINTEGER_32)(~ a__0I4G));
-              ptr_table__WTBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1I4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__VTBH=((__POINTER )(NULL));
-              result__XTBH=((__POINTER *)ptr_table__WTBH)[ 0];
-              if ((result__XTBH == (void *)NULL)) {
-                result__XTBH=new_lab__ARJ(new_size__1I4G);
-                next__VTBH=(void *)((unsigned long)result__XTBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1I4G)));
-                ((__POINTER *)next__VTBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WTBH)[ 0]=next__VTBH;
+            ptr__QRKD=result__GAIH;
+          };
+          result__PRKD=((__LIP_IF *)ptr__QRKD);
+          *(result__PRKD) = *(LIP_IF__);
+        };
+        Self__PQTD=((__LIP_IF *)result__PRKD);
+        Self__PQTD->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ=p__0LID;
+        Self__PQTD->condition__ADQD=result__MTPB;
+        Self__PQTD->then__WDQD=the__OLYC;
+        Self__PQTD->else__NEQD=els__PLYC;
+        result__ILYC=result__PRKD;
+        __tmp__CPYC=TRUE__;
+      } else {
+        __tmp__CPYC=FALSE__;
+      };
+      if ((! __tmp__CPYC)) {
+        if (read_word__QPF((&__string_91))) {
+          p__TUHE=current_position__JXF();
+          result__VBNE=NULL;
+          ptr__WBNE=((__POINTER )(NULL));
+          typ_id__1BNE= 0;
+          sz__YBNE=((__UINTEGER_32 )sizeof(__LIP_PRINT));
+          if ((sz__YBNE ==  0)) {
+            result__VBNE=LIP_PRINT__;
+          } else {
+            typ_id__1BNE=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YBNE);
+            if ((typ_id__1BNE == (__INTEGER)(-  1))) {
+              a__PUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__QUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__YBNE + a__PUEH) & (__UINTEGER_32)(~ a__PUEH));
+              ptr_table__KAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__JAIH=((__POINTER )(NULL));
+              result__LAIH=((__POINTER *)ptr_table__KAIH)[ 0];
+              if ((result__LAIH == (void *)NULL)) {
+                result__LAIH=new_lab__MRJ(new_size__QUEH);
+                next__JAIH=(void *)((unsigned long)result__LAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUEH)));
+                ((__POINTER *)next__JAIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KAIH)[ 0]=next__JAIH;
               } else {
-                next__VTBH=((__POINTER *)result__XTBH)[ 0];
-                if ((next__VTBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XTBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1I4G <<  1)) <=  4096)) {
-                    next__VTBH=(void *)((unsigned long)result__XTBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1I4G)));
+                next__JAIH=((__POINTER *)result__LAIH)[ 0];
+                if ((next__JAIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QUEH <<  1)) <=  4096)) {
+                    next__JAIH=(void *)((unsigned long)result__LAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUEH)));
                   } else {
-                    next__VTBH=new_lab__ARJ(new_size__1I4G);
+                    next__JAIH=new_lab__MRJ(new_size__QUEH);
                   };
-                  ((__POINTER *)next__VTBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WTBH)[ 0]=next__VTBH;
+                  ((__POINTER *)next__JAIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KAIH)[ 0]=next__JAIH;
                 } else {
-                  ((__POINTER *)result__XTBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VTBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XTBH=next__VTBH;
+                  ((__POINTER *)result__LAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LAIH=next__JAIH;
                 };
               };
-              ptr__NSME=result__XTBH;
+              ptr__WBNE=result__LAIH;
             } else {
-              t__5I4G=((__UINTEGER_32 )typ_id__SSME);
-              a__4I4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__4TBH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSME + a__4I4G) & (__UINTEGER_32)(~ a__4I4G));
-              ptr_table__1TBH=((__POINTER )(&(table_type[(t__5I4G)])));
-              lab_type__3TBH=(__UINTEGER_32)(t__5I4G |  1);
-              next__0TBH=((__POINTER )(NULL));
-              result__2TBH=((__POINTER *)ptr_table__1TBH)[ 0];
-              if ((result__2TBH == (void *)NULL)) {
-                result__2TBH=new_lab__ARJ(lab_type__3TBH);
-                next__0TBH=(void *)((unsigned long)result__2TBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TBH)));
-                ((__POINTER *)next__0TBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1TBH)[ 0]=next__0TBH;
+              t__UUEH=((__UINTEGER_32 )typ_id__1BNE);
+              a__TUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YBNE + a__TUEH) & (__UINTEGER_32)(~ a__TUEH));
+              ptr_table__PAIH=((__POINTER )(&(table_type[(t__UUEH)])));
+              lab_type__RAIH=(__UINTEGER_32)(t__UUEH |  1);
+              next__OAIH=((__POINTER )(NULL));
+              result__QAIH=((__POINTER *)ptr_table__PAIH)[ 0];
+              if ((result__QAIH == (void *)NULL)) {
+                result__QAIH=new_lab__MRJ(lab_type__RAIH);
+                next__OAIH=(void *)((unsigned long)result__QAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAIH)));
+                ((__POINTER *)next__OAIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PAIH)[ 0]=next__OAIH;
               } else {
-                next__0TBH=((__POINTER *)result__2TBH)[ 0];
-                if ((next__0TBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2TBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4TBH <<  1)) <=  4096)) {
-                    next__0TBH=(void *)((unsigned long)result__2TBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TBH)));
+                next__OAIH=((__POINTER *)result__QAIH)[ 0];
+                if ((next__OAIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SAIH <<  1)) <=  4096)) {
+                    next__OAIH=(void *)((unsigned long)result__QAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAIH)));
                   } else {
-                    next__0TBH=new_lab__ARJ(lab_type__3TBH);
+                    next__OAIH=new_lab__MRJ(lab_type__RAIH);
                   };
-                  ((__POINTER *)next__0TBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1TBH)[ 0]=next__0TBH;
+                  ((__POINTER *)next__OAIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PAIH)[ 0]=next__OAIH;
                 } else {
-                  ((__POINTER *)result__2TBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0TBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2TBH=next__0TBH;
+                  ((__POINTER *)result__QAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QAIH=next__OAIH;
                 };
               };
-              ptr__NSME=result__2TBH;
+              ptr__WBNE=result__QAIH;
             };
-            result__MSME=((__LIP_PRINT *)ptr__NSME);
-            *(result__MSME) = *(LIP_PRINT__);
+            result__VBNE=((__LIP_PRINT *)ptr__WBNE);
+            *(result__VBNE) = *(LIP_PRINT__);
           };
-          Self__FNVE=((__LIP_PRINT *)result__MSME);
-          Self__FNVE->parent_lip_code__EPYC.parent_itm_object__TDE.position__BDJ=p__KHHE;
-          Self__FNVE->message__2RTE=result__ATPB;
-          result__2KYC=result__MSME;
+          Self__K3VE=((__LIP_PRINT *)result__VBNE);
+          Self__K3VE->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ=p__TUHE;
+          Self__K3VE->message__W5TE=result__MTPB;
+          result__ILYC=result__VBNE;
         };
       };
-      result__ATPB=result__2KYC;
-      if (((void *)result__2KYC == (void *)NULL)) {
-        pos__SRRG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_262));
-        put_position__IOG(pos__SRRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      result__MTPB=result__ILYC;
+      if (((void *)result__ILYC == (void *)NULL)) {
+        pos__WDXG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_272));
+        put_position__UOG(pos__WDXG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__ATPB);
+  return(result__MTPB);
 }
 
-static void run__EGFC(__LIP_AFFECT *Self__FGFC)
+static void run__QGFC(__LIP_AFFECT *Self__RGFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __POSITION pos__VTUG,pos__HI5C;
-  void *__tmp__3GFC;
-  void *__tmp__4GFC,*__tmp__AUBH,*__tmp__BUBH;
-  __LIP_INTEGER *Self__CUBH;
-  __LIP_STRING *Self__DUBH;
-  if (((void *)fast_reference_at__CURD(list_data__CONC,Self__FGFC->name__KGFC) == (void *)NULL)) {
-    copy__NCS(string_tmp__VH,(&__string_295));
-    append__VNS(string_tmp__VH,Self__FGFC->name__KGFC);
-    append__VNS(string_tmp__VH,(&__string_296));
-    pos__VTUG=Self__FGFC->parent_lip_code__3TPB.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,string_tmp__VH);
-    put_position__IOG(pos__VTUG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  __POSITION pos__XG0G,pos__TI5C;
+  void *__tmp__JHFC;
+  void *__tmp__KHFC,*__tmp__UAIH,*__tmp__VAIH;
+  __LIP_INTEGER *Self__WAIH;
+  __LIP_STRING *Self__XAIH;
+  if (((void *)fast_reference_at__OURD(list_data__OONC,Self__RGFC->name__WGFC) == (void *)NULL)) {
+    copy__ZCS(string_tmp__VH,(&__string_305));
+    append__BOS(string_tmp__VH,Self__RGFC->name__WGFC);
+    append__BOS(string_tmp__VH,(&__string_306));
+    pos__XG0G=Self__RGFC->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,string_tmp__VH);
+    put_position__UOG(pos__XG0G);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  __tmp__3GFC=Self__FGFC->value__2GFC;
-  switch (((struct ___OBJ *)__tmp__3GFC)->__id) {
+  __tmp__JHFC=Self__RGFC->value__IHFC;
+  switch (((struct ___OBJ *)__tmp__JHFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__4GFC=run_expr__0YQD(__tmp__3GFC);
+    __tmp__KHFC=run_expr__GZQD(__tmp__JHFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__4GFC=run_expr__Z1QD(__tmp__3GFC);
+    __tmp__KHFC=run_expr__F2QD(__tmp__JHFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__4GFC=run_expr__XTTE(__tmp__3GFC);
+    __tmp__KHFC=run_expr__RBUE(__tmp__JHFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__AUBH=((__LIP_VALUE *)__tmp__3GFC)->value__XXTE;
-    switch (((struct ___OBJ *)__tmp__AUBH)->__id) {
+    __tmp__UAIH=((__LIP_VALUE *)__tmp__JHFC)->value__RFUE;
+    switch (((struct ___OBJ *)__tmp__UAIH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__BUBH=((__LIP_BOOLEAN *)__tmp__AUBH);
+      __tmp__VAIH=((__LIP_BOOLEAN *)__tmp__UAIH);
     } break;
     case __LIP_INTEGER__: {
-      Self__CUBH=((__LIP_INTEGER *)__tmp__AUBH);
-      __tmp__BUBH=get__IWRE(Self__CUBH,Self__CUBH->value__G31F);
+      Self__WAIH=((__LIP_INTEGER *)__tmp__UAIH);
+      __tmp__VAIH=get__QFSE(Self__WAIH,Self__WAIH->value__1X2F);
     } break;
     case __LIP_STRING__: {
-      Self__DUBH=((__LIP_STRING *)__tmp__AUBH);
-      __tmp__BUBH=get__3HEF(Self__DUBH,Self__DUBH->value__FPTE);
+      Self__XAIH=((__LIP_STRING *)__tmp__UAIH);
+      __tmp__VAIH=get__N2EF(Self__XAIH,Self__XAIH->value__52TE);
     } break;
     };
-    __tmp__4GFC=__tmp__BUBH;
+    __tmp__KHFC=__tmp__VAIH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  pos__HI5C=Self__FGFC->parent_lip_code__3TPB.parent_itm_object__TDE.position__BDJ;
-  put_error__text__4MG( 1,(&__string_265));
-  put_position__IOG(pos__HI5C);
-  put_string__I1F(msg_err__DNG);
-  if ((type_error__CNG !=  2)) {
+  pos__TI5C=Self__RGFC->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
+  put_error__text__KNG( 1,(&__string_275));
+  put_position__UOG(pos__TI5C);
+  put_string__U1F(msg_err__PNG);
+  if ((type_error__ONG !=  2)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__4GFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__KHFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__4R1F(__tmp__4GFC);
+    free__TM2F(__tmp__KHFC);
   } break;
   case __LIP_STRING__: {
-    free__DEDG(__tmp__4GFC);
+    free__BNGG(__tmp__KHFC);
   } break;
   };
 }
 
-static void run__FNTE(__LIP_CALL *Self__GNTE)
+static void run__50TE(__LIP_CALL *Self__A1TE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  void *val__JNTE,*__tmp__VNTE,*__tmp__FUBH,*__tmp__GUBH;
-  void *str__KNTE,*__tmp__0OTE,*__tmp__CQTE;
-  void *path__LNTE,*n__JEJF;
-  void *__tmp__UNTE;
-  __LIP_INTEGER *Self__HUBH;
-  __LIP_STRING *Self__IUBH;
-  __POSITION pos__QDJF,pos__YTUG,pos__1TUG,pos__4TUG,pos__BUUG;
-  __STRING_CONSTANT *Self__AJ4G;
-  __STRING *Self__BJ4G,*Self__DJ4G;
-  void *result__MEJF;
-  __INTEGER j__LEJF;
-  __BOOLEAN is_rec__MNTE,__tmp__MOTE,__tmp__UPTE,result__5LWE;
-  __BOOLEAN __tmp__JFJF;
-  val__JNTE=NULL;
-  str__KNTE=NULL;
-  path__LNTE=NULL;
-  is_rec__MNTE=FALSE__;
-  if (((void *)Self__GNTE->argument__NNTE != (void *)NULL)) {
-    __tmp__UNTE=Self__GNTE->argument__NNTE;
-    switch (((struct ___OBJ *)__tmp__UNTE)->__id) {
+  void *val__D1TE,*__tmp__P1TE,*__tmp__ZAIH,*__tmp__0AIH;
+  void *str__E1TE,*__tmp__U2TE,*__tmp__23TE;
+  void *path__F1TE,*n__LXJF;
+  void *__tmp__O1TE;
+  __LIP_INTEGER *Self__1AIH;
+  __LIP_STRING *Self__2AIH;
+  __POSITION pos__SWJF,pos__0G0G,pos__3G0G,pos__AH0G,pos__DH0G;
+  __STRING_CONSTANT *Self__VUEH;
+  __STRING *Self__WUEH,*Self__YUEH;
+  void *result__OXJF;
+  __INTEGER j__NXJF;
+  __BOOLEAN is_rec__G1TE,__tmp__G2TE,__tmp__O3TE,result__D4WE;
+  __BOOLEAN __tmp__LYJF;
+  val__D1TE=NULL;
+  str__E1TE=NULL;
+  path__F1TE=NULL;
+  is_rec__G1TE=FALSE__;
+  if (((void *)Self__A1TE->argument__H1TE != (void *)NULL)) {
+    __tmp__O1TE=Self__A1TE->argument__H1TE;
+    switch (((struct ___OBJ *)__tmp__O1TE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__VNTE=run_expr__0YQD(__tmp__UNTE);
+      __tmp__P1TE=run_expr__GZQD(__tmp__O1TE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__VNTE=run_expr__Z1QD(__tmp__UNTE);
+      __tmp__P1TE=run_expr__F2QD(__tmp__O1TE);
     } break;
     case __LIP_CALL__: {
-      __tmp__VNTE=run_expr__XTTE(__tmp__UNTE);
+      __tmp__P1TE=run_expr__RBUE(__tmp__O1TE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__FUBH=((__LIP_VALUE *)__tmp__UNTE)->value__XXTE;
-      switch (((struct ___OBJ *)__tmp__FUBH)->__id) {
+      __tmp__ZAIH=((__LIP_VALUE *)__tmp__O1TE)->value__RFUE;
+      switch (((struct ___OBJ *)__tmp__ZAIH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__GUBH=((__LIP_BOOLEAN *)__tmp__FUBH);
+        __tmp__0AIH=((__LIP_BOOLEAN *)__tmp__ZAIH);
       } break;
       case __LIP_INTEGER__: {
-        Self__HUBH=((__LIP_INTEGER *)__tmp__FUBH);
-        __tmp__GUBH=get__IWRE(Self__HUBH,Self__HUBH->value__G31F);
+        Self__1AIH=((__LIP_INTEGER *)__tmp__ZAIH);
+        __tmp__0AIH=get__QFSE(Self__1AIH,Self__1AIH->value__1X2F);
       } break;
       case __LIP_STRING__: {
-        Self__IUBH=((__LIP_STRING *)__tmp__FUBH);
-        __tmp__GUBH=get__3HEF(Self__IUBH,Self__IUBH->value__FPTE);
+        Self__2AIH=((__LIP_STRING *)__tmp__ZAIH);
+        __tmp__0AIH=get__N2EF(Self__2AIH,Self__2AIH->value__52TE);
       } break;
       };
-      __tmp__VNTE=__tmp__GUBH;
+      __tmp__P1TE=__tmp__0AIH;
     } break;
     };
-    val__JNTE=__tmp__VNTE;
+    val__D1TE=__tmp__P1TE;
   };
-  if (((void *)Self__GNTE->name__YNTE == (void *)(&__string_92))) {
-    if (((void *)val__JNTE != (void *)NULL)) {
-      pos__QDJF=Self__GNTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-      put_error__text__4MG( 2,(&__string_297));
-      put_position__IOG(pos__QDJF);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  if (((void *)Self__A1TE->name__S1TE == (void *)(&__string_92))) {
+    if (((void *)val__D1TE != (void *)NULL)) {
+      pos__SWJF=Self__A1TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+      put_error__text__KNG( 2,(&__string_307));
+      put_position__UOG(pos__SWJF);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__MOTE=TRUE__;
+    __tmp__G2TE=TRUE__;
   } else {
-    __tmp__MOTE=FALSE__;
+    __tmp__G2TE=FALSE__;
   };
-  if (__tmp__MOTE) {
-    __tmp__UPTE=TRUE__;
+  if (__tmp__G2TE) {
+    __tmp__O3TE=TRUE__;
   } else {
-    result__5LWE=((void *)Self__GNTE->name__YNTE == (void *)(&__string_94));
-    if (result__5LWE) {
-      if (val__JNTE==NULL) {
-        __tmp__0OTE=NULL;
+    result__D4WE=((void *)Self__A1TE->name__S1TE == (void *)(&__string_94));
+    if (result__D4WE) {
+      if (val__D1TE==NULL) {
+        __tmp__U2TE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__JNTE)->__id) {
+        switch (((struct ___OBJ *)val__D1TE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0OTE=NULL;
+          __tmp__U2TE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0OTE=NULL;
+          __tmp__U2TE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__0OTE=((void *)val__JNTE);
+          __tmp__U2TE=((void *)val__D1TE);
         } break;
         }
       };
-      str__KNTE=__tmp__0OTE;
-      if (((void *)__tmp__0OTE == (void *)NULL)) {
-        pos__YTUG=Self__GNTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-        put_error__text__4MG( 1,(&__string_298));
-        put_position__IOG(pos__YTUG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      str__E1TE=__tmp__U2TE;
+      if (((void *)__tmp__U2TE == (void *)NULL)) {
+        pos__0G0G=Self__A1TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+        put_error__text__KNG( 1,(&__string_308));
+        put_position__UOG(pos__0G0G);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      path__LNTE=((__LIP_STRING *)__tmp__0OTE)->value__FPTE;
-      Self__AJ4G=((__STRING_CONSTANT *)path__LNTE);
-      if ((((__CHARACTER *)Self__AJ4G->storage__JQO)[(__INTEGER)(Self__AJ4G->count__DD -  1)] == '*')) {
-        copy__NCS(string_tmp__VH,path__LNTE);
-        Self__BJ4G=((__STRING *)string_tmp__VH);
-        if (( 1 > Self__BJ4G->count__KFC)) {
-          Self__BJ4G->count__KFC= 0;
+      path__F1TE=((__LIP_STRING *)__tmp__U2TE)->value__52TE;
+      Self__VUEH=((__STRING_CONSTANT *)path__F1TE);
+      if ((((__CHARACTER *)Self__VUEH->storage__VQO)[(__INTEGER)(Self__VUEH->count__DD -  1)] == '*')) {
+        copy__ZCS(string_tmp__VH,path__F1TE);
+        Self__WUEH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__WUEH->count__WFC)) {
+          Self__WUEH->count__WFC= 0;
         } else {
-          Self__BJ4G->count__KFC=(__INTEGER)(Self__BJ4G->count__KFC -  1);
+          Self__WUEH->count__WFC=(__INTEGER)(Self__WUEH->count__WFC -  1);
         };
-        path__LNTE=get__2VB(string_tmp__VH);
-        is_rec__MNTE=TRUE__;
+        path__F1TE=get__IWB(string_tmp__VH);
+        is_rec__G1TE=TRUE__;
       };
-      load_directory__is_recursive__TFVF(Self__GNTE,path__LNTE,is_rec__MNTE);
+      load_directory__is_recursive__Q0VF(Self__A1TE,path__F1TE,is_rec__G1TE);
     };
-    __tmp__UPTE=result__5LWE;
+    __tmp__O3TE=result__D4WE;
   };
-  if ((! __tmp__UPTE)) {
-    if (((void *)Self__GNTE->name__YNTE == (void *)(&__string_93))) {
-      if (val__JNTE==NULL) {
-        __tmp__CQTE=NULL;
+  if ((! __tmp__O3TE)) {
+    if (((void *)Self__A1TE->name__S1TE == (void *)(&__string_93))) {
+      if (val__D1TE==NULL) {
+        __tmp__23TE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__JNTE)->__id) {
+        switch (((struct ___OBJ *)val__D1TE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CQTE=NULL;
+          __tmp__23TE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CQTE=NULL;
+          __tmp__23TE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CQTE=((void *)val__JNTE);
+          __tmp__23TE=((void *)val__D1TE);
         } break;
         }
       };
-      str__KNTE=__tmp__CQTE;
-      if (((void *)__tmp__CQTE == (void *)NULL)) {
-        pos__1TUG=Self__GNTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-        put_error__text__4MG( 1,(&__string_298));
-        put_position__IOG(pos__1TUG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      str__E1TE=__tmp__23TE;
+      if (((void *)__tmp__23TE == (void *)NULL)) {
+        pos__3G0G=Self__A1TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+        put_error__text__KNG( 1,(&__string_308));
+        put_position__UOG(pos__3G0G);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      ((__STRING *)string_tmp__VH)->count__KFC= 0;
-      append_in__JKDG(__tmp__CQTE,string_tmp__VH);
-      Self__DJ4G=((__STRING *)string_tmp__VH);
-      if ((Self__DJ4G->capacity__MBS > Self__DJ4G->count__KFC)) {
-        ((__CHARACTER *)Self__DJ4G->storage__VBS)[Self__DJ4G->count__KFC]='\0';
+      ((__STRING *)string_tmp__VH)->count__WFC= 0;
+      append_in__LUGG(__tmp__23TE,string_tmp__VH);
+      Self__YUEH=((__STRING *)string_tmp__VH);
+      if ((Self__YUEH->capacity__YBS > Self__YUEH->count__WFC)) {
+        ((__CHARACTER *)Self__YUEH->storage__BCS)[Self__YUEH->count__WFC]='\0';
       } else {
-        add_last__NLT(Self__DJ4G,'\0');
-        Self__DJ4G->count__KFC=(__INTEGER)(Self__DJ4G->count__KFC -  1);
+        add_last__ZLT(Self__YUEH,'\0');
+        Self__YUEH->count__WFC=(__INTEGER)(Self__YUEH->count__WFC -  1);
       };
-      system(((char*)((Self__DJ4G->storage__VBS))));
+      system(((char*)((Self__YUEH->storage__BCS))));
     } else {
-      n__JEJF=Self__GNTE->name__YNTE;
-      result__MEJF=NULL;
-      j__LEJF= 0;
-      while_do__MNKF:
+      n__LXJF=Self__A1TE->name__S1TE;
+      result__OXJF=NULL;
+      j__NXJF= 0;
+      while_do__14KF:
       {
-        if ((j__LEJF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__SEJF)->parent_arrayed_collection__REJF.upper__1EJF)) {
+        if ((j__NXJF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__UXJF)->parent_arrayed_collection__TXJF.upper__3XJF)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__JFJF=((void *)NULL != (void *)n__JEJF);
+          __tmp__LYJF=((void *)NULL != (void *)n__LXJF);
         } else {
-          __tmp__JFJF=FALSE__;
+          __tmp__LYJF=FALSE__;
         };
-        if (__tmp__JFJF) {
-          j__LEJF=(__INTEGER)(j__LEJF +  1);
-          goto while_do__MNKF;
+        if (__tmp__LYJF) {
+          j__NXJF=(__INTEGER)(j__NXJF +  1);
+          goto while_do__14KF;
         };
       };
-      if ((j__LEJF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__SEJF)->parent_arrayed_collection__REJF.upper__1EJF)) {
-        result__MEJF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__SEJF)->parent_arrayed_collection__REJF.storage__R0OF)[j__LEJF];
+      if ((j__NXJF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__UXJF)->parent_arrayed_collection__TXJF.upper__3XJF)) {
+        result__OXJF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__UXJF)->parent_arrayed_collection__TXJF.storage__J2OF)[j__NXJF];
       };
-      if (((void *)result__MEJF == (void *)NULL)) {
-        copy__NCS(string_tmp__VH,(&__string_295));
-        append__VNS(string_tmp__VH,Self__GNTE->name__YNTE);
-        append__VNS(string_tmp__VH,(&__string_296));
-        pos__4TUG=Self__GNTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-        put_error__text__4MG( 1,string_tmp__VH);
-        put_position__IOG(pos__4TUG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if (((void *)result__OXJF == (void *)NULL)) {
+        copy__ZCS(string_tmp__VH,(&__string_305));
+        append__BOS(string_tmp__VH,Self__A1TE->name__S1TE);
+        append__BOS(string_tmp__VH,(&__string_306));
+        pos__AH0G=Self__A1TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+        put_error__text__KNG( 1,string_tmp__VH);
+        put_position__UOG(pos__AH0G);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      pos__BUUG=Self__GNTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-      put_error__text__4MG( 1,(&__string_299));
-      put_position__IOG(pos__BUUG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+      pos__DH0G=Self__A1TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+      put_error__text__KNG( 1,(&__string_309));
+      put_position__UOG(pos__DH0G);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__JNTE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__JNTE)->__id) {
+  if (((void *)val__D1TE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__D1TE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__4R1F(val__JNTE);
+      free__TM2F(val__D1TE);
     } break;
     case __LIP_STRING__: {
-      free__DEDG(val__JNTE);
+      free__BNGG(val__D1TE);
     } break;
     };
   };
 }
 
-static void run__QCQD(__LIP_IF *Self__RCQD)
+static void run__2CQD(__LIP_IF *Self__3CQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  void *__tmp__VCQD,*__tmp__ZDQD,*__tmp__VEQD;
-  __POSITION __tmp__L0YG,pos__FUUG,pos__JUUG,pos__MUUG,__tmp__4RRG;
-  __POSITION __tmp__ASRG,__tmp__PUUG,__tmp__HSRG,__tmp__JSRG;
-  __POSITION __tmp__MSTE;
-  void *__tmp__WCQD,*__tmp__KUBH,*__tmp__LUBH;
-  __LIP_INTEGER *Self__MUBH;
-  __LIP_STRING *Self__NUBH;
-  void *__tmp__YCQD,*val__TCQD;
-  __INTEGER __tmp__SDQD,Self__VY3F,__tmp__OEQD,Self__JOCF;
-  __BOOLEAN __tmp__2DQD;
-  __tmp__VCQD=Self__RCQD->condition__UCQD;
-  switch (((struct ___OBJ *)__tmp__VCQD)->__id) {
+  void *__tmp__BDQD,*__tmp__FEQD,*__tmp__BFQD;
+  __POSITION __tmp__J44G,pos__HH0G,pos__LH0G,pos__OH0G,__tmp__CEXG;
+  __POSITION __tmp__EEXG,__tmp__RH0G,__tmp__LEXG,__tmp__NEXG;
+  __POSITION __tmp__GAUE;
+  void *__tmp__CDQD,*__tmp__4AIH,*__tmp__5AIH;
+  __LIP_INTEGER *Self__ABIH;
+  __LIP_STRING *Self__BBIH;
+  void *__tmp__EDQD,*val__5CQD;
+  __INTEGER __tmp__4DQD,Self__PG5F,__tmp__0EQD,Self__KIDF;
+  __BOOLEAN __tmp__IEQD;
+  __tmp__BDQD=Self__3CQD->condition__ADQD;
+  switch (((struct ___OBJ *)__tmp__BDQD)->__id) {
   case __LIP_AFFECT__: {
-    __tmp__L0YG=((__LIP_AFFECT *)__tmp__VCQD)->parent_lip_code__3TPB.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_300));
-    put_position__IOG(__tmp__L0YG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    __tmp__J44G=((__LIP_AFFECT *)__tmp__BDQD)->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_310));
+    put_position__UOG(__tmp__J44G);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
-    __tmp__WCQD=NULL;
+    __tmp__CDQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__WCQD=run_expr__0YQD(__tmp__VCQD);
+    __tmp__CDQD=run_expr__GZQD(__tmp__BDQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__WCQD=run_expr__Z1QD(__tmp__VCQD);
+    __tmp__CDQD=run_expr__F2QD(__tmp__BDQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__WCQD=run_expr__XTTE(__tmp__VCQD);
+    __tmp__CDQD=run_expr__RBUE(__tmp__BDQD);
   } break;
   case __LIP_IF__: {
-    pos__FUUG=((__LIP_IF *)__tmp__VCQD)->parent_lip_code__SOYC.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_300));
-    put_position__IOG(pos__FUUG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    pos__HH0G=((__LIP_IF *)__tmp__BDQD)->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_310));
+    put_position__UOG(pos__HH0G);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
-    __tmp__WCQD=NULL;
+    __tmp__CDQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    pos__JUUG=((__LIP_PRINT *)__tmp__VCQD)->parent_lip_code__EPYC.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_300));
-    put_position__IOG(pos__JUUG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    pos__LH0G=((__LIP_PRINT *)__tmp__BDQD)->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_310));
+    put_position__UOG(pos__LH0G);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
-    __tmp__WCQD=NULL;
+    __tmp__CDQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__KUBH=((__LIP_VALUE *)__tmp__VCQD)->value__XXTE;
-    switch (((struct ___OBJ *)__tmp__KUBH)->__id) {
+    __tmp__4AIH=((__LIP_VALUE *)__tmp__BDQD)->value__RFUE;
+    switch (((struct ___OBJ *)__tmp__4AIH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__LUBH=((__LIP_BOOLEAN *)__tmp__KUBH);
+      __tmp__5AIH=((__LIP_BOOLEAN *)__tmp__4AIH);
     } break;
     case __LIP_INTEGER__: {
-      Self__MUBH=((__LIP_INTEGER *)__tmp__KUBH);
-      __tmp__LUBH=get__IWRE(Self__MUBH,Self__MUBH->value__G31F);
+      Self__ABIH=((__LIP_INTEGER *)__tmp__4AIH);
+      __tmp__5AIH=get__QFSE(Self__ABIH,Self__ABIH->value__1X2F);
     } break;
     case __LIP_STRING__: {
-      Self__NUBH=((__LIP_STRING *)__tmp__KUBH);
-      __tmp__LUBH=get__3HEF(Self__NUBH,Self__NUBH->value__FPTE);
+      Self__BBIH=((__LIP_STRING *)__tmp__4AIH);
+      __tmp__5AIH=get__N2EF(Self__BBIH,Self__BBIH->value__52TE);
     } break;
     };
-    __tmp__WCQD=__tmp__LUBH;
+    __tmp__CDQD=__tmp__5AIH;
   } break;
   };
-  if (__tmp__WCQD==NULL) {
-    __tmp__YCQD=NULL;
+  if (__tmp__CDQD==NULL) {
+    __tmp__EDQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__WCQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__CDQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__YCQD=((void *)__tmp__WCQD);
+      __tmp__EDQD=((void *)__tmp__CDQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__YCQD=NULL;
+      __tmp__EDQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__YCQD=NULL;
+      __tmp__EDQD=NULL;
     } break;
     }
   };
-  val__TCQD=__tmp__YCQD;
-  if (((void *)__tmp__YCQD == (void *)NULL)) {
-    pos__MUUG=Self__RCQD->parent_lip_code__SOYC.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_301));
-    put_position__IOG(pos__MUUG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  val__5CQD=__tmp__EDQD;
+  if (((void *)__tmp__EDQD == (void *)NULL)) {
+    pos__OH0G=Self__3CQD->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_311));
+    put_position__UOG(pos__OH0G);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  if (((__LIP_BOOLEAN *)__tmp__YCQD)->value__DDQD) {
-    __tmp__SDQD=((__FAST_ARRAYoLIP_CODEo *)Self__RCQD->then__KDQD)->parent_arrayed_collection__BLYC.upper__QDQD;
-    Self__VY3F= 0;
-    while ((Self__VY3F <= __tmp__SDQD)) {
-      __tmp__ZDQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__RCQD->then__KDQD)->parent_arrayed_collection__BLYC.storage__NPTD)[Self__VY3F];
-      switch (((struct ___OBJ *)__tmp__ZDQD)->__id) {
+  if (((__LIP_BOOLEAN *)__tmp__EDQD)->value__PDQD) {
+    __tmp__4DQD=((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->then__WDQD)->parent_arrayed_collection__NLYC.upper__2DQD;
+    Self__PG5F= 0;
+    while ((Self__PG5F <= __tmp__4DQD)) {
+      __tmp__FEQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->then__WDQD)->parent_arrayed_collection__NLYC.storage__GQTD)[Self__PG5F];
+      switch (((struct ___OBJ *)__tmp__FEQD)->__id) {
       case __LIP_AFFECT__: {
-        run__EGFC(__tmp__ZDQD);
+        run__QGFC(__tmp__FEQD);
       } break;
       case __LIP_BINARY__: {
-        __tmp__4RRG=((__LIP_BINARY *)__tmp__ZDQD)->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ;
-        put_error__text__4MG( 2,(&__string_260));
-        put_position__IOG(__tmp__4RRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+        __tmp__CEXG=((__LIP_BINARY *)__tmp__FEQD)->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
+        put_error__text__KNG( 2,(&__string_270));
+        put_position__UOG(__tmp__CEXG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __tmp__ASRG=((__LIP_UNARY *)__tmp__ZDQD)->parent_lip_code__504B.parent_itm_object__TDE.position__BDJ;
-        put_error__text__4MG( 2,(&__string_260));
-        put_position__IOG(__tmp__ASRG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+        __tmp__EEXG=((__LIP_UNARY *)__tmp__FEQD)->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
+        put_error__text__KNG( 2,(&__string_270));
+        put_position__UOG(__tmp__EEXG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__FNTE(__tmp__ZDQD);
+        run__50TE(__tmp__FEQD);
       } break;
       case __LIP_IF__: {
-        run__QCQD(__tmp__ZDQD);
+        run__2CQD(__tmp__FEQD);
       } break;
       case __LIP_PRINT__: {
-        run__ZRTE(__tmp__ZDQD);
+        run__T5TE(__tmp__FEQD);
       } break;
       case __LIP_VALUE__: {
-        __tmp__PUUG=((__LIP_VALUE *)__tmp__ZDQD)->parent_lip_code__RWEE.parent_itm_object__TDE.position__BDJ;
-        put_error__text__4MG( 2,(&__string_260));
-        put_position__IOG(__tmp__PUUG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+        __tmp__RH0G=((__LIP_VALUE *)__tmp__FEQD)->parent_lip_code__0DFE.parent_itm_object__5DE.position__NDJ;
+        put_error__text__KNG( 2,(&__string_270));
+        put_position__UOG(__tmp__RH0G);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       } break;
       };
-      Self__VY3F=(__INTEGER)(Self__VY3F +  1);
+      Self__PG5F=(__INTEGER)(Self__PG5F +  1);
     };
-    __tmp__2DQD=TRUE__;
+    __tmp__IEQD=TRUE__;
   } else {
-    __tmp__2DQD=FALSE__;
-  };
-  if ((! __tmp__2DQD)) {
-    if (((void *)Self__RCQD->else__BEQD != (void *)NULL)) {
-      __tmp__OEQD=((__FAST_ARRAYoLIP_CODEo *)Self__RCQD->else__BEQD)->parent_arrayed_collection__BLYC.upper__QDQD;
-      Self__JOCF= 0;
-      while ((Self__JOCF <= __tmp__OEQD)) {
-        __tmp__VEQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__RCQD->else__BEQD)->parent_arrayed_collection__BLYC.storage__NPTD)[Self__JOCF];
-        switch (((struct ___OBJ *)__tmp__VEQD)->__id) {
+    __tmp__IEQD=FALSE__;
+  };
+  if ((! __tmp__IEQD)) {
+    if (((void *)Self__3CQD->else__NEQD != (void *)NULL)) {
+      __tmp__0EQD=((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->else__NEQD)->parent_arrayed_collection__NLYC.upper__2DQD;
+      Self__KIDF= 0;
+      while ((Self__KIDF <= __tmp__0EQD)) {
+        __tmp__BFQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->else__NEQD)->parent_arrayed_collection__NLYC.storage__GQTD)[Self__KIDF];
+        switch (((struct ___OBJ *)__tmp__BFQD)->__id) {
         case __LIP_AFFECT__: {
-          run__EGFC(__tmp__VEQD);
+          run__QGFC(__tmp__BFQD);
         } break;
         case __LIP_BINARY__: {
-          __tmp__HSRG=((__LIP_BINARY *)__tmp__VEQD)->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ;
-          put_error__text__4MG( 2,(&__string_260));
-          put_position__IOG(__tmp__HSRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+          __tmp__LEXG=((__LIP_BINARY *)__tmp__BFQD)->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
+          put_error__text__KNG( 2,(&__string_270));
+          put_position__UOG(__tmp__LEXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __tmp__JSRG=((__LIP_UNARY *)__tmp__VEQD)->parent_lip_code__504B.parent_itm_object__TDE.position__BDJ;
-          put_error__text__4MG( 2,(&__string_260));
-          put_position__IOG(__tmp__JSRG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+          __tmp__NEXG=((__LIP_UNARY *)__tmp__BFQD)->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
+          put_error__text__KNG( 2,(&__string_270));
+          put_position__UOG(__tmp__NEXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__FNTE(__tmp__VEQD);
+          run__50TE(__tmp__BFQD);
         } break;
         case __LIP_IF__: {
-          run__QCQD(__tmp__VEQD);
+          run__2CQD(__tmp__BFQD);
         } break;
         case __LIP_PRINT__: {
-          run__ZRTE(__tmp__VEQD);
+          run__T5TE(__tmp__BFQD);
         } break;
         case __LIP_VALUE__: {
-          __tmp__MSTE=((__LIP_VALUE *)__tmp__VEQD)->parent_lip_code__RWEE.parent_itm_object__TDE.position__BDJ;
-          put_error__text__4MG( 2,(&__string_260));
-          put_position__IOG(__tmp__MSTE);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+          __tmp__GAUE=((__LIP_VALUE *)__tmp__BFQD)->parent_lip_code__0DFE.parent_itm_object__5DE.position__NDJ;
+          put_error__text__KNG( 2,(&__string_270));
+          put_position__UOG(__tmp__GAUE);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         } break;
         };
-        Self__JOCF=(__INTEGER)(Self__JOCF +  1);
+        Self__KIDF=(__INTEGER)(Self__KIDF +  1);
       };
     };
   };
 }
 
-static void run__ZRTE(__LIP_PRINT *Self__0RTE)
+static void run__T5TE(__LIP_PRINT *Self__U5TE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__3RTE;
-  __POSITION __tmp__F1UE,pos__JJDE,pos__RUUG,pos__HXWE;
-  void *__tmp__4RTE,*__tmp__PUBH,*__tmp__QUBH;
-  __LIP_INTEGER *Self__RUBH;
-  __LIP_STRING *Self__SUBH,*Self__AKDG;
-  __INTEGER Self__QA3F;
-  __BOOLEAN __tmp__XA3F;
-  __tmp__3RTE=Self__0RTE->message__2RTE;
-  switch (((struct ___OBJ *)__tmp__3RTE)->__id) {
+  void *__tmp__X5TE;
+  __POSITION __tmp__5IVE,pos__SWDE,pos__TH0G,pos__LJXE;
+  void *__tmp__Y5TE,*__tmp__DBIH,*__tmp__EBIH;
+  __LIP_INTEGER *Self__FBIH;
+  __LIP_STRING *Self__GBIH,*Self__4TGG;
+  __INTEGER Self__JF4F;
+  __BOOLEAN __tmp__QF4F;
+  __tmp__X5TE=Self__U5TE->message__W5TE;
+  switch (((struct ___OBJ *)__tmp__X5TE)->__id) {
   case __LIP_AFFECT__: {
-    __tmp__F1UE=((__LIP_AFFECT *)__tmp__3RTE)->parent_lip_code__3TPB.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_300));
-    put_position__IOG(__tmp__F1UE);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    __tmp__5IVE=((__LIP_AFFECT *)__tmp__X5TE)->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_310));
+    put_position__UOG(__tmp__5IVE);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
-    __tmp__4RTE=NULL;
+    __tmp__Y5TE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__4RTE=run_expr__0YQD(__tmp__3RTE);
+    __tmp__Y5TE=run_expr__GZQD(__tmp__X5TE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__4RTE=run_expr__Z1QD(__tmp__3RTE);
+    __tmp__Y5TE=run_expr__F2QD(__tmp__X5TE);
   } break;
   case __LIP_CALL__: {
-    __tmp__4RTE=run_expr__XTTE(__tmp__3RTE);
+    __tmp__Y5TE=run_expr__RBUE(__tmp__X5TE);
   } break;
   case __LIP_IF__: {
-    pos__JJDE=((__LIP_IF *)__tmp__3RTE)->parent_lip_code__SOYC.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_300));
-    put_position__IOG(pos__JJDE);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    pos__SWDE=((__LIP_IF *)__tmp__X5TE)->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_310));
+    put_position__UOG(pos__SWDE);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
-    __tmp__4RTE=NULL;
+    __tmp__Y5TE=NULL;
   } break;
   case __LIP_PRINT__: {
-    pos__RUUG=((__LIP_PRINT *)__tmp__3RTE)->parent_lip_code__EPYC.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_300));
-    put_position__IOG(pos__RUUG);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    pos__TH0G=((__LIP_PRINT *)__tmp__X5TE)->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_310));
+    put_position__UOG(pos__TH0G);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
-    __tmp__4RTE=NULL;
+    __tmp__Y5TE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__PUBH=((__LIP_VALUE *)__tmp__3RTE)->value__XXTE;
-    switch (((struct ___OBJ *)__tmp__PUBH)->__id) {
+    __tmp__DBIH=((__LIP_VALUE *)__tmp__X5TE)->value__RFUE;
+    switch (((struct ___OBJ *)__tmp__DBIH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__QUBH=((__LIP_BOOLEAN *)__tmp__PUBH);
+      __tmp__EBIH=((__LIP_BOOLEAN *)__tmp__DBIH);
     } break;
     case __LIP_INTEGER__: {
-      Self__RUBH=((__LIP_INTEGER *)__tmp__PUBH);
-      __tmp__QUBH=get__IWRE(Self__RUBH,Self__RUBH->value__G31F);
+      Self__FBIH=((__LIP_INTEGER *)__tmp__DBIH);
+      __tmp__EBIH=get__QFSE(Self__FBIH,Self__FBIH->value__1X2F);
     } break;
     case __LIP_STRING__: {
-      Self__SUBH=((__LIP_STRING *)__tmp__PUBH);
-      __tmp__QUBH=get__3HEF(Self__SUBH,Self__SUBH->value__FPTE);
+      Self__GBIH=((__LIP_STRING *)__tmp__DBIH);
+      __tmp__EBIH=get__N2EF(Self__GBIH,Self__GBIH->value__52TE);
     } break;
     };
-    __tmp__4RTE=__tmp__QUBH;
+    __tmp__Y5TE=__tmp__EBIH;
   } break;
   };
-  if (((void *)__tmp__4RTE == (void *)NULL)) {
-    pos__HXWE=Self__0RTE->parent_lip_code__EPYC.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_265));
-    put_position__IOG(pos__HXWE);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if (((void *)__tmp__Y5TE == (void *)NULL)) {
+    pos__LJXE=Self__U5TE->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_275));
+    put_position__UOG(pos__LJXE);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__4RTE)->__id) {
+  switch (((struct ___OBJ *)__tmp__Y5TE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__4RTE)->value__DDQD) {
-      print__KHD((&__string_42));
+    if (((__LIP_BOOLEAN *)__tmp__Y5TE)->value__PDQD) {
+      print__WHD((&__string_42));
     } else {
-      print__KHD((&__string_43));
+      print__WHD((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__QA3F=((__LIP_INTEGER *)__tmp__4RTE)->value__G31F;
-    if ((Self__QA3F ==  0)) {
+    Self__JF4F=((__LIP_INTEGER *)__tmp__Y5TE)->value__1X2F;
+    if ((Self__JF4F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__XA3F=TRUE__;
+      __tmp__QF4F=TRUE__;
     } else {
-      __tmp__XA3F=FALSE__;
+      __tmp__QF4F=FALSE__;
     };
-    if ((! __tmp__XA3F)) {
-      if ((Self__QA3F <  0)) {
+    if ((! __tmp__QF4F)) {
+      if ((Self__JF4F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__AYFG((__INTEGER)(- Self__QA3F));
+        print_positif__JXJG((__INTEGER)(- Self__JF4F));
       } else {
-        print_positif__AYFG(Self__QA3F);
+        print_positif__JXJG(Self__JF4F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    Self__AKDG=((__LIP_STRING *)__tmp__4RTE);
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    append_in__JKDG(Self__AKDG,string_tmp__VH);
-    put_string__MHF(((__STRING *)string_tmp__VH));
+    Self__4TGG=((__LIP_STRING *)__tmp__Y5TE);
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    append_in__LUGG(Self__4TGG,string_tmp__VH);
+    put_string__YHF(((__STRING *)string_tmp__VH));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__4RTE)->__id) {
+  switch (((struct ___OBJ *)__tmp__Y5TE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__4R1F(__tmp__4RTE);
+    free__TM2F(__tmp__Y5TE);
   } break;
   case __LIP_STRING__: {
-    free__DEDG(__tmp__4RTE);
+    free__BNGG(__tmp__Y5TE);
   } break;
   };
 }
 
-static void add_last__ONV(__FAST_ARRAYoITM_TYPE_MONOo *Self__PNV,void *element__QNV)
+static void add_last__0NV(__FAST_ARRAYoITM_TYPE_MONOo *Self__1NV,void *element__2NV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__RNV,__tmp__WOV,__tmp__JGEC,Self__TIVD;
-  __BOOLEAN __tmp__AOV;
-  void **__tmp__VOV,**new__VFEC;
-  new_capacity__RNV= 0;
-  if (((__INTEGER)(Self__PNV->parent_arrayed_collection__NXC.upper__4HV +  1) <= (__INTEGER)(Self__PNV->parent_arrayed_collection__NXC.capacity__TNV -  1))) {
-    Self__PNV->parent_arrayed_collection__NXC.upper__4HV=(__INTEGER)(Self__PNV->parent_arrayed_collection__NXC.upper__4HV +  1);
-    __tmp__AOV=TRUE__;
+  __INTEGER new_capacity__3NV,__tmp__CPV,__tmp__VGEC,Self__MJVD;
+  __BOOLEAN __tmp__MOV;
+  void **__tmp__BPV,**new__BGEC;
+  new_capacity__3NV= 0;
+  if (((__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.upper__KIV +  1) <= (__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV -  1))) {
+    Self__1NV->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.upper__KIV +  1);
+    __tmp__MOV=TRUE__;
   } else {
-    __tmp__AOV=FALSE__;
-  };
-  if ((! __tmp__AOV)) {
-    if ((Self__PNV->parent_arrayed_collection__NXC.capacity__TNV ==  0)) {
-      Self__PNV->parent_arrayed_collection__NXC.storage__FMV=create__HBRB( 2);
-      Self__PNV->parent_arrayed_collection__NXC.capacity__TNV= 2;
-      Self__PNV->parent_arrayed_collection__NXC.upper__4HV= 0;
-    } else {
-      new_capacity__RNV=(__INTEGER)(Self__PNV->parent_arrayed_collection__NXC.capacity__TNV <<  1);
-      __tmp__VOV=Self__PNV->parent_arrayed_collection__NXC.storage__FMV;
-      __tmp__WOV=Self__PNV->parent_arrayed_collection__NXC.capacity__TNV;
-      new__VFEC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__VOV)),((__UINTEGER_32 )(__INTEGER)(__tmp__WOV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RNV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__JGEC=(__INTEGER)(new_capacity__RNV -  1);
-      Self__TIVD=__tmp__WOV;
-      while ((Self__TIVD <= __tmp__JGEC)) {
-        new__VFEC[Self__TIVD]=NULL;
-        Self__TIVD=(__INTEGER)(Self__TIVD +  1);
-      };
-      Self__PNV->parent_arrayed_collection__NXC.storage__FMV=new__VFEC;
-      Self__PNV->parent_arrayed_collection__NXC.capacity__TNV=new_capacity__RNV;
-      Self__PNV->parent_arrayed_collection__NXC.upper__4HV=(__INTEGER)(Self__PNV->parent_arrayed_collection__NXC.upper__4HV +  1);
-    };
-  };
-  ((void **)Self__PNV->parent_arrayed_collection__NXC.storage__FMV)[Self__PNV->parent_arrayed_collection__NXC.upper__4HV]=element__QNV;
+    __tmp__MOV=FALSE__;
+  };
+  if ((! __tmp__MOV)) {
+    if ((Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV ==  0)) {
+      Self__1NV->parent_arrayed_collection__ZXC.storage__RMV=create__TBRB( 2);
+      Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV= 2;
+      Self__1NV->parent_arrayed_collection__ZXC.upper__KIV= 0;
+    } else {
+      new_capacity__3NV=(__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV <<  1);
+      __tmp__BPV=Self__1NV->parent_arrayed_collection__ZXC.storage__RMV;
+      __tmp__CPV=Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV;
+      new__BGEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__BPV)),((__UINTEGER_32 )(__INTEGER)(__tmp__CPV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3NV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__VGEC=(__INTEGER)(new_capacity__3NV -  1);
+      Self__MJVD=__tmp__CPV;
+      while ((Self__MJVD <= __tmp__VGEC)) {
+        new__BGEC[Self__MJVD]=NULL;
+        Self__MJVD=(__INTEGER)(Self__MJVD +  1);
+      };
+      Self__1NV->parent_arrayed_collection__ZXC.storage__RMV=new__BGEC;
+      Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV=new_capacity__3NV;
+      Self__1NV->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.upper__KIV +  1);
+    };
+  };
+  ((void **)Self__1NV->parent_arrayed_collection__ZXC.storage__RMV)[Self__1NV->parent_arrayed_collection__ZXC.upper__KIV]=element__2NV;
 }
 
-static void* alias__0UP(void *tmp__2UP)
+static void* alias__GVP(void *tmp__IVP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__I4PD,i__Q50E,new_capacity__TFW,other_upper__SFW;
-  __INTEGER Self__5MKC,h__UGW,idx__VGW,idx__NURB,new_capacity__OURB;
-  __INTEGER i__MURB,typ_id__VLNB;
-  __POINTER ptr__QLNB,ptr_table__YUBH,next__XUBH,result__ZUBH;
-  __POINTER ptr_table__3UBH,next__2UBH,result__4UBH;
-  __UINTEGER_32 sz__SLNB,a__3K4G,new_size__4K4G,t__CL4G,a__BL4G;
-  __UINTEGER_32 new_size__AVBH,lab_type__5UBH;
-  void *result__4UP,*result__D5V,*e__NGW,*e__UUBH,*e__OM1;
-  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__P4V,*Self__MGW;
-  void *node__C5V,*node__VUBH,*node__XM1,*node__WGW,*node1__QURB;
-  void *node2__RURB,*__tmp__GIW;
-  __BOOLEAN __tmp__15V,result__G3PD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__D3PD,*o__H3PD,*__tmp__T3PD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__QFW;
-  void **__tmp__D4PD,**__tmp__F4PD,**Self__240E,**__tmp__GGW,**__tmp__IGW;
-  void **Self__M3CC;
-  void **old_buckets__PURB;
-  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__PLNB,*Self__HSDC;
-  result__4UP=NULL;
-  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__2UP)->parent_arrayed_collection__NXC.upper__4HV <  0)) {
-    result__4UP=empty_list__FVP;
+  __INTEGER __tmp__U4PD,i__C21E,new_capacity__5FW,other_upper__4FW;
+  __INTEGER Self__LNKC,h__AHW,idx__BHW,idx__ZURB,new_capacity__0URB;
+  __INTEGER i__YURB,typ_id__BMNB;
+  __POINTER ptr__2LNB,ptr_table__MBIH,next__LBIH,result__NBIH;
+  __POINTER ptr_table__RBIH,next__QBIH,result__SBIH;
+  __UINTEGER_32 sz__4LNB,a__SWEH,new_size__TWEH,t__XWEH,a__WWEH;
+  __UINTEGER_32 new_size__UBIH,lab_type__TBIH;
+  void *result__KVP,*result__P5V,*e__ZGW,*e__IBIH,*e__0M1;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__14V,*Self__YGW;
+  void *node__O5V,*node__JBIH,*node__DN1,*node__CHW,*node1__2URB;
+  void *node2__3URB,*__tmp__SIW;
+  __BOOLEAN __tmp__HAW,result__S3PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__P3PD,*o__T3PD,*__tmp__53PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__2FW;
+  void **__tmp__P4PD,**__tmp__R4PD,**Self__O11E,**__tmp__SGW,**__tmp__UGW;
+  void **Self__Y3CC;
+  void **old_buckets__1URB;
+  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__1LNB,*Self__TSDC;
+  result__KVP=NULL;
+  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.upper__KIV <  0)) {
+    result__KVP=empty_list__RVP;
   } else {
-    Self__P4V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__QVP);
-    result__D5V=NULL;
-    node__C5V=((void **)Self__P4V->buckets__K5V)[(__INTEGER)(hash_code__D50(tmp__2UP) % Self__P4V->capacity__F5V)];
-    until_do__LA1:
+    Self__14V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__2VP);
+    result__P5V=NULL;
+    node__O5V=((void **)Self__14V->buckets__W5V)[(__INTEGER)(hash_code__P50(tmp__IVP) % Self__14V->capacity__R5V)];
+    until_do__XA1:
     {
-      if (((void *)node__C5V == (void *)NULL)) {
-        __tmp__15V=TRUE__;
-      } else {
-        Self__D3PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__C5V)->item__W5V);
-        result__G3PD=FALSE__;
-        o__H3PD=NULL;
-        if (((void *)Self__D3PD == (void *)tmp__2UP)) {
-          result__G3PD=TRUE__;
-        } else {
-          if (tmp__2UP==NULL) {
-            __tmp__T3PD=NULL;
-          } else {
-            __tmp__T3PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__2UP);
-          };
-          o__H3PD=__tmp__T3PD;
-          if ((((void *)__tmp__T3PD != (void *)NULL) && (Self__D3PD->parent_arrayed_collection__NXC.upper__4HV == __tmp__T3PD->parent_arrayed_collection__NXC.upper__4HV))) {
-            __tmp__D4PD=Self__D3PD->parent_arrayed_collection__NXC.storage__FMV;
-            __tmp__F4PD=__tmp__T3PD->parent_arrayed_collection__NXC.storage__FMV;
-            __tmp__I4PD=(__INTEGER)(Self__D3PD->parent_arrayed_collection__NXC.upper__4HV +  1);
-            Self__240E=((void **)__tmp__D4PD);
-            i__Q50E=(__INTEGER)(__tmp__I4PD -  1);
-            while (((i__Q50E >=  0) && ((void *)Self__240E[i__Q50E] == (void *)((void **)__tmp__F4PD)[i__Q50E]))) {
-              i__Q50E=(__INTEGER)(i__Q50E -  1);
-            };
-            result__G3PD=(i__Q50E <  0);
-          };
-        };
-        __tmp__15V=result__G3PD;
-      };
-      if ((! __tmp__15V)) {
-        node__C5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__C5V)->next__CAW;
-        goto until_do__LA1;
-      };
-    };
-    if (((void *)node__C5V != (void *)NULL)) {
-      result__D5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__C5V)->item__W5V;
-    };
-    result__4UP=result__D5V;
-    if (((void *)result__D5V == (void *)NULL)) {
-      result__4UP=create_with_capacity__2ER((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__2UP)->parent_arrayed_collection__NXC.upper__4HV +  1));
-      Self__QFW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__4UP);
-      new_capacity__TFW= 0;
-      other_upper__SFW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__2UP)->parent_arrayed_collection__NXC.upper__4HV;
-      if ((other_upper__SFW >=  0)) {
-        new_capacity__TFW=(__INTEGER)(other_upper__SFW +  1);
-        if ((Self__QFW->parent_arrayed_collection__NXC.capacity__TNV < new_capacity__TFW)) {
-          Self__QFW->parent_arrayed_collection__NXC.storage__FMV=create__HBRB(new_capacity__TFW);
-          Self__QFW->parent_arrayed_collection__NXC.capacity__TNV=new_capacity__TFW;
-        };
-        __tmp__GGW=Self__QFW->parent_arrayed_collection__NXC.storage__FMV;
-        __tmp__IGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__2UP)->parent_arrayed_collection__NXC.storage__FMV;
-        Self__M3CC=((void **)__tmp__GGW);
-        Self__5MKC=other_upper__SFW;
-        while ((Self__5MKC >=  0)) {
-          Self__M3CC[Self__5MKC]=((void **)__tmp__IGW)[Self__5MKC];
-          Self__5MKC=(__INTEGER)(Self__5MKC -  1);
-        };
-      };
-      Self__QFW->parent_arrayed_collection__NXC.upper__4HV=other_upper__SFW;
-      Self__MGW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__QVP);
-      e__NGW=result__4UP;
-      e__UUBH=result__4UP;
-      node__VUBH=((void **)Self__MGW->buckets__K5V)[(__INTEGER)(hash_code__D50(result__4UP) % Self__MGW->capacity__F5V)];
-      while ((! (((void *)node__VUBH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__VUBH)->item__W5V == (void *)e__UUBH)))) {
-        node__VUBH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__VUBH)->next__CAW;
-      };
-      e__OM1=result__4UP;
-      node__XM1=((void **)Self__MGW->buckets__K5V)[(__INTEGER)(hash_code__D50(result__4UP) % Self__MGW->capacity__F5V)];
-      while ((! (((void *)node__XM1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__XM1)->item__W5V == (void *)e__OM1)))) {
-        node__XM1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__XM1)->next__CAW;
-      };
-      h__UGW=hash_code__D50(result__4UP);
-      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__NURB= 0;
-          node1__QURB=NULL;
-          node2__RURB=NULL;
-          new_capacity__OURB=prime_number_ceiling__L41((__INTEGER)(Self__MGW->capacity__F5V +  1));
-          old_buckets__PURB=Self__MGW->buckets__K5V;
-          Self__MGW->buckets__K5V=create__PZBB(new_capacity__OURB);
-          i__MURB=(__INTEGER)(Self__MGW->capacity__F5V -  1);
-          Self__MGW->capacity__F5V=new_capacity__OURB;
-          while ((i__MURB >=  0)) {
-            node1__QURB=((void **)old_buckets__PURB)[i__MURB];
-            while (((void *)node1__QURB != (void *)NULL)) {
-              node2__RURB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__QURB)->next__CAW;
-              idx__NURB=(__INTEGER)(hash_code__D50(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__QURB)->item__W5V) % Self__MGW->capacity__F5V);
-              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__QURB)->next__CAW=((void **)Self__MGW->buckets__K5V)[idx__NURB];
-              ((void **)Self__MGW->buckets__K5V)[idx__NURB]=node1__QURB;
-              node1__QURB=node2__RURB;
-            };
-            i__MURB=(__INTEGER)(i__MURB -  1);
-          };
-          idx__VGW=(__INTEGER)(h__UGW % Self__MGW->capacity__F5V);
-        };
-        __tmp__GIW=((void **)Self__MGW->buckets__K5V)[idx__VGW];
-        result__PLNB=NULL;
-        ptr__QLNB=((__POINTER )(NULL));
-        typ_id__VLNB= 0;
-        sz__SLNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
-        if ((sz__SLNB ==  0)) {
-          result__PLNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
-        } else {
-          typ_id__VLNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__SLNB);
-          if ((typ_id__VLNB == (__INTEGER)(-  1))) {
-            a__3K4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__4K4G=(__UINTEGER_32)((__UINTEGER_32)(sz__SLNB + a__3K4G) & (__UINTEGER_32)(~ a__3K4G));
-            ptr_table__YUBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4K4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__XUBH=((__POINTER )(NULL));
-            result__ZUBH=((__POINTER *)ptr_table__YUBH)[ 0];
-            if ((result__ZUBH == (void *)NULL)) {
-              result__ZUBH=new_lab__ARJ(new_size__4K4G);
-              next__XUBH=(void *)((unsigned long)result__ZUBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4K4G)));
-              ((__POINTER *)next__XUBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YUBH)[ 0]=next__XUBH;
+      if (((void *)node__O5V == (void *)NULL)) {
+        __tmp__HAW=TRUE__;
+      } else {
+        Self__P3PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__O5V)->item__CAW);
+        result__S3PD=FALSE__;
+        o__T3PD=NULL;
+        if (((void *)Self__P3PD == (void *)tmp__IVP)) {
+          result__S3PD=TRUE__;
+        } else {
+          if (tmp__IVP==NULL) {
+            __tmp__53PD=NULL;
+          } else {
+            __tmp__53PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP);
+          };
+          o__T3PD=__tmp__53PD;
+          if ((((void *)__tmp__53PD != (void *)NULL) && (Self__P3PD->parent_arrayed_collection__ZXC.upper__KIV == __tmp__53PD->parent_arrayed_collection__ZXC.upper__KIV))) {
+            __tmp__P4PD=Self__P3PD->parent_arrayed_collection__ZXC.storage__RMV;
+            __tmp__R4PD=__tmp__53PD->parent_arrayed_collection__ZXC.storage__RMV;
+            __tmp__U4PD=(__INTEGER)(Self__P3PD->parent_arrayed_collection__ZXC.upper__KIV +  1);
+            Self__O11E=((void **)__tmp__P4PD);
+            i__C21E=(__INTEGER)(__tmp__U4PD -  1);
+            while (((i__C21E >=  0) && ((void *)Self__O11E[i__C21E] == (void *)((void **)__tmp__R4PD)[i__C21E]))) {
+              i__C21E=(__INTEGER)(i__C21E -  1);
+            };
+            result__S3PD=(i__C21E <  0);
+          };
+        };
+        __tmp__HAW=result__S3PD;
+      };
+      if ((! __tmp__HAW)) {
+        node__O5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__O5V)->next__OAW;
+        goto until_do__XA1;
+      };
+    };
+    if (((void *)node__O5V != (void *)NULL)) {
+      result__P5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__O5V)->item__CAW;
+    };
+    result__KVP=result__P5V;
+    if (((void *)result__P5V == (void *)NULL)) {
+      result__KVP=create_with_capacity__IFR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.upper__KIV +  1));
+      Self__2FW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__KVP);
+      new_capacity__5FW= 0;
+      other_upper__4FW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.upper__KIV;
+      if ((other_upper__4FW >=  0)) {
+        new_capacity__5FW=(__INTEGER)(other_upper__4FW +  1);
+        if ((Self__2FW->parent_arrayed_collection__ZXC.capacity__5NV < new_capacity__5FW)) {
+          Self__2FW->parent_arrayed_collection__ZXC.storage__RMV=create__TBRB(new_capacity__5FW);
+          Self__2FW->parent_arrayed_collection__ZXC.capacity__5NV=new_capacity__5FW;
+        };
+        __tmp__SGW=Self__2FW->parent_arrayed_collection__ZXC.storage__RMV;
+        __tmp__UGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.storage__RMV;
+        Self__Y3CC=((void **)__tmp__SGW);
+        Self__LNKC=other_upper__4FW;
+        while ((Self__LNKC >=  0)) {
+          Self__Y3CC[Self__LNKC]=((void **)__tmp__UGW)[Self__LNKC];
+          Self__LNKC=(__INTEGER)(Self__LNKC -  1);
+        };
+      };
+      Self__2FW->parent_arrayed_collection__ZXC.upper__KIV=other_upper__4FW;
+      Self__YGW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__2VP);
+      e__ZGW=result__KVP;
+      e__IBIH=result__KVP;
+      node__JBIH=((void **)Self__YGW->buckets__W5V)[(__INTEGER)(hash_code__P50(result__KVP) % Self__YGW->capacity__R5V)];
+      while ((! (((void *)node__JBIH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__JBIH)->item__CAW == (void *)e__IBIH)))) {
+        node__JBIH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__JBIH)->next__OAW;
+      };
+      e__0M1=result__KVP;
+      node__DN1=((void **)Self__YGW->buckets__W5V)[(__INTEGER)(hash_code__P50(result__KVP) % Self__YGW->capacity__R5V)];
+      while ((! (((void *)node__DN1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__DN1)->item__CAW == (void *)e__0M1)))) {
+        node__DN1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__DN1)->next__OAW;
+      };
+      h__AHW=hash_code__P50(result__KVP);
+      idx__BHW=(__INTEGER)(h__AHW % Self__YGW->capacity__R5V);
+      node__CHW=((void **)Self__YGW->buckets__W5V)[idx__BHW];
+      while ((! (((void *)node__CHW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CHW)->item__CAW == (void *)e__ZGW)))) {
+        node__CHW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CHW)->next__OAW;
+      };
+      if (((void *)node__CHW == (void *)NULL)) {
+        if ((Self__YGW->capacity__R5V == Self__YGW->count__FIW)) {
+          idx__ZURB= 0;
+          node1__2URB=NULL;
+          node2__3URB=NULL;
+          new_capacity__0URB=prime_number_ceiling__X41((__INTEGER)(Self__YGW->capacity__R5V +  1));
+          old_buckets__1URB=Self__YGW->buckets__W5V;
+          Self__YGW->buckets__W5V=create__1ZBB(new_capacity__0URB);
+          i__YURB=(__INTEGER)(Self__YGW->capacity__R5V -  1);
+          Self__YGW->capacity__R5V=new_capacity__0URB;
+          while ((i__YURB >=  0)) {
+            node1__2URB=((void **)old_buckets__1URB)[i__YURB];
+            while (((void *)node1__2URB != (void *)NULL)) {
+              node2__3URB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__2URB)->next__OAW;
+              idx__ZURB=(__INTEGER)(hash_code__P50(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__2URB)->item__CAW) % Self__YGW->capacity__R5V);
+              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__2URB)->next__OAW=((void **)Self__YGW->buckets__W5V)[idx__ZURB];
+              ((void **)Self__YGW->buckets__W5V)[idx__ZURB]=node1__2URB;
+              node1__2URB=node2__3URB;
+            };
+            i__YURB=(__INTEGER)(i__YURB -  1);
+          };
+          idx__BHW=(__INTEGER)(h__AHW % Self__YGW->capacity__R5V);
+        };
+        __tmp__SIW=((void **)Self__YGW->buckets__W5V)[idx__BHW];
+        result__1LNB=NULL;
+        ptr__2LNB=((__POINTER )(NULL));
+        typ_id__BMNB= 0;
+        sz__4LNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
+        if ((sz__4LNB ==  0)) {
+          result__1LNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+        } else {
+          typ_id__BMNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4LNB);
+          if ((typ_id__BMNB == (__INTEGER)(-  1))) {
+            a__SWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TWEH=(__UINTEGER_32)((__UINTEGER_32)(sz__4LNB + a__SWEH) & (__UINTEGER_32)(~ a__SWEH));
+            ptr_table__MBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TWEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__LBIH=((__POINTER )(NULL));
+            result__NBIH=((__POINTER *)ptr_table__MBIH)[ 0];
+            if ((result__NBIH == (void *)NULL)) {
+              result__NBIH=new_lab__MRJ(new_size__TWEH);
+              next__LBIH=(void *)((unsigned long)result__NBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWEH)));
+              ((__POINTER *)next__LBIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MBIH)[ 0]=next__LBIH;
             } else {
-              next__XUBH=((__POINTER *)result__ZUBH)[ 0];
-              if ((next__XUBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZUBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4K4G <<  1)) <=  4096)) {
-                  next__XUBH=(void *)((unsigned long)result__ZUBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4K4G)));
+              next__LBIH=((__POINTER *)result__NBIH)[ 0];
+              if ((next__LBIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TWEH <<  1)) <=  4096)) {
+                  next__LBIH=(void *)((unsigned long)result__NBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWEH)));
                 } else {
-                  next__XUBH=new_lab__ARJ(new_size__4K4G);
+                  next__LBIH=new_lab__MRJ(new_size__TWEH);
                 };
-                ((__POINTER *)next__XUBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YUBH)[ 0]=next__XUBH;
+                ((__POINTER *)next__LBIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MBIH)[ 0]=next__LBIH;
               } else {
-                ((__POINTER *)result__ZUBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ZUBH=next__XUBH;
+                ((__POINTER *)result__NBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NBIH=next__LBIH;
               };
             };
-            ptr__QLNB=result__ZUBH;
-          } else {
-            t__CL4G=((__UINTEGER_32 )typ_id__VLNB);
-            a__BL4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__AVBH=(__UINTEGER_32)((__UINTEGER_32)(sz__SLNB + a__BL4G) & (__UINTEGER_32)(~ a__BL4G));
-            ptr_table__3UBH=((__POINTER )(&(table_type[(t__CL4G)])));
-            lab_type__5UBH=(__UINTEGER_32)(t__CL4G |  1);
-            next__2UBH=((__POINTER )(NULL));
-            result__4UBH=((__POINTER *)ptr_table__3UBH)[ 0];
-            if ((result__4UBH == (void *)NULL)) {
-              result__4UBH=new_lab__ARJ(lab_type__5UBH);
-              next__2UBH=(void *)((unsigned long)result__4UBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVBH)));
-              ((__POINTER *)next__2UBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3UBH)[ 0]=next__2UBH;
+            ptr__2LNB=result__NBIH;
+          } else {
+            t__XWEH=((__UINTEGER_32 )typ_id__BMNB);
+            a__WWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__UBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4LNB + a__WWEH) & (__UINTEGER_32)(~ a__WWEH));
+            ptr_table__RBIH=((__POINTER )(&(table_type[(t__XWEH)])));
+            lab_type__TBIH=(__UINTEGER_32)(t__XWEH |  1);
+            next__QBIH=((__POINTER )(NULL));
+            result__SBIH=((__POINTER *)ptr_table__RBIH)[ 0];
+            if ((result__SBIH == (void *)NULL)) {
+              result__SBIH=new_lab__MRJ(lab_type__TBIH);
+              next__QBIH=(void *)((unsigned long)result__SBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UBIH)));
+              ((__POINTER *)next__QBIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RBIH)[ 0]=next__QBIH;
             } else {
-              next__2UBH=((__POINTER *)result__4UBH)[ 0];
-              if ((next__2UBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4UBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AVBH <<  1)) <=  4096)) {
-                  next__2UBH=(void *)((unsigned long)result__4UBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVBH)));
+              next__QBIH=((__POINTER *)result__SBIH)[ 0];
+              if ((next__QBIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UBIH <<  1)) <=  4096)) {
+                  next__QBIH=(void *)((unsigned long)result__SBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UBIH)));
                 } else {
-                  next__2UBH=new_lab__ARJ(lab_type__5UBH);
+                  next__QBIH=new_lab__MRJ(lab_type__TBIH);
                 };
-                ((__POINTER *)next__2UBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3UBH)[ 0]=next__2UBH;
+                ((__POINTER *)next__QBIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RBIH)[ 0]=next__QBIH;
               } else {
-                ((__POINTER *)result__4UBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2UBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4UBH=next__2UBH;
+                ((__POINTER *)result__SBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SBIH=next__QBIH;
               };
             };
-            ptr__QLNB=result__4UBH;
+            ptr__2LNB=result__SBIH;
           };
-          result__PLNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__QLNB);
-          *(result__PLNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__1LNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__2LNB);
+          *(result__1LNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        Self__HSDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__PLNB);
-        Self__HSDC->item__W5V=result__4UP;
-        Self__HSDC->next__CAW=__tmp__GIW;
-        node__WGW=result__PLNB;
-        ((void **)Self__MGW->buckets__K5V)[idx__VGW]=result__PLNB;
-        Self__MGW->count__ZHW=(__INTEGER)(Self__MGW->count__ZHW +  1);
+        Self__TSDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__1LNB);
+        Self__TSDC->item__CAW=result__KVP;
+        Self__TSDC->next__OAW=__tmp__SIW;
+        node__CHW=result__1LNB;
+        ((void **)Self__YGW->buckets__W5V)[idx__BHW]=result__1LNB;
+        Self__YGW->count__FIW=(__INTEGER)(Self__YGW->count__FIW +  1);
       };
     };
   };
-  free__QMQ(tmp__2UP);
-  return(result__4UP);
+  free__2MQ(tmp__IVP);
+  return(result__KVP);
 }
 
-static void add__WLHB(__HASHED_SEToSTRING_CONSTANTo *Self__XLHB,void *e__YLHB)
+static void add__CMHB(__HASHED_SEToSTRING_CONSTANTo *Self__DMHB,void *e__EMHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__W25G,*Self__125G;
-  __INTEGER result__V25G,__tmp__X25G,Self__Y25G,idx__AMHB,idx__ZP0B;
-  __INTEGER new_capacity__0P0B,i__YP0B,result__025G,__tmp__225G;
-  __INTEGER Self__325G,typ_id__K3WB;
-  __POINTER ptr__F3WB,ptr_table__CVBH,next__BVBH,result__DVBH;
-  __POINTER ptr_table__HVBH,next__GVBH,result__IVBH;
-  __UINTEGER_32 sz__H3WB,a__XL4G,new_size__YL4G,t__2L4G,a__1L4G;
-  __UINTEGER_32 new_size__KVBH,lab_type__JVBH;
-  void *node__BMHB,*node1__2P0B,*node2__3P0B,*__tmp__QNHB;
-  void **old_buckets__1P0B;
-  __HASHED_SET_NODEoSTRING_CONSTANTo *result__E3WB,*Self__GLFC;
-  has__HLMB(Self__XLHB,e__YLHB);
-  has__HLMB(Self__XLHB,e__YLHB);
-  Self__W25G=((__STRING_CONSTANT *)e__YLHB);
-  result__V25G= 0;
-  __tmp__X25G=Self__W25G->count__DD;
-  Self__Y25G= 1;
-  while ((Self__Y25G <= __tmp__X25G)) {
-    result__V25G=(__INTEGER)((__INTEGER)( 5 * result__V25G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__W25G->storage__JQO)[(__INTEGER)(Self__Y25G -  1)])));
-    Self__Y25G=(__INTEGER)(Self__Y25G +  1);
-  };
-  if ((result__V25G <  0)) {
-    result__V25G=(__INTEGER)(~ result__V25G);
-  };
-  idx__AMHB=(__INTEGER)(result__V25G % Self__XLHB->capacity__4HT);
-  node__BMHB=((void **)Self__XLHB->buckets__DEV)[idx__AMHB];
-  while ((! (((void *)node__BMHB == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__BMHB)->item__PEV,e__YLHB)))) {
-    node__BMHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__BMHB)->next__0EV;
-  };
-  if (((void *)node__BMHB == (void *)NULL)) {
-    if ((Self__XLHB->capacity__4HT == Self__XLHB->count__MHY)) {
-      idx__ZP0B= 0;
-      node1__2P0B=NULL;
-      node2__3P0B=NULL;
-      new_capacity__0P0B=prime_number_ceiling__L41((__INTEGER)(Self__XLHB->capacity__4HT +  1));
-      old_buckets__1P0B=Self__XLHB->buckets__DEV;
-      Self__XLHB->buckets__DEV=create__H23(new_capacity__0P0B);
-      i__YP0B=(__INTEGER)(Self__XLHB->capacity__4HT -  1);
-      Self__XLHB->capacity__4HT=new_capacity__0P0B;
-      while ((i__YP0B >=  0)) {
-        node1__2P0B=((void **)old_buckets__1P0B)[i__YP0B];
-        while (((void *)node1__2P0B != (void *)NULL)) {
-          node2__3P0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__2P0B)->next__0EV;
-          Self__125G=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__2P0B)->item__PEV);
-          result__025G= 0;
-          __tmp__225G=Self__125G->count__DD;
-          Self__325G= 1;
-          while ((Self__325G <= __tmp__225G)) {
-            result__025G=(__INTEGER)((__INTEGER)( 5 * result__025G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__125G->storage__JQO)[(__INTEGER)(Self__325G -  1)])));
-            Self__325G=(__INTEGER)(Self__325G +  1);
-          };
-          if ((result__025G <  0)) {
-            result__025G=(__INTEGER)(~ result__025G);
-          };
-          idx__ZP0B=(__INTEGER)(result__025G % Self__XLHB->capacity__4HT);
-          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__2P0B)->next__0EV=((void **)Self__XLHB->buckets__DEV)[idx__ZP0B];
-          ((void **)Self__XLHB->buckets__DEV)[idx__ZP0B]=node1__2P0B;
-          node1__2P0B=node2__3P0B;
-        };
-        i__YP0B=(__INTEGER)(i__YP0B -  1);
-      };
-      idx__AMHB=(__INTEGER)(result__V25G % new_capacity__0P0B);
-    };
-    __tmp__QNHB=((void **)Self__XLHB->buckets__DEV)[idx__AMHB];
-    result__E3WB=NULL;
-    ptr__F3WB=((__POINTER )(NULL));
-    typ_id__K3WB= 0;
-    sz__H3WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
-    if ((sz__H3WB ==  0)) {
-      result__E3WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
-    } else {
-      typ_id__K3WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__H3WB);
-      if ((typ_id__K3WB == (__INTEGER)(-  1))) {
-        a__XL4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YL4G=(__UINTEGER_32)((__UINTEGER_32)(sz__H3WB + a__XL4G) & (__UINTEGER_32)(~ a__XL4G));
-        ptr_table__CVBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YL4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__BVBH=((__POINTER )(NULL));
-        result__DVBH=((__POINTER *)ptr_table__CVBH)[ 0];
-        if ((result__DVBH == (void *)NULL)) {
-          result__DVBH=new_lab__ARJ(new_size__YL4G);
-          next__BVBH=(void *)((unsigned long)result__DVBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YL4G)));
-          ((__POINTER *)next__BVBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CVBH)[ 0]=next__BVBH;
-        } else {
-          next__BVBH=((__POINTER *)result__DVBH)[ 0];
-          if ((next__BVBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DVBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__YL4G <<  1)) <=  4096)) {
-              next__BVBH=(void *)((unsigned long)result__DVBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YL4G)));
+  __STRING_CONSTANT *Self__CJGH,*Self__HJGH;
+  __INTEGER result__BJGH,__tmp__DJGH,Self__EJGH,idx__MMHB,idx__FQ0B;
+  __INTEGER new_capacity__GQ0B,i__EQ0B,result__GJGH,__tmp__IJGH;
+  __INTEGER Self__JJGH,typ_id__W3WB;
+  __POINTER ptr__R3WB,ptr_table__WBIH,next__VBIH,result__XBIH;
+  __POINTER ptr_table__1BIH,next__0BIH,result__2BIH;
+  __UINTEGER_32 sz__T3WB,a__MXEH,new_size__NXEH,t__RXEH,a__QXEH;
+  __UINTEGER_32 new_size__4BIH,lab_type__3BIH;
+  void *node__NMHB,*node1__IQ0B,*node2__JQ0B,*__tmp__2NHB;
+  void **old_buckets__HQ0B;
+  __HASHED_SET_NODEoSTRING_CONSTANTo *result__Q3WB,*Self__SLFC;
+  has__TLMB(Self__DMHB,e__EMHB);
+  has__TLMB(Self__DMHB,e__EMHB);
+  Self__CJGH=((__STRING_CONSTANT *)e__EMHB);
+  result__BJGH= 0;
+  __tmp__DJGH=Self__CJGH->count__DD;
+  Self__EJGH= 1;
+  while ((Self__EJGH <= __tmp__DJGH)) {
+    result__BJGH=(__INTEGER)((__INTEGER)( 5 * result__BJGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CJGH->storage__VQO)[(__INTEGER)(Self__EJGH -  1)])));
+    Self__EJGH=(__INTEGER)(Self__EJGH +  1);
+  };
+  if ((result__BJGH <  0)) {
+    result__BJGH=(__INTEGER)(~ result__BJGH);
+  };
+  idx__MMHB=(__INTEGER)(result__BJGH % Self__DMHB->capacity__KIT);
+  node__NMHB=((void **)Self__DMHB->buckets__PEV)[idx__MMHB];
+  while ((! (((void *)node__NMHB == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__NMHB)->item__1EV,e__EMHB)))) {
+    node__NMHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__NMHB)->next__GFV;
+  };
+  if (((void *)node__NMHB == (void *)NULL)) {
+    if ((Self__DMHB->capacity__KIT == Self__DMHB->count__YHY)) {
+      idx__FQ0B= 0;
+      node1__IQ0B=NULL;
+      node2__JQ0B=NULL;
+      new_capacity__GQ0B=prime_number_ceiling__X41((__INTEGER)(Self__DMHB->capacity__KIT +  1));
+      old_buckets__HQ0B=Self__DMHB->buckets__PEV;
+      Self__DMHB->buckets__PEV=create__T23(new_capacity__GQ0B);
+      i__EQ0B=(__INTEGER)(Self__DMHB->capacity__KIT -  1);
+      Self__DMHB->capacity__KIT=new_capacity__GQ0B;
+      while ((i__EQ0B >=  0)) {
+        node1__IQ0B=((void **)old_buckets__HQ0B)[i__EQ0B];
+        while (((void *)node1__IQ0B != (void *)NULL)) {
+          node2__JQ0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__IQ0B)->next__GFV;
+          Self__HJGH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__IQ0B)->item__1EV);
+          result__GJGH= 0;
+          __tmp__IJGH=Self__HJGH->count__DD;
+          Self__JJGH= 1;
+          while ((Self__JJGH <= __tmp__IJGH)) {
+            result__GJGH=(__INTEGER)((__INTEGER)( 5 * result__GJGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HJGH->storage__VQO)[(__INTEGER)(Self__JJGH -  1)])));
+            Self__JJGH=(__INTEGER)(Self__JJGH +  1);
+          };
+          if ((result__GJGH <  0)) {
+            result__GJGH=(__INTEGER)(~ result__GJGH);
+          };
+          idx__FQ0B=(__INTEGER)(result__GJGH % Self__DMHB->capacity__KIT);
+          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__IQ0B)->next__GFV=((void **)Self__DMHB->buckets__PEV)[idx__FQ0B];
+          ((void **)Self__DMHB->buckets__PEV)[idx__FQ0B]=node1__IQ0B;
+          node1__IQ0B=node2__JQ0B;
+        };
+        i__EQ0B=(__INTEGER)(i__EQ0B -  1);
+      };
+      idx__MMHB=(__INTEGER)(result__BJGH % new_capacity__GQ0B);
+    };
+    __tmp__2NHB=((void **)Self__DMHB->buckets__PEV)[idx__MMHB];
+    result__Q3WB=NULL;
+    ptr__R3WB=((__POINTER )(NULL));
+    typ_id__W3WB= 0;
+    sz__T3WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
+    if ((sz__T3WB ==  0)) {
+      result__Q3WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
+    } else {
+      typ_id__W3WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__T3WB);
+      if ((typ_id__W3WB == (__INTEGER)(-  1))) {
+        a__MXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NXEH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3WB + a__MXEH) & (__UINTEGER_32)(~ a__MXEH));
+        ptr_table__WBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NXEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__VBIH=((__POINTER )(NULL));
+        result__XBIH=((__POINTER *)ptr_table__WBIH)[ 0];
+        if ((result__XBIH == (void *)NULL)) {
+          result__XBIH=new_lab__MRJ(new_size__NXEH);
+          next__VBIH=(void *)((unsigned long)result__XBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NXEH)));
+          ((__POINTER *)next__VBIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WBIH)[ 0]=next__VBIH;
+        } else {
+          next__VBIH=((__POINTER *)result__XBIH)[ 0];
+          if ((next__VBIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NXEH <<  1)) <=  4096)) {
+              next__VBIH=(void *)((unsigned long)result__XBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NXEH)));
             } else {
-              next__BVBH=new_lab__ARJ(new_size__YL4G);
-            };
-            ((__POINTER *)next__BVBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CVBH)[ 0]=next__BVBH;
-          } else {
-            ((__POINTER *)result__DVBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DVBH=next__BVBH;
-          };
-        };
-        ptr__F3WB=result__DVBH;
-      } else {
-        t__2L4G=((__UINTEGER_32 )typ_id__K3WB);
-        a__1L4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__KVBH=(__UINTEGER_32)((__UINTEGER_32)(sz__H3WB + a__1L4G) & (__UINTEGER_32)(~ a__1L4G));
-        ptr_table__HVBH=((__POINTER )(&(table_type[(t__2L4G)])));
-        lab_type__JVBH=(__UINTEGER_32)(t__2L4G |  1);
-        next__GVBH=((__POINTER )(NULL));
-        result__IVBH=((__POINTER *)ptr_table__HVBH)[ 0];
-        if ((result__IVBH == (void *)NULL)) {
-          result__IVBH=new_lab__ARJ(lab_type__JVBH);
-          next__GVBH=(void *)((unsigned long)result__IVBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVBH)));
-          ((__POINTER *)next__GVBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HVBH)[ 0]=next__GVBH;
-        } else {
-          next__GVBH=((__POINTER *)result__IVBH)[ 0];
-          if ((next__GVBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IVBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__KVBH <<  1)) <=  4096)) {
-              next__GVBH=(void *)((unsigned long)result__IVBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVBH)));
+              next__VBIH=new_lab__MRJ(new_size__NXEH);
+            };
+            ((__POINTER *)next__VBIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WBIH)[ 0]=next__VBIH;
+          } else {
+            ((__POINTER *)result__XBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XBIH=next__VBIH;
+          };
+        };
+        ptr__R3WB=result__XBIH;
+      } else {
+        t__RXEH=((__UINTEGER_32 )typ_id__W3WB);
+        a__QXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4BIH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3WB + a__QXEH) & (__UINTEGER_32)(~ a__QXEH));
+        ptr_table__1BIH=((__POINTER )(&(table_type[(t__RXEH)])));
+        lab_type__3BIH=(__UINTEGER_32)(t__RXEH |  1);
+        next__0BIH=((__POINTER )(NULL));
+        result__2BIH=((__POINTER *)ptr_table__1BIH)[ 0];
+        if ((result__2BIH == (void *)NULL)) {
+          result__2BIH=new_lab__MRJ(lab_type__3BIH);
+          next__0BIH=(void *)((unsigned long)result__2BIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4BIH)));
+          ((__POINTER *)next__0BIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1BIH)[ 0]=next__0BIH;
+        } else {
+          next__0BIH=((__POINTER *)result__2BIH)[ 0];
+          if ((next__0BIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2BIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4BIH <<  1)) <=  4096)) {
+              next__0BIH=(void *)((unsigned long)result__2BIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4BIH)));
             } else {
-              next__GVBH=new_lab__ARJ(lab_type__JVBH);
+              next__0BIH=new_lab__MRJ(lab_type__3BIH);
             };
-            ((__POINTER *)next__GVBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HVBH)[ 0]=next__GVBH;
+            ((__POINTER *)next__0BIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1BIH)[ 0]=next__0BIH;
           } else {
-            ((__POINTER *)result__IVBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IVBH=next__GVBH;
+            ((__POINTER *)result__2BIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0BIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2BIH=next__0BIH;
           };
         };
-        ptr__F3WB=result__IVBH;
+        ptr__R3WB=result__2BIH;
       };
-      result__E3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__F3WB);
-      *(result__E3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+      result__Q3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__R3WB);
+      *(result__Q3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
     };
-    Self__GLFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__E3WB);
-    Self__GLFC->item__PEV=e__YLHB;
-    Self__GLFC->next__0EV=__tmp__QNHB;
-    node__BMHB=result__E3WB;
-    ((void **)Self__XLHB->buckets__DEV)[idx__AMHB]=result__E3WB;
-    Self__XLHB->count__MHY=(__INTEGER)(Self__XLHB->count__MHY +  1);
+    Self__SLFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__Q3WB);
+    Self__SLFC->item__1EV=e__EMHB;
+    Self__SLFC->next__GFV=__tmp__2NHB;
+    node__NMHB=result__Q3WB;
+    ((void **)Self__DMHB->buckets__PEV)[idx__MMHB]=result__Q3WB;
+    Self__DMHB->count__YHY=(__INTEGER)(Self__DMHB->count__YHY +  1);
   };
 }
 
-static void add_last__FBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__GBPD,void *element__HBPD)
+static void add_last__RBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__SBPD,void *element__TBPD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__IBPD,__tmp__PCPD,__tmp__DRVE,Self__VMPF;
-  __BOOLEAN __tmp__XBPD;
-  void **__tmp__OCPD,**new__PQVE;
-  new_capacity__IBPD= 0;
-  if (((__INTEGER)(Self__GBPD->parent_arrayed_collection__14I.upper__P5OD +  1) <= (__INTEGER)(Self__GBPD->parent_arrayed_collection__14I.capacity__KBPD -  1))) {
-    Self__GBPD->parent_arrayed_collection__14I.upper__P5OD=(__INTEGER)(Self__GBPD->parent_arrayed_collection__14I.upper__P5OD +  1);
-    __tmp__XBPD=TRUE__;
+  __INTEGER new_capacity__UBPD,__tmp__1CPD,__tmp__IBWE,Self__3PPF;
+  __BOOLEAN __tmp__DCPD;
+  void **__tmp__0CPD,**new__UAWE;
+  new_capacity__UBPD= 0;
+  if (((__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.upper__15OD +  1) <= (__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD -  1))) {
+    Self__SBPD->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.upper__15OD +  1);
+    __tmp__DCPD=TRUE__;
   } else {
-    __tmp__XBPD=FALSE__;
-  };
-  if ((! __tmp__XBPD)) {
-    if ((Self__GBPD->parent_arrayed_collection__14I.capacity__KBPD ==  0)) {
-      Self__GBPD->parent_arrayed_collection__14I.storage__FCPD=create__G0GE( 2);
-      Self__GBPD->parent_arrayed_collection__14I.capacity__KBPD= 2;
-      Self__GBPD->parent_arrayed_collection__14I.upper__P5OD= 0;
-    } else {
-      new_capacity__IBPD=(__INTEGER)(Self__GBPD->parent_arrayed_collection__14I.capacity__KBPD <<  1);
-      __tmp__OCPD=Self__GBPD->parent_arrayed_collection__14I.storage__FCPD;
-      __tmp__PCPD=Self__GBPD->parent_arrayed_collection__14I.capacity__KBPD;
-      new__PQVE=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__OCPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__PCPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__IBPD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__DRVE=(__INTEGER)(new_capacity__IBPD -  1);
-      Self__VMPF=__tmp__PCPD;
-      while ((Self__VMPF <= __tmp__DRVE)) {
-        new__PQVE[Self__VMPF]=NULL;
-        Self__VMPF=(__INTEGER)(Self__VMPF +  1);
-      };
-      Self__GBPD->parent_arrayed_collection__14I.storage__FCPD=new__PQVE;
-      Self__GBPD->parent_arrayed_collection__14I.capacity__KBPD=new_capacity__IBPD;
-      Self__GBPD->parent_arrayed_collection__14I.upper__P5OD=(__INTEGER)(Self__GBPD->parent_arrayed_collection__14I.upper__P5OD +  1);
-    };
-  };
-  ((void **)Self__GBPD->parent_arrayed_collection__14I.storage__FCPD)[Self__GBPD->parent_arrayed_collection__14I.upper__P5OD]=element__HBPD;
+    __tmp__DCPD=FALSE__;
+  };
+  if ((! __tmp__DCPD)) {
+    if ((Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD ==  0)) {
+      Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD=create__PHHE( 2);
+      Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD= 2;
+      Self__SBPD->parent_arrayed_collection__H5I.upper__15OD= 0;
+    } else {
+      new_capacity__UBPD=(__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD <<  1);
+      __tmp__0CPD=Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD;
+      __tmp__1CPD=Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD;
+      new__UAWE=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__0CPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__1CPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UBPD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__IBWE=(__INTEGER)(new_capacity__UBPD -  1);
+      Self__3PPF=__tmp__1CPD;
+      while ((Self__3PPF <= __tmp__IBWE)) {
+        new__UAWE[Self__3PPF]=NULL;
+        Self__3PPF=(__INTEGER)(Self__3PPF +  1);
+      };
+      Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD=new__UAWE;
+      Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD=new_capacity__UBPD;
+      Self__SBPD->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.upper__15OD +  1);
+    };
+  };
+  ((void **)Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD)[Self__SBPD->parent_arrayed_collection__H5I.upper__15OD]=element__TBPD;
 }
 
-static void free__OS5(void *tmp__QS5)
+static void free__0S5(void *tmp__2S5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__IGGB,__tmp__MHGB,__tmp__3GGC,Self__23VD;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__GGGB;
-  __BOOLEAN __tmp__WGGB;
-  void **__tmp__LHGB,**new__JGGC;
-  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__QS5)->parent_arrayed_collection__14I.upper__P5OD=(__INTEGER)(-  1);
-  Self__GGGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__44K);
-  new_capacity__IGGB= 0;
-  if (((__INTEGER)(Self__GGGB->parent_arrayed_collection__34K.upper__OSU +  1) <= (__INTEGER)(Self__GGGB->parent_arrayed_collection__34K.capacity__TUU -  1))) {
-    Self__GGGB->parent_arrayed_collection__34K.upper__OSU=(__INTEGER)(Self__GGGB->parent_arrayed_collection__34K.upper__OSU +  1);
-    __tmp__WGGB=TRUE__;
+  __INTEGER new_capacity__UGGB,__tmp__YHGB,__tmp__JHGC,Self__V4VD;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__SGGB;
+  __BOOLEAN __tmp__CHGB;
+  void **__tmp__XHGB,**new__VGGC;
+  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__2S5)->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(-  1);
+  Self__SGGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
+  new_capacity__UGGB= 0;
+  if (((__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.upper__0SU +  1) <= (__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU -  1))) {
+    Self__SGGB->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.upper__0SU +  1);
+    __tmp__CHGB=TRUE__;
   } else {
-    __tmp__WGGB=FALSE__;
-  };
-  if ((! __tmp__WGGB)) {
-    if ((Self__GGGB->parent_arrayed_collection__34K.capacity__TUU ==  0)) {
-      Self__GGGB->parent_arrayed_collection__34K.storage__4UU=create__T3ZB( 2);
-      Self__GGGB->parent_arrayed_collection__34K.capacity__TUU= 2;
-      Self__GGGB->parent_arrayed_collection__34K.upper__OSU= 0;
-    } else {
-      new_capacity__IGGB=(__INTEGER)(Self__GGGB->parent_arrayed_collection__34K.capacity__TUU <<  1);
-      __tmp__LHGB=Self__GGGB->parent_arrayed_collection__34K.storage__4UU;
-      __tmp__MHGB=Self__GGGB->parent_arrayed_collection__34K.capacity__TUU;
-      new__JGGC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__LHGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__MHGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__IGGB * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__3GGC=(__INTEGER)(new_capacity__IGGB -  1);
-      Self__23VD=__tmp__MHGB;
-      while ((Self__23VD <= __tmp__3GGC)) {
-        new__JGGC[Self__23VD]=NULL;
-        Self__23VD=(__INTEGER)(Self__23VD +  1);
-      };
-      Self__GGGB->parent_arrayed_collection__34K.storage__4UU=new__JGGC;
-      Self__GGGB->parent_arrayed_collection__34K.capacity__TUU=new_capacity__IGGB;
-      Self__GGGB->parent_arrayed_collection__34K.upper__OSU=(__INTEGER)(Self__GGGB->parent_arrayed_collection__34K.upper__OSU +  1);
-    };
-  };
-  ((void **)Self__GGGB->parent_arrayed_collection__34K.storage__4UU)[Self__GGGB->parent_arrayed_collection__34K.upper__OSU]=tmp__QS5;
+    __tmp__CHGB=FALSE__;
+  };
+  if ((! __tmp__CHGB)) {
+    if ((Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU ==  0)) {
+      Self__SGGB->parent_arrayed_collection__J5K.storage__KVU=create__53ZB( 2);
+      Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU= 2;
+      Self__SGGB->parent_arrayed_collection__J5K.upper__0SU= 0;
+    } else {
+      new_capacity__UGGB=(__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU <<  1);
+      __tmp__XHGB=Self__SGGB->parent_arrayed_collection__J5K.storage__KVU;
+      __tmp__YHGB=Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU;
+      new__VGGC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__XHGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__YHGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UGGB * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__JHGC=(__INTEGER)(new_capacity__UGGB -  1);
+      Self__V4VD=__tmp__YHGB;
+      while ((Self__V4VD <= __tmp__JHGC)) {
+        new__VGGC[Self__V4VD]=NULL;
+        Self__V4VD=(__INTEGER)(Self__V4VD +  1);
+      };
+      Self__SGGB->parent_arrayed_collection__J5K.storage__KVU=new__VGGC;
+      Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU=new_capacity__UGGB;
+      Self__SGGB->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.upper__0SU +  1);
+    };
+  };
+  ((void **)Self__SGGB->parent_arrayed_collection__J5K.storage__KVU)[Self__SGGB->parent_arrayed_collection__J5K.upper__0SU]=tmp__2S5;
 }
 
-static void free__QMQ(void *tmp__SMQ)
+static void free__2MQ(void *tmp__4MQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__SYV,__tmp__ZZV,__tmp__ZJEC,Self__RMVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__QYV;
-  __BOOLEAN __tmp__BZV;
-  void **__tmp__YZV,**new__FJEC;
-  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__SMQ)->parent_arrayed_collection__NXC.upper__4HV=(__INTEGER)(-  1);
-  Self__QYV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-  new_capacity__SYV= 0;
-  if (((__INTEGER)(Self__QYV->parent_arrayed_collection__3TP.upper__ZUV +  1) <= (__INTEGER)(Self__QYV->parent_arrayed_collection__3TP.capacity__UYV -  1))) {
-    Self__QYV->parent_arrayed_collection__3TP.upper__ZUV=(__INTEGER)(Self__QYV->parent_arrayed_collection__3TP.upper__ZUV +  1);
-    __tmp__BZV=TRUE__;
+  __INTEGER new_capacity__4YV,__tmp__F0V,__tmp__FKEC,Self__KNVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__2YV;
+  __BOOLEAN __tmp__NZV;
+  void **__tmp__E0V,**new__RJEC;
+  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__4MQ)->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(-  1);
+  Self__2YV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+  new_capacity__4YV= 0;
+  if (((__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.upper__FVV +  1) <= (__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.capacity__AZV -  1))) {
+    Self__2YV->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.upper__FVV +  1);
+    __tmp__NZV=TRUE__;
   } else {
-    __tmp__BZV=FALSE__;
-  };
-  if ((! __tmp__BZV)) {
-    if ((Self__QYV->parent_arrayed_collection__3TP.capacity__UYV ==  0)) {
-      Self__QYV->parent_arrayed_collection__3TP.storage__PZV=create__AJRB( 2);
-      Self__QYV->parent_arrayed_collection__3TP.capacity__UYV= 2;
-      Self__QYV->parent_arrayed_collection__3TP.upper__ZUV= 0;
-    } else {
-      new_capacity__SYV=(__INTEGER)(Self__QYV->parent_arrayed_collection__3TP.capacity__UYV <<  1);
-      __tmp__YZV=Self__QYV->parent_arrayed_collection__3TP.storage__PZV;
-      __tmp__ZZV=Self__QYV->parent_arrayed_collection__3TP.capacity__UYV;
-      new__FJEC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__YZV)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZZV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__SYV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ZJEC=(__INTEGER)(new_capacity__SYV -  1);
-      Self__RMVD=__tmp__ZZV;
-      while ((Self__RMVD <= __tmp__ZJEC)) {
-        new__FJEC[Self__RMVD]=NULL;
-        Self__RMVD=(__INTEGER)(Self__RMVD +  1);
-      };
-      Self__QYV->parent_arrayed_collection__3TP.storage__PZV=new__FJEC;
-      Self__QYV->parent_arrayed_collection__3TP.capacity__UYV=new_capacity__SYV;
-      Self__QYV->parent_arrayed_collection__3TP.upper__ZUV=(__INTEGER)(Self__QYV->parent_arrayed_collection__3TP.upper__ZUV +  1);
-    };
-  };
-  ((void **)Self__QYV->parent_arrayed_collection__3TP.storage__PZV)[Self__QYV->parent_arrayed_collection__3TP.upper__ZUV]=tmp__SMQ;
+    __tmp__NZV=FALSE__;
+  };
+  if ((! __tmp__NZV)) {
+    if ((Self__2YV->parent_arrayed_collection__JUP.capacity__AZV ==  0)) {
+      Self__2YV->parent_arrayed_collection__JUP.storage__1ZV=create__MJRB( 2);
+      Self__2YV->parent_arrayed_collection__JUP.capacity__AZV= 2;
+      Self__2YV->parent_arrayed_collection__JUP.upper__FVV= 0;
+    } else {
+      new_capacity__4YV=(__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.capacity__AZV <<  1);
+      __tmp__E0V=Self__2YV->parent_arrayed_collection__JUP.storage__1ZV;
+      __tmp__F0V=Self__2YV->parent_arrayed_collection__JUP.capacity__AZV;
+      new__RJEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__E0V)),((__UINTEGER_32 )(__INTEGER)(__tmp__F0V * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__4YV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__FKEC=(__INTEGER)(new_capacity__4YV -  1);
+      Self__KNVD=__tmp__F0V;
+      while ((Self__KNVD <= __tmp__FKEC)) {
+        new__RJEC[Self__KNVD]=NULL;
+        Self__KNVD=(__INTEGER)(Self__KNVD +  1);
+      };
+      Self__2YV->parent_arrayed_collection__JUP.storage__1ZV=new__RJEC;
+      Self__2YV->parent_arrayed_collection__JUP.capacity__AZV=new_capacity__4YV;
+      Self__2YV->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.upper__FVV +  1);
+    };
+  };
+  ((void **)Self__2YV->parent_arrayed_collection__JUP.storage__1ZV)[Self__2YV->parent_arrayed_collection__JUP.upper__FVV]=tmp__4MQ;
 }
 
-static __INTEGER hash_code__WCQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__XCQF)
+static __INTEGER hash_code__DNQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__ENQF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__ZCQF,result__525G,__tmp__B35G,Self__C35G;
-  __INTEGER result__E35G,__tmp__G35G,Self__H35G;
-  __STRING_CONSTANT *Self__A35G,*Self__F35G;
-  __BOOLEAN __tmp__KDQF;
-  result__ZCQF= 0;
-  if ((! (Self__XCQF->parent_arrayed_collection__14I.upper__P5OD <  0))) {
-    if (((void *)((void **)Self__XCQF->parent_arrayed_collection__14I.storage__FCPD)[Self__XCQF->parent_arrayed_collection__14I.upper__P5OD] != (void *)NULL)) {
-      Self__A35G=((__STRING_CONSTANT *)((void **)Self__XCQF->parent_arrayed_collection__14I.storage__FCPD)[Self__XCQF->parent_arrayed_collection__14I.upper__P5OD]);
-      result__525G= 0;
-      __tmp__B35G=Self__A35G->count__DD;
-      Self__C35G= 1;
-      while ((Self__C35G <= __tmp__B35G)) {
-        result__525G=(__INTEGER)((__INTEGER)( 5 * result__525G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__A35G->storage__JQO)[(__INTEGER)(Self__C35G -  1)])));
-        Self__C35G=(__INTEGER)(Self__C35G +  1);
-      };
-      if ((result__525G <  0)) {
-        result__525G=(__INTEGER)(~ result__525G);
-      };
-      result__ZCQF=result__525G;
-      __tmp__KDQF=TRUE__;
-    } else {
-      __tmp__KDQF=FALSE__;
-    };
-    if ((! __tmp__KDQF)) {
-      if (((void *)((void **)Self__XCQF->parent_arrayed_collection__14I.storage__FCPD)[ 0] != (void *)NULL)) {
-        Self__F35G=((__STRING_CONSTANT *)((void **)Self__XCQF->parent_arrayed_collection__14I.storage__FCPD)[ 0]);
-        result__E35G= 0;
-        __tmp__G35G=Self__F35G->count__DD;
-        Self__H35G= 1;
-        while ((Self__H35G <= __tmp__G35G)) {
-          result__E35G=(__INTEGER)((__INTEGER)( 5 * result__E35G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__F35G->storage__JQO)[(__INTEGER)(Self__H35G -  1)])));
-          Self__H35G=(__INTEGER)(Self__H35G +  1);
-        };
-        if ((result__E35G <  0)) {
-          result__E35G=(__INTEGER)(~ result__E35G);
-        };
-        result__ZCQF=result__E35G;
-      };
-    };
-  };
-  return(result__ZCQF);
+  __INTEGER result__GNQF,result__LJGH,__tmp__NJGH,Self__OJGH;
+  __INTEGER result__QJGH,__tmp__SJGH,Self__TJGH;
+  __STRING_CONSTANT *Self__MJGH,*Self__RJGH;
+  __BOOLEAN __tmp__XNQF;
+  result__GNQF= 0;
+  if ((! (Self__ENQF->parent_arrayed_collection__H5I.upper__15OD <  0))) {
+    if (((void *)((void **)Self__ENQF->parent_arrayed_collection__H5I.storage__RCPD)[Self__ENQF->parent_arrayed_collection__H5I.upper__15OD] != (void *)NULL)) {
+      Self__MJGH=((__STRING_CONSTANT *)((void **)Self__ENQF->parent_arrayed_collection__H5I.storage__RCPD)[Self__ENQF->parent_arrayed_collection__H5I.upper__15OD]);
+      result__LJGH= 0;
+      __tmp__NJGH=Self__MJGH->count__DD;
+      Self__OJGH= 1;
+      while ((Self__OJGH <= __tmp__NJGH)) {
+        result__LJGH=(__INTEGER)((__INTEGER)( 5 * result__LJGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MJGH->storage__VQO)[(__INTEGER)(Self__OJGH -  1)])));
+        Self__OJGH=(__INTEGER)(Self__OJGH +  1);
+      };
+      if ((result__LJGH <  0)) {
+        result__LJGH=(__INTEGER)(~ result__LJGH);
+      };
+      result__GNQF=result__LJGH;
+      __tmp__XNQF=TRUE__;
+    } else {
+      __tmp__XNQF=FALSE__;
+    };
+    if ((! __tmp__XNQF)) {
+      if (((void *)((void **)Self__ENQF->parent_arrayed_collection__H5I.storage__RCPD)[ 0] != (void *)NULL)) {
+        Self__RJGH=((__STRING_CONSTANT *)((void **)Self__ENQF->parent_arrayed_collection__H5I.storage__RCPD)[ 0]);
+        result__QJGH= 0;
+        __tmp__SJGH=Self__RJGH->count__DD;
+        Self__TJGH= 1;
+        while ((Self__TJGH <= __tmp__SJGH)) {
+          result__QJGH=(__INTEGER)((__INTEGER)( 5 * result__QJGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RJGH->storage__VQO)[(__INTEGER)(Self__TJGH -  1)])));
+          Self__TJGH=(__INTEGER)(Self__TJGH +  1);
+        };
+        if ((result__QJGH <  0)) {
+          result__QJGH=(__INTEGER)(~ result__QJGH);
+        };
+        result__GNQF=result__QJGH;
+      };
+    };
+  };
+  return(result__GNQF);
 }
 
-static void copy__Q2RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__R2RD,void *other__S2RD)
+static void copy__22RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__32RD,void *other__42RD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__U2RD,other_upper__T2RD,Self__VDXE;
-  void **__tmp__H3RD,**__tmp__J3RD,**Self__3IVE;
-  new_capacity__U2RD= 0;
-  other_upper__T2RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__S2RD)->parent_arrayed_collection__14I.upper__P5OD;
-  if ((other_upper__T2RD >=  0)) {
-    new_capacity__U2RD=(__INTEGER)(other_upper__T2RD +  1);
-    if ((Self__R2RD->parent_arrayed_collection__14I.capacity__KBPD < new_capacity__U2RD)) {
-      Self__R2RD->parent_arrayed_collection__14I.storage__FCPD=create__G0GE(new_capacity__U2RD);
-      Self__R2RD->parent_arrayed_collection__14I.capacity__KBPD=new_capacity__U2RD;
-    };
-    __tmp__H3RD=Self__R2RD->parent_arrayed_collection__14I.storage__FCPD;
-    __tmp__J3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__S2RD)->parent_arrayed_collection__14I.storage__FCPD;
-    Self__3IVE=((void **)__tmp__H3RD);
-    Self__VDXE=other_upper__T2RD;
-    while ((Self__VDXE >=  0)) {
-      Self__3IVE[Self__VDXE]=((void **)__tmp__J3RD)[Self__VDXE];
-      Self__VDXE=(__INTEGER)(Self__VDXE -  1);
-    };
-  };
-  Self__R2RD->parent_arrayed_collection__14I.upper__P5OD=other_upper__T2RD;
+  __INTEGER new_capacity__A3RD,other_upper__52RD,Self__YWXE;
+  void **__tmp__T3RD,**__tmp__V3RD,**Self__TXVE;
+  new_capacity__A3RD= 0;
+  other_upper__52RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__42RD)->parent_arrayed_collection__H5I.upper__15OD;
+  if ((other_upper__52RD >=  0)) {
+    new_capacity__A3RD=(__INTEGER)(other_upper__52RD +  1);
+    if ((Self__32RD->parent_arrayed_collection__H5I.capacity__WBPD < new_capacity__A3RD)) {
+      Self__32RD->parent_arrayed_collection__H5I.storage__RCPD=create__PHHE(new_capacity__A3RD);
+      Self__32RD->parent_arrayed_collection__H5I.capacity__WBPD=new_capacity__A3RD;
+    };
+    __tmp__T3RD=Self__32RD->parent_arrayed_collection__H5I.storage__RCPD;
+    __tmp__V3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__42RD)->parent_arrayed_collection__H5I.storage__RCPD;
+    Self__TXVE=((void **)__tmp__T3RD);
+    Self__YWXE=other_upper__52RD;
+    while ((Self__YWXE >=  0)) {
+      Self__TXVE[Self__YWXE]=((void **)__tmp__V3RD)[Self__YWXE];
+      Self__YWXE=(__INTEGER)(Self__YWXE -  1);
+    };
+  };
+  Self__32RD->parent_arrayed_collection__H5I.upper__15OD=other_upper__52RD;
 }
 
-static __BOOLEAN read_operator__1MM()
+static __BOOLEAN read_operator__HNM()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER old_pos__5MM,__tmp__NQO,i__H4O;
-  __POSITION pos__Z4RG;
-  __BOOLEAN result__4MM,__tmp__0NM;
-  __CHARACTER result__MFZG,result__NFZG,ch__HQO,result__OFZG;
-  __CHARACTER *__tmp__KQO,*Self__13O;
-  result__4MM=FALSE__;
-  read_space__RRD();
-  old_pos__5MM=position__GBC;
-  ((__STRING *)string_tmp__VH)->count__KFC= 0;
-  until_do__PYM:
+  __INTEGER old_pos__LNM,__tmp__ZQO,i__T4O;
+  __POSITION pos__3QXG;
+  __BOOLEAN result__KNM,__tmp__GOM;
+  __CHARACTER result__KJ5G,result__TJ5G,ch__TQO,result__YJ5G;
+  __CHARACTER *__tmp__WQO,*Self__H4O;
+  result__KNM=FALSE__;
+  read_space__3RD();
+  old_pos__LNM=position__SBC;
+  ((__STRING *)string_tmp__VH)->count__WFC= 0;
+  until_do__1YM:
   {
-    result__MFZG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__MFZG=((__CHARACTER )(( 0)));
+    result__KJ5G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__KJ5G=((__CHARACTER )(( 0)));
     } else {
-      result__MFZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__KJ5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__MFZG == ((__CHARACTER )(( 0))))) {
-      __tmp__0NM=TRUE__;
+    if ((result__KJ5G == ((__CHARACTER )(( 0))))) {
+      __tmp__GOM=TRUE__;
     } else {
-      result__NFZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__NFZG=((__CHARACTER )(( 0)));
+      result__TJ5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__TJ5G=((__CHARACTER )(( 0)));
       } else {
-        result__NFZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__TJ5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      ch__HQO=result__NFZG;
-      __tmp__KQO=((__STRING_CONSTANT *)(&__string_302))->storage__JQO;
-      __tmp__NQO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_302))->count__DD -  1);
-      Self__13O=((__CHARACTER *)__tmp__KQO);
-      i__H4O=__tmp__NQO;
-      while ((! ((i__H4O <  0) || (ch__HQO == Self__13O[i__H4O])))) {
-        i__H4O=(__INTEGER)(i__H4O -  1);
+      ch__TQO=result__TJ5G;
+      __tmp__WQO=((__STRING_CONSTANT *)(&__string_312))->storage__VQO;
+      __tmp__ZQO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_312))->count__DD -  1);
+      Self__H4O=((__CHARACTER *)__tmp__WQO);
+      i__T4O=__tmp__ZQO;
+      while ((! ((i__T4O <  0) || (ch__TQO == Self__H4O[i__T4O])))) {
+        i__T4O=(__INTEGER)(i__T4O -  1);
       };
-      __tmp__0NM=(i__H4O <  0);
+      __tmp__GOM=(i__T4O <  0);
     };
-    if ((! __tmp__0NM)) {
-      result__OFZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__OFZG=((__CHARACTER )(( 0)));
+    if ((! __tmp__GOM)) {
+      result__YJ5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__YJ5G=((__CHARACTER )(( 0)));
       } else {
-        result__OFZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__YJ5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      add_last__NLT(string_tmp__VH,result__OFZG);
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      goto until_do__PYM;
+      add_last__ZLT(string_tmp__VH,result__YJ5G);
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      goto until_do__1YM;
     };
   };
-  if ((((__STRING *)string_tmp__VH)->count__KFC !=  0)) {
-    last_string__2ZC=get__2VB(string_tmp__VH);
-    if (((((void *)last_string__2ZC == (void *)(&__string_12)) || ((void *)last_string__2ZC == (void *)(&__string_14))) || ((void *)last_string__2ZC == (void *)(&__string_13)))) {
-      pos__Z4RG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_272));
-      put_position__IOG(pos__Z4RG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  if ((((__STRING *)string_tmp__VH)->count__WFC !=  0)) {
+    last_string__I0C=get__IWB(string_tmp__VH);
+    if (((((void *)last_string__I0C == (void *)(&__string_12)) || ((void *)last_string__I0C == (void *)(&__string_14))) || ((void *)last_string__I0C == (void *)(&__string_13)))) {
+      pos__3QXG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_282));
+      put_position__UOG(pos__3QXG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    short__token__to__5AD((&__string_124),old_pos__5MM,position__GBC);
-    result__4MM=TRUE__;
+    short__token__to__LBD((&__string_124),old_pos__LNM,position__SBC);
+    result__KNM=TRUE__;
   };
-  return(result__4MM);
+  return(result__KNM);
 }
 
-static void* operator__name__RDO(void *typ__TDO,void *op__UDO)
+static void* operator__name__3DO(void *typ__5DO,void *op__AEO)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__1DO,Self__CWO;
-  __CHARACTER c__WDO;
-  __BOOLEAN __tmp__JEO,__tmp__WEO,result__XPHB,__tmp__DFO,result__JQHB;
-  __BOOLEAN __tmp__QFO,result__1QHB,__tmp__3FO,result__NRHB,__tmp__KGO;
-  __BOOLEAN result__5RHB,__tmp__XGO,result__RSHB,__tmp__EHO;
-  __BOOLEAN result__DTHB,__tmp__RHO,result__VTHB,__tmp__4HO;
-  __BOOLEAN result__HUHB,__tmp__LIO,result__ZUHB,__tmp__YIO;
-  __BOOLEAN result__LVHB,__tmp__FJO,result__3VHB,__tmp__SJO;
-  __BOOLEAN result__PWHB,__tmp__5JO,result__BXHB,__tmp__MKO;
-  __BOOLEAN result__TXHB,__tmp__ZKO,result__FYHB;
-  c__WDO='\0';
-  copy__NCS(string_tmp__VH,typ__TDO);
-  __tmp__1DO=((__STRING_CONSTANT *)op__UDO)->count__DD;
-  Self__CWO= 1;
-  while ((Self__CWO <= __tmp__1DO)) {
-    c__WDO=((__CHARACTER *)((__STRING_CONSTANT *)op__UDO)->storage__JQO)[(__INTEGER)(Self__CWO -  1)];
-    if ((c__WDO == '+')) {
-      append__VNS(string_tmp__VH,(&__string_175));
-      __tmp__JEO=TRUE__;
+  __INTEGER __tmp__HEO,Self__OWO;
+  __CHARACTER c__CEO;
+  __BOOLEAN __tmp__VEO,__tmp__CFO,result__DQHB,__tmp__PFO,result__VQHB;
+  __BOOLEAN __tmp__2FO,result__HRHB,__tmp__JGO,result__ZRHB,__tmp__WGO;
+  __BOOLEAN result__LSHB,__tmp__DHO,result__3SHB,__tmp__QHO;
+  __BOOLEAN result__PTHB,__tmp__3HO,result__BUHB,__tmp__KIO;
+  __BOOLEAN result__TUHB,__tmp__XIO,result__FVHB,__tmp__EJO;
+  __BOOLEAN result__XVHB,__tmp__RJO,result__JWHB,__tmp__4JO;
+  __BOOLEAN result__1WHB,__tmp__LKO,result__NXHB,__tmp__YKO;
+  __BOOLEAN result__5XHB,__tmp__FLO,result__RYHB;
+  c__CEO='\0';
+  copy__ZCS(string_tmp__VH,typ__5DO);
+  __tmp__HEO=((__STRING_CONSTANT *)op__AEO)->count__DD;
+  Self__OWO= 1;
+  while ((Self__OWO <= __tmp__HEO)) {
+    c__CEO=((__CHARACTER *)((__STRING_CONSTANT *)op__AEO)->storage__VQO)[(__INTEGER)(Self__OWO -  1)];
+    if ((c__CEO == '+')) {
+      append__BOS(string_tmp__VH,(&__string_185));
+      __tmp__VEO=TRUE__;
     } else {
-      __tmp__JEO=FALSE__;
+      __tmp__VEO=FALSE__;
     };
-    if (__tmp__JEO) {
-      __tmp__WEO=TRUE__;
+    if (__tmp__VEO) {
+      __tmp__CFO=TRUE__;
     } else {
-      result__XPHB=(c__WDO == '-');
-      if (result__XPHB) {
-        append__VNS(string_tmp__VH,(&__string_176));
+      result__DQHB=(c__CEO == '-');
+      if (result__DQHB) {
+        append__BOS(string_tmp__VH,(&__string_186));
       };
-      __tmp__WEO=result__XPHB;
+      __tmp__CFO=result__DQHB;
     };
-    if (__tmp__WEO) {
-      __tmp__DFO=TRUE__;
+    if (__tmp__CFO) {
+      __tmp__PFO=TRUE__;
     } else {
-      result__JQHB=(c__WDO == '~');
-      if (result__JQHB) {
-        append__VNS(string_tmp__VH,(&__string_177));
+      result__VQHB=(c__CEO == '~');
+      if (result__VQHB) {
+        append__BOS(string_tmp__VH,(&__string_187));
       };
-      __tmp__DFO=result__JQHB;
+      __tmp__PFO=result__VQHB;
     };
-    if (__tmp__DFO) {
-      __tmp__QFO=TRUE__;
+    if (__tmp__PFO) {
+      __tmp__2FO=TRUE__;
     } else {
-      result__1QHB=(c__WDO == '!');
-      if (result__1QHB) {
-        append__VNS(string_tmp__VH,(&__string_178));
+      result__HRHB=(c__CEO == '!');
+      if (result__HRHB) {
+        append__BOS(string_tmp__VH,(&__string_188));
       };
-      __tmp__QFO=result__1QHB;
+      __tmp__2FO=result__HRHB;
     };
-    if (__tmp__QFO) {
-      __tmp__3FO=TRUE__;
+    if (__tmp__2FO) {
+      __tmp__JGO=TRUE__;
     } else {
-      result__NRHB=(c__WDO == '/');
-      if (result__NRHB) {
-        append__VNS(string_tmp__VH,(&__string_179));
+      result__ZRHB=(c__CEO == '/');
+      if (result__ZRHB) {
+        append__BOS(string_tmp__VH,(&__string_189));
       };
-      __tmp__3FO=result__NRHB;
+      __tmp__JGO=result__ZRHB;
     };
-    if (__tmp__3FO) {
-      __tmp__KGO=TRUE__;
+    if (__tmp__JGO) {
+      __tmp__WGO=TRUE__;
     } else {
-      result__5RHB=(c__WDO == '*');
-      if (result__5RHB) {
-        append__VNS(string_tmp__VH,(&__string_180));
+      result__LSHB=(c__CEO == '*');
+      if (result__LSHB) {
+        append__BOS(string_tmp__VH,(&__string_190));
       };
-      __tmp__KGO=result__5RHB;
+      __tmp__WGO=result__LSHB;
     };
-    if (__tmp__KGO) {
-      __tmp__XGO=TRUE__;
+    if (__tmp__WGO) {
+      __tmp__DHO=TRUE__;
     } else {
-      result__RSHB=(c__WDO == '^');
-      if (result__RSHB) {
-        append__VNS(string_tmp__VH,(&__string_181));
+      result__3SHB=(c__CEO == '^');
+      if (result__3SHB) {
+        append__BOS(string_tmp__VH,(&__string_191));
       };
-      __tmp__XGO=result__RSHB;
+      __tmp__DHO=result__3SHB;
     };
-    if (__tmp__XGO) {
-      __tmp__EHO=TRUE__;
+    if (__tmp__DHO) {
+      __tmp__QHO=TRUE__;
     } else {
-      result__DTHB=(c__WDO == '%');
-      if (result__DTHB) {
-        append__VNS(string_tmp__VH,(&__string_182));
+      result__PTHB=(c__CEO == '%');
+      if (result__PTHB) {
+        append__BOS(string_tmp__VH,(&__string_192));
       };
-      __tmp__EHO=result__DTHB;
+      __tmp__QHO=result__PTHB;
     };
-    if (__tmp__EHO) {
-      __tmp__RHO=TRUE__;
+    if (__tmp__QHO) {
+      __tmp__3HO=TRUE__;
     } else {
-      result__VTHB=(c__WDO == '>');
-      if (result__VTHB) {
-        append__VNS(string_tmp__VH,(&__string_183));
+      result__BUHB=(c__CEO == '>');
+      if (result__BUHB) {
+        append__BOS(string_tmp__VH,(&__string_193));
       };
-      __tmp__RHO=result__VTHB;
+      __tmp__3HO=result__BUHB;
     };
-    if (__tmp__RHO) {
-      __tmp__4HO=TRUE__;
+    if (__tmp__3HO) {
+      __tmp__KIO=TRUE__;
     } else {
-      result__HUHB=(c__WDO == '<');
-      if (result__HUHB) {
-        append__VNS(string_tmp__VH,(&__string_184));
+      result__TUHB=(c__CEO == '<');
+      if (result__TUHB) {
+        append__BOS(string_tmp__VH,(&__string_194));
       };
-      __tmp__4HO=result__HUHB;
+      __tmp__KIO=result__TUHB;
     };
-    if (__tmp__4HO) {
-      __tmp__LIO=TRUE__;
+    if (__tmp__KIO) {
+      __tmp__XIO=TRUE__;
     } else {
-      result__ZUHB=(c__WDO == '=');
-      if (result__ZUHB) {
-        append__VNS(string_tmp__VH,(&__string_185));
+      result__FVHB=(c__CEO == '=');
+      if (result__FVHB) {
+        append__BOS(string_tmp__VH,(&__string_195));
       };
-      __tmp__LIO=result__ZUHB;
+      __tmp__XIO=result__FVHB;
     };
-    if (__tmp__LIO) {
-      __tmp__YIO=TRUE__;
+    if (__tmp__XIO) {
+      __tmp__EJO=TRUE__;
     } else {
-      result__LVHB=(c__WDO == '\\');
-      if (result__LVHB) {
-        append__VNS(string_tmp__VH,(&__string_186));
+      result__XVHB=(c__CEO == '\\');
+      if (result__XVHB) {
+        append__BOS(string_tmp__VH,(&__string_196));
       };
-      __tmp__YIO=result__LVHB;
+      __tmp__EJO=result__XVHB;
     };
-    if (__tmp__YIO) {
-      __tmp__FJO=TRUE__;
+    if (__tmp__EJO) {
+      __tmp__RJO=TRUE__;
     } else {
-      result__3VHB=(c__WDO == '|');
-      if (result__3VHB) {
-        append__VNS(string_tmp__VH,(&__string_187));
+      result__JWHB=(c__CEO == '|');
+      if (result__JWHB) {
+        append__BOS(string_tmp__VH,(&__string_197));
       };
-      __tmp__FJO=result__3VHB;
+      __tmp__RJO=result__JWHB;
     };
-    if (__tmp__FJO) {
-      __tmp__SJO=TRUE__;
+    if (__tmp__RJO) {
+      __tmp__4JO=TRUE__;
     } else {
-      result__PWHB=(c__WDO == '&');
-      if (result__PWHB) {
-        append__VNS(string_tmp__VH,(&__string_188));
+      result__1WHB=(c__CEO == '&');
+      if (result__1WHB) {
+        append__BOS(string_tmp__VH,(&__string_198));
       };
-      __tmp__SJO=result__PWHB;
+      __tmp__4JO=result__1WHB;
     };
-    if (__tmp__SJO) {
-      __tmp__5JO=TRUE__;
+    if (__tmp__4JO) {
+      __tmp__LKO=TRUE__;
     } else {
-      result__BXHB=(c__WDO == '$');
-      if (result__BXHB) {
-        append__VNS(string_tmp__VH,(&__string_189));
+      result__NXHB=(c__CEO == '$');
+      if (result__NXHB) {
+        append__BOS(string_tmp__VH,(&__string_199));
       };
-      __tmp__5JO=result__BXHB;
+      __tmp__LKO=result__NXHB;
     };
-    if (__tmp__5JO) {
-      __tmp__MKO=TRUE__;
+    if (__tmp__LKO) {
+      __tmp__YKO=TRUE__;
     } else {
-      result__TXHB=(c__WDO == '#');
-      if (result__TXHB) {
-        append__VNS(string_tmp__VH,(&__string_190));
+      result__5XHB=(c__CEO == '#');
+      if (result__5XHB) {
+        append__BOS(string_tmp__VH,(&__string_200));
       };
-      __tmp__MKO=result__TXHB;
+      __tmp__YKO=result__5XHB;
     };
-    if (__tmp__MKO) {
-      __tmp__ZKO=TRUE__;
+    if (__tmp__YKO) {
+      __tmp__FLO=TRUE__;
     } else {
-      result__FYHB=(c__WDO == '@');
-      if (result__FYHB) {
-        append__VNS(string_tmp__VH,(&__string_191));
+      result__RYHB=(c__CEO == '@');
+      if (result__RYHB) {
+        append__BOS(string_tmp__VH,(&__string_201));
       };
-      __tmp__ZKO=result__FYHB;
+      __tmp__FLO=result__RYHB;
     };
-    if ((! __tmp__ZKO)) {
-      if ((c__WDO == '?')) {
-        append__VNS(string_tmp__VH,(&__string_192));
+    if ((! __tmp__FLO)) {
+      if ((c__CEO == '?')) {
+        append__BOS(string_tmp__VH,(&__string_202));
       };
     };
-    Self__CWO=(__INTEGER)(Self__CWO +  1);
+    Self__OWO=(__INTEGER)(Self__OWO +  1);
   };
-  return(get__2VB(string_tmp__VH));
+  return(get__IWB(string_tmp__VH));
 }
 
-static void append_in__GIBC(__ITM_TYPE_MULTI *Self__HIBC,void *buffer__IIBC)
+static void append_in__SIBC(__ITM_TYPE_MULTI *Self__TIBC,void *buffer__UIBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__NLT(buffer__IIBC,'(');
-  display_raw__HLIC(Self__HIBC,buffer__IIBC);
-  add_last__NLT(buffer__IIBC,')');
+  add_last__ZLT(buffer__UIBC,'(');
+  display_raw__TLIC(Self__TIBC,buffer__UIBC);
+  add_last__ZLT(buffer__UIBC,')');
 }
 
-static void append_in__CGPD(__ITM_TYPE_BLOCK *Self__DGPD,void *buffer__EGPD)
+static void append_in__OGPD(__ITM_TYPE_BLOCK *Self__PGPD,void *buffer__QGPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *typ_mul__FGPD,*__tmp__XGPD;
-  void *__tmp__MGPD,*__tmp__WGPD,*__tmp__3GPD;
-  __ITM_TYPE_STYLE *Self__CN4G,*Self__EN4G;
-  typ_mul__FGPD=NULL;
-  add_last__NLT(buffer__EGPD,'{');
-  if (((void *)Self__DGPD->type_argument__KMN != (void *)NULL)) {
-    __tmp__MGPD=Self__DGPD->type_argument__KMN;
-    switch (((struct ___OBJ *)__tmp__MGPD)->__id) {
+  void *typ_mul__RGPD,*__tmp__DHPD;
+  void *__tmp__YGPD,*__tmp__CHPD,*__tmp__JHPD;
+  __ITM_TYPE_STYLE *Self__XYEH,*Self__ZYEH;
+  typ_mul__RGPD=NULL;
+  add_last__ZLT(buffer__QGPD,'{');
+  if (((void *)Self__PGPD->type_argument__WMN != (void *)NULL)) {
+    __tmp__YGPD=Self__PGPD->type_argument__WMN;
+    switch (((struct ___OBJ *)__tmp__YGPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__VNS(buffer__EGPD,((__ITM_TYPE_PARAMETER *)__tmp__MGPD)->parent_itm_type__RDE.name__4XP);
+      append__BOS(buffer__QGPD,((__ITM_TYPE_PARAMETER *)__tmp__YGPD)->parent_itm_type__3DE.name__KYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__VNS(buffer__EGPD,((__ITM_TYPE_SIMPLE *)__tmp__MGPD)->name__4XP);
+      append__BOS(buffer__QGPD,((__ITM_TYPE_SIMPLE *)__tmp__YGPD)->name__KYP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__GIBC(__tmp__MGPD,buffer__EGPD);
+      append_in__SIBC(__tmp__YGPD,buffer__QGPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__CGPD(__tmp__MGPD,buffer__EGPD);
+      append_in__OGPD(__tmp__YGPD,buffer__QGPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__GHPD(__tmp__MGPD,buffer__EGPD);
+      append_in__SHPD(__tmp__YGPD,buffer__QGPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__CN4G=((__ITM_TYPE_STYLE *)__tmp__MGPD);
-      if (((void *)Self__CN4G->style__HYP != (void *)NULL)) {
-        append__VNS(buffer__EGPD,Self__CN4G->style__HYP);
-        add_last__NLT(buffer__EGPD,' ');
+      Self__XYEH=((__ITM_TYPE_STYLE *)__tmp__YGPD);
+      if (((void *)Self__XYEH->style__TYP != (void *)NULL)) {
+        append__BOS(buffer__QGPD,Self__XYEH->style__TYP);
+        add_last__ZLT(buffer__QGPD,' ');
       };
-      append__VNS(buffer__EGPD,Self__CN4G->parent_itm_type_simple__VRN.name__4XP);
+      append__BOS(buffer__QGPD,Self__XYEH->parent_itm_type_simple__BSN.name__KYP);
     } break;
     };
-    add_last__NLT(buffer__EGPD,';');
-    add_last__NLT(buffer__EGPD,' ');
+    add_last__ZLT(buffer__QGPD,';');
+    add_last__ZLT(buffer__QGPD,' ');
   };
-  if (((void *)Self__DGPD->type_result__UMN != (void *)NULL)) {
-    __tmp__WGPD=Self__DGPD->type_result__UMN;
-    if (__tmp__WGPD==NULL) {
-      __tmp__XGPD=NULL;
+  if (((void *)Self__PGPD->type_result__ANN != (void *)NULL)) {
+    __tmp__CHPD=Self__PGPD->type_result__ANN;
+    if (__tmp__CHPD==NULL) {
+      __tmp__DHPD=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__WGPD)->__id) {
+      switch (((struct ___OBJ *)__tmp__CHPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__XGPD=NULL;
+        __tmp__DHPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__XGPD=NULL;
+        __tmp__DHPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__XGPD=((void *)__tmp__WGPD);
+        __tmp__DHPD=((void *)__tmp__CHPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__XGPD=NULL;
+        __tmp__DHPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__XGPD=NULL;
+        __tmp__DHPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__XGPD=NULL;
+        __tmp__DHPD=NULL;
       } break;
       }
     };
-    typ_mul__FGPD=__tmp__XGPD;
-    if (((void *)__tmp__XGPD == (void *)NULL)) {
-      __tmp__3GPD=Self__DGPD->type_result__UMN;
-      switch (((struct ___OBJ *)__tmp__3GPD)->__id) {
+    typ_mul__RGPD=__tmp__DHPD;
+    if (((void *)__tmp__DHPD == (void *)NULL)) {
+      __tmp__JHPD=Self__PGPD->type_result__ANN;
+      switch (((struct ___OBJ *)__tmp__JHPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__VNS(buffer__EGPD,((__ITM_TYPE_PARAMETER *)__tmp__3GPD)->parent_itm_type__RDE.name__4XP);
+        append__BOS(buffer__QGPD,((__ITM_TYPE_PARAMETER *)__tmp__JHPD)->parent_itm_type__3DE.name__KYP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__VNS(buffer__EGPD,((__ITM_TYPE_SIMPLE *)__tmp__3GPD)->name__4XP);
+        append__BOS(buffer__QGPD,((__ITM_TYPE_SIMPLE *)__tmp__JHPD)->name__KYP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__GIBC(__tmp__3GPD,buffer__EGPD);
+        append_in__SIBC(__tmp__JHPD,buffer__QGPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__CGPD(__tmp__3GPD,buffer__EGPD);
+        append_in__OGPD(__tmp__JHPD,buffer__QGPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__GHPD(__tmp__3GPD,buffer__EGPD);
+        append_in__SHPD(__tmp__JHPD,buffer__QGPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__EN4G=((__ITM_TYPE_STYLE *)__tmp__3GPD);
-        if (((void *)Self__EN4G->style__HYP != (void *)NULL)) {
-          append__VNS(buffer__EGPD,Self__EN4G->style__HYP);
-          add_last__NLT(buffer__EGPD,' ');
+        Self__ZYEH=((__ITM_TYPE_STYLE *)__tmp__JHPD);
+        if (((void *)Self__ZYEH->style__TYP != (void *)NULL)) {
+          append__BOS(buffer__QGPD,Self__ZYEH->style__TYP);
+          add_last__ZLT(buffer__QGPD,' ');
         };
-        append__VNS(buffer__EGPD,Self__EN4G->parent_itm_type_simple__VRN.name__4XP);
+        append__BOS(buffer__QGPD,Self__ZYEH->parent_itm_type_simple__BSN.name__KYP);
       } break;
       };
     } else {
-      display_raw__HLIC(__tmp__XGPD,buffer__EGPD);
+      display_raw__TLIC(__tmp__DHPD,buffer__QGPD);
     };
   };
-  add_last__NLT(buffer__EGPD,'}');
+  add_last__ZLT(buffer__QGPD,'}');
 }
 
-static void append_in__GHPD(__ITM_TYPE_GENERIC *Self__HHPD,void *buffer__IHPD)
+static void append_in__SHPD(__ITM_TYPE_GENERIC *Self__THPD,void *buffer__UHPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__ZHPD,Self__DXUD;
-  void *__tmp__AIPD,*__tmp__DIPD;
-  __ITM_TYPE_STYLE *Self__MN4G,*Self__FIPD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__DK2G;
-  if (((void *)Self__HHPD->parent_itm_type_style__WRN.style__HYP != (void *)NULL)) {
-    append__VNS(buffer__IHPD,Self__HHPD->parent_itm_type_style__WRN.style__HYP);
-    add_last__NLT(buffer__IHPD,' ');
-  };
-  append__VNS(buffer__IHPD,Self__HHPD->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP);
-  add_last__NLT(buffer__IHPD,'(');
-  __tmp__ZHPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__HHPD->list_type__RYP)->parent_arrayed_collection__NXC.upper__4HV -  1);
-  Self__DXUD= 0;
-  while ((Self__DXUD <= __tmp__ZHPD)) {
-    __tmp__AIPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__HHPD->list_type__RYP)->parent_arrayed_collection__NXC.storage__FMV)[Self__DXUD];
-    switch (((struct ___OBJ *)__tmp__AIPD)->__id) {
+  __INTEGER __tmp__FIPD,Self__2XUD;
+  void *__tmp__MIPD,*__tmp__PIPD;
+  __ITM_TYPE_STYLE *Self__BZEH,*Self__RIPD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__5VCH;
+  if (((void *)Self__THPD->parent_itm_type_style__CSN.style__TYP != (void *)NULL)) {
+    append__BOS(buffer__UHPD,Self__THPD->parent_itm_type_style__CSN.style__TYP);
+    add_last__ZLT(buffer__UHPD,' ');
+  };
+  append__BOS(buffer__UHPD,Self__THPD->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP);
+  add_last__ZLT(buffer__UHPD,'(');
+  __tmp__FIPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__THPD->list_type__3YP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
+  Self__2XUD= 0;
+  while ((Self__2XUD <= __tmp__FIPD)) {
+    __tmp__MIPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__THPD->list_type__3YP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__2XUD];
+    switch (((struct ___OBJ *)__tmp__MIPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__VNS(buffer__IHPD,((__ITM_TYPE_PARAMETER *)__tmp__AIPD)->parent_itm_type__RDE.name__4XP);
+      append__BOS(buffer__UHPD,((__ITM_TYPE_PARAMETER *)__tmp__MIPD)->parent_itm_type__3DE.name__KYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__VNS(buffer__IHPD,((__ITM_TYPE_SIMPLE *)__tmp__AIPD)->name__4XP);
+      append__BOS(buffer__UHPD,((__ITM_TYPE_SIMPLE *)__tmp__MIPD)->name__KYP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__CGPD(__tmp__AIPD,buffer__IHPD);
+      append_in__OGPD(__tmp__MIPD,buffer__UHPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__GHPD(__tmp__AIPD,buffer__IHPD);
+      append_in__SHPD(__tmp__MIPD,buffer__UHPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__MN4G=((__ITM_TYPE_STYLE *)__tmp__AIPD);
-      if (((void *)Self__MN4G->style__HYP != (void *)NULL)) {
-        append__VNS(buffer__IHPD,Self__MN4G->style__HYP);
-        add_last__NLT(buffer__IHPD,' ');
+      Self__BZEH=((__ITM_TYPE_STYLE *)__tmp__MIPD);
+      if (((void *)Self__BZEH->style__TYP != (void *)NULL)) {
+        append__BOS(buffer__UHPD,Self__BZEH->style__TYP);
+        add_last__ZLT(buffer__UHPD,' ');
       };
-      append__VNS(buffer__IHPD,Self__MN4G->parent_itm_type_simple__VRN.name__4XP);
+      append__BOS(buffer__UHPD,Self__BZEH->parent_itm_type_simple__BSN.name__KYP);
     } break;
     };
-    add_last__NLT(buffer__IHPD,',');
-    Self__DXUD=(__INTEGER)(Self__DXUD +  1);
+    add_last__ZLT(buffer__UHPD,',');
+    Self__2XUD=(__INTEGER)(Self__2XUD +  1);
   };
-  Self__DK2G=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__HHPD->list_type__RYP);
-  __tmp__DIPD=((void **)Self__DK2G->parent_arrayed_collection__NXC.storage__FMV)[Self__DK2G->parent_arrayed_collection__NXC.upper__4HV];
-  switch (((struct ___OBJ *)__tmp__DIPD)->__id) {
+  Self__5VCH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__THPD->list_type__3YP);
+  __tmp__PIPD=((void **)Self__5VCH->parent_arrayed_collection__ZXC.storage__RMV)[Self__5VCH->parent_arrayed_collection__ZXC.upper__KIV];
+  switch (((struct ___OBJ *)__tmp__PIPD)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__VNS(buffer__IHPD,((__ITM_TYPE_PARAMETER *)__tmp__DIPD)->parent_itm_type__RDE.name__4XP);
+    append__BOS(buffer__UHPD,((__ITM_TYPE_PARAMETER *)__tmp__PIPD)->parent_itm_type__3DE.name__KYP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__VNS(buffer__IHPD,((__ITM_TYPE_SIMPLE *)__tmp__DIPD)->name__4XP);
+    append__BOS(buffer__UHPD,((__ITM_TYPE_SIMPLE *)__tmp__PIPD)->name__KYP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__CGPD(__tmp__DIPD,buffer__IHPD);
+    append_in__OGPD(__tmp__PIPD,buffer__UHPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__GHPD(__tmp__DIPD,buffer__IHPD);
+    append_in__SHPD(__tmp__PIPD,buffer__UHPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__FIPD=((__ITM_TYPE_STYLE *)__tmp__DIPD);
-    if (((void *)Self__FIPD->style__HYP != (void *)NULL)) {
-      append__VNS(buffer__IHPD,Self__FIPD->style__HYP);
-      add_last__NLT(buffer__IHPD,' ');
+    Self__RIPD=((__ITM_TYPE_STYLE *)__tmp__PIPD);
+    if (((void *)Self__RIPD->style__TYP != (void *)NULL)) {
+      append__BOS(buffer__UHPD,Self__RIPD->style__TYP);
+      add_last__ZLT(buffer__UHPD,' ');
     };
-    append__VNS(buffer__IHPD,Self__FIPD->parent_itm_type_simple__VRN.name__4XP);
+    append__BOS(buffer__UHPD,Self__RIPD->parent_itm_type_simple__BSN.name__KYP);
   } break;
   };
-  add_last__NLT(buffer__IHPD,')');
+  add_last__ZLT(buffer__UHPD,')');
 }
 
-static void* read_prototype__1NN(__PARSER *Self__2NN,void *styl__3NN)
+static void* read_prototype__HON(__PARSER *Self__ION,void *styl__JON)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *nam__5NN,*n__AXP,*n__QNR;
-  void *result__BON,*result__CUQ;
-  __INTEGER old_pos__DON,old_derive__EON,sav_derive__FON;
-  __INTEGER pos_before__GON,idx__FXP,typ_id__OOIB,new_capacity__1FBB;
-  __INTEGER __tmp__5GBB,__tmp__YOFC,Self__GZVD,typ_id__L35G,idx__UNR;
-  __INTEGER typ_id__Z5IB,new_capacity__CECB,__tmp__GFCB,__tmp__USFC;
-  __INTEGER Self__F1VD;
-  __POSITION pos__TASG,pos__VASG,pos__XASG,pos__ZASG,pos__YCSG;
-  __POSITION __tmp__WSN,__tmp__YTN;
-  __ITM_TYPE_GENERIC *result__EXP,*__tmp__NZP,*result__IOIB,*Self__X1CC;
-  void *__tmp__MZP;
-  __POINTER ptr__JOIB,ptr_table__VVBH,next__UVBH,result__WVBH;
-  __POINTER ptr_table__0VBH,next__ZVBH,result__1VBH,ptr__K35G;
-  __POINTER ptr_table__CWBH,next__BWBH,result__DWBH,ptr_table__HWBH;
-  __POINTER next__GWBH,result__IWBH,ptr__U5IB,ptr_table__MWBH;
-  __POINTER next__LWBH,result__NWBH,ptr_table__RWBH,next__QWBH;
-  __POINTER result__SWBH;
-  __UINTEGER_32 sz__LOIB,a__PN4G,new_size__QN4G,t__UN4G,a__TN4G;
-  __UINTEGER_32 new_size__3VBH,lab_type__2VBH,sz__M35G,a__N35G;
-  __UINTEGER_32 new_size__O35G,t__P35G,a__Q35G,new_size__KWBH;
-  __UINTEGER_32 lab_type__JWBH,sz__W5IB,a__3N4G,new_size__4N4G,t__CO4G;
-  __UINTEGER_32 a__BO4G,new_size__UWBH,lab_type__TWBH;
-  void *result__HK2G;
-  __ITM_TYPE_PARAMETER *result__J35G,*Self__R35G;
-  __ITM_TYPE_STYLE *result__TNR,*__tmp__PPR,*result__T5IB,*Self__J5CC;
-  void *__tmp__OPR;
-  void *genericity__AON,*result__TL5G,*lt__CXP;
-  __BOOLEAN continue__HON,result__LVBH,result__OVBH,__tmp__UUQ;
-  __BOOLEAN result__RVBH,__tmp__JGBB,result__4VBH,__tmp__3SN;
-  __BOOLEAN __tmp__QECB;
-  __CHARACTER result__MVBH,result__PVBH,result__SVBH,result__5VBH;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__UL5G,*Self__VL5G;
-  __FAST_ARRAYoITM_TYPE_GENERICo *Self__ZFBB;
-  void **__tmp__4GBB,**new__EOFC;
-  __FAST_ARRAYoITM_TYPE_STYLEo *Self__AECB;
-  void **__tmp__FFCB,**new__ASFC;
-  nam__5NN=NULL;
-  genericity__AON=NULL;
-  result__BON=NULL;
-  old_pos__DON= 0;
-  old_derive__EON= 0;
-  sav_derive__FON= 0;
-  pos_before__GON= 0;
-  continue__HON=FALSE__;
-  if (read_cap_identifier__GZJ()) {
-    old_pos__DON=position__GBC;
-    old_derive__EON=short_derive__VBC;
-    copy__NCS(string_tmp2__V5I,last_string__2ZC);
+  void *nam__LON,*n__MXP,*n__2NR;
+  void *result__NON,*result__OUQ;
+  __INTEGER old_pos__PON,old_derive__QON,sav_derive__RON;
+  __INTEGER pos_before__SON,idx__RXP,typ_id__0OIB,new_capacity__HGBB;
+  __INTEGER __tmp__LHBB,__tmp__EPFC,Self__5ZVD,typ_id__XJGH,idx__AOR;
+  __INTEGER typ_id__FAJB,new_capacity__OECB,__tmp__SFCB,__tmp__ATFC;
+  __INTEGER Self__41VD;
+  __POSITION pos__XSXG,pos__ZSXG,pos__1SXG,pos__3SXG,pos__2UXG;
+  __POSITION __tmp__CTN,__tmp__EUN;
+  __ITM_TYPE_GENERIC *result__QXP,*__tmp__ZZP,*result__UOIB,*Self__D2CC;
+  void *__tmp__YZP;
+  __POINTER ptr__VOIB,ptr_table__JCIH,next__ICIH,result__KCIH;
+  __POINTER ptr_table__OCIH,next__NCIH,result__PCIH,ptr__WJGH;
+  __POINTER ptr_table__WCIH,next__VCIH,result__XCIH,ptr_table__1CIH;
+  __POINTER next__0CIH,result__2CIH,ptr__AAJB,ptr_table__ADIH;
+  __POINTER next__5CIH,result__BDIH,ptr_table__FDIH,next__EDIH;
+  __POINTER result__GDIH;
+  __UINTEGER_32 sz__XOIB,a__EZEH,new_size__FZEH,t__JZEH,a__IZEH;
+  __UINTEGER_32 new_size__RCIH,lab_type__QCIH,sz__YJGH,a__ZJGH;
+  __UINTEGER_32 new_size__0JGH,t__1JGH,a__2JGH,new_size__4CIH;
+  __UINTEGER_32 lab_type__3CIH,sz__CAJB,a__SZEH,new_size__TZEH,t__XZEH;
+  __UINTEGER_32 a__WZEH,new_size__IDIH,lab_type__HDIH;
+  void *result__DWCH;
+  __ITM_TYPE_PARAMETER *result__VJGH,*Self__3JGH;
+  __ITM_TYPE_STYLE *result__5NR,*__tmp__1PR,*result__55IB,*Self__V5CC;
+  void *__tmp__0PR;
+  void *genericity__MON,*result__5XFH,*lt__OXP;
+  __BOOLEAN continue__TON,result__5BIH,result__CCIH,__tmp__AVQ;
+  __BOOLEAN result__FCIH,__tmp__VGBB,result__SCIH,__tmp__JTN;
+  __BOOLEAN __tmp__2ECB;
+  __CHARACTER result__ACIH,result__DCIH,result__GCIH,result__TCIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__AYFH,*Self__BYFH;
+  __FAST_ARRAYoITM_TYPE_GENERICo *Self__FGBB;
+  void **__tmp__KHBB,**new__QOFC;
+  __FAST_ARRAYoITM_TYPE_STYLEo *Self__MECB;
+  void **__tmp__RFCB,**new__MSFC;
+  nam__LON=NULL;
+  genericity__MON=NULL;
+  result__NON=NULL;
+  old_pos__PON= 0;
+  old_derive__QON= 0;
+  sav_derive__RON= 0;
+  pos_before__SON= 0;
+  continue__TON=FALSE__;
+  if (read_cap_identifier__SZJ()) {
+    old_pos__PON=position__SBC;
+    old_derive__QON=short_derive__BCC;
+    copy__ZCS(string_tmp2__BAJ,last_string__I0C);
     do {
-      continue__HON=read_word__EPF((&__string_7));
-      if (continue__HON) {
-        if ((! read_cap_identifier__GZJ())) {
-          pos__TASG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_303));
-          put_position__IOG(pos__TASG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      continue__TON=read_word__QPF((&__string_7));
+      if (continue__TON) {
+        if ((! read_cap_identifier__SZJ())) {
+          pos__XSXG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_313));
+          put_position__UOG(pos__XSXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        append__VNS(string_tmp2__V5I,(&__string_7));
-        append__VNS(string_tmp2__V5I,last_string__2ZC);
+        append__BOS(string_tmp2__BAJ,(&__string_7));
+        append__BOS(string_tmp2__BAJ,last_string__I0C);
       } else {
-        pos_before__GON=position__GBC;
-        result__LVBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__LVBH=FALSE__;
+        pos_before__SON=position__SBC;
+        result__5BIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__5BIH=FALSE__;
         } else {
-          result__MVBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__MVBH=((__CHARACTER )(( 0)));
+          result__ACIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__ACIH=((__CHARACTER )(( 0)));
           } else {
-            result__MVBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__ACIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__MVBH == '.')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__LVBH=TRUE__;
+          if ((result__ACIH == '.')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__5BIH=TRUE__;
           };
         };
-        if ((result__LVBH && read_cap_identifier__GZJ())) {
-          continue__HON=TRUE__;
-          add_last__NLT(string_tmp2__V5I,'.');
-          append__VNS(string_tmp2__V5I,last_string__2ZC);
+        if ((result__5BIH && read_cap_identifier__SZJ())) {
+          continue__TON=TRUE__;
+          add_last__ZLT(string_tmp2__BAJ,'.');
+          append__BOS(string_tmp2__BAJ,last_string__I0C);
         } else {
-          position__GBC=pos_before__GON;
+          position__SBC=pos_before__SON;
         };
       };
-    } while (continue__HON);
-    nam__5NN=get__2VB(string_tmp2__V5I);
-    result__OVBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__OVBH=FALSE__;
+    } while (continue__TON);
+    nam__LON=get__IWB(string_tmp2__BAJ);
+    result__CCIH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__CCIH=FALSE__;
     } else {
-      result__PVBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__PVBH=((__CHARACTER )(( 0)));
+      result__DCIH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__DCIH=((__CHARACTER )(( 0)));
       } else {
-        result__PVBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__DCIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__PVBH == '(')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__OVBH=TRUE__;
+      if ((result__DCIH == '(')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__CCIH=TRUE__;
       };
     };
-    if (result__OVBH) {
-      result__TL5G=NULL;
-      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP)->parent_arrayed_collection__3TP.upper__ZUV <  0)) {
-        result__TL5G=create_with_capacity__2ER( 16);
+    if (result__CCIH) {
+      result__5XFH=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP)->parent_arrayed_collection__JUP.upper__FVV <  0)) {
+        result__5XFH=create_with_capacity__IFR( 16);
       } else {
-        Self__UL5G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-        result__TL5G=((void **)Self__UL5G->parent_arrayed_collection__3TP.storage__PZV)[Self__UL5G->parent_arrayed_collection__3TP.upper__ZUV];
-        Self__VL5G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__4TP);
-        Self__VL5G->parent_arrayed_collection__3TP.upper__ZUV=(__INTEGER)(Self__VL5G->parent_arrayed_collection__3TP.upper__ZUV -  1);
+        Self__AYFH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+        result__5XFH=((void **)Self__AYFH->parent_arrayed_collection__JUP.storage__1ZV)[Self__AYFH->parent_arrayed_collection__JUP.upper__FVV];
+        Self__BYFH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
+        Self__BYFH->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__BYFH->parent_arrayed_collection__JUP.upper__FVV -  1);
       };
-      genericity__AON=result__TL5G;
+      genericity__MON=result__5XFH;
       do {
-        result__CUQ=read_type__XBM(Self__2NN,FALSE__);
-        if (((void *)result__CUQ == (void *)NULL)) {
-          if (((void *)read_constant__PQO() != (void *)NULL)) {
-            pos__VASG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_304));
-            put_position__IOG(pos__VASG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        result__OUQ=read_type__DCM(Self__ION,FALSE__);
+        if (((void *)result__OUQ == (void *)NULL)) {
+          if (((void *)read_constant__1QO() != (void *)NULL)) {
+            pos__ZSXG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_314));
+            put_position__UOG(pos__ZSXG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
-            __tmp__UUQ=TRUE__;
+            __tmp__AVQ=TRUE__;
           } else {
-            __tmp__UUQ=FALSE__;
+            __tmp__AVQ=FALSE__;
           };
-          if ((! __tmp__UUQ)) {
-            if (read_identifier__55K()) {
-              pos__XASG=current_position__3WF();
-              put_error__text__4MG( 0,(&__string_305));
-              put_position__IOG(pos__XASG);
-              put_string__I1F(msg_err__DNG);
-              if ((type_error__CNG !=  2)) {
+          if ((! __tmp__AVQ)) {
+            if (read_identifier__LAL()) {
+              pos__1SXG=current_position__JXF();
+              put_error__text__KNG( 0,(&__string_315));
+              put_position__UOG(pos__1SXG);
+              put_string__U1F(msg_err__PNG);
+              if ((type_error__ONG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
-        if (((void *)result__CUQ == (void *)NULL)) {
-          pos__ZASG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_245));
-          put_position__IOG(pos__ZASG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (((void *)result__OUQ == (void *)NULL)) {
+          pos__3SXG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_255));
+          put_position__UOG(pos__3SXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__ONV(genericity__AON,result__CUQ);
-        result__RVBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__RVBH=FALSE__;
-        } else {
-          result__SVBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__SVBH=((__CHARACTER )(( 0)));
-          } else {
-            result__SVBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-          };
-          if ((result__SVBH == ',')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__RVBH=TRUE__;
-          };
-        };
-      } while (result__RVBH);
-      genericity__AON=alias__0UP(result__TL5G);
-      n__AXP=nam__5NN;
-      lt__CXP=genericity__AON;
-      result__EXP=NULL;
-      idx__FXP= 0;
-      while (((idx__FXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP)->parent_arrayed_collection__KXP.upper__UXP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP)->parent_arrayed_collection__KXP.storage__SBW)[idx__FXP])->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP != (void *)n__AXP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP)->parent_arrayed_collection__KXP.storage__SBW)[idx__FXP])->parent_itm_type_style__WRN.style__HYP != (void *)styl__3NN)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP)->parent_arrayed_collection__KXP.storage__SBW)[idx__FXP])->list_type__RYP != (void *)lt__CXP)))) {
-        idx__FXP=(__INTEGER)(idx__FXP +  1);
-      };
-      if ((idx__FXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP)->parent_arrayed_collection__KXP.upper__UXP)) {
-        __tmp__MZP=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP)->parent_arrayed_collection__KXP.storage__SBW)[idx__FXP];
-        if (__tmp__MZP==NULL) {
-          __tmp__NZP=NULL;
-        } else {
-          __tmp__NZP=((__ITM_TYPE_GENERIC *)__tmp__MZP);
-        };
-        result__EXP=__tmp__NZP;
-      } else {
-        result__IOIB=NULL;
-        ptr__JOIB=((__POINTER )(NULL));
-        typ_id__OOIB= 0;
-        sz__LOIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
-        if ((sz__LOIB ==  0)) {
-          result__IOIB=ITM_TYPE_GENERIC__;
-        } else {
-          typ_id__OOIB=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__LOIB);
-          if ((typ_id__OOIB == (__INTEGER)(-  1))) {
-            a__PN4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__QN4G=(__UINTEGER_32)((__UINTEGER_32)(sz__LOIB + a__PN4G) & (__UINTEGER_32)(~ a__PN4G));
-            ptr_table__VVBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QN4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__UVBH=((__POINTER )(NULL));
-            result__WVBH=((__POINTER *)ptr_table__VVBH)[ 0];
-            if ((result__WVBH == (void *)NULL)) {
-              result__WVBH=new_lab__ARJ(new_size__QN4G);
-              next__UVBH=(void *)((unsigned long)result__WVBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QN4G)));
-              ((__POINTER *)next__UVBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VVBH)[ 0]=next__UVBH;
+        add_last__0NV(genericity__MON,result__OUQ);
+        result__FCIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__FCIH=FALSE__;
+        } else {
+          result__GCIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__GCIH=((__CHARACTER )(( 0)));
+          } else {
+            result__GCIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          };
+          if ((result__GCIH == ',')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__FCIH=TRUE__;
+          };
+        };
+      } while (result__FCIH);
+      genericity__MON=alias__GVP(result__5XFH);
+      n__MXP=nam__LON;
+      lt__OXP=genericity__MON;
+      result__QXP=NULL;
+      idx__RXP= 0;
+      while (((idx__RXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.upper__AYP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP])->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP != (void *)n__MXP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP])->parent_itm_type_style__CSN.style__TYP != (void *)styl__JON)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP])->list_type__3YP != (void *)lt__OXP)))) {
+        idx__RXP=(__INTEGER)(idx__RXP +  1);
+      };
+      if ((idx__RXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.upper__AYP)) {
+        __tmp__YZP=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP];
+        if (__tmp__YZP==NULL) {
+          __tmp__ZZP=NULL;
+        } else {
+          __tmp__ZZP=((__ITM_TYPE_GENERIC *)__tmp__YZP);
+        };
+        result__QXP=__tmp__ZZP;
+      } else {
+        result__UOIB=NULL;
+        ptr__VOIB=((__POINTER )(NULL));
+        typ_id__0OIB= 0;
+        sz__XOIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
+        if ((sz__XOIB ==  0)) {
+          result__UOIB=ITM_TYPE_GENERIC__;
+        } else {
+          typ_id__0OIB=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XOIB);
+          if ((typ_id__0OIB == (__INTEGER)(-  1))) {
+            a__EZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FZEH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOIB + a__EZEH) & (__UINTEGER_32)(~ a__EZEH));
+            ptr_table__JCIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FZEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ICIH=((__POINTER )(NULL));
+            result__KCIH=((__POINTER *)ptr_table__JCIH)[ 0];
+            if ((result__KCIH == (void *)NULL)) {
+              result__KCIH=new_lab__MRJ(new_size__FZEH);
+              next__ICIH=(void *)((unsigned long)result__KCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FZEH)));
+              ((__POINTER *)next__ICIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JCIH)[ 0]=next__ICIH;
             } else {
-              next__UVBH=((__POINTER *)result__WVBH)[ 0];
-              if ((next__UVBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WVBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__QN4G <<  1)) <=  4096)) {
-                  next__UVBH=(void *)((unsigned long)result__WVBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QN4G)));
+              next__ICIH=((__POINTER *)result__KCIH)[ 0];
+              if ((next__ICIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KCIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FZEH <<  1)) <=  4096)) {
+                  next__ICIH=(void *)((unsigned long)result__KCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FZEH)));
                 } else {
-                  next__UVBH=new_lab__ARJ(new_size__QN4G);
+                  next__ICIH=new_lab__MRJ(new_size__FZEH);
                 };
-                ((__POINTER *)next__UVBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VVBH)[ 0]=next__UVBH;
+                ((__POINTER *)next__ICIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JCIH)[ 0]=next__ICIH;
               } else {
-                ((__POINTER *)result__WVBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__WVBH=next__UVBH;
+                ((__POINTER *)result__KCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ICIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KCIH=next__ICIH;
               };
             };
-            ptr__JOIB=result__WVBH;
-          } else {
-            t__UN4G=((__UINTEGER_32 )typ_id__OOIB);
-            a__TN4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__3VBH=(__UINTEGER_32)((__UINTEGER_32)(sz__LOIB + a__TN4G) & (__UINTEGER_32)(~ a__TN4G));
-            ptr_table__0VBH=((__POINTER )(&(table_type[(t__UN4G)])));
-            lab_type__2VBH=(__UINTEGER_32)(t__UN4G |  1);
-            next__ZVBH=((__POINTER )(NULL));
-            result__1VBH=((__POINTER *)ptr_table__0VBH)[ 0];
-            if ((result__1VBH == (void *)NULL)) {
-              result__1VBH=new_lab__ARJ(lab_type__2VBH);
-              next__ZVBH=(void *)((unsigned long)result__1VBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VBH)));
-              ((__POINTER *)next__ZVBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0VBH)[ 0]=next__ZVBH;
+            ptr__VOIB=result__KCIH;
+          } else {
+            t__JZEH=((__UINTEGER_32 )typ_id__0OIB);
+            a__IZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOIB + a__IZEH) & (__UINTEGER_32)(~ a__IZEH));
+            ptr_table__OCIH=((__POINTER )(&(table_type[(t__JZEH)])));
+            lab_type__QCIH=(__UINTEGER_32)(t__JZEH |  1);
+            next__NCIH=((__POINTER )(NULL));
+            result__PCIH=((__POINTER *)ptr_table__OCIH)[ 0];
+            if ((result__PCIH == (void *)NULL)) {
+              result__PCIH=new_lab__MRJ(lab_type__QCIH);
+              next__NCIH=(void *)((unsigned long)result__PCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RCIH)));
+              ((__POINTER *)next__NCIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OCIH)[ 0]=next__NCIH;
             } else {
-              next__ZVBH=((__POINTER *)result__1VBH)[ 0];
-              if ((next__ZVBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1VBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3VBH <<  1)) <=  4096)) {
-                  next__ZVBH=(void *)((unsigned long)result__1VBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VBH)));
+              next__NCIH=((__POINTER *)result__PCIH)[ 0];
+              if ((next__NCIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PCIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RCIH <<  1)) <=  4096)) {
+                  next__NCIH=(void *)((unsigned long)result__PCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RCIH)));
                 } else {
-                  next__ZVBH=new_lab__ARJ(lab_type__2VBH);
+                  next__NCIH=new_lab__MRJ(lab_type__QCIH);
                 };
-                ((__POINTER *)next__ZVBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0VBH)[ 0]=next__ZVBH;
+                ((__POINTER *)next__NCIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OCIH)[ 0]=next__NCIH;
               } else {
-                ((__POINTER *)result__1VBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__1VBH=next__ZVBH;
+                ((__POINTER *)result__PCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__PCIH=next__NCIH;
               };
             };
-            ptr__JOIB=result__1VBH;
-          };
-          result__IOIB=((__ITM_TYPE_GENERIC *)ptr__JOIB);
-          *(result__IOIB) = *(ITM_TYPE_GENERIC__);
-        };
-        Self__X1CC=((__ITM_TYPE_GENERIC *)result__IOIB);
-        Self__X1CC->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP=nam__5NN;
-        Self__X1CC->parent_itm_type_style__WRN.style__HYP=styl__3NN;
-        Self__X1CC->list_type__RYP=genericity__AON;
-        result__EXP=result__IOIB;
-        Self__ZFBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__LXP);
-        new_capacity__1FBB= 0;
-        if (((__INTEGER)(Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP +  1) <= (__INTEGER)(Self__ZFBB->parent_arrayed_collection__KXP.capacity__HBW -  1))) {
-          Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP=(__INTEGER)(Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP +  1);
-          __tmp__JGBB=TRUE__;
-        } else {
-          __tmp__JGBB=FALSE__;
-        };
-        if ((! __tmp__JGBB)) {
-          if ((Self__ZFBB->parent_arrayed_collection__KXP.capacity__HBW ==  0)) {
-            Self__ZFBB->parent_arrayed_collection__KXP.storage__SBW=create__DSXB( 2);
-            Self__ZFBB->parent_arrayed_collection__KXP.capacity__HBW= 2;
-            Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP= 0;
-          } else {
-            new_capacity__1FBB=(__INTEGER)(Self__ZFBB->parent_arrayed_collection__KXP.capacity__HBW <<  1);
-            __tmp__4GBB=Self__ZFBB->parent_arrayed_collection__KXP.storage__SBW;
-            __tmp__5GBB=Self__ZFBB->parent_arrayed_collection__KXP.capacity__HBW;
-            new__EOFC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__4GBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__5GBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__1FBB * ((__INTEGER )(sizeof(void *)))))));
-            __tmp__YOFC=(__INTEGER)(new_capacity__1FBB -  1);
-            Self__GZVD=__tmp__5GBB;
-            while ((Self__GZVD <= __tmp__YOFC)) {
-              new__EOFC[Self__GZVD]=NULL;
-              Self__GZVD=(__INTEGER)(Self__GZVD +  1);
-            };
-            Self__ZFBB->parent_arrayed_collection__KXP.storage__SBW=new__EOFC;
-            Self__ZFBB->parent_arrayed_collection__KXP.capacity__HBW=new_capacity__1FBB;
-            Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP=(__INTEGER)(Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP +  1);
-          };
-        };
-        ((void **)Self__ZFBB->parent_arrayed_collection__KXP.storage__SBW)[Self__ZFBB->parent_arrayed_collection__KXP.upper__UXP]=result__IOIB;
-      };
-      result__BON=result__EXP;
-      result__4VBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__4VBH=FALSE__;
-      } else {
-        result__5VBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__5VBH=((__CHARACTER )(( 0)));
-        } else {
-          result__5VBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-        };
-        if ((result__5VBH == ')')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__4VBH=TRUE__;
-        };
-      };
-      if ((! result__4VBH)) {
-        pos__YCSG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_248));
-        put_position__IOG(pos__YCSG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+            ptr__VOIB=result__PCIH;
+          };
+          result__UOIB=((__ITM_TYPE_GENERIC *)ptr__VOIB);
+          *(result__UOIB) = *(ITM_TYPE_GENERIC__);
+        };
+        Self__D2CC=((__ITM_TYPE_GENERIC *)result__UOIB);
+        Self__D2CC->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP=nam__LON;
+        Self__D2CC->parent_itm_type_style__CSN.style__TYP=styl__JON;
+        Self__D2CC->list_type__3YP=genericity__MON;
+        result__QXP=result__UOIB;
+        Self__FGBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP);
+        new_capacity__HGBB= 0;
+        if (((__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.upper__AYP +  1) <= (__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW -  1))) {
+          Self__FGBB->parent_arrayed_collection__WXP.upper__AYP=(__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.upper__AYP +  1);
+          __tmp__VGBB=TRUE__;
+        } else {
+          __tmp__VGBB=FALSE__;
+        };
+        if ((! __tmp__VGBB)) {
+          if ((Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW ==  0)) {
+            Self__FGBB->parent_arrayed_collection__WXP.storage__4BW=create__PSXB( 2);
+            Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW= 2;
+            Self__FGBB->parent_arrayed_collection__WXP.upper__AYP= 0;
+          } else {
+            new_capacity__HGBB=(__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW <<  1);
+            __tmp__KHBB=Self__FGBB->parent_arrayed_collection__WXP.storage__4BW;
+            __tmp__LHBB=Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW;
+            new__QOFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__KHBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__LHBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__HGBB * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__EPFC=(__INTEGER)(new_capacity__HGBB -  1);
+            Self__5ZVD=__tmp__LHBB;
+            while ((Self__5ZVD <= __tmp__EPFC)) {
+              new__QOFC[Self__5ZVD]=NULL;
+              Self__5ZVD=(__INTEGER)(Self__5ZVD +  1);
+            };
+            Self__FGBB->parent_arrayed_collection__WXP.storage__4BW=new__QOFC;
+            Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW=new_capacity__HGBB;
+            Self__FGBB->parent_arrayed_collection__WXP.upper__AYP=(__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.upper__AYP +  1);
+          };
+        };
+        ((void **)Self__FGBB->parent_arrayed_collection__WXP.storage__4BW)[Self__FGBB->parent_arrayed_collection__WXP.upper__AYP]=result__UOIB;
+      };
+      result__NON=result__QXP;
+      result__SCIH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__SCIH=FALSE__;
+      } else {
+        result__TCIH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__TCIH=((__CHARACTER )(( 0)));
+        } else {
+          result__TCIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        };
+        if ((result__TCIH == ')')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__SCIH=TRUE__;
+        };
+      };
+      if ((! result__SCIH)) {
+        pos__2UXG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_258));
+        put_position__UOG(pos__2UXG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     } else {
-      if (is_parameter_type__2JE) {
-        if (((void *)styl__3NN != (void *)NULL)) {
-          copy__NCS(string_tmp__VH,(&__string_306));
-          append__VNS(string_tmp__VH,styl__3NN);
-          append__VNS(string_tmp__VH,(&__string_307));
-          __tmp__WSN=current_position__3WF();
-          put_error__text__4MG( 2,string_tmp__VH);
-          put_position__IOG(__tmp__WSN);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (is_parameter_type__IKE) {
+        if (((void *)styl__JON != (void *)NULL)) {
+          copy__ZCS(string_tmp__VH,(&__string_316));
+          append__BOS(string_tmp__VH,styl__JON);
+          append__BOS(string_tmp__VH,(&__string_317));
+          __tmp__CTN=current_position__JXF();
+          put_error__text__KNG( 2,string_tmp__VH);
+          put_position__UOG(__tmp__CTN);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__HK2G=fast_reference_at__M1T(dico__GTI,nam__5NN);
-        if (((void *)result__HK2G == (void *)NULL)) {
-          result__J35G=NULL;
-          ptr__K35G=((__POINTER )(NULL));
-          typ_id__L35G= 0;
-          sz__M35G=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-          if ((sz__M35G ==  0)) {
-            result__J35G=ITM_TYPE_PARAMETER__;
-          } else {
-            typ_id__L35G=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__M35G);
-            if ((typ_id__L35G == (__INTEGER)(-  1))) {
-              a__N35G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__O35G=(__UINTEGER_32)((__UINTEGER_32)(sz__M35G + a__N35G) & (__UINTEGER_32)(~ a__N35G));
-              ptr_table__CWBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O35G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__BWBH=((__POINTER )(NULL));
-              result__DWBH=((__POINTER *)ptr_table__CWBH)[ 0];
-              if ((result__DWBH == (void *)NULL)) {
-                result__DWBH=new_lab__ARJ(new_size__O35G);
-                next__BWBH=(void *)((unsigned long)result__DWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O35G)));
-                ((__POINTER *)next__BWBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CWBH)[ 0]=next__BWBH;
+        result__DWCH=fast_reference_at__Y1T(dico__STI,nam__LON);
+        if (((void *)result__DWCH == (void *)NULL)) {
+          result__VJGH=NULL;
+          ptr__WJGH=((__POINTER )(NULL));
+          typ_id__XJGH= 0;
+          sz__YJGH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+          if ((sz__YJGH ==  0)) {
+            result__VJGH=ITM_TYPE_PARAMETER__;
+          } else {
+            typ_id__XJGH=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YJGH);
+            if ((typ_id__XJGH == (__INTEGER)(-  1))) {
+              a__ZJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__0JGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YJGH + a__ZJGH) & (__UINTEGER_32)(~ a__ZJGH));
+              ptr_table__WCIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0JGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__VCIH=((__POINTER )(NULL));
+              result__XCIH=((__POINTER *)ptr_table__WCIH)[ 0];
+              if ((result__XCIH == (void *)NULL)) {
+                result__XCIH=new_lab__MRJ(new_size__0JGH);
+                next__VCIH=(void *)((unsigned long)result__XCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JGH)));
+                ((__POINTER *)next__VCIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WCIH)[ 0]=next__VCIH;
               } else {
-                next__BWBH=((__POINTER *)result__DWBH)[ 0];
-                if ((next__BWBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DWBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__O35G <<  1)) <=  4096)) {
-                    next__BWBH=(void *)((unsigned long)result__DWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O35G)));
+                next__VCIH=((__POINTER *)result__XCIH)[ 0];
+                if ((next__VCIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XCIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0JGH <<  1)) <=  4096)) {
+                    next__VCIH=(void *)((unsigned long)result__XCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0JGH)));
                   } else {
-                    next__BWBH=new_lab__ARJ(new_size__O35G);
+                    next__VCIH=new_lab__MRJ(new_size__0JGH);
                   };
-                  ((__POINTER *)next__BWBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__CWBH)[ 0]=next__BWBH;
+                  ((__POINTER *)next__VCIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WCIH)[ 0]=next__VCIH;
                 } else {
-                  ((__POINTER *)result__DWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__DWBH=next__BWBH;
+                  ((__POINTER *)result__XCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XCIH=next__VCIH;
                 };
               };
-              ptr__K35G=result__DWBH;
+              ptr__WJGH=result__XCIH;
             } else {
-              t__P35G=((__UINTEGER_32 )typ_id__L35G);
-              a__Q35G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__KWBH=(__UINTEGER_32)((__UINTEGER_32)(sz__M35G + a__Q35G) & (__UINTEGER_32)(~ a__Q35G));
-              ptr_table__HWBH=((__POINTER )(&(table_type[(t__P35G)])));
-              lab_type__JWBH=(__UINTEGER_32)(t__P35G |  1);
-              next__GWBH=((__POINTER )(NULL));
-              result__IWBH=((__POINTER *)ptr_table__HWBH)[ 0];
-              if ((result__IWBH == (void *)NULL)) {
-                result__IWBH=new_lab__ARJ(lab_type__JWBH);
-                next__GWBH=(void *)((unsigned long)result__IWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWBH)));
-                ((__POINTER *)next__GWBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HWBH)[ 0]=next__GWBH;
+              t__1JGH=((__UINTEGER_32 )typ_id__XJGH);
+              a__2JGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__4CIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YJGH + a__2JGH) & (__UINTEGER_32)(~ a__2JGH));
+              ptr_table__1CIH=((__POINTER )(&(table_type[(t__1JGH)])));
+              lab_type__3CIH=(__UINTEGER_32)(t__1JGH |  1);
+              next__0CIH=((__POINTER )(NULL));
+              result__2CIH=((__POINTER *)ptr_table__1CIH)[ 0];
+              if ((result__2CIH == (void *)NULL)) {
+                result__2CIH=new_lab__MRJ(lab_type__3CIH);
+                next__0CIH=(void *)((unsigned long)result__2CIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CIH)));
+                ((__POINTER *)next__0CIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1CIH)[ 0]=next__0CIH;
               } else {
-                next__GWBH=((__POINTER *)result__IWBH)[ 0];
-                if ((next__GWBH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IWBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__KWBH <<  1)) <=  4096)) {
-                    next__GWBH=(void *)((unsigned long)result__IWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWBH)));
+                next__0CIH=((__POINTER *)result__2CIH)[ 0];
+                if ((next__0CIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2CIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4CIH <<  1)) <=  4096)) {
+                    next__0CIH=(void *)((unsigned long)result__2CIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CIH)));
                   } else {
-                    next__GWBH=new_lab__ARJ(lab_type__JWBH);
+                    next__0CIH=new_lab__MRJ(lab_type__3CIH);
                   };
-                  ((__POINTER *)next__GWBH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HWBH)[ 0]=next__GWBH;
+                  ((__POINTER *)next__0CIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1CIH)[ 0]=next__0CIH;
                 } else {
-                  ((__POINTER *)result__IWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IWBH=next__GWBH;
+                  ((__POINTER *)result__2CIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0CIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2CIH=next__0CIH;
                 };
               };
-              ptr__K35G=result__IWBH;
-            };
-            result__J35G=((__ITM_TYPE_PARAMETER *)ptr__K35G);
-            *(result__J35G) = *(ITM_TYPE_PARAMETER__);
-          };
-          Self__R35G=((__ITM_TYPE_PARAMETER *)result__J35G);
-          Self__R35G->parent_itm_type__RDE.name__4XP=nam__5NN;
-          fast_put__to__HOZ(dico__GTI,Self__R35G,nam__5NN);
-          result__HK2G=result__J35G;
-        };
-        result__BON=result__HK2G;
-        __tmp__3SN=TRUE__;
-      } else {
-        __tmp__3SN=FALSE__;
-      };
-      if ((! __tmp__3SN)) {
-        if (((void *)styl__3NN == (void *)NULL)) {
-          result__BON=get__XSI(nam__5NN);
-        } else {
-          if (((void *)nam__5NN == (void *)(&__string_1))) {
-            copy__NCS(string_tmp__VH,(&__string_306));
-            append__VNS(string_tmp__VH,styl__3NN);
-            append__VNS(string_tmp__VH,(&__string_308));
-            __tmp__YTN=current_position__3WF();
-            put_error__text__4MG( 2,string_tmp__VH);
-            put_position__IOG(__tmp__YTN);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+              ptr__WJGH=result__2CIH;
+            };
+            result__VJGH=((__ITM_TYPE_PARAMETER *)ptr__WJGH);
+            *(result__VJGH) = *(ITM_TYPE_PARAMETER__);
+          };
+          Self__3JGH=((__ITM_TYPE_PARAMETER *)result__VJGH);
+          Self__3JGH->parent_itm_type__3DE.name__KYP=nam__LON;
+          fast_put__to__TOZ(dico__STI,Self__3JGH,nam__LON);
+          result__DWCH=result__VJGH;
+        };
+        result__NON=result__DWCH;
+        __tmp__JTN=TRUE__;
+      } else {
+        __tmp__JTN=FALSE__;
+      };
+      if ((! __tmp__JTN)) {
+        if (((void *)styl__JON == (void *)NULL)) {
+          result__NON=get__DTI(nam__LON);
+        } else {
+          if (((void *)nam__LON == (void *)(&__string_1))) {
+            copy__ZCS(string_tmp__VH,(&__string_316));
+            append__BOS(string_tmp__VH,styl__JON);
+            append__BOS(string_tmp__VH,(&__string_318));
+            __tmp__EUN=current_position__JXF();
+            put_error__text__KNG( 2,string_tmp__VH);
+            put_position__UOG(__tmp__EUN);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
-            result__BON=type_self__1TN;
+            result__NON=type_self__HUN;
           } else {
-            n__QNR=nam__5NN;
-            result__TNR=NULL;
-            idx__UNR= 0;
-            while (((idx__UNR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__0NR)->parent_arrayed_collection__ZNR.upper__DOR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__0NR)->parent_arrayed_collection__ZNR.storage__0LW)[idx__UNR])->parent_itm_type_simple__VRN.name__4XP != (void *)n__QNR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__0NR)->parent_arrayed_collection__ZNR.storage__0LW)[idx__UNR])->style__HYP != (void *)styl__3NN)))) {
-              idx__UNR=(__INTEGER)(idx__UNR +  1);
+            n__2NR=nam__LON;
+            result__5NR=NULL;
+            idx__AOR= 0;
+            while (((idx__AOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.upper__POR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.storage__GMW)[idx__AOR])->parent_itm_type_simple__BSN.name__KYP != (void *)n__2NR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.storage__GMW)[idx__AOR])->style__TYP != (void *)styl__JON)))) {
+              idx__AOR=(__INTEGER)(idx__AOR +  1);
             };
-            if ((idx__UNR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__0NR)->parent_arrayed_collection__ZNR.upper__DOR)) {
-              __tmp__OPR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__0NR)->parent_arrayed_collection__ZNR.storage__0LW)[idx__UNR];
-              if (__tmp__OPR==NULL) {
-                __tmp__PPR=NULL;
+            if ((idx__AOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.upper__POR)) {
+              __tmp__0PR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.storage__GMW)[idx__AOR];
+              if (__tmp__0PR==NULL) {
+                __tmp__1PR=NULL;
               } else {
-                __tmp__PPR=((__ITM_TYPE_STYLE *)__tmp__OPR);
+                __tmp__1PR=((__ITM_TYPE_STYLE *)__tmp__0PR);
               };
-              result__TNR=__tmp__PPR;
+              result__5NR=__tmp__1PR;
             } else {
-              result__T5IB=NULL;
-              ptr__U5IB=((__POINTER )(NULL));
-              typ_id__Z5IB= 0;
-              sz__W5IB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
-              if ((sz__W5IB ==  0)) {
-                result__T5IB=ITM_TYPE_STYLE__;
+              result__55IB=NULL;
+              ptr__AAJB=((__POINTER )(NULL));
+              typ_id__FAJB= 0;
+              sz__CAJB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
+              if ((sz__CAJB ==  0)) {
+                result__55IB=ITM_TYPE_STYLE__;
               } else {
-                typ_id__Z5IB=-1;
-                clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__W5IB);
-                if ((typ_id__Z5IB == (__INTEGER)(-  1))) {
-                  a__3N4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__4N4G=(__UINTEGER_32)((__UINTEGER_32)(sz__W5IB + a__3N4G) & (__UINTEGER_32)(~ a__3N4G));
-                  ptr_table__MWBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4N4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                  next__LWBH=((__POINTER )(NULL));
-                  result__NWBH=((__POINTER *)ptr_table__MWBH)[ 0];
-                  if ((result__NWBH == (void *)NULL)) {
-                    result__NWBH=new_lab__ARJ(new_size__4N4G);
-                    next__LWBH=(void *)((unsigned long)result__NWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4N4G)));
-                    ((__POINTER *)next__LWBH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__MWBH)[ 0]=next__LWBH;
+                typ_id__FAJB=-1;
+                clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__CAJB);
+                if ((typ_id__FAJB == (__INTEGER)(-  1))) {
+                  a__SZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__TZEH=(__UINTEGER_32)((__UINTEGER_32)(sz__CAJB + a__SZEH) & (__UINTEGER_32)(~ a__SZEH));
+                  ptr_table__ADIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TZEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__5CIH=((__POINTER )(NULL));
+                  result__BDIH=((__POINTER *)ptr_table__ADIH)[ 0];
+                  if ((result__BDIH == (void *)NULL)) {
+                    result__BDIH=new_lab__MRJ(new_size__TZEH);
+                    next__5CIH=(void *)((unsigned long)result__BDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TZEH)));
+                    ((__POINTER *)next__5CIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__ADIH)[ 0]=next__5CIH;
                   } else {
-                    next__LWBH=((__POINTER *)result__NWBH)[ 0];
-                    if ((next__LWBH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NWBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4N4G <<  1)) <=  4096)) {
-                        next__LWBH=(void *)((unsigned long)result__NWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4N4G)));
+                    next__5CIH=((__POINTER *)result__BDIH)[ 0];
+                    if ((next__5CIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TZEH <<  1)) <=  4096)) {
+                        next__5CIH=(void *)((unsigned long)result__BDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TZEH)));
                       } else {
-                        next__LWBH=new_lab__ARJ(new_size__4N4G);
+                        next__5CIH=new_lab__MRJ(new_size__TZEH);
                       };
-                      ((__POINTER *)next__LWBH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__MWBH)[ 0]=next__LWBH;
+                      ((__POINTER *)next__5CIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ADIH)[ 0]=next__5CIH;
                     } else {
-                      ((__POINTER *)result__NWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__NWBH=next__LWBH;
+                      ((__POINTER *)result__BDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5CIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__BDIH=next__5CIH;
                     };
                   };
-                  ptr__U5IB=result__NWBH;
+                  ptr__AAJB=result__BDIH;
                 } else {
-                  t__CO4G=((__UINTEGER_32 )typ_id__Z5IB);
-                  a__BO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__UWBH=(__UINTEGER_32)((__UINTEGER_32)(sz__W5IB + a__BO4G) & (__UINTEGER_32)(~ a__BO4G));
-                  ptr_table__RWBH=((__POINTER )(&(table_type[(t__CO4G)])));
-                  lab_type__TWBH=(__UINTEGER_32)(t__CO4G |  1);
-                  next__QWBH=((__POINTER )(NULL));
-                  result__SWBH=((__POINTER *)ptr_table__RWBH)[ 0];
-                  if ((result__SWBH == (void *)NULL)) {
-                    result__SWBH=new_lab__ARJ(lab_type__TWBH);
-                    next__QWBH=(void *)((unsigned long)result__SWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UWBH)));
-                    ((__POINTER *)next__QWBH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__RWBH)[ 0]=next__QWBH;
+                  t__XZEH=((__UINTEGER_32 )typ_id__FAJB);
+                  a__WZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__IDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CAJB + a__WZEH) & (__UINTEGER_32)(~ a__WZEH));
+                  ptr_table__FDIH=((__POINTER )(&(table_type[(t__XZEH)])));
+                  lab_type__HDIH=(__UINTEGER_32)(t__XZEH |  1);
+                  next__EDIH=((__POINTER )(NULL));
+                  result__GDIH=((__POINTER *)ptr_table__FDIH)[ 0];
+                  if ((result__GDIH == (void *)NULL)) {
+                    result__GDIH=new_lab__MRJ(lab_type__HDIH);
+                    next__EDIH=(void *)((unsigned long)result__GDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IDIH)));
+                    ((__POINTER *)next__EDIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__FDIH)[ 0]=next__EDIH;
                   } else {
-                    next__QWBH=((__POINTER *)result__SWBH)[ 0];
-                    if ((next__QWBH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SWBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UWBH <<  1)) <=  4096)) {
-                        next__QWBH=(void *)((unsigned long)result__SWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UWBH)));
+                    next__EDIH=((__POINTER *)result__GDIH)[ 0];
+                    if ((next__EDIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IDIH <<  1)) <=  4096)) {
+                        next__EDIH=(void *)((unsigned long)result__GDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IDIH)));
                       } else {
-                        next__QWBH=new_lab__ARJ(lab_type__TWBH);
+                        next__EDIH=new_lab__MRJ(lab_type__HDIH);
                       };
-                      ((__POINTER *)next__QWBH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__RWBH)[ 0]=next__QWBH;
+                      ((__POINTER *)next__EDIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__FDIH)[ 0]=next__EDIH;
                     } else {
-                      ((__POINTER *)result__SWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__SWBH=next__QWBH;
+                      ((__POINTER *)result__GDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__GDIH=next__EDIH;
                     };
                   };
-                  ptr__U5IB=result__SWBH;
+                  ptr__AAJB=result__GDIH;
                 };
-                result__T5IB=((__ITM_TYPE_STYLE *)ptr__U5IB);
-                *(result__T5IB) = *(ITM_TYPE_STYLE__);
+                result__55IB=((__ITM_TYPE_STYLE *)ptr__AAJB);
+                *(result__55IB) = *(ITM_TYPE_STYLE__);
               };
-              Self__J5CC=((__ITM_TYPE_STYLE *)result__T5IB);
-              Self__J5CC->parent_itm_type_simple__VRN.name__4XP=nam__5NN;
-              Self__J5CC->style__HYP=styl__3NN;
-              result__TNR=result__T5IB;
-              Self__AECB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__0NR);
-              new_capacity__CECB= 0;
-              if (((__INTEGER)(Self__AECB->parent_arrayed_collection__ZNR.upper__DOR +  1) <= (__INTEGER)(Self__AECB->parent_arrayed_collection__ZNR.capacity__PLW -  1))) {
-                Self__AECB->parent_arrayed_collection__ZNR.upper__DOR=(__INTEGER)(Self__AECB->parent_arrayed_collection__ZNR.upper__DOR +  1);
-                __tmp__QECB=TRUE__;
+              Self__V5CC=((__ITM_TYPE_STYLE *)result__55IB);
+              Self__V5CC->parent_itm_type_simple__BSN.name__KYP=nam__LON;
+              Self__V5CC->style__TYP=styl__JON;
+              result__5NR=result__55IB;
+              Self__MECB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR);
+              new_capacity__OECB= 0;
+              if (((__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.upper__POR +  1) <= (__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.capacity__1LW -  1))) {
+                Self__MECB->parent_arrayed_collection__FOR.upper__POR=(__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.upper__POR +  1);
+                __tmp__2ECB=TRUE__;
               } else {
-                __tmp__QECB=FALSE__;
+                __tmp__2ECB=FALSE__;
               };
-              if ((! __tmp__QECB)) {
-                if ((Self__AECB->parent_arrayed_collection__ZNR.capacity__PLW ==  0)) {
-                  Self__AECB->parent_arrayed_collection__ZNR.storage__0LW=create__PHYB( 2);
-                  Self__AECB->parent_arrayed_collection__ZNR.capacity__PLW= 2;
-                  Self__AECB->parent_arrayed_collection__ZNR.upper__DOR= 0;
+              if ((! __tmp__2ECB)) {
+                if ((Self__MECB->parent_arrayed_collection__FOR.capacity__1LW ==  0)) {
+                  Self__MECB->parent_arrayed_collection__FOR.storage__GMW=create__1HYB( 2);
+                  Self__MECB->parent_arrayed_collection__FOR.capacity__1LW= 2;
+                  Self__MECB->parent_arrayed_collection__FOR.upper__POR= 0;
                 } else {
-                  new_capacity__CECB=(__INTEGER)(Self__AECB->parent_arrayed_collection__ZNR.capacity__PLW <<  1);
-                  __tmp__FFCB=Self__AECB->parent_arrayed_collection__ZNR.storage__0LW;
-                  __tmp__GFCB=Self__AECB->parent_arrayed_collection__ZNR.capacity__PLW;
-                  new__ASFC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__FFCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__GFCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__CECB * ((__INTEGER )(sizeof(void *)))))));
-                  __tmp__USFC=(__INTEGER)(new_capacity__CECB -  1);
-                  Self__F1VD=__tmp__GFCB;
-                  while ((Self__F1VD <= __tmp__USFC)) {
-                    new__ASFC[Self__F1VD]=NULL;
-                    Self__F1VD=(__INTEGER)(Self__F1VD +  1);
+                  new_capacity__OECB=(__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.capacity__1LW <<  1);
+                  __tmp__RFCB=Self__MECB->parent_arrayed_collection__FOR.storage__GMW;
+                  __tmp__SFCB=Self__MECB->parent_arrayed_collection__FOR.capacity__1LW;
+                  new__MSFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__RFCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__SFCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OECB * ((__INTEGER )(sizeof(void *)))))));
+                  __tmp__ATFC=(__INTEGER)(new_capacity__OECB -  1);
+                  Self__41VD=__tmp__SFCB;
+                  while ((Self__41VD <= __tmp__ATFC)) {
+                    new__MSFC[Self__41VD]=NULL;
+                    Self__41VD=(__INTEGER)(Self__41VD +  1);
                   };
-                  Self__AECB->parent_arrayed_collection__ZNR.storage__0LW=new__ASFC;
-                  Self__AECB->parent_arrayed_collection__ZNR.capacity__PLW=new_capacity__CECB;
-                  Self__AECB->parent_arrayed_collection__ZNR.upper__DOR=(__INTEGER)(Self__AECB->parent_arrayed_collection__ZNR.upper__DOR +  1);
+                  Self__MECB->parent_arrayed_collection__FOR.storage__GMW=new__MSFC;
+                  Self__MECB->parent_arrayed_collection__FOR.capacity__1LW=new_capacity__OECB;
+                  Self__MECB->parent_arrayed_collection__FOR.upper__POR=(__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.upper__POR +  1);
                 };
               };
-              ((void **)Self__AECB->parent_arrayed_collection__ZNR.storage__0LW)[Self__AECB->parent_arrayed_collection__ZNR.upper__DOR]=result__T5IB;
+              ((void **)Self__MECB->parent_arrayed_collection__FOR.storage__GMW)[Self__MECB->parent_arrayed_collection__FOR.upper__POR]=result__55IB;
             };
-            result__BON=result__TNR;
+            result__NON=result__5NR;
           };
         };
       };
     };
-    if (is_shorter__WY) {
-      sav_derive__FON=short_derive__VBC;
-      short_derive__VBC=old_derive__EON;
-      if ((((void *)result__BON == (void *)type_self__1TN) || ((void *)result__BON == (void *)type_null__TUN))) {
-        short__token__to__5AD((&__string_126),(__INTEGER)(old_pos__DON - ((__STRING_CONSTANT *)nam__5NN)->count__DD),old_pos__DON);
+    if (is_shorter__5Y) {
+      sav_derive__RON=short_derive__BCC;
+      short_derive__BCC=old_derive__QON;
+      if ((((void *)result__NON == (void *)type_self__HUN) || ((void *)result__NON == (void *)type_null__5UN))) {
+        short__token__to__LBD((&__string_126),(__INTEGER)(old_pos__PON - ((__STRING_CONSTANT *)nam__LON)->count__DD),old_pos__PON);
       } else {
-        short__token__to__5AD((&__string_125),(__INTEGER)(old_pos__DON - ((__STRING_CONSTANT *)nam__5NN)->count__DD),old_pos__DON);
+        short__token__to__LBD((&__string_125),(__INTEGER)(old_pos__PON - ((__STRING_CONSTANT *)nam__LON)->count__DD),old_pos__PON);
       };
-      short_derive__VBC=(__INTEGER)(sav_derive__FON + (__INTEGER)(short_derive__VBC - old_derive__EON));
+      short_derive__BCC=(__INTEGER)(sav_derive__RON + (__INTEGER)(short_derive__BCC - old_derive__QON));
     };
   };
-  return(result__BON);
+  return(result__NON);
 }
 
-static void read_def_local__R0H(__PARSER *Self__S0H)
+static void read_def_local__30H(__PARSER *Self__40H)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER beg__GYK,typ_id__LWN,Self__OFAB,limit_up__PFAB,__tmp__K2K;
-  __INTEGER Self__12N,__tmp__035G,Self__135G,__tmp__QAPD,Self__XPUD;
-  __POSITION pos__EFSG,__tmp__SZK,pos__MFSG,pos__ZFSG,pos__AGSG;
-  void *__tmp__TZK;
-  __ITM_LOCAL *result__FWN,*Self__ODV;
-  __POINTER ptr__GWN,ptr_table__WWBH,next__VWBH,result__XWBH;
-  __POINTER ptr_table__1WBH,next__0WBH,result__2WBH;
-  __UINTEGER_32 sz__IWN,a__TO4G,new_size__UO4G,t__YO4G,a__XO4G;
-  __UINTEGER_32 new_size__4WBH,lab_type__3WBH;
-  __CHARACTER styl__20H,result__AXBH,result__4IZG,result__DXBH;
-  __CHARACTER result__GXBH;
-  void *result__T35G,*local_list__00H,*result__W35G,*static_list__10H;
-  void *result__FYK,*result__DRI;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__U35G,*Self__V35G;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__X35G,*Self__Y35G,*Self__YQ4;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__OR4;
-  __BOOLEAN mute__HYK,result__5WBH,__tmp__4ZK,result__CXBH,result__FXBH;
-  __FAST_ARRAYoITM_LOCALo *Self__235G,*Self__FAPD;
-  void *other__Z35G,*other__GAPD;
-  old_position__XQI=position__GBC;
-  old_pos_cur__ZQI=pos_cur__JBC;
-  old_pos_line__1QI=pos_line__KBC;
-  old_pos_col__3QI=pos_col__LBC;
-  old_short_derive__5QI=short_derive__VBC;
-  styl__20H=read_style__LRF();
-  result__T35G=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI)->parent_arrayed_collection__IRI.upper__30T <  0)) {
-    result__T35G=create_with_capacity__EJK( 16);
+  __INTEGER beg__SYK,typ_id__XWN,Self__0FAB,limit_up__1FAB,__tmp__W2K;
+  __INTEGER Self__H3N,__tmp__GKGH,Self__HKGH,__tmp__2APD,Self__QQUD;
+  __POSITION pos__IXXG,__tmp__4ZK,pos__QXXG,pos__3XXG,pos__EYXG;
+  void *__tmp__5ZK;
+  __ITM_LOCAL *result__RWN,*Self__0DV;
+  __POINTER ptr__SWN,ptr_table__KDIH,next__JDIH,result__LDIH;
+  __POINTER ptr_table__PDIH,next__ODIH,result__QDIH;
+  __UINTEGER_32 sz__UWN,a__I0EH,new_size__J0EH,t__N0EH,a__M0EH;
+  __UINTEGER_32 new_size__SDIH,lab_type__RDIH;
+  __CHARACTER styl__I1H,result__UDIH,result__MN5G,result__XDIH;
+  __CHARACTER result__0DIH;
+  void *result__5JGH,*local_list__G1H,*result__CKGH,*static_list__H1H;
+  void *result__RYK,*result__PRI;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__AKGH,*Self__BKGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__DKGH,*Self__EKGH,*Self__ER4;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__0R4;
+  __BOOLEAN mute__TYK,result__TDIH,__tmp__K0K,result__WDIH,result__ZDIH;
+  __FAST_ARRAYoITM_LOCALo *Self__IKGH,*Self__RAPD;
+  void *other__FKGH,*other__SAPD;
+  old_position__DRI=position__SBC;
+  old_pos_cur__FRI=pos_cur__VBC;
+  old_pos_line__HRI=pos_line__WBC;
+  old_pos_col__JRI=pos_col__XBC;
+  old_short_derive__LRI=short_derive__BCC;
+  styl__I1H=read_style__XRF();
+  result__5JGH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI)->parent_arrayed_collection__URI.upper__J1T <  0)) {
+    result__5JGH=create_with_capacity__QJK( 16);
   } else {
-    Self__U35G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-    result__T35G=((void **)Self__U35G->parent_arrayed_collection__IRI.storage__1IU)[Self__U35G->parent_arrayed_collection__IRI.upper__30T];
-    Self__V35G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-    Self__V35G->parent_arrayed_collection__IRI.upper__30T=(__INTEGER)(Self__V35G->parent_arrayed_collection__IRI.upper__30T -  1);
-  };
-  local_list__00H=result__T35G;
-  result__W35G=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI)->parent_arrayed_collection__IRI.upper__30T <  0)) {
-    result__W35G=create_with_capacity__EJK( 16);
+    Self__AKGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+    result__5JGH=((void **)Self__AKGH->parent_arrayed_collection__URI.storage__HJU)[Self__AKGH->parent_arrayed_collection__URI.upper__J1T];
+    Self__BKGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+    Self__BKGH->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__BKGH->parent_arrayed_collection__URI.upper__J1T -  1);
+  };
+  local_list__G1H=result__5JGH;
+  result__CKGH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI)->parent_arrayed_collection__URI.upper__J1T <  0)) {
+    result__CKGH=create_with_capacity__QJK( 16);
   } else {
-    Self__X35G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-    result__W35G=((void **)Self__X35G->parent_arrayed_collection__IRI.storage__1IU)[Self__X35G->parent_arrayed_collection__IRI.upper__30T];
-    Self__Y35G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-    Self__Y35G->parent_arrayed_collection__IRI.upper__30T=(__INTEGER)(Self__Y35G->parent_arrayed_collection__IRI.upper__30T -  1);
-  };
-  static_list__10H=result__W35G;
-  while ((styl__20H != ' ')) {
-    result__FYK=NULL;
-    beg__GYK= 0;
-    mute__HYK=TRUE__;
-    if (read_identifier__55K()) {
-      result__DRI=NULL;
-      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI)->parent_arrayed_collection__IRI.upper__30T <  0)) {
-        result__DRI=create_with_capacity__EJK( 16);
-      } else {
-        Self__YQ4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-        result__DRI=((void **)Self__YQ4->parent_arrayed_collection__IRI.storage__1IU)[Self__YQ4->parent_arrayed_collection__IRI.upper__30T];
-        Self__OR4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-        Self__OR4->parent_arrayed_collection__IRI.upper__30T=(__INTEGER)(Self__OR4->parent_arrayed_collection__IRI.upper__30T -  1);
-      };
-      result__FYK=result__DRI;
-      beg__GYK= 0;
+    Self__DKGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+    result__CKGH=((void **)Self__DKGH->parent_arrayed_collection__URI.storage__HJU)[Self__DKGH->parent_arrayed_collection__URI.upper__J1T];
+    Self__EKGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+    Self__EKGH->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__EKGH->parent_arrayed_collection__URI.upper__J1T -  1);
+  };
+  static_list__H1H=result__CKGH;
+  while ((styl__I1H != ' ')) {
+    result__RYK=NULL;
+    beg__SYK= 0;
+    mute__TYK=TRUE__;
+    if (read_identifier__LAL()) {
+      result__PRI=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI)->parent_arrayed_collection__URI.upper__J1T <  0)) {
+        result__PRI=create_with_capacity__QJK( 16);
+      } else {
+        Self__ER4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+        result__PRI=((void **)Self__ER4->parent_arrayed_collection__URI.storage__HJU)[Self__ER4->parent_arrayed_collection__URI.upper__J1T];
+        Self__0R4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+        Self__0R4->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__0R4->parent_arrayed_collection__URI.upper__J1T -  1);
+      };
+      result__RYK=result__PRI;
+      beg__SYK= 0;
       do {
-        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K +  1) !=  0) && (! read_identifier__55K())) && (! mute__HYK))) {
-          pos__EFSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_309));
-          put_position__IOG(pos__EFSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K +  1) !=  0) && (! read_identifier__LAL())) && (! mute__TYK))) {
+          pos__IXXG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_319));
+          put_position__UOG(pos__IXXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        __tmp__SZK=current_position__3WF();
-        __tmp__TZK=last_string__2ZC;
-        result__FWN=NULL;
-        ptr__GWN=((__POINTER )(NULL));
-        typ_id__LWN= 0;
-        sz__IWN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
-        if ((sz__IWN ==  0)) {
-          result__FWN=ITM_LOCAL__;
-        } else {
-          typ_id__LWN=__ITM_LOCAL__;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__IWN);
-          if ((typ_id__LWN == (__INTEGER)(-  1))) {
-            a__TO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__UO4G=(__UINTEGER_32)((__UINTEGER_32)(sz__IWN + a__TO4G) & (__UINTEGER_32)(~ a__TO4G));
-            ptr_table__WWBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UO4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__VWBH=((__POINTER )(NULL));
-            result__XWBH=((__POINTER *)ptr_table__WWBH)[ 0];
-            if ((result__XWBH == (void *)NULL)) {
-              result__XWBH=new_lab__ARJ(new_size__UO4G);
-              next__VWBH=(void *)((unsigned long)result__XWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UO4G)));
-              ((__POINTER *)next__VWBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WWBH)[ 0]=next__VWBH;
+        __tmp__4ZK=current_position__JXF();
+        __tmp__5ZK=last_string__I0C;
+        result__RWN=NULL;
+        ptr__SWN=((__POINTER )(NULL));
+        typ_id__XWN= 0;
+        sz__UWN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
+        if ((sz__UWN ==  0)) {
+          result__RWN=ITM_LOCAL__;
+        } else {
+          typ_id__XWN=__ITM_LOCAL__;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__UWN);
+          if ((typ_id__XWN == (__INTEGER)(-  1))) {
+            a__I0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__J0EH=(__UINTEGER_32)((__UINTEGER_32)(sz__UWN + a__I0EH) & (__UINTEGER_32)(~ a__I0EH));
+            ptr_table__KDIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J0EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__JDIH=((__POINTER )(NULL));
+            result__LDIH=((__POINTER *)ptr_table__KDIH)[ 0];
+            if ((result__LDIH == (void *)NULL)) {
+              result__LDIH=new_lab__MRJ(new_size__J0EH);
+              next__JDIH=(void *)((unsigned long)result__LDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J0EH)));
+              ((__POINTER *)next__JDIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KDIH)[ 0]=next__JDIH;
             } else {
-              next__VWBH=((__POINTER *)result__XWBH)[ 0];
-              if ((next__VWBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XWBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UO4G <<  1)) <=  4096)) {
-                  next__VWBH=(void *)((unsigned long)result__XWBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UO4G)));
+              next__JDIH=((__POINTER *)result__LDIH)[ 0];
+              if ((next__JDIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J0EH <<  1)) <=  4096)) {
+                  next__JDIH=(void *)((unsigned long)result__LDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J0EH)));
                 } else {
-                  next__VWBH=new_lab__ARJ(new_size__UO4G);
+                  next__JDIH=new_lab__MRJ(new_size__J0EH);
                 };
-                ((__POINTER *)next__VWBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WWBH)[ 0]=next__VWBH;
+                ((__POINTER *)next__JDIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KDIH)[ 0]=next__JDIH;
               } else {
-                ((__POINTER *)result__XWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__XWBH=next__VWBH;
+                ((__POINTER *)result__LDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LDIH=next__JDIH;
               };
             };
-            ptr__GWN=result__XWBH;
-          } else {
-            t__YO4G=((__UINTEGER_32 )typ_id__LWN);
-            a__XO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__4WBH=(__UINTEGER_32)((__UINTEGER_32)(sz__IWN + a__XO4G) & (__UINTEGER_32)(~ a__XO4G));
-            ptr_table__1WBH=((__POINTER )(&(table_type[(t__YO4G)])));
-            lab_type__3WBH=(__UINTEGER_32)(t__YO4G |  1);
-            next__0WBH=((__POINTER )(NULL));
-            result__2WBH=((__POINTER *)ptr_table__1WBH)[ 0];
-            if ((result__2WBH == (void *)NULL)) {
-              result__2WBH=new_lab__ARJ(lab_type__3WBH);
-              next__0WBH=(void *)((unsigned long)result__2WBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4WBH)));
-              ((__POINTER *)next__0WBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1WBH)[ 0]=next__0WBH;
+            ptr__SWN=result__LDIH;
+          } else {
+            t__N0EH=((__UINTEGER_32 )typ_id__XWN);
+            a__M0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__SDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UWN + a__M0EH) & (__UINTEGER_32)(~ a__M0EH));
+            ptr_table__PDIH=((__POINTER )(&(table_type[(t__N0EH)])));
+            lab_type__RDIH=(__UINTEGER_32)(t__N0EH |  1);
+            next__ODIH=((__POINTER )(NULL));
+            result__QDIH=((__POINTER *)ptr_table__PDIH)[ 0];
+            if ((result__QDIH == (void *)NULL)) {
+              result__QDIH=new_lab__MRJ(lab_type__RDIH);
+              next__ODIH=(void *)((unsigned long)result__QDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SDIH)));
+              ((__POINTER *)next__ODIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PDIH)[ 0]=next__ODIH;
             } else {
-              next__0WBH=((__POINTER *)result__2WBH)[ 0];
-              if ((next__0WBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2WBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4WBH <<  1)) <=  4096)) {
-                  next__0WBH=(void *)((unsigned long)result__2WBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4WBH)));
+              next__ODIH=((__POINTER *)result__QDIH)[ 0];
+              if ((next__ODIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SDIH <<  1)) <=  4096)) {
+                  next__ODIH=(void *)((unsigned long)result__QDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SDIH)));
                 } else {
-                  next__0WBH=new_lab__ARJ(lab_type__3WBH);
+                  next__ODIH=new_lab__MRJ(lab_type__RDIH);
                 };
-                ((__POINTER *)next__0WBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1WBH)[ 0]=next__0WBH;
+                ((__POINTER *)next__ODIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PDIH)[ 0]=next__ODIH;
               } else {
-                ((__POINTER *)result__2WBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0WBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__2WBH=next__0WBH;
+                ((__POINTER *)result__QDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ODIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__QDIH=next__ODIH;
               };
             };
-            ptr__GWN=result__2WBH;
+            ptr__SWN=result__QDIH;
           };
-          result__FWN=((__ITM_LOCAL *)ptr__GWN);
-          *(result__FWN) = *(ITM_LOCAL__);
+          result__RWN=((__ITM_LOCAL *)ptr__SWN);
+          *(result__RWN) = *(ITM_LOCAL__);
         };
-        Self__ODV=((__ITM_LOCAL *)result__FWN);
-        Self__ODV->name__S2K=__tmp__TZK;
-        Self__ODV->parent_itm_object__T0H.position__BDJ=__tmp__SZK;
-        add_last__Z1U(result__FYK,result__FWN);
-        result__5WBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__5WBH=FALSE__;
+        Self__0DV=((__ITM_LOCAL *)result__RWN);
+        Self__0DV->name__42K=__tmp__5ZK;
+        Self__0DV->parent_itm_object__50H.position__NDJ=__tmp__4ZK;
+        add_last__F2U(result__RYK,result__RWN);
+        result__TDIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__TDIH=FALSE__;
         } else {
-          result__AXBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__AXBH=((__CHARACTER )(( 0)));
+          result__UDIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__UDIH=((__CHARACTER )(( 0)));
           } else {
-            result__AXBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__UDIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__AXBH == ':')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__5WBH=TRUE__;
+          if ((result__UDIH == ':')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__TDIH=TRUE__;
           };
         };
-        if (result__5WBH) {
-          result__4IZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__4IZG=((__CHARACTER )(( 0)));
+        if (result__TDIH) {
+          result__MN5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__MN5G=((__CHARACTER )(( 0)));
           } else {
-            result__4IZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__MN5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__4ZK=(result__4IZG != '=');
+          __tmp__K0K=(result__MN5G != '=');
         } else {
-          __tmp__4ZK=FALSE__;
+          __tmp__K0K=FALSE__;
         };
-        if (__tmp__4ZK) {
-          mute__HYK=FALSE__;
-          if (((void *)read_type__XBM(Self__S0H,TRUE__) == (void *)NULL)) {
-            pos__MFSG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_310));
-            put_position__IOG(pos__MFSG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+        if (__tmp__K0K) {
+          mute__TYK=FALSE__;
+          if (((void *)read_type__DCM(Self__40H,TRUE__) == (void *)NULL)) {
+            pos__QXXG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_320));
+            put_position__UOG(pos__QXXG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
-          Self__OFAB=beg__GYK;
-          limit_up__PFAB=((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K;
-          while ((Self__OFAB <= limit_up__PFAB)) {
-            Self__OFAB=(__INTEGER)(Self__OFAB +  1);
+          Self__0FAB=beg__SYK;
+          limit_up__1FAB=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
+          while ((Self__0FAB <= limit_up__1FAB)) {
+            Self__0FAB=(__INTEGER)(Self__0FAB +  1);
           };
-          beg__GYK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K +  1);
+          beg__SYK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K +  1);
         };
-        result__CXBH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__CXBH=FALSE__;
+        result__WDIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__WDIH=FALSE__;
         } else {
-          result__DXBH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__DXBH=((__CHARACTER )(( 0)));
+          result__XDIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__XDIH=((__CHARACTER )(( 0)));
           } else {
-            result__DXBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__XDIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__DXBH == ',')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__CXBH=TRUE__;
+          if ((result__XDIH == ',')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__WDIH=TRUE__;
           };
         };
-      } while (result__CXBH);
-      if ((beg__GYK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__DRI)->parent_arrayed_collection__Y0H.upper__P0K +  1))) {
-        if (mute__HYK) {
-          free__KJK(result__DRI);
-          result__FYK=NULL;
+      } while (result__WDIH);
+      if ((beg__SYK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__PRI)->parent_arrayed_collection__E1H.upper__10K +  1))) {
+        if (mute__TYK) {
+          free__WJK(result__PRI);
+          result__RYK=NULL;
         } else {
-          pos__ZFSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_310));
-          put_position__IOG(pos__ZFSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+          pos__3XXG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_320));
+          put_position__UOG(pos__3XXG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__FYK=copy__T3J(result__FYK);
-        if (is_shorter__WY) {
-          __tmp__K2K=((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K;
-          Self__12N= 0;
-          while ((Self__12N <= __tmp__K2K)) {
-            add__WLHB(short_local__3BC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.storage__WKU)[Self__12N])->name__S2K);
-            Self__12N=(__INTEGER)(Self__12N +  1);
+        result__RYK=copy__53J(result__RYK);
+        if (is_shorter__5Y) {
+          __tmp__W2K=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
+          Self__H3N= 0;
+          while ((Self__H3N <= __tmp__W2K)) {
+            add__CMHB(short_local__JCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.storage__CLU)[Self__H3N])->name__42K);
+            Self__H3N=(__INTEGER)(Self__H3N +  1);
           };
         };
       };
     };
-    if (((void *)result__FYK != (void *)NULL)) {
-      if ((styl__20H == '+')) {
-        Self__235G=((__FAST_ARRAYoITM_LOCALo *)local_list__00H);
-        other__Z35G=result__FYK;
-        __tmp__035G=((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K;
-        Self__135G= 0;
-        while ((Self__135G <= __tmp__035G)) {
-          add_last__Z1U(Self__235G,((void **)((__FAST_ARRAYoITM_LOCALo *)other__Z35G)->parent_arrayed_collection__Y0H.storage__WKU)[Self__135G]);
-          Self__135G=(__INTEGER)(Self__135G +  1);
+    if (((void *)result__RYK != (void *)NULL)) {
+      if ((styl__I1H == '+')) {
+        Self__IKGH=((__FAST_ARRAYoITM_LOCALo *)local_list__G1H);
+        other__FKGH=result__RYK;
+        __tmp__GKGH=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
+        Self__HKGH= 0;
+        while ((Self__HKGH <= __tmp__GKGH)) {
+          add_last__F2U(Self__IKGH,((void **)((__FAST_ARRAYoITM_LOCALo *)other__FKGH)->parent_arrayed_collection__E1H.storage__CLU)[Self__HKGH]);
+          Self__HKGH=(__INTEGER)(Self__HKGH +  1);
         };
       } else {
-        Self__FAPD=((__FAST_ARRAYoITM_LOCALo *)static_list__10H);
-        other__GAPD=result__FYK;
-        __tmp__QAPD=((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K;
-        Self__XPUD= 0;
-        while ((Self__XPUD <= __tmp__QAPD)) {
-          add_last__Z1U(Self__FAPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__GAPD)->parent_arrayed_collection__Y0H.storage__WKU)[Self__XPUD]);
-          Self__XPUD=(__INTEGER)(Self__XPUD +  1);
+        Self__RAPD=((__FAST_ARRAYoITM_LOCALo *)static_list__H1H);
+        other__SAPD=result__RYK;
+        __tmp__2APD=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
+        Self__QQUD= 0;
+        while ((Self__QQUD <= __tmp__2APD)) {
+          add_last__F2U(Self__RAPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__SAPD)->parent_arrayed_collection__E1H.storage__CLU)[Self__QQUD]);
+          Self__QQUD=(__INTEGER)(Self__QQUD +  1);
         };
       };
-      result__FXBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__FXBH=FALSE__;
+      result__ZDIH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__ZDIH=FALSE__;
       } else {
-        result__GXBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__GXBH=((__CHARACTER )(( 0)));
+        result__0DIH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__0DIH=((__CHARACTER )(( 0)));
         } else {
-          result__GXBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__0DIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__GXBH == ';')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__FXBH=TRUE__;
+        if ((result__0DIH == ';')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__ZDIH=TRUE__;
         };
       };
-      if ((! result__FXBH)) {
-        pos__AGSG=current_position__3WF();
-        put_error__text__4MG( 2,(&__string_229));
-        put_position__IOG(pos__AGSG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+      if ((! result__ZDIH)) {
+        pos__EYXG=current_position__JXF();
+        put_error__text__KNG( 2,(&__string_239));
+        put_position__UOG(pos__EYXG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      old_position__XQI=position__GBC;
-      old_pos_cur__ZQI=pos_cur__JBC;
-      old_pos_line__1QI=pos_line__KBC;
-      old_pos_col__3QI=pos_col__LBC;
-      old_short_derive__5QI=short_derive__VBC;
-      styl__20H=read_style__LRF();
+      old_position__DRI=position__SBC;
+      old_pos_cur__FRI=pos_cur__VBC;
+      old_pos_line__HRI=pos_line__WBC;
+      old_pos_col__JRI=pos_col__XBC;
+      old_short_derive__LRI=short_derive__BCC;
+      styl__I1H=read_style__XRF();
     } else {
-      restore_context__HDL();
-      styl__20H=' ';
+      restore_context__TDL();
+      styl__I1H=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__T35G)->parent_arrayed_collection__Y0H.upper__P0K <  0)) {
-    free__KJK(result__T35G);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__5JGH)->parent_arrayed_collection__E1H.upper__10K <  0)) {
+    free__WJK(result__5JGH);
   } else {
-    copy__T3J(result__T35G);
+    copy__53J(result__5JGH);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__W35G)->parent_arrayed_collection__Y0H.upper__P0K <  0)) {
-    free__KJK(result__W35G);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__CKGH)->parent_arrayed_collection__E1H.upper__10K <  0)) {
+    free__WJK(result__CKGH);
   } else {
-    copy__T3J(result__W35G);
+    copy__53J(result__CKGH);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__GVI(__INTEGER new_count__IVI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__SVI(__INTEGER new_count__UVI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__EKJ,ptr_table__JXBH,next__IXBH,result__KXBH;
-  __POINTER ptr_table__OXBH,next__NXBH,result__PXBH;
-  __INTEGER typ_id__JKJ;
-  __UINTEGER_32 sz__GKJ,a__0T4G,new_size__1T4G,t__5T4G,a__4T4G;
-  __UINTEGER_32 new_size__RXBH,lab_type__QXBH;
-  __FAST_ARRAYoITM_CODEo *result__DKJ,*Self__T3T;
-  result__DKJ=NULL;
-  ptr__EKJ=((__POINTER )(NULL));
-  typ_id__JKJ= 0;
-  sz__GKJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
-  if ((sz__GKJ ==  0)) {
-    result__DKJ=FAST_ARRAYoITM_CODEo__;
+  __POINTER ptr__QKJ,ptr_table__3DIH,next__2DIH,result__4DIH;
+  __POINTER ptr_table__CEIH,next__BEIH,result__DEIH;
+  __INTEGER typ_id__VKJ;
+  __UINTEGER_32 sz__SKJ,a__P5EH,new_size__Q5EH,t__U5EH,a__T5EH;
+  __UINTEGER_32 new_size__FEIH,lab_type__EEIH;
+  __FAST_ARRAYoITM_CODEo *result__PKJ,*Self__53T;
+  result__PKJ=NULL;
+  ptr__QKJ=((__POINTER )(NULL));
+  typ_id__VKJ= 0;
+  sz__SKJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
+  if ((sz__SKJ ==  0)) {
+    result__PKJ=FAST_ARRAYoITM_CODEo__;
   } else {
-    typ_id__JKJ=__FAST_ARRAYoITM_CODEo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__GKJ);
-    if ((typ_id__JKJ == (__INTEGER)(-  1))) {
-      a__0T4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1T4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GKJ + a__0T4G) & (__UINTEGER_32)(~ a__0T4G));
-      ptr_table__JXBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1T4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__IXBH=((__POINTER )(NULL));
-      result__KXBH=((__POINTER *)ptr_table__JXBH)[ 0];
-      if ((result__KXBH == (void *)NULL)) {
-        result__KXBH=new_lab__ARJ(new_size__1T4G);
-        next__IXBH=(void *)((unsigned long)result__KXBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1T4G)));
-        ((__POINTER *)next__IXBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JXBH)[ 0]=next__IXBH;
-      } else {
-        next__IXBH=((__POINTER *)result__KXBH)[ 0];
-        if ((next__IXBH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KXBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__1T4G <<  1)) <=  4096)) {
-            next__IXBH=(void *)((unsigned long)result__KXBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1T4G)));
-          } else {
-            next__IXBH=new_lab__ARJ(new_size__1T4G);
-          };
-          ((__POINTER *)next__IXBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JXBH)[ 0]=next__IXBH;
-        } else {
-          ((__POINTER *)result__KXBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IXBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KXBH=next__IXBH;
-        };
-      };
-      ptr__EKJ=result__KXBH;
-    } else {
-      t__5T4G=((__UINTEGER_32 )typ_id__JKJ);
-      a__4T4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__RXBH=(__UINTEGER_32)((__UINTEGER_32)(sz__GKJ + a__4T4G) & (__UINTEGER_32)(~ a__4T4G));
-      ptr_table__OXBH=((__POINTER )(&(table_type[(t__5T4G)])));
-      lab_type__QXBH=(__UINTEGER_32)(t__5T4G |  1);
-      next__NXBH=((__POINTER )(NULL));
-      result__PXBH=((__POINTER *)ptr_table__OXBH)[ 0];
-      if ((result__PXBH == (void *)NULL)) {
-        result__PXBH=new_lab__ARJ(lab_type__QXBH);
-        next__NXBH=(void *)((unsigned long)result__PXBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RXBH)));
-        ((__POINTER *)next__NXBH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OXBH)[ 0]=next__NXBH;
-      } else {
-        next__NXBH=((__POINTER *)result__PXBH)[ 0];
-        if ((next__NXBH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PXBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RXBH <<  1)) <=  4096)) {
-            next__NXBH=(void *)((unsigned long)result__PXBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RXBH)));
-          } else {
-            next__NXBH=new_lab__ARJ(lab_type__QXBH);
-          };
-          ((__POINTER *)next__NXBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OXBH)[ 0]=next__NXBH;
-        } else {
-          ((__POINTER *)result__PXBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NXBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PXBH=next__NXBH;
-        };
-      };
-      ptr__EKJ=result__PXBH;
-    };
-    result__DKJ=((__FAST_ARRAYoITM_CODEo *)ptr__EKJ);
-    *(result__DKJ) = *(FAST_ARRAYoITM_CODEo__);
-  };
-  Self__T3T=((__FAST_ARRAYoITM_CODEo *)result__DKJ);
-  if ((Self__T3T->parent_arrayed_collection__FTF.capacity__OXT < new_count__IVI)) {
-    Self__T3T->parent_arrayed_collection__FTF.storage__ZXT=create__1SQB(new_count__IVI);
-    Self__T3T->parent_arrayed_collection__FTF.capacity__OXT=new_count__IVI;
-  };
-  Self__T3T->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(-  1);
-  return(result__DKJ);
+    typ_id__VKJ=__FAST_ARRAYoITM_CODEo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SKJ);
+    if ((typ_id__VKJ == (__INTEGER)(-  1))) {
+      a__P5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__Q5EH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKJ + a__P5EH) & (__UINTEGER_32)(~ a__P5EH));
+      ptr_table__3DIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q5EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2DIH=((__POINTER )(NULL));
+      result__4DIH=((__POINTER *)ptr_table__3DIH)[ 0];
+      if ((result__4DIH == (void *)NULL)) {
+        result__4DIH=new_lab__MRJ(new_size__Q5EH);
+        next__2DIH=(void *)((unsigned long)result__4DIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5EH)));
+        ((__POINTER *)next__2DIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3DIH)[ 0]=next__2DIH;
+      } else {
+        next__2DIH=((__POINTER *)result__4DIH)[ 0];
+        if ((next__2DIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4DIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q5EH <<  1)) <=  4096)) {
+            next__2DIH=(void *)((unsigned long)result__4DIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5EH)));
+          } else {
+            next__2DIH=new_lab__MRJ(new_size__Q5EH);
+          };
+          ((__POINTER *)next__2DIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3DIH)[ 0]=next__2DIH;
+        } else {
+          ((__POINTER *)result__4DIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2DIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4DIH=next__2DIH;
+        };
+      };
+      ptr__QKJ=result__4DIH;
+    } else {
+      t__U5EH=((__UINTEGER_32 )typ_id__VKJ);
+      a__T5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKJ + a__T5EH) & (__UINTEGER_32)(~ a__T5EH));
+      ptr_table__CEIH=((__POINTER )(&(table_type[(t__U5EH)])));
+      lab_type__EEIH=(__UINTEGER_32)(t__U5EH |  1);
+      next__BEIH=((__POINTER )(NULL));
+      result__DEIH=((__POINTER *)ptr_table__CEIH)[ 0];
+      if ((result__DEIH == (void *)NULL)) {
+        result__DEIH=new_lab__MRJ(lab_type__EEIH);
+        next__BEIH=(void *)((unsigned long)result__DEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FEIH)));
+        ((__POINTER *)next__BEIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CEIH)[ 0]=next__BEIH;
+      } else {
+        next__BEIH=((__POINTER *)result__DEIH)[ 0];
+        if ((next__BEIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DEIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FEIH <<  1)) <=  4096)) {
+            next__BEIH=(void *)((unsigned long)result__DEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FEIH)));
+          } else {
+            next__BEIH=new_lab__MRJ(lab_type__EEIH);
+          };
+          ((__POINTER *)next__BEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CEIH)[ 0]=next__BEIH;
+        } else {
+          ((__POINTER *)result__DEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DEIH=next__BEIH;
+        };
+      };
+      ptr__QKJ=result__DEIH;
+    };
+    result__PKJ=((__FAST_ARRAYoITM_CODEo *)ptr__QKJ);
+    *(result__PKJ) = *(FAST_ARRAYoITM_CODEo__);
+  };
+  Self__53T=((__FAST_ARRAYoITM_CODEo *)result__PKJ);
+  if ((Self__53T->parent_arrayed_collection__RTF.capacity__0XT < new_count__UVI)) {
+    Self__53T->parent_arrayed_collection__RTF.storage__FYT=create__HTQB(new_count__UVI);
+    Self__53T->parent_arrayed_collection__RTF.capacity__0XT=new_count__UVI;
+  };
+  Self__53T->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(-  1);
+  return(result__PKJ);
 }
 
-static void add_last__I5U(__FAST_ARRAYoITM_CODEo *Self__J5U,void *element__K5U)
+static void add_last__U5U(__FAST_ARRAYoITM_CODEo *Self__V5U,void *element__W5U)
 // ({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__L5U,__tmp__PAV,__tmp__YDEC,Self__UGVD;
-  __BOOLEAN __tmp__Z5U;
-  void **__tmp__OAV,**new__EDEC;
-  new_capacity__L5U= 0;
-  if (((__INTEGER)(Self__J5U->parent_arrayed_collection__FTF.upper__QHL +  1) <= (__INTEGER)(Self__J5U->parent_arrayed_collection__FTF.capacity__OXT -  1))) {
-    Self__J5U->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(Self__J5U->parent_arrayed_collection__FTF.upper__QHL +  1);
-    __tmp__Z5U=TRUE__;
+  __INTEGER new_capacity__X5U,__tmp__1AV,__tmp__EEEC,Self__NHVD;
+  __BOOLEAN __tmp__FAV;
+  void **__tmp__0AV,**new__QDEC;
+  new_capacity__X5U= 0;
+  if (((__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.upper__2HL +  1) <= (__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.capacity__0XT -  1))) {
+    Self__V5U->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.upper__2HL +  1);
+    __tmp__FAV=TRUE__;
   } else {
-    __tmp__Z5U=FALSE__;
-  };
-  if ((! __tmp__Z5U)) {
-    if ((Self__J5U->parent_arrayed_collection__FTF.capacity__OXT ==  0)) {
-      Self__J5U->parent_arrayed_collection__FTF.storage__ZXT=create__1SQB( 2);
-      Self__J5U->parent_arrayed_collection__FTF.capacity__OXT= 2;
-      Self__J5U->parent_arrayed_collection__FTF.upper__QHL= 0;
-    } else {
-      new_capacity__L5U=(__INTEGER)(Self__J5U->parent_arrayed_collection__FTF.capacity__OXT <<  1);
-      __tmp__OAV=Self__J5U->parent_arrayed_collection__FTF.storage__ZXT;
-      __tmp__PAV=Self__J5U->parent_arrayed_collection__FTF.capacity__OXT;
-      new__EDEC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__OAV)),((__UINTEGER_32 )(__INTEGER)(__tmp__PAV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__L5U * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__YDEC=(__INTEGER)(new_capacity__L5U -  1);
-      Self__UGVD=__tmp__PAV;
-      while ((Self__UGVD <= __tmp__YDEC)) {
-        new__EDEC[Self__UGVD]=NULL;
-        Self__UGVD=(__INTEGER)(Self__UGVD +  1);
-      };
-      Self__J5U->parent_arrayed_collection__FTF.storage__ZXT=new__EDEC;
-      Self__J5U->parent_arrayed_collection__FTF.capacity__OXT=new_capacity__L5U;
-      Self__J5U->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(Self__J5U->parent_arrayed_collection__FTF.upper__QHL +  1);
-    };
-  };
-  ((void **)Self__J5U->parent_arrayed_collection__FTF.storage__ZXT)[Self__J5U->parent_arrayed_collection__FTF.upper__QHL]=element__K5U;
+    __tmp__FAV=FALSE__;
+  };
+  if ((! __tmp__FAV)) {
+    if ((Self__V5U->parent_arrayed_collection__RTF.capacity__0XT ==  0)) {
+      Self__V5U->parent_arrayed_collection__RTF.storage__FYT=create__HTQB( 2);
+      Self__V5U->parent_arrayed_collection__RTF.capacity__0XT= 2;
+      Self__V5U->parent_arrayed_collection__RTF.upper__2HL= 0;
+    } else {
+      new_capacity__X5U=(__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.capacity__0XT <<  1);
+      __tmp__0AV=Self__V5U->parent_arrayed_collection__RTF.storage__FYT;
+      __tmp__1AV=Self__V5U->parent_arrayed_collection__RTF.capacity__0XT;
+      new__QDEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__0AV)),((__UINTEGER_32 )(__INTEGER)(__tmp__1AV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__X5U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__EEEC=(__INTEGER)(new_capacity__X5U -  1);
+      Self__NHVD=__tmp__1AV;
+      while ((Self__NHVD <= __tmp__EEEC)) {
+        new__QDEC[Self__NHVD]=NULL;
+        Self__NHVD=(__INTEGER)(Self__NHVD +  1);
+      };
+      Self__V5U->parent_arrayed_collection__RTF.storage__FYT=new__QDEC;
+      Self__V5U->parent_arrayed_collection__RTF.capacity__0XT=new_capacity__X5U;
+      Self__V5U->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.upper__2HL +  1);
+    };
+  };
+  ((void **)Self__V5U->parent_arrayed_collection__RTF.storage__FYT)[Self__V5U->parent_arrayed_collection__RTF.upper__2HL]=element__W5U;
 }
 
-static void* copy__E5H(void *tmp__G5H)
+static void* copy__Q5H(void *tmp__S5H)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__FXT,other_upper__EXT,Self__L3JC;
-  void *result__I5H;
-  __FAST_ARRAYoITM_CODEo *Self__CXT;
-  void **__tmp__2XT,**__tmp__4XT,**Self__YQCC;
-  result__I5H=create_with_capacity__GVI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__G5H)->parent_arrayed_collection__FTF.upper__QHL +  1));
-  Self__CXT=((__FAST_ARRAYoITM_CODEo *)result__I5H);
-  new_capacity__FXT= 0;
-  other_upper__EXT=((__FAST_ARRAYoITM_CODEo *)tmp__G5H)->parent_arrayed_collection__FTF.upper__QHL;
-  if ((other_upper__EXT >=  0)) {
-    new_capacity__FXT=(__INTEGER)(other_upper__EXT +  1);
-    if ((Self__CXT->parent_arrayed_collection__FTF.capacity__OXT < new_capacity__FXT)) {
-      Self__CXT->parent_arrayed_collection__FTF.storage__ZXT=create__1SQB(new_capacity__FXT);
-      Self__CXT->parent_arrayed_collection__FTF.capacity__OXT=new_capacity__FXT;
-    };
-    __tmp__2XT=Self__CXT->parent_arrayed_collection__FTF.storage__ZXT;
-    __tmp__4XT=((__FAST_ARRAYoITM_CODEo *)tmp__G5H)->parent_arrayed_collection__FTF.storage__ZXT;
-    Self__YQCC=((void **)__tmp__2XT);
-    Self__L3JC=other_upper__EXT;
-    while ((Self__L3JC >=  0)) {
-      Self__YQCC[Self__L3JC]=((void **)__tmp__4XT)[Self__L3JC];
-      Self__L3JC=(__INTEGER)(Self__L3JC -  1);
-    };
-  };
-  Self__CXT->parent_arrayed_collection__FTF.upper__QHL=other_upper__EXT;
-  free__MVI(tmp__G5H);
-  return(result__I5H);
+  __INTEGER new_capacity__RXT,other_upper__QXT,Self__X3JC;
+  void *result__U5H;
+  __FAST_ARRAYoITM_CODEo *Self__OXT;
+  void **__tmp__IYT,**__tmp__KYT,**Self__ERCC;
+  result__U5H=create_with_capacity__SVI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__S5H)->parent_arrayed_collection__RTF.upper__2HL +  1));
+  Self__OXT=((__FAST_ARRAYoITM_CODEo *)result__U5H);
+  new_capacity__RXT= 0;
+  other_upper__QXT=((__FAST_ARRAYoITM_CODEo *)tmp__S5H)->parent_arrayed_collection__RTF.upper__2HL;
+  if ((other_upper__QXT >=  0)) {
+    new_capacity__RXT=(__INTEGER)(other_upper__QXT +  1);
+    if ((Self__OXT->parent_arrayed_collection__RTF.capacity__0XT < new_capacity__RXT)) {
+      Self__OXT->parent_arrayed_collection__RTF.storage__FYT=create__HTQB(new_capacity__RXT);
+      Self__OXT->parent_arrayed_collection__RTF.capacity__0XT=new_capacity__RXT;
+    };
+    __tmp__IYT=Self__OXT->parent_arrayed_collection__RTF.storage__FYT;
+    __tmp__KYT=((__FAST_ARRAYoITM_CODEo *)tmp__S5H)->parent_arrayed_collection__RTF.storage__FYT;
+    Self__ERCC=((void **)__tmp__IYT);
+    Self__X3JC=other_upper__QXT;
+    while ((Self__X3JC >=  0)) {
+      Self__ERCC[Self__X3JC]=((void **)__tmp__KYT)[Self__X3JC];
+      Self__X3JC=(__INTEGER)(Self__X3JC -  1);
+    };
+  };
+  Self__OXT->parent_arrayed_collection__RTF.upper__2HL=other_upper__QXT;
+  free__YVI(tmp__S5H);
+  return(result__U5H);
 }
 
-static __BOOLEAN fast_has__RDV(__HASHED_SEToSTRING_CONSTANTo *Self__SDV,void *e__TDV)
+static __BOOLEAN fast_has__3DV(__HASHED_SEToSTRING_CONSTANTo *Self__4DV,void *e__5DV)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__535G;
-  __INTEGER result__435G,__tmp__A45G,Self__B45G;
-  void *node__3DV;
-  Self__535G=((__STRING_CONSTANT *)e__TDV);
-  result__435G= 0;
-  __tmp__A45G=Self__535G->count__DD;
-  Self__B45G= 1;
-  while ((Self__B45G <= __tmp__A45G)) {
-    result__435G=(__INTEGER)((__INTEGER)( 5 * result__435G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__535G->storage__JQO)[(__INTEGER)(Self__B45G -  1)])));
-    Self__B45G=(__INTEGER)(Self__B45G +  1);
-  };
-  if ((result__435G <  0)) {
-    result__435G=(__INTEGER)(~ result__435G);
-  };
-  node__3DV=((void **)Self__SDV->buckets__DEV)[(__INTEGER)(result__435G % Self__SDV->capacity__4HT)];
-  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));
+  __STRING_CONSTANT *Self__LKGH;
+  __INTEGER result__KKGH,__tmp__MKGH,Self__NKGH;
+  void *node__JEV;
+  Self__LKGH=((__STRING_CONSTANT *)e__5DV);
+  result__KKGH= 0;
+  __tmp__MKGH=Self__LKGH->count__DD;
+  Self__NKGH= 1;
+  while ((Self__NKGH <= __tmp__MKGH)) {
+    result__KKGH=(__INTEGER)((__INTEGER)( 5 * result__KKGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LKGH->storage__VQO)[(__INTEGER)(Self__NKGH -  1)])));
+    Self__NKGH=(__INTEGER)(Self__NKGH +  1);
+  };
+  if ((result__KKGH <  0)) {
+    result__KKGH=(__INTEGER)(~ result__KKGH);
+  };
+  node__JEV=((void **)Self__4DV->buckets__PEV)[(__INTEGER)(result__KKGH % Self__4DV->capacity__KIT)];
+  while ((! (((void *)node__JEV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__JEV)->item__1EV == (void *)e__5DV)))) {
+    node__JEV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__JEV)->next__GFV;
+  };
+  return(((void *)node__JEV != (void *)NULL));
 }
 
-static void restore_context__HDL()
+static void restore_context__TDL()
 // () VoidNo recursive, No inlinable.
 {
-  __INTEGER beg__JDL,end__D45G,len__F45G,__tmp__G45G,__tmp__I45G;
-  __INTEGER Self__J45G,__tmp__1DL,__tmp__4DL,Self__NMM;
-  __STRING *Self__H45G;
-  beg__JDL= 0;
-  if (is_shorter__WY) {
-    ((__STRING *)token__0BD)->count__KFC= 0;
-    beg__JDL=(__INTEGER)(old_position__XQI + old_short_derive__5QI);
-    Self__H45G=((__STRING *)output_code__SI);
-    end__D45G=(__INTEGER)((__INTEGER)(position__GBC + short_derive__VBC) -  1);
-    len__F45G=(__INTEGER)((__INTEGER)(end__D45G - beg__JDL) +  1);
-    if ((len__F45G >  0)) {
-      __tmp__G45G=(__INTEGER)(end__D45G +  1);
-      __tmp__I45G=Self__H45G->count__KFC;
-      Self__J45G=__tmp__G45G;
-      while ((Self__J45G <= __tmp__I45G)) {
-        ((__CHARACTER *)Self__H45G->storage__VBS)[(__INTEGER)((__INTEGER)(Self__J45G - len__F45G) -  1)]=((__CHARACTER *)Self__H45G->storage__VBS)[(__INTEGER)(Self__J45G -  1)];
-        Self__J45G=(__INTEGER)(Self__J45G +  1);
-      };
-      Self__H45G->count__KFC=(__INTEGER)(Self__H45G->count__KFC - len__F45G);
-    };
-    __tmp__1DL=old_position__XQI;
-    __tmp__4DL=(__INTEGER)(position__GBC -  1);
-    Self__NMM=__tmp__1DL;
-    while ((Self__NMM <= __tmp__4DL)) {
-      add_last__NLT(token__0BD,((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(Self__NMM -  1)]);
-      Self__NMM=(__INTEGER)(Self__NMM +  1);
-    };
-    insert_string__to__OXU(output_code__SI,token__0BD,beg__JDL);
-    short_derive__VBC=old_short_derive__5QI;
-  };
-  position__GBC=old_position__XQI;
-  pos_cur__JBC=old_pos_cur__ZQI;
-  pos_line__KBC=old_pos_line__1QI;
-  pos_col__LBC=old_pos_col__3QI;
+  __INTEGER beg__VDL,end__PKGH,len__RKGH,__tmp__SKGH,__tmp__UKGH;
+  __INTEGER Self__VKGH,__tmp__HEL,__tmp__KEL,Self__ZMM;
+  __STRING *Self__TKGH;
+  beg__VDL= 0;
+  if (is_shorter__5Y) {
+    ((__STRING *)token__GCD)->count__WFC= 0;
+    beg__VDL=(__INTEGER)(old_position__DRI + old_short_derive__LRI);
+    Self__TKGH=((__STRING *)output_code__SI);
+    end__PKGH=(__INTEGER)((__INTEGER)(position__SBC + short_derive__BCC) -  1);
+    len__RKGH=(__INTEGER)((__INTEGER)(end__PKGH - beg__VDL) +  1);
+    if ((len__RKGH >  0)) {
+      __tmp__SKGH=(__INTEGER)(end__PKGH +  1);
+      __tmp__UKGH=Self__TKGH->count__WFC;
+      Self__VKGH=__tmp__SKGH;
+      while ((Self__VKGH <= __tmp__UKGH)) {
+        ((__CHARACTER *)Self__TKGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__VKGH - len__RKGH) -  1)]=((__CHARACTER *)Self__TKGH->storage__BCS)[(__INTEGER)(Self__VKGH -  1)];
+        Self__VKGH=(__INTEGER)(Self__VKGH +  1);
+      };
+      Self__TKGH->count__WFC=(__INTEGER)(Self__TKGH->count__WFC - len__RKGH);
+    };
+    __tmp__HEL=old_position__DRI;
+    __tmp__KEL=(__INTEGER)(position__SBC -  1);
+    Self__ZMM=__tmp__HEL;
+    while ((Self__ZMM <= __tmp__KEL)) {
+      add_last__ZLT(token__GCD,((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(Self__ZMM -  1)]);
+      Self__ZMM=(__INTEGER)(Self__ZMM +  1);
+    };
+    insert_string__to__0XU(output_code__SI,token__GCD,beg__VDL);
+    short_derive__BCC=old_short_derive__LRI;
+  };
+  position__SBC=old_position__DRI;
+  pos_cur__VBC=old_pos_cur__FRI;
+  pos_line__WBC=old_pos_line__HRI;
+  pos_col__XBC=old_pos_col__JRI;
 }
 
-static void* read_expr_message__OVL(__PARSER *Self__PVL)
+static void* read_expr_message__0VL(__PARSER *Self__1VL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__M1L,*result__RVL;
-  __POSITION pos__QJSG,p__RAAB,pos__YJSG;
-  __ITM_OLD *result__FTGB;
-  __POINTER ptr__GTGB,ptr_table__VXBH,next__UXBH,result__WXBH;
-  __POINTER ptr_table__0XBH,next__ZXBH,result__1XBH;
-  __INTEGER typ_id__LTGB;
-  __UINTEGER_32 sz__ITGB,a__TQ4G,new_size__UQ4G,t__YQ4G,a__XQ4G;
-  __UINTEGER_32 new_size__3XBH,lab_type__2XBH;
-  __BOOLEAN result__TXBH,result__4XBH;
-  __CHARACTER result__5XBH;
-  result__M1L=NULL;
-  result__TXBH=read_word__EPF((&__string_8));
-  if (is_shorter__WY) {
-    if (result__TXBH) {
+  void *result__Y1L,*result__3VL;
+  __POSITION pos__U1XG,p__3AAB,pos__21XG;
+  __ITM_OLD *result__RTGB;
+  __POINTER ptr__STGB,ptr_table__JEIH,next__IEIH,result__KEIH;
+  __POINTER ptr_table__OEIH,next__NEIH,result__PEIH;
+  __INTEGER typ_id__XTGB;
+  __UINTEGER_32 sz__UTGB,a__I2EH,new_size__J2EH,t__N2EH,a__M2EH;
+  __UINTEGER_32 new_size__REIH,lab_type__QEIH;
+  __BOOLEAN result__HEIH,result__SEIH;
+  __CHARACTER result__TEIH;
+  result__Y1L=NULL;
+  result__HEIH=read_word__QPF((&__string_8));
+  if (is_shorter__5Y) {
+    if (result__HEIH) {
       if (((void *)(&__string_8) == (void *)(&__string_4))) {
-        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       } else {
-        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
+        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
       };
     };
   };
-  if (result__TXBH) {
-    if (((void *)read_expr__S4I(Self__PVL) == (void *)NULL)) {
-      pos__QJSG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_311));
-      put_position__IOG(pos__QJSG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  if (result__HEIH) {
+    if (((void *)read_expr__44I(Self__1VL) == (void *)NULL)) {
+      pos__U1XG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_321));
+      put_position__UOG(pos__U1XG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    p__RAAB=current_position__3WF();
-    result__FTGB=NULL;
-    ptr__GTGB=((__POINTER )(NULL));
-    typ_id__LTGB= 0;
-    sz__ITGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
-    if ((sz__ITGB ==  0)) {
-      result__FTGB=ITM_OLD__;
-    } else {
-      typ_id__LTGB=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__ITGB);
-      if ((typ_id__LTGB == (__INTEGER)(-  1))) {
-        a__TQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__UQ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__ITGB + a__TQ4G) & (__UINTEGER_32)(~ a__TQ4G));
-        ptr_table__VXBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UQ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__UXBH=((__POINTER )(NULL));
-        result__WXBH=((__POINTER *)ptr_table__VXBH)[ 0];
-        if ((result__WXBH == (void *)NULL)) {
-          result__WXBH=new_lab__ARJ(new_size__UQ4G);
-          next__UXBH=(void *)((unsigned long)result__WXBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UQ4G)));
-          ((__POINTER *)next__UXBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VXBH)[ 0]=next__UXBH;
-        } else {
-          next__UXBH=((__POINTER *)result__WXBH)[ 0];
-          if ((next__UXBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WXBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UQ4G <<  1)) <=  4096)) {
-              next__UXBH=(void *)((unsigned long)result__WXBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UQ4G)));
+    p__3AAB=current_position__JXF();
+    result__RTGB=NULL;
+    ptr__STGB=((__POINTER )(NULL));
+    typ_id__XTGB= 0;
+    sz__UTGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
+    if ((sz__UTGB ==  0)) {
+      result__RTGB=ITM_OLD__;
+    } else {
+      typ_id__XTGB=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__UTGB);
+      if ((typ_id__XTGB == (__INTEGER)(-  1))) {
+        a__I2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__J2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTGB + a__I2EH) & (__UINTEGER_32)(~ a__I2EH));
+        ptr_table__JEIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__IEIH=((__POINTER )(NULL));
+        result__KEIH=((__POINTER *)ptr_table__JEIH)[ 0];
+        if ((result__KEIH == (void *)NULL)) {
+          result__KEIH=new_lab__MRJ(new_size__J2EH);
+          next__IEIH=(void *)((unsigned long)result__KEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J2EH)));
+          ((__POINTER *)next__IEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JEIH)[ 0]=next__IEIH;
+        } else {
+          next__IEIH=((__POINTER *)result__KEIH)[ 0];
+          if ((next__IEIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KEIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J2EH <<  1)) <=  4096)) {
+              next__IEIH=(void *)((unsigned long)result__KEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J2EH)));
             } else {
-              next__UXBH=new_lab__ARJ(new_size__UQ4G);
-            };
-            ((__POINTER *)next__UXBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VXBH)[ 0]=next__UXBH;
-          } else {
-            ((__POINTER *)result__WXBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UXBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WXBH=next__UXBH;
-          };
-        };
-        ptr__GTGB=result__WXBH;
-      } else {
-        t__YQ4G=((__UINTEGER_32 )typ_id__LTGB);
-        a__XQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__3XBH=(__UINTEGER_32)((__UINTEGER_32)(sz__ITGB + a__XQ4G) & (__UINTEGER_32)(~ a__XQ4G));
-        ptr_table__0XBH=((__POINTER )(&(table_type[(t__YQ4G)])));
-        lab_type__2XBH=(__UINTEGER_32)(t__YQ4G |  1);
-        next__ZXBH=((__POINTER )(NULL));
-        result__1XBH=((__POINTER *)ptr_table__0XBH)[ 0];
-        if ((result__1XBH == (void *)NULL)) {
-          result__1XBH=new_lab__ARJ(lab_type__2XBH);
-          next__ZXBH=(void *)((unsigned long)result__1XBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3XBH)));
-          ((__POINTER *)next__ZXBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0XBH)[ 0]=next__ZXBH;
-        } else {
-          next__ZXBH=((__POINTER *)result__1XBH)[ 0];
-          if ((next__ZXBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1XBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__3XBH <<  1)) <=  4096)) {
-              next__ZXBH=(void *)((unsigned long)result__1XBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3XBH)));
+              next__IEIH=new_lab__MRJ(new_size__J2EH);
+            };
+            ((__POINTER *)next__IEIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JEIH)[ 0]=next__IEIH;
+          } else {
+            ((__POINTER *)result__KEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KEIH=next__IEIH;
+          };
+        };
+        ptr__STGB=result__KEIH;
+      } else {
+        t__N2EH=((__UINTEGER_32 )typ_id__XTGB);
+        a__M2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__REIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTGB + a__M2EH) & (__UINTEGER_32)(~ a__M2EH));
+        ptr_table__OEIH=((__POINTER )(&(table_type[(t__N2EH)])));
+        lab_type__QEIH=(__UINTEGER_32)(t__N2EH |  1);
+        next__NEIH=((__POINTER )(NULL));
+        result__PEIH=((__POINTER *)ptr_table__OEIH)[ 0];
+        if ((result__PEIH == (void *)NULL)) {
+          result__PEIH=new_lab__MRJ(lab_type__QEIH);
+          next__NEIH=(void *)((unsigned long)result__PEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REIH)));
+          ((__POINTER *)next__NEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OEIH)[ 0]=next__NEIH;
+        } else {
+          next__NEIH=((__POINTER *)result__PEIH)[ 0];
+          if ((next__NEIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PEIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__REIH <<  1)) <=  4096)) {
+              next__NEIH=(void *)((unsigned long)result__PEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REIH)));
             } else {
-              next__ZXBH=new_lab__ARJ(lab_type__2XBH);
+              next__NEIH=new_lab__MRJ(lab_type__QEIH);
             };
-            ((__POINTER *)next__ZXBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0XBH)[ 0]=next__ZXBH;
+            ((__POINTER *)next__NEIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OEIH)[ 0]=next__NEIH;
           } else {
-            ((__POINTER *)result__1XBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZXBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1XBH=next__ZXBH;
+            ((__POINTER *)result__PEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PEIH=next__NEIH;
           };
         };
-        ptr__GTGB=result__1XBH;
+        ptr__STGB=result__PEIH;
       };
-      result__FTGB=((__ITM_OLD *)ptr__GTGB);
-      *(result__FTGB) = *(ITM_OLD__);
+      result__RTGB=((__ITM_OLD *)ptr__STGB);
+      *(result__RTGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__FTGB)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ=p__RAAB;
-    result__M1L=result__FTGB;
+    ((__ITM_OLD *)result__RTGB)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ=p__3AAB;
+    result__Y1L=result__RTGB;
   } else {
-    result__M1L=read_expr_primary__23M(Self__PVL);
-    if (((void *)result__M1L == (void *)NULL)) {
-      result__M1L=read_send_msg__A4N(Self__PVL,NULL);
+    result__Y1L=read_expr_primary__I4M(Self__1VL);
+    if (((void *)result__Y1L == (void *)NULL)) {
+      result__Y1L=read_send_msg__M4N(Self__1VL,NULL);
     };
   };
-  result__RVL=result__M1L;
-  if (((void *)result__M1L != (void *)NULL)) {
-    while_do__2YM:
+  result__3VL=result__Y1L;
+  if (((void *)result__Y1L != (void *)NULL)) {
+    while_do__IZM:
     {
-      result__4XBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__4XBH=FALSE__;
+      result__SEIH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__SEIH=FALSE__;
       } else {
-        result__5XBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__5XBH=((__CHARACTER )(( 0)));
+        result__TEIH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__TEIH=((__CHARACTER )(( 0)));
         } else {
-          result__5XBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__TEIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__5XBH == '.')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__4XBH=TRUE__;
+        if ((result__TEIH == '.')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__SEIH=TRUE__;
         };
       };
-      if (result__4XBH) {
-        result__RVL=read_send_msg__A4N(Self__PVL,result__RVL);
-        if (((void *)result__RVL == (void *)NULL)) {
-          pos__YJSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_312));
-          put_position__IOG(pos__YJSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (result__SEIH) {
+        result__3VL=read_send_msg__M4N(Self__1VL,result__3VL);
+        if (((void *)result__3VL == (void *)NULL)) {
+          pos__21XG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_322));
+          put_position__UOG(pos__21XG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__2YM;
+        goto while_do__IZM;
       };
     };
   };
-  return(result__RVL);
+  return(result__3VL);
 }
 
-static void free__MVI(void *tmp__OVI)
+static void free__YVI(void *tmp__0VI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__M5T,__tmp__UAU,__tmp__Y3DC,Self__XAVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__K5T;
-  __BOOLEAN __tmp__15T;
-  void **__tmp__TAU,**new__E3DC;
-  ((__FAST_ARRAYoITM_CODEo *)tmp__OVI)->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(-  1);
-  Self__K5T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-  new_capacity__M5T= 0;
-  if (((__INTEGER)(Self__K5T->parent_arrayed_collection__U3H.upper__2VT +  1) <= (__INTEGER)(Self__K5T->parent_arrayed_collection__U3H.capacity__O5T -  1))) {
-    Self__K5T->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(Self__K5T->parent_arrayed_collection__U3H.upper__2VT +  1);
-    __tmp__15T=TRUE__;
+  __INTEGER new_capacity__Y5T,__tmp__ABU,__tmp__E4DC,Self__QBVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__W5T;
+  __BOOLEAN __tmp__HAU;
+  void **__tmp__5AU,**new__Q3DC;
+  ((__FAST_ARRAYoITM_CODEo *)tmp__0VI)->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(-  1);
+  Self__W5T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+  new_capacity__Y5T= 0;
+  if (((__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.upper__IWT +  1) <= (__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.capacity__05T -  1))) {
+    Self__W5T->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.upper__IWT +  1);
+    __tmp__HAU=TRUE__;
   } else {
-    __tmp__15T=FALSE__;
-  };
-  if ((! __tmp__15T)) {
-    if ((Self__K5T->parent_arrayed_collection__U3H.capacity__O5T ==  0)) {
-      Self__K5T->parent_arrayed_collection__U3H.storage__KAU=create__I1PB( 2);
-      Self__K5T->parent_arrayed_collection__U3H.capacity__O5T= 2;
-      Self__K5T->parent_arrayed_collection__U3H.upper__2VT= 0;
-    } else {
-      new_capacity__M5T=(__INTEGER)(Self__K5T->parent_arrayed_collection__U3H.capacity__O5T <<  1);
-      __tmp__TAU=Self__K5T->parent_arrayed_collection__U3H.storage__KAU;
-      __tmp__UAU=Self__K5T->parent_arrayed_collection__U3H.capacity__O5T;
-      new__E3DC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__TAU)),((__UINTEGER_32 )(__INTEGER)(__tmp__UAU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__M5T * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__Y3DC=(__INTEGER)(new_capacity__M5T -  1);
-      Self__XAVD=__tmp__UAU;
-      while ((Self__XAVD <= __tmp__Y3DC)) {
-        new__E3DC[Self__XAVD]=NULL;
-        Self__XAVD=(__INTEGER)(Self__XAVD +  1);
-      };
-      Self__K5T->parent_arrayed_collection__U3H.storage__KAU=new__E3DC;
-      Self__K5T->parent_arrayed_collection__U3H.capacity__O5T=new_capacity__M5T;
-      Self__K5T->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(Self__K5T->parent_arrayed_collection__U3H.upper__2VT +  1);
-    };
-  };
-  ((void **)Self__K5T->parent_arrayed_collection__U3H.storage__KAU)[Self__K5T->parent_arrayed_collection__U3H.upper__2VT]=tmp__OVI;
+    __tmp__HAU=FALSE__;
+  };
+  if ((! __tmp__HAU)) {
+    if ((Self__W5T->parent_arrayed_collection__A4H.capacity__05T ==  0)) {
+      Self__W5T->parent_arrayed_collection__A4H.storage__WAU=create__U1PB( 2);
+      Self__W5T->parent_arrayed_collection__A4H.capacity__05T= 2;
+      Self__W5T->parent_arrayed_collection__A4H.upper__IWT= 0;
+    } else {
+      new_capacity__Y5T=(__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.capacity__05T <<  1);
+      __tmp__5AU=Self__W5T->parent_arrayed_collection__A4H.storage__WAU;
+      __tmp__ABU=Self__W5T->parent_arrayed_collection__A4H.capacity__05T;
+      new__Q3DC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__5AU)),((__UINTEGER_32 )(__INTEGER)(__tmp__ABU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Y5T * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__E4DC=(__INTEGER)(new_capacity__Y5T -  1);
+      Self__QBVD=__tmp__ABU;
+      while ((Self__QBVD <= __tmp__E4DC)) {
+        new__Q3DC[Self__QBVD]=NULL;
+        Self__QBVD=(__INTEGER)(Self__QBVD +  1);
+      };
+      Self__W5T->parent_arrayed_collection__A4H.storage__WAU=new__Q3DC;
+      Self__W5T->parent_arrayed_collection__A4H.capacity__05T=new_capacity__Y5T;
+      Self__W5T->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.upper__IWT +  1);
+    };
+  };
+  ((void **)Self__W5T->parent_arrayed_collection__A4H.storage__WAU)[Self__W5T->parent_arrayed_collection__A4H.upper__IWT]=tmp__0VI;
 }
 
-static void put__to__like__2MLF(void *tok__4MLF,void *buf__5MLF,void *key__ANLF)
+static void put__to__like__UUEG(void *tok__WUEG,void *buf__XUEG,void *key__YUEG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__MNLF,Self__4WMF;
-  void *lst__BNLF;
-  lst__BNLF=fast_reference_at__TR4D(short_dico__QD,key__ANLF);
-  if (((void *)lst__BNLF != (void *)NULL)) {
-    __tmp__MNLF=((__LINKED_LISToSTRING_CONSTANTo *)lst__BNLF)->parent_linked_collection__LD.upper__TCD;
-    Self__4WMF= 1;
-    while ((Self__4WMF <= __tmp__MNLF)) {
-      if (((void *)item__M0ND(lst__BNLF,Self__4WMF) == (void *)NULL)) {
-        append__VNS(buf__5MLF,tok__4MLF);
+  __INTEGER __tmp__EVEG,Self__HDGG;
+  void *lst__ZUEG;
+  lst__ZUEG=fast_reference_at__E34D(short_dico__QD,key__YUEG);
+  if (((void *)lst__ZUEG != (void *)NULL)) {
+    __tmp__EVEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__ZUEG)->parent_linked_collection__LD.upper__5CD;
+    Self__HDGG= 1;
+    while ((Self__HDGG <= __tmp__EVEG)) {
+      if (((void *)item__Y0ND(lst__ZUEG,Self__HDGG) == (void *)NULL)) {
+        append__BOS(buf__XUEG,tok__WUEG);
       } else {
-        append__VNS(buf__5MLF,item__M0ND(lst__BNLF,Self__4WMF));
+        append__BOS(buf__XUEG,item__Y0ND(lst__ZUEG,Self__HDGG));
       };
-      Self__4WMF=(__INTEGER)(Self__4WMF +  1);
+      Self__HDGG=(__INTEGER)(Self__HDGG +  1);
     };
   };
 }
 
-static void put__to__like__VRPF(void *tok__XRPF,void *buf__YRPF,void *key__ZRPF)
+static void put__to__like__YZBG(void *tok__0ZBG,void *buf__1ZBG,void *key__2ZBG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__FSPF,Self__2QYF;
-  void *lst__0RPF;
-  lst__0RPF=fast_reference_at__TR4D(short_dico__QD,key__ZRPF);
-  if (((void *)lst__0RPF != (void *)NULL)) {
-    __tmp__FSPF=((__LINKED_LISToSTRING_CONSTANTo *)lst__0RPF)->parent_linked_collection__LD.upper__TCD;
-    Self__2QYF= 1;
-    while ((Self__2QYF <= __tmp__FSPF)) {
-      if (((void *)item__M0ND(lst__0RPF,Self__2QYF) == (void *)NULL)) {
-        append__VNS(buf__YRPF,tok__XRPF);
+  __INTEGER __tmp__I0BG,Self__FIFG;
+  void *lst__3ZBG;
+  lst__3ZBG=fast_reference_at__E34D(short_dico__QD,key__2ZBG);
+  if (((void *)lst__3ZBG != (void *)NULL)) {
+    __tmp__I0BG=((__LINKED_LISToSTRING_CONSTANTo *)lst__3ZBG)->parent_linked_collection__LD.upper__5CD;
+    Self__FIFG= 1;
+    while ((Self__FIFG <= __tmp__I0BG)) {
+      if (((void *)item__Y0ND(lst__3ZBG,Self__FIFG) == (void *)NULL)) {
+        append__BOS(buf__1ZBG,tok__0ZBG);
       } else {
-        append__VNS(buf__YRPF,item__M0ND(lst__0RPF,Self__2QYF));
+        append__BOS(buf__1ZBG,item__Y0ND(lst__3ZBG,Self__FIFG));
       };
-      Self__2QYF=(__INTEGER)(Self__2QYF +  1);
+      Self__FIFG=(__INTEGER)(Self__FIFG +  1);
     };
   };
 }
 
-static void put__to__like__3WKF(void *tok__5WKF,void *buf__AXKF)
+static void put__to__like__GWDG(void *tok__IWDG,void *buf__JWDG)
 // ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__NXKF,Self__5NMF;
-  void *lst__CXKF;
-  lst__CXKF=fast_reference_at__TR4D(short_dico__QD,(&__string_133));
-  if (((void *)lst__CXKF != (void *)NULL)) {
-    __tmp__NXKF=((__LINKED_LISToSTRING_CONSTANTo *)lst__CXKF)->parent_linked_collection__LD.upper__TCD;
-    Self__5NMF= 1;
-    while ((Self__5NMF <= __tmp__NXKF)) {
-      if (((void *)item__M0ND(lst__CXKF,Self__5NMF) == (void *)NULL)) {
-        append__VNS(buf__AXKF,tok__5WKF);
+  __INTEGER __tmp__WWDG,Self__UVFG;
+  void *lst__LWDG;
+  lst__LWDG=fast_reference_at__E34D(short_dico__QD,(&__string_133));
+  if (((void *)lst__LWDG != (void *)NULL)) {
+    __tmp__WWDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__LWDG)->parent_linked_collection__LD.upper__5CD;
+    Self__UVFG= 1;
+    while ((Self__UVFG <= __tmp__WWDG)) {
+      if (((void *)item__Y0ND(lst__LWDG,Self__UVFG) == (void *)NULL)) {
+        append__BOS(buf__JWDG,tok__IWDG);
       } else {
-        append__VNS(buf__AXKF,item__M0ND(lst__CXKF,Self__5NMF));
+        append__BOS(buf__JWDG,item__Y0ND(lst__LWDG,Self__UVFG));
       };
-      Self__5NMF=(__INTEGER)(Self__5NMF +  1);
+      Self__UVFG=(__INTEGER)(Self__UVFG +  1);
     };
   };
 }
 
-static void put__to__like__JZKF(void *tok__LZKF,void *buf__MZKF,void *key__NZKF)
+static void put__to__like__SYDG(void *tok__UYDG,void *buf__VYDG,void *key__WYDG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__ZZKF,Self__QOMF;
-  void *lst__OZKF;
-  lst__OZKF=fast_reference_at__TR4D(short_dico__QD,key__NZKF);
-  if (((void *)lst__OZKF != (void *)NULL)) {
-    __tmp__ZZKF=((__LINKED_LISToSTRING_CONSTANTo *)lst__OZKF)->parent_linked_collection__LD.upper__TCD;
-    Self__QOMF= 1;
-    while ((Self__QOMF <= __tmp__ZZKF)) {
-      if (((void *)item__M0ND(lst__OZKF,Self__QOMF) == (void *)NULL)) {
-        append__VNS(buf__MZKF,tok__LZKF);
+  __INTEGER __tmp__CZDG,Self__FWFG;
+  void *lst__XYDG;
+  lst__XYDG=fast_reference_at__E34D(short_dico__QD,key__WYDG);
+  if (((void *)lst__XYDG != (void *)NULL)) {
+    __tmp__CZDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__XYDG)->parent_linked_collection__LD.upper__5CD;
+    Self__FWFG= 1;
+    while ((Self__FWFG <= __tmp__CZDG)) {
+      if (((void *)item__Y0ND(lst__XYDG,Self__FWFG) == (void *)NULL)) {
+        append__BOS(buf__VYDG,tok__UYDG);
       } else {
-        append__VNS(buf__MZKF,item__M0ND(lst__OZKF,Self__QOMF));
+        append__BOS(buf__VYDG,item__Y0ND(lst__XYDG,Self__FWFG));
       };
-      Self__QOMF=(__INTEGER)(Self__QOMF +  1);
+      Self__FWFG=(__INTEGER)(Self__FWFG +  1);
     };
   };
 }
 
-static __BOOLEAN is_hexadecimal_digit__X4IE(__CHARACTER Self__Y4IE)
+static __BOOLEAN is_hexadecimal_digit__AOJE(__CHARACTER Self__BOJE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __BOOLEAN result__04IE,result__3K2G,__tmp__C5IE,__tmp__R5IE;
-  __BOOLEAN result__EUNE;
-  result__04IE=FALSE__;
-  result__3K2G=FALSE__;
-  if ((((__INTEGER_8 )Self__Y4IE) >= ((__INTEGER_8 )'0'))) {
-    result__3K2G=(((__INTEGER_8 )Self__Y4IE) <= ((__INTEGER_8 )'9'));
-  };
-  if (result__3K2G) {
-    result__04IE=TRUE__;
-    __tmp__C5IE=TRUE__;
+  __BOOLEAN result__DOJE,result__YWCH,__tmp__LOJE,__tmp__0OJE;
+  __BOOLEAN result__GEOE;
+  result__DOJE=FALSE__;
+  result__YWCH=FALSE__;
+  if ((((__INTEGER_8 )Self__BOJE) >= ((__INTEGER_8 )'0'))) {
+    result__YWCH=(((__INTEGER_8 )Self__BOJE) <= ((__INTEGER_8 )'9'));
+  };
+  if (result__YWCH) {
+    result__DOJE=TRUE__;
+    __tmp__LOJE=TRUE__;
   } else {
-    __tmp__C5IE=FALSE__;
+    __tmp__LOJE=FALSE__;
   };
-  if (__tmp__C5IE) {
-    __tmp__R5IE=TRUE__;
+  if (__tmp__LOJE) {
+    __tmp__0OJE=TRUE__;
   } else {
-    result__EUNE=(((__INTEGER_8 )Self__Y4IE) >= ((__INTEGER_8 )'a'));
-    if (result__EUNE) {
-      result__04IE=(((__INTEGER_8 )Self__Y4IE) <= ((__INTEGER_8 )'f'));
+    result__GEOE=(((__INTEGER_8 )Self__BOJE) >= ((__INTEGER_8 )'a'));
+    if (result__GEOE) {
+      result__DOJE=(((__INTEGER_8 )Self__BOJE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__R5IE=result__EUNE;
+    __tmp__0OJE=result__GEOE;
   };
-  if ((! __tmp__R5IE)) {
-    if ((((__INTEGER_8 )Self__Y4IE) >= ((__INTEGER_8 )'A'))) {
-      result__04IE=(((__INTEGER_8 )Self__Y4IE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__0OJE)) {
+    if ((((__INTEGER_8 )Self__BOJE) >= ((__INTEGER_8 )'A'))) {
+      result__DOJE=(((__INTEGER_8 )Self__BOJE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__04IE);
+  return(result__DOJE);
 }
 
-static void* read_constant__PQO()
+static void* read_constant__1QO()
 // () With resultNo recursive, No inlinable.
 {
-  void *result__SQO;
-  __INTEGER pos_old__D5O,typ_id__SPQ,typ_id__KQMB,old_pos__UBQ;
-  __INTEGER count__VBQ,typ_id__4RMB,typ_id__STMB;
-  __POSITION pos__NRSG,__tmp__0QO,__tmp__MRO,pos__NSSG,pos__PSSG;
-  __POSITION __tmp__4RO,__tmp__PSO;
-  __ITM_REAL *result__MPQ;
-  __POINTER ptr__NPQ,ptr_table__CYBH,next__BYBH,result__DYBH;
-  __POINTER ptr_table__HYBH,next__GYBH,result__IYBH,ptr__FQMB;
-  __POINTER ptr_table__MYBH,next__LYBH,result__NYBH,ptr_table__RYBH;
-  __POINTER next__QYBH,result__SYBH,ptr__ZRMB,ptr_table__WYBH;
-  __POINTER next__VYBH,result__XYBH,ptr_table__1YBH,next__0YBH;
-  __POINTER result__2YBH,ptr__NTMB,ptr_table__AZBH,next__5YBH;
-  __POINTER result__BZBH,ptr_table__FZBH,next__EZBH,result__GZBH;
-  __UINTEGER_32 sz__PPQ,a__JR4G,new_size__KR4G,t__OR4G,a__NR4G;
-  __UINTEGER_32 new_size__KYBH,lab_type__JYBH,sz__HQMB,a__RR4G;
-  __UINTEGER_32 new_size__SR4G,t__WR4G,a__VR4G,new_size__UYBH;
-  __UINTEGER_32 lab_type__TYBH,sz__1RMB,a__ZR4G,new_size__0R4G,t__4R4G;
-  __UINTEGER_32 a__3R4G,new_size__4YBH,lab_type__3YBH,sz__PTMB,a__BS4G;
-  __UINTEGER_32 new_size__CS4G,t__GS4G,a__FS4G,new_size__IZBH;
-  __UINTEGER_32 lab_type__HZBH;
-  __ITM_NUMBER *result__EQMB;
-  __ITM_CHARACTER *result__YRMB;
-  __ITM_STRING *result__MTMB;
-  __BOOLEAN result__C5O,result__HL2G,__tmp__O5O,result__UL2G,__tmp__IAP;
-  __BOOLEAN result__QM2G,result__3M2G,__tmp__VCP,result__4N2G;
-  __BOOLEAN result__LO2G,__tmp__5QO,__tmp__RRO,result__VFP,__tmp__CSO;
-  __BOOLEAN result__TBQ,__tmp__5BQ,__tmp__4CQ,__tmp__5CQ;
-  __CHARACTER result__5PZG,result__FQZG,result__GQZG,result__HQZG;
-  __CHARACTER result__IQZG,result__JQZG,result__KQZG,result__LQZG;
-  __CHARACTER result__MQZG,result__NQZG,result__OQZG,result__PQZG;
-  __CHARACTER result__QQZG,result__RQZG,result__SQZG,result__TQZG;
-  __CHARACTER result__UQZG,result__VQZG,result__WQZG,result__XQZG;
-  __CHARACTER result__3QZG,result__4QZG,result__5QZG,result__ARZG;
-  __CHARACTER result__BRZG,result__CRZG;
-  result__SQO=NULL;
-  result__C5O=FALSE__;
-  pos_old__D5O= 0;
-  if (read_space__RRD()) {
-    result__5PZG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__5PZG=((__CHARACTER )(( 0)));
-    } else {
-      result__5PZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-    };
-    result__HL2G=FALSE__;
-    if ((((__INTEGER_8 )result__5PZG) >= ((__INTEGER_8 )'0'))) {
-      result__HL2G=(((__INTEGER_8 )result__5PZG) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__O5O=result__HL2G;
+  void *result__4QO;
+  __INTEGER pos_old__P5O,typ_id__4PQ,typ_id__WQMB,old_pos__ACQ;
+  __INTEGER count__BCQ,typ_id__KSMB,typ_id__4TMB;
+  __POSITION pos__DDYG,__tmp__GRO,__tmp__YRO,pos__DEYG,pos__FEYG;
+  __POSITION __tmp__KSO,__tmp__1SO;
+  __ITM_REAL *result__YPQ;
+  __POINTER ptr__ZPQ,ptr_table__WEIH,next__VEIH,result__XEIH;
+  __POINTER ptr_table__1EIH,next__0EIH,result__2EIH,ptr__RQMB;
+  __POINTER ptr_table__AFIH,next__5EIH,result__BFIH,ptr_table__FFIH;
+  __POINTER next__EFIH,result__GFIH,ptr__FSMB,ptr_table__KFIH;
+  __POINTER next__JFIH,result__LFIH,ptr_table__PFIH,next__OFIH;
+  __POINTER result__QFIH,ptr__ZTMB,ptr_table__UFIH,next__TFIH;
+  __POINTER result__VFIH,ptr_table__ZFIH,next__YFIH,result__0FIH;
+  __UINTEGER_32 sz__1PQ,a__42EH,new_size__52EH,t__D3EH,a__C3EH;
+  __UINTEGER_32 new_size__4EIH,lab_type__3EIH,sz__TQMB,a__G3EH;
+  __UINTEGER_32 new_size__H3EH,t__L3EH,a__K3EH,new_size__IFIH;
+  __UINTEGER_32 lab_type__HFIH,sz__HSMB,a__O3EH,new_size__P3EH,t__T3EH;
+  __UINTEGER_32 a__S3EH,new_size__SFIH,lab_type__RFIH,sz__1TMB,a__W3EH;
+  __UINTEGER_32 new_size__X3EH,t__13EH,a__03EH,new_size__2FIH;
+  __UINTEGER_32 lab_type__1FIH;
+  __ITM_NUMBER *result__QQMB;
+  __ITM_CHARACTER *result__ESMB;
+  __ITM_STRING *result__YTMB;
+  __BOOLEAN result__O5O,result__5WCH,__tmp__05O,result__KXCH,__tmp__UAP;
+  __BOOLEAN result__BYCH,result__MYCH,__tmp__BDP,result__HZCH;
+  __BOOLEAN result__SZCH,__tmp__LRO,__tmp__3RO,result__BGP,__tmp__OSO;
+  __BOOLEAN result__5BQ,__tmp__LCQ,__tmp__KDQ,__tmp__LDQ;
+  __CHARACTER result__ZU5G,result__DV5G,result__IV5G,result__NV5G;
+  __CHARACTER result__SV5G,result__XV5G,result__2V5G,result__BW5G;
+  __CHARACTER result__GW5G,result__LW5G,result__QW5G,result__VW5G;
+  __CHARACTER result__0W5G,result__5W5G,result__EX5G,result__JX5G;
+  __CHARACTER result__OX5G,result__TX5G,result__YX5G,result__3X5G;
+  __CHARACTER result__HY5G,result__QY5G,result__VY5G,result__0Y5G;
+  __CHARACTER result__5Y5G,result__EZ5G;
+  result__4QO=NULL;
+  result__O5O=FALSE__;
+  pos_old__P5O= 0;
+  if (read_space__3RD()) {
+    result__ZU5G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__ZU5G=((__CHARACTER )(( 0)));
+    } else {
+      result__ZU5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    };
+    result__5WCH=FALSE__;
+    if ((((__INTEGER_8 )result__ZU5G) >= ((__INTEGER_8 )'0'))) {
+      result__5WCH=(((__INTEGER_8 )result__ZU5G) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__05O=result__5WCH;
   } else {
-    __tmp__O5O=FALSE__;
+    __tmp__05O=FALSE__;
   };
-  if (__tmp__O5O) {
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    result__FQZG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__FQZG=((__CHARACTER )(( 0)));
+  if (__tmp__05O) {
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    result__DV5G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__DV5G=((__CHARACTER )(( 0)));
     } else {
-      result__FQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__DV5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    add_last__NLT(string_tmp__VH,result__FQZG);
-    pos_old__D5O=position__GBC;
-    position__GBC=(__INTEGER)(position__GBC +  1);
-    while_do__4QZD:
+    add_last__ZLT(string_tmp__VH,result__DV5G);
+    pos_old__P5O=position__SBC;
+    position__SBC=(__INTEGER)(position__SBC +  1);
+    while_do__P2ZD:
     {
-      result__GQZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__GQZG=((__CHARACTER )(( 0)));
+      result__IV5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__IV5G=((__CHARACTER )(( 0)));
       } else {
-        result__GQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__IV5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      result__UL2G=FALSE__;
-      if ((((__INTEGER_8 )result__GQZG) >= ((__INTEGER_8 )'0'))) {
-        result__UL2G=(((__INTEGER_8 )result__GQZG) <= ((__INTEGER_8 )'9'));
+      result__KXCH=FALSE__;
+      if ((((__INTEGER_8 )result__IV5G) >= ((__INTEGER_8 )'0'))) {
+        result__KXCH=(((__INTEGER_8 )result__IV5G) <= ((__INTEGER_8 )'9'));
       };
-      if (result__UL2G) {
-        __tmp__IAP=TRUE__;
+      if (result__KXCH) {
+        __tmp__UAP=TRUE__;
       } else {
-        result__HQZG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__HQZG=((__CHARACTER )(( 0)));
+        result__NV5G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__NV5G=((__CHARACTER )(( 0)));
         } else {
-          result__HQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__NV5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        __tmp__IAP=(result__HQZG == '_');
+        __tmp__UAP=(result__NV5G == '_');
       };
-      if (__tmp__IAP) {
-        result__IQZG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__IQZG=((__CHARACTER )(( 0)));
+      if (__tmp__UAP) {
+        result__SV5G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__SV5G=((__CHARACTER )(( 0)));
         } else {
-          result__IQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__SV5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__IQZG != '_')) {
-          result__JQZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__JQZG=((__CHARACTER )(( 0)));
+        if ((result__SV5G != '_')) {
+          result__XV5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__XV5G=((__CHARACTER )(( 0)));
           } else {
-            result__JQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__XV5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__JQZG);
+          add_last__ZLT(string_tmp__VH,result__XV5G);
         };
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        goto while_do__4QZD;
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        goto while_do__P2ZD;
       };
     };
-    result__KQZG='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__KQZG=((__CHARACTER )(( 0)));
+    result__2V5G='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__2V5G=((__CHARACTER )(( 0)));
     } else {
-      result__KQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__2V5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__KQZG == '.')) {
-      add_last__NLT(string_tmp__VH,'.');
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__LQZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__LQZG=((__CHARACTER )(( 0)));
+    if ((result__2V5G == '.')) {
+      add_last__ZLT(string_tmp__VH,'.');
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__BW5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__BW5G=((__CHARACTER )(( 0)));
       } else {
-        result__LQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__BW5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      result__QM2G=FALSE__;
-      if ((((__INTEGER_8 )result__LQZG) >= ((__INTEGER_8 )'0'))) {
-        result__QM2G=(((__INTEGER_8 )result__LQZG) <= ((__INTEGER_8 )'9'));
+      result__BYCH=FALSE__;
+      if ((((__INTEGER_8 )result__BW5G) >= ((__INTEGER_8 )'0'))) {
+        result__BYCH=(((__INTEGER_8 )result__BW5G) <= ((__INTEGER_8 )'9'));
       };
-      if (result__QM2G) {
-        result__C5O=TRUE__;
-        result__MQZG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__MQZG=((__CHARACTER )(( 0)));
+      if (result__BYCH) {
+        result__O5O=TRUE__;
+        result__GW5G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__GW5G=((__CHARACTER )(( 0)));
         } else {
-          result__MQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__GW5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        add_last__NLT(string_tmp__VH,result__MQZG);
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        while_do__O0OE:
+        add_last__ZLT(string_tmp__VH,result__GW5G);
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        while_do__2KPE:
         {
-          result__NQZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__NQZG=((__CHARACTER )(( 0)));
+          result__LW5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__LW5G=((__CHARACTER )(( 0)));
           } else {
-            result__NQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__LW5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          result__3M2G=FALSE__;
-          if ((((__INTEGER_8 )result__NQZG) >= ((__INTEGER_8 )'0'))) {
-            result__3M2G=(((__INTEGER_8 )result__NQZG) <= ((__INTEGER_8 )'9'));
+          result__MYCH=FALSE__;
+          if ((((__INTEGER_8 )result__LW5G) >= ((__INTEGER_8 )'0'))) {
+            result__MYCH=(((__INTEGER_8 )result__LW5G) <= ((__INTEGER_8 )'9'));
           };
-          if (result__3M2G) {
-            result__OQZG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__OQZG=((__CHARACTER )(( 0)));
+          if (result__MYCH) {
+            result__QW5G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__QW5G=((__CHARACTER )(( 0)));
             } else {
-              result__OQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__QW5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            add_last__NLT(string_tmp__VH,result__OQZG);
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            goto while_do__O0OE;
+            add_last__ZLT(string_tmp__VH,result__QW5G);
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            goto while_do__2KPE;
           };
         };
       };
-      result__PQZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__PQZG=((__CHARACTER )(( 0)));
+      result__VW5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__VW5G=((__CHARACTER )(( 0)));
       } else {
-        result__PQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__VW5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__PQZG == 'E')) {
-        result__C5O=TRUE__;
-        add_last__NLT(string_tmp__VH,'E');
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__QQZG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__QQZG=((__CHARACTER )(( 0)));
+      if ((result__VW5G == 'E')) {
+        result__O5O=TRUE__;
+        add_last__ZLT(string_tmp__VH,'E');
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__0W5G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__0W5G=((__CHARACTER )(( 0)));
         } else {
-          result__QQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__0W5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__QQZG == '+')) {
-          __tmp__VCP=TRUE__;
+        if ((result__0W5G == '+')) {
+          __tmp__BDP=TRUE__;
         } else {
-          result__RQZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__RQZG=((__CHARACTER )(( 0)));
+          result__5W5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__5W5G=((__CHARACTER )(( 0)));
           } else {
-            result__RQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__5W5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__VCP=(result__RQZG == '-');
+          __tmp__BDP=(result__5W5G == '-');
         };
-        if (__tmp__VCP) {
-          result__SQZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__SQZG=((__CHARACTER )(( 0)));
+        if (__tmp__BDP) {
+          result__EX5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__EX5G=((__CHARACTER )(( 0)));
           } else {
-            result__SQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__EX5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__SQZG);
-          position__GBC=(__INTEGER)(position__GBC +  1);
+          add_last__ZLT(string_tmp__VH,result__EX5G);
+          position__SBC=(__INTEGER)(position__SBC +  1);
         };
-        result__TQZG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__TQZG=((__CHARACTER )(( 0)));
+        result__JX5G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__JX5G=((__CHARACTER )(( 0)));
         } else {
-          result__TQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__JX5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        result__4N2G=FALSE__;
-        if ((((__INTEGER_8 )result__TQZG) >= ((__INTEGER_8 )'0'))) {
-          result__4N2G=(((__INTEGER_8 )result__TQZG) <= ((__INTEGER_8 )'9'));
+        result__HZCH=FALSE__;
+        if ((((__INTEGER_8 )result__JX5G) >= ((__INTEGER_8 )'0'))) {
+          result__HZCH=(((__INTEGER_8 )result__JX5G) <= ((__INTEGER_8 )'9'));
         };
-        if (result__4N2G) {
-          result__UQZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__UQZG=((__CHARACTER )(( 0)));
+        if (result__HZCH) {
+          result__OX5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__OX5G=((__CHARACTER )(( 0)));
           } else {
-            result__UQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__OX5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__UQZG);
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          while_do__TMQE:
+          add_last__ZLT(string_tmp__VH,result__OX5G);
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          while_do__R2QE:
           {
-            result__VQZG='\0';
-            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-              result__VQZG=((__CHARACTER )(( 0)));
+            result__TX5G='\0';
+            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+              result__TX5G=((__CHARACTER )(( 0)));
             } else {
-              result__VQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+              result__TX5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
             };
-            result__LO2G=FALSE__;
-            if ((((__INTEGER_8 )result__VQZG) >= ((__INTEGER_8 )'0'))) {
-              result__LO2G=(((__INTEGER_8 )result__VQZG) <= ((__INTEGER_8 )'9'));
+            result__SZCH=FALSE__;
+            if ((((__INTEGER_8 )result__TX5G) >= ((__INTEGER_8 )'0'))) {
+              result__SZCH=(((__INTEGER_8 )result__TX5G) <= ((__INTEGER_8 )'9'));
             };
-            if (result__LO2G) {
-              result__WQZG='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__WQZG=((__CHARACTER )(( 0)));
+            if (result__SZCH) {
+              result__YX5G='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__YX5G=((__CHARACTER )(( 0)));
               } else {
-                result__WQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__YX5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              add_last__NLT(string_tmp__VH,result__WQZG);
-              position__GBC=(__INTEGER)(position__GBC +  1);
-              goto while_do__TMQE;
+              add_last__ZLT(string_tmp__VH,result__YX5G);
+              position__SBC=(__INTEGER)(position__SBC +  1);
+              goto while_do__R2QE;
             };
           };
         } else {
-          pos__NRSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_313));
-          put_position__IOG(pos__NRSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+          pos__DDYG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_323));
+          put_position__UOG(pos__DDYG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__C5O) {
-      get__2VB(string_tmp__VH);
+    if (result__O5O) {
+      get__IWB(string_tmp__VH);
     } else {
-      position__GBC=pos_old__D5O;
+      position__SBC=pos_old__P5O;
     };
   };
-  if (result__C5O) {
-    short__token__to__5AD((&__string_121),pos_old__D5O,position__GBC);
+  if (result__O5O) {
+    short__token__to__LBD((&__string_121),pos_old__P5O,position__SBC);
   };
-  if (result__C5O) {
-    __tmp__0QO=current_position__3WF();
-    result__MPQ=NULL;
-    ptr__NPQ=((__POINTER )(NULL));
-    typ_id__SPQ= 0;
-    sz__PPQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
-    if ((sz__PPQ ==  0)) {
-      result__MPQ=ITM_REAL__;
+  if (result__O5O) {
+    __tmp__GRO=current_position__JXF();
+    result__YPQ=NULL;
+    ptr__ZPQ=((__POINTER )(NULL));
+    typ_id__4PQ= 0;
+    sz__1PQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
+    if ((sz__1PQ ==  0)) {
+      result__YPQ=ITM_REAL__;
     } else {
-      typ_id__SPQ=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__PPQ);
-      if ((typ_id__SPQ == (__INTEGER)(-  1))) {
-        a__JR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__KR4G=(__UINTEGER_32)((__UINTEGER_32)(sz__PPQ + a__JR4G) & (__UINTEGER_32)(~ a__JR4G));
-        ptr_table__CYBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KR4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__BYBH=((__POINTER )(NULL));
-        result__DYBH=((__POINTER *)ptr_table__CYBH)[ 0];
-        if ((result__DYBH == (void *)NULL)) {
-          result__DYBH=new_lab__ARJ(new_size__KR4G);
-          next__BYBH=(void *)((unsigned long)result__DYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KR4G)));
-          ((__POINTER *)next__BYBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CYBH)[ 0]=next__BYBH;
+      typ_id__4PQ=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1PQ);
+      if ((typ_id__4PQ == (__INTEGER)(-  1))) {
+        a__42EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__52EH=(__UINTEGER_32)((__UINTEGER_32)(sz__1PQ + a__42EH) & (__UINTEGER_32)(~ a__42EH));
+        ptr_table__WEIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__52EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__VEIH=((__POINTER )(NULL));
+        result__XEIH=((__POINTER *)ptr_table__WEIH)[ 0];
+        if ((result__XEIH == (void *)NULL)) {
+          result__XEIH=new_lab__MRJ(new_size__52EH);
+          next__VEIH=(void *)((unsigned long)result__XEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52EH)));
+          ((__POINTER *)next__VEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WEIH)[ 0]=next__VEIH;
         } else {
-          next__BYBH=((__POINTER *)result__DYBH)[ 0];
-          if ((next__BYBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DYBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__KR4G <<  1)) <=  4096)) {
-              next__BYBH=(void *)((unsigned long)result__DYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KR4G)));
+          next__VEIH=((__POINTER *)result__XEIH)[ 0];
+          if ((next__VEIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XEIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__52EH <<  1)) <=  4096)) {
+              next__VEIH=(void *)((unsigned long)result__XEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52EH)));
             } else {
-              next__BYBH=new_lab__ARJ(new_size__KR4G);
-            };
-            ((__POINTER *)next__BYBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CYBH)[ 0]=next__BYBH;
-          } else {
-            ((__POINTER *)result__DYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DYBH=next__BYBH;
-          };
-        };
-        ptr__NPQ=result__DYBH;
-      } else {
-        t__OR4G=((__UINTEGER_32 )typ_id__SPQ);
-        a__NR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__KYBH=(__UINTEGER_32)((__UINTEGER_32)(sz__PPQ + a__NR4G) & (__UINTEGER_32)(~ a__NR4G));
-        ptr_table__HYBH=((__POINTER )(&(table_type[(t__OR4G)])));
-        lab_type__JYBH=(__UINTEGER_32)(t__OR4G |  1);
-        next__GYBH=((__POINTER )(NULL));
-        result__IYBH=((__POINTER *)ptr_table__HYBH)[ 0];
-        if ((result__IYBH == (void *)NULL)) {
-          result__IYBH=new_lab__ARJ(lab_type__JYBH);
-          next__GYBH=(void *)((unsigned long)result__IYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KYBH)));
-          ((__POINTER *)next__GYBH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HYBH)[ 0]=next__GYBH;
-        } else {
-          next__GYBH=((__POINTER *)result__IYBH)[ 0];
-          if ((next__GYBH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IYBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__KYBH <<  1)) <=  4096)) {
-              next__GYBH=(void *)((unsigned long)result__IYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KYBH)));
+              next__VEIH=new_lab__MRJ(new_size__52EH);
+            };
+            ((__POINTER *)next__VEIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WEIH)[ 0]=next__VEIH;
+          } else {
+            ((__POINTER *)result__XEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XEIH=next__VEIH;
+          };
+        };
+        ptr__ZPQ=result__XEIH;
+      } else {
+        t__D3EH=((__UINTEGER_32 )typ_id__4PQ);
+        a__C3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4EIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1PQ + a__C3EH) & (__UINTEGER_32)(~ a__C3EH));
+        ptr_table__1EIH=((__POINTER )(&(table_type[(t__D3EH)])));
+        lab_type__3EIH=(__UINTEGER_32)(t__D3EH |  1);
+        next__0EIH=((__POINTER )(NULL));
+        result__2EIH=((__POINTER *)ptr_table__1EIH)[ 0];
+        if ((result__2EIH == (void *)NULL)) {
+          result__2EIH=new_lab__MRJ(lab_type__3EIH);
+          next__0EIH=(void *)((unsigned long)result__2EIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EIH)));
+          ((__POINTER *)next__0EIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1EIH)[ 0]=next__0EIH;
+        } else {
+          next__0EIH=((__POINTER *)result__2EIH)[ 0];
+          if ((next__0EIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2EIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4EIH <<  1)) <=  4096)) {
+              next__0EIH=(void *)((unsigned long)result__2EIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EIH)));
             } else {
-              next__GYBH=new_lab__ARJ(lab_type__JYBH);
+              next__0EIH=new_lab__MRJ(lab_type__3EIH);
             };
-            ((__POINTER *)next__GYBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HYBH)[ 0]=next__GYBH;
+            ((__POINTER *)next__0EIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1EIH)[ 0]=next__0EIH;
           } else {
-            ((__POINTER *)result__IYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IYBH=next__GYBH;
+            ((__POINTER *)result__2EIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0EIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2EIH=next__0EIH;
           };
         };
-        ptr__NPQ=result__IYBH;
+        ptr__ZPQ=result__2EIH;
       };
-      result__MPQ=((__ITM_REAL *)ptr__NPQ);
-      *(result__MPQ) = *(ITM_REAL__);
+      result__YPQ=((__ITM_REAL *)ptr__ZPQ);
+      *(result__YPQ) = *(ITM_REAL__);
     };
-    ((__ITM_REAL *)result__MPQ)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__0QO;
-    result__SQO=result__MPQ;
-    __tmp__5QO=TRUE__;
+    ((__ITM_REAL *)result__YPQ)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__GRO;
+    result__4QO=result__YPQ;
+    __tmp__LRO=TRUE__;
   } else {
-    __tmp__5QO=FALSE__;
+    __tmp__LRO=FALSE__;
   };
-  if (__tmp__5QO) {
-    __tmp__RRO=TRUE__;
+  if (__tmp__LRO) {
+    __tmp__3RO=TRUE__;
   } else {
-    result__VFP=read_integer__U1P();
-    if (result__VFP) {
-      __tmp__MRO=current_position__3WF();
-      result__EQMB=NULL;
-      ptr__FQMB=((__POINTER )(NULL));
-      typ_id__KQMB= 0;
-      sz__HQMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
-      if ((sz__HQMB ==  0)) {
-        result__EQMB=ITM_NUMBER__;
-      } else {
-        typ_id__KQMB=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__HQMB);
-        if ((typ_id__KQMB == (__INTEGER)(-  1))) {
-          a__RR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__SR4G=(__UINTEGER_32)((__UINTEGER_32)(sz__HQMB + a__RR4G) & (__UINTEGER_32)(~ a__RR4G));
-          ptr_table__MYBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SR4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__LYBH=((__POINTER )(NULL));
-          result__NYBH=((__POINTER *)ptr_table__MYBH)[ 0];
-          if ((result__NYBH == (void *)NULL)) {
-            result__NYBH=new_lab__ARJ(new_size__SR4G);
-            next__LYBH=(void *)((unsigned long)result__NYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SR4G)));
-            ((__POINTER *)next__LYBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MYBH)[ 0]=next__LYBH;
-          } else {
-            next__LYBH=((__POINTER *)result__NYBH)[ 0];
-            if ((next__LYBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NYBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__SR4G <<  1)) <=  4096)) {
-                next__LYBH=(void *)((unsigned long)result__NYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SR4G)));
+    result__BGP=read_integer__A2P();
+    if (result__BGP) {
+      __tmp__YRO=current_position__JXF();
+      result__QQMB=NULL;
+      ptr__RQMB=((__POINTER )(NULL));
+      typ_id__WQMB= 0;
+      sz__TQMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
+      if ((sz__TQMB ==  0)) {
+        result__QQMB=ITM_NUMBER__;
+      } else {
+        typ_id__WQMB=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TQMB);
+        if ((typ_id__WQMB == (__INTEGER)(-  1))) {
+          a__G3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__H3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQMB + a__G3EH) & (__UINTEGER_32)(~ a__G3EH));
+          ptr_table__AFIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__5EIH=((__POINTER )(NULL));
+          result__BFIH=((__POINTER *)ptr_table__AFIH)[ 0];
+          if ((result__BFIH == (void *)NULL)) {
+            result__BFIH=new_lab__MRJ(new_size__H3EH);
+            next__5EIH=(void *)((unsigned long)result__BFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H3EH)));
+            ((__POINTER *)next__5EIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AFIH)[ 0]=next__5EIH;
+          } else {
+            next__5EIH=((__POINTER *)result__BFIH)[ 0];
+            if ((next__5EIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__H3EH <<  1)) <=  4096)) {
+                next__5EIH=(void *)((unsigned long)result__BFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H3EH)));
               } else {
-                next__LYBH=new_lab__ARJ(new_size__SR4G);
+                next__5EIH=new_lab__MRJ(new_size__H3EH);
               };
-              ((__POINTER *)next__LYBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MYBH)[ 0]=next__LYBH;
+              ((__POINTER *)next__5EIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AFIH)[ 0]=next__5EIH;
             } else {
-              ((__POINTER *)result__NYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__NYBH=next__LYBH;
-            };
-          };
-          ptr__FQMB=result__NYBH;
-        } else {
-          t__WR4G=((__UINTEGER_32 )typ_id__KQMB);
-          a__VR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__UYBH=(__UINTEGER_32)((__UINTEGER_32)(sz__HQMB + a__VR4G) & (__UINTEGER_32)(~ a__VR4G));
-          ptr_table__RYBH=((__POINTER )(&(table_type[(t__WR4G)])));
-          lab_type__TYBH=(__UINTEGER_32)(t__WR4G |  1);
-          next__QYBH=((__POINTER )(NULL));
-          result__SYBH=((__POINTER *)ptr_table__RYBH)[ 0];
-          if ((result__SYBH == (void *)NULL)) {
-            result__SYBH=new_lab__ARJ(lab_type__TYBH);
-            next__QYBH=(void *)((unsigned long)result__SYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UYBH)));
-            ((__POINTER *)next__QYBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RYBH)[ 0]=next__QYBH;
-          } else {
-            next__QYBH=((__POINTER *)result__SYBH)[ 0];
-            if ((next__QYBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SYBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UYBH <<  1)) <=  4096)) {
-                next__QYBH=(void *)((unsigned long)result__SYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UYBH)));
+              ((__POINTER *)result__BFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5EIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__BFIH=next__5EIH;
+            };
+          };
+          ptr__RQMB=result__BFIH;
+        } else {
+          t__L3EH=((__UINTEGER_32 )typ_id__WQMB);
+          a__K3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__IFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQMB + a__K3EH) & (__UINTEGER_32)(~ a__K3EH));
+          ptr_table__FFIH=((__POINTER )(&(table_type[(t__L3EH)])));
+          lab_type__HFIH=(__UINTEGER_32)(t__L3EH |  1);
+          next__EFIH=((__POINTER )(NULL));
+          result__GFIH=((__POINTER *)ptr_table__FFIH)[ 0];
+          if ((result__GFIH == (void *)NULL)) {
+            result__GFIH=new_lab__MRJ(lab_type__HFIH);
+            next__EFIH=(void *)((unsigned long)result__GFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IFIH)));
+            ((__POINTER *)next__EFIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FFIH)[ 0]=next__EFIH;
+          } else {
+            next__EFIH=((__POINTER *)result__GFIH)[ 0];
+            if ((next__EFIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IFIH <<  1)) <=  4096)) {
+                next__EFIH=(void *)((unsigned long)result__GFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IFIH)));
               } else {
-                next__QYBH=new_lab__ARJ(lab_type__TYBH);
+                next__EFIH=new_lab__MRJ(lab_type__HFIH);
               };
-              ((__POINTER *)next__QYBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RYBH)[ 0]=next__QYBH;
+              ((__POINTER *)next__EFIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FFIH)[ 0]=next__EFIH;
             } else {
-              ((__POINTER *)result__SYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SYBH=next__QYBH;
+              ((__POINTER *)result__GFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GFIH=next__EFIH;
             };
           };
-          ptr__FQMB=result__SYBH;
+          ptr__RQMB=result__GFIH;
         };
-        result__EQMB=((__ITM_NUMBER *)ptr__FQMB);
-        *(result__EQMB) = *(ITM_NUMBER__);
+        result__QQMB=((__ITM_NUMBER *)ptr__RQMB);
+        *(result__QQMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__EQMB)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__MRO;
-      result__SQO=result__EQMB;
+      ((__ITM_NUMBER *)result__QQMB)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__YRO;
+      result__4QO=result__QQMB;
     };
-    __tmp__RRO=result__VFP;
+    __tmp__3RO=result__BGP;
   };
-  if (__tmp__RRO) {
-    __tmp__CSO=TRUE__;
+  if (__tmp__3RO) {
+    __tmp__OSO=TRUE__;
   } else {
-    result__TBQ=FALSE__;
-    old_pos__UBQ= 0;
-    count__VBQ= 0;
-    if (read_space__RRD()) {
-      result__XQZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__XQZG=((__CHARACTER )(( 0)));
+    result__5BQ=FALSE__;
+    old_pos__ACQ= 0;
+    count__BCQ= 0;
+    if (read_space__3RD()) {
+      result__3X5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__3X5G=((__CHARACTER )(( 0)));
       } else {
-        result__XQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__3X5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      __tmp__5BQ=(result__XQZG == '\'');
+      __tmp__LCQ=(result__3X5G == '\'');
     } else {
-      __tmp__5BQ=FALSE__;
+      __tmp__LCQ=FALSE__;
     };
-    if (__tmp__5BQ) {
-      old_pos__UBQ=position__GBC;
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      ((__STRING *)string_tmp__VH)->count__KFC= 0;
-      until_do__2IRC:
+    if (__tmp__LCQ) {
+      old_pos__ACQ=position__SBC;
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      ((__STRING *)string_tmp__VH)->count__WFC= 0;
+      until_do__IJRC:
       {
-        result__3QZG='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__3QZG=((__CHARACTER )(( 0)));
+        result__HY5G='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__HY5G=((__CHARACTER )(( 0)));
         } else {
-          result__3QZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__HY5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__3QZG == ((__CHARACTER )(( 0))))) {
-          __tmp__4CQ=TRUE__;
+        if ((result__HY5G == ((__CHARACTER )(( 0))))) {
+          __tmp__KDQ=TRUE__;
         } else {
-          result__4QZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__4QZG=((__CHARACTER )(( 0)));
+          result__QY5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__QY5G=((__CHARACTER )(( 0)));
           } else {
-            result__4QZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__QY5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__4CQ=(result__4QZG == '\n');
+          __tmp__KDQ=(result__QY5G == '\n');
         };
-        if (__tmp__4CQ) {
-          __tmp__5CQ=TRUE__;
+        if (__tmp__KDQ) {
+          __tmp__LDQ=TRUE__;
         } else {
-          result__5QZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__5QZG=((__CHARACTER )(( 0)));
+          result__VY5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__VY5G=((__CHARACTER )(( 0)));
           } else {
-            result__5QZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__VY5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          __tmp__5CQ=(result__5QZG == '\'');
+          __tmp__LDQ=(result__VY5G == '\'');
         };
-        if ((! __tmp__5CQ)) {
-          result__ARZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__ARZG=((__CHARACTER )(( 0)));
+        if ((! __tmp__LDQ)) {
+          result__0Y5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__0Y5G=((__CHARACTER )(( 0)));
           } else {
-            result__ARZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__0Y5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          add_last__NLT(string_tmp__VH,result__ARZG);
-          result__BRZG='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__BRZG=((__CHARACTER )(( 0)));
+          add_last__ZLT(string_tmp__VH,result__0Y5G);
+          result__5Y5G='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__5Y5G=((__CHARACTER )(( 0)));
           } else {
-            result__BRZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__5Y5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__BRZG == '\\')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            read_escape_character__PIJF();
-            count__VBQ=(__INTEGER)(count__VBQ +  1);
+          if ((result__5Y5G == '\\')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            read_escape_character__R1JF();
+            count__BCQ=(__INTEGER)(count__BCQ +  1);
           } else {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            count__VBQ=(__INTEGER)(count__VBQ +  1);
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            count__BCQ=(__INTEGER)(count__BCQ +  1);
           };
-          goto until_do__2IRC;
+          goto until_do__IJRC;
         };
       };
-      result__CRZG='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__CRZG=((__CHARACTER )(( 0)));
+      result__EZ5G='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__EZ5G=((__CHARACTER )(( 0)));
       } else {
-        result__CRZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__EZ5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__CRZG == '\'')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        last_string__2ZC=get__2VB(string_tmp__VH);
-        if ((count__VBQ !=  1)) {
-          position__GBC=begin_position__5AE;
-          pos__NSSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_314));
-          put_position__IOG(pos__NSSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if ((result__EZ5G == '\'')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        last_string__I0C=get__IWB(string_tmp__VH);
+        if ((count__BCQ !=  1)) {
+          position__SBC=begin_position__LBE;
+          pos__DEYG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_324));
+          put_position__UOG(pos__DEYG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__TBQ=TRUE__;
-        short__token__to__5AD((&__string_122),old_pos__UBQ,position__GBC);
+        result__5BQ=TRUE__;
+        short__token__to__LBD((&__string_122),old_pos__ACQ,position__SBC);
       } else {
-        position__GBC=begin_position__5AE;
-        pos__PSSG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_315));
-        put_position__IOG(pos__PSSG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+        position__SBC=begin_position__LBE;
+        pos__FEYG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_325));
+        put_position__UOG(pos__FEYG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
     };
-    if (result__TBQ) {
-      __tmp__4RO=current_position__3WF();
-      result__YRMB=NULL;
-      ptr__ZRMB=((__POINTER )(NULL));
-      typ_id__4RMB= 0;
-      sz__1RMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
-      if ((sz__1RMB ==  0)) {
-        result__YRMB=ITM_CHARACTER__;
-      } else {
-        typ_id__4RMB=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__1RMB);
-        if ((typ_id__4RMB == (__INTEGER)(-  1))) {
-          a__ZR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__0R4G=(__UINTEGER_32)((__UINTEGER_32)(sz__1RMB + a__ZR4G) & (__UINTEGER_32)(~ a__ZR4G));
-          ptr_table__WYBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0R4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__VYBH=((__POINTER )(NULL));
-          result__XYBH=((__POINTER *)ptr_table__WYBH)[ 0];
-          if ((result__XYBH == (void *)NULL)) {
-            result__XYBH=new_lab__ARJ(new_size__0R4G);
-            next__VYBH=(void *)((unsigned long)result__XYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0R4G)));
-            ((__POINTER *)next__VYBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WYBH)[ 0]=next__VYBH;
-          } else {
-            next__VYBH=((__POINTER *)result__XYBH)[ 0];
-            if ((next__VYBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XYBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__0R4G <<  1)) <=  4096)) {
-                next__VYBH=(void *)((unsigned long)result__XYBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0R4G)));
+    if (result__5BQ) {
+      __tmp__KSO=current_position__JXF();
+      result__ESMB=NULL;
+      ptr__FSMB=((__POINTER )(NULL));
+      typ_id__KSMB= 0;
+      sz__HSMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
+      if ((sz__HSMB ==  0)) {
+        result__ESMB=ITM_CHARACTER__;
+      } else {
+        typ_id__KSMB=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HSMB);
+        if ((typ_id__KSMB == (__INTEGER)(-  1))) {
+          a__O3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__P3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__HSMB + a__O3EH) & (__UINTEGER_32)(~ a__O3EH));
+          ptr_table__KFIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__JFIH=((__POINTER )(NULL));
+          result__LFIH=((__POINTER *)ptr_table__KFIH)[ 0];
+          if ((result__LFIH == (void *)NULL)) {
+            result__LFIH=new_lab__MRJ(new_size__P3EH);
+            next__JFIH=(void *)((unsigned long)result__LFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3EH)));
+            ((__POINTER *)next__JFIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KFIH)[ 0]=next__JFIH;
+          } else {
+            next__JFIH=((__POINTER *)result__LFIH)[ 0];
+            if ((next__JFIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__P3EH <<  1)) <=  4096)) {
+                next__JFIH=(void *)((unsigned long)result__LFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3EH)));
               } else {
-                next__VYBH=new_lab__ARJ(new_size__0R4G);
+                next__JFIH=new_lab__MRJ(new_size__P3EH);
               };
-              ((__POINTER *)next__VYBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WYBH)[ 0]=next__VYBH;
+              ((__POINTER *)next__JFIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KFIH)[ 0]=next__JFIH;
             } else {
-              ((__POINTER *)result__XYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__XYBH=next__VYBH;
-            };
-          };
-          ptr__ZRMB=result__XYBH;
-        } else {
-          t__4R4G=((__UINTEGER_32 )typ_id__4RMB);
-          a__3R4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__4YBH=(__UINTEGER_32)((__UINTEGER_32)(sz__1RMB + a__3R4G) & (__UINTEGER_32)(~ a__3R4G));
-          ptr_table__1YBH=((__POINTER )(&(table_type[(t__4R4G)])));
-          lab_type__3YBH=(__UINTEGER_32)(t__4R4G |  1);
-          next__0YBH=((__POINTER )(NULL));
-          result__2YBH=((__POINTER *)ptr_table__1YBH)[ 0];
-          if ((result__2YBH == (void *)NULL)) {
-            result__2YBH=new_lab__ARJ(lab_type__3YBH);
-            next__0YBH=(void *)((unsigned long)result__2YBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4YBH)));
-            ((__POINTER *)next__0YBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1YBH)[ 0]=next__0YBH;
-          } else {
-            next__0YBH=((__POINTER *)result__2YBH)[ 0];
-            if ((next__0YBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2YBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__4YBH <<  1)) <=  4096)) {
-                next__0YBH=(void *)((unsigned long)result__2YBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4YBH)));
+              ((__POINTER *)result__LFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LFIH=next__JFIH;
+            };
+          };
+          ptr__FSMB=result__LFIH;
+        } else {
+          t__T3EH=((__UINTEGER_32 )typ_id__KSMB);
+          a__S3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__SFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HSMB + a__S3EH) & (__UINTEGER_32)(~ a__S3EH));
+          ptr_table__PFIH=((__POINTER )(&(table_type[(t__T3EH)])));
+          lab_type__RFIH=(__UINTEGER_32)(t__T3EH |  1);
+          next__OFIH=((__POINTER )(NULL));
+          result__QFIH=((__POINTER *)ptr_table__PFIH)[ 0];
+          if ((result__QFIH == (void *)NULL)) {
+            result__QFIH=new_lab__MRJ(lab_type__RFIH);
+            next__OFIH=(void *)((unsigned long)result__QFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFIH)));
+            ((__POINTER *)next__OFIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PFIH)[ 0]=next__OFIH;
+          } else {
+            next__OFIH=((__POINTER *)result__QFIH)[ 0];
+            if ((next__OFIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SFIH <<  1)) <=  4096)) {
+                next__OFIH=(void *)((unsigned long)result__QFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFIH)));
               } else {
-                next__0YBH=new_lab__ARJ(lab_type__3YBH);
+                next__OFIH=new_lab__MRJ(lab_type__RFIH);
               };
-              ((__POINTER *)next__0YBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1YBH)[ 0]=next__0YBH;
+              ((__POINTER *)next__OFIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PFIH)[ 0]=next__OFIH;
             } else {
-              ((__POINTER *)result__2YBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0YBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__2YBH=next__0YBH;
-            };
-          };
-          ptr__ZRMB=result__2YBH;
-        };
-        result__YRMB=((__ITM_CHARACTER *)ptr__ZRMB);
-        *(result__YRMB) = *(ITM_CHARACTER__);
-      };
-      ((__ITM_CHARACTER *)result__YRMB)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__4RO;
-      result__SQO=result__YRMB;
-    };
-    __tmp__CSO=result__TBQ;
-  };
-  if ((! __tmp__CSO)) {
-    if (read_string__5EQ()) {
-      __tmp__PSO=current_position__3WF();
-      result__MTMB=NULL;
-      ptr__NTMB=((__POINTER )(NULL));
-      typ_id__STMB= 0;
-      sz__PTMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
-      if ((sz__PTMB ==  0)) {
-        result__MTMB=ITM_STRING__;
-      } else {
-        typ_id__STMB=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__PTMB);
-        if ((typ_id__STMB == (__INTEGER)(-  1))) {
-          a__BS4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__CS4G=(__UINTEGER_32)((__UINTEGER_32)(sz__PTMB + a__BS4G) & (__UINTEGER_32)(~ a__BS4G));
-          ptr_table__AZBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CS4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__5YBH=((__POINTER )(NULL));
-          result__BZBH=((__POINTER *)ptr_table__AZBH)[ 0];
-          if ((result__BZBH == (void *)NULL)) {
-            result__BZBH=new_lab__ARJ(new_size__CS4G);
-            next__5YBH=(void *)((unsigned long)result__BZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CS4G)));
-            ((__POINTER *)next__5YBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AZBH)[ 0]=next__5YBH;
-          } else {
-            next__5YBH=((__POINTER *)result__BZBH)[ 0];
-            if ((next__5YBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BZBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__CS4G <<  1)) <=  4096)) {
-                next__5YBH=(void *)((unsigned long)result__BZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CS4G)));
+              ((__POINTER *)result__QFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QFIH=next__OFIH;
+            };
+          };
+          ptr__FSMB=result__QFIH;
+        };
+        result__ESMB=((__ITM_CHARACTER *)ptr__FSMB);
+        *(result__ESMB) = *(ITM_CHARACTER__);
+      };
+      ((__ITM_CHARACTER *)result__ESMB)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__KSO;
+      result__4QO=result__ESMB;
+    };
+    __tmp__OSO=result__5BQ;
+  };
+  if ((! __tmp__OSO)) {
+    if (read_string__LFQ()) {
+      __tmp__1SO=current_position__JXF();
+      result__YTMB=NULL;
+      ptr__ZTMB=((__POINTER )(NULL));
+      typ_id__4TMB= 0;
+      sz__1TMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
+      if ((sz__1TMB ==  0)) {
+        result__YTMB=ITM_STRING__;
+      } else {
+        typ_id__4TMB=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1TMB);
+        if ((typ_id__4TMB == (__INTEGER)(-  1))) {
+          a__W3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__X3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__1TMB + a__W3EH) & (__UINTEGER_32)(~ a__W3EH));
+          ptr_table__UFIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__TFIH=((__POINTER )(NULL));
+          result__VFIH=((__POINTER *)ptr_table__UFIH)[ 0];
+          if ((result__VFIH == (void *)NULL)) {
+            result__VFIH=new_lab__MRJ(new_size__X3EH);
+            next__TFIH=(void *)((unsigned long)result__VFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3EH)));
+            ((__POINTER *)next__TFIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UFIH)[ 0]=next__TFIH;
+          } else {
+            next__TFIH=((__POINTER *)result__VFIH)[ 0];
+            if ((next__TFIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__X3EH <<  1)) <=  4096)) {
+                next__TFIH=(void *)((unsigned long)result__VFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3EH)));
               } else {
-                next__5YBH=new_lab__ARJ(new_size__CS4G);
+                next__TFIH=new_lab__MRJ(new_size__X3EH);
               };
-              ((__POINTER *)next__5YBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AZBH)[ 0]=next__5YBH;
+              ((__POINTER *)next__TFIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UFIH)[ 0]=next__TFIH;
             } else {
-              ((__POINTER *)result__BZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5YBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BZBH=next__5YBH;
-            };
-          };
-          ptr__NTMB=result__BZBH;
-        } else {
-          t__GS4G=((__UINTEGER_32 )typ_id__STMB);
-          a__FS4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__IZBH=(__UINTEGER_32)((__UINTEGER_32)(sz__PTMB + a__FS4G) & (__UINTEGER_32)(~ a__FS4G));
-          ptr_table__FZBH=((__POINTER )(&(table_type[(t__GS4G)])));
-          lab_type__HZBH=(__UINTEGER_32)(t__GS4G |  1);
-          next__EZBH=((__POINTER )(NULL));
-          result__GZBH=((__POINTER *)ptr_table__FZBH)[ 0];
-          if ((result__GZBH == (void *)NULL)) {
-            result__GZBH=new_lab__ARJ(lab_type__HZBH);
-            next__EZBH=(void *)((unsigned long)result__GZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IZBH)));
-            ((__POINTER *)next__EZBH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FZBH)[ 0]=next__EZBH;
-          } else {
-            next__EZBH=((__POINTER *)result__GZBH)[ 0];
-            if ((next__EZBH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GZBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__IZBH <<  1)) <=  4096)) {
-                next__EZBH=(void *)((unsigned long)result__GZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IZBH)));
+              ((__POINTER *)result__VFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VFIH=next__TFIH;
+            };
+          };
+          ptr__ZTMB=result__VFIH;
+        } else {
+          t__13EH=((__UINTEGER_32 )typ_id__4TMB);
+          a__03EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__2FIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1TMB + a__03EH) & (__UINTEGER_32)(~ a__03EH));
+          ptr_table__ZFIH=((__POINTER )(&(table_type[(t__13EH)])));
+          lab_type__1FIH=(__UINTEGER_32)(t__13EH |  1);
+          next__YFIH=((__POINTER )(NULL));
+          result__0FIH=((__POINTER *)ptr_table__ZFIH)[ 0];
+          if ((result__0FIH == (void *)NULL)) {
+            result__0FIH=new_lab__MRJ(lab_type__1FIH);
+            next__YFIH=(void *)((unsigned long)result__0FIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FIH)));
+            ((__POINTER *)next__YFIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZFIH)[ 0]=next__YFIH;
+          } else {
+            next__YFIH=((__POINTER *)result__0FIH)[ 0];
+            if ((next__YFIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0FIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2FIH <<  1)) <=  4096)) {
+                next__YFIH=(void *)((unsigned long)result__0FIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FIH)));
               } else {
-                next__EZBH=new_lab__ARJ(lab_type__HZBH);
+                next__YFIH=new_lab__MRJ(lab_type__1FIH);
               };
-              ((__POINTER *)next__EZBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FZBH)[ 0]=next__EZBH;
+              ((__POINTER *)next__YFIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZFIH)[ 0]=next__YFIH;
             } else {
-              ((__POINTER *)result__GZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EZBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GZBH=next__EZBH;
+              ((__POINTER *)result__0FIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__0FIH=next__YFIH;
             };
           };
-          ptr__NTMB=result__GZBH;
+          ptr__ZTMB=result__0FIH;
         };
-        result__MTMB=((__ITM_STRING *)ptr__NTMB);
-        *(result__MTMB) = *(ITM_STRING__);
+        result__YTMB=((__ITM_STRING *)ptr__ZTMB);
+        *(result__YTMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__MTMB)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__PSO;
-      result__SQO=result__MTMB;
+      ((__ITM_STRING *)result__YTMB)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__1SO;
+      result__4QO=result__YTMB;
     };
   };
-  return(result__SQO);
+  return(result__4QO);
 }
 
-static void* read_group__3AHB(__PARSER *Self__4AHB)
+static void* read_group__JBHB(__PARSER *Self__KBHB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *e__ABHB;
-  __ITM_RESULT *result__PZBH,*result__0XWB;
-  __POINTER ptr__QZBH,ptr_table__ZZBH,next__YZBH,result__0ZBH;
-  __POINTER ptr_table__4ZBH,next__3ZBH,result__5ZBH,ptr__1XWB;
-  __POINTER ptr_table__J0BH,next__I0BH,result__K0BH,ptr_table__O0BH;
-  __POINTER next__N0BH,result__P0BH;
-  __INTEGER typ_id__RZBH,typ_id__AYWB;
-  __UINTEGER_32 sz__SZBH,a__TZBH,new_size__UZBH,t__VZBH,a__WZBH;
-  __UINTEGER_32 new_size__B0BH,lab_type__A0BH,sz__3XWB,a__QV4G;
-  __UINTEGER_32 new_size__RV4G,t__VV4G,a__UV4G,new_size__R0BH;
-  __UINTEGER_32 lab_type__Q0BH;
-  __POSITION pos__3SSG;
-  void *result__MM5G,*result__BBHB;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__NM5G,*Self__OM5G;
-  __BOOLEAN result__JZBH,__tmp__QBHB,result__MZBH,result__C0BH;
-  __BOOLEAN __tmp__XCHB,result__F0BH;
-  __CHARACTER result__KZBH,result__NZBH,result__D0BH,result__G0BH;
-  read_def_local__R0H(Self__4AHB);
-  result__MM5G=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H)->parent_arrayed_collection__U3H.upper__2VT <  0)) {
-    result__MM5G=create_with_capacity__GVI( 16);
+  void *e__MBHB;
+  __ITM_RESULT *result__DGIH,*result__GYWB;
+  __POINTER ptr__EGIH,ptr_table__NGIH,next__MGIH,result__OGIH;
+  __POINTER ptr_table__SGIH,next__RGIH,result__TGIH,ptr__HYWB;
+  __POINTER ptr_table__3GIH,next__2GIH,result__4GIH,ptr_table__CHIH;
+  __POINTER next__BHIH,result__DHIH;
+  __INTEGER typ_id__FGIH,typ_id__MYWB;
+  __UINTEGER_32 sz__GGIH,a__HGIH,new_size__IGIH,t__JGIH,a__KGIH;
+  __UINTEGER_32 new_size__VGIH,lab_type__UGIH,sz__JYWB,a__FBFH;
+  __UINTEGER_32 new_size__GBFH,t__KBFH,a__JBFH,new_size__FHIH;
+  __UINTEGER_32 lab_type__EHIH;
+  __POSITION pos__TEYG;
+  void *result__YYFH,*result__NBHB;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__ZYFH,*Self__0YFH;
+  __BOOLEAN result__3FIH,__tmp__2BHB,result__AGIH,result__WGIH;
+  __BOOLEAN __tmp__DDHB,result__ZGIH;
+  __CHARACTER result__4FIH,result__BGIH,result__XGIH,result__0GIH;
+  read_def_local__30H(Self__KBHB);
+  result__YYFH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
+    result__YYFH=create_with_capacity__SVI( 16);
   } else {
-    Self__NM5G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-    result__MM5G=((void **)Self__NM5G->parent_arrayed_collection__U3H.storage__KAU)[Self__NM5G->parent_arrayed_collection__U3H.upper__2VT];
-    Self__OM5G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-    Self__OM5G->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(Self__OM5G->parent_arrayed_collection__U3H.upper__2VT -  1);
-  };
-  result__BBHB=result__MM5G;
-  e__ABHB=read_expr__S4I(Self__4AHB);
-  while_do__QGMB:
+    Self__ZYFH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+    result__YYFH=((void **)Self__ZYFH->parent_arrayed_collection__A4H.storage__WAU)[Self__ZYFH->parent_arrayed_collection__A4H.upper__IWT];
+    Self__0YFH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+    Self__0YFH->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__0YFH->parent_arrayed_collection__A4H.upper__IWT -  1);
+  };
+  result__NBHB=result__YYFH;
+  e__MBHB=read_expr__44I(Self__KBHB);
+  while_do__2GMB:
   {
-    if (((void *)e__ABHB != (void *)NULL)) {
-      result__JZBH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__JZBH=FALSE__;
+    if (((void *)e__MBHB != (void *)NULL)) {
+      result__3FIH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__3FIH=FALSE__;
       } else {
-        result__KZBH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__KZBH=((__CHARACTER )(( 0)));
+        result__4FIH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__4FIH=((__CHARACTER )(( 0)));
         } else {
-          result__KZBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__4FIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__KZBH == ';')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__JZBH=TRUE__;
+        if ((result__4FIH == ';')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__3FIH=TRUE__;
         };
       };
-      __tmp__QBHB=result__JZBH;
+      __tmp__2BHB=result__3FIH;
     } else {
-      __tmp__QBHB=FALSE__;
+      __tmp__2BHB=FALSE__;
     };
-    if (__tmp__QBHB) {
-      add_last__I5U(result__BBHB,e__ABHB);
-      e__ABHB=read_expr__S4I(Self__4AHB);
-      goto while_do__QGMB;
+    if (__tmp__2BHB) {
+      add_last__U5U(result__NBHB,e__MBHB);
+      e__MBHB=read_expr__44I(Self__KBHB);
+      goto while_do__2GMB;
     };
   };
-  if (((void *)e__ABHB != (void *)NULL)) {
-    result__MZBH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__MZBH=FALSE__;
+  if (((void *)e__MBHB != (void *)NULL)) {
+    result__AGIH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__AGIH=FALSE__;
     } else {
-      result__NZBH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__NZBH=((__CHARACTER )(( 0)));
+      result__BGIH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__BGIH=((__CHARACTER )(( 0)));
       } else {
-        result__NZBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__BGIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__NZBH == ',')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__MZBH=TRUE__;
+      if ((result__BGIH == ',')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__AGIH=TRUE__;
       };
     };
-    if (result__MZBH) {
+    if (result__AGIH) {
       do {
-        result__PZBH=NULL;
-        ptr__QZBH=((__POINTER )(NULL));
-        typ_id__RZBH= 0;
-        sz__SZBH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
-        if ((sz__SZBH ==  0)) {
-          result__PZBH=ITM_RESULT__;
-        } else {
-          typ_id__RZBH=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__SZBH);
-          if ((typ_id__RZBH == (__INTEGER)(-  1))) {
-            a__TZBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__UZBH=(__UINTEGER_32)((__UINTEGER_32)(sz__SZBH + a__TZBH) & (__UINTEGER_32)(~ a__TZBH));
-            ptr_table__ZZBH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UZBH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__YZBH=((__POINTER )(NULL));
-            result__0ZBH=((__POINTER *)ptr_table__ZZBH)[ 0];
-            if ((result__0ZBH == (void *)NULL)) {
-              result__0ZBH=new_lab__ARJ(new_size__UZBH);
-              next__YZBH=(void *)((unsigned long)result__0ZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UZBH)));
-              ((__POINTER *)next__YZBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZZBH)[ 0]=next__YZBH;
+        result__DGIH=NULL;
+        ptr__EGIH=((__POINTER )(NULL));
+        typ_id__FGIH= 0;
+        sz__GGIH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+        if ((sz__GGIH ==  0)) {
+          result__DGIH=ITM_RESULT__;
+        } else {
+          typ_id__FGIH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GGIH);
+          if ((typ_id__FGIH == (__INTEGER)(-  1))) {
+            a__HGIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__IGIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GGIH + a__HGIH) & (__UINTEGER_32)(~ a__HGIH));
+            ptr_table__NGIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IGIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__MGIH=((__POINTER )(NULL));
+            result__OGIH=((__POINTER *)ptr_table__NGIH)[ 0];
+            if ((result__OGIH == (void *)NULL)) {
+              result__OGIH=new_lab__MRJ(new_size__IGIH);
+              next__MGIH=(void *)((unsigned long)result__OGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGIH)));
+              ((__POINTER *)next__MGIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NGIH)[ 0]=next__MGIH;
             } else {
-              next__YZBH=((__POINTER *)result__0ZBH)[ 0];
-              if ((next__YZBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0ZBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__UZBH <<  1)) <=  4096)) {
-                  next__YZBH=(void *)((unsigned long)result__0ZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UZBH)));
+              next__MGIH=((__POINTER *)result__OGIH)[ 0];
+              if ((next__MGIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OGIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IGIH <<  1)) <=  4096)) {
+                  next__MGIH=(void *)((unsigned long)result__OGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGIH)));
                 } else {
-                  next__YZBH=new_lab__ARJ(new_size__UZBH);
+                  next__MGIH=new_lab__MRJ(new_size__IGIH);
                 };
-                ((__POINTER *)next__YZBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZZBH)[ 0]=next__YZBH;
+                ((__POINTER *)next__MGIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NGIH)[ 0]=next__MGIH;
               } else {
-                ((__POINTER *)result__0ZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YZBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__0ZBH=next__YZBH;
+                ((__POINTER *)result__OGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__OGIH=next__MGIH;
               };
             };
-            ptr__QZBH=result__0ZBH;
-          } else {
-            t__VZBH=((__UINTEGER_32 )typ_id__RZBH);
-            a__WZBH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__B0BH=(__UINTEGER_32)((__UINTEGER_32)(sz__SZBH + a__WZBH) & (__UINTEGER_32)(~ a__WZBH));
-            ptr_table__4ZBH=((__POINTER )(&(table_type[(t__VZBH)])));
-            lab_type__A0BH=(__UINTEGER_32)(t__VZBH |  1);
-            next__3ZBH=((__POINTER )(NULL));
-            result__5ZBH=((__POINTER *)ptr_table__4ZBH)[ 0];
-            if ((result__5ZBH == (void *)NULL)) {
-              result__5ZBH=new_lab__ARJ(lab_type__A0BH);
-              next__3ZBH=(void *)((unsigned long)result__5ZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0BH)));
-              ((__POINTER *)next__3ZBH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4ZBH)[ 0]=next__3ZBH;
+            ptr__EGIH=result__OGIH;
+          } else {
+            t__JGIH=((__UINTEGER_32 )typ_id__FGIH);
+            a__KGIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__VGIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GGIH + a__KGIH) & (__UINTEGER_32)(~ a__KGIH));
+            ptr_table__SGIH=((__POINTER )(&(table_type[(t__JGIH)])));
+            lab_type__UGIH=(__UINTEGER_32)(t__JGIH |  1);
+            next__RGIH=((__POINTER )(NULL));
+            result__TGIH=((__POINTER *)ptr_table__SGIH)[ 0];
+            if ((result__TGIH == (void *)NULL)) {
+              result__TGIH=new_lab__MRJ(lab_type__UGIH);
+              next__RGIH=(void *)((unsigned long)result__TGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VGIH)));
+              ((__POINTER *)next__RGIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SGIH)[ 0]=next__RGIH;
             } else {
-              next__3ZBH=((__POINTER *)result__5ZBH)[ 0];
-              if ((next__3ZBH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5ZBH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__B0BH <<  1)) <=  4096)) {
-                  next__3ZBH=(void *)((unsigned long)result__5ZBH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0BH)));
+              next__RGIH=((__POINTER *)result__TGIH)[ 0];
+              if ((next__RGIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TGIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VGIH <<  1)) <=  4096)) {
+                  next__RGIH=(void *)((unsigned long)result__TGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VGIH)));
                 } else {
-                  next__3ZBH=new_lab__ARJ(lab_type__A0BH);
+                  next__RGIH=new_lab__MRJ(lab_type__UGIH);
                 };
-                ((__POINTER *)next__3ZBH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4ZBH)[ 0]=next__3ZBH;
+                ((__POINTER *)next__RGIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SGIH)[ 0]=next__RGIH;
               } else {
-                ((__POINTER *)result__5ZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3ZBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__5ZBH=next__3ZBH;
+                ((__POINTER *)result__TGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TGIH=next__RGIH;
               };
             };
-            ptr__QZBH=result__5ZBH;
+            ptr__EGIH=result__TGIH;
           };
-          result__PZBH=((__ITM_RESULT *)ptr__QZBH);
-          *(result__PZBH) = *(ITM_RESULT__);
+          result__DGIH=((__ITM_RESULT *)ptr__EGIH);
+          *(result__DGIH) = *(ITM_RESULT__);
         };
-        ((__ITM_RESULT *)result__PZBH)->value__ALFC=e__ABHB;
-        add_last__I5U(result__BBHB,result__PZBH);
-        e__ABHB=read_expr__S4I(Self__4AHB);
-        while_do__O03B:
+        ((__ITM_RESULT *)result__DGIH)->value__MLFC=e__MBHB;
+        add_last__U5U(result__NBHB,result__DGIH);
+        e__MBHB=read_expr__44I(Self__KBHB);
+        while_do__003B:
         {
-          if (((void *)e__ABHB != (void *)NULL)) {
-            result__C0BH=FALSE__;
-            if ((! read_space__RRD())) {
-              result__C0BH=FALSE__;
+          if (((void *)e__MBHB != (void *)NULL)) {
+            result__WGIH=FALSE__;
+            if ((! read_space__3RD())) {
+              result__WGIH=FALSE__;
             } else {
-              result__D0BH='\0';
-              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-                result__D0BH=((__CHARACTER )(( 0)));
+              result__XGIH='\0';
+              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+                result__XGIH=((__CHARACTER )(( 0)));
               } else {
-                result__D0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+                result__XGIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
               };
-              if ((result__D0BH == ';')) {
-                position__GBC=(__INTEGER)(position__GBC +  1);
-                result__C0BH=TRUE__;
+              if ((result__XGIH == ';')) {
+                position__SBC=(__INTEGER)(position__SBC +  1);
+                result__WGIH=TRUE__;
               };
             };
-            __tmp__XCHB=result__C0BH;
+            __tmp__DDHB=result__WGIH;
           } else {
-            __tmp__XCHB=FALSE__;
+            __tmp__DDHB=FALSE__;
           };
-          if (__tmp__XCHB) {
-            add_last__I5U(result__BBHB,e__ABHB);
-            e__ABHB=read_expr__S4I(Self__4AHB);
-            goto while_do__O03B;
+          if (__tmp__DDHB) {
+            add_last__U5U(result__NBHB,e__MBHB);
+            e__MBHB=read_expr__44I(Self__KBHB);
+            goto while_do__003B;
           };
         };
-        if (((void *)e__ABHB == (void *)NULL)) {
-          pos__3SSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_316));
-          put_position__IOG(pos__3SSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+        if (((void *)e__MBHB == (void *)NULL)) {
+          pos__TEYG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_326));
+          put_position__UOG(pos__TEYG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        result__F0BH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__F0BH=FALSE__;
-        } else {
-          result__G0BH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__G0BH=((__CHARACTER )(( 0)));
-          } else {
-            result__G0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
-          };
-          if ((result__G0BH == ',')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__F0BH=TRUE__;
-          };
-        };
-      } while (result__F0BH);
-    };
-    result__0XWB=NULL;
-    ptr__1XWB=((__POINTER )(NULL));
-    typ_id__AYWB= 0;
-    sz__3XWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
-    if ((sz__3XWB ==  0)) {
-      result__0XWB=ITM_RESULT__;
-    } else {
-      typ_id__AYWB=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__3XWB);
-      if ((typ_id__AYWB == (__INTEGER)(-  1))) {
-        a__QV4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__RV4G=(__UINTEGER_32)((__UINTEGER_32)(sz__3XWB + a__QV4G) & (__UINTEGER_32)(~ a__QV4G));
-        ptr_table__J0BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RV4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__I0BH=((__POINTER )(NULL));
-        result__K0BH=((__POINTER *)ptr_table__J0BH)[ 0];
-        if ((result__K0BH == (void *)NULL)) {
-          result__K0BH=new_lab__ARJ(new_size__RV4G);
-          next__I0BH=(void *)((unsigned long)result__K0BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RV4G)));
-          ((__POINTER *)next__I0BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__J0BH)[ 0]=next__I0BH;
-        } else {
-          next__I0BH=((__POINTER *)result__K0BH)[ 0];
-          if ((next__I0BH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K0BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__RV4G <<  1)) <=  4096)) {
-              next__I0BH=(void *)((unsigned long)result__K0BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RV4G)));
+        result__ZGIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__ZGIH=FALSE__;
+        } else {
+          result__0GIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__0GIH=((__CHARACTER )(( 0)));
+          } else {
+            result__0GIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          };
+          if ((result__0GIH == ',')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__ZGIH=TRUE__;
+          };
+        };
+      } while (result__ZGIH);
+    };
+    result__GYWB=NULL;
+    ptr__HYWB=((__POINTER )(NULL));
+    typ_id__MYWB= 0;
+    sz__JYWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+    if ((sz__JYWB ==  0)) {
+      result__GYWB=ITM_RESULT__;
+    } else {
+      typ_id__MYWB=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JYWB);
+      if ((typ_id__MYWB == (__INTEGER)(-  1))) {
+        a__FBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__GBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYWB + a__FBFH) & (__UINTEGER_32)(~ a__FBFH));
+        ptr_table__3GIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__2GIH=((__POINTER )(NULL));
+        result__4GIH=((__POINTER *)ptr_table__3GIH)[ 0];
+        if ((result__4GIH == (void *)NULL)) {
+          result__4GIH=new_lab__MRJ(new_size__GBFH);
+          next__2GIH=(void *)((unsigned long)result__4GIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GBFH)));
+          ((__POINTER *)next__2GIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3GIH)[ 0]=next__2GIH;
+        } else {
+          next__2GIH=((__POINTER *)result__4GIH)[ 0];
+          if ((next__2GIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4GIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GBFH <<  1)) <=  4096)) {
+              next__2GIH=(void *)((unsigned long)result__4GIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GBFH)));
             } else {
-              next__I0BH=new_lab__ARJ(new_size__RV4G);
-            };
-            ((__POINTER *)next__I0BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__J0BH)[ 0]=next__I0BH;
-          } else {
-            ((__POINTER *)result__K0BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I0BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__K0BH=next__I0BH;
-          };
-        };
-        ptr__1XWB=result__K0BH;
-      } else {
-        t__VV4G=((__UINTEGER_32 )typ_id__AYWB);
-        a__UV4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__R0BH=(__UINTEGER_32)((__UINTEGER_32)(sz__3XWB + a__UV4G) & (__UINTEGER_32)(~ a__UV4G));
-        ptr_table__O0BH=((__POINTER )(&(table_type[(t__VV4G)])));
-        lab_type__Q0BH=(__UINTEGER_32)(t__VV4G |  1);
-        next__N0BH=((__POINTER )(NULL));
-        result__P0BH=((__POINTER *)ptr_table__O0BH)[ 0];
-        if ((result__P0BH == (void *)NULL)) {
-          result__P0BH=new_lab__ARJ(lab_type__Q0BH);
-          next__N0BH=(void *)((unsigned long)result__P0BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0BH)));
-          ((__POINTER *)next__N0BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__O0BH)[ 0]=next__N0BH;
-        } else {
-          next__N0BH=((__POINTER *)result__P0BH)[ 0];
-          if ((next__N0BH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__R0BH <<  1)) <=  4096)) {
-              next__N0BH=(void *)((unsigned long)result__P0BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0BH)));
+              next__2GIH=new_lab__MRJ(new_size__GBFH);
+            };
+            ((__POINTER *)next__2GIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3GIH)[ 0]=next__2GIH;
+          } else {
+            ((__POINTER *)result__4GIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4GIH=next__2GIH;
+          };
+        };
+        ptr__HYWB=result__4GIH;
+      } else {
+        t__KBFH=((__UINTEGER_32 )typ_id__MYWB);
+        a__JBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FHIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYWB + a__JBFH) & (__UINTEGER_32)(~ a__JBFH));
+        ptr_table__CHIH=((__POINTER )(&(table_type[(t__KBFH)])));
+        lab_type__EHIH=(__UINTEGER_32)(t__KBFH |  1);
+        next__BHIH=((__POINTER )(NULL));
+        result__DHIH=((__POINTER *)ptr_table__CHIH)[ 0];
+        if ((result__DHIH == (void *)NULL)) {
+          result__DHIH=new_lab__MRJ(lab_type__EHIH);
+          next__BHIH=(void *)((unsigned long)result__DHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHIH)));
+          ((__POINTER *)next__BHIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CHIH)[ 0]=next__BHIH;
+        } else {
+          next__BHIH=((__POINTER *)result__DHIH)[ 0];
+          if ((next__BHIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DHIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FHIH <<  1)) <=  4096)) {
+              next__BHIH=(void *)((unsigned long)result__DHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHIH)));
             } else {
-              next__N0BH=new_lab__ARJ(lab_type__Q0BH);
+              next__BHIH=new_lab__MRJ(lab_type__EHIH);
             };
-            ((__POINTER *)next__N0BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__O0BH)[ 0]=next__N0BH;
+            ((__POINTER *)next__BHIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CHIH)[ 0]=next__BHIH;
           } else {
-            ((__POINTER *)result__P0BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__P0BH=next__N0BH;
+            ((__POINTER *)result__DHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DHIH=next__BHIH;
           };
         };
-        ptr__1XWB=result__P0BH;
+        ptr__HYWB=result__DHIH;
       };
-      result__0XWB=((__ITM_RESULT *)ptr__1XWB);
-      *(result__0XWB) = *(ITM_RESULT__);
+      result__GYWB=((__ITM_RESULT *)ptr__HYWB);
+      *(result__GYWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__0XWB)->value__ALFC=e__ABHB;
-    e__ABHB=result__0XWB;
-    add_last__I5U(result__MM5G,result__0XWB);
+    ((__ITM_RESULT *)result__GYWB)->value__MLFC=e__MBHB;
+    e__MBHB=result__GYWB;
+    add_last__U5U(result__YYFH,result__GYWB);
   };
-  return(copy__E5H(result__MM5G));
+  return(copy__Q5H(result__YYFH));
 }
 
-static void* readlip_expr_operator__AOZB(__PARSER *Self__BOZB)
+static void* readlip_expr_operator__MOZB(__PARSER *Self__NOZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *right__EOZB,*result__DOZB;
-  __POSITION pos__TTSG,p__B1BH,p__Y1BH;
-  __LIP_BINARY *result__Y0BH,*Self__A1BH,*result__P1BH,*Self__X1BH;
-  __POINTER ptr__Z0BH,ptr_table__G1BH,next__F1BH,result__H1BH;
-  __POINTER ptr_table__L1BH,next__K1BH,result__M1BH,ptr__Q1BH;
-  __POINTER ptr_table__31BH,next__21BH,result__41BH,ptr_table__C2BH;
-  __POINTER next__B2BH,result__D2BH;
-  __INTEGER typ_id__00BH,typ_id__R1BH;
-  __UINTEGER_32 sz__10BH,a__20BH,new_size__30BH,t__40BH,a__50BH;
-  __UINTEGER_32 new_size__O1BH,lab_type__N1BH,sz__S1BH,a__T1BH;
-  __UINTEGER_32 new_size__U1BH,t__V1BH,a__W1BH,new_size__F2BH;
-  __UINTEGER_32 lab_type__E2BH;
-  __BOOLEAN result__S0BH,__tmp__ZOZB,result__V0BH;
-  __CHARACTER result__T0BH,result__W0BH;
-  right__EOZB=NULL;
-  result__DOZB=readlip_expr_cmp__U01B(Self__BOZB);
-  if (((void *)result__DOZB != (void *)NULL)) {
-    while_do__D24B:
+  void *right__QOZB,*result__POZB;
+  __POSITION pos__JFYG,p__VHIH,p__MIIH;
+  __LIP_BINARY *result__MHIH,*Self__UHIH,*result__DIIH,*Self__LIIH;
+  __POINTER ptr__NHIH,ptr_table__0HIH,next__ZHIH,result__1HIH;
+  __POINTER ptr_table__5HIH,next__4HIH,result__AIIH,ptr__EIIH;
+  __POINTER ptr_table__RIIH,next__QIIH,result__SIIH,ptr_table__WIIH;
+  __POINTER next__VIIH,result__XIIH;
+  __INTEGER typ_id__OHIH,typ_id__FIIH;
+  __UINTEGER_32 sz__PHIH,a__QHIH,new_size__RHIH,t__SHIH,a__THIH;
+  __UINTEGER_32 new_size__CIIH,lab_type__BIIH,sz__GIIH,a__HIIH;
+  __UINTEGER_32 new_size__IIIH,t__JIIH,a__KIIH,new_size__ZIIH;
+  __UINTEGER_32 lab_type__YIIH;
+  __BOOLEAN result__GHIH,__tmp__FPZB,result__JHIH;
+  __CHARACTER result__HHIH,result__KHIH;
+  right__QOZB=NULL;
+  result__POZB=readlip_expr_cmp__A11B(Self__NOZB);
+  if (((void *)result__POZB != (void *)NULL)) {
+    while_do__P24B:
     {
-      result__S0BH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__S0BH=FALSE__;
+      result__GHIH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__GHIH=FALSE__;
       } else {
-        result__T0BH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__T0BH=((__CHARACTER )(( 0)));
+        result__HHIH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__HHIH=((__CHARACTER )(( 0)));
         } else {
-          result__T0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__HHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__T0BH == '|')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__S0BH=TRUE__;
+        if ((result__HHIH == '|')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__GHIH=TRUE__;
         };
       };
-      if (result__S0BH) {
-        __tmp__ZOZB=TRUE__;
+      if (result__GHIH) {
+        __tmp__FPZB=TRUE__;
       } else {
-        result__V0BH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__V0BH=FALSE__;
+        result__JHIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__JHIH=FALSE__;
         } else {
-          result__W0BH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__W0BH=((__CHARACTER )(( 0)));
+          result__KHIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__KHIH=((__CHARACTER )(( 0)));
           } else {
-            result__W0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__KHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__W0BH == '&')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__V0BH=TRUE__;
+          if ((result__KHIH == '&')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__JHIH=TRUE__;
           };
         };
-        __tmp__ZOZB=result__V0BH;
+        __tmp__FPZB=result__JHIH;
       };
-      if (__tmp__ZOZB) {
-        right__EOZB=readlip_expr_cmp__U01B(Self__BOZB);
-        if (((void *)right__EOZB == (void *)NULL)) {
-          pos__TTSG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_227));
-          put_position__IOG(pos__TTSG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (__tmp__FPZB) {
+        right__QOZB=readlip_expr_cmp__A11B(Self__NOZB);
+        if (((void *)right__QOZB == (void *)NULL)) {
+          pos__JFYG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_237));
+          put_position__UOG(pos__JFYG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if (result__S0BH) {
-          p__B1BH=current_position__3WF();
-          result__Y0BH=NULL;
-          ptr__Z0BH=((__POINTER )(NULL));
-          typ_id__00BH= 0;
-          sz__10BH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__10BH ==  0)) {
-            result__Y0BH=LIP_BINARY__;
-          } else {
-            typ_id__00BH=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__10BH);
-            if ((typ_id__00BH == (__INTEGER)(-  1))) {
-              a__20BH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__30BH=(__UINTEGER_32)((__UINTEGER_32)(sz__10BH + a__20BH) & (__UINTEGER_32)(~ a__20BH));
-              ptr_table__G1BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__30BH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__F1BH=((__POINTER )(NULL));
-              result__H1BH=((__POINTER *)ptr_table__G1BH)[ 0];
-              if ((result__H1BH == (void *)NULL)) {
-                result__H1BH=new_lab__ARJ(new_size__30BH);
-                next__F1BH=(void *)((unsigned long)result__H1BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__30BH)));
-                ((__POINTER *)next__F1BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__G1BH)[ 0]=next__F1BH;
+        if (result__GHIH) {
+          p__VHIH=current_position__JXF();
+          result__MHIH=NULL;
+          ptr__NHIH=((__POINTER )(NULL));
+          typ_id__OHIH= 0;
+          sz__PHIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__PHIH ==  0)) {
+            result__MHIH=LIP_BINARY__;
+          } else {
+            typ_id__OHIH=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PHIH);
+            if ((typ_id__OHIH == (__INTEGER)(-  1))) {
+              a__QHIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RHIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHIH + a__QHIH) & (__UINTEGER_32)(~ a__QHIH));
+              ptr_table__0HIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RHIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__ZHIH=((__POINTER )(NULL));
+              result__1HIH=((__POINTER *)ptr_table__0HIH)[ 0];
+              if ((result__1HIH == (void *)NULL)) {
+                result__1HIH=new_lab__MRJ(new_size__RHIH);
+                next__ZHIH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RHIH)));
+                ((__POINTER *)next__ZHIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
               } else {
-                next__F1BH=((__POINTER *)result__H1BH)[ 0];
-                if ((next__F1BH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H1BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__30BH <<  1)) <=  4096)) {
-                    next__F1BH=(void *)((unsigned long)result__H1BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__30BH)));
+                next__ZHIH=((__POINTER *)result__1HIH)[ 0];
+                if ((next__ZHIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1HIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RHIH <<  1)) <=  4096)) {
+                    next__ZHIH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RHIH)));
                   } else {
-                    next__F1BH=new_lab__ARJ(new_size__30BH);
+                    next__ZHIH=new_lab__MRJ(new_size__RHIH);
                   };
-                  ((__POINTER *)next__F1BH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__G1BH)[ 0]=next__F1BH;
+                  ((__POINTER *)next__ZHIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
                 } else {
-                  ((__POINTER *)result__H1BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__H1BH=next__F1BH;
+                  ((__POINTER *)result__1HIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1HIH=next__ZHIH;
                 };
               };
-              ptr__Z0BH=result__H1BH;
+              ptr__NHIH=result__1HIH;
             } else {
-              t__40BH=((__UINTEGER_32 )typ_id__00BH);
-              a__50BH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__O1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__10BH + a__50BH) & (__UINTEGER_32)(~ a__50BH));
-              ptr_table__L1BH=((__POINTER )(&(table_type[(t__40BH)])));
-              lab_type__N1BH=(__UINTEGER_32)(t__40BH |  1);
-              next__K1BH=((__POINTER )(NULL));
-              result__M1BH=((__POINTER *)ptr_table__L1BH)[ 0];
-              if ((result__M1BH == (void *)NULL)) {
-                result__M1BH=new_lab__ARJ(lab_type__N1BH);
-                next__K1BH=(void *)((unsigned long)result__M1BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1BH)));
-                ((__POINTER *)next__K1BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__L1BH)[ 0]=next__K1BH;
+              t__SHIH=((__UINTEGER_32 )typ_id__OHIH);
+              a__THIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__CIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHIH + a__THIH) & (__UINTEGER_32)(~ a__THIH));
+              ptr_table__5HIH=((__POINTER )(&(table_type[(t__SHIH)])));
+              lab_type__BIIH=(__UINTEGER_32)(t__SHIH |  1);
+              next__4HIH=((__POINTER )(NULL));
+              result__AIIH=((__POINTER *)ptr_table__5HIH)[ 0];
+              if ((result__AIIH == (void *)NULL)) {
+                result__AIIH=new_lab__MRJ(lab_type__BIIH);
+                next__4HIH=(void *)((unsigned long)result__AIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIIH)));
+                ((__POINTER *)next__4HIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5HIH)[ 0]=next__4HIH;
               } else {
-                next__K1BH=((__POINTER *)result__M1BH)[ 0];
-                if ((next__K1BH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M1BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__O1BH <<  1)) <=  4096)) {
-                    next__K1BH=(void *)((unsigned long)result__M1BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1BH)));
+                next__4HIH=((__POINTER *)result__AIIH)[ 0];
+                if ((next__4HIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AIIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CIIH <<  1)) <=  4096)) {
+                    next__4HIH=(void *)((unsigned long)result__AIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIIH)));
                   } else {
-                    next__K1BH=new_lab__ARJ(lab_type__N1BH);
+                    next__4HIH=new_lab__MRJ(lab_type__BIIH);
                   };
-                  ((__POINTER *)next__K1BH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__L1BH)[ 0]=next__K1BH;
+                  ((__POINTER *)next__4HIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__5HIH)[ 0]=next__4HIH;
                 } else {
-                  ((__POINTER *)result__M1BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K1BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__M1BH=next__K1BH;
+                  ((__POINTER *)result__AIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4HIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__AIIH=next__4HIH;
                 };
               };
-              ptr__Z0BH=result__M1BH;
-            };
-            result__Y0BH=((__LIP_BINARY *)ptr__Z0BH);
-            *(result__Y0BH) = *(LIP_BINARY__);
-          };
-          Self__A1BH=((__LIP_BINARY *)result__Y0BH);
-          Self__A1BH->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ=p__B1BH;
-          Self__A1BH->left__AZQD=result__DOZB;
-          Self__A1BH->right__DZQD=right__EOZB;
-          Self__A1BH->operator__GZQD='|';
-          result__DOZB=result__Y0BH;
-        } else {
-          p__Y1BH=current_position__3WF();
-          result__P1BH=NULL;
-          ptr__Q1BH=((__POINTER )(NULL));
-          typ_id__R1BH= 0;
-          sz__S1BH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__S1BH ==  0)) {
-            result__P1BH=LIP_BINARY__;
-          } else {
-            typ_id__R1BH=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__S1BH);
-            if ((typ_id__R1BH == (__INTEGER)(-  1))) {
-              a__T1BH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__U1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__S1BH + a__T1BH) & (__UINTEGER_32)(~ a__T1BH));
-              ptr_table__31BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__U1BH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__21BH=((__POINTER )(NULL));
-              result__41BH=((__POINTER *)ptr_table__31BH)[ 0];
-              if ((result__41BH == (void *)NULL)) {
-                result__41BH=new_lab__ARJ(new_size__U1BH);
-                next__21BH=(void *)((unsigned long)result__41BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U1BH)));
-                ((__POINTER *)next__21BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__31BH)[ 0]=next__21BH;
+              ptr__NHIH=result__AIIH;
+            };
+            result__MHIH=((__LIP_BINARY *)ptr__NHIH);
+            *(result__MHIH) = *(LIP_BINARY__);
+          };
+          Self__UHIH=((__LIP_BINARY *)result__MHIH);
+          Self__UHIH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__VHIH;
+          Self__UHIH->left__MZQD=result__POZB;
+          Self__UHIH->right__PZQD=right__QOZB;
+          Self__UHIH->operator__SZQD='|';
+          result__POZB=result__MHIH;
+        } else {
+          p__MIIH=current_position__JXF();
+          result__DIIH=NULL;
+          ptr__EIIH=((__POINTER )(NULL));
+          typ_id__FIIH= 0;
+          sz__GIIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__GIIH ==  0)) {
+            result__DIIH=LIP_BINARY__;
+          } else {
+            typ_id__FIIH=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + 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__RIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__QIIH=((__POINTER )(NULL));
+              result__SIIH=((__POINTER *)ptr_table__RIIH)[ 0];
+              if ((result__SIIH == (void *)NULL)) {
+                result__SIIH=new_lab__MRJ(new_size__IIIH);
+                next__QIIH=(void *)((unsigned long)result__SIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IIIH)));
+                ((__POINTER *)next__QIIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RIIH)[ 0]=next__QIIH;
               } else {
-                next__21BH=((__POINTER *)result__41BH)[ 0];
-                if ((next__21BH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__41BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__U1BH <<  1)) <=  4096)) {
-                    next__21BH=(void *)((unsigned long)result__41BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U1BH)));
+                next__QIIH=((__POINTER *)result__SIIH)[ 0];
+                if ((next__QIIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SIIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IIIH <<  1)) <=  4096)) {
+                    next__QIIH=(void *)((unsigned long)result__SIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IIIH)));
                   } else {
-                    next__21BH=new_lab__ARJ(new_size__U1BH);
+                    next__QIIH=new_lab__MRJ(new_size__IIIH);
                   };
-                  ((__POINTER *)next__21BH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__31BH)[ 0]=next__21BH;
+                  ((__POINTER *)next__QIIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__RIIH)[ 0]=next__QIIH;
                 } else {
-                  ((__POINTER *)result__41BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__41BH=next__21BH;
+                  ((__POINTER *)result__SIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__SIIH=next__QIIH;
                 };
               };
-              ptr__Q1BH=result__41BH;
+              ptr__EIIH=result__SIIH;
             } else {
-              t__V1BH=((__UINTEGER_32 )typ_id__R1BH);
-              a__W1BH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__F2BH=(__UINTEGER_32)((__UINTEGER_32)(sz__S1BH + a__W1BH) & (__UINTEGER_32)(~ a__W1BH));
-              ptr_table__C2BH=((__POINTER )(&(table_type[(t__V1BH)])));
-              lab_type__E2BH=(__UINTEGER_32)(t__V1BH |  1);
-              next__B2BH=((__POINTER )(NULL));
-              result__D2BH=((__POINTER *)ptr_table__C2BH)[ 0];
-              if ((result__D2BH == (void *)NULL)) {
-                result__D2BH=new_lab__ARJ(lab_type__E2BH);
-                next__B2BH=(void *)((unsigned long)result__D2BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F2BH)));
-                ((__POINTER *)next__B2BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__C2BH)[ 0]=next__B2BH;
+              t__JIIH=((__UINTEGER_32 )typ_id__FIIH);
+              a__KIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ZIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GIIH + a__KIIH) & (__UINTEGER_32)(~ a__KIIH));
+              ptr_table__WIIH=((__POINTER )(&(table_type[(t__JIIH)])));
+              lab_type__YIIH=(__UINTEGER_32)(t__JIIH |  1);
+              next__VIIH=((__POINTER )(NULL));
+              result__XIIH=((__POINTER *)ptr_table__WIIH)[ 0];
+              if ((result__XIIH == (void *)NULL)) {
+                result__XIIH=new_lab__MRJ(lab_type__YIIH);
+                next__VIIH=(void *)((unsigned long)result__XIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZIIH)));
+                ((__POINTER *)next__VIIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WIIH)[ 0]=next__VIIH;
               } else {
-                next__B2BH=((__POINTER *)result__D2BH)[ 0];
-                if ((next__B2BH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D2BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__F2BH <<  1)) <=  4096)) {
-                    next__B2BH=(void *)((unsigned long)result__D2BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F2BH)));
+                next__VIIH=((__POINTER *)result__XIIH)[ 0];
+                if ((next__VIIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XIIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZIIH <<  1)) <=  4096)) {
+                    next__VIIH=(void *)((unsigned long)result__XIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZIIH)));
                   } else {
-                    next__B2BH=new_lab__ARJ(lab_type__E2BH);
+                    next__VIIH=new_lab__MRJ(lab_type__YIIH);
                   };
-                  ((__POINTER *)next__B2BH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__C2BH)[ 0]=next__B2BH;
+                  ((__POINTER *)next__VIIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WIIH)[ 0]=next__VIIH;
                 } else {
-                  ((__POINTER *)result__D2BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B2BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__D2BH=next__B2BH;
+                  ((__POINTER *)result__XIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XIIH=next__VIIH;
                 };
               };
-              ptr__Q1BH=result__D2BH;
+              ptr__EIIH=result__XIIH;
             };
-            result__P1BH=((__LIP_BINARY *)ptr__Q1BH);
-            *(result__P1BH) = *(LIP_BINARY__);
+            result__DIIH=((__LIP_BINARY *)ptr__EIIH);
+            *(result__DIIH) = *(LIP_BINARY__);
           };
-          Self__X1BH=((__LIP_BINARY *)result__P1BH);
-          Self__X1BH->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ=p__Y1BH;
-          Self__X1BH->left__AZQD=result__DOZB;
-          Self__X1BH->right__DZQD=right__EOZB;
-          Self__X1BH->operator__GZQD='&';
-          result__DOZB=result__P1BH;
+          Self__LIIH=((__LIP_BINARY *)result__DIIH);
+          Self__LIIH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__MIIH;
+          Self__LIIH->left__MZQD=result__POZB;
+          Self__LIIH->right__PZQD=right__QOZB;
+          Self__LIIH->operator__SZQD='&';
+          result__POZB=result__DIIH;
         };
-        goto while_do__D24B;
+        goto while_do__P24B;
       };
     };
   };
-  return(result__DOZB);
+  return(result__POZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__QQKD(__INTEGER new_count__SQKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__2QKD(__INTEGER new_count__4QKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__G1LD,ptr_table__H2BH,next__G2BH,result__I2BH;
-  __POINTER ptr_table__M2BH,next__L2BH,result__N2BH;
-  __INTEGER typ_id__L1LD;
-  __UINTEGER_32 sz__I1LD,a__AW4G,new_size__BW4G,t__FW4G,a__EW4G;
-  __UINTEGER_32 new_size__P2BH,lab_type__O2BH;
-  __FAST_ARRAYoLIP_CODEo *result__F1LD,*Self__23TD;
-  result__F1LD=NULL;
-  ptr__G1LD=((__POINTER )(NULL));
-  typ_id__L1LD= 0;
-  sz__I1LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
-  if ((sz__I1LD ==  0)) {
-    result__F1LD=FAST_ARRAYoLIP_CODEo__;
+  __POINTER ptr__S1LD,ptr_table__1IIH,next__0IIH,result__2IIH;
+  __POINTER ptr_table__AJIH,next__5IIH,result__BJIH;
+  __INTEGER typ_id__X1LD;
+  __UINTEGER_32 sz__U1LD,a__VBFH,new_size__WBFH,t__0BFH,a__ZBFH;
+  __UINTEGER_32 new_size__DJIH,lab_type__CJIH;
+  __FAST_ARRAYoLIP_CODEo *result__R1LD,*Self__V4TD;
+  result__R1LD=NULL;
+  ptr__S1LD=((__POINTER )(NULL));
+  typ_id__X1LD= 0;
+  sz__U1LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
+  if ((sz__U1LD ==  0)) {
+    result__R1LD=FAST_ARRAYoLIP_CODEo__;
   } else {
-    typ_id__L1LD=__FAST_ARRAYoLIP_CODEo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__I1LD);
-    if ((typ_id__L1LD == (__INTEGER)(-  1))) {
-      a__AW4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__BW4G=(__UINTEGER_32)((__UINTEGER_32)(sz__I1LD + a__AW4G) & (__UINTEGER_32)(~ a__AW4G));
-      ptr_table__H2BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BW4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__G2BH=((__POINTER )(NULL));
-      result__I2BH=((__POINTER *)ptr_table__H2BH)[ 0];
-      if ((result__I2BH == (void *)NULL)) {
-        result__I2BH=new_lab__ARJ(new_size__BW4G);
-        next__G2BH=(void *)((unsigned long)result__I2BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BW4G)));
-        ((__POINTER *)next__G2BH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__H2BH)[ 0]=next__G2BH;
-      } else {
-        next__G2BH=((__POINTER *)result__I2BH)[ 0];
-        if ((next__G2BH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I2BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__BW4G <<  1)) <=  4096)) {
-            next__G2BH=(void *)((unsigned long)result__I2BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BW4G)));
-          } else {
-            next__G2BH=new_lab__ARJ(new_size__BW4G);
-          };
-          ((__POINTER *)next__G2BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__H2BH)[ 0]=next__G2BH;
-        } else {
-          ((__POINTER *)result__I2BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G2BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__I2BH=next__G2BH;
-        };
-      };
-      ptr__G1LD=result__I2BH;
-    } else {
-      t__FW4G=((__UINTEGER_32 )typ_id__L1LD);
-      a__EW4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__P2BH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1LD + a__EW4G) & (__UINTEGER_32)(~ a__EW4G));
-      ptr_table__M2BH=((__POINTER )(&(table_type[(t__FW4G)])));
-      lab_type__O2BH=(__UINTEGER_32)(t__FW4G |  1);
-      next__L2BH=((__POINTER )(NULL));
-      result__N2BH=((__POINTER *)ptr_table__M2BH)[ 0];
-      if ((result__N2BH == (void *)NULL)) {
-        result__N2BH=new_lab__ARJ(lab_type__O2BH);
-        next__L2BH=(void *)((unsigned long)result__N2BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P2BH)));
-        ((__POINTER *)next__L2BH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__M2BH)[ 0]=next__L2BH;
-      } else {
-        next__L2BH=((__POINTER *)result__N2BH)[ 0];
-        if ((next__L2BH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N2BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__P2BH <<  1)) <=  4096)) {
-            next__L2BH=(void *)((unsigned long)result__N2BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P2BH)));
-          } else {
-            next__L2BH=new_lab__ARJ(lab_type__O2BH);
-          };
-          ((__POINTER *)next__L2BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__M2BH)[ 0]=next__L2BH;
-        } else {
-          ((__POINTER *)result__N2BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L2BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__N2BH=next__L2BH;
-        };
-      };
-      ptr__G1LD=result__N2BH;
-    };
-    result__F1LD=((__FAST_ARRAYoLIP_CODEo *)ptr__G1LD);
-    *(result__F1LD) = *(FAST_ARRAYoLIP_CODEo__);
-  };
-  Self__23TD=((__FAST_ARRAYoLIP_CODEo *)result__F1LD);
-  if ((Self__23TD->parent_arrayed_collection__BLYC.capacity__CPTD < new_count__SQKD)) {
-    Self__23TD->parent_arrayed_collection__BLYC.storage__NPTD=create__LFIE(new_count__SQKD);
-    Self__23TD->parent_arrayed_collection__BLYC.capacity__CPTD=new_count__SQKD;
-  };
-  Self__23TD->parent_arrayed_collection__BLYC.upper__QDQD=(__INTEGER)(-  1);
-  return(result__F1LD);
+    typ_id__X1LD=__FAST_ARRAYoLIP_CODEo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__U1LD);
+    if ((typ_id__X1LD == (__INTEGER)(-  1))) {
+      a__VBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__U1LD + a__VBFH) & (__UINTEGER_32)(~ a__VBFH));
+      ptr_table__1IIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0IIH=((__POINTER )(NULL));
+      result__2IIH=((__POINTER *)ptr_table__1IIH)[ 0];
+      if ((result__2IIH == (void *)NULL)) {
+        result__2IIH=new_lab__MRJ(new_size__WBFH);
+        next__0IIH=(void *)((unsigned long)result__2IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBFH)));
+        ((__POINTER *)next__0IIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1IIH)[ 0]=next__0IIH;
+      } else {
+        next__0IIH=((__POINTER *)result__2IIH)[ 0];
+        if ((next__0IIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2IIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WBFH <<  1)) <=  4096)) {
+            next__0IIH=(void *)((unsigned long)result__2IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBFH)));
+          } else {
+            next__0IIH=new_lab__MRJ(new_size__WBFH);
+          };
+          ((__POINTER *)next__0IIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1IIH)[ 0]=next__0IIH;
+        } else {
+          ((__POINTER *)result__2IIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2IIH=next__0IIH;
+        };
+      };
+      ptr__S1LD=result__2IIH;
+    } else {
+      t__0BFH=((__UINTEGER_32 )typ_id__X1LD);
+      a__ZBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__U1LD + a__ZBFH) & (__UINTEGER_32)(~ a__ZBFH));
+      ptr_table__AJIH=((__POINTER )(&(table_type[(t__0BFH)])));
+      lab_type__CJIH=(__UINTEGER_32)(t__0BFH |  1);
+      next__5IIH=((__POINTER )(NULL));
+      result__BJIH=((__POINTER *)ptr_table__AJIH)[ 0];
+      if ((result__BJIH == (void *)NULL)) {
+        result__BJIH=new_lab__MRJ(lab_type__CJIH);
+        next__5IIH=(void *)((unsigned long)result__BJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJIH)));
+        ((__POINTER *)next__5IIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AJIH)[ 0]=next__5IIH;
+      } else {
+        next__5IIH=((__POINTER *)result__BJIH)[ 0];
+        if ((next__5IIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BJIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DJIH <<  1)) <=  4096)) {
+            next__5IIH=(void *)((unsigned long)result__BJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJIH)));
+          } else {
+            next__5IIH=new_lab__MRJ(lab_type__CJIH);
+          };
+          ((__POINTER *)next__5IIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AJIH)[ 0]=next__5IIH;
+        } else {
+          ((__POINTER *)result__BJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BJIH=next__5IIH;
+        };
+      };
+      ptr__S1LD=result__BJIH;
+    };
+    result__R1LD=((__FAST_ARRAYoLIP_CODEo *)ptr__S1LD);
+    *(result__R1LD) = *(FAST_ARRAYoLIP_CODEo__);
+  };
+  Self__V4TD=((__FAST_ARRAYoLIP_CODEo *)result__R1LD);
+  if ((Self__V4TD->parent_arrayed_collection__NLYC.capacity__1PTD < new_count__4QKD)) {
+    Self__V4TD->parent_arrayed_collection__NLYC.storage__GQTD=create__UUIE(new_count__4QKD);
+    Self__V4TD->parent_arrayed_collection__NLYC.capacity__1PTD=new_count__4QKD;
+  };
+  Self__V4TD->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(-  1);
+  return(result__R1LD);
 }
 
-static void add_last__QIUD(__FAST_ARRAYoLIP_CODEo *Self__RIUD,void *element__SIUD)
+static void add_last__JJUD(__FAST_ARRAYoLIP_CODEo *Self__KJUD,void *element__LJUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__TIUD,__tmp__XJUD,__tmp__AVVE,Self__TQPF;
-  __BOOLEAN __tmp__BJUD;
-  void **__tmp__WJUD,**new__MUVE;
-  new_capacity__TIUD= 0;
-  if (((__INTEGER)(Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD +  1) <= (__INTEGER)(Self__RIUD->parent_arrayed_collection__BLYC.capacity__CPTD -  1))) {
-    Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD=(__INTEGER)(Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD +  1);
-    __tmp__BJUD=TRUE__;
+  __INTEGER new_capacity__MJUD,__tmp__QKUD,__tmp__FFWE,Self__1TPF;
+  __BOOLEAN __tmp__0JUD;
+  void **__tmp__PKUD,**new__REWE;
+  new_capacity__MJUD= 0;
+  if (((__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD +  1) <= (__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD -  1))) {
+    Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD +  1);
+    __tmp__0JUD=TRUE__;
   } else {
-    __tmp__BJUD=FALSE__;
-  };
-  if ((! __tmp__BJUD)) {
-    if ((Self__RIUD->parent_arrayed_collection__BLYC.capacity__CPTD ==  0)) {
-      Self__RIUD->parent_arrayed_collection__BLYC.storage__NPTD=create__LFIE( 2);
-      Self__RIUD->parent_arrayed_collection__BLYC.capacity__CPTD= 2;
-      Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD= 0;
-    } else {
-      new_capacity__TIUD=(__INTEGER)(Self__RIUD->parent_arrayed_collection__BLYC.capacity__CPTD <<  1);
-      __tmp__WJUD=Self__RIUD->parent_arrayed_collection__BLYC.storage__NPTD;
-      __tmp__XJUD=Self__RIUD->parent_arrayed_collection__BLYC.capacity__CPTD;
-      new__MUVE=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__WJUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__XJUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__TIUD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__AVVE=(__INTEGER)(new_capacity__TIUD -  1);
-      Self__TQPF=__tmp__XJUD;
-      while ((Self__TQPF <= __tmp__AVVE)) {
-        new__MUVE[Self__TQPF]=NULL;
-        Self__TQPF=(__INTEGER)(Self__TQPF +  1);
-      };
-      Self__RIUD->parent_arrayed_collection__BLYC.storage__NPTD=new__MUVE;
-      Self__RIUD->parent_arrayed_collection__BLYC.capacity__CPTD=new_capacity__TIUD;
-      Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD=(__INTEGER)(Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD +  1);
-    };
-  };
-  ((void **)Self__RIUD->parent_arrayed_collection__BLYC.storage__NPTD)[Self__RIUD->parent_arrayed_collection__BLYC.upper__QDQD]=element__SIUD;
+    __tmp__0JUD=FALSE__;
+  };
+  if ((! __tmp__0JUD)) {
+    if ((Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD ==  0)) {
+      Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD=create__UUIE( 2);
+      Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD= 2;
+      Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD= 0;
+    } else {
+      new_capacity__MJUD=(__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD <<  1);
+      __tmp__PKUD=Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD;
+      __tmp__QKUD=Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD;
+      new__REWE=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__PKUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__QKUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MJUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__FFWE=(__INTEGER)(new_capacity__MJUD -  1);
+      Self__1TPF=__tmp__QKUD;
+      while ((Self__1TPF <= __tmp__FFWE)) {
+        new__REWE[Self__1TPF]=NULL;
+        Self__1TPF=(__INTEGER)(Self__1TPF +  1);
+      };
+      Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD=new__REWE;
+      Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD=new_capacity__MJUD;
+      Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD +  1);
+    };
+  };
+  ((void **)Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD)[Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD]=element__LJUD;
 }
 
-static void* copy__2KID(void *tmp__4KID)
+static void* copy__ILID(void *tmp__KLID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__ZOTD,other_upper__YOTD,Self__DGXE;
-  __INTEGER new_capacity__V5TD,__tmp__3AUD,__tmp__MTVE,Self__UOPF;
-  void *result__ALID;
-  __FAST_ARRAYoLIP_CODEo *Self__WOTD;
-  void **__tmp__QPTD,**__tmp__SPTD,**Self__LKVE;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__T5TD;
-  __BOOLEAN __tmp__EAUD;
-  void **__tmp__2AUD,**new__YSVE;
-  result__ALID=create_with_capacity__QQKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__4KID)->parent_arrayed_collection__BLYC.upper__QDQD +  1));
-  Self__WOTD=((__FAST_ARRAYoLIP_CODEo *)result__ALID);
-  new_capacity__ZOTD= 0;
-  other_upper__YOTD=((__FAST_ARRAYoLIP_CODEo *)tmp__4KID)->parent_arrayed_collection__BLYC.upper__QDQD;
-  if ((other_upper__YOTD >=  0)) {
-    new_capacity__ZOTD=(__INTEGER)(other_upper__YOTD +  1);
-    if ((Self__WOTD->parent_arrayed_collection__BLYC.capacity__CPTD < new_capacity__ZOTD)) {
-      Self__WOTD->parent_arrayed_collection__BLYC.storage__NPTD=create__LFIE(new_capacity__ZOTD);
-      Self__WOTD->parent_arrayed_collection__BLYC.capacity__CPTD=new_capacity__ZOTD;
-    };
-    __tmp__QPTD=Self__WOTD->parent_arrayed_collection__BLYC.storage__NPTD;
-    __tmp__SPTD=((__FAST_ARRAYoLIP_CODEo *)tmp__4KID)->parent_arrayed_collection__BLYC.storage__NPTD;
-    Self__LKVE=((void **)__tmp__QPTD);
-    Self__DGXE=other_upper__YOTD;
-    while ((Self__DGXE >=  0)) {
-      Self__LKVE[Self__DGXE]=((void **)__tmp__SPTD)[Self__DGXE];
-      Self__DGXE=(__INTEGER)(Self__DGXE -  1);
-    };
-  };
-  Self__WOTD->parent_arrayed_collection__BLYC.upper__QDQD=other_upper__YOTD;
-  ((__FAST_ARRAYoLIP_CODEo *)tmp__4KID)->parent_arrayed_collection__BLYC.upper__QDQD=(__INTEGER)(-  1);
-  Self__T5TD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__0JID);
-  new_capacity__V5TD= 0;
-  if (((__INTEGER)(Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD +  1) <= (__INTEGER)(Self__T5TD->parent_arrayed_collection__ZJID.capacity__X5TD -  1))) {
-    Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD=(__INTEGER)(Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD +  1);
-    __tmp__EAUD=TRUE__;
+  __INTEGER new_capacity__SPTD,other_upper__RPTD,Self__01XE;
+  __INTEGER new_capacity__OAUD,__tmp__WBUD,__tmp__RDWE,Self__2RPF;
+  void *result__MLID;
+  __FAST_ARRAYoLIP_CODEo *Self__PPTD;
+  void **__tmp__JQTD,**__tmp__LQTD,**Self__Q0VE;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__MAUD;
+  __BOOLEAN __tmp__3AUD;
+  void **__tmp__VBUD,**new__3CWE;
+  result__MLID=create_with_capacity__2QKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.upper__2DQD +  1));
+  Self__PPTD=((__FAST_ARRAYoLIP_CODEo *)result__MLID);
+  new_capacity__SPTD= 0;
+  other_upper__RPTD=((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.upper__2DQD;
+  if ((other_upper__RPTD >=  0)) {
+    new_capacity__SPTD=(__INTEGER)(other_upper__RPTD +  1);
+    if ((Self__PPTD->parent_arrayed_collection__NLYC.capacity__1PTD < new_capacity__SPTD)) {
+      Self__PPTD->parent_arrayed_collection__NLYC.storage__GQTD=create__UUIE(new_capacity__SPTD);
+      Self__PPTD->parent_arrayed_collection__NLYC.capacity__1PTD=new_capacity__SPTD;
+    };
+    __tmp__JQTD=Self__PPTD->parent_arrayed_collection__NLYC.storage__GQTD;
+    __tmp__LQTD=((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.storage__GQTD;
+    Self__Q0VE=((void **)__tmp__JQTD);
+    Self__01XE=other_upper__RPTD;
+    while ((Self__01XE >=  0)) {
+      Self__Q0VE[Self__01XE]=((void **)__tmp__LQTD)[Self__01XE];
+      Self__01XE=(__INTEGER)(Self__01XE -  1);
+    };
+  };
+  Self__PPTD->parent_arrayed_collection__NLYC.upper__2DQD=other_upper__RPTD;
+  ((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(-  1);
+  Self__MAUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
+  new_capacity__OAUD= 0;
+  if (((__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.upper__POTD +  1) <= (__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD -  1))) {
+    Self__MAUD->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.upper__POTD +  1);
+    __tmp__3AUD=TRUE__;
   } else {
-    __tmp__EAUD=FALSE__;
-  };
-  if ((! __tmp__EAUD)) {
-    if ((Self__T5TD->parent_arrayed_collection__ZJID.capacity__X5TD ==  0)) {
-      Self__T5TD->parent_arrayed_collection__ZJID.storage__TAUD=create__5KIE( 2);
-      Self__T5TD->parent_arrayed_collection__ZJID.capacity__X5TD= 2;
-      Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD= 0;
-    } else {
-      new_capacity__V5TD=(__INTEGER)(Self__T5TD->parent_arrayed_collection__ZJID.capacity__X5TD <<  1);
-      __tmp__2AUD=Self__T5TD->parent_arrayed_collection__ZJID.storage__TAUD;
-      __tmp__3AUD=Self__T5TD->parent_arrayed_collection__ZJID.capacity__X5TD;
-      new__YSVE=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__2AUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__3AUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__V5TD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__MTVE=(__INTEGER)(new_capacity__V5TD -  1);
-      Self__UOPF=__tmp__3AUD;
-      while ((Self__UOPF <= __tmp__MTVE)) {
-        new__YSVE[Self__UOPF]=NULL;
-        Self__UOPF=(__INTEGER)(Self__UOPF +  1);
-      };
-      Self__T5TD->parent_arrayed_collection__ZJID.storage__TAUD=new__YSVE;
-      Self__T5TD->parent_arrayed_collection__ZJID.capacity__X5TD=new_capacity__V5TD;
-      Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD=(__INTEGER)(Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD +  1);
-    };
-  };
-  ((void **)Self__T5TD->parent_arrayed_collection__ZJID.storage__TAUD)[Self__T5TD->parent_arrayed_collection__ZJID.upper__WNTD]=tmp__4KID;
-  return(result__ALID);
+    __tmp__3AUD=FALSE__;
+  };
+  if ((! __tmp__3AUD)) {
+    if ((Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD ==  0)) {
+      Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD=create__I0IE( 2);
+      Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD= 2;
+      Self__MAUD->parent_arrayed_collection__FKID.upper__POTD= 0;
+    } else {
+      new_capacity__OAUD=(__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD <<  1);
+      __tmp__VBUD=Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD;
+      __tmp__WBUD=Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD;
+      new__3CWE=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__VBUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__WBUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OAUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__RDWE=(__INTEGER)(new_capacity__OAUD -  1);
+      Self__2RPF=__tmp__WBUD;
+      while ((Self__2RPF <= __tmp__RDWE)) {
+        new__3CWE[Self__2RPF]=NULL;
+        Self__2RPF=(__INTEGER)(Self__2RPF +  1);
+      };
+      Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD=new__3CWE;
+      Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD=new_capacity__OAUD;
+      Self__MAUD->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.upper__POTD +  1);
+    };
+  };
+  ((void **)Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD)[Self__MAUD->parent_arrayed_collection__FKID.upper__POTD]=tmp__KLID;
+  return(result__MLID);
 }
 
-static void* fast_reference_at__CURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__DURD,void *k__EURD)
+static void* fast_reference_at__OURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__PURD,void *k__QURD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__N45G;
-  __INTEGER result__M45G,__tmp__O45G,Self__P45G;
-  void *node__OURD;
-  __BOOLEAN __tmp__GVRD;
-  Self__N45G=((__STRING_CONSTANT *)k__EURD);
-  result__M45G= 0;
-  __tmp__O45G=Self__N45G->count__DD;
-  Self__P45G= 1;
-  while ((Self__P45G <= __tmp__O45G)) {
-    result__M45G=(__INTEGER)((__INTEGER)( 5 * result__M45G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__N45G->storage__JQO)[(__INTEGER)(Self__P45G -  1)])));
-    Self__P45G=(__INTEGER)(Self__P45G +  1);
-  };
-  if ((result__M45G <  0)) {
-    result__M45G=(__INTEGER)(~ result__M45G);
-  };
-  node__OURD=((void **)Self__DURD->buckets__WURD)[(__INTEGER)(result__M45G % Self__DURD->capacity__RURD)];
-  until_do__GFWD:
+  __STRING_CONSTANT *Self__ZKGH;
+  __INTEGER result__YKGH,__tmp__0KGH,Self__1KGH;
+  void *node__0URD;
+  __BOOLEAN __tmp__SVRD;
+  Self__ZKGH=((__STRING_CONSTANT *)k__QURD);
+  result__YKGH= 0;
+  __tmp__0KGH=Self__ZKGH->count__DD;
+  Self__1KGH= 1;
+  while ((Self__1KGH <= __tmp__0KGH)) {
+    result__YKGH=(__INTEGER)((__INTEGER)( 5 * result__YKGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZKGH->storage__VQO)[(__INTEGER)(Self__1KGH -  1)])));
+    Self__1KGH=(__INTEGER)(Self__1KGH +  1);
+  };
+  if ((result__YKGH <  0)) {
+    result__YKGH=(__INTEGER)(~ result__YKGH);
+  };
+  node__0URD=((void **)Self__PURD->buckets__CVRD)[(__INTEGER)(result__YKGH % Self__PURD->capacity__3URD)];
+  until_do__5FWD:
   {
-    if (((void *)node__OURD == (void *)NULL)) {
-      __tmp__GVRD=TRUE__;
+    if (((void *)node__0URD == (void *)NULL)) {
+      __tmp__SVRD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__GVRD=((void *)NULL == (void *)k__EURD);
+      __tmp__SVRD=((void *)NULL == (void *)k__QURD);
     };
-    if ((! __tmp__GVRD)) {
+    if ((! __tmp__SVRD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__OURD=NULL;
-      goto until_do__GFWD;
+      node__0URD=NULL;
+      goto until_do__5FWD;
     };
   };
-  if (((void *)node__OURD != (void *)NULL)) {
+  if (((void *)node__0URD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__0YQD(__LIP_BINARY *Self__1YQD)
+static void* run_expr__GZQD(__LIP_BINARY *Self__HZQD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  void *result__3YQD,*__tmp__CZQD,*__tmp__R2BH,*__tmp__S2BH,*__tmp__FZQD;
-  void *__tmp__W2BH,*__tmp__X2BH,*result__RS1F,*__tmp__NZQD;
-  void *result__BT1F,*result__TT1F,*__tmp__UZQD,*result__DU1F;
-  void *result__VU1F,*__tmp__1ZQD,*result__FV1F,*result__PFDG;
-  void *result__XV1F,*__tmp__C0QD,*result__HW1F,*result__AGDG;
-  void *__tmp__J0QD,*result__JX1F,*__tmp__Q0QD,*result__LY1F;
-  void *__tmp__X0QD,*result__NZ1F,*__tmp__40QD,*result__P01F;
-  void *__tmp__F1QD,*result__R11F,*result__VIDG,*__tmp__M1QD;
-  void *result__T21F;
-  void *__tmp__BZQD,*__tmp__EZQD;
-  __LIP_INTEGER *Self__T2BH,*Self__Y2BH,*Self__4S1F,*__tmp__ET1F;
-  __LIP_INTEGER *s__CT1F,*Self__AU1F,*__tmp__GU1F,*s__EU1F,*Self__CV1F;
-  __LIP_INTEGER *__tmp__IV1F,*s__GV1F,*Self__EW1F,*__tmp__KW1F,*s__IW1F;
-  __LIP_INTEGER *Self__GX1F,*__tmp__MX1F,*s__KX1F,*Self__IY1F;
-  __LIP_INTEGER *__tmp__OY1F,*s__MY1F,*Self__KZ1F,*__tmp__QZ1F,*s__OZ1F;
-  __LIP_INTEGER *Self__M01F,*__tmp__S01F,*s__Q01F,*Self__O11F;
-  __LIP_INTEGER *__tmp__U11F,*s__S11F,*Self__Q21F,*__tmp__W21F,*s__U21F;
-  __LIP_STRING *Self__U2BH,*Self__Z2BH,*__tmp__QEDG,*s__OEDG;
-  __LIP_STRING *__tmp__BFDG,*s__5EDG,*Self__MFDG,*__tmp__SFDG,*s__QFDG;
-  __LIP_STRING *Self__3FDG,*__tmp__DGDG,*s__BGDG,*__tmp__UGDG,*s__SGDG;
-  __LIP_STRING *__tmp__FHDG,*s__DHDG,*__tmp__WHDG,*s__UHDG,*__tmp__HIDG;
-  __LIP_STRING *s__FIDG,*Self__SIDG,*__tmp__YIDG,*s__WIDG,*__tmp__JJDG;
-  __LIP_STRING *s__HJDG;
-  __LIP_BOOLEAN *Self__OS1F,*__tmp__US1F,*s__SS1F,*Self__QT1F;
-  __LIP_BOOLEAN *__tmp__WT1F,*s__UT1F,*Self__SU1F,*__tmp__YU1F,*s__WU1F;
-  __LIP_BOOLEAN *Self__UV1F,*__tmp__0V1F,*s__YV1F,*__tmp__2W1F,*s__0W1F;
-  __LIP_BOOLEAN *__tmp__4X1F,*s__2X1F,*__tmp__AZ1F,*s__4Y1F,*__tmp__C01F;
-  __LIP_BOOLEAN *s__A01F,*__tmp__E11F,*s__C11F,*__tmp__G21F,*s__E21F;
-  void *result__SQ2G,*result__UQ2G,*result__WQ2G,*result__YQ2G;
-  void *result__0Q2G,*result__2Q2G,*result__4Q2G,*result__AR2G;
-  void *result__CR2G,*result__ER2G,*result__GR2G,*result__IR2G;
-  __POSITION __tmp__V1QD;
-  __CHARACTER Self__RQVD;
-  __BOOLEAN b__TQ2G,b__VQ2G,b__XQ2G,b__ZQ2G,b__1Q2G,b__3Q2G,b__5Q2G;
-  __BOOLEAN b__BR2G,b__DR2G,b__FR2G,b__HR2G,b__JR2G;
-  result__3YQD=NULL;
-  __tmp__BZQD=Self__1YQD->left__AZQD;
-  switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+  void *result__JZQD,*__tmp__OZQD,*__tmp__FJIH,*__tmp__GJIH,*__tmp__RZQD;
+  void *__tmp__KJIH,*__tmp__LJIH,*result__GN2F,*__tmp__ZZQD;
+  void *result__WN2F,*result__IO2F,*__tmp__A0QD,*result__YO2F;
+  void *result__KP2F,*__tmp__H0QD,*result__0P2F,*result__NOGG;
+  void *result__MQ2F,*__tmp__O0QD,*result__2Q2F,*result__4OGG;
+  void *__tmp__V0QD,*result__4R2F,*__tmp__20QD,*result__AT2F;
+  void *__tmp__D1QD,*result__CU2F,*__tmp__K1QD,*result__EV2F;
+  void *__tmp__R1QD,*result__GW2F,*result__TRGG,*__tmp__Y1QD;
+  void *result__IX2F;
+  void *__tmp__NZQD,*__tmp__QZQD;
+  __LIP_INTEGER *Self__HJIH,*Self__MJIH,*Self__TN2F,*__tmp__ZN2F;
+  __LIP_INTEGER *s__XN2F,*Self__VO2F,*__tmp__1O2F,*s__ZO2F,*Self__XP2F;
+  __LIP_INTEGER *__tmp__3P2F,*s__1P2F,*Self__ZQ2F,*__tmp__5Q2F,*s__3Q2F;
+  __LIP_INTEGER *Self__1R2F,*__tmp__BS2F,*s__5R2F,*Self__3S2F;
+  __LIP_INTEGER *__tmp__DT2F,*s__BT2F,*Self__5T2F,*__tmp__FU2F,*s__DU2F;
+  __LIP_INTEGER *Self__BV2F,*__tmp__HV2F,*s__FV2F,*Self__DW2F;
+  __LIP_INTEGER *__tmp__JW2F,*s__HW2F,*Self__FX2F,*__tmp__LX2F,*s__JX2F;
+  __LIP_STRING *Self__IJIH,*Self__NJIH,*__tmp__ONGG,*s__MNGG;
+  __LIP_STRING *__tmp__5NGG,*s__3NGG,*Self__KOGG,*__tmp__QOGG,*s__OOGG;
+  __LIP_STRING *Self__1OGG,*__tmp__BPGG,*s__5OGG,*__tmp__SPGG,*s__QPGG;
+  __LIP_STRING *__tmp__DQGG,*s__BQGG,*__tmp__UQGG,*s__SQGG,*__tmp__FRGG;
+  __LIP_STRING *s__DRGG,*Self__QRGG,*__tmp__WRGG,*s__URGG,*__tmp__HSGG;
+  __LIP_STRING *s__FSGG;
+  __LIP_BOOLEAN *Self__DN2F,*__tmp__JN2F,*s__HN2F,*Self__FO2F;
+  __LIP_BOOLEAN *__tmp__LO2F,*s__JO2F,*Self__HP2F,*__tmp__NP2F,*s__LP2F;
+  __LIP_BOOLEAN *Self__JQ2F,*__tmp__PQ2F,*s__NQ2F,*__tmp__RR2F,*s__PR2F;
+  __LIP_BOOLEAN *__tmp__TS2F,*s__RS2F,*__tmp__VT2F,*s__TT2F,*__tmp__XU2F;
+  __LIP_BOOLEAN *s__VU2F,*__tmp__ZV2F,*s__XV2F,*__tmp__1W2F,*s__ZW2F;
+  void *result__Q1CH,*result__S1CH,*result__U1CH,*result__W1CH;
+  void *result__Y1CH,*result__01CH,*result__21CH,*result__41CH;
+  void *result__A2CH,*result__C2CH,*result__E2CH,*result__G2CH;
+  __POSITION __tmp__B2QD;
+  __CHARACTER Self__KRVD;
+  __BOOLEAN b__R1CH,b__T1CH,b__V1CH,b__X1CH,b__Z1CH,b__11CH,b__31CH;
+  __BOOLEAN b__51CH,b__B2CH,b__D2CH,b__F2CH,b__H2CH;
+  result__JZQD=NULL;
+  __tmp__NZQD=Self__HZQD->left__MZQD;
+  switch (((struct ___OBJ *)__tmp__NZQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__CZQD=run_expr__0YQD(__tmp__BZQD);
+    __tmp__OZQD=run_expr__GZQD(__tmp__NZQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__CZQD=run_expr__Z1QD(__tmp__BZQD);
+    __tmp__OZQD=run_expr__F2QD(__tmp__NZQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__CZQD=run_expr__XTTE(__tmp__BZQD);
+    __tmp__OZQD=run_expr__RBUE(__tmp__NZQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__R2BH=((__LIP_VALUE *)__tmp__BZQD)->value__XXTE;
-    switch (((struct ___OBJ *)__tmp__R2BH)->__id) {
+    __tmp__FJIH=((__LIP_VALUE *)__tmp__NZQD)->value__RFUE;
+    switch (((struct ___OBJ *)__tmp__FJIH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__S2BH=((__LIP_BOOLEAN *)__tmp__R2BH);
+      __tmp__GJIH=((__LIP_BOOLEAN *)__tmp__FJIH);
     } break;
     case __LIP_INTEGER__: {
-      Self__T2BH=((__LIP_INTEGER *)__tmp__R2BH);
-      __tmp__S2BH=get__IWRE(Self__T2BH,Self__T2BH->value__G31F);
+      Self__HJIH=((__LIP_INTEGER *)__tmp__FJIH);
+      __tmp__GJIH=get__QFSE(Self__HJIH,Self__HJIH->value__1X2F);
     } break;
     case __LIP_STRING__: {
-      Self__U2BH=((__LIP_STRING *)__tmp__R2BH);
-      __tmp__S2BH=get__3HEF(Self__U2BH,Self__U2BH->value__FPTE);
+      Self__IJIH=((__LIP_STRING *)__tmp__FJIH);
+      __tmp__GJIH=get__N2EF(Self__IJIH,Self__IJIH->value__52TE);
     } break;
     };
-    __tmp__CZQD=__tmp__S2BH;
+    __tmp__OZQD=__tmp__GJIH;
   } break;
   };
-  __tmp__EZQD=Self__1YQD->right__DZQD;
-  switch (((struct ___OBJ *)__tmp__EZQD)->__id) {
+  __tmp__QZQD=Self__HZQD->right__PZQD;
+  switch (((struct ___OBJ *)__tmp__QZQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__FZQD=run_expr__0YQD(__tmp__EZQD);
+    __tmp__RZQD=run_expr__GZQD(__tmp__QZQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__FZQD=run_expr__Z1QD(__tmp__EZQD);
+    __tmp__RZQD=run_expr__F2QD(__tmp__QZQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__FZQD=run_expr__XTTE(__tmp__EZQD);
+    __tmp__RZQD=run_expr__RBUE(__tmp__QZQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__W2BH=((__LIP_VALUE *)__tmp__EZQD)->value__XXTE;
-    switch (((struct ___OBJ *)__tmp__W2BH)->__id) {
+    __tmp__KJIH=((__LIP_VALUE *)__tmp__QZQD)->value__RFUE;
+    switch (((struct ___OBJ *)__tmp__KJIH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__X2BH=((__LIP_BOOLEAN *)__tmp__W2BH);
+      __tmp__LJIH=((__LIP_BOOLEAN *)__tmp__KJIH);
     } break;
     case __LIP_INTEGER__: {
-      Self__Y2BH=((__LIP_INTEGER *)__tmp__W2BH);
-      __tmp__X2BH=get__IWRE(Self__Y2BH,Self__Y2BH->value__G31F);
+      Self__MJIH=((__LIP_INTEGER *)__tmp__KJIH);
+      __tmp__LJIH=get__QFSE(Self__MJIH,Self__MJIH->value__1X2F);
     } break;
     case __LIP_STRING__: {
-      Self__Z2BH=((__LIP_STRING *)__tmp__W2BH);
-      __tmp__X2BH=get__3HEF(Self__Z2BH,Self__Z2BH->value__FPTE);
+      Self__NJIH=((__LIP_STRING *)__tmp__KJIH);
+      __tmp__LJIH=get__N2EF(Self__NJIH,Self__NJIH->value__52TE);
     } break;
     };
-    __tmp__FZQD=__tmp__X2BH;
+    __tmp__RZQD=__tmp__LJIH;
   } break;
   };
-  Self__RQVD=Self__1YQD->operator__GZQD;
-  if ((Self__RQVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  Self__KRVD=Self__HZQD->operator__SZQD;
+  if ((Self__KRVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__OS1F=((__LIP_BOOLEAN *)__tmp__CZQD);
-      result__RS1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__US1F=NULL;
+      Self__DN2F=((__LIP_BOOLEAN *)__tmp__OZQD);
+      result__GN2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__JN2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__US1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__JN2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__US1F=NULL;
+          __tmp__JN2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__US1F=NULL;
+          __tmp__JN2F=NULL;
         } break;
         }
       };
-      s__SS1F=__tmp__US1F;
-      if (((void *)__tmp__US1F != (void *)NULL)) {
-        b__TQ2G=(Self__OS1F->value__DDQD | __tmp__US1F->value__DDQD);
-        result__SQ2G=NULL;
-        if (b__TQ2G) {
-          result__SQ2G=true__VDKF;
+      s__HN2F=__tmp__JN2F;
+      if (((void *)__tmp__JN2F != (void *)NULL)) {
+        b__R1CH=(Self__DN2F->value__PDQD | __tmp__JN2F->value__PDQD);
+        result__Q1CH=NULL;
+        if (b__R1CH) {
+          result__Q1CH=true__5TKF;
         } else {
-          result__SQ2G=LIP_BOOLEAN__;
+          result__Q1CH=LIP_BOOLEAN__;
         };
-        result__RS1F=result__SQ2G;
+        result__GN2F=result__Q1CH;
       };
-      __tmp__NZQD=result__RS1F;
+      __tmp__ZZQD=result__GN2F;
     } break;
     case __LIP_INTEGER__: {
-      Self__4S1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__BT1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__ET1F=NULL;
+      Self__TN2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__WN2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__ZN2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ET1F=NULL;
+          __tmp__ZN2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ET1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__ZN2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__ET1F=NULL;
+          __tmp__ZN2F=NULL;
         } break;
         }
       };
-      s__CT1F=__tmp__ET1F;
-      if (((void *)__tmp__ET1F != (void *)NULL)) {
-        Self__4S1F->value__G31F=(__INTEGER)(Self__4S1F->value__G31F | __tmp__ET1F->value__G31F);
-        free__4R1F(__tmp__ET1F);
-        result__BT1F=Self__4S1F;
+      s__XN2F=__tmp__ZN2F;
+      if (((void *)__tmp__ZN2F != (void *)NULL)) {
+        Self__TN2F->value__1X2F=(__INTEGER)(Self__TN2F->value__1X2F | __tmp__ZN2F->value__1X2F);
+        free__TM2F(__tmp__ZN2F);
+        result__WN2F=Self__TN2F;
       };
-      __tmp__NZQD=result__BT1F;
+      __tmp__ZZQD=result__WN2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__QEDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__ONGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QEDG=NULL;
+          __tmp__ONGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QEDG=NULL;
+          __tmp__ONGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__QEDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__ONGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__OEDG=__tmp__QEDG;
-      __tmp__NZQD=NULL;
+      s__MNGG=__tmp__ONGG;
+      __tmp__ZZQD=NULL;
     } break;
     };
-    result__3YQD=__tmp__NZQD;
+    result__JZQD=__tmp__ZZQD;
   };
-  if ((Self__RQVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__QT1F=((__LIP_BOOLEAN *)__tmp__CZQD);
-      result__TT1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__WT1F=NULL;
+      Self__FO2F=((__LIP_BOOLEAN *)__tmp__OZQD);
+      result__IO2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__LO2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__WT1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__LO2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__WT1F=NULL;
+          __tmp__LO2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__WT1F=NULL;
+          __tmp__LO2F=NULL;
         } break;
         }
       };
-      s__UT1F=__tmp__WT1F;
-      if (((void *)__tmp__WT1F != (void *)NULL)) {
-        b__VQ2G=(Self__QT1F->value__DDQD & __tmp__WT1F->value__DDQD);
-        result__UQ2G=NULL;
-        if (b__VQ2G) {
-          result__UQ2G=true__VDKF;
+      s__JO2F=__tmp__LO2F;
+      if (((void *)__tmp__LO2F != (void *)NULL)) {
+        b__T1CH=(Self__FO2F->value__PDQD & __tmp__LO2F->value__PDQD);
+        result__S1CH=NULL;
+        if (b__T1CH) {
+          result__S1CH=true__5TKF;
         } else {
-          result__UQ2G=LIP_BOOLEAN__;
+          result__S1CH=LIP_BOOLEAN__;
         };
-        result__TT1F=result__UQ2G;
+        result__IO2F=result__S1CH;
       };
-      __tmp__UZQD=result__TT1F;
+      __tmp__A0QD=result__IO2F;
     } break;
     case __LIP_INTEGER__: {
-      Self__AU1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__DU1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__GU1F=NULL;
+      Self__VO2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__YO2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__1O2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__GU1F=NULL;
+          __tmp__1O2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__GU1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__1O2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__GU1F=NULL;
+          __tmp__1O2F=NULL;
         } break;
         }
       };
-      s__EU1F=__tmp__GU1F;
-      if (((void *)__tmp__GU1F != (void *)NULL)) {
-        Self__AU1F->value__G31F=(__INTEGER)(Self__AU1F->value__G31F & __tmp__GU1F->value__G31F);
-        free__4R1F(__tmp__GU1F);
-        result__DU1F=Self__AU1F;
+      s__ZO2F=__tmp__1O2F;
+      if (((void *)__tmp__1O2F != (void *)NULL)) {
+        Self__VO2F->value__1X2F=(__INTEGER)(Self__VO2F->value__1X2F & __tmp__1O2F->value__1X2F);
+        free__TM2F(__tmp__1O2F);
+        result__YO2F=Self__VO2F;
       };
-      __tmp__UZQD=result__DU1F;
+      __tmp__A0QD=result__YO2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__BFDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__5NGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__BFDG=NULL;
+          __tmp__5NGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__BFDG=NULL;
+          __tmp__5NGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__BFDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__5NGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__5EDG=__tmp__BFDG;
-      __tmp__UZQD=NULL;
+      s__3NGG=__tmp__5NGG;
+      __tmp__A0QD=NULL;
     } break;
     };
-    result__3YQD=__tmp__UZQD;
+    result__JZQD=__tmp__A0QD;
   };
-  if ((Self__RQVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__SU1F=((__LIP_BOOLEAN *)__tmp__CZQD);
-      result__VU1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__YU1F=NULL;
+      Self__HP2F=((__LIP_BOOLEAN *)__tmp__OZQD);
+      result__KP2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__NP2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__YU1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__NP2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__YU1F=NULL;
+          __tmp__NP2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__YU1F=NULL;
+          __tmp__NP2F=NULL;
         } break;
         }
       };
-      s__WU1F=__tmp__YU1F;
-      if (((void *)__tmp__YU1F != (void *)NULL)) {
-        b__XQ2G=(Self__SU1F->value__DDQD == __tmp__YU1F->value__DDQD);
-        result__WQ2G=NULL;
-        if (b__XQ2G) {
-          result__WQ2G=true__VDKF;
+      s__LP2F=__tmp__NP2F;
+      if (((void *)__tmp__NP2F != (void *)NULL)) {
+        b__V1CH=(Self__HP2F->value__PDQD == __tmp__NP2F->value__PDQD);
+        result__U1CH=NULL;
+        if (b__V1CH) {
+          result__U1CH=true__5TKF;
         } else {
-          result__WQ2G=LIP_BOOLEAN__;
+          result__U1CH=LIP_BOOLEAN__;
         };
-        result__VU1F=result__WQ2G;
+        result__KP2F=result__U1CH;
       };
-      __tmp__1ZQD=result__VU1F;
+      __tmp__H0QD=result__KP2F;
     } break;
     case __LIP_INTEGER__: {
-      Self__CV1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__FV1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__IV1F=NULL;
+      Self__XP2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__0P2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__3P2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IV1F=NULL;
+          __tmp__3P2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IV1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__3P2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__IV1F=NULL;
+          __tmp__3P2F=NULL;
         } break;
         }
       };
-      s__GV1F=__tmp__IV1F;
-      if (((void *)__tmp__IV1F != (void *)NULL)) {
-        free__4R1F(__tmp__IV1F);
-        free__4R1F(Self__CV1F);
-        b__ZQ2G=(Self__CV1F->value__G31F == __tmp__IV1F->value__G31F);
-        result__YQ2G=NULL;
-        if (b__ZQ2G) {
-          result__YQ2G=true__VDKF;
+      s__1P2F=__tmp__3P2F;
+      if (((void *)__tmp__3P2F != (void *)NULL)) {
+        free__TM2F(__tmp__3P2F);
+        free__TM2F(Self__XP2F);
+        b__X1CH=(Self__XP2F->value__1X2F == __tmp__3P2F->value__1X2F);
+        result__W1CH=NULL;
+        if (b__X1CH) {
+          result__W1CH=true__5TKF;
         } else {
-          result__YQ2G=LIP_BOOLEAN__;
+          result__W1CH=LIP_BOOLEAN__;
         };
-        result__FV1F=result__YQ2G;
+        result__0P2F=result__W1CH;
       };
-      __tmp__1ZQD=result__FV1F;
+      __tmp__H0QD=result__0P2F;
     } break;
     case __LIP_STRING__: {
-      Self__MFDG=((__LIP_STRING *)__tmp__CZQD);
-      result__PFDG=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__SFDG=NULL;
+      Self__KOGG=((__LIP_STRING *)__tmp__OZQD);
+      result__NOGG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__QOGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__SFDG=NULL;
+          __tmp__QOGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__SFDG=NULL;
+          __tmp__QOGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__SFDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__QOGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__QFDG=__tmp__SFDG;
-      if (((void *)__tmp__SFDG != (void *)NULL)) {
-        free__DEDG(__tmp__SFDG);
-        free__DEDG(Self__MFDG);
-        b__1Q2G=((void *)Self__MFDG->value__FPTE == (void *)__tmp__SFDG->value__FPTE);
-        result__0Q2G=NULL;
-        if (b__1Q2G) {
-          result__0Q2G=true__VDKF;
+      s__OOGG=__tmp__QOGG;
+      if (((void *)__tmp__QOGG != (void *)NULL)) {
+        free__BNGG(__tmp__QOGG);
+        free__BNGG(Self__KOGG);
+        b__Z1CH=((void *)Self__KOGG->value__52TE == (void *)__tmp__QOGG->value__52TE);
+        result__Y1CH=NULL;
+        if (b__Z1CH) {
+          result__Y1CH=true__5TKF;
         } else {
-          result__0Q2G=LIP_BOOLEAN__;
+          result__Y1CH=LIP_BOOLEAN__;
         };
-        result__PFDG=result__0Q2G;
+        result__NOGG=result__Y1CH;
       };
-      __tmp__1ZQD=result__PFDG;
+      __tmp__H0QD=result__NOGG;
     } break;
     };
-    result__3YQD=__tmp__1ZQD;
+    result__JZQD=__tmp__H0QD;
   };
-  if ((Self__RQVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__UV1F=((__LIP_BOOLEAN *)__tmp__CZQD);
-      result__XV1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__0V1F=NULL;
+      Self__JQ2F=((__LIP_BOOLEAN *)__tmp__OZQD);
+      result__MQ2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__PQ2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0V1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__PQ2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0V1F=NULL;
+          __tmp__PQ2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__0V1F=NULL;
+          __tmp__PQ2F=NULL;
         } break;
         }
       };
-      s__YV1F=__tmp__0V1F;
-      if (((void *)__tmp__0V1F != (void *)NULL)) {
-        b__3Q2G=(Self__UV1F->value__DDQD != __tmp__0V1F->value__DDQD);
-        result__2Q2G=NULL;
-        if (b__3Q2G) {
-          result__2Q2G=true__VDKF;
+      s__NQ2F=__tmp__PQ2F;
+      if (((void *)__tmp__PQ2F != (void *)NULL)) {
+        b__11CH=(Self__JQ2F->value__PDQD != __tmp__PQ2F->value__PDQD);
+        result__01CH=NULL;
+        if (b__11CH) {
+          result__01CH=true__5TKF;
         } else {
-          result__2Q2G=LIP_BOOLEAN__;
+          result__01CH=LIP_BOOLEAN__;
         };
-        result__XV1F=result__2Q2G;
+        result__MQ2F=result__01CH;
       };
-      __tmp__C0QD=result__XV1F;
+      __tmp__O0QD=result__MQ2F;
     } break;
     case __LIP_INTEGER__: {
-      Self__EW1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__HW1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__KW1F=NULL;
+      Self__ZQ2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__2Q2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__5Q2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__KW1F=NULL;
+          __tmp__5Q2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__KW1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__5Q2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__KW1F=NULL;
+          __tmp__5Q2F=NULL;
         } break;
         }
       };
-      s__IW1F=__tmp__KW1F;
-      if (((void *)__tmp__KW1F != (void *)NULL)) {
-        free__4R1F(__tmp__KW1F);
-        free__4R1F(Self__EW1F);
-        b__5Q2G=(Self__EW1F->value__G31F != __tmp__KW1F->value__G31F);
-        result__4Q2G=NULL;
-        if (b__5Q2G) {
-          result__4Q2G=true__VDKF;
+      s__3Q2F=__tmp__5Q2F;
+      if (((void *)__tmp__5Q2F != (void *)NULL)) {
+        free__TM2F(__tmp__5Q2F);
+        free__TM2F(Self__ZQ2F);
+        b__31CH=(Self__ZQ2F->value__1X2F != __tmp__5Q2F->value__1X2F);
+        result__21CH=NULL;
+        if (b__31CH) {
+          result__21CH=true__5TKF;
         } else {
-          result__4Q2G=LIP_BOOLEAN__;
+          result__21CH=LIP_BOOLEAN__;
         };
-        result__HW1F=result__4Q2G;
+        result__2Q2F=result__21CH;
       };
-      __tmp__C0QD=result__HW1F;
+      __tmp__O0QD=result__2Q2F;
     } break;
     case __LIP_STRING__: {
-      Self__3FDG=((__LIP_STRING *)__tmp__CZQD);
-      result__AGDG=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__DGDG=NULL;
+      Self__1OGG=((__LIP_STRING *)__tmp__OZQD);
+      result__4OGG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__BPGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__DGDG=NULL;
+          __tmp__BPGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__DGDG=NULL;
+          __tmp__BPGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__DGDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__BPGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__BGDG=__tmp__DGDG;
-      if (((void *)__tmp__DGDG != (void *)NULL)) {
-        free__DEDG(__tmp__DGDG);
-        free__DEDG(Self__3FDG);
-        b__BR2G=((void *)Self__3FDG->value__FPTE != (void *)__tmp__DGDG->value__FPTE);
-        result__AR2G=NULL;
-        if (b__BR2G) {
-          result__AR2G=true__VDKF;
+      s__5OGG=__tmp__BPGG;
+      if (((void *)__tmp__BPGG != (void *)NULL)) {
+        free__BNGG(__tmp__BPGG);
+        free__BNGG(Self__1OGG);
+        b__51CH=((void *)Self__1OGG->value__52TE != (void *)__tmp__BPGG->value__52TE);
+        result__41CH=NULL;
+        if (b__51CH) {
+          result__41CH=true__5TKF;
         } else {
-          result__AR2G=LIP_BOOLEAN__;
+          result__41CH=LIP_BOOLEAN__;
         };
-        result__AGDG=result__AR2G;
+        result__4OGG=result__41CH;
       };
-      __tmp__C0QD=result__AGDG;
+      __tmp__O0QD=result__4OGG;
     } break;
     };
-    result__3YQD=__tmp__C0QD;
+    result__JZQD=__tmp__O0QD;
   };
-  if ((Self__RQVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__2W1F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__RR2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__2W1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__RR2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__2W1F=NULL;
+          __tmp__RR2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__2W1F=NULL;
+          __tmp__RR2F=NULL;
         } break;
         }
       };
-      s__0W1F=__tmp__2W1F;
-      __tmp__J0QD=NULL;
+      s__PR2F=__tmp__RR2F;
+      __tmp__V0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__GX1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__JX1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__MX1F=NULL;
+      Self__1R2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__4R2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__BS2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__MX1F=NULL;
+          __tmp__BS2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__MX1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__BS2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__MX1F=NULL;
+          __tmp__BS2F=NULL;
         } break;
         }
       };
-      s__KX1F=__tmp__MX1F;
-      if (((void *)__tmp__MX1F != (void *)NULL)) {
-        free__4R1F(__tmp__MX1F);
-        free__4R1F(Self__GX1F);
-        b__DR2G=(Self__GX1F->value__G31F > __tmp__MX1F->value__G31F);
-        result__CR2G=NULL;
-        if (b__DR2G) {
-          result__CR2G=true__VDKF;
+      s__5R2F=__tmp__BS2F;
+      if (((void *)__tmp__BS2F != (void *)NULL)) {
+        free__TM2F(__tmp__BS2F);
+        free__TM2F(Self__1R2F);
+        b__B2CH=(Self__1R2F->value__1X2F > __tmp__BS2F->value__1X2F);
+        result__A2CH=NULL;
+        if (b__B2CH) {
+          result__A2CH=true__5TKF;
         } else {
-          result__CR2G=LIP_BOOLEAN__;
+          result__A2CH=LIP_BOOLEAN__;
         };
-        result__JX1F=result__CR2G;
+        result__4R2F=result__A2CH;
       };
-      __tmp__J0QD=result__JX1F;
+      __tmp__V0QD=result__4R2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__UGDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__SPGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__UGDG=NULL;
+          __tmp__SPGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__UGDG=NULL;
+          __tmp__SPGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__UGDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__SPGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__SGDG=__tmp__UGDG;
-      __tmp__J0QD=NULL;
+      s__QPGG=__tmp__SPGG;
+      __tmp__V0QD=NULL;
     } break;
     };
-    result__3YQD=__tmp__J0QD;
+    result__JZQD=__tmp__V0QD;
   };
-  if ((Self__RQVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__4X1F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__TS2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__4X1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__TS2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__4X1F=NULL;
+          __tmp__TS2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__4X1F=NULL;
+          __tmp__TS2F=NULL;
         } break;
         }
       };
-      s__2X1F=__tmp__4X1F;
-      __tmp__Q0QD=NULL;
+      s__RS2F=__tmp__TS2F;
+      __tmp__20QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__IY1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__LY1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__OY1F=NULL;
+      Self__3S2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__AT2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__DT2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__OY1F=NULL;
+          __tmp__DT2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__OY1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__DT2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__OY1F=NULL;
+          __tmp__DT2F=NULL;
         } break;
         }
       };
-      s__MY1F=__tmp__OY1F;
-      if (((void *)__tmp__OY1F != (void *)NULL)) {
-        free__4R1F(__tmp__OY1F);
-        free__4R1F(Self__IY1F);
-        b__FR2G=(Self__IY1F->value__G31F < __tmp__OY1F->value__G31F);
-        result__ER2G=NULL;
-        if (b__FR2G) {
-          result__ER2G=true__VDKF;
+      s__BT2F=__tmp__DT2F;
+      if (((void *)__tmp__DT2F != (void *)NULL)) {
+        free__TM2F(__tmp__DT2F);
+        free__TM2F(Self__3S2F);
+        b__D2CH=(Self__3S2F->value__1X2F < __tmp__DT2F->value__1X2F);
+        result__C2CH=NULL;
+        if (b__D2CH) {
+          result__C2CH=true__5TKF;
         } else {
-          result__ER2G=LIP_BOOLEAN__;
+          result__C2CH=LIP_BOOLEAN__;
         };
-        result__LY1F=result__ER2G;
+        result__AT2F=result__C2CH;
       };
-      __tmp__Q0QD=result__LY1F;
+      __tmp__20QD=result__AT2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__FHDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__DQGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__FHDG=NULL;
+          __tmp__DQGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__FHDG=NULL;
+          __tmp__DQGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__FHDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__DQGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__DHDG=__tmp__FHDG;
-      __tmp__Q0QD=NULL;
+      s__BQGG=__tmp__DQGG;
+      __tmp__20QD=NULL;
     } break;
     };
-    result__3YQD=__tmp__Q0QD;
+    result__JZQD=__tmp__20QD;
   };
-  if ((Self__RQVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__AZ1F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__VT2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__AZ1F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__VT2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__AZ1F=NULL;
+          __tmp__VT2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__AZ1F=NULL;
+          __tmp__VT2F=NULL;
         } break;
         }
       };
-      s__4Y1F=__tmp__AZ1F;
-      __tmp__X0QD=NULL;
+      s__TT2F=__tmp__VT2F;
+      __tmp__D1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__KZ1F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__NZ1F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__QZ1F=NULL;
+      Self__5T2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__CU2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__FU2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QZ1F=NULL;
+          __tmp__FU2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QZ1F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__FU2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__QZ1F=NULL;
+          __tmp__FU2F=NULL;
         } break;
         }
       };
-      s__OZ1F=__tmp__QZ1F;
-      if (((void *)__tmp__QZ1F != (void *)NULL)) {
-        free__4R1F(__tmp__QZ1F);
-        free__4R1F(Self__KZ1F);
-        b__HR2G=(Self__KZ1F->value__G31F >= __tmp__QZ1F->value__G31F);
-        result__GR2G=NULL;
-        if (b__HR2G) {
-          result__GR2G=true__VDKF;
+      s__DU2F=__tmp__FU2F;
+      if (((void *)__tmp__FU2F != (void *)NULL)) {
+        free__TM2F(__tmp__FU2F);
+        free__TM2F(Self__5T2F);
+        b__F2CH=(Self__5T2F->value__1X2F >= __tmp__FU2F->value__1X2F);
+        result__E2CH=NULL;
+        if (b__F2CH) {
+          result__E2CH=true__5TKF;
         } else {
-          result__GR2G=LIP_BOOLEAN__;
+          result__E2CH=LIP_BOOLEAN__;
         };
-        result__NZ1F=result__GR2G;
+        result__CU2F=result__E2CH;
       };
-      __tmp__X0QD=result__NZ1F;
+      __tmp__D1QD=result__CU2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__WHDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__UQGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__WHDG=NULL;
+          __tmp__UQGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__WHDG=NULL;
+          __tmp__UQGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__WHDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__UQGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__UHDG=__tmp__WHDG;
-      __tmp__X0QD=NULL;
+      s__SQGG=__tmp__UQGG;
+      __tmp__D1QD=NULL;
     } break;
     };
-    result__3YQD=__tmp__X0QD;
+    result__JZQD=__tmp__D1QD;
   };
-  if ((Self__RQVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__C01F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__XU2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__C01F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__XU2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__C01F=NULL;
+          __tmp__XU2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__C01F=NULL;
+          __tmp__XU2F=NULL;
         } break;
         }
       };
-      s__A01F=__tmp__C01F;
-      __tmp__40QD=NULL;
+      s__VU2F=__tmp__XU2F;
+      __tmp__K1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__M01F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__P01F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__S01F=NULL;
+      Self__BV2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__EV2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__HV2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__S01F=NULL;
+          __tmp__HV2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__S01F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__HV2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__S01F=NULL;
+          __tmp__HV2F=NULL;
         } break;
         }
       };
-      s__Q01F=__tmp__S01F;
-      if (((void *)__tmp__S01F != (void *)NULL)) {
-        free__4R1F(__tmp__S01F);
-        free__4R1F(Self__M01F);
-        b__JR2G=(Self__M01F->value__G31F <= __tmp__S01F->value__G31F);
-        result__IR2G=NULL;
-        if (b__JR2G) {
-          result__IR2G=true__VDKF;
+      s__FV2F=__tmp__HV2F;
+      if (((void *)__tmp__HV2F != (void *)NULL)) {
+        free__TM2F(__tmp__HV2F);
+        free__TM2F(Self__BV2F);
+        b__H2CH=(Self__BV2F->value__1X2F <= __tmp__HV2F->value__1X2F);
+        result__G2CH=NULL;
+        if (b__H2CH) {
+          result__G2CH=true__5TKF;
         } else {
-          result__IR2G=LIP_BOOLEAN__;
+          result__G2CH=LIP_BOOLEAN__;
         };
-        result__P01F=result__IR2G;
+        result__EV2F=result__G2CH;
       };
-      __tmp__40QD=result__P01F;
+      __tmp__K1QD=result__EV2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__HIDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__FRGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__HIDG=NULL;
+          __tmp__FRGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__HIDG=NULL;
+          __tmp__FRGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__HIDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__FRGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__FIDG=__tmp__HIDG;
-      __tmp__40QD=NULL;
+      s__DRGG=__tmp__FRGG;
+      __tmp__K1QD=NULL;
     } break;
     };
-    result__3YQD=__tmp__40QD;
+    result__JZQD=__tmp__K1QD;
   };
-  if ((Self__RQVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__E11F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__ZV2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__E11F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__ZV2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__E11F=NULL;
+          __tmp__ZV2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__E11F=NULL;
+          __tmp__ZV2F=NULL;
         } break;
         }
       };
-      s__C11F=__tmp__E11F;
-      __tmp__F1QD=NULL;
+      s__XV2F=__tmp__ZV2F;
+      __tmp__R1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__O11F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__R11F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__U11F=NULL;
+      Self__DW2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__GW2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__JW2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__U11F=NULL;
+          __tmp__JW2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__U11F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__JW2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__U11F=NULL;
+          __tmp__JW2F=NULL;
         } break;
         }
       };
-      s__S11F=__tmp__U11F;
-      if (((void *)__tmp__U11F != (void *)NULL)) {
-        Self__O11F->value__G31F=(__INTEGER)(Self__O11F->value__G31F + __tmp__U11F->value__G31F);
-        free__4R1F(__tmp__U11F);
-        result__R11F=Self__O11F;
+      s__HW2F=__tmp__JW2F;
+      if (((void *)__tmp__JW2F != (void *)NULL)) {
+        Self__DW2F->value__1X2F=(__INTEGER)(Self__DW2F->value__1X2F + __tmp__JW2F->value__1X2F);
+        free__TM2F(__tmp__JW2F);
+        result__GW2F=Self__DW2F;
       };
-      __tmp__F1QD=result__R11F;
+      __tmp__R1QD=result__GW2F;
     } break;
     case __LIP_STRING__: {
-      Self__SIDG=((__LIP_STRING *)__tmp__CZQD);
-      result__VIDG=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__YIDG=NULL;
+      Self__QRGG=((__LIP_STRING *)__tmp__OZQD);
+      result__TRGG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__WRGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__YIDG=NULL;
+          __tmp__WRGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__YIDG=NULL;
+          __tmp__WRGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__YIDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__WRGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__WIDG=__tmp__YIDG;
-      if (((void *)__tmp__YIDG != (void *)NULL)) {
-        copy__NCS(string_tmp__VH,Self__SIDG->value__FPTE);
-        append__VNS(string_tmp__VH,__tmp__YIDG->value__FPTE);
-        Self__SIDG->value__FPTE=get__2VB(string_tmp__VH);
-        free__DEDG(__tmp__YIDG);
-        result__VIDG=Self__SIDG;
+      s__URGG=__tmp__WRGG;
+      if (((void *)__tmp__WRGG != (void *)NULL)) {
+        copy__ZCS(string_tmp__VH,Self__QRGG->value__52TE);
+        append__BOS(string_tmp__VH,__tmp__WRGG->value__52TE);
+        Self__QRGG->value__52TE=get__IWB(string_tmp__VH);
+        free__BNGG(__tmp__WRGG);
+        result__TRGG=Self__QRGG;
       };
-      __tmp__F1QD=result__VIDG;
+      __tmp__R1QD=result__TRGG;
     } break;
     };
-    result__3YQD=__tmp__F1QD;
+    result__JZQD=__tmp__R1QD;
   };
-  if ((Self__RQVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
+  if ((Self__KRVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__G21F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__1W2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__G21F=((__LIP_BOOLEAN *)__tmp__FZQD);
+          __tmp__1W2F=((__LIP_BOOLEAN *)__tmp__RZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__G21F=NULL;
+          __tmp__1W2F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__G21F=NULL;
+          __tmp__1W2F=NULL;
         } break;
         }
       };
-      s__E21F=__tmp__G21F;
-      __tmp__M1QD=NULL;
+      s__ZW2F=__tmp__1W2F;
+      __tmp__Y1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__Q21F=((__LIP_INTEGER *)__tmp__CZQD);
-      result__T21F=NULL;
-      if (__tmp__FZQD==NULL) {
-        __tmp__W21F=NULL;
+      Self__FX2F=((__LIP_INTEGER *)__tmp__OZQD);
+      result__IX2F=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__LX2F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__W21F=NULL;
+          __tmp__LX2F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__W21F=((__LIP_INTEGER *)__tmp__FZQD);
+          __tmp__LX2F=((__LIP_INTEGER *)__tmp__RZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__W21F=NULL;
+          __tmp__LX2F=NULL;
         } break;
         }
       };
-      s__U21F=__tmp__W21F;
-      if (((void *)__tmp__W21F != (void *)NULL)) {
-        Self__Q21F->value__G31F=(__INTEGER)(Self__Q21F->value__G31F - __tmp__W21F->value__G31F);
-        free__4R1F(__tmp__W21F);
-        result__T21F=Self__Q21F;
+      s__JX2F=__tmp__LX2F;
+      if (((void *)__tmp__LX2F != (void *)NULL)) {
+        Self__FX2F->value__1X2F=(__INTEGER)(Self__FX2F->value__1X2F - __tmp__LX2F->value__1X2F);
+        free__TM2F(__tmp__LX2F);
+        result__IX2F=Self__FX2F;
       };
-      __tmp__M1QD=result__T21F;
+      __tmp__Y1QD=result__IX2F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__FZQD==NULL) {
-        __tmp__JJDG=NULL;
+      if (__tmp__RZQD==NULL) {
+        __tmp__HSGG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__JJDG=NULL;
+          __tmp__HSGG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__JJDG=NULL;
+          __tmp__HSGG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__JJDG=((__LIP_STRING *)__tmp__FZQD);
+          __tmp__HSGG=((__LIP_STRING *)__tmp__RZQD);
         } break;
         }
       };
-      s__HJDG=__tmp__JJDG;
-      __tmp__M1QD=NULL;
+      s__FSGG=__tmp__HSGG;
+      __tmp__Y1QD=NULL;
     } break;
     };
-    result__3YQD=__tmp__M1QD;
+    result__JZQD=__tmp__Y1QD;
   };
-  if (((void *)result__3YQD == (void *)NULL)) {
-    __tmp__V1QD=Self__1YQD->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_265));
-    put_position__IOG(__tmp__V1QD);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if (((void *)result__JZQD == (void *)NULL)) {
+    __tmp__B2QD=Self__HZQD->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_275));
+    put_position__UOG(__tmp__B2QD);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__3YQD);
+  return(result__JZQD);
 }
 
-static void* run_expr__Z1QD(__LIP_UNARY *Self__01QD)
+static void* run_expr__F2QD(__LIP_UNARY *Self__G2QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  void *__tmp__41QD;
-  void *__tmp__51QD,*__tmp__12BH,*__tmp__22BH,*result__21QD,*__tmp__H2QD;
-  void *__tmp__O2QD;
-  __LIP_INTEGER *Self__32BH,*Self__E31F,*Self__R31F;
-  __LIP_STRING *Self__42BH;
-  void *result__QDKF;
-  __POSITION __tmp__X2QD;
-  __CHARACTER Self__BTVD;
-  __BOOLEAN b__ODKF;
-  __tmp__41QD=Self__01QD->value__31QD;
-  switch (((struct ___OBJ *)__tmp__41QD)->__id) {
+  void *__tmp__K2QD;
+  void *__tmp__L2QD,*__tmp__PJIH,*__tmp__QJIH,*result__I2QD,*__tmp__T2QD;
+  void *__tmp__02QD;
+  __LIP_INTEGER *Self__RJIH,*Self__ZX2F,*Self__GY2F;
+  __LIP_STRING *Self__SJIH;
+  void *result__0TKF;
+  __POSITION __tmp__D3QD;
+  __CHARACTER Self__0TVD;
+  __BOOLEAN b__YTKF;
+  __tmp__K2QD=Self__G2QD->value__J2QD;
+  switch (((struct ___OBJ *)__tmp__K2QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__51QD=run_expr__0YQD(__tmp__41QD);
+    __tmp__L2QD=run_expr__GZQD(__tmp__K2QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__51QD=run_expr__Z1QD(__tmp__41QD);
+    __tmp__L2QD=run_expr__F2QD(__tmp__K2QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__51QD=run_expr__XTTE(__tmp__41QD);
+    __tmp__L2QD=run_expr__RBUE(__tmp__K2QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__12BH=((__LIP_VALUE *)__tmp__41QD)->value__XXTE;
-    switch (((struct ___OBJ *)__tmp__12BH)->__id) {
+    __tmp__PJIH=((__LIP_VALUE *)__tmp__K2QD)->value__RFUE;
+    switch (((struct ___OBJ *)__tmp__PJIH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__22BH=((__LIP_BOOLEAN *)__tmp__12BH);
+      __tmp__QJIH=((__LIP_BOOLEAN *)__tmp__PJIH);
     } break;
     case __LIP_INTEGER__: {
-      Self__32BH=((__LIP_INTEGER *)__tmp__12BH);
-      __tmp__22BH=get__IWRE(Self__32BH,Self__32BH->value__G31F);
+      Self__RJIH=((__LIP_INTEGER *)__tmp__PJIH);
+      __tmp__QJIH=get__QFSE(Self__RJIH,Self__RJIH->value__1X2F);
     } break;
     case __LIP_STRING__: {
-      Self__42BH=((__LIP_STRING *)__tmp__12BH);
-      __tmp__22BH=get__3HEF(Self__42BH,Self__42BH->value__FPTE);
+      Self__SJIH=((__LIP_STRING *)__tmp__PJIH);
+      __tmp__QJIH=get__N2EF(Self__SJIH,Self__SJIH->value__52TE);
     } break;
     };
-    __tmp__51QD=__tmp__22BH;
+    __tmp__L2QD=__tmp__QJIH;
   } break;
   };
-  result__21QD=__tmp__51QD;
-  Self__BTVD=Self__01QD->operator__A2QD;
-  if ((Self__BTVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__51QD)->__id) {
+  result__I2QD=__tmp__L2QD;
+  Self__0TVD=Self__G2QD->operator__M2QD;
+  if ((Self__0TVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__H2QD=NULL;
+      __tmp__T2QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__E31F=((__LIP_INTEGER *)__tmp__51QD);
-      Self__E31F->value__G31F=(__INTEGER)(- Self__E31F->value__G31F);
-      __tmp__H2QD=Self__E31F;
+      Self__ZX2F=((__LIP_INTEGER *)__tmp__L2QD);
+      Self__ZX2F->value__1X2F=(__INTEGER)(- Self__ZX2F->value__1X2F);
+      __tmp__T2QD=Self__ZX2F;
     } break;
     case __LIP_STRING__: {
-      __tmp__H2QD=NULL;
+      __tmp__T2QD=NULL;
     } break;
     };
-    result__21QD=__tmp__H2QD;
+    result__I2QD=__tmp__T2QD;
   };
-  if ((Self__BTVD == '!')) {
-    switch (((struct ___OBJ *)result__21QD)->__id) {
+  if ((Self__0TVD == '!')) {
+    switch (((struct ___OBJ *)result__I2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__ODKF=(! ((__LIP_BOOLEAN *)result__21QD)->value__DDQD);
-      result__QDKF=NULL;
-      if (b__ODKF) {
-        result__QDKF=true__VDKF;
+      b__YTKF=(! ((__LIP_BOOLEAN *)result__I2QD)->value__PDQD);
+      result__0TKF=NULL;
+      if (b__YTKF) {
+        result__0TKF=true__5TKF;
       } else {
-        result__QDKF=LIP_BOOLEAN__;
+        result__0TKF=LIP_BOOLEAN__;
       };
-      __tmp__O2QD=result__QDKF;
+      __tmp__02QD=result__0TKF;
     } break;
     case __LIP_INTEGER__: {
-      Self__R31F=((__LIP_INTEGER *)result__21QD);
-      Self__R31F->value__G31F=(__INTEGER)(~ Self__R31F->value__G31F);
-      __tmp__O2QD=Self__R31F;
+      Self__GY2F=((__LIP_INTEGER *)result__I2QD);
+      Self__GY2F->value__1X2F=(__INTEGER)(~ Self__GY2F->value__1X2F);
+      __tmp__02QD=Self__GY2F;
     } break;
     case __LIP_STRING__: {
-      __tmp__O2QD=NULL;
+      __tmp__02QD=NULL;
     } break;
     };
-    result__21QD=__tmp__O2QD;
+    result__I2QD=__tmp__02QD;
   };
-  if (((void *)result__21QD == (void *)NULL)) {
-    __tmp__X2QD=Self__01QD->parent_lip_code__504B.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 1,(&__string_265));
-    put_position__IOG(__tmp__X2QD);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+  if (((void *)result__I2QD == (void *)NULL)) {
+    __tmp__D3QD=Self__G2QD->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 1,(&__string_275));
+    put_position__UOG(__tmp__D3QD);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__21QD);
+  return(result__I2QD);
 }
 
-static void* run_expr__XTTE(__LIP_CALL *Self__YTTE)
+static void* run_expr__RBUE(__LIP_CALL *Self__SBUE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  void *str__1TTE,*__tmp__RUTE;
-  void *val__2TTE,*result__3TTE,*__tmp__GUTE,*__tmp__YXTE,*__tmp__ZXTE;
-  void *__tmp__FUTE;
-  __LIP_INTEGER *Self__R51F;
-  __LIP_STRING *Self__FKDG;
-  __POSITION pos__YVUG,pos__QGJF;
-  __STRING *Self__TS4G;
-  __INTEGER state__SIVF,Self__SECG;
-  __BOOLEAN __tmp__CVTE,__tmp__UVTE,result__POWE,sign__TIVF,__tmp__FKVF;
-  __BOOLEAN result__KR2G,__tmp__SKVF,result__YDJG,__tmp__FLVF;
-  __BOOLEAN result__NR2G,result__QR2G,result__TR2G,result__UR2G;
-  __CHARACTER Self__2VZG,Self__LR2G,Self__3VZG,Self__OR2G,Self__RR2G;
-  __CHARACTER mem__DPKF;
-  __FAST_ARRAYoLIP_SLOT_DATAo *Self__WYOF;
-  str__1TTE=NULL;
-  val__2TTE=NULL;
-  result__3TTE=NULL;
-  if (((void *)Self__YTTE->argument__NNTE != (void *)NULL)) {
-    __tmp__FUTE=Self__YTTE->argument__NNTE;
-    switch (((struct ___OBJ *)__tmp__FUTE)->__id) {
+  void *str__VBUE,*__tmp__LCUE;
+  void *val__WBUE,*result__XBUE,*__tmp__ACUE,*__tmp__SFUE,*__tmp__TFUE;
+  void *__tmp__5BUE;
+  __LIP_INTEGER *Self__M22F;
+  __LIP_STRING *Self__DUGG;
+  __POSITION pos__0I0G,pos__SZJF;
+  __STRING *Self__I4EH;
+  __INTEGER state__P3VF,Self__Z1EG;
+  __BOOLEAN __tmp__2CUE,__tmp__ODUE,result__TAXE,sign__Q3VF,__tmp__C5VF;
+  __BOOLEAN result__I2CH,__tmp__P5VF,result__4JOG,__tmp__CAWF;
+  __BOOLEAN result__L2CH,result__O2CH,result__R2CH,result__S2CH;
+  __CHARACTER Self__C45G,Self__J2CH,Self__D45G,Self__M2CH,Self__P2CH;
+  __CHARACTER mem__SALF;
+  __FAST_ARRAYoLIP_SLOT_DATAo *Self__M0OF;
+  str__VBUE=NULL;
+  val__WBUE=NULL;
+  result__XBUE=NULL;
+  if (((void *)Self__SBUE->argument__H1TE != (void *)NULL)) {
+    __tmp__5BUE=Self__SBUE->argument__H1TE;
+    switch (((struct ___OBJ *)__tmp__5BUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__GUTE=run_expr__0YQD(__tmp__FUTE);
+      __tmp__ACUE=run_expr__GZQD(__tmp__5BUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__GUTE=run_expr__Z1QD(__tmp__FUTE);
+      __tmp__ACUE=run_expr__F2QD(__tmp__5BUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__GUTE=run_expr__XTTE(__tmp__FUTE);
+      __tmp__ACUE=run_expr__RBUE(__tmp__5BUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__YXTE=((__LIP_VALUE *)__tmp__FUTE)->value__XXTE;
-      switch (((struct ___OBJ *)__tmp__YXTE)->__id) {
+      __tmp__SFUE=((__LIP_VALUE *)__tmp__5BUE)->value__RFUE;
+      switch (((struct ___OBJ *)__tmp__SFUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__ZXTE=((__LIP_BOOLEAN *)__tmp__YXTE);
+        __tmp__TFUE=((__LIP_BOOLEAN *)__tmp__SFUE);
       } break;
       case __LIP_INTEGER__: {
-        Self__R51F=((__LIP_INTEGER *)__tmp__YXTE);
-        __tmp__ZXTE=get__IWRE(Self__R51F,Self__R51F->value__G31F);
+        Self__M22F=((__LIP_INTEGER *)__tmp__SFUE);
+        __tmp__TFUE=get__QFSE(Self__M22F,Self__M22F->value__1X2F);
       } break;
       case __LIP_STRING__: {
-        Self__FKDG=((__LIP_STRING *)__tmp__YXTE);
-        __tmp__ZXTE=get__3HEF(Self__FKDG,Self__FKDG->value__FPTE);
+        Self__DUGG=((__LIP_STRING *)__tmp__SFUE);
+        __tmp__TFUE=get__N2EF(Self__DUGG,Self__DUGG->value__52TE);
       } break;
       };
-      __tmp__GUTE=__tmp__ZXTE;
+      __tmp__ACUE=__tmp__TFUE;
     } break;
     };
-    val__2TTE=__tmp__GUTE;
+    val__WBUE=__tmp__ACUE;
   };
-  if (((void *)Self__YTTE->name__YNTE == (void *)(&__string_93))) {
-    if (val__2TTE==NULL) {
-      __tmp__RUTE=NULL;
+  if (((void *)Self__SBUE->name__S1TE == (void *)(&__string_93))) {
+    if (val__WBUE==NULL) {
+      __tmp__LCUE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__2TTE)->__id) {
+      switch (((struct ___OBJ *)val__WBUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__RUTE=NULL;
+        __tmp__LCUE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__RUTE=NULL;
+        __tmp__LCUE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__RUTE=((void *)val__2TTE);
+        __tmp__LCUE=((void *)val__WBUE);
       } break;
       }
     };
-    str__1TTE=__tmp__RUTE;
-    if (((void *)__tmp__RUTE == (void *)NULL)) {
-      pos__YVUG=Self__YTTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-      put_error__text__4MG( 1,(&__string_298));
-      put_position__IOG(pos__YVUG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    str__VBUE=__tmp__LCUE;
+    if (((void *)__tmp__LCUE == (void *)NULL)) {
+      pos__0I0G=Self__SBUE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+      put_error__text__KNG( 1,(&__string_308));
+      put_position__UOG(pos__0I0G);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    ((__STRING *)string_tmp__VH)->count__KFC= 0;
-    append_in__JKDG(__tmp__RUTE,string_tmp__VH);
-    Self__TS4G=((__STRING *)string_tmp__VH);
-    if ((Self__TS4G->capacity__MBS > Self__TS4G->count__KFC)) {
-      ((__CHARACTER *)Self__TS4G->storage__VBS)[Self__TS4G->count__KFC]='\0';
+    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    append_in__LUGG(__tmp__LCUE,string_tmp__VH);
+    Self__I4EH=((__STRING *)string_tmp__VH);
+    if ((Self__I4EH->capacity__YBS > Self__I4EH->count__WFC)) {
+      ((__CHARACTER *)Self__I4EH->storage__BCS)[Self__I4EH->count__WFC]='\0';
     } else {
-      add_last__NLT(Self__TS4G,'\0');
-      Self__TS4G->count__KFC=(__INTEGER)(Self__TS4G->count__KFC -  1);
+      add_last__ZLT(Self__I4EH,'\0');
+      Self__I4EH->count__WFC=(__INTEGER)(Self__I4EH->count__WFC -  1);
     };
-    result__3TTE=get__IWRE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__TS4G->storage__VBS)))))));
-    __tmp__CVTE=TRUE__;
+    result__XBUE=get__QFSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__I4EH->storage__BCS)))))));
+    __tmp__2CUE=TRUE__;
   } else {
-    __tmp__CVTE=FALSE__;
+    __tmp__2CUE=FALSE__;
   };
-  if (__tmp__CVTE) {
-    __tmp__UVTE=TRUE__;
+  if (__tmp__2CUE) {
+    __tmp__ODUE=TRUE__;
   } else {
-    result__POWE=((void *)Self__YTTE->name__YNTE == (void *)(&__string_106));
-    if (result__POWE) {
-      state__SIVF= 0;
-      sign__TIVF=FALSE__;
-      while ((state__SIVF <=  2)) {
-        if (push_back_flag__2FLF) {
-          push_back_flag__2FLF=FALSE__;
+    result__TAXE=((void *)Self__SBUE->name__S1TE == (void *)(&__string_106));
+    if (result__TAXE) {
+      state__P3VF= 0;
+      sign__Q3VF=FALSE__;
+      while ((state__P3VF <=  2)) {
+        if (push_back_flag__NTLF) {
+          push_back_flag__NTLF=FALSE__;
         } else {
-          memory__LPKF=((__CHARACTER )(fgetc(stdin)));
+          memory__0ALF=((__CHARACTER )(fgetc(stdin)));
         };
-        if ((state__SIVF ==  0)) {
-          Self__2VZG=memory__LPKF;
-          if ((((((((Self__2VZG == ' ') || (Self__2VZG == '\t')) || (Self__2VZG == '\n')) || (Self__2VZG == '\r')) || (Self__2VZG == '\0')) || (Self__2VZG == '\f')) || (Self__2VZG == '\v'))) {
-            __tmp__FKVF=TRUE__;
+        if ((state__P3VF ==  0)) {
+          Self__C45G=memory__0ALF;
+          if ((((((((Self__C45G == ' ') || (Self__C45G == '\t')) || (Self__C45G == '\n')) || (Self__C45G == '\r')) || (Self__C45G == '\0')) || (Self__C45G == '\f')) || (Self__C45G == '\v'))) {
+            __tmp__C5VF=TRUE__;
           } else {
-            Self__LR2G=memory__LPKF;
-            result__KR2G=FALSE__;
-            if ((((__INTEGER_8 )Self__LR2G) >= ((__INTEGER_8 )'0'))) {
-              result__KR2G=(((__INTEGER_8 )Self__LR2G) <= ((__INTEGER_8 )'9'));
+            Self__J2CH=memory__0ALF;
+            result__I2CH=FALSE__;
+            if ((((__INTEGER_8 )Self__J2CH) >= ((__INTEGER_8 )'0'))) {
+              result__I2CH=(((__INTEGER_8 )Self__J2CH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__KR2G) {
-              last_integer__PVTE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__LPKF)) -  48);
-              state__SIVF= 2;
+            if (result__I2CH) {
+              last_integer__JDUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__0ALF)) -  48);
+              state__P3VF= 2;
             };
-            __tmp__FKVF=result__KR2G;
+            __tmp__C5VF=result__I2CH;
           };
-          if (__tmp__FKVF) {
-            __tmp__SKVF=TRUE__;
+          if (__tmp__C5VF) {
+            __tmp__P5VF=TRUE__;
           } else {
-            result__YDJG=(memory__LPKF == '-');
-            if (result__YDJG) {
-              sign__TIVF=TRUE__;
-              state__SIVF= 1;
+            result__4JOG=(memory__0ALF == '-');
+            if (result__4JOG) {
+              sign__Q3VF=TRUE__;
+              state__P3VF= 1;
             };
-            __tmp__SKVF=result__YDJG;
+            __tmp__P5VF=result__4JOG;
           };
-          if ((! __tmp__SKVF)) {
-            if ((memory__LPKF == '+')) {
-              state__SIVF= 1;
+          if ((! __tmp__P5VF)) {
+            if ((memory__0ALF == '+')) {
+              state__P3VF= 1;
             } else {
-              state__SIVF= 4;
+              state__P3VF= 4;
             };
           };
-          __tmp__FLVF=TRUE__;
+          __tmp__CAWF=TRUE__;
         } else {
-          __tmp__FLVF=FALSE__;
+          __tmp__CAWF=FALSE__;
         };
-        if ((! __tmp__FLVF)) {
-          if ((state__SIVF ==  1)) {
-            Self__3VZG=memory__LPKF;
-            if ((! (((((((Self__3VZG == ' ') || (Self__3VZG == '\t')) || (Self__3VZG == '\n')) || (Self__3VZG == '\r')) || (Self__3VZG == '\0')) || (Self__3VZG == '\f')) || (Self__3VZG == '\v')))) {
-              Self__OR2G=memory__LPKF;
-              result__NR2G=FALSE__;
-              if ((((__INTEGER_8 )Self__OR2G) >= ((__INTEGER_8 )'0'))) {
-                result__NR2G=(((__INTEGER_8 )Self__OR2G) <= ((__INTEGER_8 )'9'));
+        if ((! __tmp__CAWF)) {
+          if ((state__P3VF ==  1)) {
+            Self__D45G=memory__0ALF;
+            if ((! (((((((Self__D45G == ' ') || (Self__D45G == '\t')) || (Self__D45G == '\n')) || (Self__D45G == '\r')) || (Self__D45G == '\0')) || (Self__D45G == '\f')) || (Self__D45G == '\v')))) {
+              Self__M2CH=memory__0ALF;
+              result__L2CH=FALSE__;
+              if ((((__INTEGER_8 )Self__M2CH) >= ((__INTEGER_8 )'0'))) {
+                result__L2CH=(((__INTEGER_8 )Self__M2CH) <= ((__INTEGER_8 )'9'));
               };
-              if (result__NR2G) {
-                last_integer__PVTE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__LPKF)) -  48);
-                state__SIVF= 2;
+              if (result__L2CH) {
+                last_integer__JDUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__0ALF)) -  48);
+                state__P3VF= 2;
               } else {
-                state__SIVF= 4;
+                state__P3VF= 4;
               };
             };
           } else {
-            Self__RR2G=memory__LPKF;
-            result__QR2G=FALSE__;
-            if ((((__INTEGER_8 )Self__RR2G) >= ((__INTEGER_8 )'0'))) {
-              result__QR2G=(((__INTEGER_8 )Self__RR2G) <= ((__INTEGER_8 )'9'));
+            Self__P2CH=memory__0ALF;
+            result__O2CH=FALSE__;
+            if ((((__INTEGER_8 )Self__P2CH) >= ((__INTEGER_8 )'0'))) {
+              result__O2CH=(((__INTEGER_8 )Self__P2CH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__QR2G) {
-              last_integer__PVTE=(__INTEGER)((__INTEGER)(last_integer__PVTE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__LPKF)) -  48));
+            if (result__O2CH) {
+              last_integer__JDUE=(__INTEGER)((__INTEGER)(last_integer__JDUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__0ALF)) -  48));
             } else {
-              state__SIVF= 3;
+              state__P3VF= 3;
             };
           };
         };
-        result__TR2G=FALSE__;
-        if ((! push_back_flag__2FLF)) {
-          result__TR2G=(memory__LPKF == ((__CHARACTER )(EOF)));
+        result__R2CH=FALSE__;
+        if ((! push_back_flag__NTLF)) {
+          result__R2CH=(memory__0ALF == ((__CHARACTER )(EOF)));
         };
-        if (result__TR2G) {
-          Self__SECG=state__SIVF;
-          if (((state__SIVF >=  0) && (state__SIVF <=  1))) {
-            state__SIVF= 4;
+        if (result__R2CH) {
+          Self__Z1EG=state__P3VF;
+          if (((state__P3VF >=  0) && (state__P3VF <=  1))) {
+            state__P3VF= 4;
           };
-          if (((Self__SECG >=  2) && (Self__SECG <=  3))) {
-            state__SIVF= 3;
+          if (((Self__Z1EG >=  2) && (Self__Z1EG <=  3))) {
+            state__P3VF= 3;
           };
         };
       };
-      result__UR2G=FALSE__;
-      if ((! push_back_flag__2FLF)) {
-        result__UR2G=(memory__LPKF == ((__CHARACTER )(EOF)));
+      result__S2CH=FALSE__;
+      if ((! push_back_flag__NTLF)) {
+        result__S2CH=(memory__0ALF == ((__CHARACTER )(EOF)));
       };
-      if (result__UR2G) {
-        push_back_flag__2FLF=TRUE__;
+      if (result__S2CH) {
+        push_back_flag__NTLF=TRUE__;
       };
-      if ((state__SIVF ==  4)) {
-        print__KHD((&__string_317));
-        print__KHD((&__string_207));
+      if ((state__P3VF ==  4)) {
+        print__WHD((&__string_327));
+        print__WHD((&__string_217));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__TIVF) {
-        last_integer__PVTE=(__INTEGER)(- last_integer__PVTE);
+      if (sign__Q3VF) {
+        last_integer__JDUE=(__INTEGER)(- last_integer__JDUE);
       };
-      result__3TTE=get__IWRE(LIP_INTEGER__,last_integer__PVTE);
+      result__XBUE=get__QFSE(LIP_INTEGER__,last_integer__JDUE);
     };
-    __tmp__UVTE=result__POWE;
+    __tmp__ODUE=result__TAXE;
   };
-  if ((! __tmp__UVTE)) {
-    if (((void *)Self__YTTE->name__YNTE == (void *)(&__string_107))) {
-      ((__STRING *)last_string__BWTE)->count__KFC= 0;
-      mem__DPKF='\0';
-      if (push_back_flag__2FLF) {
-        push_back_flag__2FLF=FALSE__;
+  if ((! __tmp__ODUE)) {
+    if (((void *)Self__SBUE->name__S1TE == (void *)(&__string_107))) {
+      ((__STRING *)last_string__1DUE)->count__WFC= 0;
+      mem__SALF='\0';
+      if (push_back_flag__NTLF) {
+        push_back_flag__NTLF=FALSE__;
       } else {
-        memory__LPKF=((__CHARACTER )(fgetc(stdin)));
+        memory__0ALF=((__CHARACTER )(fgetc(stdin)));
       };
-      if (((memory__LPKF != '\n') && (memory__LPKF != ((__CHARACTER )(EOF))))) {
-        add_last__NLT(((__STRING *)last_string__BWTE),memory__LPKF);
-        mem__DPKF=((__CHARACTER )(fgetc(stdin)));
-        while ((! ((mem__DPKF == ((__CHARACTER )(EOF))) || (mem__DPKF == '\n')))) {
-          add_last__NLT(((__STRING *)last_string__BWTE),mem__DPKF);
-          mem__DPKF=((__CHARACTER )(fgetc(stdin)));
+      if (((memory__0ALF != '\n') && (memory__0ALF != ((__CHARACTER )(EOF))))) {
+        add_last__ZLT(((__STRING *)last_string__1DUE),memory__0ALF);
+        mem__SALF=((__CHARACTER )(fgetc(stdin)));
+        while ((! ((mem__SALF == ((__CHARACTER )(EOF))) || (mem__SALF == '\n')))) {
+          add_last__ZLT(((__STRING *)last_string__1DUE),mem__SALF);
+          mem__SALF=((__CHARACTER )(fgetc(stdin)));
         };
-        memory__LPKF=mem__DPKF;
+        memory__0ALF=mem__SALF;
       };
-      result__3TTE=get__3HEF(LIP_STRING__,get__2VB(last_string__BWTE));
+      result__XBUE=get__N2EF(LIP_STRING__,get__IWB(last_string__1DUE));
     } else {
-      if (((void *)fast_reference_at__CURD(list_data__CONC,Self__YTTE->name__YNTE) == (void *)NULL)) {
-        Self__WYOF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__XWTE);
-        if (((void *)((void **)Self__WYOF->parent_arrayed_collection__WWTE.storage__A4OF)[Self__WYOF->parent_arrayed_collection__WWTE.upper__AZOF] == (void *)NULL)) {
-          copy__NCS(string_tmp__VH,(&__string_295));
-          append__VNS(string_tmp__VH,Self__YTTE->name__YNTE);
-          append__VNS(string_tmp__VH,(&__string_296));
-          pos__QGJF=Self__YTTE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-          put_error__text__4MG( 1,string_tmp__VH);
-          put_position__IOG(pos__QGJF);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (((void *)fast_reference_at__OURD(list_data__OONC,Self__SBUE->name__S1TE) == (void *)NULL)) {
+        Self__M0OF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__REUE);
+        if (((void *)((void **)Self__M0OF->parent_arrayed_collection__QEUE.storage__IBPF)[Self__M0OF->parent_arrayed_collection__QEUE.upper__W0OF] == (void *)NULL)) {
+          copy__ZCS(string_tmp__VH,(&__string_305));
+          append__BOS(string_tmp__VH,Self__SBUE->name__S1TE);
+          append__BOS(string_tmp__VH,(&__string_306));
+          pos__SZJF=Self__SBUE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+          put_error__text__KNG( 1,string_tmp__VH);
+          put_position__UOG(pos__SZJF);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__3TTE=NULL;
+      result__XBUE=NULL;
     };
   };
-  if (((void *)val__2TTE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__2TTE)->__id) {
+  if (((void *)val__WBUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__WBUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__4R1F(val__2TTE);
+      free__TM2F(val__WBUE);
     } break;
     case __LIP_STRING__: {
-      free__DEDG(val__2TTE);
+      free__BNGG(val__WBUE);
     } break;
     };
   };
-  return(result__3TTE);
+  return(result__XBUE);
 }
 
-static void* get__IWRE(__LIP_INTEGER *Self__JWRE,__INTEGER i__KWRE)
+static void* get__QFSE(__LIP_INTEGER *Self__RFSE,__INTEGER i__SFSE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  void *result__MWRE;
-  __LIP_INTEGER *result__QIRF;
-  __POINTER ptr__RIRF,ptr_table__A3BH,next__52BH,result__B3BH;
-  __POINTER ptr_table__F3BH,next__E3BH,result__G3BH;
-  __INTEGER typ_id__WIRF;
-  __UINTEGER_32 sz__TIRF,a__PW4G,new_size__QW4G,t__UW4G,a__TW4G;
-  __UINTEGER_32 new_size__I3BH,lab_type__H3BH;
-  __FAST_ARRAYoLIP_INTEGERo *Self__V22E,*Self__L32E;
-  result__MWRE=NULL;
-  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__SWRE)->parent_arrayed_collection__RWRE.upper__SBWE <  0)) {
-    result__QIRF=NULL;
-    ptr__RIRF=((__POINTER )(NULL));
-    typ_id__WIRF= 0;
-    sz__TIRF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
-    if ((sz__TIRF ==  0)) {
-      result__QIRF=Self__JWRE;
-    } else {
-      typ_id__WIRF=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__TIRF);
-      if ((typ_id__WIRF == (__INTEGER)(-  1))) {
-        a__PW4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__QW4G=(__UINTEGER_32)((__UINTEGER_32)(sz__TIRF + a__PW4G) & (__UINTEGER_32)(~ a__PW4G));
-        ptr_table__A3BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QW4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__52BH=((__POINTER )(NULL));
-        result__B3BH=((__POINTER *)ptr_table__A3BH)[ 0];
-        if ((result__B3BH == (void *)NULL)) {
-          result__B3BH=new_lab__ARJ(new_size__QW4G);
-          next__52BH=(void *)((unsigned long)result__B3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QW4G)));
-          ((__POINTER *)next__52BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__A3BH)[ 0]=next__52BH;
-        } else {
-          next__52BH=((__POINTER *)result__B3BH)[ 0];
-          if ((next__52BH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B3BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__QW4G <<  1)) <=  4096)) {
-              next__52BH=(void *)((unsigned long)result__B3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QW4G)));
+  void *result__UFSE;
+  __LIP_INTEGER *result__4SRF;
+  __POINTER ptr__5SRF,ptr_table__UJIH,next__TJIH,result__VJIH;
+  __POINTER ptr_table__ZJIH,next__YJIH,result__0JIH;
+  __INTEGER typ_id__ETRF;
+  __UINTEGER_32 sz__BTRF,a__ECFH,new_size__FCFH,t__JCFH,a__ICFH;
+  __UINTEGER_32 new_size__2JIH,lab_type__1JIH;
+  __FAST_ARRAYoLIP_INTEGERo *Self__AW3E,*Self__WW3E;
+  result__UFSE=NULL;
+  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__0FSE)->parent_arrayed_collection__ZFSE.upper__4TWE <  0)) {
+    result__4SRF=NULL;
+    ptr__5SRF=((__POINTER )(NULL));
+    typ_id__ETRF= 0;
+    sz__BTRF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
+    if ((sz__BTRF ==  0)) {
+      result__4SRF=Self__RFSE;
+    } else {
+      typ_id__ETRF=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BTRF);
+      if ((typ_id__ETRF == (__INTEGER)(-  1))) {
+        a__ECFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BTRF + a__ECFH) & (__UINTEGER_32)(~ a__ECFH));
+        ptr_table__UJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TJIH=((__POINTER )(NULL));
+        result__VJIH=((__POINTER *)ptr_table__UJIH)[ 0];
+        if ((result__VJIH == (void *)NULL)) {
+          result__VJIH=new_lab__MRJ(new_size__FCFH);
+          next__TJIH=(void *)((unsigned long)result__VJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCFH)));
+          ((__POINTER *)next__TJIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UJIH)[ 0]=next__TJIH;
+        } else {
+          next__TJIH=((__POINTER *)result__VJIH)[ 0];
+          if ((next__TJIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VJIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FCFH <<  1)) <=  4096)) {
+              next__TJIH=(void *)((unsigned long)result__VJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCFH)));
             } else {
-              next__52BH=new_lab__ARJ(new_size__QW4G);
-            };
-            ((__POINTER *)next__52BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__A3BH)[ 0]=next__52BH;
-          } else {
-            ((__POINTER *)result__B3BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__52BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__B3BH=next__52BH;
-          };
-        };
-        ptr__RIRF=result__B3BH;
-      } else {
-        t__UW4G=((__UINTEGER_32 )typ_id__WIRF);
-        a__TW4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__I3BH=(__UINTEGER_32)((__UINTEGER_32)(sz__TIRF + a__TW4G) & (__UINTEGER_32)(~ a__TW4G));
-        ptr_table__F3BH=((__POINTER )(&(table_type[(t__UW4G)])));
-        lab_type__H3BH=(__UINTEGER_32)(t__UW4G |  1);
-        next__E3BH=((__POINTER )(NULL));
-        result__G3BH=((__POINTER *)ptr_table__F3BH)[ 0];
-        if ((result__G3BH == (void *)NULL)) {
-          result__G3BH=new_lab__ARJ(lab_type__H3BH);
-          next__E3BH=(void *)((unsigned long)result__G3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I3BH)));
-          ((__POINTER *)next__E3BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__F3BH)[ 0]=next__E3BH;
-        } else {
-          next__E3BH=((__POINTER *)result__G3BH)[ 0];
-          if ((next__E3BH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G3BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__I3BH <<  1)) <=  4096)) {
-              next__E3BH=(void *)((unsigned long)result__G3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I3BH)));
+              next__TJIH=new_lab__MRJ(new_size__FCFH);
+            };
+            ((__POINTER *)next__TJIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UJIH)[ 0]=next__TJIH;
+          } else {
+            ((__POINTER *)result__VJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VJIH=next__TJIH;
+          };
+        };
+        ptr__5SRF=result__VJIH;
+      } else {
+        t__JCFH=((__UINTEGER_32 )typ_id__ETRF);
+        a__ICFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2JIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BTRF + a__ICFH) & (__UINTEGER_32)(~ a__ICFH));
+        ptr_table__ZJIH=((__POINTER )(&(table_type[(t__JCFH)])));
+        lab_type__1JIH=(__UINTEGER_32)(t__JCFH |  1);
+        next__YJIH=((__POINTER )(NULL));
+        result__0JIH=((__POINTER *)ptr_table__ZJIH)[ 0];
+        if ((result__0JIH == (void *)NULL)) {
+          result__0JIH=new_lab__MRJ(lab_type__1JIH);
+          next__YJIH=(void *)((unsigned long)result__0JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JIH)));
+          ((__POINTER *)next__YJIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZJIH)[ 0]=next__YJIH;
+        } else {
+          next__YJIH=((__POINTER *)result__0JIH)[ 0];
+          if ((next__YJIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0JIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2JIH <<  1)) <=  4096)) {
+              next__YJIH=(void *)((unsigned long)result__0JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JIH)));
             } else {
-              next__E3BH=new_lab__ARJ(lab_type__H3BH);
+              next__YJIH=new_lab__MRJ(lab_type__1JIH);
             };
-            ((__POINTER *)next__E3BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__F3BH)[ 0]=next__E3BH;
+            ((__POINTER *)next__YJIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZJIH)[ 0]=next__YJIH;
           } else {
-            ((__POINTER *)result__G3BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E3BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__G3BH=next__E3BH;
+            ((__POINTER *)result__0JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0JIH=next__YJIH;
           };
         };
-        ptr__RIRF=result__G3BH;
+        ptr__5SRF=result__0JIH;
       };
-      result__QIRF=((__LIP_INTEGER *)ptr__RIRF);
-      *(result__QIRF) = *(Self__JWRE);
+      result__4SRF=((__LIP_INTEGER *)ptr__5SRF);
+      *(result__4SRF) = *(Self__RFSE);
     };
-    result__MWRE=result__QIRF;
+    result__UFSE=result__4SRF;
   } else {
-    Self__V22E=((__FAST_ARRAYoLIP_INTEGERo *)storage__SWRE);
-    result__MWRE=((void **)Self__V22E->parent_arrayed_collection__RWRE.storage__SDWE)[Self__V22E->parent_arrayed_collection__RWRE.upper__SBWE];
-    Self__L32E=((__FAST_ARRAYoLIP_INTEGERo *)storage__SWRE);
-    Self__L32E->parent_arrayed_collection__RWRE.upper__SBWE=(__INTEGER)(Self__L32E->parent_arrayed_collection__RWRE.upper__SBWE -  1);
+    Self__AW3E=((__FAST_ARRAYoLIP_INTEGERo *)storage__0FSE);
+    result__UFSE=((void **)Self__AW3E->parent_arrayed_collection__ZFSE.storage__WVWE)[Self__AW3E->parent_arrayed_collection__ZFSE.upper__4TWE];
+    Self__WW3E=((__FAST_ARRAYoLIP_INTEGERo *)storage__0FSE);
+    Self__WW3E->parent_arrayed_collection__ZFSE.upper__4TWE=(__INTEGER)(Self__WW3E->parent_arrayed_collection__ZFSE.upper__4TWE -  1);
   };
-  ((__LIP_INTEGER *)result__MWRE)->value__G31F=i__KWRE;
-  return(result__MWRE);
+  ((__LIP_INTEGER *)result__UFSE)->value__1X2F=i__SFSE;
+  return(result__UFSE);
 }
 
-static void* get__3HEF(__LIP_STRING *Self__4HEF,void *str__5HEF)
+static void* get__N2EF(__LIP_STRING *Self__O2EF,void *str__P2EF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__BIEF;
-  __LIP_STRING *result__1E4F;
-  __POINTER ptr__2E4F,ptr_table__K3BH,next__J3BH,result__L3BH;
-  __POINTER ptr_table__P3BH,next__O3BH,result__Q3BH;
-  __INTEGER typ_id__BF4F;
-  __UINTEGER_32 sz__4E4F,a__XW4G,new_size__YW4G,t__2W4G,a__1W4G;
-  __UINTEGER_32 new_size__S3BH,lab_type__R3BH;
-  __FAST_ARRAYoLIP_STRINGo *Self__EYRF,*Self__0YRF;
-  result__BIEF=NULL;
-  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__HIEF)->parent_arrayed_collection__GIEF.upper__DSOF <  0)) {
-    result__1E4F=NULL;
-    ptr__2E4F=((__POINTER )(NULL));
-    typ_id__BF4F= 0;
-    sz__4E4F=((__UINTEGER_32 )sizeof(__LIP_STRING));
-    if ((sz__4E4F ==  0)) {
-      result__1E4F=Self__4HEF;
-    } else {
-      typ_id__BF4F=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__4E4F);
-      if ((typ_id__BF4F == (__INTEGER)(-  1))) {
-        a__XW4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YW4G=(__UINTEGER_32)((__UINTEGER_32)(sz__4E4F + a__XW4G) & (__UINTEGER_32)(~ a__XW4G));
-        ptr_table__K3BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YW4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__J3BH=((__POINTER )(NULL));
-        result__L3BH=((__POINTER *)ptr_table__K3BH)[ 0];
-        if ((result__L3BH == (void *)NULL)) {
-          result__L3BH=new_lab__ARJ(new_size__YW4G);
-          next__J3BH=(void *)((unsigned long)result__L3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YW4G)));
-          ((__POINTER *)next__J3BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__K3BH)[ 0]=next__J3BH;
-        } else {
-          next__J3BH=((__POINTER *)result__L3BH)[ 0];
-          if ((next__J3BH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L3BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__YW4G <<  1)) <=  4096)) {
-              next__J3BH=(void *)((unsigned long)result__L3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YW4G)));
+  void *result__R2EF;
+  __LIP_STRING *result__Q05F;
+  __POINTER ptr__R05F,ptr_table__4JIH,next__3JIH,result__5JIH;
+  __POINTER ptr_table__DKIH,next__CKIH,result__EKIH;
+  __INTEGER typ_id__W05F;
+  __UINTEGER_32 sz__T05F,a__MCFH,new_size__NCFH,t__RCFH,a__QCFH;
+  __UINTEGER_32 new_size__GKIH,lab_type__FKIH;
+  __FAST_ARRAYoLIP_STRINGo *Self__AHSF,*Self__WHSF;
+  result__R2EF=NULL;
+  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__X2EF)->parent_arrayed_collection__W2EF.upper__NSOF <  0)) {
+    result__Q05F=NULL;
+    ptr__R05F=((__POINTER )(NULL));
+    typ_id__W05F= 0;
+    sz__T05F=((__UINTEGER_32 )sizeof(__LIP_STRING));
+    if ((sz__T05F ==  0)) {
+      result__Q05F=Self__O2EF;
+    } else {
+      typ_id__W05F=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__T05F);
+      if ((typ_id__W05F == (__INTEGER)(-  1))) {
+        a__MCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__T05F + a__MCFH) & (__UINTEGER_32)(~ a__MCFH));
+        ptr_table__4JIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__3JIH=((__POINTER )(NULL));
+        result__5JIH=((__POINTER *)ptr_table__4JIH)[ 0];
+        if ((result__5JIH == (void *)NULL)) {
+          result__5JIH=new_lab__MRJ(new_size__NCFH);
+          next__3JIH=(void *)((unsigned long)result__5JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NCFH)));
+          ((__POINTER *)next__3JIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4JIH)[ 0]=next__3JIH;
+        } else {
+          next__3JIH=((__POINTER *)result__5JIH)[ 0];
+          if ((next__3JIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5JIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NCFH <<  1)) <=  4096)) {
+              next__3JIH=(void *)((unsigned long)result__5JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NCFH)));
             } else {
-              next__J3BH=new_lab__ARJ(new_size__YW4G);
-            };
-            ((__POINTER *)next__J3BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__K3BH)[ 0]=next__J3BH;
-          } else {
-            ((__POINTER *)result__L3BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J3BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__L3BH=next__J3BH;
-          };
-        };
-        ptr__2E4F=result__L3BH;
-      } else {
-        t__2W4G=((__UINTEGER_32 )typ_id__BF4F);
-        a__1W4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__S3BH=(__UINTEGER_32)((__UINTEGER_32)(sz__4E4F + a__1W4G) & (__UINTEGER_32)(~ a__1W4G));
-        ptr_table__P3BH=((__POINTER )(&(table_type[(t__2W4G)])));
-        lab_type__R3BH=(__UINTEGER_32)(t__2W4G |  1);
-        next__O3BH=((__POINTER )(NULL));
-        result__Q3BH=((__POINTER *)ptr_table__P3BH)[ 0];
-        if ((result__Q3BH == (void *)NULL)) {
-          result__Q3BH=new_lab__ARJ(lab_type__R3BH);
-          next__O3BH=(void *)((unsigned long)result__Q3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S3BH)));
-          ((__POINTER *)next__O3BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__P3BH)[ 0]=next__O3BH;
-        } else {
-          next__O3BH=((__POINTER *)result__Q3BH)[ 0];
-          if ((next__O3BH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q3BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__S3BH <<  1)) <=  4096)) {
-              next__O3BH=(void *)((unsigned long)result__Q3BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S3BH)));
+              next__3JIH=new_lab__MRJ(new_size__NCFH);
+            };
+            ((__POINTER *)next__3JIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4JIH)[ 0]=next__3JIH;
+          } else {
+            ((__POINTER *)result__5JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5JIH=next__3JIH;
+          };
+        };
+        ptr__R05F=result__5JIH;
+      } else {
+        t__RCFH=((__UINTEGER_32 )typ_id__W05F);
+        a__QCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__GKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__T05F + a__QCFH) & (__UINTEGER_32)(~ a__QCFH));
+        ptr_table__DKIH=((__POINTER )(&(table_type[(t__RCFH)])));
+        lab_type__FKIH=(__UINTEGER_32)(t__RCFH |  1);
+        next__CKIH=((__POINTER )(NULL));
+        result__EKIH=((__POINTER *)ptr_table__DKIH)[ 0];
+        if ((result__EKIH == (void *)NULL)) {
+          result__EKIH=new_lab__MRJ(lab_type__FKIH);
+          next__CKIH=(void *)((unsigned long)result__EKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GKIH)));
+          ((__POINTER *)next__CKIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DKIH)[ 0]=next__CKIH;
+        } else {
+          next__CKIH=((__POINTER *)result__EKIH)[ 0];
+          if ((next__CKIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GKIH <<  1)) <=  4096)) {
+              next__CKIH=(void *)((unsigned long)result__EKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GKIH)));
             } else {
-              next__O3BH=new_lab__ARJ(lab_type__R3BH);
+              next__CKIH=new_lab__MRJ(lab_type__FKIH);
             };
-            ((__POINTER *)next__O3BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__P3BH)[ 0]=next__O3BH;
+            ((__POINTER *)next__CKIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DKIH)[ 0]=next__CKIH;
           } else {
-            ((__POINTER *)result__Q3BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O3BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__Q3BH=next__O3BH;
+            ((__POINTER *)result__EKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__EKIH=next__CKIH;
           };
         };
-        ptr__2E4F=result__Q3BH;
+        ptr__R05F=result__EKIH;
       };
-      result__1E4F=((__LIP_STRING *)ptr__2E4F);
-      *(result__1E4F) = *(Self__4HEF);
+      result__Q05F=((__LIP_STRING *)ptr__R05F);
+      *(result__Q05F) = *(Self__O2EF);
     };
-    result__BIEF=result__1E4F;
+    result__R2EF=result__Q05F;
   } else {
-    Self__EYRF=((__FAST_ARRAYoLIP_STRINGo *)storage__HIEF);
-    result__BIEF=((void **)Self__EYRF->parent_arrayed_collection__GIEF.storage__JXOF)[Self__EYRF->parent_arrayed_collection__GIEF.upper__DSOF];
-    Self__0YRF=((__FAST_ARRAYoLIP_STRINGo *)storage__HIEF);
-    Self__0YRF->parent_arrayed_collection__GIEF.upper__DSOF=(__INTEGER)(Self__0YRF->parent_arrayed_collection__GIEF.upper__DSOF -  1);
+    Self__AHSF=((__FAST_ARRAYoLIP_STRINGo *)storage__X2EF);
+    result__R2EF=((void **)Self__AHSF->parent_arrayed_collection__W2EF.storage__5YOF)[Self__AHSF->parent_arrayed_collection__W2EF.upper__NSOF];
+    Self__WHSF=((__FAST_ARRAYoLIP_STRINGo *)storage__X2EF);
+    Self__WHSF->parent_arrayed_collection__W2EF.upper__NSOF=(__INTEGER)(Self__WHSF->parent_arrayed_collection__W2EF.upper__NSOF -  1);
   };
-  ((__LIP_STRING *)result__BIEF)->value__FPTE=str__5HEF;
-  return(result__BIEF);
+  ((__LIP_STRING *)result__R2EF)->value__52TE=str__P2EF;
+  return(result__R2EF);
 }
 
-static void free__4R1F(__LIP_INTEGER *Self__5R1F)
+static void free__TM2F(__LIP_INTEGER *Self__UM2F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__YY2F,__tmp__2Z2F,__tmp__IJCG,Self__QBEG;
-  __FAST_ARRAYoLIP_INTEGERo *Self__WY2F;
-  __BOOLEAN __tmp__GZ2F;
-  void **__tmp__1Z2F,**new__UICG;
-  Self__WY2F=((__FAST_ARRAYoLIP_INTEGERo *)storage__SWRE);
-  new_capacity__YY2F= 0;
-  if (((__INTEGER)(Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE +  1) <= (__INTEGER)(Self__WY2F->parent_arrayed_collection__RWRE.capacity__HDWE -  1))) {
-    Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE=(__INTEGER)(Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE +  1);
-    __tmp__GZ2F=TRUE__;
+  __INTEGER new_capacity__Q23F,__tmp__U33F,__tmp__PAFG,Self__UOHG;
+  __FAST_ARRAYoLIP_INTEGERo *Self__O23F;
+  __BOOLEAN __tmp__423F;
+  void **__tmp__T33F,**new__15EG;
+  Self__O23F=((__FAST_ARRAYoLIP_INTEGERo *)storage__0FSE);
+  new_capacity__Q23F= 0;
+  if (((__INTEGER)(Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE +  1) <= (__INTEGER)(Self__O23F->parent_arrayed_collection__ZFSE.capacity__LVWE -  1))) {
+    Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE=(__INTEGER)(Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE +  1);
+    __tmp__423F=TRUE__;
   } else {
-    __tmp__GZ2F=FALSE__;
-  };
-  if ((! __tmp__GZ2F)) {
-    if ((Self__WY2F->parent_arrayed_collection__RWRE.capacity__HDWE ==  0)) {
-      Self__WY2F->parent_arrayed_collection__RWRE.storage__SDWE=create__4XEF( 2);
-      Self__WY2F->parent_arrayed_collection__RWRE.capacity__HDWE= 2;
-      Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE= 0;
-    } else {
-      new_capacity__YY2F=(__INTEGER)(Self__WY2F->parent_arrayed_collection__RWRE.capacity__HDWE <<  1);
-      __tmp__1Z2F=Self__WY2F->parent_arrayed_collection__RWRE.storage__SDWE;
-      __tmp__2Z2F=Self__WY2F->parent_arrayed_collection__RWRE.capacity__HDWE;
-      new__UICG=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__1Z2F)),((__UINTEGER_32 )(__INTEGER)(__tmp__2Z2F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__YY2F * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__IJCG=(__INTEGER)(new_capacity__YY2F -  1);
-      Self__QBEG=__tmp__2Z2F;
-      while ((Self__QBEG <= __tmp__IJCG)) {
-        new__UICG[Self__QBEG]=NULL;
-        Self__QBEG=(__INTEGER)(Self__QBEG +  1);
-      };
-      Self__WY2F->parent_arrayed_collection__RWRE.storage__SDWE=new__UICG;
-      Self__WY2F->parent_arrayed_collection__RWRE.capacity__HDWE=new_capacity__YY2F;
-      Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE=(__INTEGER)(Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE +  1);
-    };
-  };
-  ((void **)Self__WY2F->parent_arrayed_collection__RWRE.storage__SDWE)[Self__WY2F->parent_arrayed_collection__RWRE.upper__SBWE]=Self__5R1F;
+    __tmp__423F=FALSE__;
+  };
+  if ((! __tmp__423F)) {
+    if ((Self__O23F->parent_arrayed_collection__ZFSE.capacity__LVWE ==  0)) {
+      Self__O23F->parent_arrayed_collection__ZFSE.storage__WVWE=create__YMFF( 2);
+      Self__O23F->parent_arrayed_collection__ZFSE.capacity__LVWE= 2;
+      Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE= 0;
+    } else {
+      new_capacity__Q23F=(__INTEGER)(Self__O23F->parent_arrayed_collection__ZFSE.capacity__LVWE <<  1);
+      __tmp__T33F=Self__O23F->parent_arrayed_collection__ZFSE.storage__WVWE;
+      __tmp__U33F=Self__O23F->parent_arrayed_collection__ZFSE.capacity__LVWE;
+      new__15EG=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__T33F)),((__UINTEGER_32 )(__INTEGER)(__tmp__U33F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Q23F * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__PAFG=(__INTEGER)(new_capacity__Q23F -  1);
+      Self__UOHG=__tmp__U33F;
+      while ((Self__UOHG <= __tmp__PAFG)) {
+        new__15EG[Self__UOHG]=NULL;
+        Self__UOHG=(__INTEGER)(Self__UOHG +  1);
+      };
+      Self__O23F->parent_arrayed_collection__ZFSE.storage__WVWE=new__15EG;
+      Self__O23F->parent_arrayed_collection__ZFSE.capacity__LVWE=new_capacity__Q23F;
+      Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE=(__INTEGER)(Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE +  1);
+    };
+  };
+  ((void **)Self__O23F->parent_arrayed_collection__ZFSE.storage__WVWE)[Self__O23F->parent_arrayed_collection__ZFSE.upper__4TWE]=Self__UM2F;
 }
 
-static void free__DEDG(__LIP_STRING *Self__EEDG)
+static void free__BNGG(__LIP_STRING *Self__CNGG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__MZDG,__tmp__Q0DG,__tmp__ZTGG,Self__SGHG;
-  __FAST_ARRAYoLIP_STRINGo *Self__KZDG;
-  __BOOLEAN __tmp__0ZDG;
-  void **__tmp__P0DG,**new__FTGG;
-  Self__KZDG=((__FAST_ARRAYoLIP_STRINGo *)storage__HIEF);
-  new_capacity__MZDG= 0;
-  if (((__INTEGER)(Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF +  1) <= (__INTEGER)(Self__KZDG->parent_arrayed_collection__GIEF.capacity__4WOF -  1))) {
-    Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF=(__INTEGER)(Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF +  1);
-    __tmp__0ZDG=TRUE__;
+  __INTEGER new_capacity__QGHG,__tmp__UHHG,__tmp__C1KG,Self__BHMG;
+  __FAST_ARRAYoLIP_STRINGo *Self__OGHG;
+  __BOOLEAN __tmp__4GHG;
+  void **__tmp__THHG,**new__O0KG;
+  Self__OGHG=((__FAST_ARRAYoLIP_STRINGo *)storage__X2EF);
+  new_capacity__QGHG= 0;
+  if (((__INTEGER)(Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF +  1) <= (__INTEGER)(Self__OGHG->parent_arrayed_collection__W2EF.capacity__UYOF -  1))) {
+    Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF=(__INTEGER)(Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF +  1);
+    __tmp__4GHG=TRUE__;
   } else {
-    __tmp__0ZDG=FALSE__;
-  };
-  if ((! __tmp__0ZDG)) {
-    if ((Self__KZDG->parent_arrayed_collection__GIEF.capacity__4WOF ==  0)) {
-      Self__KZDG->parent_arrayed_collection__GIEF.storage__JXOF=create__RNWF( 2);
-      Self__KZDG->parent_arrayed_collection__GIEF.capacity__4WOF= 2;
-      Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF= 0;
-    } else {
-      new_capacity__MZDG=(__INTEGER)(Self__KZDG->parent_arrayed_collection__GIEF.capacity__4WOF <<  1);
-      __tmp__P0DG=Self__KZDG->parent_arrayed_collection__GIEF.storage__JXOF;
-      __tmp__Q0DG=Self__KZDG->parent_arrayed_collection__GIEF.capacity__4WOF;
-      new__FTGG=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__P0DG)),((__UINTEGER_32 )(__INTEGER)(__tmp__Q0DG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MZDG * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ZTGG=(__INTEGER)(new_capacity__MZDG -  1);
-      Self__SGHG=__tmp__Q0DG;
-      while ((Self__SGHG <= __tmp__ZTGG)) {
-        new__FTGG[Self__SGHG]=NULL;
-        Self__SGHG=(__INTEGER)(Self__SGHG +  1);
-      };
-      Self__KZDG->parent_arrayed_collection__GIEF.storage__JXOF=new__FTGG;
-      Self__KZDG->parent_arrayed_collection__GIEF.capacity__4WOF=new_capacity__MZDG;
-      Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF=(__INTEGER)(Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF +  1);
-    };
-  };
-  ((void **)Self__KZDG->parent_arrayed_collection__GIEF.storage__JXOF)[Self__KZDG->parent_arrayed_collection__GIEF.upper__DSOF]=Self__EEDG;
+    __tmp__4GHG=FALSE__;
+  };
+  if ((! __tmp__4GHG)) {
+    if ((Self__OGHG->parent_arrayed_collection__W2EF.capacity__UYOF ==  0)) {
+      Self__OGHG->parent_arrayed_collection__W2EF.storage__5YOF=create__CFXF( 2);
+      Self__OGHG->parent_arrayed_collection__W2EF.capacity__UYOF= 2;
+      Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF= 0;
+    } else {
+      new_capacity__QGHG=(__INTEGER)(Self__OGHG->parent_arrayed_collection__W2EF.capacity__UYOF <<  1);
+      __tmp__THHG=Self__OGHG->parent_arrayed_collection__W2EF.storage__5YOF;
+      __tmp__UHHG=Self__OGHG->parent_arrayed_collection__W2EF.capacity__UYOF;
+      new__O0KG=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__THHG)),((__UINTEGER_32 )(__INTEGER)(__tmp__UHHG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__QGHG * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__C1KG=(__INTEGER)(new_capacity__QGHG -  1);
+      Self__BHMG=__tmp__UHHG;
+      while ((Self__BHMG <= __tmp__C1KG)) {
+        new__O0KG[Self__BHMG]=NULL;
+        Self__BHMG=(__INTEGER)(Self__BHMG +  1);
+      };
+      Self__OGHG->parent_arrayed_collection__W2EF.storage__5YOF=new__O0KG;
+      Self__OGHG->parent_arrayed_collection__W2EF.capacity__UYOF=new_capacity__QGHG;
+      Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF=(__INTEGER)(Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF +  1);
+    };
+  };
+  ((void **)Self__OGHG->parent_arrayed_collection__W2EF.storage__5YOF)[Self__OGHG->parent_arrayed_collection__W2EF.upper__NSOF]=Self__CNGG;
 }
 
-static void load_directory__is_recursive__TFVF(__LIP_CALL *Self__UFVF,void *path__VFVF,__BOOLEAN is_rec__WFVF)
+static void load_directory__is_recursive__Q0VF(__LIP_CALL *Self__R0VF,void *path__S0VF,__BOOLEAN is_rec__T0VF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  void *dir__YFVF,*__tmp__RGVF;
-  void *entry__XFVF;
-  __FILE_UNIX *Self__KZZG;
-  __INTEGER __tmp__VGVF,Self__QHHG,i1__U3BH,i2__V3BH;
-  void *__tmp__2GVF,*__tmp__FHVF,*__tmp__2HVF;
-  __STRING_CONSTANT *Self__W3BH;
-  __POSITION __tmp__KIVF;
-  __BOOLEAN __tmp__5FVF,__tmp__JGVF,__tmp__GGVF,__tmp__KGVF;
-  __BOOLEAN result__T3BH,__tmp__IHVF,__tmp__SHVF,__tmp__VHVF;
-  dir__YFVF=NULL;
-  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+  void *dir__V0VF,*__tmp__O1VF;
+  void *entry__U0VF;
+  __FILE_UNIX *Self__QBAH;
+  __INTEGER __tmp__S1VF,Self__5HMG,i1__IKIH,i2__JKIH;
+  void *__tmp__Z1VF,*__tmp__C2VF,*__tmp__Z2VF;
+  __STRING_CONSTANT *Self__KKIH;
+  __POSITION __tmp__H3VF;
+  __BOOLEAN __tmp__20VF,__tmp__G1VF,__tmp__D1VF,__tmp__H1VF;
+  __BOOLEAN result__HKIH,__tmp__F2VF,__tmp__P2VF,__tmp__S2VF;
+  dir__V0VF=NULL;
+  if (FILE_SYSTEM__->parent_directory__PFD==0) {
   } else {
-    parent_directory__CED();
+    parent_directory__OED();
   };
-  entry__XFVF=get_entry__H0AC(path__VFVF);
-  if (((void *)entry__XFVF != (void *)NULL)) {
-    if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__5FVF=((void *)((__DIRECTORY_UNIX *)entry__XFVF) != (void *)NULL);
+  entry__U0VF=get_entry__T0AC(path__S0VF);
+  if (((void *)entry__U0VF != (void *)NULL)) {
+    if (((struct ___OBJ *)entry__U0VF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__20VF=((void *)((__DIRECTORY_UNIX *)entry__U0VF) != (void *)NULL);
     } else {
-      __tmp__5FVF=FALSE__;
+      __tmp__20VF=FALSE__;
     };
-    __tmp__JGVF=__tmp__5FVF;
+    __tmp__G1VF=__tmp__20VF;
   } else {
-    __tmp__JGVF=FALSE__;
+    __tmp__G1VF=FALSE__;
   };
-  if (__tmp__JGVF) {
-    if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__GGVF=open__NERD(entry__XFVF);
+  if (__tmp__G1VF) {
+    if (((struct ___OBJ *)entry__U0VF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__D1VF=open__ZERD(entry__U0VF);
     } else {
-      Self__KZZG=((__FILE_UNIX *)entry__XFVF);
-      Self__KZZG->stream__YIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__KZZG->parent_entry_unix__QCF.parent_entry__MED.path__BD)->storage__JQO),"r+b")));
-      __tmp__GGVF=(Self__KZZG->stream__YIRD != (void *)NULL);
+      Self__QBAH=((__FILE_UNIX *)entry__U0VF);
+      Self__QBAH->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__QBAH->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
+      __tmp__D1VF=(Self__QBAH->stream__EJRD != (void *)NULL);
     };
-    __tmp__KGVF=__tmp__GGVF;
+    __tmp__H1VF=__tmp__D1VF;
   } else {
-    __tmp__KGVF=FALSE__;
+    __tmp__H1VF=FALSE__;
   };
-  if (__tmp__KGVF) {
-    if (entry__XFVF==NULL) {
-      __tmp__RGVF=NULL;
+  if (__tmp__H1VF) {
+    if (entry__U0VF==NULL) {
+      __tmp__O1VF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__XFVF)->__id) {
+      switch (((struct ___OBJ *)entry__U0VF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__RGVF=((void *)entry__XFVF);
+        __tmp__O1VF=((void *)entry__U0VF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__RGVF=NULL;
+        __tmp__O1VF=NULL;
       } break;
       }
     };
-    dir__YFVF=__tmp__RGVF;
-    __tmp__VGVF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__RGVF)->parent_directory__OED.list__2ERD)->parent_linked_collection__1ERD.upper__C32D;
-    Self__QHHG= 1;
-    while ((Self__QHHG <= __tmp__VGVF)) {
-      entry__XFVF=item__VEPE(dir__YFVF,Self__QHHG);
-      if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
-        __tmp__2GVF=((__DIRECTORY_UNIX *)entry__XFVF)->parent_entry_unix__NED.parent_entry__MED.name__JNT;
+    dir__V0VF=__tmp__O1VF;
+    __tmp__S1VF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__O1VF)->parent_directory__0ED.list__IFRD)->parent_linked_collection__HFRD.upper__TI3D;
+    Self__5HMG= 1;
+    while ((Self__5HMG <= __tmp__S1VF)) {
+      entry__U0VF=item__DVPE(dir__V0VF,Self__5HMG);
+      if (((struct ___OBJ *)entry__U0VF)->__id==__DIRECTORY_UNIX__) {
+        __tmp__Z1VF=((__DIRECTORY_UNIX *)entry__U0VF)->parent_entry_unix__ZED.parent_entry__YED.name__VNT;
       } else {
-        __tmp__2GVF=((__FILE_UNIX *)entry__XFVF)->parent_entry_unix__QCF.parent_entry__MED.name__JNT;
+        __tmp__Z1VF=((__FILE_UNIX *)entry__U0VF)->parent_entry_unix__2CF.parent_entry__YED.name__VNT;
       };
-      Self__W3BH=((__STRING_CONSTANT *)__tmp__2GVF);
-      result__T3BH=FALSE__;
-      i1__U3BH= 0;
-      i2__V3BH= 0;
-      if ((((__STRING_CONSTANT *)(&__string_152))->count__DD <= Self__W3BH->count__DD)) {
-        i1__U3BH=(__INTEGER)((__INTEGER)(Self__W3BH->count__DD - ((__STRING_CONSTANT *)(&__string_152))->count__DD) +  1);
-        i2__V3BH= 1;
-        while ((! (((i1__U3BH > Self__W3BH->count__DD) || (i2__V3BH > ((__STRING_CONSTANT *)(&__string_152))->count__DD)) || (((__CHARACTER *)Self__W3BH->storage__JQO)[(__INTEGER)(i1__U3BH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__JQO)[(__INTEGER)(i2__V3BH -  1)])))) {
-          i1__U3BH=(__INTEGER)(i1__U3BH +  1);
-          i2__V3BH=(__INTEGER)(i2__V3BH +  1);
+      Self__KKIH=((__STRING_CONSTANT *)__tmp__Z1VF);
+      result__HKIH=FALSE__;
+      i1__IKIH= 0;
+      i2__JKIH= 0;
+      if ((((__STRING_CONSTANT *)(&__string_155))->count__DD <= Self__KKIH->count__DD)) {
+        i1__IKIH=(__INTEGER)((__INTEGER)(Self__KKIH->count__DD - ((__STRING_CONSTANT *)(&__string_155))->count__DD) +  1);
+        i2__JKIH= 1;
+        while ((! (((i1__IKIH > Self__KKIH->count__DD) || (i2__JKIH > ((__STRING_CONSTANT *)(&__string_155))->count__DD)) || (((__CHARACTER *)Self__KKIH->storage__VQO)[(__INTEGER)(i1__IKIH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__VQO)[(__INTEGER)(i2__JKIH -  1)])))) {
+          i1__IKIH=(__INTEGER)(i1__IKIH +  1);
+          i2__JKIH=(__INTEGER)(i2__JKIH +  1);
         };
-        result__T3BH=(i1__U3BH > Self__W3BH->count__DD);
+        result__HKIH=(i1__IKIH > Self__KKIH->count__DD);
       };
-      if (result__T3BH) {
-        if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
-          __tmp__FHVF=((__DIRECTORY_UNIX *)entry__XFVF)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+      if (result__HKIH) {
+        if (((struct ___OBJ *)entry__U0VF)->__id==__DIRECTORY_UNIX__) {
+          __tmp__C2VF=((__DIRECTORY_UNIX *)entry__U0VF)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
         } else {
-          __tmp__FHVF=((__FILE_UNIX *)entry__XFVF)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
+          __tmp__C2VF=((__FILE_UNIX *)entry__U0VF)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
         };
-        add_last__FBPD(path_file__DHVF,__tmp__FHVF);
-        __tmp__IHVF=TRUE__;
+        add_last__RBPD(path_file__A2VF,__tmp__C2VF);
+        __tmp__F2VF=TRUE__;
       } else {
-        __tmp__IHVF=FALSE__;
+        __tmp__F2VF=FALSE__;
       };
-      if ((! __tmp__IHVF)) {
-        if (is_rec__WFVF) {
-          if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__SHVF=((void *)((__DIRECTORY_UNIX *)entry__XFVF) != (void *)NULL);
+      if ((! __tmp__F2VF)) {
+        if (is_rec__T0VF) {
+          if (((struct ___OBJ *)entry__U0VF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__P2VF=((void *)((__DIRECTORY_UNIX *)entry__U0VF) != (void *)NULL);
           } else {
-            __tmp__SHVF=FALSE__;
+            __tmp__P2VF=FALSE__;
           };
-          __tmp__VHVF=__tmp__SHVF;
+          __tmp__S2VF=__tmp__P2VF;
         } else {
-          __tmp__VHVF=FALSE__;
+          __tmp__S2VF=FALSE__;
         };
-        if (__tmp__VHVF) {
-          if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__2HVF=((__DIRECTORY_UNIX *)entry__XFVF)->parent_entry_unix__NED.parent_entry__MED.path__BD;
+        if (__tmp__S2VF) {
+          if (((struct ___OBJ *)entry__U0VF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__Z2VF=((__DIRECTORY_UNIX *)entry__U0VF)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
           } else {
-            __tmp__2HVF=((__FILE_UNIX *)entry__XFVF)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
+            __tmp__Z2VF=((__FILE_UNIX *)entry__U0VF)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
           };
-          load_directory__is_recursive__TFVF(Self__UFVF,__tmp__2HVF,TRUE__);
+          load_directory__is_recursive__Q0VF(Self__R0VF,__tmp__Z2VF,TRUE__);
         };
       };
-      Self__QHHG=(__INTEGER)(Self__QHHG +  1);
+      Self__5HMG=(__INTEGER)(Self__5HMG +  1);
     };
   } else {
-    copy__NCS(string_tmp__VH,(&__string_318));
-    append__VNS(string_tmp__VH,path__VFVF);
-    append__VNS(string_tmp__VH,(&__string_279));
-    __tmp__KIVF=Self__UFVF->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ;
-    put_error__text__4MG( 2,string_tmp__VH);
-    put_position__IOG(__tmp__KIVF);
-    put_string__I1F(msg_err__DNG);
-    if ((type_error__CNG !=  2)) {
+    copy__ZCS(string_tmp__VH,(&__string_328));
+    append__BOS(string_tmp__VH,path__S0VF);
+    append__BOS(string_tmp__VH,(&__string_289));
+    __tmp__H3VF=Self__R0VF->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
+    put_error__text__KNG( 2,string_tmp__VH);
+    put_position__UOG(__tmp__H3VF);
+    put_string__U1F(msg_err__PNG);
+    if ((type_error__ONG !=  2)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__JKDG(__LIP_STRING *Self__KKDG,void *str__LKDG)
+static void append_in__LUGG(__LIP_STRING *Self__MUGG,void *str__NUGG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER i__MKDG;
-  __CHARACTER car__NKDG;
-  car__NKDG='\0';
-  i__MKDG= 1;
-  while ((i__MKDG <= ((__STRING_CONSTANT *)Self__KKDG->value__FPTE)->count__DD)) {
-    car__NKDG=((__CHARACTER *)((__STRING_CONSTANT *)Self__KKDG->value__FPTE)->storage__JQO)[(__INTEGER)(i__MKDG -  1)];
-    if ((car__NKDG == '\\')) {
-      i__MKDG=(__INTEGER)(i__MKDG +  1);
-      if ((i__MKDG <= ((__STRING_CONSTANT *)Self__KKDG->value__FPTE)->count__DD)) {
-        car__NKDG=((__CHARACTER *)((__STRING_CONSTANT *)Self__KKDG->value__FPTE)->storage__JQO)[(__INTEGER)(i__MKDG -  1)];
-        if ((car__NKDG == 'a')) {
-          add_last__NLT(str__LKDG,'\a');
+  __INTEGER i__OUGG;
+  __CHARACTER car__PUGG;
+  car__PUGG='\0';
+  i__OUGG= 1;
+  while ((i__OUGG <= ((__STRING_CONSTANT *)Self__MUGG->value__52TE)->count__DD)) {
+    car__PUGG=((__CHARACTER *)((__STRING_CONSTANT *)Self__MUGG->value__52TE)->storage__VQO)[(__INTEGER)(i__OUGG -  1)];
+    if ((car__PUGG == '\\')) {
+      i__OUGG=(__INTEGER)(i__OUGG +  1);
+      if ((i__OUGG <= ((__STRING_CONSTANT *)Self__MUGG->value__52TE)->count__DD)) {
+        car__PUGG=((__CHARACTER *)((__STRING_CONSTANT *)Self__MUGG->value__52TE)->storage__VQO)[(__INTEGER)(i__OUGG -  1)];
+        if ((car__PUGG == 'a')) {
+          add_last__ZLT(str__NUGG,'\a');
         };
-        if ((car__NKDG == 'b')) {
-          add_last__NLT(str__LKDG,'\b');
+        if ((car__PUGG == 'b')) {
+          add_last__ZLT(str__NUGG,'\b');
         };
-        if ((car__NKDG == 'f')) {
-          add_last__NLT(str__LKDG,'\f');
+        if ((car__PUGG == 'f')) {
+          add_last__ZLT(str__NUGG,'\f');
         };
-        if ((car__NKDG == 'n')) {
-          add_last__NLT(str__LKDG,'\n');
+        if ((car__PUGG == 'n')) {
+          add_last__ZLT(str__NUGG,'\n');
         };
-        if ((car__NKDG == 'r')) {
-          add_last__NLT(str__LKDG,'\r');
+        if ((car__PUGG == 'r')) {
+          add_last__ZLT(str__NUGG,'\r');
         };
-        if ((car__NKDG == 't')) {
-          add_last__NLT(str__LKDG,'\t');
+        if ((car__PUGG == 't')) {
+          add_last__ZLT(str__NUGG,'\t');
         };
-        if ((car__NKDG == 'v')) {
-          add_last__NLT(str__LKDG,'\v');
+        if ((car__PUGG == 'v')) {
+          add_last__ZLT(str__NUGG,'\v');
         };
-        if ((car__NKDG == '\\')) {
-          add_last__NLT(str__LKDG,'\\');
+        if ((car__PUGG == '\\')) {
+          add_last__ZLT(str__NUGG,'\\');
         };
-        if ((car__NKDG == '?')) {
-          add_last__NLT(str__LKDG,'\?');
+        if ((car__PUGG == '?')) {
+          add_last__ZLT(str__NUGG,'\?');
         };
-        if ((car__NKDG == '\'')) {
-          add_last__NLT(str__LKDG,'\'');
+        if ((car__PUGG == '\'')) {
+          add_last__ZLT(str__NUGG,'\'');
         };
-        if ((car__NKDG == '\"')) {
-          add_last__NLT(str__LKDG,'\"');
+        if ((car__PUGG == '\"')) {
+          add_last__ZLT(str__NUGG,'\"');
         };
       } else {
-        add_last__NLT(str__LKDG,car__NKDG);
+        add_last__ZLT(str__NUGG,car__PUGG);
       };
     } else {
-      add_last__NLT(str__LKDG,car__NKDG);
+      add_last__ZLT(str__NUGG,car__PUGG);
     };
-    i__MKDG=(__INTEGER)(i__MKDG +  1);
+    i__OUGG=(__INTEGER)(i__OUGG +  1);
   };
 }
 
-static void print_positif__AYFG(__INTEGER Self__BYFG)
+static void print_positif__JXJG(__INTEGER Self__KXJG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __INTEGER val__KYFG;
-  __CHARACTER char__JYFG;
-  char__JYFG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__BYFG %  10)) + ((__INTEGER_8 )'0')))));
-  val__KYFG=(__INTEGER)(Self__BYFG /  10);
-  if ((val__KYFG !=  0)) {
-    print_positif__AYFG(val__KYFG);
-  };
-  fputc((int)(char__JYFG),stdout);
+  __INTEGER val__TXJG;
+  __CHARACTER char__SXJG;
+  char__SXJG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__KXJG %  10)) + ((__INTEGER_8 )'0')))));
+  val__TXJG=(__INTEGER)(Self__KXJG /  10);
+  if ((val__TXJG !=  0)) {
+    print_positif__JXJG(val__TXJG);
+  };
+  fputc((int)(char__SXJG),stdout);
 }
 
-static __BOOLEAN has__HLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ILMB,void *e__JLMB)
+static __BOOLEAN has__TLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ULMB,void *e__VLMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__S45G;
-  __INTEGER result__R45G,__tmp__T45G,Self__U45G;
-  void *node__SLMB;
-  Self__S45G=((__STRING_CONSTANT *)e__JLMB);
-  result__R45G= 0;
-  __tmp__T45G=Self__S45G->count__DD;
-  Self__U45G= 1;
-  while ((Self__U45G <= __tmp__T45G)) {
-    result__R45G=(__INTEGER)((__INTEGER)( 5 * result__R45G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__S45G->storage__JQO)[(__INTEGER)(Self__U45G -  1)])));
-    Self__U45G=(__INTEGER)(Self__U45G +  1);
-  };
-  if ((result__R45G <  0)) {
-    result__R45G=(__INTEGER)(~ result__R45G);
-  };
-  node__SLMB=((void **)Self__ILMB->buckets__DEV)[(__INTEGER)(result__R45G % Self__ILMB->capacity__4HT)];
-  while ((! (((void *)node__SLMB == (void *)NULL) || __infix_equal_equal__S5DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__SLMB)->item__PEV,e__JLMB)))) {
-    node__SLMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__SLMB)->next__0EV;
-  };
-  return(((void *)node__SLMB != (void *)NULL));
+  __STRING_CONSTANT *Self__4KGH;
+  __INTEGER result__3KGH,__tmp__5KGH,Self__ALGH;
+  void *node__4LMB;
+  Self__4KGH=((__STRING_CONSTANT *)e__VLMB);
+  result__3KGH= 0;
+  __tmp__5KGH=Self__4KGH->count__DD;
+  Self__ALGH= 1;
+  while ((Self__ALGH <= __tmp__5KGH)) {
+    result__3KGH=(__INTEGER)((__INTEGER)( 5 * result__3KGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4KGH->storage__VQO)[(__INTEGER)(Self__ALGH -  1)])));
+    Self__ALGH=(__INTEGER)(Self__ALGH +  1);
+  };
+  if ((result__3KGH <  0)) {
+    result__3KGH=(__INTEGER)(~ result__3KGH);
+  };
+  node__4LMB=((void **)Self__ULMB->buckets__PEV)[(__INTEGER)(result__3KGH % Self__ULMB->capacity__KIT)];
+  while ((! (((void *)node__4LMB == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__4LMB)->item__1EV,e__VLMB)))) {
+    node__4LMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__4LMB)->next__GFV;
+  };
+  return(((void *)node__4LMB != (void *)NULL));
 }
 
-static void display_raw__HLIC(__ITM_TYPE_MULTI *Self__ILIC,void *buffer__JLIC)
+static void display_raw__TLIC(__ITM_TYPE_MULTI *Self__ULIC,void *buffer__VLIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__QLIC,Self__LKRC;
-  void *__tmp__XLIC,*__tmp__0LIC;
-  __ITM_TYPE_STYLE *Self__NS2G,*Self__ZS2G;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__PS2G;
-  __tmp__QLIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ILIC->list_type__UJP)->parent_arrayed_collection__NXC.upper__4HV -  1);
-  Self__LKRC= 0;
-  while ((Self__LKRC <= __tmp__QLIC)) {
-    __tmp__XLIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ILIC->list_type__UJP)->parent_arrayed_collection__NXC.storage__FMV)[Self__LKRC];
-    switch (((struct ___OBJ *)__tmp__XLIC)->__id) {
+  __INTEGER __tmp__2LIC,Self__XKRC;
+  void *__tmp__DMIC,*__tmp__GMIC;
+  __ITM_TYPE_STYLE *Self__L3CH,*Self__X3CH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__N3CH;
+  __tmp__2LIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ULIC->list_type__AKP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
+  Self__XKRC= 0;
+  while ((Self__XKRC <= __tmp__2LIC)) {
+    __tmp__DMIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ULIC->list_type__AKP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__XKRC];
+    switch (((struct ___OBJ *)__tmp__DMIC)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__VNS(buffer__JLIC,((__ITM_TYPE_PARAMETER *)__tmp__XLIC)->parent_itm_type__RDE.name__4XP);
+      append__BOS(buffer__VLIC,((__ITM_TYPE_PARAMETER *)__tmp__DMIC)->parent_itm_type__3DE.name__KYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__VNS(buffer__JLIC,((__ITM_TYPE_SIMPLE *)__tmp__XLIC)->name__4XP);
+      append__BOS(buffer__VLIC,((__ITM_TYPE_SIMPLE *)__tmp__DMIC)->name__KYP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__CGPD(__tmp__XLIC,buffer__JLIC);
+      append_in__OGPD(__tmp__DMIC,buffer__VLIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__GHPD(__tmp__XLIC,buffer__JLIC);
+      append_in__SHPD(__tmp__DMIC,buffer__VLIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__NS2G=((__ITM_TYPE_STYLE *)__tmp__XLIC);
-      if (((void *)Self__NS2G->style__HYP != (void *)NULL)) {
-        append__VNS(buffer__JLIC,Self__NS2G->style__HYP);
-        add_last__NLT(buffer__JLIC,' ');
+      Self__L3CH=((__ITM_TYPE_STYLE *)__tmp__DMIC);
+      if (((void *)Self__L3CH->style__TYP != (void *)NULL)) {
+        append__BOS(buffer__VLIC,Self__L3CH->style__TYP);
+        add_last__ZLT(buffer__VLIC,' ');
       };
-      append__VNS(buffer__JLIC,Self__NS2G->parent_itm_type_simple__VRN.name__4XP);
+      append__BOS(buffer__VLIC,Self__L3CH->parent_itm_type_simple__BSN.name__KYP);
     } break;
     };
-    add_last__NLT(buffer__JLIC,',');
-    Self__LKRC=(__INTEGER)(Self__LKRC +  1);
+    add_last__ZLT(buffer__VLIC,',');
+    Self__XKRC=(__INTEGER)(Self__XKRC +  1);
   };
-  Self__PS2G=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ILIC->list_type__UJP);
-  __tmp__0LIC=((void **)Self__PS2G->parent_arrayed_collection__NXC.storage__FMV)[Self__PS2G->parent_arrayed_collection__NXC.upper__4HV];
-  switch (((struct ___OBJ *)__tmp__0LIC)->__id) {
+  Self__N3CH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ULIC->list_type__AKP);
+  __tmp__GMIC=((void **)Self__N3CH->parent_arrayed_collection__ZXC.storage__RMV)[Self__N3CH->parent_arrayed_collection__ZXC.upper__KIV];
+  switch (((struct ___OBJ *)__tmp__GMIC)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__VNS(buffer__JLIC,((__ITM_TYPE_PARAMETER *)__tmp__0LIC)->parent_itm_type__RDE.name__4XP);
+    append__BOS(buffer__VLIC,((__ITM_TYPE_PARAMETER *)__tmp__GMIC)->parent_itm_type__3DE.name__KYP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__VNS(buffer__JLIC,((__ITM_TYPE_SIMPLE *)__tmp__0LIC)->name__4XP);
+    append__BOS(buffer__VLIC,((__ITM_TYPE_SIMPLE *)__tmp__GMIC)->name__KYP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__CGPD(__tmp__0LIC,buffer__JLIC);
+    append_in__OGPD(__tmp__GMIC,buffer__VLIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__GHPD(__tmp__0LIC,buffer__JLIC);
+    append_in__SHPD(__tmp__GMIC,buffer__VLIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__ZS2G=((__ITM_TYPE_STYLE *)__tmp__0LIC);
-    if (((void *)Self__ZS2G->style__HYP != (void *)NULL)) {
-      append__VNS(buffer__JLIC,Self__ZS2G->style__HYP);
-      add_last__NLT(buffer__JLIC,' ');
+    Self__X3CH=((__ITM_TYPE_STYLE *)__tmp__GMIC);
+    if (((void *)Self__X3CH->style__TYP != (void *)NULL)) {
+      append__BOS(buffer__VLIC,Self__X3CH->style__TYP);
+      add_last__ZLT(buffer__VLIC,' ');
     };
-    append__VNS(buffer__JLIC,Self__ZS2G->parent_itm_type_simple__VRN.name__4XP);
+    append__BOS(buffer__VLIC,Self__X3CH->parent_itm_type_simple__BSN.name__KYP);
   } break;
   };
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__EJK(__INTEGER new_count__GJK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__QJK(__INTEGER new_count__SJK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__M3K,ptr_table__Z3BH,next__Y3BH,result__03BH;
-  __POINTER ptr_table__43BH,next__33BH,result__53BH;
-  __INTEGER typ_id__R3K;
-  __UINTEGER_32 sz__O3K,a__5W4G,new_size__AX4G,t__EX4G,a__DX4G;
-  __UINTEGER_32 new_size__B4BH,lab_type__A4BH;
-  __FAST_ARRAYoITM_LOCALo *result__L3K,*Self__NMU;
-  result__L3K=NULL;
-  ptr__M3K=((__POINTER )(NULL));
-  typ_id__R3K= 0;
-  sz__O3K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
-  if ((sz__O3K ==  0)) {
-    result__L3K=FAST_ARRAYoITM_LOCALo__;
+  __POINTER ptr__Y3K,ptr_table__NKIH,next__MKIH,result__OKIH;
+  __POINTER ptr_table__SKIH,next__RKIH,result__TKIH;
+  __INTEGER typ_id__33K;
+  __UINTEGER_32 sz__03K,a__UCFH,new_size__VCFH,t__ZCFH,a__YCFH;
+  __UINTEGER_32 new_size__VKIH,lab_type__UKIH;
+  __FAST_ARRAYoITM_LOCALo *result__X3K,*Self__ZMU;
+  result__X3K=NULL;
+  ptr__Y3K=((__POINTER )(NULL));
+  typ_id__33K= 0;
+  sz__03K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
+  if ((sz__03K ==  0)) {
+    result__X3K=FAST_ARRAYoITM_LOCALo__;
   } else {
-    typ_id__R3K=__FAST_ARRAYoITM_LOCALo__;
-    clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__O3K);
-    if ((typ_id__R3K == (__INTEGER)(-  1))) {
-      a__5W4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AX4G=(__UINTEGER_32)((__UINTEGER_32)(sz__O3K + a__5W4G) & (__UINTEGER_32)(~ a__5W4G));
-      ptr_table__Z3BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AX4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__Y3BH=((__POINTER )(NULL));
-      result__03BH=((__POINTER *)ptr_table__Z3BH)[ 0];
-      if ((result__03BH == (void *)NULL)) {
-        result__03BH=new_lab__ARJ(new_size__AX4G);
-        next__Y3BH=(void *)((unsigned long)result__03BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AX4G)));
-        ((__POINTER *)next__Y3BH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Z3BH)[ 0]=next__Y3BH;
-      } else {
-        next__Y3BH=((__POINTER *)result__03BH)[ 0];
-        if ((next__Y3BH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__03BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__AX4G <<  1)) <=  4096)) {
-            next__Y3BH=(void *)((unsigned long)result__03BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AX4G)));
-          } else {
-            next__Y3BH=new_lab__ARJ(new_size__AX4G);
-          };
-          ((__POINTER *)next__Y3BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Z3BH)[ 0]=next__Y3BH;
-        } else {
-          ((__POINTER *)result__03BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__03BH=next__Y3BH;
-        };
-      };
-      ptr__M3K=result__03BH;
-    } else {
-      t__EX4G=((__UINTEGER_32 )typ_id__R3K);
-      a__DX4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__B4BH=(__UINTEGER_32)((__UINTEGER_32)(sz__O3K + a__DX4G) & (__UINTEGER_32)(~ a__DX4G));
-      ptr_table__43BH=((__POINTER )(&(table_type[(t__EX4G)])));
-      lab_type__A4BH=(__UINTEGER_32)(t__EX4G |  1);
-      next__33BH=((__POINTER )(NULL));
-      result__53BH=((__POINTER *)ptr_table__43BH)[ 0];
-      if ((result__53BH == (void *)NULL)) {
-        result__53BH=new_lab__ARJ(lab_type__A4BH);
-        next__33BH=(void *)((unsigned long)result__53BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4BH)));
-        ((__POINTER *)next__33BH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__43BH)[ 0]=next__33BH;
-      } else {
-        next__33BH=((__POINTER *)result__53BH)[ 0];
-        if ((next__33BH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__53BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__B4BH <<  1)) <=  4096)) {
-            next__33BH=(void *)((unsigned long)result__53BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4BH)));
-          } else {
-            next__33BH=new_lab__ARJ(lab_type__A4BH);
-          };
-          ((__POINTER *)next__33BH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__43BH)[ 0]=next__33BH;
-        } else {
-          ((__POINTER *)result__53BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__33BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__53BH=next__33BH;
-        };
-      };
-      ptr__M3K=result__53BH;
-    };
-    result__L3K=((__FAST_ARRAYoITM_LOCALo *)ptr__M3K);
-    *(result__L3K) = *(FAST_ARRAYoITM_LOCALo__);
-  };
-  Self__NMU=((__FAST_ARRAYoITM_LOCALo *)result__L3K);
-  if ((Self__NMU->parent_arrayed_collection__Y0H.capacity__LKU < new_count__GJK)) {
-    Self__NMU->parent_arrayed_collection__Y0H.storage__WKU=create__1QQB(new_count__GJK);
-    Self__NMU->parent_arrayed_collection__Y0H.capacity__LKU=new_count__GJK;
-  };
-  Self__NMU->parent_arrayed_collection__Y0H.upper__P0K=(__INTEGER)(-  1);
-  return(result__L3K);
+    typ_id__33K=__FAST_ARRAYoITM_LOCALo__;
+    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__03K);
+    if ((typ_id__33K == (__INTEGER)(-  1))) {
+      a__UCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__03K + a__UCFH) & (__UINTEGER_32)(~ a__UCFH));
+      ptr_table__NKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MKIH=((__POINTER )(NULL));
+      result__OKIH=((__POINTER *)ptr_table__NKIH)[ 0];
+      if ((result__OKIH == (void *)NULL)) {
+        result__OKIH=new_lab__MRJ(new_size__VCFH);
+        next__MKIH=(void *)((unsigned long)result__OKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCFH)));
+        ((__POINTER *)next__MKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NKIH)[ 0]=next__MKIH;
+      } else {
+        next__MKIH=((__POINTER *)result__OKIH)[ 0];
+        if ((next__MKIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VCFH <<  1)) <=  4096)) {
+            next__MKIH=(void *)((unsigned long)result__OKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCFH)));
+          } else {
+            next__MKIH=new_lab__MRJ(new_size__VCFH);
+          };
+          ((__POINTER *)next__MKIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NKIH)[ 0]=next__MKIH;
+        } else {
+          ((__POINTER *)result__OKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OKIH=next__MKIH;
+        };
+      };
+      ptr__Y3K=result__OKIH;
+    } else {
+      t__ZCFH=((__UINTEGER_32 )typ_id__33K);
+      a__YCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__03K + a__YCFH) & (__UINTEGER_32)(~ a__YCFH));
+      ptr_table__SKIH=((__POINTER )(&(table_type[(t__ZCFH)])));
+      lab_type__UKIH=(__UINTEGER_32)(t__ZCFH |  1);
+      next__RKIH=((__POINTER )(NULL));
+      result__TKIH=((__POINTER *)ptr_table__SKIH)[ 0];
+      if ((result__TKIH == (void *)NULL)) {
+        result__TKIH=new_lab__MRJ(lab_type__UKIH);
+        next__RKIH=(void *)((unsigned long)result__TKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKIH)));
+        ((__POINTER *)next__RKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SKIH)[ 0]=next__RKIH;
+      } else {
+        next__RKIH=((__POINTER *)result__TKIH)[ 0];
+        if ((next__RKIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VKIH <<  1)) <=  4096)) {
+            next__RKIH=(void *)((unsigned long)result__TKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKIH)));
+          } else {
+            next__RKIH=new_lab__MRJ(lab_type__UKIH);
+          };
+          ((__POINTER *)next__RKIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SKIH)[ 0]=next__RKIH;
+        } else {
+          ((__POINTER *)result__TKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TKIH=next__RKIH;
+        };
+      };
+      ptr__Y3K=result__TKIH;
+    };
+    result__X3K=((__FAST_ARRAYoITM_LOCALo *)ptr__Y3K);
+    *(result__X3K) = *(FAST_ARRAYoITM_LOCALo__);
+  };
+  Self__ZMU=((__FAST_ARRAYoITM_LOCALo *)result__X3K);
+  if ((Self__ZMU->parent_arrayed_collection__E1H.capacity__XKU < new_count__SJK)) {
+    Self__ZMU->parent_arrayed_collection__E1H.storage__CLU=create__HRQB(new_count__SJK);
+    Self__ZMU->parent_arrayed_collection__E1H.capacity__XKU=new_count__SJK;
+  };
+  Self__ZMU->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(-  1);
+  return(result__X3K);
 }
 
-static void add_last__Z1U(__FAST_ARRAYoITM_LOCALo *Self__01U,void *element__11U)
+static void add_last__F2U(__FAST_ARRAYoITM_LOCALo *Self__G2U,void *element__H2U)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__21U,__tmp__A3U,__tmp__ECEC,Self__VEVD;
-  __BOOLEAN __tmp__K2U;
-  void **__tmp__52U,**new__QBEC;
-  new_capacity__21U= 0;
-  if (((__INTEGER)(Self__01U->parent_arrayed_collection__Y0H.upper__P0K +  1) <= (__INTEGER)(Self__01U->parent_arrayed_collection__Y0H.capacity__LKU -  1))) {
-    Self__01U->parent_arrayed_collection__Y0H.upper__P0K=(__INTEGER)(Self__01U->parent_arrayed_collection__Y0H.upper__P0K +  1);
-    __tmp__K2U=TRUE__;
+  __INTEGER new_capacity__I2U,__tmp__M3U,__tmp__QCEC,Self__OFVD;
+  __BOOLEAN __tmp__W2U;
+  void **__tmp__L3U,**new__2BEC;
+  new_capacity__I2U= 0;
+  if (((__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.upper__10K +  1) <= (__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.capacity__XKU -  1))) {
+    Self__G2U->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.upper__10K +  1);
+    __tmp__W2U=TRUE__;
   } else {
-    __tmp__K2U=FALSE__;
-  };
-  if ((! __tmp__K2U)) {
-    if ((Self__01U->parent_arrayed_collection__Y0H.capacity__LKU ==  0)) {
-      Self__01U->parent_arrayed_collection__Y0H.storage__WKU=create__1QQB( 2);
-      Self__01U->parent_arrayed_collection__Y0H.capacity__LKU= 2;
-      Self__01U->parent_arrayed_collection__Y0H.upper__P0K= 0;
-    } else {
-      new_capacity__21U=(__INTEGER)(Self__01U->parent_arrayed_collection__Y0H.capacity__LKU <<  1);
-      __tmp__52U=Self__01U->parent_arrayed_collection__Y0H.storage__WKU;
-      __tmp__A3U=Self__01U->parent_arrayed_collection__Y0H.capacity__LKU;
-      new__QBEC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__52U)),((__UINTEGER_32 )(__INTEGER)(__tmp__A3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__21U * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ECEC=(__INTEGER)(new_capacity__21U -  1);
-      Self__VEVD=__tmp__A3U;
-      while ((Self__VEVD <= __tmp__ECEC)) {
-        new__QBEC[Self__VEVD]=NULL;
-        Self__VEVD=(__INTEGER)(Self__VEVD +  1);
-      };
-      Self__01U->parent_arrayed_collection__Y0H.storage__WKU=new__QBEC;
-      Self__01U->parent_arrayed_collection__Y0H.capacity__LKU=new_capacity__21U;
-      Self__01U->parent_arrayed_collection__Y0H.upper__P0K=(__INTEGER)(Self__01U->parent_arrayed_collection__Y0H.upper__P0K +  1);
-    };
-  };
-  ((void **)Self__01U->parent_arrayed_collection__Y0H.storage__WKU)[Self__01U->parent_arrayed_collection__Y0H.upper__P0K]=element__11U;
+    __tmp__W2U=FALSE__;
+  };
+  if ((! __tmp__W2U)) {
+    if ((Self__G2U->parent_arrayed_collection__E1H.capacity__XKU ==  0)) {
+      Self__G2U->parent_arrayed_collection__E1H.storage__CLU=create__HRQB( 2);
+      Self__G2U->parent_arrayed_collection__E1H.capacity__XKU= 2;
+      Self__G2U->parent_arrayed_collection__E1H.upper__10K= 0;
+    } else {
+      new_capacity__I2U=(__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.capacity__XKU <<  1);
+      __tmp__L3U=Self__G2U->parent_arrayed_collection__E1H.storage__CLU;
+      __tmp__M3U=Self__G2U->parent_arrayed_collection__E1H.capacity__XKU;
+      new__2BEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__L3U)),((__UINTEGER_32 )(__INTEGER)(__tmp__M3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__I2U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__QCEC=(__INTEGER)(new_capacity__I2U -  1);
+      Self__OFVD=__tmp__M3U;
+      while ((Self__OFVD <= __tmp__QCEC)) {
+        new__2BEC[Self__OFVD]=NULL;
+        Self__OFVD=(__INTEGER)(Self__OFVD +  1);
+      };
+      Self__G2U->parent_arrayed_collection__E1H.storage__CLU=new__2BEC;
+      Self__G2U->parent_arrayed_collection__E1H.capacity__XKU=new_capacity__I2U;
+      Self__G2U->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.upper__10K +  1);
+    };
+  };
+  ((void **)Self__G2U->parent_arrayed_collection__E1H.storage__CLU)[Self__G2U->parent_arrayed_collection__E1H.upper__10K]=element__H2U;
 }
 
-static void free__KJK(void *tmp__MJK)
+static void free__WJK(void *tmp__YJK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__GOU,__tmp__KPU,__tmp__Y5DC,Self__WCVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__EOU;
-  __BOOLEAN __tmp__UOU;
-  void **__tmp__JPU,**new__E5DC;
-  ((__FAST_ARRAYoITM_LOCALo *)tmp__MJK)->parent_arrayed_collection__Y0H.upper__P0K=(__INTEGER)(-  1);
-  Self__EOU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__JRI);
-  new_capacity__GOU= 0;
-  if (((__INTEGER)(Self__EOU->parent_arrayed_collection__IRI.upper__30T +  1) <= (__INTEGER)(Self__EOU->parent_arrayed_collection__IRI.capacity__QIU -  1))) {
-    Self__EOU->parent_arrayed_collection__IRI.upper__30T=(__INTEGER)(Self__EOU->parent_arrayed_collection__IRI.upper__30T +  1);
-    __tmp__UOU=TRUE__;
+  __INTEGER new_capacity__SOU,__tmp__WPU,__tmp__EAEC,Self__PDVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__QOU;
+  __BOOLEAN __tmp__APU;
+  void **__tmp__VPU,**new__Q5DC;
+  ((__FAST_ARRAYoITM_LOCALo *)tmp__YJK)->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(-  1);
+  Self__QOU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
+  new_capacity__SOU= 0;
+  if (((__INTEGER)(Self__QOU->parent_arrayed_collection__URI.upper__J1T +  1) <= (__INTEGER)(Self__QOU->parent_arrayed_collection__URI.capacity__2IU -  1))) {
+    Self__QOU->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__QOU->parent_arrayed_collection__URI.upper__J1T +  1);
+    __tmp__APU=TRUE__;
   } else {
-    __tmp__UOU=FALSE__;
-  };
-  if ((! __tmp__UOU)) {
-    if ((Self__EOU->parent_arrayed_collection__IRI.capacity__QIU ==  0)) {
-      Self__EOU->parent_arrayed_collection__IRI.storage__1IU=create__YGQB( 2);
-      Self__EOU->parent_arrayed_collection__IRI.capacity__QIU= 2;
-      Self__EOU->parent_arrayed_collection__IRI.upper__30T= 0;
-    } else {
-      new_capacity__GOU=(__INTEGER)(Self__EOU->parent_arrayed_collection__IRI.capacity__QIU <<  1);
-      __tmp__JPU=Self__EOU->parent_arrayed_collection__IRI.storage__1IU;
-      __tmp__KPU=Self__EOU->parent_arrayed_collection__IRI.capacity__QIU;
-      new__E5DC=((void **)realloc_dynamic__old_size__new_size__FELC(((__POINTER )((void **)__tmp__JPU)),((__UINTEGER_32 )(__INTEGER)(__tmp__KPU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__GOU * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__Y5DC=(__INTEGER)(new_capacity__GOU -  1);
-      Self__WCVD=__tmp__KPU;
-      while ((Self__WCVD <= __tmp__Y5DC)) {
-        new__E5DC[Self__WCVD]=NULL;
-        Self__WCVD=(__INTEGER)(Self__WCVD +  1);
-      };
-      Self__EOU->parent_arrayed_collection__IRI.storage__1IU=new__E5DC;
-      Self__EOU->parent_arrayed_collection__IRI.capacity__QIU=new_capacity__GOU;
-      Self__EOU->parent_arrayed_collection__IRI.upper__30T=(__INTEGER)(Self__EOU->parent_arrayed_collection__IRI.upper__30T +  1);
-    };
-  };
-  ((void **)Self__EOU->parent_arrayed_collection__IRI.storage__1IU)[Self__EOU->parent_arrayed_collection__IRI.upper__30T]=tmp__MJK;
+    __tmp__APU=FALSE__;
+  };
+  if ((! __tmp__APU)) {
+    if ((Self__QOU->parent_arrayed_collection__URI.capacity__2IU ==  0)) {
+      Self__QOU->parent_arrayed_collection__URI.storage__HJU=create__EHQB( 2);
+      Self__QOU->parent_arrayed_collection__URI.capacity__2IU= 2;
+      Self__QOU->parent_arrayed_collection__URI.upper__J1T= 0;
+    } else {
+      new_capacity__SOU=(__INTEGER)(Self__QOU->parent_arrayed_collection__URI.capacity__2IU <<  1);
+      __tmp__VPU=Self__QOU->parent_arrayed_collection__URI.storage__HJU;
+      __tmp__WPU=Self__QOU->parent_arrayed_collection__URI.capacity__2IU;
+      new__Q5DC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__VPU)),((__UINTEGER_32 )(__INTEGER)(__tmp__WPU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__SOU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__EAEC=(__INTEGER)(new_capacity__SOU -  1);
+      Self__PDVD=__tmp__WPU;
+      while ((Self__PDVD <= __tmp__EAEC)) {
+        new__Q5DC[Self__PDVD]=NULL;
+        Self__PDVD=(__INTEGER)(Self__PDVD +  1);
+      };
+      Self__QOU->parent_arrayed_collection__URI.storage__HJU=new__Q5DC;
+      Self__QOU->parent_arrayed_collection__URI.capacity__2IU=new_capacity__SOU;
+      Self__QOU->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__QOU->parent_arrayed_collection__URI.upper__J1T +  1);
+    };
+  };
+  ((void **)Self__QOU->parent_arrayed_collection__URI.storage__HJU)[Self__QOU->parent_arrayed_collection__URI.upper__J1T]=tmp__YJK;
 }
 
-static void* copy__T3J(void *tmp__V3J)
+static void* copy__53J(void *tmp__B4J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__CKU,other_upper__BKU,Self__04JC;
-  void *result__X3J;
-  __FAST_ARRAYoITM_LOCALo *Self__5JU;
-  void **__tmp__ZKU,**__tmp__1KU,**Self__5SCC;
-  result__X3J=create_with_capacity__EJK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__V3J)->parent_arrayed_collection__Y0H.upper__P0K +  1));
-  Self__5JU=((__FAST_ARRAYoITM_LOCALo *)result__X3J);
-  new_capacity__CKU= 0;
-  other_upper__BKU=((__FAST_ARRAYoITM_LOCALo *)tmp__V3J)->parent_arrayed_collection__Y0H.upper__P0K;
-  if ((other_upper__BKU >=  0)) {
-    new_capacity__CKU=(__INTEGER)(other_upper__BKU +  1);
-    if ((Self__5JU->parent_arrayed_collection__Y0H.capacity__LKU < new_capacity__CKU)) {
-      Self__5JU->parent_arrayed_collection__Y0H.storage__WKU=create__1QQB(new_capacity__CKU);
-      Self__5JU->parent_arrayed_collection__Y0H.capacity__LKU=new_capacity__CKU;
-    };
-    __tmp__ZKU=Self__5JU->parent_arrayed_collection__Y0H.storage__WKU;
-    __tmp__1KU=((__FAST_ARRAYoITM_LOCALo *)tmp__V3J)->parent_arrayed_collection__Y0H.storage__WKU;
-    Self__5SCC=((void **)__tmp__ZKU);
-    Self__04JC=other_upper__BKU;
-    while ((Self__04JC >=  0)) {
-      Self__5SCC[Self__04JC]=((void **)__tmp__1KU)[Self__04JC];
-      Self__04JC=(__INTEGER)(Self__04JC -  1);
-    };
-  };
-  Self__5JU->parent_arrayed_collection__Y0H.upper__P0K=other_upper__BKU;
-  free__KJK(tmp__V3J);
-  return(result__X3J);
+  __INTEGER new_capacity__OKU,other_upper__NKU,Self__G5JC;
+  void *result__D4J;
+  __FAST_ARRAYoITM_LOCALo *Self__LKU;
+  void **__tmp__FLU,**__tmp__HLU,**Self__LTCC;
+  result__D4J=create_with_capacity__QJK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__B4J)->parent_arrayed_collection__E1H.upper__10K +  1));
+  Self__LKU=((__FAST_ARRAYoITM_LOCALo *)result__D4J);
+  new_capacity__OKU= 0;
+  other_upper__NKU=((__FAST_ARRAYoITM_LOCALo *)tmp__B4J)->parent_arrayed_collection__E1H.upper__10K;
+  if ((other_upper__NKU >=  0)) {
+    new_capacity__OKU=(__INTEGER)(other_upper__NKU +  1);
+    if ((Self__LKU->parent_arrayed_collection__E1H.capacity__XKU < new_capacity__OKU)) {
+      Self__LKU->parent_arrayed_collection__E1H.storage__CLU=create__HRQB(new_capacity__OKU);
+      Self__LKU->parent_arrayed_collection__E1H.capacity__XKU=new_capacity__OKU;
+    };
+    __tmp__FLU=Self__LKU->parent_arrayed_collection__E1H.storage__CLU;
+    __tmp__HLU=((__FAST_ARRAYoITM_LOCALo *)tmp__B4J)->parent_arrayed_collection__E1H.storage__CLU;
+    Self__LTCC=((void **)__tmp__FLU);
+    Self__G5JC=other_upper__NKU;
+    while ((Self__G5JC >=  0)) {
+      Self__LTCC[Self__G5JC]=((void **)__tmp__HLU)[Self__G5JC];
+      Self__G5JC=(__INTEGER)(Self__G5JC -  1);
+    };
+  };
+  Self__LKU->parent_arrayed_collection__E1H.upper__10K=other_upper__NKU;
+  free__WJK(tmp__B4J);
+  return(result__D4J);
 }
 
-static void** create__1SQB(__INTEGER nb_elements__3SQB)
+static void** create__HTQB(__INTEGER nb_elements__JTQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__KT2G,a__PT2G,new_size__LT2G,new_size2__MT2G,a__CU4G;
-  __UINTEGER_32 new_size__DU4G;
-  __POINTER result__JT2G,ptr_table__D4BH,next__C4BH,result__E4BH;
-  void *result__H4BH;
-  __INTEGER Self__O1MC;
-  void **Result__AOTB;
-  sz__KT2G=((__UINTEGER_32 )(__INTEGER)(nb_elements__3SQB * ((__INTEGER )(sizeof(void *)))));
-  result__JT2G=((__POINTER )(NULL));
-  a__PT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__LT2G=(__UINTEGER_32)((__UINTEGER_32)(sz__KT2G + a__PT2G) & (__UINTEGER_32)(~ a__PT2G));
-  new_size2__MT2G=(__UINTEGER_32)(new_size__LT2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__MT2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__CU4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__DU4G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MT2G + a__CU4G) & (__UINTEGER_32)(~ a__CU4G));
-    ptr_table__D4BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DU4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__C4BH=((__POINTER )(NULL));
-    result__E4BH=((__POINTER *)ptr_table__D4BH)[ 0];
-    if ((result__E4BH == (void *)NULL)) {
-      result__E4BH=new_lab__ARJ(new_size__DU4G);
-      next__C4BH=(void *)((unsigned long)result__E4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DU4G)));
-      ((__POINTER *)next__C4BH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__D4BH)[ 0]=next__C4BH;
-    } else {
-      next__C4BH=((__POINTER *)result__E4BH)[ 0];
-      if ((next__C4BH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E4BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__DU4G <<  1)) <=  4096)) {
-          next__C4BH=(void *)((unsigned long)result__E4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DU4G)));
-        } else {
-          next__C4BH=new_lab__ARJ(new_size__DU4G);
-        };
-        ((__POINTER *)next__C4BH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__D4BH)[ 0]=next__C4BH;
-      } else {
-        ((__POINTER *)result__E4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__E4BH=next__C4BH;
-      };
-    };
-    ((__POINTER *)result__E4BH)[ 0]=((__POINTER ) 3);
-    result__JT2G=(void *)((unsigned long)result__E4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__I4CH,a__N4CH,new_size__J4CH,new_size2__K4CH,a__X5EH;
+  __UINTEGER_32 new_size__Y5EH;
+  __POINTER result__H4CH,ptr_table__XKIH,next__WKIH,result__YKIH;
+  void *result__1KIH;
+  __INTEGER Self__01MC;
+  void **Result__MOTB;
+  sz__I4CH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JTQB * ((__INTEGER )(sizeof(void *)))));
+  result__H4CH=((__POINTER )(NULL));
+  a__N4CH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__J4CH=(__UINTEGER_32)((__UINTEGER_32)(sz__I4CH + a__N4CH) & (__UINTEGER_32)(~ a__N4CH));
+  new_size2__K4CH=(__UINTEGER_32)(new_size__J4CH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__K4CH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__X5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__Y5EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__K4CH + a__X5EH) & (__UINTEGER_32)(~ a__X5EH));
+    ptr_table__XKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y5EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__WKIH=((__POINTER )(NULL));
+    result__YKIH=((__POINTER *)ptr_table__XKIH)[ 0];
+    if ((result__YKIH == (void *)NULL)) {
+      result__YKIH=new_lab__MRJ(new_size__Y5EH);
+      next__WKIH=(void *)((unsigned long)result__YKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y5EH)));
+      ((__POINTER *)next__WKIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__XKIH)[ 0]=next__WKIH;
+    } else {
+      next__WKIH=((__POINTER *)result__YKIH)[ 0];
+      if ((next__WKIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Y5EH <<  1)) <=  4096)) {
+          next__WKIH=(void *)((unsigned long)result__YKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y5EH)));
+        } else {
+          next__WKIH=new_lab__MRJ(new_size__Y5EH);
+        };
+        ((__POINTER *)next__WKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XKIH)[ 0]=next__WKIH;
+      } else {
+        ((__POINTER *)result__YKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__YKIH=next__WKIH;
+      };
+    };
+    ((__POINTER *)result__YKIH)[ 0]=((__POINTER ) 3);
+    result__H4CH=(void *)((unsigned long)result__YKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__H4BH=first_free__LDVB;
-    while ((((void *)result__H4BH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__H4BH)->map_size_and_id__2SB &  4294967292LU) < new_size__LT2G))) {
-      result__H4BH=((__MEMORY *)result__H4BH)->map_next_free__3SB;
+    result__1KIH=first_free__XDVB;
+    while ((((void *)result__1KIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1KIH)->map_size_and_id__ITB &  4294967292LU) < new_size__J4CH))) {
+      result__1KIH=((__MEMORY *)result__1KIH)->map_next_free__JTB;
     };
-    if (((void *)result__H4BH == (void *)NULL)) {
-      result__H4BH=new_page__CA5();
+    if (((void *)result__1KIH == (void *)NULL)) {
+      result__1KIH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__H4BH,new_size__LT2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__H4BH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__JT2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__H4BH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__1KIH,new_size__J4CH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1KIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__H4CH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1KIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__AOTB=((void **)result__JT2G);
-  Self__O1MC=(__INTEGER)(nb_elements__3SQB -  1);
-  while ((Self__O1MC >=  0)) {
-    Result__AOTB[Self__O1MC]=NULL;
-    Self__O1MC=(__INTEGER)(Self__O1MC -  1);
+  Result__MOTB=((void **)result__H4CH);
+  Self__01MC=(__INTEGER)(nb_elements__JTQB -  1);
+  while ((Self__01MC >=  0)) {
+    Result__MOTB[Self__01MC]=NULL;
+    Self__01MC=(__INTEGER)(Self__01MC -  1);
   };
-  return(Result__AOTB);
+  return(Result__MOTB);
 }
 
-static void* read_send_msg__A4N(__PARSER *Self__B4N,void *first_arg__C4N)
+static void* read_send_msg__M4N(__PARSER *Self__N4N,void *first_arg__O4N)
 // ({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__E4N,*arg__I4N,*tmp__5NRB;
-  void *n__G4N,*result__HU4G;
-  __INTEGER p1__J4N,p2__K4N,old_derive__L4N,sav_derive__M4N;
-  __INTEGER typ_id__Y45G,typ_id__B55G,typ_id__K55G,Self__H0YC;
-  __INTEGER typ_id__ECR;
-  __POSITION pos__IFTG,p__445G,p__H55G,p__Q55G,p__R4Q;
-  __ITM_READ *result__W45G;
-  __POINTER ptr__X45G,ptr_table__L4BH,next__K4BH,result__M4BH;
-  __POINTER ptr_table__Q4BH,next__P4BH,result__R4BH,ptr__A55G;
-  __POINTER ptr_table__V4BH,next__U4BH,result__W4BH,ptr_table__04BH;
-  __POINTER next__Z4BH,result__14BH,ptr__J55G,ptr_table__54BH;
-  __POINTER next__44BH,result__A5BH,ptr_table__E5BH,next__D5BH;
-  __POINTER result__F5BH,ptr__5BR,ptr_table__J5BH,next__I5BH;
-  __POINTER result__K5BH,ptr_table__O5BH,next__N5BH,result__P5BH;
-  __UINTEGER_32 sz__Z45G,a__045G,new_size__145G,t__245G,a__345G;
-  __UINTEGER_32 new_size__T4BH,lab_type__S4BH,sz__C55G,a__D55G;
-  __UINTEGER_32 new_size__E55G,t__F55G,a__G55G,new_size__34BH;
-  __UINTEGER_32 lab_type__24BH,sz__L55G,a__M55G,new_size__N55G,t__O55G;
-  __UINTEGER_32 a__P55G,new_size__H5BH,lab_type__G5BH,sz__BCR,a__IV4G;
-  __UINTEGER_32 new_size__JV4G,t__NV4G,a__MV4G,new_size__R5BH;
-  __UINTEGER_32 lab_type__Q5BH;
-  __ITM_READ_ARG1 *result__545G;
-  __ITM_READ_ARG2 *result__I55G;
-  __ITM_READ_ARGS *result__4BR;
-  void *l_arg__H4N,*result__BN5G;
-  __FAST_ARRAYoSTRINGo *Self__IU4G,*Self__KU4G;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__CN5G,*Self__DN5G;
-  __BOOLEAN __tmp__GCO;
-  __FAST_ARRAYoITM_CODEo *Self__RCW;
-  result__E4N=NULL;
-  n__G4N=NULL;
-  l_arg__H4N=NULL;
-  arg__I4N=NULL;
-  p1__J4N= 0;
-  p2__K4N= 0;
-  old_derive__L4N= 0;
-  sav_derive__M4N= 0;
-  if (read_identifier__55K()) {
-    p1__J4N=(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD);
-    p2__K4N=position__GBC;
-    old_derive__L4N=short_derive__VBC;
-    result__HU4G=NULL;
-    if ((((__FAST_ARRAYoSTRINGo *)free__VNP)->parent_arrayed_collection__XJC.upper__0JC <  0)) {
-      result__HU4G=create__EBB( 128);
-    } else {
-      Self__IU4G=((__FAST_ARRAYoSTRINGo *)free__VNP);
-      result__HU4G=((void **)Self__IU4G->parent_arrayed_collection__XJC.storage__LGT)[Self__IU4G->parent_arrayed_collection__XJC.upper__0JC];
-      Self__KU4G=((__FAST_ARRAYoSTRINGo *)free__VNP);
-      Self__KU4G->parent_arrayed_collection__XJC.upper__0JC=(__INTEGER)(Self__KU4G->parent_arrayed_collection__XJC.upper__0JC -  1);
-    };
-    n__G4N=result__HU4G;
-    copy__NCS(result__HU4G,last_string__2ZC);
-    result__BN5G=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H)->parent_arrayed_collection__U3H.upper__2VT <  0)) {
-      result__BN5G=create_with_capacity__GVI( 16);
-    } else {
-      Self__CN5G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-      result__BN5G=((void **)Self__CN5G->parent_arrayed_collection__U3H.storage__KAU)[Self__CN5G->parent_arrayed_collection__U3H.upper__2VT];
-      Self__DN5G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__V3H);
-      Self__DN5G->parent_arrayed_collection__U3H.upper__2VT=(__INTEGER)(Self__DN5G->parent_arrayed_collection__U3H.upper__2VT -  1);
-    };
-    l_arg__H4N=result__BN5G;
-    arg__I4N=read_argument__HOP(Self__B4N);
-    if (((void *)arg__I4N != (void *)NULL)) {
-      add_last__I5U(result__BN5G,arg__I4N);
-      while (read_identifier__55K()) {
-        short__token__to__5AD((&__string_131),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-        append__VNS(n__G4N,(&__string_112));
-        append__VNS(n__G4N,last_string__2ZC);
-        arg__I4N=read_argument__HOP(Self__B4N);
-        if (((void *)arg__I4N == (void *)NULL)) {
-          pos__IFTG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_319));
-          put_position__IOG(pos__IFTG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+  void *result__Q4N,*arg__U4N,*tmp__LORB;
+  void *n__S4N,*result__25EH;
+  __INTEGER p1__V4N,p2__W4N,old_derive__X4N,sav_derive__Y4N;
+  __INTEGER typ_id__ELGH,typ_id__NLGH,typ_id__WLGH,Self__T0YC;
+  __INTEGER typ_id__QCR;
+  __POSITION pos__4WYG,p__KLGH,p__TLGH,p__2LGH,p__34Q;
+  __ITM_READ *result__CLGH;
+  __POINTER ptr__DLGH,ptr_table__5KIH,next__4KIH,result__ALIH;
+  __POINTER ptr_table__ELIH,next__DLIH,result__FLIH,ptr__MLGH;
+  __POINTER ptr_table__JLIH,next__ILIH,result__KLIH,ptr_table__OLIH;
+  __POINTER next__NLIH,result__PLIH,ptr__VLGH,ptr_table__TLIH;
+  __POINTER next__SLIH,result__ULIH,ptr_table__YLIH,next__XLIH;
+  __POINTER result__ZLIH,ptr__LCR,ptr_table__3LIH,next__2LIH;
+  __POINTER result__4LIH,ptr_table__CMIH,next__BMIH,result__DMIH;
+  __UINTEGER_32 sz__FLGH,a__GLGH,new_size__HLGH,t__ILGH,a__JLGH;
+  __UINTEGER_32 new_size__HLIH,lab_type__GLIH,sz__OLGH,a__PLGH;
+  __UINTEGER_32 new_size__QLGH,t__RLGH,a__SLGH,new_size__RLIH;
+  __UINTEGER_32 lab_type__QLIH,sz__XLGH,a__YLGH,new_size__ZLGH,t__0LGH;
+  __UINTEGER_32 a__1LGH,new_size__1LIH,lab_type__0LIH,sz__NCR,a__3AFH;
+  __UINTEGER_32 new_size__4AFH,t__CBFH,a__BBFH,new_size__FMIH;
+  __UINTEGER_32 lab_type__EMIH;
+  __ITM_READ_ARG1 *result__LLGH;
+  __ITM_READ_ARG2 *result__ULGH;
+  __ITM_READ_ARGS *result__KCR;
+  void *l_arg__T4N,*result__NZFH;
+  __FAST_ARRAYoSTRINGo *Self__35EH,*Self__55EH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__OZFH,*Self__PZFH;
+  __BOOLEAN __tmp__SCO;
+  __FAST_ARRAYoITM_CODEo *Self__3CW;
+  result__Q4N=NULL;
+  n__S4N=NULL;
+  l_arg__T4N=NULL;
+  arg__U4N=NULL;
+  p1__V4N= 0;
+  p2__W4N= 0;
+  old_derive__X4N= 0;
+  sav_derive__Y4N= 0;
+  if (read_identifier__LAL()) {
+    p1__V4N=(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD);
+    p2__W4N=position__SBC;
+    old_derive__X4N=short_derive__BCC;
+    result__25EH=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__BOP)->parent_arrayed_collection__DKC.upper__GKC <  0)) {
+      result__25EH=create__NBB( 128);
+    } else {
+      Self__35EH=((__FAST_ARRAYoSTRINGo *)free__BOP);
+      result__25EH=((void **)Self__35EH->parent_arrayed_collection__DKC.storage__XGT)[Self__35EH->parent_arrayed_collection__DKC.upper__GKC];
+      Self__55EH=((__FAST_ARRAYoSTRINGo *)free__BOP);
+      Self__55EH->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__55EH->parent_arrayed_collection__DKC.upper__GKC -  1);
+    };
+    n__S4N=result__25EH;
+    copy__ZCS(result__25EH,last_string__I0C);
+    result__NZFH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
+      result__NZFH=create_with_capacity__SVI( 16);
+    } else {
+      Self__OZFH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+      result__NZFH=((void **)Self__OZFH->parent_arrayed_collection__A4H.storage__WAU)[Self__OZFH->parent_arrayed_collection__A4H.upper__IWT];
+      Self__PZFH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
+      Self__PZFH->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__PZFH->parent_arrayed_collection__A4H.upper__IWT -  1);
+    };
+    l_arg__T4N=result__NZFH;
+    arg__U4N=read_argument__TOP(Self__N4N);
+    if (((void *)arg__U4N != (void *)NULL)) {
+      add_last__U5U(result__NZFH,arg__U4N);
+      while (read_identifier__LAL()) {
+        short__token__to__LBD((&__string_131),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        append__BOS(n__S4N,(&__string_112));
+        append__BOS(n__S4N,last_string__I0C);
+        arg__U4N=read_argument__TOP(Self__N4N);
+        if (((void *)arg__U4N == (void *)NULL)) {
+          pos__4WYG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_329));
+          put_position__UOG(pos__4WYG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__I5U(l_arg__H4N,arg__I4N);
-      };
-    };
-    get__2VB(result__HU4G);
-    add_last__URV(free__VNP,result__HU4G);
-    ((__STRING *)result__HU4G)->count__KFC= 0;
-    if (is_shorter__WY) {
-      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__BN5G)->parent_arrayed_collection__FTF.upper__QHL <  0)) || ((void *)first_arg__C4N != (void *)NULL)) || (! fast_has__RDV(short_local__3BC,last_string__2ZC)))) {
-        sav_derive__M4N=short_derive__VBC;
-        short_derive__VBC=old_derive__L4N;
-        short__token__to__5AD((&__string_131),p1__J4N,p2__K4N);
-        short_derive__VBC=(__INTEGER)(sav_derive__M4N + (__INTEGER)(short_derive__VBC - old_derive__L4N));
-      };
-    };
-    if ((((__FAST_ARRAYoITM_CODEo *)result__BN5G)->parent_arrayed_collection__FTF.upper__QHL <  0)) {
-      if (((void *)first_arg__C4N == (void *)NULL)) {
-        p__445G=current_position__3WF();
-        result__W45G=NULL;
-        ptr__X45G=((__POINTER )(NULL));
-        typ_id__Y45G= 0;
-        sz__Z45G=((__UINTEGER_32 )sizeof(__ITM_READ));
-        if ((sz__Z45G ==  0)) {
-          result__W45G=ITM_READ__;
-        } else {
-          typ_id__Y45G=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__Z45G);
-          if ((typ_id__Y45G == (__INTEGER)(-  1))) {
-            a__045G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__145G=(__UINTEGER_32)((__UINTEGER_32)(sz__Z45G + a__045G) & (__UINTEGER_32)(~ a__045G));
-            ptr_table__L4BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__145G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__K4BH=((__POINTER )(NULL));
-            result__M4BH=((__POINTER *)ptr_table__L4BH)[ 0];
-            if ((result__M4BH == (void *)NULL)) {
-              result__M4BH=new_lab__ARJ(new_size__145G);
-              next__K4BH=(void *)((unsigned long)result__M4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__145G)));
-              ((__POINTER *)next__K4BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__L4BH)[ 0]=next__K4BH;
+        add_last__U5U(l_arg__T4N,arg__U4N);
+      };
+    };
+    get__IWB(result__25EH);
+    add_last__ASV(free__BOP,result__25EH);
+    ((__STRING *)result__25EH)->count__WFC= 0;
+    if (is_shorter__5Y) {
+      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__NZFH)->parent_arrayed_collection__RTF.upper__2HL <  0)) || ((void *)first_arg__O4N != (void *)NULL)) || (! fast_has__3DV(short_local__JCC,last_string__I0C)))) {
+        sav_derive__Y4N=short_derive__BCC;
+        short_derive__BCC=old_derive__X4N;
+        short__token__to__LBD((&__string_131),p1__V4N,p2__W4N);
+        short_derive__BCC=(__INTEGER)(sav_derive__Y4N + (__INTEGER)(short_derive__BCC - old_derive__X4N));
+      };
+    };
+    if ((((__FAST_ARRAYoITM_CODEo *)result__NZFH)->parent_arrayed_collection__RTF.upper__2HL <  0)) {
+      if (((void *)first_arg__O4N == (void *)NULL)) {
+        p__KLGH=current_position__JXF();
+        result__CLGH=NULL;
+        ptr__DLGH=((__POINTER )(NULL));
+        typ_id__ELGH= 0;
+        sz__FLGH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__FLGH ==  0)) {
+          result__CLGH=ITM_READ__;
+        } else {
+          typ_id__ELGH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FLGH);
+          if ((typ_id__ELGH == (__INTEGER)(-  1))) {
+            a__GLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__HLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FLGH + a__GLGH) & (__UINTEGER_32)(~ a__GLGH));
+            ptr_table__5KIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__4KIH=((__POINTER )(NULL));
+            result__ALIH=((__POINTER *)ptr_table__5KIH)[ 0];
+            if ((result__ALIH == (void *)NULL)) {
+              result__ALIH=new_lab__MRJ(new_size__HLGH);
+              next__4KIH=(void *)((unsigned long)result__ALIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLGH)));
+              ((__POINTER *)next__4KIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5KIH)[ 0]=next__4KIH;
             } else {
-              next__K4BH=((__POINTER *)result__M4BH)[ 0];
-              if ((next__K4BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M4BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__145G <<  1)) <=  4096)) {
-                  next__K4BH=(void *)((unsigned long)result__M4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__145G)));
+              next__4KIH=((__POINTER *)result__ALIH)[ 0];
+              if ((next__4KIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ALIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HLGH <<  1)) <=  4096)) {
+                  next__4KIH=(void *)((unsigned long)result__ALIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLGH)));
                 } else {
-                  next__K4BH=new_lab__ARJ(new_size__145G);
+                  next__4KIH=new_lab__MRJ(new_size__HLGH);
                 };
-                ((__POINTER *)next__K4BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__L4BH)[ 0]=next__K4BH;
+                ((__POINTER *)next__4KIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5KIH)[ 0]=next__4KIH;
               } else {
-                ((__POINTER *)result__M4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__M4BH=next__K4BH;
+                ((__POINTER *)result__ALIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4KIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ALIH=next__4KIH;
               };
             };
-            ptr__X45G=result__M4BH;
-          } else {
-            t__245G=((__UINTEGER_32 )typ_id__Y45G);
-            a__345G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__T4BH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z45G + a__345G) & (__UINTEGER_32)(~ a__345G));
-            ptr_table__Q4BH=((__POINTER )(&(table_type[(t__245G)])));
-            lab_type__S4BH=(__UINTEGER_32)(t__245G |  1);
-            next__P4BH=((__POINTER )(NULL));
-            result__R4BH=((__POINTER *)ptr_table__Q4BH)[ 0];
-            if ((result__R4BH == (void *)NULL)) {
-              result__R4BH=new_lab__ARJ(lab_type__S4BH);
-              next__P4BH=(void *)((unsigned long)result__R4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T4BH)));
-              ((__POINTER *)next__P4BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Q4BH)[ 0]=next__P4BH;
+            ptr__DLGH=result__ALIH;
+          } else {
+            t__ILGH=((__UINTEGER_32 )typ_id__ELGH);
+            a__JLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__HLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FLGH + a__JLGH) & (__UINTEGER_32)(~ a__JLGH));
+            ptr_table__ELIH=((__POINTER )(&(table_type[(t__ILGH)])));
+            lab_type__GLIH=(__UINTEGER_32)(t__ILGH |  1);
+            next__DLIH=((__POINTER )(NULL));
+            result__FLIH=((__POINTER *)ptr_table__ELIH)[ 0];
+            if ((result__FLIH == (void *)NULL)) {
+              result__FLIH=new_lab__MRJ(lab_type__GLIH);
+              next__DLIH=(void *)((unsigned long)result__FLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLIH)));
+              ((__POINTER *)next__DLIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ELIH)[ 0]=next__DLIH;
             } else {
-              next__P4BH=((__POINTER *)result__R4BH)[ 0];
-              if ((next__P4BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R4BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__T4BH <<  1)) <=  4096)) {
-                  next__P4BH=(void *)((unsigned long)result__R4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T4BH)));
+              next__DLIH=((__POINTER *)result__FLIH)[ 0];
+              if ((next__DLIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FLIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HLIH <<  1)) <=  4096)) {
+                  next__DLIH=(void *)((unsigned long)result__FLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLIH)));
                 } else {
-                  next__P4BH=new_lab__ARJ(lab_type__S4BH);
+                  next__DLIH=new_lab__MRJ(lab_type__GLIH);
                 };
-                ((__POINTER *)next__P4BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__Q4BH)[ 0]=next__P4BH;
+                ((__POINTER *)next__DLIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ELIH)[ 0]=next__DLIH;
               } else {
-                ((__POINTER *)result__R4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__R4BH=next__P4BH;
+                ((__POINTER *)result__FLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__FLIH=next__DLIH;
               };
             };
-            ptr__X45G=result__R4BH;
-          };
-          result__W45G=((__ITM_READ *)ptr__X45G);
-          *(result__W45G) = *(ITM_READ__);
-        };
-        ((__ITM_READ *)result__W45G)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__445G;
-        result__E4N=result__W45G;
-      } else {
-        p__H55G=current_position__3WF();
-        result__545G=NULL;
-        ptr__A55G=((__POINTER )(NULL));
-        typ_id__B55G= 0;
-        sz__C55G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-        if ((sz__C55G ==  0)) {
-          result__545G=ITM_READ_ARG1__;
-        } else {
-          typ_id__B55G=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__C55G);
-          if ((typ_id__B55G == (__INTEGER)(-  1))) {
-            a__D55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__E55G=(__UINTEGER_32)((__UINTEGER_32)(sz__C55G + a__D55G) & (__UINTEGER_32)(~ a__D55G));
-            ptr_table__V4BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E55G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__U4BH=((__POINTER )(NULL));
-            result__W4BH=((__POINTER *)ptr_table__V4BH)[ 0];
-            if ((result__W4BH == (void *)NULL)) {
-              result__W4BH=new_lab__ARJ(new_size__E55G);
-              next__U4BH=(void *)((unsigned long)result__W4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E55G)));
-              ((__POINTER *)next__U4BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__V4BH)[ 0]=next__U4BH;
+            ptr__DLGH=result__FLIH;
+          };
+          result__CLGH=((__ITM_READ *)ptr__DLGH);
+          *(result__CLGH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__CLGH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__KLGH;
+        result__Q4N=result__CLGH;
+      } else {
+        p__TLGH=current_position__JXF();
+        result__LLGH=NULL;
+        ptr__MLGH=((__POINTER )(NULL));
+        typ_id__NLGH= 0;
+        sz__OLGH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__OLGH ==  0)) {
+          result__LLGH=ITM_READ_ARG1__;
+        } else {
+          typ_id__NLGH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OLGH);
+          if ((typ_id__NLGH == (__INTEGER)(-  1))) {
+            a__PLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__QLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OLGH + a__PLGH) & (__UINTEGER_32)(~ a__PLGH));
+            ptr_table__JLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ILIH=((__POINTER )(NULL));
+            result__KLIH=((__POINTER *)ptr_table__JLIH)[ 0];
+            if ((result__KLIH == (void *)NULL)) {
+              result__KLIH=new_lab__MRJ(new_size__QLGH);
+              next__ILIH=(void *)((unsigned long)result__KLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QLGH)));
+              ((__POINTER *)next__ILIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JLIH)[ 0]=next__ILIH;
             } else {
-              next__U4BH=((__POINTER *)result__W4BH)[ 0];
-              if ((next__U4BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W4BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__E55G <<  1)) <=  4096)) {
-                  next__U4BH=(void *)((unsigned long)result__W4BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E55G)));
+              next__ILIH=((__POINTER *)result__KLIH)[ 0];
+              if ((next__ILIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KLIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QLGH <<  1)) <=  4096)) {
+                  next__ILIH=(void *)((unsigned long)result__KLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QLGH)));
                 } else {
-                  next__U4BH=new_lab__ARJ(new_size__E55G);
+                  next__ILIH=new_lab__MRJ(new_size__QLGH);
                 };
-                ((__POINTER *)next__U4BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__V4BH)[ 0]=next__U4BH;
+                ((__POINTER *)next__ILIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JLIH)[ 0]=next__ILIH;
               } else {
-                ((__POINTER *)result__W4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__W4BH=next__U4BH;
+                ((__POINTER *)result__KLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ILIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KLIH=next__ILIH;
               };
             };
-            ptr__A55G=result__W4BH;
-          } else {
-            t__F55G=((__UINTEGER_32 )typ_id__B55G);
-            a__G55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__34BH=(__UINTEGER_32)((__UINTEGER_32)(sz__C55G + a__G55G) & (__UINTEGER_32)(~ a__G55G));
-            ptr_table__04BH=((__POINTER )(&(table_type[(t__F55G)])));
-            lab_type__24BH=(__UINTEGER_32)(t__F55G |  1);
-            next__Z4BH=((__POINTER )(NULL));
-            result__14BH=((__POINTER *)ptr_table__04BH)[ 0];
-            if ((result__14BH == (void *)NULL)) {
-              result__14BH=new_lab__ARJ(lab_type__24BH);
-              next__Z4BH=(void *)((unsigned long)result__14BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34BH)));
-              ((__POINTER *)next__Z4BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__04BH)[ 0]=next__Z4BH;
+            ptr__MLGH=result__KLIH;
+          } else {
+            t__RLGH=((__UINTEGER_32 )typ_id__NLGH);
+            a__SLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OLGH + a__SLGH) & (__UINTEGER_32)(~ a__SLGH));
+            ptr_table__OLIH=((__POINTER )(&(table_type[(t__RLGH)])));
+            lab_type__QLIH=(__UINTEGER_32)(t__RLGH |  1);
+            next__NLIH=((__POINTER )(NULL));
+            result__PLIH=((__POINTER *)ptr_table__OLIH)[ 0];
+            if ((result__PLIH == (void *)NULL)) {
+              result__PLIH=new_lab__MRJ(lab_type__QLIH);
+              next__NLIH=(void *)((unsigned long)result__PLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RLIH)));
+              ((__POINTER *)next__NLIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OLIH)[ 0]=next__NLIH;
             } else {
-              next__Z4BH=((__POINTER *)result__14BH)[ 0];
-              if ((next__Z4BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__14BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__34BH <<  1)) <=  4096)) {
-                  next__Z4BH=(void *)((unsigned long)result__14BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34BH)));
+              next__NLIH=((__POINTER *)result__PLIH)[ 0];
+              if ((next__NLIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PLIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RLIH <<  1)) <=  4096)) {
+                  next__NLIH=(void *)((unsigned long)result__PLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RLIH)));
                 } else {
-                  next__Z4BH=new_lab__ARJ(lab_type__24BH);
+                  next__NLIH=new_lab__MRJ(lab_type__QLIH);
                 };
-                ((__POINTER *)next__Z4BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__04BH)[ 0]=next__Z4BH;
+                ((__POINTER *)next__NLIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OLIH)[ 0]=next__NLIH;
               } else {
-                ((__POINTER *)result__14BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__14BH=next__Z4BH;
+                ((__POINTER *)result__PLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__PLIH=next__NLIH;
               };
             };
-            ptr__A55G=result__14BH;
-          };
-          result__545G=((__ITM_READ_ARG1 *)ptr__A55G);
-          *(result__545G) = *(ITM_READ_ARG1__);
-        };
-        ((__ITM_READ_ARG1 *)result__545G)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__H55G;
-        result__E4N=result__545G;
-      };
-      free__MVI(result__BN5G);
-      __tmp__GCO=TRUE__;
-    } else {
-      __tmp__GCO=FALSE__;
-    };
-    if ((! __tmp__GCO)) {
-      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__BN5G)->parent_arrayed_collection__FTF.upper__QHL +  1) ==  1)) {
-        p__Q55G=current_position__3WF();
-        result__I55G=NULL;
-        ptr__J55G=((__POINTER )(NULL));
-        typ_id__K55G= 0;
-        sz__L55G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
-        if ((sz__L55G ==  0)) {
-          result__I55G=ITM_READ_ARG2__;
-        } else {
-          typ_id__K55G=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__L55G);
-          if ((typ_id__K55G == (__INTEGER)(-  1))) {
-            a__M55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__N55G=(__UINTEGER_32)((__UINTEGER_32)(sz__L55G + a__M55G) & (__UINTEGER_32)(~ a__M55G));
-            ptr_table__54BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N55G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__44BH=((__POINTER )(NULL));
-            result__A5BH=((__POINTER *)ptr_table__54BH)[ 0];
-            if ((result__A5BH == (void *)NULL)) {
-              result__A5BH=new_lab__ARJ(new_size__N55G);
-              next__44BH=(void *)((unsigned long)result__A5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N55G)));
-              ((__POINTER *)next__44BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__54BH)[ 0]=next__44BH;
+            ptr__MLGH=result__PLIH;
+          };
+          result__LLGH=((__ITM_READ_ARG1 *)ptr__MLGH);
+          *(result__LLGH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__LLGH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__TLGH;
+        result__Q4N=result__LLGH;
+      };
+      free__YVI(result__NZFH);
+      __tmp__SCO=TRUE__;
+    } else {
+      __tmp__SCO=FALSE__;
+    };
+    if ((! __tmp__SCO)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__NZFH)->parent_arrayed_collection__RTF.upper__2HL +  1) ==  1)) {
+        p__2LGH=current_position__JXF();
+        result__ULGH=NULL;
+        ptr__VLGH=((__POINTER )(NULL));
+        typ_id__WLGH= 0;
+        sz__XLGH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+        if ((sz__XLGH ==  0)) {
+          result__ULGH=ITM_READ_ARG2__;
+        } else {
+          typ_id__WLGH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XLGH);
+          if ((typ_id__WLGH == (__INTEGER)(-  1))) {
+            a__YLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ZLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XLGH + a__YLGH) & (__UINTEGER_32)(~ a__YLGH));
+            ptr_table__TLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__SLIH=((__POINTER )(NULL));
+            result__ULIH=((__POINTER *)ptr_table__TLIH)[ 0];
+            if ((result__ULIH == (void *)NULL)) {
+              result__ULIH=new_lab__MRJ(new_size__ZLGH);
+              next__SLIH=(void *)((unsigned long)result__ULIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZLGH)));
+              ((__POINTER *)next__SLIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TLIH)[ 0]=next__SLIH;
             } else {
-              next__44BH=((__POINTER *)result__A5BH)[ 0];
-              if ((next__44BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A5BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__N55G <<  1)) <=  4096)) {
-                  next__44BH=(void *)((unsigned long)result__A5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N55G)));
+              next__SLIH=((__POINTER *)result__ULIH)[ 0];
+              if ((next__SLIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ULIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZLGH <<  1)) <=  4096)) {
+                  next__SLIH=(void *)((unsigned long)result__ULIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZLGH)));
                 } else {
-                  next__44BH=new_lab__ARJ(new_size__N55G);
+                  next__SLIH=new_lab__MRJ(new_size__ZLGH);
                 };
-                ((__POINTER *)next__44BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__54BH)[ 0]=next__44BH;
+                ((__POINTER *)next__SLIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TLIH)[ 0]=next__SLIH;
               } else {
-                ((__POINTER *)result__A5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__A5BH=next__44BH;
+                ((__POINTER *)result__ULIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ULIH=next__SLIH;
               };
             };
-            ptr__J55G=result__A5BH;
-          } else {
-            t__O55G=((__UINTEGER_32 )typ_id__K55G);
-            a__P55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__H5BH=(__UINTEGER_32)((__UINTEGER_32)(sz__L55G + a__P55G) & (__UINTEGER_32)(~ a__P55G));
-            ptr_table__E5BH=((__POINTER )(&(table_type[(t__O55G)])));
-            lab_type__G5BH=(__UINTEGER_32)(t__O55G |  1);
-            next__D5BH=((__POINTER )(NULL));
-            result__F5BH=((__POINTER *)ptr_table__E5BH)[ 0];
-            if ((result__F5BH == (void *)NULL)) {
-              result__F5BH=new_lab__ARJ(lab_type__G5BH);
-              next__D5BH=(void *)((unsigned long)result__F5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H5BH)));
-              ((__POINTER *)next__D5BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__E5BH)[ 0]=next__D5BH;
+            ptr__VLGH=result__ULIH;
+          } else {
+            t__0LGH=((__UINTEGER_32 )typ_id__WLGH);
+            a__1LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__1LIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XLGH + a__1LGH) & (__UINTEGER_32)(~ a__1LGH));
+            ptr_table__YLIH=((__POINTER )(&(table_type[(t__0LGH)])));
+            lab_type__0LIH=(__UINTEGER_32)(t__0LGH |  1);
+            next__XLIH=((__POINTER )(NULL));
+            result__ZLIH=((__POINTER *)ptr_table__YLIH)[ 0];
+            if ((result__ZLIH == (void *)NULL)) {
+              result__ZLIH=new_lab__MRJ(lab_type__0LIH);
+              next__XLIH=(void *)((unsigned long)result__ZLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LIH)));
+              ((__POINTER *)next__XLIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YLIH)[ 0]=next__XLIH;
             } else {
-              next__D5BH=((__POINTER *)result__F5BH)[ 0];
-              if ((next__D5BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F5BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__H5BH <<  1)) <=  4096)) {
-                  next__D5BH=(void *)((unsigned long)result__F5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H5BH)));
+              next__XLIH=((__POINTER *)result__ZLIH)[ 0];
+              if ((next__XLIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZLIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1LIH <<  1)) <=  4096)) {
+                  next__XLIH=(void *)((unsigned long)result__ZLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LIH)));
                 } else {
-                  next__D5BH=new_lab__ARJ(lab_type__G5BH);
+                  next__XLIH=new_lab__MRJ(lab_type__0LIH);
                 };
-                ((__POINTER *)next__D5BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__E5BH)[ 0]=next__D5BH;
+                ((__POINTER *)next__XLIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YLIH)[ 0]=next__XLIH;
               } else {
-                ((__POINTER *)result__F5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__F5BH=next__D5BH;
+                ((__POINTER *)result__ZLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZLIH=next__XLIH;
               };
             };
-            ptr__J55G=result__F5BH;
-          };
-          result__I55G=((__ITM_READ_ARG2 *)ptr__J55G);
-          *(result__I55G) = *(ITM_READ_ARG2__);
-        };
-        ((__ITM_READ_ARG2 *)result__I55G)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__Q55G;
-        result__E4N=result__I55G;
-        free__MVI(result__BN5G);
-      } else {
-        Self__RCW=((__FAST_ARRAYoITM_CODEo *)result__BN5G);
-        add_last__I5U(Self__RCW,first_arg__C4N);
-        if ((Self__RCW->parent_arrayed_collection__FTF.upper__QHL !=  0)) {
-          if ((Self__RCW->parent_arrayed_collection__FTF.upper__QHL ==  1)) {
-            tmp__5NRB=((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[ 0];
-            ((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[ 0]=((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[ 1];
-            ((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[ 1]=tmp__5NRB;
-          } else {
-            Self__H0YC=(__INTEGER)(Self__RCW->parent_arrayed_collection__FTF.upper__QHL -  1);
-            while ((Self__H0YC >=  0)) {
-              ((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[(__INTEGER)(Self__H0YC +  1)]=((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[Self__H0YC];
-              ((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[Self__H0YC]=NULL;
-              Self__H0YC=(__INTEGER)(Self__H0YC -  1);
-            };
-            ((void **)Self__RCW->parent_arrayed_collection__FTF.storage__ZXT)[ 0]=first_arg__C4N;
-          };
-        };
-        l_arg__H4N=copy__E5H(result__BN5G);
-        p__R4Q=current_position__3WF();
-        result__4BR=NULL;
-        ptr__5BR=((__POINTER )(NULL));
-        typ_id__ECR= 0;
-        sz__BCR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
-        if ((sz__BCR ==  0)) {
-          result__4BR=ITM_READ_ARGS__;
-        } else {
-          typ_id__ECR=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__BCR);
-          if ((typ_id__ECR == (__INTEGER)(-  1))) {
-            a__IV4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__JV4G=(__UINTEGER_32)((__UINTEGER_32)(sz__BCR + a__IV4G) & (__UINTEGER_32)(~ a__IV4G));
-            ptr_table__J5BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JV4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__I5BH=((__POINTER )(NULL));
-            result__K5BH=((__POINTER *)ptr_table__J5BH)[ 0];
-            if ((result__K5BH == (void *)NULL)) {
-              result__K5BH=new_lab__ARJ(new_size__JV4G);
-              next__I5BH=(void *)((unsigned long)result__K5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JV4G)));
-              ((__POINTER *)next__I5BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__J5BH)[ 0]=next__I5BH;
+            ptr__VLGH=result__ZLIH;
+          };
+          result__ULGH=((__ITM_READ_ARG2 *)ptr__VLGH);
+          *(result__ULGH) = *(ITM_READ_ARG2__);
+        };
+        ((__ITM_READ_ARG2 *)result__ULGH)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__2LGH;
+        result__Q4N=result__ULGH;
+        free__YVI(result__NZFH);
+      } else {
+        Self__3CW=((__FAST_ARRAYoITM_CODEo *)result__NZFH);
+        add_last__U5U(Self__3CW,first_arg__O4N);
+        if ((Self__3CW->parent_arrayed_collection__RTF.upper__2HL !=  0)) {
+          if ((Self__3CW->parent_arrayed_collection__RTF.upper__2HL ==  1)) {
+            tmp__LORB=((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 0];
+            ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 0]=((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 1];
+            ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 1]=tmp__LORB;
+          } else {
+            Self__T0YC=(__INTEGER)(Self__3CW->parent_arrayed_collection__RTF.upper__2HL -  1);
+            while ((Self__T0YC >=  0)) {
+              ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[(__INTEGER)(Self__T0YC +  1)]=((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[Self__T0YC];
+              ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[Self__T0YC]=NULL;
+              Self__T0YC=(__INTEGER)(Self__T0YC -  1);
+            };
+            ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 0]=first_arg__O4N;
+          };
+        };
+        l_arg__T4N=copy__Q5H(result__NZFH);
+        p__34Q=current_position__JXF();
+        result__KCR=NULL;
+        ptr__LCR=((__POINTER )(NULL));
+        typ_id__QCR= 0;
+        sz__NCR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
+        if ((sz__NCR ==  0)) {
+          result__KCR=ITM_READ_ARGS__;
+        } else {
+          typ_id__QCR=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NCR);
+          if ((typ_id__QCR == (__INTEGER)(-  1))) {
+            a__3AFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__4AFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NCR + a__3AFH) & (__UINTEGER_32)(~ a__3AFH));
+            ptr_table__3LIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4AFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__2LIH=((__POINTER )(NULL));
+            result__4LIH=((__POINTER *)ptr_table__3LIH)[ 0];
+            if ((result__4LIH == (void *)NULL)) {
+              result__4LIH=new_lab__MRJ(new_size__4AFH);
+              next__2LIH=(void *)((unsigned long)result__4LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4AFH)));
+              ((__POINTER *)next__2LIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3LIH)[ 0]=next__2LIH;
             } else {
-              next__I5BH=((__POINTER *)result__K5BH)[ 0];
-              if ((next__I5BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K5BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JV4G <<  1)) <=  4096)) {
-                  next__I5BH=(void *)((unsigned long)result__K5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JV4G)));
+              next__2LIH=((__POINTER *)result__4LIH)[ 0];
+              if ((next__2LIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4LIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4AFH <<  1)) <=  4096)) {
+                  next__2LIH=(void *)((unsigned long)result__4LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4AFH)));
                 } else {
-                  next__I5BH=new_lab__ARJ(new_size__JV4G);
+                  next__2LIH=new_lab__MRJ(new_size__4AFH);
                 };
-                ((__POINTER *)next__I5BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__J5BH)[ 0]=next__I5BH;
+                ((__POINTER *)next__2LIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3LIH)[ 0]=next__2LIH;
               } else {
-                ((__POINTER *)result__K5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__K5BH=next__I5BH;
+                ((__POINTER *)result__4LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2LIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4LIH=next__2LIH;
               };
             };
-            ptr__5BR=result__K5BH;
-          } else {
-            t__NV4G=((__UINTEGER_32 )typ_id__ECR);
-            a__MV4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__R5BH=(__UINTEGER_32)((__UINTEGER_32)(sz__BCR + a__MV4G) & (__UINTEGER_32)(~ a__MV4G));
-            ptr_table__O5BH=((__POINTER )(&(table_type[(t__NV4G)])));
-            lab_type__Q5BH=(__UINTEGER_32)(t__NV4G |  1);
-            next__N5BH=((__POINTER )(NULL));
-            result__P5BH=((__POINTER *)ptr_table__O5BH)[ 0];
-            if ((result__P5BH == (void *)NULL)) {
-              result__P5BH=new_lab__ARJ(lab_type__Q5BH);
-              next__N5BH=(void *)((unsigned long)result__P5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R5BH)));
-              ((__POINTER *)next__N5BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__O5BH)[ 0]=next__N5BH;
+            ptr__LCR=result__4LIH;
+          } else {
+            t__CBFH=((__UINTEGER_32 )typ_id__QCR);
+            a__BBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NCR + a__BBFH) & (__UINTEGER_32)(~ a__BBFH));
+            ptr_table__CMIH=((__POINTER )(&(table_type[(t__CBFH)])));
+            lab_type__EMIH=(__UINTEGER_32)(t__CBFH |  1);
+            next__BMIH=((__POINTER )(NULL));
+            result__DMIH=((__POINTER *)ptr_table__CMIH)[ 0];
+            if ((result__DMIH == (void *)NULL)) {
+              result__DMIH=new_lab__MRJ(lab_type__EMIH);
+              next__BMIH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMIH)));
+              ((__POINTER *)next__BMIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CMIH)[ 0]=next__BMIH;
             } else {
-              next__N5BH=((__POINTER *)result__P5BH)[ 0];
-              if ((next__N5BH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P5BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__R5BH <<  1)) <=  4096)) {
-                  next__N5BH=(void *)((unsigned long)result__P5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R5BH)));
+              next__BMIH=((__POINTER *)result__DMIH)[ 0];
+              if ((next__BMIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FMIH <<  1)) <=  4096)) {
+                  next__BMIH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMIH)));
                 } else {
-                  next__N5BH=new_lab__ARJ(lab_type__Q5BH);
+                  next__BMIH=new_lab__MRJ(lab_type__EMIH);
                 };
-                ((__POINTER *)next__N5BH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__O5BH)[ 0]=next__N5BH;
+                ((__POINTER *)next__BMIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CMIH)[ 0]=next__BMIH;
               } else {
-                ((__POINTER *)result__P5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__P5BH=next__N5BH;
+                ((__POINTER *)result__DMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__DMIH=next__BMIH;
               };
             };
-            ptr__5BR=result__P5BH;
+            ptr__LCR=result__DMIH;
           };
-          result__4BR=((__ITM_READ_ARGS *)ptr__5BR);
-          *(result__4BR) = *(ITM_READ_ARGS__);
+          result__KCR=((__ITM_READ_ARGS *)ptr__LCR);
+          *(result__KCR) = *(ITM_READ_ARGS__);
         };
-        ((__ITM_READ_ARGS *)result__4BR)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__R4Q;
-        result__E4N=result__4BR;
+        ((__ITM_READ_ARGS *)result__KCR)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__34Q;
+        result__Q4N=result__KCR;
       };
     };
   };
-  return(result__E4N);
+  return(result__Q4N);
 }
 
-static void* readlip_expr_cmp__U01B(__PARSER *Self__V01B)
+static void* readlip_expr_cmp__A11B(__PARSER *Self__B11B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *right__Y01B,*result__X01B;
-  void *op__Z01B;
-  __POSITION pos__BITG,p__RTBD;
-  __STRING_CONSTANT *Self__BSBD;
-  __LIP_BINARY *result__HHGD,*Self__TWSD;
-  __POINTER ptr__IHGD,ptr_table__T5BH,next__S5BH,result__U5BH;
-  __POINTER ptr_table__Y5BH,next__X5BH,result__Z5BH;
-  __INTEGER typ_id__NHGD;
-  __UINTEGER_32 sz__KHGD,a__YV4G,new_size__ZV4G,t__3V4G,a__2V4G;
-  __UINTEGER_32 new_size__15BH,lab_type__05BH;
-  __CHARACTER type__001B;
-  right__Y01B=NULL;
-  op__Z01B=NULL;
-  type__001B='\0';
-  result__X01B=readlip_expr_binary__RN3B(Self__V01B);
-  if (((void *)result__X01B != (void *)NULL)) {
-    while ((((((read_symbol__XWJ((&__string_19)) || read_symbol__XWJ((&__string_21))) || read_symbol__XWJ((&__string_17))) || read_symbol__XWJ((&__string_16))) || read_symbol__XWJ((&__string_18))) || read_symbol__XWJ((&__string_20)))) {
-      op__Z01B=last_string__2ZC;
-      right__Y01B=readlip_expr_binary__RN3B(Self__V01B);
-      if (((void *)right__Y01B == (void *)NULL)) {
-        pos__BITG=current_position__3WF();
-        put_error__text__4MG( 0,(&__string_227));
-        put_position__IOG(pos__BITG);
-        put_string__I1F(msg_err__DNG);
-        if ((type_error__CNG !=  2)) {
+  void *right__E11B,*result__D11B;
+  void *op__F11B;
+  __POSITION pos__1ZYG,p__3TBD;
+  __STRING_CONSTANT *Self__NSBD;
+  __LIP_BINARY *result__THGD,*Self__5WSD;
+  __POINTER ptr__UHGD,ptr_table__HMIH,next__GMIH,result__IMIH;
+  __POINTER ptr_table__MMIH,next__LMIH,result__NMIH;
+  __INTEGER typ_id__ZHGD;
+  __UINTEGER_32 sz__WHGD,a__NBFH,new_size__OBFH,t__SBFH,a__RBFH;
+  __UINTEGER_32 new_size__PMIH,lab_type__OMIH;
+  __CHARACTER type__G11B;
+  right__E11B=NULL;
+  op__F11B=NULL;
+  type__G11B='\0';
+  result__D11B=readlip_expr_binary__3N3B(Self__B11B);
+  if (((void *)result__D11B != (void *)NULL)) {
+    while ((((((read_symbol__DXJ((&__string_19)) || read_symbol__DXJ((&__string_21))) || read_symbol__DXJ((&__string_17))) || read_symbol__DXJ((&__string_16))) || read_symbol__DXJ((&__string_18))) || read_symbol__DXJ((&__string_20)))) {
+      op__F11B=last_string__I0C;
+      right__E11B=readlip_expr_binary__3N3B(Self__B11B);
+      if (((void *)right__E11B == (void *)NULL)) {
+        pos__1ZYG=current_position__JXF();
+        put_error__text__KNG( 0,(&__string_237));
+        put_position__UOG(pos__1ZYG);
+        put_string__U1F(msg_err__PNG);
+        if ((type_error__ONG !=  2)) {
           exit(( 1));
         };
       };
-      Self__BSBD=((__STRING_CONSTANT *)op__Z01B);
-      if (((void *)Self__BSBD == (void *)(&__string_19))) {
-        type__001B='S';
-      };
-      if (((void *)Self__BSBD == (void *)(&__string_21))) {
-        type__001B='I';
-      };
-      if (((void *)Self__BSBD == (void *)(&__string_17))) {
-        type__001B='E';
-      };
-      if (((void *)Self__BSBD == (void *)(&__string_16))) {
-        type__001B='=';
-      };
-      if (((void *)Self__BSBD == (void *)(&__string_18))) {
-        type__001B='>';
-      };
-      if (((void *)Self__BSBD == (void *)(&__string_20))) {
-        type__001B='<';
-      };
-      p__RTBD=current_position__3WF();
-      result__HHGD=NULL;
-      ptr__IHGD=((__POINTER )(NULL));
-      typ_id__NHGD= 0;
-      sz__KHGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-      if ((sz__KHGD ==  0)) {
-        result__HHGD=LIP_BINARY__;
-      } else {
-        typ_id__NHGD=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__KHGD);
-        if ((typ_id__NHGD == (__INTEGER)(-  1))) {
-          a__YV4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ZV4G=(__UINTEGER_32)((__UINTEGER_32)(sz__KHGD + a__YV4G) & (__UINTEGER_32)(~ a__YV4G));
-          ptr_table__T5BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZV4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__S5BH=((__POINTER )(NULL));
-          result__U5BH=((__POINTER *)ptr_table__T5BH)[ 0];
-          if ((result__U5BH == (void *)NULL)) {
-            result__U5BH=new_lab__ARJ(new_size__ZV4G);
-            next__S5BH=(void *)((unsigned long)result__U5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZV4G)));
-            ((__POINTER *)next__S5BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__T5BH)[ 0]=next__S5BH;
-          } else {
-            next__S5BH=((__POINTER *)result__U5BH)[ 0];
-            if ((next__S5BH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U5BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__ZV4G <<  1)) <=  4096)) {
-                next__S5BH=(void *)((unsigned long)result__U5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZV4G)));
+      Self__NSBD=((__STRING_CONSTANT *)op__F11B);
+      if (((void *)Self__NSBD == (void *)(&__string_19))) {
+        type__G11B='S';
+      };
+      if (((void *)Self__NSBD == (void *)(&__string_21))) {
+        type__G11B='I';
+      };
+      if (((void *)Self__NSBD == (void *)(&__string_17))) {
+        type__G11B='E';
+      };
+      if (((void *)Self__NSBD == (void *)(&__string_16))) {
+        type__G11B='=';
+      };
+      if (((void *)Self__NSBD == (void *)(&__string_18))) {
+        type__G11B='>';
+      };
+      if (((void *)Self__NSBD == (void *)(&__string_20))) {
+        type__G11B='<';
+      };
+      p__3TBD=current_position__JXF();
+      result__THGD=NULL;
+      ptr__UHGD=((__POINTER )(NULL));
+      typ_id__ZHGD= 0;
+      sz__WHGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+      if ((sz__WHGD ==  0)) {
+        result__THGD=LIP_BINARY__;
+      } else {
+        typ_id__ZHGD=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WHGD);
+        if ((typ_id__ZHGD == (__INTEGER)(-  1))) {
+          a__NBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__WHGD + a__NBFH) & (__UINTEGER_32)(~ a__NBFH));
+          ptr_table__HMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__GMIH=((__POINTER )(NULL));
+          result__IMIH=((__POINTER *)ptr_table__HMIH)[ 0];
+          if ((result__IMIH == (void *)NULL)) {
+            result__IMIH=new_lab__MRJ(new_size__OBFH);
+            next__GMIH=(void *)((unsigned long)result__IMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBFH)));
+            ((__POINTER *)next__GMIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HMIH)[ 0]=next__GMIH;
+          } else {
+            next__GMIH=((__POINTER *)result__IMIH)[ 0];
+            if ((next__GMIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OBFH <<  1)) <=  4096)) {
+                next__GMIH=(void *)((unsigned long)result__IMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBFH)));
               } else {
-                next__S5BH=new_lab__ARJ(new_size__ZV4G);
+                next__GMIH=new_lab__MRJ(new_size__OBFH);
               };
-              ((__POINTER *)next__S5BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__T5BH)[ 0]=next__S5BH;
+              ((__POINTER *)next__GMIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HMIH)[ 0]=next__GMIH;
             } else {
-              ((__POINTER *)result__U5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__U5BH=next__S5BH;
-            };
-          };
-          ptr__IHGD=result__U5BH;
-        } else {
-          t__3V4G=((__UINTEGER_32 )typ_id__NHGD);
-          a__2V4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__15BH=(__UINTEGER_32)((__UINTEGER_32)(sz__KHGD + a__2V4G) & (__UINTEGER_32)(~ a__2V4G));
-          ptr_table__Y5BH=((__POINTER )(&(table_type[(t__3V4G)])));
-          lab_type__05BH=(__UINTEGER_32)(t__3V4G |  1);
-          next__X5BH=((__POINTER )(NULL));
-          result__Z5BH=((__POINTER *)ptr_table__Y5BH)[ 0];
-          if ((result__Z5BH == (void *)NULL)) {
-            result__Z5BH=new_lab__ARJ(lab_type__05BH);
-            next__X5BH=(void *)((unsigned long)result__Z5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__15BH)));
-            ((__POINTER *)next__X5BH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__Y5BH)[ 0]=next__X5BH;
-          } else {
-            next__X5BH=((__POINTER *)result__Z5BH)[ 0];
-            if ((next__X5BH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z5BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__15BH <<  1)) <=  4096)) {
-                next__X5BH=(void *)((unsigned long)result__Z5BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__15BH)));
+              ((__POINTER *)result__IMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__IMIH=next__GMIH;
+            };
+          };
+          ptr__UHGD=result__IMIH;
+        } else {
+          t__SBFH=((__UINTEGER_32 )typ_id__ZHGD);
+          a__RBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__PMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WHGD + a__RBFH) & (__UINTEGER_32)(~ a__RBFH));
+          ptr_table__MMIH=((__POINTER )(&(table_type[(t__SBFH)])));
+          lab_type__OMIH=(__UINTEGER_32)(t__SBFH |  1);
+          next__LMIH=((__POINTER )(NULL));
+          result__NMIH=((__POINTER *)ptr_table__MMIH)[ 0];
+          if ((result__NMIH == (void *)NULL)) {
+            result__NMIH=new_lab__MRJ(lab_type__OMIH);
+            next__LMIH=(void *)((unsigned long)result__NMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMIH)));
+            ((__POINTER *)next__LMIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MMIH)[ 0]=next__LMIH;
+          } else {
+            next__LMIH=((__POINTER *)result__NMIH)[ 0];
+            if ((next__LMIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PMIH <<  1)) <=  4096)) {
+                next__LMIH=(void *)((unsigned long)result__NMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMIH)));
               } else {
-                next__X5BH=new_lab__ARJ(lab_type__05BH);
+                next__LMIH=new_lab__MRJ(lab_type__OMIH);
               };
-              ((__POINTER *)next__X5BH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Y5BH)[ 0]=next__X5BH;
+              ((__POINTER *)next__LMIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MMIH)[ 0]=next__LMIH;
             } else {
-              ((__POINTER *)result__Z5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__Z5BH=next__X5BH;
+              ((__POINTER *)result__NMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__NMIH=next__LMIH;
             };
           };
-          ptr__IHGD=result__Z5BH;
+          ptr__UHGD=result__NMIH;
         };
-        result__HHGD=((__LIP_BINARY *)ptr__IHGD);
-        *(result__HHGD) = *(LIP_BINARY__);
+        result__THGD=((__LIP_BINARY *)ptr__UHGD);
+        *(result__THGD) = *(LIP_BINARY__);
       };
-      Self__TWSD=((__LIP_BINARY *)result__HHGD);
-      Self__TWSD->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ=p__RTBD;
-      Self__TWSD->left__AZQD=result__X01B;
-      Self__TWSD->right__DZQD=right__Y01B;
-      Self__TWSD->operator__GZQD=type__001B;
-      result__X01B=result__HHGD;
+      Self__5WSD=((__LIP_BINARY *)result__THGD);
+      Self__5WSD->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__3TBD;
+      Self__5WSD->left__MZQD=result__D11B;
+      Self__5WSD->right__PZQD=right__E11B;
+      Self__5WSD->operator__SZQD=type__G11B;
+      result__D11B=result__THGD;
     };
   };
-  return(result__X01B);
+  return(result__D11B);
 }
 
-static void** create__LFIE(__INTEGER nb_elements__NFIE)
+static void** create__UUIE(__INTEGER nb_elements__WUIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__JV2G,a__OV2G,new_size__KV2G,new_size2__LV2G,a__IW4G;
-  __UINTEGER_32 new_size__JW4G;
-  __POINTER result__IV2G,ptr_table__35BH,next__25BH,result__45BH;
-  void *result__BACH;
-  __INTEGER Self__FKXE;
-  void **Result__5FNE;
-  sz__JV2G=((__UINTEGER_32 )(__INTEGER)(nb_elements__NFIE * ((__INTEGER )(sizeof(void *)))));
-  result__IV2G=((__POINTER )(NULL));
-  a__OV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__KV2G=(__UINTEGER_32)((__UINTEGER_32)(sz__JV2G + a__OV2G) & (__UINTEGER_32)(~ a__OV2G));
-  new_size2__LV2G=(__UINTEGER_32)(new_size__KV2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__LV2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__IW4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__JW4G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LV2G + a__IW4G) & (__UINTEGER_32)(~ a__IW4G));
-    ptr_table__35BH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JW4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__25BH=((__POINTER )(NULL));
-    result__45BH=((__POINTER *)ptr_table__35BH)[ 0];
-    if ((result__45BH == (void *)NULL)) {
-      result__45BH=new_lab__ARJ(new_size__JW4G);
-      next__25BH=(void *)((unsigned long)result__45BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JW4G)));
-      ((__POINTER *)next__25BH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__35BH)[ 0]=next__25BH;
-    } else {
-      next__25BH=((__POINTER *)result__45BH)[ 0];
-      if ((next__25BH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__45BH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__JW4G <<  1)) <=  4096)) {
-          next__25BH=(void *)((unsigned long)result__45BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JW4G)));
-        } else {
-          next__25BH=new_lab__ARJ(new_size__JW4G);
-        };
-        ((__POINTER *)next__25BH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__35BH)[ 0]=next__25BH;
-      } else {
-        ((__POINTER *)result__45BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__25BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__45BH=next__25BH;
-      };
-    };
-    ((__POINTER *)result__45BH)[ 0]=((__POINTER ) 3);
-    result__IV2G=(void *)((unsigned long)result__45BH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__HADH,a__MADH,new_size__IADH,new_size2__JADH,a__3BFH;
+  __UINTEGER_32 new_size__4BFH;
+  __POINTER result__GADH,ptr_table__RMIH,next__QMIH,result__SMIH;
+  void *result__VMIH;
+  __INTEGER Self__25XE;
+  void **Result__BWNE;
+  sz__HADH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WUIE * ((__INTEGER )(sizeof(void *)))));
+  result__GADH=((__POINTER )(NULL));
+  a__MADH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__IADH=(__UINTEGER_32)((__UINTEGER_32)(sz__HADH + a__MADH) & (__UINTEGER_32)(~ a__MADH));
+  new_size2__JADH=(__UINTEGER_32)(new_size__IADH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__JADH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3BFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4BFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__JADH + a__3BFH) & (__UINTEGER_32)(~ a__3BFH));
+    ptr_table__RMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4BFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__QMIH=((__POINTER )(NULL));
+    result__SMIH=((__POINTER *)ptr_table__RMIH)[ 0];
+    if ((result__SMIH == (void *)NULL)) {
+      result__SMIH=new_lab__MRJ(new_size__4BFH);
+      next__QMIH=(void *)((unsigned long)result__SMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4BFH)));
+      ((__POINTER *)next__QMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__RMIH)[ 0]=next__QMIH;
+    } else {
+      next__QMIH=((__POINTER *)result__SMIH)[ 0];
+      if ((next__QMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4BFH <<  1)) <=  4096)) {
+          next__QMIH=(void *)((unsigned long)result__SMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4BFH)));
+        } else {
+          next__QMIH=new_lab__MRJ(new_size__4BFH);
+        };
+        ((__POINTER *)next__QMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RMIH)[ 0]=next__QMIH;
+      } else {
+        ((__POINTER *)result__SMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__SMIH=next__QMIH;
+      };
+    };
+    ((__POINTER *)result__SMIH)[ 0]=((__POINTER ) 3);
+    result__GADH=(void *)((unsigned long)result__SMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__BACH=first_free__LDVB;
-    while ((((void *)result__BACH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BACH)->map_size_and_id__2SB &  4294967292LU) < new_size__KV2G))) {
-      result__BACH=((__MEMORY *)result__BACH)->map_next_free__3SB;
+    result__VMIH=first_free__XDVB;
+    while ((((void *)result__VMIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VMIH)->map_size_and_id__ITB &  4294967292LU) < new_size__IADH))) {
+      result__VMIH=((__MEMORY *)result__VMIH)->map_next_free__JTB;
     };
-    if (((void *)result__BACH == (void *)NULL)) {
-      result__BACH=new_page__CA5();
+    if (((void *)result__VMIH == (void *)NULL)) {
+      result__VMIH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__BACH,new_size__KV2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BACH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__IV2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BACH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__VMIH,new_size__IADH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VMIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__GADH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VMIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__5FNE=((void **)result__IV2G);
-  Self__FKXE=(__INTEGER)(nb_elements__NFIE -  1);
-  while ((Self__FKXE >=  0)) {
-    Result__5FNE[Self__FKXE]=NULL;
-    Self__FKXE=(__INTEGER)(Self__FKXE -  1);
+  Result__BWNE=((void **)result__GADH);
+  Self__25XE=(__INTEGER)(nb_elements__WUIE -  1);
+  while ((Self__25XE >=  0)) {
+    Result__BWNE[Self__25XE]=NULL;
+    Self__25XE=(__INTEGER)(Self__25XE -  1);
   };
-  return(Result__5FNE);
+  return(Result__BWNE);
 }
 
-static void** create__1QQB(__INTEGER nb_elements__3QQB)
+static void** create__HRQB(__INTEGER nb_elements__JRQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__0V2G,a__5V2G,new_size__1V2G,new_size2__2V2G,a__HX4G;
-  __UINTEGER_32 new_size__IX4G;
-  __POINTER result__ZV2G,ptr_table__FACH,next__EACH,result__GACH;
-  void *result__JACH;
-  __INTEGER Self__H0MC;
-  void **Result__XKTB;
-  sz__0V2G=((__UINTEGER_32 )(__INTEGER)(nb_elements__3QQB * ((__INTEGER )(sizeof(void *)))));
-  result__ZV2G=((__POINTER )(NULL));
-  a__5V2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__1V2G=(__UINTEGER_32)((__UINTEGER_32)(sz__0V2G + a__5V2G) & (__UINTEGER_32)(~ a__5V2G));
-  new_size2__2V2G=(__UINTEGER_32)(new_size__1V2G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__2V2G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__HX4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__IX4G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2V2G + a__HX4G) & (__UINTEGER_32)(~ a__HX4G));
-    ptr_table__FACH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IX4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__EACH=((__POINTER )(NULL));
-    result__GACH=((__POINTER *)ptr_table__FACH)[ 0];
-    if ((result__GACH == (void *)NULL)) {
-      result__GACH=new_lab__ARJ(new_size__IX4G);
-      next__EACH=(void *)((unsigned long)result__GACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IX4G)));
-      ((__POINTER *)next__EACH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__FACH)[ 0]=next__EACH;
-    } else {
-      next__EACH=((__POINTER *)result__GACH)[ 0];
-      if ((next__EACH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GACH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__IX4G <<  1)) <=  4096)) {
-          next__EACH=(void *)((unsigned long)result__GACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IX4G)));
-        } else {
-          next__EACH=new_lab__ARJ(new_size__IX4G);
-        };
-        ((__POINTER *)next__EACH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FACH)[ 0]=next__EACH;
-      } else {
-        ((__POINTER *)result__GACH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EACH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__GACH=next__EACH;
-      };
-    };
-    ((__POINTER *)result__GACH)[ 0]=((__POINTER ) 3);
-    result__ZV2G=(void *)((unsigned long)result__GACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__YADH,a__3ADH,new_size__ZADH,new_size2__0ADH,a__2CFH;
+  __UINTEGER_32 new_size__3CFH;
+  __POINTER result__XADH,ptr_table__ZMIH,next__YMIH,result__0MIH;
+  void *result__3MIH;
+  __INTEGER Self__T0MC;
+  void **Result__DLTB;
+  sz__YADH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JRQB * ((__INTEGER )(sizeof(void *)))));
+  result__XADH=((__POINTER )(NULL));
+  a__3ADH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ZADH=(__UINTEGER_32)((__UINTEGER_32)(sz__YADH + a__3ADH) & (__UINTEGER_32)(~ a__3ADH));
+  new_size2__0ADH=(__UINTEGER_32)(new_size__ZADH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__0ADH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__2CFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__3CFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0ADH + a__2CFH) & (__UINTEGER_32)(~ a__2CFH));
+    ptr_table__ZMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3CFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__YMIH=((__POINTER )(NULL));
+    result__0MIH=((__POINTER *)ptr_table__ZMIH)[ 0];
+    if ((result__0MIH == (void *)NULL)) {
+      result__0MIH=new_lab__MRJ(new_size__3CFH);
+      next__YMIH=(void *)((unsigned long)result__0MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CFH)));
+      ((__POINTER *)next__YMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ZMIH)[ 0]=next__YMIH;
+    } else {
+      next__YMIH=((__POINTER *)result__0MIH)[ 0];
+      if ((next__YMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0MIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3CFH <<  1)) <=  4096)) {
+          next__YMIH=(void *)((unsigned long)result__0MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CFH)));
+        } else {
+          next__YMIH=new_lab__MRJ(new_size__3CFH);
+        };
+        ((__POINTER *)next__YMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZMIH)[ 0]=next__YMIH;
+      } else {
+        ((__POINTER *)result__0MIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__0MIH=next__YMIH;
+      };
+    };
+    ((__POINTER *)result__0MIH)[ 0]=((__POINTER ) 3);
+    result__XADH=(void *)((unsigned long)result__0MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__JACH=first_free__LDVB;
-    while ((((void *)result__JACH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JACH)->map_size_and_id__2SB &  4294967292LU) < new_size__1V2G))) {
-      result__JACH=((__MEMORY *)result__JACH)->map_next_free__3SB;
+    result__3MIH=first_free__XDVB;
+    while ((((void *)result__3MIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3MIH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZADH))) {
+      result__3MIH=((__MEMORY *)result__3MIH)->map_next_free__JTB;
     };
-    if (((void *)result__JACH == (void *)NULL)) {
-      result__JACH=new_page__CA5();
+    if (((void *)result__3MIH == (void *)NULL)) {
+      result__3MIH=new_page__OA5();
     };
-    to_busy__index__HTFC(result__JACH,new_size__1V2G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JACH)) - (unsigned long)begin_memory__DVH)))) >>  26));
-    result__ZV2G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JACH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__TTFC(result__3MIH,new_size__ZADH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3MIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
+    result__XADH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3MIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__XKTB=((void **)result__ZV2G);
-  Self__H0MC=(__INTEGER)(nb_elements__3QQB -  1);
-  while ((Self__H0MC >=  0)) {
-    Result__XKTB[Self__H0MC]=NULL;
-    Self__H0MC=(__INTEGER)(Self__H0MC -  1);
+  Result__DLTB=((void **)result__XADH);
+  Self__T0MC=(__INTEGER)(nb_elements__JRQB -  1);
+  while ((Self__T0MC >=  0)) {
+    Result__DLTB[Self__T0MC]=NULL;
+    Self__T0MC=(__INTEGER)(Self__T0MC -  1);
   };
-  return(Result__XKTB);
+  return(Result__DLTB);
 }
 
-static void* read_argument__HOP(__PARSER *Self__IOP)
+static void* read_argument__TOP(__PARSER *Self__UOP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__KOP;
-  __POSITION p__Z55G;
-  __ITM_READ *result__R55G;
-  __POINTER ptr__S55G,ptr_table__NACH,next__MACH,result__OACH;
-  __POINTER ptr_table__SACH,next__RACH,result__TACH;
-  __INTEGER typ_id__T55G;
-  __UINTEGER_32 sz__U55G,a__V55G,new_size__W55G,t__X55G,a__Y55G;
-  __UINTEGER_32 new_size__VACH,lab_type__UACH;
-  result__KOP=read_expr_primary__23M(Self__IOP);
-  if ((((void *)result__KOP == (void *)NULL) && read_identifier__55K())) {
-    if (is_shorter__WY) {
-      if ((! fast_has__RDV(short_local__3BC,last_string__2ZC))) {
-        short__token__to__5AD((&__string_131),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
-      };
-    };
-    p__Z55G=current_position__3WF();
-    result__R55G=NULL;
-    ptr__S55G=((__POINTER )(NULL));
-    typ_id__T55G= 0;
-    sz__U55G=((__UINTEGER_32 )sizeof(__ITM_READ));
-    if ((sz__U55G ==  0)) {
-      result__R55G=ITM_READ__;
-    } else {
-      typ_id__T55G=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__U55G);
-      if ((typ_id__T55G == (__INTEGER)(-  1))) {
-        a__V55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__W55G=(__UINTEGER_32)((__UINTEGER_32)(sz__U55G + a__V55G) & (__UINTEGER_32)(~ a__V55G));
-        ptr_table__NACH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W55G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__MACH=((__POINTER )(NULL));
-        result__OACH=((__POINTER *)ptr_table__NACH)[ 0];
-        if ((result__OACH == (void *)NULL)) {
-          result__OACH=new_lab__ARJ(new_size__W55G);
-          next__MACH=(void *)((unsigned long)result__OACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W55G)));
-          ((__POINTER *)next__MACH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NACH)[ 0]=next__MACH;
-        } else {
-          next__MACH=((__POINTER *)result__OACH)[ 0];
-          if ((next__MACH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OACH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__W55G <<  1)) <=  4096)) {
-              next__MACH=(void *)((unsigned long)result__OACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W55G)));
+  void *result__WOP;
+  __POSITION p__FMGH;
+  __ITM_READ *result__3LGH;
+  __POINTER ptr__4LGH,ptr_table__BNIH,next__ANIH,result__CNIH;
+  __POINTER ptr_table__GNIH,next__FNIH,result__HNIH;
+  __INTEGER typ_id__5LGH;
+  __UINTEGER_32 sz__AMGH,a__BMGH,new_size__CMGH,t__DMGH,a__EMGH;
+  __UINTEGER_32 new_size__JNIH,lab_type__INIH;
+  result__WOP=read_expr_primary__I4M(Self__UOP);
+  if ((((void *)result__WOP == (void *)NULL) && read_identifier__LAL())) {
+    if (is_shorter__5Y) {
+      if ((! fast_has__3DV(short_local__JCC,last_string__I0C))) {
+        short__token__to__LBD((&__string_131),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+      };
+    };
+    p__FMGH=current_position__JXF();
+    result__3LGH=NULL;
+    ptr__4LGH=((__POINTER )(NULL));
+    typ_id__5LGH= 0;
+    sz__AMGH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__AMGH ==  0)) {
+      result__3LGH=ITM_READ__;
+    } else {
+      typ_id__5LGH=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__AMGH);
+      if ((typ_id__5LGH == (__INTEGER)(-  1))) {
+        a__BMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AMGH + a__BMGH) & (__UINTEGER_32)(~ a__BMGH));
+        ptr_table__BNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ANIH=((__POINTER )(NULL));
+        result__CNIH=((__POINTER *)ptr_table__BNIH)[ 0];
+        if ((result__CNIH == (void *)NULL)) {
+          result__CNIH=new_lab__MRJ(new_size__CMGH);
+          next__ANIH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CMGH)));
+          ((__POINTER *)next__ANIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
+        } else {
+          next__ANIH=((__POINTER *)result__CNIH)[ 0];
+          if ((next__ANIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CNIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CMGH <<  1)) <=  4096)) {
+              next__ANIH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CMGH)));
             } else {
-              next__MACH=new_lab__ARJ(new_size__W55G);
-            };
-            ((__POINTER *)next__MACH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NACH)[ 0]=next__MACH;
-          } else {
-            ((__POINTER *)result__OACH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MACH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__OACH=next__MACH;
-          };
-        };
-        ptr__S55G=result__OACH;
-      } else {
-        t__X55G=((__UINTEGER_32 )typ_id__T55G);
-        a__Y55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VACH=(__UINTEGER_32)((__UINTEGER_32)(sz__U55G + a__Y55G) & (__UINTEGER_32)(~ a__Y55G));
-        ptr_table__SACH=((__POINTER )(&(table_type[(t__X55G)])));
-        lab_type__UACH=(__UINTEGER_32)(t__X55G |  1);
-        next__RACH=((__POINTER )(NULL));
-        result__TACH=((__POINTER *)ptr_table__SACH)[ 0];
-        if ((result__TACH == (void *)NULL)) {
-          result__TACH=new_lab__ARJ(lab_type__UACH);
-          next__RACH=(void *)((unsigned long)result__TACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VACH)));
-          ((__POINTER *)next__RACH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SACH)[ 0]=next__RACH;
-        } else {
-          next__RACH=((__POINTER *)result__TACH)[ 0];
-          if ((next__RACH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TACH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VACH <<  1)) <=  4096)) {
-              next__RACH=(void *)((unsigned long)result__TACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VACH)));
+              next__ANIH=new_lab__MRJ(new_size__CMGH);
+            };
+            ((__POINTER *)next__ANIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
+          } else {
+            ((__POINTER *)result__CNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CNIH=next__ANIH;
+          };
+        };
+        ptr__4LGH=result__CNIH;
+      } else {
+        t__DMGH=((__UINTEGER_32 )typ_id__5LGH);
+        a__EMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AMGH + a__EMGH) & (__UINTEGER_32)(~ a__EMGH));
+        ptr_table__GNIH=((__POINTER )(&(table_type[(t__DMGH)])));
+        lab_type__INIH=(__UINTEGER_32)(t__DMGH |  1);
+        next__FNIH=((__POINTER )(NULL));
+        result__HNIH=((__POINTER *)ptr_table__GNIH)[ 0];
+        if ((result__HNIH == (void *)NULL)) {
+          result__HNIH=new_lab__MRJ(lab_type__INIH);
+          next__FNIH=(void *)((unsigned long)result__HNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNIH)));
+          ((__POINTER *)next__FNIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GNIH)[ 0]=next__FNIH;
+        } else {
+          next__FNIH=((__POINTER *)result__HNIH)[ 0];
+          if ((next__FNIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HNIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JNIH <<  1)) <=  4096)) {
+              next__FNIH=(void *)((unsigned long)result__HNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNIH)));
             } else {
-              next__RACH=new_lab__ARJ(lab_type__UACH);
+              next__FNIH=new_lab__MRJ(lab_type__INIH);
             };
-            ((__POINTER *)next__RACH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SACH)[ 0]=next__RACH;
+            ((__POINTER *)next__FNIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GNIH)[ 0]=next__FNIH;
           } else {
-            ((__POINTER *)result__TACH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RACH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__TACH=next__RACH;
+            ((__POINTER *)result__HNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HNIH=next__FNIH;
           };
         };
-        ptr__S55G=result__TACH;
+        ptr__4LGH=result__HNIH;
       };
-      result__R55G=((__ITM_READ *)ptr__S55G);
-      *(result__R55G) = *(ITM_READ__);
+      result__3LGH=((__ITM_READ *)ptr__4LGH);
+      *(result__3LGH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__R55G)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__Z55G;
-    result__KOP=result__R55G;
+    ((__ITM_READ *)result__3LGH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__FMGH;
+    result__WOP=result__3LGH;
   };
-  return(result__KOP);
+  return(result__WOP);
 }
 
-static void* readlip_expr_binary__RN3B(__PARSER *Self__SN3B)
+static void* readlip_expr_binary__3N3B(__PARSER *Self__4N3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *right__VN3B,*result__UN3B;
-  __POSITION pos__FOTG,p__DAAH,p__QAAH;
-  __LIP_BINARY *result__055G,*Self__CAAH,*result__HAAH,*Self__PAAH;
-  __POINTER ptr__155G,ptr_table__3ACH,next__2ACH,result__4ACH;
-  __POINTER ptr_table__CBCH,next__BBCH,result__DBCH,ptr__IAAH;
-  __POINTER ptr_table__HBCH,next__GBCH,result__IBCH,ptr_table__MBCH;
-  __POINTER next__LBCH,result__NBCH;
-  __INTEGER typ_id__255G,typ_id__JAAH;
-  __UINTEGER_32 sz__355G,a__455G,new_size__555G,t__AAAH,a__BAAH;
-  __UINTEGER_32 new_size__FBCH,lab_type__EBCH,sz__KAAH,a__LAAH;
-  __UINTEGER_32 new_size__MAAH,t__NAAH,a__OAAH,new_size__PBCH;
-  __UINTEGER_32 lab_type__OBCH;
-  __BOOLEAN result__WACH,__tmp__KO3B,result__ZACH;
-  __CHARACTER result__XACH,result__0ACH;
-  right__VN3B=NULL;
-  result__UN3B=readlip_expr_unary__SZ4B(Self__SN3B);
-  if (((void *)result__UN3B != (void *)NULL)) {
-    while_do__W35B:
+  void *right__BO3B,*result__AO3B;
+  __POSITION pos__55YG,p__PMGH,p__2MGH;
+  __LIP_BINARY *result__GMGH,*Self__OMGH,*result__TMGH,*Self__1MGH;
+  __POINTER ptr__HMGH,ptr_table__RNIH,next__QNIH,result__SNIH;
+  __POINTER ptr_table__WNIH,next__VNIH,result__XNIH,ptr__UMGH;
+  __POINTER ptr_table__1NIH,next__0NIH,result__2NIH,ptr_table__AOIH;
+  __POINTER next__5NIH,result__BOIH;
+  __INTEGER typ_id__IMGH,typ_id__VMGH;
+  __UINTEGER_32 sz__JMGH,a__KMGH,new_size__LMGH,t__MMGH,a__NMGH;
+  __UINTEGER_32 new_size__ZNIH,lab_type__YNIH,sz__WMGH,a__XMGH;
+  __UINTEGER_32 new_size__YMGH,t__ZMGH,a__0MGH,new_size__DOIH;
+  __UINTEGER_32 lab_type__COIH;
+  __BOOLEAN result__KNIH,__tmp__WO3B,result__NNIH;
+  __CHARACTER result__LNIH,result__ONIH;
+  right__BO3B=NULL;
+  result__AO3B=readlip_expr_unary__4Z4B(Self__4N3B);
+  if (((void *)result__AO3B != (void *)NULL)) {
+    while_do__C45B:
     {
-      result__WACH=FALSE__;
-      if ((! read_space__RRD())) {
-        result__WACH=FALSE__;
+      result__KNIH=FALSE__;
+      if ((! read_space__3RD())) {
+        result__KNIH=FALSE__;
       } else {
-        result__XACH='\0';
-        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-          result__XACH=((__CHARACTER )(( 0)));
+        result__LNIH='\0';
+        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+          result__LNIH=((__CHARACTER )(( 0)));
         } else {
-          result__XACH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+          result__LNIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
         };
-        if ((result__XACH == '-')) {
-          position__GBC=(__INTEGER)(position__GBC +  1);
-          result__WACH=TRUE__;
+        if ((result__LNIH == '-')) {
+          position__SBC=(__INTEGER)(position__SBC +  1);
+          result__KNIH=TRUE__;
         };
       };
-      if (result__WACH) {
-        __tmp__KO3B=TRUE__;
+      if (result__KNIH) {
+        __tmp__WO3B=TRUE__;
       } else {
-        result__ZACH=FALSE__;
-        if ((! read_space__RRD())) {
-          result__ZACH=FALSE__;
+        result__NNIH=FALSE__;
+        if ((! read_space__3RD())) {
+          result__NNIH=FALSE__;
         } else {
-          result__0ACH='\0';
-          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-            result__0ACH=((__CHARACTER )(( 0)));
+          result__ONIH='\0';
+          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+            result__ONIH=((__CHARACTER )(( 0)));
           } else {
-            result__0ACH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+            result__ONIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
           };
-          if ((result__0ACH == '+')) {
-            position__GBC=(__INTEGER)(position__GBC +  1);
-            result__ZACH=TRUE__;
+          if ((result__ONIH == '+')) {
+            position__SBC=(__INTEGER)(position__SBC +  1);
+            result__NNIH=TRUE__;
           };
         };
-        __tmp__KO3B=result__ZACH;
+        __tmp__WO3B=result__NNIH;
       };
-      if (__tmp__KO3B) {
-        right__VN3B=readlip_expr_unary__SZ4B(Self__SN3B);
-        if (((void *)right__VN3B == (void *)NULL)) {
-          pos__FOTG=current_position__3WF();
-          put_error__text__4MG( 0,(&__string_227));
-          put_position__IOG(pos__FOTG);
-          put_string__I1F(msg_err__DNG);
-          if ((type_error__CNG !=  2)) {
+      if (__tmp__WO3B) {
+        right__BO3B=readlip_expr_unary__4Z4B(Self__4N3B);
+        if (((void *)right__BO3B == (void *)NULL)) {
+          pos__55YG=current_position__JXF();
+          put_error__text__KNG( 0,(&__string_237));
+          put_position__UOG(pos__55YG);
+          put_string__U1F(msg_err__PNG);
+          if ((type_error__ONG !=  2)) {
             exit(( 1));
           };
         };
-        if (result__WACH) {
-          p__DAAH=current_position__3WF();
-          result__055G=NULL;
-          ptr__155G=((__POINTER )(NULL));
-          typ_id__255G= 0;
-          sz__355G=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__355G ==  0)) {
-            result__055G=LIP_BINARY__;
-          } else {
-            typ_id__255G=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__355G);
-            if ((typ_id__255G == (__INTEGER)(-  1))) {
-              a__455G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__555G=(__UINTEGER_32)((__UINTEGER_32)(sz__355G + a__455G) & (__UINTEGER_32)(~ a__455G));
-              ptr_table__3ACH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__555G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__2ACH=((__POINTER )(NULL));
-              result__4ACH=((__POINTER *)ptr_table__3ACH)[ 0];
-              if ((result__4ACH == (void *)NULL)) {
-                result__4ACH=new_lab__ARJ(new_size__555G);
-                next__2ACH=(void *)((unsigned long)result__4ACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__555G)));
-                ((__POINTER *)next__2ACH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3ACH)[ 0]=next__2ACH;
+        if (result__KNIH) {
+          p__PMGH=current_position__JXF();
+          result__GMGH=NULL;
+          ptr__HMGH=((__POINTER )(NULL));
+          typ_id__IMGH= 0;
+          sz__JMGH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__JMGH ==  0)) {
+            result__GMGH=LIP_BINARY__;
+          } else {
+            typ_id__IMGH=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JMGH);
+            if ((typ_id__IMGH == (__INTEGER)(-  1))) {
+              a__KMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__LMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__JMGH + a__KMGH) & (__UINTEGER_32)(~ a__KMGH));
+              ptr_table__RNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__QNIH=((__POINTER )(NULL));
+              result__SNIH=((__POINTER *)ptr_table__RNIH)[ 0];
+              if ((result__SNIH == (void *)NULL)) {
+                result__SNIH=new_lab__MRJ(new_size__LMGH);
+                next__QNIH=(void *)((unsigned long)result__SNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMGH)));
+                ((__POINTER *)next__QNIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RNIH)[ 0]=next__QNIH;
               } else {
-                next__2ACH=((__POINTER *)result__4ACH)[ 0];
-                if ((next__2ACH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4ACH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__555G <<  1)) <=  4096)) {
-                    next__2ACH=(void *)((unsigned long)result__4ACH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__555G)));
+                next__QNIH=((__POINTER *)result__SNIH)[ 0];
+                if ((next__QNIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SNIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LMGH <<  1)) <=  4096)) {
+                    next__QNIH=(void *)((unsigned long)result__SNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMGH)));
                   } else {
-                    next__2ACH=new_lab__ARJ(new_size__555G);
+                    next__QNIH=new_lab__MRJ(new_size__LMGH);
                   };
-                  ((__POINTER *)next__2ACH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__3ACH)[ 0]=next__2ACH;
+                  ((__POINTER *)next__QNIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__RNIH)[ 0]=next__QNIH;
                 } else {
-                  ((__POINTER *)result__4ACH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2ACH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__4ACH=next__2ACH;
+                  ((__POINTER *)result__SNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__SNIH=next__QNIH;
                 };
               };
-              ptr__155G=result__4ACH;
+              ptr__HMGH=result__SNIH;
             } else {
-              t__AAAH=((__UINTEGER_32 )typ_id__255G);
-              a__BAAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__FBCH=(__UINTEGER_32)((__UINTEGER_32)(sz__355G + a__BAAH) & (__UINTEGER_32)(~ a__BAAH));
-              ptr_table__CBCH=((__POINTER )(&(table_type[(t__AAAH)])));
-              lab_type__EBCH=(__UINTEGER_32)(t__AAAH |  1);
-              next__BBCH=((__POINTER )(NULL));
-              result__DBCH=((__POINTER *)ptr_table__CBCH)[ 0];
-              if ((result__DBCH == (void *)NULL)) {
-                result__DBCH=new_lab__ARJ(lab_type__EBCH);
-                next__BBCH=(void *)((unsigned long)result__DBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FBCH)));
-                ((__POINTER *)next__BBCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CBCH)[ 0]=next__BBCH;
+              t__MMGH=((__UINTEGER_32 )typ_id__IMGH);
+              a__NMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ZNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JMGH + a__NMGH) & (__UINTEGER_32)(~ a__NMGH));
+              ptr_table__WNIH=((__POINTER )(&(table_type[(t__MMGH)])));
+              lab_type__YNIH=(__UINTEGER_32)(t__MMGH |  1);
+              next__VNIH=((__POINTER )(NULL));
+              result__XNIH=((__POINTER *)ptr_table__WNIH)[ 0];
+              if ((result__XNIH == (void *)NULL)) {
+                result__XNIH=new_lab__MRJ(lab_type__YNIH);
+                next__VNIH=(void *)((unsigned long)result__XNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZNIH)));
+                ((__POINTER *)next__VNIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WNIH)[ 0]=next__VNIH;
               } else {
-                next__BBCH=((__POINTER *)result__DBCH)[ 0];
-                if ((next__BBCH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DBCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FBCH <<  1)) <=  4096)) {
-                    next__BBCH=(void *)((unsigned long)result__DBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FBCH)));
+                next__VNIH=((__POINTER *)result__XNIH)[ 0];
+                if ((next__VNIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XNIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZNIH <<  1)) <=  4096)) {
+                    next__VNIH=(void *)((unsigned long)result__XNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZNIH)));
                   } else {
-                    next__BBCH=new_lab__ARJ(lab_type__EBCH);
+                    next__VNIH=new_lab__MRJ(lab_type__YNIH);
                   };
-                  ((__POINTER *)next__BBCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__CBCH)[ 0]=next__BBCH;
+                  ((__POINTER *)next__VNIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WNIH)[ 0]=next__VNIH;
                 } else {
-                  ((__POINTER *)result__DBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__DBCH=next__BBCH;
+                  ((__POINTER *)result__XNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XNIH=next__VNIH;
                 };
               };
-              ptr__155G=result__DBCH;
-            };
-            result__055G=((__LIP_BINARY *)ptr__155G);
-            *(result__055G) = *(LIP_BINARY__);
-          };
-          Self__CAAH=((__LIP_BINARY *)result__055G);
-          Self__CAAH->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ=p__DAAH;
-          Self__CAAH->left__AZQD=result__UN3B;
-          Self__CAAH->right__DZQD=right__VN3B;
-          Self__CAAH->operator__GZQD='-';
-          result__UN3B=result__055G;
-        } else {
-          p__QAAH=current_position__3WF();
-          result__HAAH=NULL;
-          ptr__IAAH=((__POINTER )(NULL));
-          typ_id__JAAH= 0;
-          sz__KAAH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__KAAH ==  0)) {
-            result__HAAH=LIP_BINARY__;
-          } else {
-            typ_id__JAAH=-1;
-            clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__KAAH);
-            if ((typ_id__JAAH == (__INTEGER)(-  1))) {
-              a__LAAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__MAAH=(__UINTEGER_32)((__UINTEGER_32)(sz__KAAH + a__LAAH) & (__UINTEGER_32)(~ a__LAAH));
-              ptr_table__HBCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MAAH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__GBCH=((__POINTER )(NULL));
-              result__IBCH=((__POINTER *)ptr_table__HBCH)[ 0];
-              if ((result__IBCH == (void *)NULL)) {
-                result__IBCH=new_lab__ARJ(new_size__MAAH);
-                next__GBCH=(void *)((unsigned long)result__IBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MAAH)));
-                ((__POINTER *)next__GBCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HBCH)[ 0]=next__GBCH;
+              ptr__HMGH=result__XNIH;
+            };
+            result__GMGH=((__LIP_BINARY *)ptr__HMGH);
+            *(result__GMGH) = *(LIP_BINARY__);
+          };
+          Self__OMGH=((__LIP_BINARY *)result__GMGH);
+          Self__OMGH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__PMGH;
+          Self__OMGH->left__MZQD=result__AO3B;
+          Self__OMGH->right__PZQD=right__BO3B;
+          Self__OMGH->operator__SZQD='-';
+          result__AO3B=result__GMGH;
+        } else {
+          p__2MGH=current_position__JXF();
+          result__TMGH=NULL;
+          ptr__UMGH=((__POINTER )(NULL));
+          typ_id__VMGH= 0;
+          sz__WMGH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__WMGH ==  0)) {
+            result__TMGH=LIP_BINARY__;
+          } else {
+            typ_id__VMGH=-1;
+            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WMGH);
+            if ((typ_id__VMGH == (__INTEGER)(-  1))) {
+              a__XMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__YMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WMGH + a__XMGH) & (__UINTEGER_32)(~ a__XMGH));
+              ptr_table__1NIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__0NIH=((__POINTER )(NULL));
+              result__2NIH=((__POINTER *)ptr_table__1NIH)[ 0];
+              if ((result__2NIH == (void *)NULL)) {
+                result__2NIH=new_lab__MRJ(new_size__YMGH);
+                next__0NIH=(void *)((unsigned long)result__2NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YMGH)));
+                ((__POINTER *)next__0NIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1NIH)[ 0]=next__0NIH;
               } else {
-                next__GBCH=((__POINTER *)result__IBCH)[ 0];
-                if ((next__GBCH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IBCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__MAAH <<  1)) <=  4096)) {
-                    next__GBCH=(void *)((unsigned long)result__IBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MAAH)));
+                next__0NIH=((__POINTER *)result__2NIH)[ 0];
+                if ((next__0NIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2NIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YMGH <<  1)) <=  4096)) {
+                    next__0NIH=(void *)((unsigned long)result__2NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YMGH)));
                   } else {
-                    next__GBCH=new_lab__ARJ(new_size__MAAH);
+                    next__0NIH=new_lab__MRJ(new_size__YMGH);
                   };
-                  ((__POINTER *)next__GBCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HBCH)[ 0]=next__GBCH;
+                  ((__POINTER *)next__0NIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1NIH)[ 0]=next__0NIH;
                 } else {
-                  ((__POINTER *)result__IBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IBCH=next__GBCH;
+                  ((__POINTER *)result__2NIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0NIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2NIH=next__0NIH;
                 };
               };
-              ptr__IAAH=result__IBCH;
+              ptr__UMGH=result__2NIH;
             } else {
-              t__NAAH=((__UINTEGER_32 )typ_id__JAAH);
-              a__OAAH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__PBCH=(__UINTEGER_32)((__UINTEGER_32)(sz__KAAH + a__OAAH) & (__UINTEGER_32)(~ a__OAAH));
-              ptr_table__MBCH=((__POINTER )(&(table_type[(t__NAAH)])));
-              lab_type__OBCH=(__UINTEGER_32)(t__NAAH |  1);
-              next__LBCH=((__POINTER )(NULL));
-              result__NBCH=((__POINTER *)ptr_table__MBCH)[ 0];
-              if ((result__NBCH == (void *)NULL)) {
-                result__NBCH=new_lab__ARJ(lab_type__OBCH);
-                next__LBCH=(void *)((unsigned long)result__NBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBCH)));
-                ((__POINTER *)next__LBCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MBCH)[ 0]=next__LBCH;
+              t__ZMGH=((__UINTEGER_32 )typ_id__VMGH);
+              a__0MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__DOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WMGH + a__0MGH) & (__UINTEGER_32)(~ a__0MGH));
+              ptr_table__AOIH=((__POINTER )(&(table_type[(t__ZMGH)])));
+              lab_type__COIH=(__UINTEGER_32)(t__ZMGH |  1);
+              next__5NIH=((__POINTER )(NULL));
+              result__BOIH=((__POINTER *)ptr_table__AOIH)[ 0];
+              if ((result__BOIH == (void *)NULL)) {
+                result__BOIH=new_lab__MRJ(lab_type__COIH);
+                next__5NIH=(void *)((unsigned long)result__BOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOIH)));
+                ((__POINTER *)next__5NIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AOIH)[ 0]=next__5NIH;
               } else {
-                next__LBCH=((__POINTER *)result__NBCH)[ 0];
-                if ((next__LBCH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NBCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PBCH <<  1)) <=  4096)) {
-                    next__LBCH=(void *)((unsigned long)result__NBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBCH)));
+                next__5NIH=((__POINTER *)result__BOIH)[ 0];
+                if ((next__5NIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BOIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DOIH <<  1)) <=  4096)) {
+                    next__5NIH=(void *)((unsigned long)result__BOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOIH)));
                   } else {
-                    next__LBCH=new_lab__ARJ(lab_type__OBCH);
+                    next__5NIH=new_lab__MRJ(lab_type__COIH);
                   };
-                  ((__POINTER *)next__LBCH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MBCH)[ 0]=next__LBCH;
+                  ((__POINTER *)next__5NIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__AOIH)[ 0]=next__5NIH;
                 } else {
-                  ((__POINTER *)result__NBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__NBCH=next__LBCH;
+                  ((__POINTER *)result__BOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5NIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__BOIH=next__5NIH;
                 };
               };
-              ptr__IAAH=result__NBCH;
+              ptr__UMGH=result__BOIH;
             };
-            result__HAAH=((__LIP_BINARY *)ptr__IAAH);
-            *(result__HAAH) = *(LIP_BINARY__);
+            result__TMGH=((__LIP_BINARY *)ptr__UMGH);
+            *(result__TMGH) = *(LIP_BINARY__);
           };
-          Self__PAAH=((__LIP_BINARY *)result__HAAH);
-          Self__PAAH->parent_lip_code__QPZB.parent_itm_object__TDE.position__BDJ=p__QAAH;
-          Self__PAAH->left__AZQD=result__UN3B;
-          Self__PAAH->right__DZQD=right__VN3B;
-          Self__PAAH->operator__GZQD='+';
-          result__UN3B=result__HAAH;
+          Self__1MGH=((__LIP_BINARY *)result__TMGH);
+          Self__1MGH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__2MGH;
+          Self__1MGH->left__MZQD=result__AO3B;
+          Self__1MGH->right__PZQD=right__BO3B;
+          Self__1MGH->operator__SZQD='+';
+          result__AO3B=result__TMGH;
         };
-        goto while_do__W35B;
+        goto while_do__C45B;
       };
     };
   };
-  return(result__UN3B);
+  return(result__AO3B);
 }
 
-static void* readlip_expr_unary__SZ4B(__PARSER *Self__TZ4B)
+static void* readlip_expr_unary__4Z4B(__PARSER *Self__5Z4B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *result__VZ4B,*result__NUEE;
-  void *nam__YZ4B,*n__KCCH;
-  __POSITION pos__XPTG,p__04ZC,p__JCCH,p__AVEE;
-  __LIP_UNARY *result__QNBD,*Self__MHSD;
-  __POINTER ptr__RNBD,ptr_table__XBCH,next__WBCH,result__YBCH;
-  __POINTER ptr_table__2BCH,next__1BCH,result__3BCH,ptr__BCCH;
-  __POINTER ptr_table__NCCH,next__MCCH,result__OCCH,ptr_table__SCCH;
-  __POINTER next__RCCH,result__TCCH,ptr__LELE,ptr_table__XCCH;
-  __POINTER next__WCCH,result__YCCH,ptr_table__2CCH,next__1CCH;
-  __POINTER result__3CCH;
-  __INTEGER typ_id__WNBD,typ_id__CCCH,typ_id__QELE;
-  __UINTEGER_32 sz__TNBD,a__OX4G,new_size__PX4G,t__TX4G,a__SX4G;
-  __UINTEGER_32 new_size__5BCH,lab_type__4BCH,sz__DCCH,a__ECCH;
-  __UINTEGER_32 new_size__FCCH,t__GCCH,a__HCCH,new_size__VCCH;
-  __UINTEGER_32 lab_type__UCCH,sz__NELE,a__WX4G,new_size__XX4G,t__1X4G;
-  __UINTEGER_32 a__0X4G,new_size__5CCH,lab_type__4CCH;
-  __LIP_CALL *result__ACCH,*Self__ICCH,*result__KELE,*Self__XLVE;
-  __CHARACTER type__XZ4B,result__RBCH,result__UBCH;
-  __BOOLEAN result__QBCH,__tmp__D04B,result__TBCH,__tmp__D14B;
-  result__VZ4B=NULL;
-  type__XZ4B='\0';
-  nam__YZ4B=NULL;
-  result__QBCH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__QBCH=FALSE__;
+  void *result__B04B,*result__WBFE;
+  void *nam__E04B,*n__4OIH;
+  __POSITION pos__RBZG,p__G5ZC,p__3OIH,p__JCFE;
+  __LIP_UNARY *result__2NBD,*Self__YHSD;
+  __POINTER ptr__3NBD,ptr_table__LOIH,next__KOIH,result__MOIH;
+  __POINTER ptr_table__QOIH,next__POIH,result__ROIH,ptr__VOIH;
+  __POINTER ptr_table__BPIH,next__APIH,result__CPIH,ptr_table__GPIH;
+  __POINTER next__FPIH,result__HPIH,ptr__UTLE,ptr_table__LPIH;
+  __POINTER next__KPIH,result__MPIH,ptr_table__QPIH,next__PPIH;
+  __POINTER result__RPIH;
+  __INTEGER typ_id__COBD,typ_id__WOIH,typ_id__ZTLE;
+  __UINTEGER_32 sz__5NBD,a__DDFH,new_size__EDFH,t__IDFH,a__HDFH;
+  __UINTEGER_32 new_size__TOIH,lab_type__SOIH,sz__XOIH,a__YOIH;
+  __UINTEGER_32 new_size__ZOIH,t__0OIH,a__1OIH,new_size__JPIH;
+  __UINTEGER_32 lab_type__IPIH,sz__WTLE,a__LDFH,new_size__MDFH,t__QDFH;
+  __UINTEGER_32 a__PDFH,new_size__TPIH,lab_type__SPIH;
+  __LIP_CALL *result__UOIH,*Self__2OIH,*result__TTLE,*Self__21VE;
+  __CHARACTER type__D04B,result__FOIH,result__IOIH;
+  __BOOLEAN result__EOIH,__tmp__P04B,result__HOIH,__tmp__P14B;
+  result__B04B=NULL;
+  type__D04B='\0';
+  nam__E04B=NULL;
+  result__EOIH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__EOIH=FALSE__;
   } else {
-    result__RBCH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__RBCH=((__CHARACTER )(( 0)));
+    result__FOIH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__FOIH=((__CHARACTER )(( 0)));
     } else {
-      result__RBCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__FOIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__RBCH == '-')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__QBCH=TRUE__;
+    if ((result__FOIH == '-')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__EOIH=TRUE__;
     };
   };
-  if (result__QBCH) {
-    __tmp__D04B=TRUE__;
+  if (result__EOIH) {
+    __tmp__P04B=TRUE__;
   } else {
-    result__TBCH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__TBCH=FALSE__;
+    result__HOIH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__HOIH=FALSE__;
     } else {
-      result__UBCH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__UBCH=((__CHARACTER )(( 0)));
+      result__IOIH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__IOIH=((__CHARACTER )(( 0)));
       } else {
-        result__UBCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__IOIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__UBCH == '!')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__TBCH=TRUE__;
+      if ((result__IOIH == '!')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__HOIH=TRUE__;
       };
     };
-    __tmp__D04B=result__TBCH;
+    __tmp__P04B=result__HOIH;
   };
-  if (__tmp__D04B) {
-    result__VZ4B=readlip_expr_unary__SZ4B(Self__TZ4B);
-    if (((void *)result__VZ4B == (void *)NULL)) {
-      pos__XPTG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_227));
-      put_position__IOG(pos__XPTG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  if (__tmp__P04B) {
+    result__B04B=readlip_expr_unary__4Z4B(Self__5Z4B);
+    if (((void *)result__B04B == (void *)NULL)) {
+      pos__RBZG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_237));
+      put_position__UOG(pos__RBZG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    if (result__QBCH) {
-      type__XZ4B='-';
-    } else {
-      type__XZ4B='!';
-    };
-    p__04ZC=current_position__3WF();
-    result__QNBD=NULL;
-    ptr__RNBD=((__POINTER )(NULL));
-    typ_id__WNBD= 0;
-    sz__TNBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
-    if ((sz__TNBD ==  0)) {
-      result__QNBD=LIP_UNARY__;
-    } else {
-      typ_id__WNBD=-1;
-      clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__TNBD);
-      if ((typ_id__WNBD == (__INTEGER)(-  1))) {
-        a__OX4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__PX4G=(__UINTEGER_32)((__UINTEGER_32)(sz__TNBD + a__OX4G) & (__UINTEGER_32)(~ a__OX4G));
-        ptr_table__XBCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PX4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__WBCH=((__POINTER )(NULL));
-        result__YBCH=((__POINTER *)ptr_table__XBCH)[ 0];
-        if ((result__YBCH == (void *)NULL)) {
-          result__YBCH=new_lab__ARJ(new_size__PX4G);
-          next__WBCH=(void *)((unsigned long)result__YBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PX4G)));
-          ((__POINTER *)next__WBCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XBCH)[ 0]=next__WBCH;
-        } else {
-          next__WBCH=((__POINTER *)result__YBCH)[ 0];
-          if ((next__WBCH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PX4G <<  1)) <=  4096)) {
-              next__WBCH=(void *)((unsigned long)result__YBCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PX4G)));
+    if (result__EOIH) {
+      type__D04B='-';
+    } else {
+      type__D04B='!';
+    };
+    p__G5ZC=current_position__JXF();
+    result__2NBD=NULL;
+    ptr__3NBD=((__POINTER )(NULL));
+    typ_id__COBD= 0;
+    sz__5NBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
+    if ((sz__5NBD ==  0)) {
+      result__2NBD=LIP_UNARY__;
+    } else {
+      typ_id__COBD=-1;
+      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5NBD);
+      if ((typ_id__COBD == (__INTEGER)(-  1))) {
+        a__DDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NBD + a__DDFH) & (__UINTEGER_32)(~ a__DDFH));
+        ptr_table__LOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__KOIH=((__POINTER )(NULL));
+        result__MOIH=((__POINTER *)ptr_table__LOIH)[ 0];
+        if ((result__MOIH == (void *)NULL)) {
+          result__MOIH=new_lab__MRJ(new_size__EDFH);
+          next__KOIH=(void *)((unsigned long)result__MOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EDFH)));
+          ((__POINTER *)next__KOIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LOIH)[ 0]=next__KOIH;
+        } else {
+          next__KOIH=((__POINTER *)result__MOIH)[ 0];
+          if ((next__KOIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MOIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EDFH <<  1)) <=  4096)) {
+              next__KOIH=(void *)((unsigned long)result__MOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EDFH)));
             } else {
-              next__WBCH=new_lab__ARJ(new_size__PX4G);
-            };
-            ((__POINTER *)next__WBCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XBCH)[ 0]=next__WBCH;
-          } else {
-            ((__POINTER *)result__YBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YBCH=next__WBCH;
-          };
-        };
-        ptr__RNBD=result__YBCH;
-      } else {
-        t__TX4G=((__UINTEGER_32 )typ_id__WNBD);
-        a__SX4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__5BCH=(__UINTEGER_32)((__UINTEGER_32)(sz__TNBD + a__SX4G) & (__UINTEGER_32)(~ a__SX4G));
-        ptr_table__2BCH=((__POINTER )(&(table_type[(t__TX4G)])));
-        lab_type__4BCH=(__UINTEGER_32)(t__TX4G |  1);
-        next__1BCH=((__POINTER )(NULL));
-        result__3BCH=((__POINTER *)ptr_table__2BCH)[ 0];
-        if ((result__3BCH == (void *)NULL)) {
-          result__3BCH=new_lab__ARJ(lab_type__4BCH);
-          next__1BCH=(void *)((unsigned long)result__3BCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BCH)));
-          ((__POINTER *)next__1BCH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2BCH)[ 0]=next__1BCH;
-        } else {
-          next__1BCH=((__POINTER *)result__3BCH)[ 0];
-          if ((next__1BCH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5BCH <<  1)) <=  4096)) {
-              next__1BCH=(void *)((unsigned long)result__3BCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BCH)));
+              next__KOIH=new_lab__MRJ(new_size__EDFH);
+            };
+            ((__POINTER *)next__KOIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LOIH)[ 0]=next__KOIH;
+          } else {
+            ((__POINTER *)result__MOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MOIH=next__KOIH;
+          };
+        };
+        ptr__3NBD=result__MOIH;
+      } else {
+        t__IDFH=((__UINTEGER_32 )typ_id__COBD);
+        a__HDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NBD + a__HDFH) & (__UINTEGER_32)(~ a__HDFH));
+        ptr_table__QOIH=((__POINTER )(&(table_type[(t__IDFH)])));
+        lab_type__SOIH=(__UINTEGER_32)(t__IDFH |  1);
+        next__POIH=((__POINTER )(NULL));
+        result__ROIH=((__POINTER *)ptr_table__QOIH)[ 0];
+        if ((result__ROIH == (void *)NULL)) {
+          result__ROIH=new_lab__MRJ(lab_type__SOIH);
+          next__POIH=(void *)((unsigned long)result__ROIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOIH)));
+          ((__POINTER *)next__POIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QOIH)[ 0]=next__POIH;
+        } else {
+          next__POIH=((__POINTER *)result__ROIH)[ 0];
+          if ((next__POIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ROIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TOIH <<  1)) <=  4096)) {
+              next__POIH=(void *)((unsigned long)result__ROIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOIH)));
             } else {
-              next__1BCH=new_lab__ARJ(lab_type__4BCH);
+              next__POIH=new_lab__MRJ(lab_type__SOIH);
             };
-            ((__POINTER *)next__1BCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2BCH)[ 0]=next__1BCH;
+            ((__POINTER *)next__POIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QOIH)[ 0]=next__POIH;
           } else {
-            ((__POINTER *)result__3BCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3BCH=next__1BCH;
+            ((__POINTER *)result__ROIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__POIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ROIH=next__POIH;
           };
         };
-        ptr__RNBD=result__3BCH;
+        ptr__3NBD=result__ROIH;
       };
-      result__QNBD=((__LIP_UNARY *)ptr__RNBD);
-      *(result__QNBD) = *(LIP_UNARY__);
+      result__2NBD=((__LIP_UNARY *)ptr__3NBD);
+      *(result__2NBD) = *(LIP_UNARY__);
     };
-    Self__MHSD=((__LIP_UNARY *)result__QNBD);
-    Self__MHSD->parent_lip_code__504B.parent_itm_object__TDE.position__BDJ=p__04ZC;
-    Self__MHSD->operator__A2QD=type__XZ4B;
-    Self__MHSD->value__31QD=result__VZ4B;
-    result__VZ4B=result__QNBD;
-    __tmp__D14B=TRUE__;
+    Self__YHSD=((__LIP_UNARY *)result__2NBD);
+    Self__YHSD->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ=p__G5ZC;
+    Self__YHSD->operator__M2QD=type__D04B;
+    Self__YHSD->value__J2QD=result__B04B;
+    result__B04B=result__2NBD;
+    __tmp__P14B=TRUE__;
   } else {
-    __tmp__D14B=FALSE__;
-  };
-  if ((! __tmp__D14B)) {
-    if (read_identifier__55K()) {
-      nam__YZ4B=last_string__2ZC;
-      result__NUEE=NULL;
-      if (read_identifier__55K()) {
-        p__JCCH=current_position__3WF();
-        n__KCCH=last_string__2ZC;
-        result__ACCH=NULL;
-        ptr__BCCH=((__POINTER )(NULL));
-        typ_id__CCCH= 0;
-        sz__DCCH=((__UINTEGER_32 )sizeof(__LIP_CALL));
-        if ((sz__DCCH ==  0)) {
-          result__ACCH=LIP_CALL__;
-        } else {
-          typ_id__CCCH=-1;
-          clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__DCCH);
-          if ((typ_id__CCCH == (__INTEGER)(-  1))) {
-            a__ECCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__FCCH=(__UINTEGER_32)((__UINTEGER_32)(sz__DCCH + a__ECCH) & (__UINTEGER_32)(~ a__ECCH));
-            ptr_table__NCCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FCCH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__MCCH=((__POINTER )(NULL));
-            result__OCCH=((__POINTER *)ptr_table__NCCH)[ 0];
-            if ((result__OCCH == (void *)NULL)) {
-              result__OCCH=new_lab__ARJ(new_size__FCCH);
-              next__MCCH=(void *)((unsigned long)result__OCCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCCH)));
-              ((__POINTER *)next__MCCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NCCH)[ 0]=next__MCCH;
+    __tmp__P14B=FALSE__;
+  };
+  if ((! __tmp__P14B)) {
+    if (read_identifier__LAL()) {
+      nam__E04B=last_string__I0C;
+      result__WBFE=NULL;
+      if (read_identifier__LAL()) {
+        p__3OIH=current_position__JXF();
+        n__4OIH=last_string__I0C;
+        result__UOIH=NULL;
+        ptr__VOIH=((__POINTER )(NULL));
+        typ_id__WOIH= 0;
+        sz__XOIH=((__UINTEGER_32 )sizeof(__LIP_CALL));
+        if ((sz__XOIH ==  0)) {
+          result__UOIH=LIP_CALL__;
+        } else {
+          typ_id__WOIH=-1;
+          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XOIH);
+          if ((typ_id__WOIH == (__INTEGER)(-  1))) {
+            a__YOIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ZOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOIH + a__YOIH) & (__UINTEGER_32)(~ a__YOIH));
+            ptr_table__BPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZOIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__APIH=((__POINTER )(NULL));
+            result__CPIH=((__POINTER *)ptr_table__BPIH)[ 0];
+            if ((result__CPIH == (void *)NULL)) {
+              result__CPIH=new_lab__MRJ(new_size__ZOIH);
+              next__APIH=(void *)((unsigned long)result__CPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOIH)));
+              ((__POINTER *)next__APIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BPIH)[ 0]=next__APIH;
             } else {
-              next__MCCH=((__POINTER *)result__OCCH)[ 0];
-              if ((next__MCCH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OCCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__FCCH <<  1)) <=  4096)) {
-                  next__MCCH=(void *)((unsigned long)result__OCCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCCH)));
+              next__APIH=((__POINTER *)result__CPIH)[ 0];
+              if ((next__APIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CPIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZOIH <<  1)) <=  4096)) {
+                  next__APIH=(void *)((unsigned long)result__CPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOIH)));
                 } else {
-                  next__MCCH=new_lab__ARJ(new_size__FCCH);
+                  next__APIH=new_lab__MRJ(new_size__ZOIH);
                 };
-                ((__POINTER *)next__MCCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NCCH)[ 0]=next__MCCH;
+                ((__POINTER *)next__APIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BPIH)[ 0]=next__APIH;
               } else {
-                ((__POINTER *)result__OCCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MCCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__OCCH=next__MCCH;
+                ((__POINTER *)result__CPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__APIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__CPIH=next__APIH;
               };
             };
-            ptr__BCCH=result__OCCH;
-          } else {
-            t__GCCH=((__UINTEGER_32 )typ_id__CCCH);
-            a__HCCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__VCCH=(__UINTEGER_32)((__UINTEGER_32)(sz__DCCH + a__HCCH) & (__UINTEGER_32)(~ a__HCCH));
-            ptr_table__SCCH=((__POINTER )(&(table_type[(t__GCCH)])));
-            lab_type__UCCH=(__UINTEGER_32)(t__GCCH |  1);
-            next__RCCH=((__POINTER )(NULL));
-            result__TCCH=((__POINTER *)ptr_table__SCCH)[ 0];
-            if ((result__TCCH == (void *)NULL)) {
-              result__TCCH=new_lab__ARJ(lab_type__UCCH);
-              next__RCCH=(void *)((unsigned long)result__TCCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCCH)));
-              ((__POINTER *)next__RCCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SCCH)[ 0]=next__RCCH;
+            ptr__VOIH=result__CPIH;
+          } else {
+            t__0OIH=((__UINTEGER_32 )typ_id__WOIH);
+            a__1OIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__JPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOIH + a__1OIH) & (__UINTEGER_32)(~ a__1OIH));
+            ptr_table__GPIH=((__POINTER )(&(table_type[(t__0OIH)])));
+            lab_type__IPIH=(__UINTEGER_32)(t__0OIH |  1);
+            next__FPIH=((__POINTER )(NULL));
+            result__HPIH=((__POINTER *)ptr_table__GPIH)[ 0];
+            if ((result__HPIH == (void *)NULL)) {
+              result__HPIH=new_lab__MRJ(lab_type__IPIH);
+              next__FPIH=(void *)((unsigned long)result__HPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPIH)));
+              ((__POINTER *)next__FPIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GPIH)[ 0]=next__FPIH;
             } else {
-              next__RCCH=((__POINTER *)result__TCCH)[ 0];
-              if ((next__RCCH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TCCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__VCCH <<  1)) <=  4096)) {
-                  next__RCCH=(void *)((unsigned long)result__TCCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VCCH)));
+              next__FPIH=((__POINTER *)result__HPIH)[ 0];
+              if ((next__FPIH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HPIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JPIH <<  1)) <=  4096)) {
+                  next__FPIH=(void *)((unsigned long)result__HPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPIH)));
                 } else {
-                  next__RCCH=new_lab__ARJ(lab_type__UCCH);
+                  next__FPIH=new_lab__MRJ(lab_type__IPIH);
                 };
-                ((__POINTER *)next__RCCH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SCCH)[ 0]=next__RCCH;
+                ((__POINTER *)next__FPIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GPIH)[ 0]=next__FPIH;
               } else {
-                ((__POINTER *)result__TCCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RCCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__TCCH=next__RCCH;
+                ((__POINTER *)result__HPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__HPIH=next__FPIH;
               };
             };
-            ptr__BCCH=result__TCCH;
-          };
-          result__ACCH=((__LIP_CALL *)ptr__BCCH);
-          *(result__ACCH) = *(LIP_CALL__);
-        };
-        Self__ICCH=((__LIP_CALL *)result__ACCH);
-        Self__ICCH->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ=p__JCCH;
-        Self__ICCH->name__YNTE=n__KCCH;
-        Self__ICCH->argument__NNTE=NULL;
-        result__NUEE=result__ACCH;
-      } else {
-        result__NUEE=readlip_expr_base__GVEE(Self__TZ4B);
-      };
-      p__AVEE=current_position__3WF();
-      result__KELE=NULL;
-      ptr__LELE=((__POINTER )(NULL));
-      typ_id__QELE= 0;
-      sz__NELE=((__UINTEGER_32 )sizeof(__LIP_CALL));
-      if ((sz__NELE ==  0)) {
-        result__KELE=LIP_CALL__;
-      } else {
-        typ_id__QELE=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__NELE);
-        if ((typ_id__QELE == (__INTEGER)(-  1))) {
-          a__WX4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__XX4G=(__UINTEGER_32)((__UINTEGER_32)(sz__NELE + a__WX4G) & (__UINTEGER_32)(~ a__WX4G));
-          ptr_table__XCCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XX4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__WCCH=((__POINTER )(NULL));
-          result__YCCH=((__POINTER *)ptr_table__XCCH)[ 0];
-          if ((result__YCCH == (void *)NULL)) {
-            result__YCCH=new_lab__ARJ(new_size__XX4G);
-            next__WCCH=(void *)((unsigned long)result__YCCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XX4G)));
-            ((__POINTER *)next__WCCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XCCH)[ 0]=next__WCCH;
-          } else {
-            next__WCCH=((__POINTER *)result__YCCH)[ 0];
-            if ((next__WCCH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YCCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__XX4G <<  1)) <=  4096)) {
-                next__WCCH=(void *)((unsigned long)result__YCCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XX4G)));
+            ptr__VOIH=result__HPIH;
+          };
+          result__UOIH=((__LIP_CALL *)ptr__VOIH);
+          *(result__UOIH) = *(LIP_CALL__);
+        };
+        Self__2OIH=((__LIP_CALL *)result__UOIH);
+        Self__2OIH->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ=p__3OIH;
+        Self__2OIH->name__S1TE=n__4OIH;
+        Self__2OIH->argument__H1TE=NULL;
+        result__WBFE=result__UOIH;
+      } else {
+        result__WBFE=readlip_expr_base__PCFE(Self__5Z4B);
+      };
+      p__JCFE=current_position__JXF();
+      result__TTLE=NULL;
+      ptr__UTLE=((__POINTER )(NULL));
+      typ_id__ZTLE= 0;
+      sz__WTLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
+      if ((sz__WTLE ==  0)) {
+        result__TTLE=LIP_CALL__;
+      } else {
+        typ_id__ZTLE=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WTLE);
+        if ((typ_id__ZTLE == (__INTEGER)(-  1))) {
+          a__LDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__MDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__WTLE + a__LDFH) & (__UINTEGER_32)(~ a__LDFH));
+          ptr_table__LPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__KPIH=((__POINTER )(NULL));
+          result__MPIH=((__POINTER *)ptr_table__LPIH)[ 0];
+          if ((result__MPIH == (void *)NULL)) {
+            result__MPIH=new_lab__MRJ(new_size__MDFH);
+            next__KPIH=(void *)((unsigned long)result__MPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDFH)));
+            ((__POINTER *)next__KPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LPIH)[ 0]=next__KPIH;
+          } else {
+            next__KPIH=((__POINTER *)result__MPIH)[ 0];
+            if ((next__KPIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MPIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MDFH <<  1)) <=  4096)) {
+                next__KPIH=(void *)((unsigned long)result__MPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDFH)));
               } else {
-                next__WCCH=new_lab__ARJ(new_size__XX4G);
+                next__KPIH=new_lab__MRJ(new_size__MDFH);
               };
-              ((__POINTER *)next__WCCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XCCH)[ 0]=next__WCCH;
+              ((__POINTER *)next__KPIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LPIH)[ 0]=next__KPIH;
             } else {
-              ((__POINTER *)result__YCCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WCCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__YCCH=next__WCCH;
-            };
-          };
-          ptr__LELE=result__YCCH;
-        } else {
-          t__1X4G=((__UINTEGER_32 )typ_id__QELE);
-          a__0X4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__5CCH=(__UINTEGER_32)((__UINTEGER_32)(sz__NELE + a__0X4G) & (__UINTEGER_32)(~ a__0X4G));
-          ptr_table__2CCH=((__POINTER )(&(table_type[(t__1X4G)])));
-          lab_type__4CCH=(__UINTEGER_32)(t__1X4G |  1);
-          next__1CCH=((__POINTER )(NULL));
-          result__3CCH=((__POINTER *)ptr_table__2CCH)[ 0];
-          if ((result__3CCH == (void *)NULL)) {
-            result__3CCH=new_lab__ARJ(lab_type__4CCH);
-            next__1CCH=(void *)((unsigned long)result__3CCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5CCH)));
-            ((__POINTER *)next__1CCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2CCH)[ 0]=next__1CCH;
-          } else {
-            next__1CCH=((__POINTER *)result__3CCH)[ 0];
-            if ((next__1CCH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3CCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5CCH <<  1)) <=  4096)) {
-                next__1CCH=(void *)((unsigned long)result__3CCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5CCH)));
+              ((__POINTER *)result__MPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MPIH=next__KPIH;
+            };
+          };
+          ptr__UTLE=result__MPIH;
+        } else {
+          t__QDFH=((__UINTEGER_32 )typ_id__ZTLE);
+          a__PDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__TPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WTLE + a__PDFH) & (__UINTEGER_32)(~ a__PDFH));
+          ptr_table__QPIH=((__POINTER )(&(table_type[(t__QDFH)])));
+          lab_type__SPIH=(__UINTEGER_32)(t__QDFH |  1);
+          next__PPIH=((__POINTER )(NULL));
+          result__RPIH=((__POINTER *)ptr_table__QPIH)[ 0];
+          if ((result__RPIH == (void *)NULL)) {
+            result__RPIH=new_lab__MRJ(lab_type__SPIH);
+            next__PPIH=(void *)((unsigned long)result__RPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPIH)));
+            ((__POINTER *)next__PPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QPIH)[ 0]=next__PPIH;
+          } else {
+            next__PPIH=((__POINTER *)result__RPIH)[ 0];
+            if ((next__PPIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RPIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TPIH <<  1)) <=  4096)) {
+                next__PPIH=(void *)((unsigned long)result__RPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPIH)));
               } else {
-                next__1CCH=new_lab__ARJ(lab_type__4CCH);
+                next__PPIH=new_lab__MRJ(lab_type__SPIH);
               };
-              ((__POINTER *)next__1CCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2CCH)[ 0]=next__1CCH;
+              ((__POINTER *)next__PPIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QPIH)[ 0]=next__PPIH;
             } else {
-              ((__POINTER *)result__3CCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1CCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__3CCH=next__1CCH;
+              ((__POINTER *)result__RPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RPIH=next__PPIH;
             };
           };
-          ptr__LELE=result__3CCH;
+          ptr__UTLE=result__RPIH;
         };
-        result__KELE=((__LIP_CALL *)ptr__LELE);
-        *(result__KELE) = *(LIP_CALL__);
+        result__TTLE=((__LIP_CALL *)ptr__UTLE);
+        *(result__TTLE) = *(LIP_CALL__);
       };
-      Self__XLVE=((__LIP_CALL *)result__KELE);
-      Self__XLVE->parent_lip_code__R14B.parent_itm_object__TDE.position__BDJ=p__AVEE;
-      Self__XLVE->name__YNTE=nam__YZ4B;
-      Self__XLVE->argument__NNTE=result__NUEE;
-      result__VZ4B=result__KELE;
+      Self__21VE=((__LIP_CALL *)result__TTLE);
+      Self__21VE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ=p__JCFE;
+      Self__21VE->name__S1TE=nam__E04B;
+      Self__21VE->argument__H1TE=result__WBFE;
+      result__B04B=result__TTLE;
     } else {
-      result__VZ4B=readlip_expr_base__GVEE(Self__TZ4B);
+      result__B04B=readlip_expr_base__PCFE(Self__5Z4B);
     };
   };
-  return(result__VZ4B);
+  return(result__B04B);
 }
 
-static void* readlip_expr_base__GVEE(__PARSER *Self__HVEE)
+static void* readlip_expr_base__PCFE(__PARSER *Self__QCFE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__JVEE;
-  __POSITION pos__HQTG,pos__JQTG,pos__LQTG,p__M5QE;
-  void *result__1APE;
-  __LIP_VALUE *result__NXRE,*Self__EAWE;
-  __POINTER ptr__OXRE,ptr_table__HDCH,next__GDCH,result__IDCH;
-  __POINTER ptr_table__MDCH,next__LDCH,result__NDCH;
-  __INTEGER typ_id__TXRE;
-  __UINTEGER_32 sz__QXRE,a__4X4G,new_size__5X4G,t__DY4G,a__CY4G;
-  __UINTEGER_32 new_size__PDCH,lab_type__ODCH;
-  __BOOLEAN result__ADCH,result__DDCH,__tmp__IBPE,__tmp__YBPE;
-  __BOOLEAN result__G0PE,__tmp__NCPE;
-  __CHARACTER result__BDCH,result__EDCH;
-  result__JVEE=NULL;
-  result__ADCH=FALSE__;
-  if ((! read_space__RRD())) {
-    result__ADCH=FALSE__;
+  void *result__SCFE;
+  __POSITION pos__BCZG,pos__DCZG,pos__FCZG,p__KPRE;
+  void *result__JRPE;
+  __LIP_VALUE *result__VGSE,*Self__USWE;
+  __POINTER ptr__WGSE,ptr_table__1PIH,next__0PIH,result__2PIH;
+  __POINTER ptr_table__AQIH,next__5PIH,result__BQIH;
+  __INTEGER typ_id__1GSE;
+  __UINTEGER_32 sz__YGSE,a__TDFH,new_size__UDFH,t__YDFH,a__XDFH;
+  __UINTEGER_32 new_size__DQIH,lab_type__CQIH;
+  __BOOLEAN result__UPIH,result__XPIH,__tmp__WRPE,__tmp__GSPE;
+  __BOOLEAN result__FMQE,__tmp__1SPE;
+  __CHARACTER result__VPIH,result__YPIH;
+  result__SCFE=NULL;
+  result__UPIH=FALSE__;
+  if ((! read_space__3RD())) {
+    result__UPIH=FALSE__;
   } else {
-    result__BDCH='\0';
-    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-      result__BDCH=((__CHARACTER )(( 0)));
+    result__VPIH='\0';
+    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+      result__VPIH=((__CHARACTER )(( 0)));
     } else {
-      result__BDCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+      result__VPIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
     };
-    if ((result__BDCH == '(')) {
-      position__GBC=(__INTEGER)(position__GBC +  1);
-      result__ADCH=TRUE__;
+    if ((result__VPIH == '(')) {
+      position__SBC=(__INTEGER)(position__SBC +  1);
+      result__UPIH=TRUE__;
     };
   };
-  if (result__ADCH) {
-    result__JVEE=readlip_expr_operator__AOZB(Self__HVEE);
-    if (((void *)result__JVEE == (void *)NULL)) {
-      pos__HQTG=current_position__3WF();
-      put_error__text__4MG( 0,(&__string_227));
-      put_position__IOG(pos__HQTG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+  if (result__UPIH) {
+    result__SCFE=readlip_expr_operator__MOZB(Self__QCFE);
+    if (((void *)result__SCFE == (void *)NULL)) {
+      pos__BCZG=current_position__JXF();
+      put_error__text__KNG( 0,(&__string_237));
+      put_position__UOG(pos__BCZG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
-    result__DDCH=FALSE__;
-    if ((! read_space__RRD())) {
-      result__DDCH=FALSE__;
+    result__XPIH=FALSE__;
+    if ((! read_space__3RD())) {
+      result__XPIH=FALSE__;
     } else {
-      result__EDCH='\0';
-      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
-        result__EDCH=((__CHARACTER )(( 0)));
+      result__YPIH='\0';
+      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
+        result__YPIH=((__CHARACTER )(( 0)));
       } else {
-        result__EDCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
+        result__YPIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
       };
-      if ((result__EDCH == ')')) {
-        position__GBC=(__INTEGER)(position__GBC +  1);
-        result__DDCH=TRUE__;
+      if ((result__YPIH == ')')) {
+        position__SBC=(__INTEGER)(position__SBC +  1);
+        result__XPIH=TRUE__;
       };
     };
-    if ((! result__DDCH)) {
-      pos__JQTG=current_position__3WF();
-      put_error__text__4MG( 2,(&__string_225));
-      put_position__IOG(pos__JQTG);
-      put_string__I1F(msg_err__DNG);
-      if ((type_error__CNG !=  2)) {
+    if ((! result__XPIH)) {
+      pos__DCZG=current_position__JXF();
+      put_error__text__KNG( 2,(&__string_235));
+      put_position__UOG(pos__DCZG);
+      put_string__U1F(msg_err__PNG);
+      if ((type_error__ONG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    result__1APE=NULL;
-    if (read_integer__U1P()) {
-      result__1APE=get__IWRE(LIP_INTEGER__,((__INTEGER )last_integer__NRO));
-      __tmp__IBPE=TRUE__;
+    result__JRPE=NULL;
+    if (read_integer__A2P()) {
+      result__JRPE=get__QFSE(LIP_INTEGER__,((__INTEGER )last_integer__ZRO));
+      __tmp__WRPE=TRUE__;
     } else {
-      __tmp__IBPE=FALSE__;
+      __tmp__WRPE=FALSE__;
     };
-    if (__tmp__IBPE) {
-      __tmp__YBPE=TRUE__;
+    if (__tmp__WRPE) {
+      __tmp__GSPE=TRUE__;
     } else {
-      result__G0PE=read_string__5EQ();
-      if (result__G0PE) {
-        result__1APE=get__3HEF(LIP_STRING__,last_string__2ZC);
+      result__FMQE=read_string__LFQ();
+      if (result__FMQE) {
+        result__JRPE=get__N2EF(LIP_STRING__,last_string__I0C);
       };
-      __tmp__YBPE=result__G0PE;
+      __tmp__GSPE=result__FMQE;
     };
-    if ((! __tmp__YBPE)) {
-      if (read_cap_identifier__GZJ()) {
-        if (((void *)last_string__2ZC == (void *)(&__string_42))) {
-          result__1APE=true__VDKF;
-          __tmp__NCPE=TRUE__;
+    if ((! __tmp__GSPE)) {
+      if (read_cap_identifier__SZJ()) {
+        if (((void *)last_string__I0C == (void *)(&__string_42))) {
+          result__JRPE=true__5TKF;
+          __tmp__1SPE=TRUE__;
         } else {
-          __tmp__NCPE=FALSE__;
+          __tmp__1SPE=FALSE__;
         };
-        if ((! __tmp__NCPE)) {
-          if (((void *)last_string__2ZC == (void *)(&__string_43))) {
-            result__1APE=LIP_BOOLEAN__;
+        if ((! __tmp__1SPE)) {
+          if (((void *)last_string__I0C == (void *)(&__string_43))) {
+            result__JRPE=LIP_BOOLEAN__;
           } else {
-            pos__LQTG=current_position__3WF();
-            put_error__text__4MG( 0,(&__string_320));
-            put_position__IOG(pos__LQTG);
-            put_string__I1F(msg_err__DNG);
-            if ((type_error__CNG !=  2)) {
+            pos__FCZG=current_position__JXF();
+            put_error__text__KNG( 0,(&__string_330));
+            put_position__UOG(pos__FCZG);
+            put_string__U1F(msg_err__PNG);
+            if ((type_error__ONG !=  2)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    if (((void *)result__1APE != (void *)NULL)) {
-      p__M5QE=current_position__3WF();
-      result__NXRE=NULL;
-      ptr__OXRE=((__POINTER )(NULL));
-      typ_id__TXRE= 0;
-      sz__QXRE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
-      if ((sz__QXRE ==  0)) {
-        result__NXRE=LIP_VALUE__;
-      } else {
-        typ_id__TXRE=-1;
-        clone_allocation_size__RSB=(__UINTEGER_32)(clone_allocation_size__RSB + sz__QXRE);
-        if ((typ_id__TXRE == (__INTEGER)(-  1))) {
-          a__4X4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__5X4G=(__UINTEGER_32)((__UINTEGER_32)(sz__QXRE + a__4X4G) & (__UINTEGER_32)(~ a__4X4G));
-          ptr_table__HDCH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5X4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__GDCH=((__POINTER )(NULL));
-          result__IDCH=((__POINTER *)ptr_table__HDCH)[ 0];
-          if ((result__IDCH == (void *)NULL)) {
-            result__IDCH=new_lab__ARJ(new_size__5X4G);
-            next__GDCH=(void *)((unsigned long)result__IDCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5X4G)));
-            ((__POINTER *)next__GDCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HDCH)[ 0]=next__GDCH;
-          } else {
-            next__GDCH=((__POINTER *)result__IDCH)[ 0];
-            if ((next__GDCH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IDCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__5X4G <<  1)) <=  4096)) {
-                next__GDCH=(void *)((unsigned long)result__IDCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5X4G)));
+    if (((void *)result__JRPE != (void *)NULL)) {
+      p__KPRE=current_position__JXF();
+      result__VGSE=NULL;
+      ptr__WGSE=((__POINTER )(NULL));
+      typ_id__1GSE= 0;
+      sz__YGSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
+      if ((sz__YGSE ==  0)) {
+        result__VGSE=LIP_VALUE__;
+      } else {
+        typ_id__1GSE=-1;
+        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YGSE);
+        if ((typ_id__1GSE == (__INTEGER)(-  1))) {
+          a__TDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__UDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__YGSE + a__TDFH) & (__UINTEGER_32)(~ a__TDFH));
+          ptr_table__1PIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__0PIH=((__POINTER )(NULL));
+          result__2PIH=((__POINTER *)ptr_table__1PIH)[ 0];
+          if ((result__2PIH == (void *)NULL)) {
+            result__2PIH=new_lab__MRJ(new_size__UDFH);
+            next__0PIH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UDFH)));
+            ((__POINTER *)next__0PIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1PIH)[ 0]=next__0PIH;
+          } else {
+            next__0PIH=((__POINTER *)result__2PIH)[ 0];
+            if ((next__0PIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2PIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UDFH <<  1)) <=  4096)) {
+                next__0PIH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UDFH)));
               } else {
-                next__GDCH=new_lab__ARJ(new_size__5X4G);
+                next__0PIH=new_lab__MRJ(new_size__UDFH);
               };
-              ((__POINTER *)next__GDCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HDCH)[ 0]=next__GDCH;
+              ((__POINTER *)next__0PIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1PIH)[ 0]=next__0PIH;
             } else {
-              ((__POINTER *)result__IDCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GDCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__IDCH=next__GDCH;
-            };
-          };
-          ptr__OXRE=result__IDCH;
-        } else {
-          t__DY4G=((__UINTEGER_32 )typ_id__TXRE);
-          a__CY4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__PDCH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXRE + a__CY4G) & (__UINTEGER_32)(~ a__CY4G));
-          ptr_table__MDCH=((__POINTER )(&(table_type[(t__DY4G)])));
-          lab_type__ODCH=(__UINTEGER_32)(t__DY4G |  1);
-          next__LDCH=((__POINTER )(NULL));
-          result__NDCH=((__POINTER *)ptr_table__MDCH)[ 0];
-          if ((result__NDCH == (void *)NULL)) {
-            result__NDCH=new_lab__ARJ(lab_type__ODCH);
-            next__LDCH=(void *)((unsigned long)result__NDCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PDCH)));
-            ((__POINTER *)next__LDCH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MDCH)[ 0]=next__LDCH;
-          } else {
-            next__LDCH=((__POINTER *)result__NDCH)[ 0];
-            if ((next__LDCH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NDCH - (unsigned long)begin_memory__DVH)))) &  4095) + (__UINTEGER_32)(new_size__PDCH <<  1)) <=  4096)) {
-                next__LDCH=(void *)((unsigned long)result__NDCH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PDCH)));
+              ((__POINTER *)result__2PIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__2PIH=next__0PIH;
+            };
+          };
+          ptr__WGSE=result__2PIH;
+        } else {
+          t__YDFH=((__UINTEGER_32 )typ_id__1GSE);
+          a__XDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__DQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YGSE + a__XDFH) & (__UINTEGER_32)(~ a__XDFH));
+          ptr_table__AQIH=((__POINTER )(&(table_type[(t__YDFH)])));
+          lab_type__CQIH=(__UINTEGER_32)(t__YDFH |  1);
+          next__5PIH=((__POINTER )(NULL));
+          result__BQIH=((__POINTER *)ptr_table__AQIH)[ 0];
+          if ((result__BQIH == (void *)NULL)) {
+            result__BQIH=new_lab__MRJ(lab_type__CQIH);
+            next__5PIH=(void *)((unsigned long)result__BQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQIH)));
+            ((__POINTER *)next__5PIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AQIH)[ 0]=next__5PIH;
+          } else {
+            next__5PIH=((__POINTER *)result__BQIH)[ 0];
+            if ((next__5PIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BQIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DQIH <<  1)) <=  4096)) {
+                next__5PIH=(void *)((unsigned long)result__BQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQIH)));
               } else {
-                next__LDCH=new_lab__ARJ(lab_type__ODCH);
+                next__5PIH=new_lab__MRJ(lab_type__CQIH);
               };
-              ((__POINTER *)next__LDCH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MDCH)[ 0]=next__LDCH;
+              ((__POINTER *)next__5PIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AQIH)[ 0]=next__5PIH;
             } else {
-              ((__POINTER *)result__NDCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LDCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__NDCH=next__LDCH;
+              ((__POINTER *)result__BQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__BQIH=next__5PIH;
             };
           };
-          ptr__OXRE=result__NDCH;
+          ptr__WGSE=result__BQIH;
         };
-        result__NXRE=((__LIP_VALUE *)ptr__OXRE);
-        *(result__NXRE) = *(LIP_VALUE__);
+        result__VGSE=((__LIP_VALUE *)ptr__WGSE);
+        *(result__VGSE) = *(LIP_VALUE__);
       };
-      Self__EAWE=((__LIP_VALUE *)result__NXRE);
-      Self__EAWE->parent_lip_code__RWEE.parent_itm_object__TDE.position__BDJ=p__M5QE;
-      Self__EAWE->value__XXTE=result__1APE;
-      result__JVEE=result__NXRE;
+      Self__USWE=((__LIP_VALUE *)result__VGSE);
+      Self__USWE->parent_lip_code__0DFE.parent_itm_object__5DE.position__NDJ=p__KPRE;
+      Self__USWE->value__RFUE=result__JRPE;
+      result__SCFE=result__VGSE;
     };
   };
-  return(result__JVEE);
+  return(result__SCFE);
 }
 
 //==========================//
diff --git a/shorter/javadoc.li b/shorter/javadoc.li
index 8873547..c5c392e 100644
--- a/shorter/javadoc.li
+++ b/shorter/javadoc.li
@@ -40,18 +40,21 @@
   "<br><font FACE=\"Sans-serif\" color=\"#000000\"><B>" + token + "</B></font>";
 
   - comment_slot_line :=
-  "<br><em><strong><font color=\"#707070\">&nbsp &nbsp &nbsp &nbsp " + token + "</font></strong></em>";
+  "<dd>" + token + "</dd>";
       
   - slot := 
   "<strong><font color=\"#0000FF\">" + token + "</font></strong>";
   
   - slot_style :=
-  "<strong><font color=\"#FF0000\">&nbsp &nbsp " + token + " </font></strong>";
+  "<dd><strong><font color=\"#FF0000\">" + token + " </font></strong>";
   
   - local := token;  
 
   - block := 
   "<font color=\"#FF0000\">" + token + "</font>";  
+
+  - warning := 
+  "<font color=\"#FF0000\"><b>" + token + "</b></font><br>";  
   
   //
   // Java doc style.
@@ -64,13 +67,17 @@
   - table_item := "<tr class=\"TableRowColor\" bgcolor=\"white\"><td>" + token + "</td></tr>";
   
   - table_slot_name := "<code><b><a href=\"#"+token+"\">" + token + "</a></b></code><br>";
-  - table_slot_comment := "<br>"+ token;
+  - table_slot_comment := token;
   
   - table_end := "</tbody></table>&nbsp;";
   
   - sub_title := "</p><table summary=\"\" width=\"100%\" border=\"1\" cellpadding=\"3\" cellspacing=\"0\"><tbody><tr class=\"TableHeadingColor\" bgcolor=\"#ccccff\"><td colspan=\"1\"><font size=\"+2\"><b>" + token + "</b></font></td></tr></tbody></table>"; 
   
-  - slot_title := "<a name=\"" + token + "\"><!-- --></a><hr><h3>" + token + "</h3>";
+  - slot_title := "</dl><a name=\"" + token + "\"><!-- --></a><hr><h3>" + token + "</h3><dl>";
+  
+  - subsub_title := "<dt><b>" + token + "</b></dt>";
+  
+  - prototype_path := "<dd><code>" + token + "</code></dd><br>";
   
   //
   // Recursive Option.
diff --git a/src/item/itm_slot.li b/src/item/itm_slot.li
index f334e5e..b292c01 100644
--- a/src/item/itm_slot.li
+++ b/src/item/itm_slot.li
@@ -294,8 +294,7 @@ Section Public
     };    
     shorter_profile_intern_in buf;
     // Result.
-    (result_type != ITM_TYPE_SIMPLE.type_void).if {
-      buf.add_last ' ';      
+    (result_type != ITM_TYPE_SIMPLE.type_void).if {      
       buf.add_last ':';      
       result_type.shorter_in buf;
     };
@@ -330,6 +329,7 @@ Section ITM_SLOT
     (i <= argument_list.upper).if {
       buf.add_last ' ';
       argument_list.last.shorter_in buf;
+      buf.add_last ' ';
     };
   );
   
diff --git a/src/item/itm_slot_operator.li b/src/item/itm_slot_operator.li
index 7f91857..d22ca37 100644
--- a/src/item/itm_slot_operator.li
+++ b/src/item/itm_slot_operator.li
@@ -98,6 +98,7 @@ Section ITM_SLOT
       buf.add_last '\'';
       put pretty_name to buf like (ALIAS_STR.short_slot);
       buf.add_last '\'';
+      buf.add_last ' ';
     }.elseif {name.has_prefix (ALIAS_STR.slot_infix)} then {
       argument_list.first.shorter_in buf;
       buf.add_last ' ';
@@ -105,15 +106,22 @@ Section ITM_SLOT
       put pretty_name to buf like (ALIAS_STR.short_slot);
       buf.add_last '\'';
       (priority_and_level != 0).if {
-          
+        buf.add_last ' ';
+        put associativity to buf like (ALIAS_STR.short_keyword);
+        buf.add_last ' ';
+        string_tmp.clear;
+        priority.append_in string_tmp;
+        put string_tmp to buf like (ALIAS_STR.short_keyword);
       };
       buf.add_last ' ';
       argument_list.second.shorter_in buf;
+      buf.add_last ' ';
     } else {
       buf.add_last '\'';
       put pretty_name to buf like (ALIAS_STR.short_slot);
       buf.add_last '\'';
       buf.add_last ' ';
       argument_list.first.shorter_in buf;
+      buf.add_last ' ';
     };    
   );
\ No newline at end of file
diff --git a/src/tools/alias_str.li b/src/tools/alias_str.li
index 88a9546..23ee3fa 100644
--- a/src/tools/alias_str.li
+++ b/src/tools/alias_str.li
@@ -206,6 +206,7 @@ Section Public
   - short_block       :STRING_CONSTANT := "block";
   - short_external    :STRING_CONSTANT := "external";
   - short_local       :STRING_CONSTANT := "local";
+  - short_warning     :STRING_CONSTANT := "warning";
 
   - short_title       :STRING_CONSTANT := "title";
   - short_table_begin :STRING_CONSTANT := "table_begin";
@@ -215,6 +216,8 @@ Section Public
   - short_table_end   :STRING_CONSTANT := "table_end";
   - short_sub_title   :STRING_CONSTANT := "sub_title";
   - short_slot_title  :STRING_CONSTANT := "slot_title";
+  - short_subsub_title  :STRING_CONSTANT := "subsub_title";
+  - short_prototype_path:STRING_CONSTANT := "prototype_path";
   
   
   - short_index       :STRING_CONSTANT := "index";
@@ -479,6 +482,7 @@ Section Public
     list.add short_block;
     list.add short_external;
     list.add short_local;
+    list.add short_warning;
     
     list.add short_title;
     list.add short_table_begin;
@@ -488,7 +492,8 @@ Section Public
     list.add short_table_end;
     list.add short_sub_title;
     list.add short_slot_title;
-
+    list.add short_subsub_title;
+    list.add short_prototype_path;
     
     list.add short_index;
     list.add short_default;
diff --git a/src/type/prototype.li b/src/type/prototype.li
index 4ab553d..604ccce 100644
--- a/src/type/prototype.li
+++ b/src/type/prototype.li
@@ -376,29 +376,32 @@ Section Public
   ( 
     put name to buf like (ALIAS_STR.short_title);
     
+    list_tmp.clear;
+    shorter_get_all_slot_in list_tmp;
+    
     // Table.
-    shorter_table { sl:ITM_SLOT; 
+    shorter_table list_tmp select { sl:ITM_SLOT; 
       sl.id_section.is_inherit_or_insert
     } title "Inherit Summary" in buf;
     
-    shorter_table { sl:ITM_SLOT; 
+    shorter_table list_tmp select { sl:ITM_SLOT; 
       sl.name.has_prefix "create"
     } title "Constructor Summary" in buf;    
     
-    shorter_table { sl:ITM_SLOT; 
+    shorter_table list_tmp select { sl:ITM_SLOT; 
       (! sl.name.has_prefix "create") && {!sl.id_section.is_inherit_or_insert}
     } title "Slot Summary" in buf;    
         
     // Detail.
-    shorter_detail { sl:ITM_SLOT; 
+    shorter_detail list_tmp select { sl:ITM_SLOT; 
       sl.id_section.is_inherit_or_insert
     } title "Inherit Detail" in buf;    
     
-    shorter_detail { sl:ITM_SLOT; 
+    shorter_detail list_tmp select { sl:ITM_SLOT; 
       sl.name.has_prefix "create"
     } title "Constructor Detail" in buf;    
     
-    shorter_detail { sl:ITM_SLOT; 
+    shorter_detail list_tmp select { sl:ITM_SLOT; 
       (! sl.name.has_prefix "create") && {!sl.id_section.is_inherit_or_insert}
     } title "Slot Detail" in buf;    
         
@@ -430,41 +433,91 @@ Section PROTOTYPE
     result     
   );
   
-  - shorter_table sel:BLOCK title t:STRING_CONSTANT in buf:STRING <-
-  ( + is_first:BOOLEAN;
-    + s:ITM_SLOT;
-  
-    is_first := TRUE;
+  - shorter_get_all_slot_in lst:FAST_ARRAY[ITM_SLOT] <-
+  ( + s:ITM_SLOT; 
+    + ps:ITM_TYPE_SIMPLE;
+    + p:PROTOTYPE;
+    + i:INTEGER;
+    
     s := first_slot;
     {s != NULL}.while_do {
+      i := lst.lower;
+      {(i <= lst.upper) && {lst.item i.name != s.name}}.while_do {
+        i := i + 1;
+      };
+      (i > lst.upper).if {
+        lst.add_last s;
+      };
+      s := s.next;
+    };
+    
+    // Parent.
+    s := first_slot;
+    {(s != NULL) && {s.id_section.is_inherit_or_insert}}.while_do {      
+      ps ?= s.result_type;
+      ((ps != NULL) && {s.style = '+'} && {ps.style = ALIAS_STR.keyword_expanded}).if {
+        p := NULL;
+        i := prototype_list.lower;
+        {(i <= prototype_list.upper) && {p = NULL}}.while_do {                              
+          (prototype_list.item i.name = ps.name).if {
+            p := prototype_list.item i;
+          };
+          i := i + 1;
+        };
+        (p != NULL).if {            
+          p.shorter_get_all_slot_in lst;
+        };
+      };      
+      s := s.next;
+    };    
+  );
+        
+  - shorter_table lst:FAST_ARRAY[ITM_SLOT] select sel:BLOCK 
+  title t:STRING_CONSTANT in buf:STRING <-
+  ( + is_first_cur:BOOLEAN;
+    + s:ITM_SLOT; 
+    
+    is_first_cur := TRUE;    
+    (lst.lower).to (lst.upper) do { i:INTEGER;
+      s := lst.item i;
       (sel.value s).if {
-        (is_first).if {
+        (is_first_cur).if {
           put t to buf like (ALIAS_STR.short_table_begin);
-          is_first := FALSE;
+          is_first_cur := FALSE;
         };
         string_tmp.clear;
         string_tmp2.clear;
         s.pretty_name_in string_tmp2;
         put string_tmp2 to string_tmp like (ALIAS_STR.short_table_slot_name);
-        string_tmp2.clear;
+        (
+          (s.id_section.is_inherit_or_insert) && 
+          {(s.style != '+') || {
+              + ts:ITM_TYPE_SIMPLE;
+              ts ?= s.result_type;
+              (ts = NULL) || {ts.style != ALIAS_STR.keyword_expanded}
+          }}
+        ).if {
+          put " No developed." to string_tmp like (ALIAS_STR.short_warning);
+        };
+        string_tmp2.clear;        
         get_all_comment_slot (s.name) in string_tmp2;
         put string_tmp2 to string_tmp like (ALIAS_STR.short_table_slot_comment);
         put string_tmp to buf like (ALIAS_STR.short_table_item);
-      };
-      s := s.next;
-    };
-    (is_first).if_false {
+      };     
+    };    
+    (is_first_cur).if_false {
       put NULL to buf like (ALIAS_STR.short_table_end);
-    };
+    };    
   );
   
-  - shorter_detail sel:BLOCK title t:STRING_CONSTANT in buf:STRING <-
+  - shorter_detail lst:FAST_ARRAY[ITM_SLOT] select sel:BLOCK 
+  title t:STRING_CONSTANT in buf:STRING <-
   ( + is_first:BOOLEAN;
     + s:ITM_SLOT;
       
     is_first := TRUE;
-    s := first_slot;
-    {s != NULL}.while_do {
+    (lst.lower).to (lst.upper) do { i:INTEGER;
+      s := lst.item i;
       (sel.value s).if {
         (is_first).if {
           put t to buf like (ALIAS_STR.short_sub_title);
@@ -473,12 +526,20 @@ Section PROTOTYPE
         string_tmp2.clear;
         s.pretty_name_in string_tmp2;
         put string_tmp2 to buf like (ALIAS_STR.short_slot_title);
+        string_tmp.copy (s.position.prototype.filename);
+        string_tmp.append " line #";
+        s.position.line.append_in string_tmp;
+        put string_tmp to buf like (ALIAS_STR.short_prototype_path);
+        put "Profile:" to buf like (ALIAS_STR.short_subsub_title);
         s.shorter_profile_in buf;
+        put "Description:" to buf like (ALIAS_STR.short_subsub_title);
         string_tmp.clear;
         get_all_comment_slot (s.name) in string_tmp;
-        put string_tmp to buf like (ALIAS_STR.short_table_slot_comment);
-      };
-      s := s.next;
+        put string_tmp to buf like (ALIAS_STR.short_comment_slot_line);
+        put "Parameters:" to buf like (ALIAS_STR.short_subsub_title);
+        put "Contracts:" to buf like (ALIAS_STR.short_subsub_title);
+        put "See also:" to buf like (ALIAS_STR.short_subsub_title);        
+      };      
     };
   );
   
@@ -511,4 +572,6 @@ Section PROTOTYPE
       };      
       s := s.next;
     };
-  );
\ No newline at end of file
+  );
+  
+  - list_tmp:FAST_ARRAY[ITM_SLOT] := FAST_ARRAY[ITM_SLOT].create_with_capacity 256;
\ No newline at end of file

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list