[SCM] Lisaac compiler branch, master, updated. 676f92a6cc2f618f7d1aae178dfe3e99c441230e

Benoit Sonntag sonntag at icps.u-strasbg.fr
Wed Jul 29 19:11:36 UTC 2009


The following commit has been merged in the master branch:
commit 676f92a6cc2f618f7d1aae178dfe3e99c441230e
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Wed Jul 29 21:11:30 2009 +0200

    Shorter profil slot ok

diff --git a/bin/shorter.c b/bin/shorter.c
index 6b848d1..fa97529 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__GFC;
-  __INTEGER capacity__IBS;
-  __CHARACTER *storage__RBS;
+  __INTEGER count__KFC;
+  __INTEGER capacity__MBS;
+  __CHARACTER *storage__VBS;
 };
 __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__WJC;
-  __INTEGER capacity__2FT;
-  void **storage__HGT;
+  __INTEGER upper__0JC;
+  __INTEGER capacity__AGT;
+  void **storage__LGT;
 };
 __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__TJC;
+  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__XJC;
 };
 __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__0HV;
-  __INTEGER capacity__PNV;
-  void **storage__BMV;
+  __INTEGER upper__4HV;
+  __INTEGER capacity__TNV;
+  void **storage__FMV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_TYPE_MONOo_)
@@ -136,7 +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__JXC;
+  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__NXC;
 };
 __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__I2T;
-  void *item__12T;
-  void *next__T2T;
+  void *key__M2T;
+  void *item__52T;
+  void *next__X2T;
 };
 __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__X1T;
-  __INTEGER count__2EZ;
-  void **buckets__21T;
+  __INTEGER capacity__11T;
+  __INTEGER count__AFZ;
+  void **buckets__A2T;
 };
 __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__FQO;
+  __CHARACTER *storage__JQO;
 };
 __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__L5OD;
-  __INTEGER capacity__GBPD;
-  void **storage__BCPD;
+  __INTEGER upper__P5OD;
+  __INTEGER capacity__KBPD;
+  void **storage__FCPD;
 };
 __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__X4I;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__14I;
 };
 __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__XSB;
-  volatile __UINTEGER_32 map_size_and_id__YSB;
-  void *map_next_free__ZSB;
-  void *map_previous_free__0SB;
+  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;
 } __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__0YR;
-  void *next__GZR;
+  void *item__4YR;
+  void *next__KZR;
 };
 __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__JYR;
-  __INTEGER count__PZR;
-  void **buckets__OYR;
+  __INTEGER capacity__NYR;
+  __INTEGER count__TZR;
+  void **buckets__SYR;
 };
 __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__3CJ;
+  __POSITION position__BDJ;
 };
 __ITM_OBJECT ITM_OBJECT_;
 #define ITM_OBJECT__ (&ITM_OBJECT_)
@@ -245,6 +245,7 @@ typedef struct NAMED_struct __NAMED;
 struct NAMED_struct {
   __ITM_OBJECT parent_itm_object__4;
   void *name__LI;
+  __CHARACTER style__VDU;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
@@ -254,17 +255,17 @@ __NAMED NAMED_;
 typedef struct PROTOTYPE_struct __PROTOTYPE;
 struct PROTOTYPE_struct {
   __NAMED parent_named__5;
-  void *source__3AC;
-  void *last_slot__40C;
-  void *type_style__H2C;
-  void *shortname__VHE;
-  void *default_value__DUE;
-  void *type_c__4VE;
-  __INTEGER index__FMG;
-  void *filename__EPG;
-  void *first_slot__SFZB;
-  void *idf_generic_list__EME;
-  void *slot_list__MUS;
+  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;
 };
 __PROTOTYPE PROTOTYPE_;
 #define PROTOTYPE__ (&PROTOTYPE_)
@@ -276,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__J2R;
-  void *next__U2R;
+  void *key__N2R;
+  void *next__Y2R;
 };
 __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)
@@ -286,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__Y1R;
-  __INTEGER count__32R;
-  void **buckets__31R;
+  __INTEGER capacity__21R;
+  __INTEGER count__B3R;
+  void **buckets__B2R;
 };
 __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)
@@ -300,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__IFS;
+  __UINTEGER_8 flag__MFS;
 };
 __TYPE_FULL TYPE_FULL_;
 #define TYPE_FULL__ (&TYPE_FULL_)
@@ -318,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__C4R;
-  __INTEGER capacity__E4R;
-  void **storage__A5R;
+  __INTEGER upper__G4R;
+  __INTEGER capacity__I4R;
+  void **storage__E5R;
 };
 __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)
@@ -329,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__IAB;
+  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__LAB;
 };
 __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 #define FAST_ARRAYoTYPE_IDo__ (&FAST_ARRAYoTYPE_IDo_)
@@ -339,7 +340,7 @@ __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 typedef struct ENTRY_struct __ENTRY;
 struct ENTRY_struct {
   void *path__BD;
-  void *name__FNT;
+  void *name__JNT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
@@ -348,7 +349,7 @@ __ENTRY ENTRY_;
 #define __ENTRY_UNIX__ 21
 typedef struct ENTRY_UNIX_struct __ENTRY_UNIX;
 struct ENTRY_UNIX_struct {
-  __ENTRY parent_entry__IED;
+  __ENTRY parent_entry__MED;
 };
 __ENTRY_UNIX ENTRY_UNIX_;
 #define ENTRY_UNIX__ (&ENTRY_UNIX_)
@@ -357,7 +358,7 @@ __ENTRY_UNIX ENTRY_UNIX_;
 #define __DIRECTORY__ 22
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__YERD;
+  void *list__2ERD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -367,8 +368,8 @@ __DIRECTORY DIRECTORY_;
 typedef struct DIRECTORY_UNIX_struct __DIRECTORY_UNIX;
 struct DIRECTORY_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__JED;
-  __DIRECTORY parent_directory__KED;
+  __ENTRY_UNIX parent_entry_unix__NED;
+  __DIRECTORY parent_directory__OED;
 };
 __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define DIRECTORY_UNIX__ (&DIRECTORY_UNIX_)
@@ -377,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__1CT;
-  void *next__GDT;
-  void *item__XX3;
+  void *key__5CT;
+  void *next__KDT;
+  void *item__1X3;
 };
 __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_)
@@ -388,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__KCT;
-  __INTEGER count__YLY;
-  void **buckets__PCT;
+  __INTEGER capacity__OCT;
+  __INTEGER count__2LY;
+  void **buckets__TCT;
 };
 __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -400,12 +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__D5;
-  void *id_section__I1C;
-  void *result_type__K4FC;
-  void *next__4GHC;
-  void *comment__GJJD;
-  __CHARACTER affect__Z5FC;
+  __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;
 };
 __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 #define ITM_SLOT__ (&ITM_SLOT_)
@@ -415,8 +417,8 @@ __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__4T5B;
-  void *pretty_name__F0HC;
+  __ITM_SLOT parent_itm_slot__CU5B;
+  void *pretty_name__J0HC;
 };
 __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define ITM_SLOT_OPERATOR__ (&ITM_SLOT_OPERATOR_)
@@ -425,9 +427,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__B1S;
-  void *item__KSOB;
-  void *next__N1S;
+  void *key__F1S;
+  void *item__OSOB;
+  void *next__R1S;
 };
 __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_)
@@ -436,9 +438,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__Q0S;
-  __INTEGER count__W1S;
-  void **buckets__V0S;
+  __INTEGER capacity__U0S;
+  __INTEGER count__01S;
+  void **buckets__Z0S;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -447,7 +449,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__PCD;
+  __INTEGER upper__TCD;
 };
 __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 #define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)
@@ -457,10 +459,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__4TEC;
-  void *first_link__UTEC;
-  void *last_link__3TEC;
-  void *mem_lnk__AUEC;
+  __INTEGER mem_idx__CUEC;
+  void *first_link__YTEC;
+  void *last_link__BUEC;
+  void *mem_lnk__EUEC;
 };
 __LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
 #define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)
@@ -478,7 +480,7 @@ __PARSER PARSER_;
 #define __ITM_ARGUMENT__ 30
 typedef struct ITM_ARGUMENT_struct __ITM_ARGUMENT;
 struct ITM_ARGUMENT_struct {
-  __ITM_OBJECT parent_itm_code__C4M;
+  __ITM_OBJECT parent_itm_code__G4M;
 };
 __ITM_ARGUMENT ITM_ARGUMENT_;
 #define ITM_ARGUMENT__ (&ITM_ARGUMENT_)
@@ -487,9 +489,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__O5GC;
-  __INTEGER capacity__Q5GC;
-  void **storage__MAHC;
+  __INTEGER upper__S5GC;
+  __INTEGER capacity__U5GC;
+  void **storage__QAHC;
 };
 __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)
@@ -498,7 +500,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__VBZB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__ZBZB;
 };
 __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 #define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)
@@ -508,7 +510,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__QJP;
+  void *list_type__UJP;
 };
 __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 #define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)
@@ -518,7 +520,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__LJV;
+  void *value_list__PJV;
 };
 __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 #define ITM_EXPRESSION__ (&ITM_EXPRESSION_)
@@ -528,7 +530,7 @@ __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 typedef struct ITM_RESULT_struct __ITM_RESULT;
 struct ITM_RESULT_struct {
   unsigned long __id;
-  void *value__2KFC;
+  void *value__ALFC;
 };
 __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define ITM_RESULT__ (&ITM_RESULT_)
@@ -537,9 +539,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__5AGC;
-  void *item__SBGC;
-  void *next__KBGC;
+  void *key__DBGC;
+  void *item__WBGC;
+  void *next__OBGC;
 };
 __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)
@@ -548,40 +550,97 @@ __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__M4BC;
-  __INTEGER count__4OGC;
-  void **buckets__TAGC;
+  __INTEGER capacity__Q4BC;
+  __INTEGER count__CPGC;
+  void **buckets__XAGC;
 };
 __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)
 
-// FILE_UNIX
-#define __FILE_UNIX__ 13
-typedef struct FILE_UNIX_struct __FILE_UNIX;
-struct FILE_UNIX_struct {
+// ITM_ARG
+#define __ITM_ARG__ 13
+typedef struct ITM_ARG_struct __ITM_ARG;
+struct ITM_ARG_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__MCF;
-  __POINTER stream__UIRD;
+  __ITM_ARGUMENT parent_itm_argument__NHHB;
+  void *name__P0HC;
+  void *type__Q0HC;
 };
-__FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
-#define FILE_UNIX__ (&FILE_UNIX_)
+__ITM_ARG ITM_ARG_={__ITM_ARG__};
+#define ITM_ARG__ (&ITM_ARG_)
+
+// ITM_ARGS
+#define __ITM_ARGS__ 14
+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_ARGS ITM_ARGS_={__ITM_ARGS__};
+#define ITM_ARGS__ (&ITM_ARGS_)
+
+// ITM_TYPE_BLOCK
+#define __ITM_TYPE_BLOCK__ 15
+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;
+};
+__ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
+#define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
 
 // ITM_TYPE_SIMPLE
-#define __ITM_TYPE_SIMPLE__ 14
+#define __ITM_TYPE_SIMPLE__ 16
 typedef struct ITM_TYPE_SIMPLE_struct __ITM_TYPE_SIMPLE;
 struct ITM_TYPE_SIMPLE_struct {
   unsigned long __id;
-  void *name__0XP;
+  void *name__4XP;
 };
 __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 #define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)
 
+// ITM_TYPE_STYLE
+#define __ITM_TYPE_STYLE__ 17
+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_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
+#define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
+
+// ITM_TYPE_GENERIC
+#define __ITM_TYPE_GENERIC__ 18
+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_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
+#define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
+
+// FILE_UNIX
+#define __FILE_UNIX__ 19
+typedef struct FILE_UNIX_struct __FILE_UNIX;
+struct FILE_UNIX_struct {
+  unsigned long __id;
+  __ENTRY_UNIX parent_entry_unix__QCF;
+  __POINTER stream__YIRD;
+};
+__FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
+#define FILE_UNIX__ (&FILE_UNIX_)
+
 // ITM_TYPE_PARAMETER
-#define __ITM_TYPE_PARAMETER__ 15
+#define __ITM_TYPE_PARAMETER__ 20
 typedef struct ITM_TYPE_PARAMETER_struct __ITM_TYPE_PARAMETER;
 struct ITM_TYPE_PARAMETER_struct {
   unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type__NDE;
+  __ITM_TYPE_SIMPLE parent_itm_type__RDE;
 };
 __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define ITM_TYPE_PARAMETER__ (&ITM_TYPE_PARAMETER_)
@@ -590,9 +649,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__GBBC;
-  __INTEGER capacity__IBBC;
-  void **storage__ECBC;
+  __INTEGER upper__KBBC;
+  __INTEGER capacity__MBBC;
+  void **storage__ICBC;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ (&ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_)
@@ -601,7 +660,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__DME;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__HME;
 };
 __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define FAST_ARRAYoITM_TYPE_PARAMETERo__ (&FAST_ARRAYoITM_TYPE_PARAMETERo_)
@@ -610,55 +669,55 @@ __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__PDE;
+  __ITM_OBJECT parent_itm_object__TDE;
 };
 __LIP_CODE LIP_CODE_;
 #define LIP_CODE__ (&LIP_CODE_)
 
 // LIP_AFFECT
-#define __LIP_AFFECT__ 16
+#define __LIP_AFFECT__ 21
 typedef struct LIP_AFFECT_struct __LIP_AFFECT;
 struct LIP_AFFECT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__ZTPB;
-  void *name__GGFC;
-  void *value__YGFC;
+  __LIP_CODE parent_lip_code__3TPB;
+  void *name__KGFC;
+  void *value__2GFC;
 };
 __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 #define LIP_AFFECT__ (&LIP_AFFECT_)
 
 // LIP_CALL
-#define __LIP_CALL__ 17
+#define __LIP_CALL__ 22
 typedef struct LIP_CALL_struct __LIP_CALL;
 struct LIP_CALL_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__N14B;
-  void *argument__1KTE;
-  void *name__GLTE;
+  __LIP_CODE parent_lip_code__R14B;
+  void *argument__NNTE;
+  void *name__YNTE;
 };
 __LIP_CALL LIP_CALL_={__LIP_CALL__};
 #define LIP_CALL__ (&LIP_CALL_)
 
 // LIP_IF
-#define __LIP_IF__ 18
+#define __LIP_IF__ 23
 typedef struct LIP_IF_struct __LIP_IF;
 struct LIP_IF_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__OOYC;
-  void *condition__QCQD;
-  void *then__GDQD;
-  void *else__3DQD;
+  __LIP_CODE parent_lip_code__SOYC;
+  void *condition__UCQD;
+  void *then__KDQD;
+  void *else__BEQD;
 };
 __LIP_IF LIP_IF_={__LIP_IF__};
 #define LIP_IF__ (&LIP_IF_)
 
 // LIP_PRINT
-#define __LIP_PRINT__ 19
+#define __LIP_PRINT__ 24
 typedef struct LIP_PRINT_struct __LIP_PRINT;
 struct LIP_PRINT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__APYC;
-  void *message__KPTE;
+  __LIP_CODE parent_lip_code__EPYC;
+  void *message__2RTE;
 };
 __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define LIP_PRINT__ (&LIP_PRINT_)
@@ -667,8 +726,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__LEV;
-  void *next__WEV;
+  void *item__PEV;
+  void *next__0EV;
 };
 __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define HASHED_SET_NODEoSTRING_CONSTANTo__ (&HASHED_SET_NODEoSTRING_CONSTANTo_)
@@ -677,51 +736,18 @@ __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__0HT;
-  __INTEGER count__IHY;
-  void **buckets__5DV;
+  __INTEGER capacity__4HT;
+  __INTEGER count__MHY;
+  void **buckets__DEV;
 };
 __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define HASHED_SEToSTRING_CONSTANTo__ (&HASHED_SEToSTRING_CONSTANTo_)
 
-// ITM_TYPE_BLOCK
-#define __ITM_TYPE_BLOCK__ 20
-typedef struct ITM_TYPE_BLOCK_struct __ITM_TYPE_BLOCK;
-struct ITM_TYPE_BLOCK_struct {
-  unsigned long __id;
-  void *type_argument__GMN;
-  void *type_result__QMN;
-};
-__ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
-#define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
-
-// ITM_TYPE_STYLE
-#define __ITM_TYPE_STYLE__ 21
-typedef struct ITM_TYPE_STYLE_struct __ITM_TYPE_STYLE;
-struct ITM_TYPE_STYLE_struct {
-  unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type_simple__RRN;
-  void *style__DYP;
-};
-__ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
-#define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
-
-// ITM_TYPE_GENERIC
-#define __ITM_TYPE_GENERIC__ 22
-typedef struct ITM_TYPE_GENERIC_struct __ITM_TYPE_GENERIC;
-struct ITM_TYPE_GENERIC_struct {
-  unsigned long __id;
-  __ITM_TYPE_STYLE parent_itm_type_style__SRN;
-  void *list_type__NYP;
-};
-__ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
-#define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
-
 // ITM_CODE
 #define __ITM_CODE__ 40
 typedef struct ITM_CODE_struct __ITM_CODE;
 struct ITM_CODE_struct {
-  __ITM_OBJECT parent_itm_object__HDE;
+  __ITM_OBJECT parent_itm_object__LDE;
 };
 __ITM_CODE ITM_CODE_;
 #define ITM_CODE__ (&ITM_CODE_)
@@ -730,9 +756,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__MHL;
-  __INTEGER capacity__KXT;
-  void **storage__VXT;
+  __INTEGER upper__QHL;
+  __INTEGER capacity__OXT;
+  void **storage__ZXT;
 };
 __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)
@@ -741,7 +767,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__BTF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__FTF;
 };
 __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)
@@ -750,9 +776,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__MDQD;
-  __INTEGER capacity__VOTD;
-  void **storage__APTD;
+  __INTEGER upper__QDQD;
+  __INTEGER capacity__CPTD;
+  void **storage__NPTD;
 };
 __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_CODEo__ (&ARRAYED_COLLECTIONoLIP_CODEo_)
@@ -761,7 +787,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__3KYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__BLYC;
 };
 __FAST_ARRAYoLIP_CODEo FAST_ARRAYoLIP_CODEo_;
 #define FAST_ARRAYoLIP_CODEo__ (&FAST_ARRAYoLIP_CODEo_)
@@ -779,53 +805,53 @@ __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__NURD;
-  void **buckets__SURD;
+  __INTEGER capacity__RURD;
+  void **buckets__WURD;
 };
 __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_)
 
 // LIP_BINARY
-#define __LIP_BINARY__ 23
+#define __LIP_BINARY__ 25
 typedef struct LIP_BINARY_struct __LIP_BINARY;
 struct LIP_BINARY_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__MPZB;
-  void *left__2YQD;
-  void *right__5YQD;
-  __CHARACTER operator__CZQD;
+  __LIP_CODE parent_lip_code__QPZB;
+  void *left__AZQD;
+  void *right__DZQD;
+  __CHARACTER operator__GZQD;
 };
 __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 #define LIP_BINARY__ (&LIP_BINARY_)
 
 // LIP_UNARY
-#define __LIP_UNARY__ 24
+#define __LIP_UNARY__ 26
 typedef struct LIP_UNARY_struct __LIP_UNARY;
 struct LIP_UNARY_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__104B;
-  void *value__Z1QD;
-  __CHARACTER operator__21QD;
+  __LIP_CODE parent_lip_code__504B;
+  void *value__31QD;
+  __CHARACTER operator__A2QD;
 };
 __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 #define LIP_UNARY__ (&LIP_UNARY_)
 
 // LIP_INTEGER
-#define __LIP_INTEGER__ 25
+#define __LIP_INTEGER__ 27
 typedef struct LIP_INTEGER_struct __LIP_INTEGER;
 struct LIP_INTEGER_struct {
   unsigned long __id;
-  __INTEGER value__ED0F;
+  __INTEGER value__G31F;
 };
 __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 #define LIP_INTEGER__ (&LIP_INTEGER_)
 
 // LIP_STRING
-#define __LIP_STRING__ 26
+#define __LIP_STRING__ 28
 typedef struct LIP_STRING_struct __LIP_STRING;
 struct LIP_STRING_struct {
   unsigned long __id;
-  void *value__TMTE;
+  void *value__FPTE;
 };
 __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define LIP_STRING__ (&LIP_STRING_)
@@ -834,8 +860,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__P0H;
-  void *name__O2K;
+  __ITM_OBJECT parent_itm_object__T0H;
+  void *name__S2K;
 };
 __ITM_LOCAL ITM_LOCAL_;
 #define ITM_LOCAL__ (&ITM_LOCAL_)
@@ -844,9 +870,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__L0K;
-  __INTEGER capacity__HKU;
-  void **storage__SKU;
+  __INTEGER upper__P0K;
+  __INTEGER capacity__LKU;
+  void **storage__WKU;
 };
 __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)
@@ -855,7 +881,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__U0H;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__Y0H;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
@@ -930,8 +956,8 @@ __SHORTER SHORTER_;
 #define __FILE_SYSTEM__ 57
 typedef struct FILE_SYSTEM_struct __FILE_SYSTEM;
 struct FILE_SYSTEM_struct {
-  void *parent_directory__4ED;
-  int parent_directory__5ED;
+  void *parent_directory__CFD;
+  int parent_directory__DFD;
 };
 __FILE_SYSTEM FILE_SYSTEM_;
 #define FILE_SYSTEM__ (&FILE_SYSTEM_)
@@ -940,9 +966,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__RNBC;
-  void *item__E3GD;
-  void *next__2NBC;
+  void *key__VNBC;
+  void *item__I3GD;
+  void *next__AOBC;
 };
 __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)
@@ -951,9 +977,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__ANBC;
-  __INTEGER count__FOBC;
-  void **buckets__FNBC;
+  __INTEGER capacity__ENBC;
+  __INTEGER count__JOBC;
+  void **buckets__JNBC;
 };
 __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)
@@ -963,8 +989,8 @@ __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRIN
 typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
 struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
   __INTEGER upper__HJ;
-  __INTEGER capacity__NCU;
-  void **storage__0ST;
+  __INTEGER capacity__RCU;
+  void **storage__4ST;
 };
 __ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
 #define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)
@@ -991,8 +1017,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__KVHD;
-  void *next__2NOD;
+  void *item__OVHD;
+  void *next__AOOD;
 };
 __LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
 #define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)
@@ -1010,7 +1036,7 @@ __TYPE TYPE_;
 #define __ARRAYED_COLLECTIONoSLOTo__ 65
 typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
 struct ARRAYED_COLLECTIONoSLOTo_struct {
-  __INTEGER capacity__EES;
+  __INTEGER capacity__IES;
 };
 __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)
@@ -1019,7 +1045,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__J5;
+  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__M5;
 };
 __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define FAST_ARRAYoSLOTo__ (&FAST_ARRAYoSLOTo_)
@@ -1028,7 +1054,7 @@ __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define __LINKED_COLLECTIONoENTRYo__ 67
 typedef struct LINKED_COLLECTIONoENTRYo_struct __LINKED_COLLECTIONoENTRYo;
 struct LINKED_COLLECTIONoENTRYo_struct {
-  __INTEGER upper__E12D;
+  __INTEGER upper__C32D;
 };
 __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define LINKED_COLLECTIONoENTRYo__ (&LINKED_COLLECTIONoENTRYo_)
@@ -1037,11 +1063,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__XERD;
-  __INTEGER mem_idx__NFVE;
-  void *first_link__GFVE;
-  void *mem_lnk__OFVE;
-  void *last_link__PFVE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__1ERD;
+  __INTEGER mem_idx__5HVE;
+  void *first_link__YHVE;
+  void *mem_lnk__AIVE;
+  void *last_link__BIVE;
 };
 __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define LINKED_LISToENTRYo__ (&LINKED_LISToENTRYo_)
@@ -1050,8 +1076,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__ZWVE;
-  void *next__W0DF;
+  void *item__TZVE;
+  void *next__GGEF;
 };
 __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define LINKED_LIST_NODEoENTRYo__ (&LINKED_LIST_NODEoENTRYo_)
@@ -1060,9 +1086,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__VUV;
-  __INTEGER capacity__QYV;
-  void **storage__LZV;
+  __INTEGER upper__ZUV;
+  __INTEGER capacity__UYV;
+  void **storage__PZV;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1071,7 +1097,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__ZTP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__3TP;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1089,8 +1115,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__S5V;
-  void *next__45V;
+  void *item__W5V;
+  void *next__CAW;
 };
 __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1099,9 +1125,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__B5V;
-  __INTEGER count__VHW;
-  void **buckets__G5V;
+  __INTEGER capacity__F5V;
+  __INTEGER count__ZHW;
+  void **buckets__K5V;
 };
 __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1110,9 +1136,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__GJP;
-  __INTEGER capacity__N1V;
-  void **storage__Y1V;
+  __INTEGER upper__KJP;
+  __INTEGER capacity__R1V;
+  void **storage__21V;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)
@@ -1121,7 +1147,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__2IP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__AJP;
 };
 __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)
@@ -1130,9 +1156,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__YLN;
-  __INTEGER capacity__WJV;
-  void **storage__BKV;
+  __INTEGER upper__2LN;
+  __INTEGER capacity__0JV;
+  void **storage__FKV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ (&ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_)
@@ -1141,7 +1167,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__OLN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__SLN;
 };
 __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define FAST_ARRAYoITM_TYPE_BLOCKo__ (&FAST_ARRAYoITM_TYPE_BLOCKo_)
@@ -1150,47 +1176,47 @@ __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__LVF;
+  __ITM_CODE parent_itm_code__PVF;
 };
 __ITM_CONSTANT ITM_CONSTANT_;
 #define ITM_CONSTANT__ (&ITM_CONSTANT_)
 
 // ITM_REAL
-#define __ITM_REAL__ 27
+#define __ITM_REAL__ 29
 typedef struct ITM_REAL_struct __ITM_REAL;
 struct ITM_REAL_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__VQO;
+  __ITM_CONSTANT parent_itm_constant__ZQO;
 };
 __ITM_REAL ITM_REAL_={__ITM_REAL__};
 #define ITM_REAL__ (&ITM_REAL_)
 
 // ITM_NUMBER
-#define __ITM_NUMBER__ 28
+#define __ITM_NUMBER__ 30
 typedef struct ITM_NUMBER_struct __ITM_NUMBER;
 struct ITM_NUMBER_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__HRO;
+  __ITM_CONSTANT parent_itm_constant__LRO;
 };
 __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 #define ITM_NUMBER__ (&ITM_NUMBER_)
 
 // ITM_CHARACTER
-#define __ITM_CHARACTER__ 29
+#define __ITM_CHARACTER__ 31
 typedef struct ITM_CHARACTER_struct __ITM_CHARACTER;
 struct ITM_CHARACTER_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__ZRO;
+  __ITM_CONSTANT parent_itm_constant__3RO;
 };
 __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 #define ITM_CHARACTER__ (&ITM_CHARACTER_)
 
 // ITM_STRING
-#define __ITM_STRING__ 30
+#define __ITM_STRING__ 32
 typedef struct ITM_STRING_struct __ITM_STRING;
 struct ITM_STRING_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__KSO;
+  __ITM_CONSTANT parent_itm_constant__OSO;
 };
 __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define ITM_STRING__ (&ITM_STRING_)
@@ -1199,9 +1225,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__QXP;
-  __INTEGER capacity__DBW;
-  void **storage__OBW;
+  __INTEGER upper__UXP;
+  __INTEGER capacity__HBW;
+  void **storage__SBW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)
@@ -1210,7 +1236,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__GXP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__KXP;
 };
 __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)
@@ -1219,9 +1245,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__5NR;
-  __INTEGER capacity__LLW;
-  void **storage__WLW;
+  __INTEGER upper__DOR;
+  __INTEGER capacity__PLW;
+  void **storage__0LW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)
@@ -1230,17 +1256,17 @@ __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__VNR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__ZNR;
 };
 __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 #define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)
 
 // ITM_LIST
-#define __ITM_LIST__ 31
+#define __ITM_LIST__ 33
 typedef struct ITM_LIST_struct __ITM_LIST;
 struct ITM_LIST_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__04E;
+  __ITM_CODE parent_itm_code__44E;
 };
 __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define ITM_LIST__ (&ITM_LIST_)
@@ -1249,9 +1275,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__Z0T;
-  __INTEGER capacity__MIU;
-  void **storage__XIU;
+  __INTEGER upper__30T;
+  __INTEGER capacity__QIU;
+  void **storage__1IU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)
@@ -1260,7 +1286,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__ERI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__IRI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)
@@ -1278,9 +1304,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__YVT;
-  __INTEGER capacity__K5T;
-  void **storage__GAU;
+  __INTEGER upper__2VT;
+  __INTEGER capacity__O5T;
+  void **storage__KAU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)
@@ -1289,7 +1315,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__Q3H;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__U3H;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)
@@ -1307,9 +1333,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__KSU;
-  __INTEGER capacity__PUU;
-  void **storage__0UU;
+  __INTEGER upper__OSU;
+  __INTEGER capacity__TUU;
+  void **storage__4UU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1318,7 +1344,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__Z4K;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__34K;
 };
 __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
 #define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1333,31 +1359,31 @@ __ALIAS_ARRAYoSTRING_CONSTANTo ALIAS_ARRAYoSTRING_CONSTANTo_;
 #define ALIAS_ARRAYoSTRING_CONSTANTo__ (&ALIAS_ARRAYoSTRING_CONSTANTo_)
 
 // ITM_LIST_IDF
-#define __ITM_LIST_IDF__ 32
+#define __ITM_LIST_IDF__ 34
 typedef struct ITM_LIST_IDF_struct __ITM_LIST_IDF;
 struct ITM_LIST_IDF_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__GCJ;
+  __ITM_CODE parent_itm_code__KCJ;
 };
 __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 #define ITM_LIST_IDF__ (&ITM_LIST_IDF_)
 
 // ITM_LDOTS
-#define __ITM_LDOTS__ 33
+#define __ITM_LDOTS__ 35
 typedef struct ITM_LDOTS_struct __ITM_LDOTS;
 struct ITM_LDOTS_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_constant__AUF;
+  __ITM_CODE parent_itm_constant__EUF;
 };
 __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 #define ITM_LDOTS__ (&ITM_LDOTS_)
 
 // ITM_PROTOTYPE
-#define __ITM_PROTOTYPE__ 34
+#define __ITM_PROTOTYPE__ 36
 typedef struct ITM_PROTOTYPE_struct __ITM_PROTOTYPE;
 struct ITM_PROTOTYPE_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__MVF;
+  __ITM_CONSTANT parent_itm_constant__QVF;
 };
 __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)
@@ -1366,88 +1392,88 @@ __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__1CJ;
+  __ITM_CODE parent_itm_code__5CJ;
 };
 __ITM_WRITE ITM_WRITE_;
 #define ITM_WRITE__ (&ITM_WRITE_)
 
 // ITM_WRITE_VALUE
-#define __ITM_WRITE_VALUE__ 35
+#define __ITM_WRITE_VALUE__ 37
 typedef struct ITM_WRITE_VALUE_struct __ITM_WRITE_VALUE;
 struct ITM_WRITE_VALUE_struct {
   unsigned long __id;
-  __ITM_WRITE parent_itm_write__2CJ;
+  __ITM_WRITE parent_itm_write__ADJ;
 };
 __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 #define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)
 
 // ITM_WRITE_CAST
-#define __ITM_WRITE_CAST__ 36
+#define __ITM_WRITE_CAST__ 38
 typedef struct ITM_WRITE_CAST_struct __ITM_WRITE_CAST;
 struct ITM_WRITE_CAST_struct {
   unsigned long __id;
-  __ITM_WRITE parent_itm_write__TDJ;
+  __ITM_WRITE parent_itm_write__XDJ;
 };
 __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 #define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)
 
 // ITM_READ
-#define __ITM_READ__ 37
+#define __ITM_READ__ 39
 typedef struct ITM_READ_struct __ITM_READ;
 struct ITM_READ_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__AGJ;
+  __ITM_CODE parent_itm_code__EGJ;
 };
 __ITM_READ ITM_READ_={__ITM_READ__};
 #define ITM_READ__ (&ITM_READ_)
 
 // ITM_WRITE_CODE
-#define __ITM_WRITE_CODE__ 38
+#define __ITM_WRITE_CODE__ 40
 typedef struct ITM_WRITE_CODE_struct __ITM_WRITE_CODE;
 struct ITM_WRITE_CODE_struct {
   unsigned long __id;
-  __ITM_WRITE parent_itm_write__4GJ;
+  __ITM_WRITE parent_itm_write__CHJ;
 };
 __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 #define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)
 
 // ITM_OPERATOR
-#define __ITM_OPERATOR__ 39
+#define __ITM_OPERATOR__ 41
 typedef struct ITM_OPERATOR_struct __ITM_OPERATOR;
 struct ITM_OPERATOR_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__UEL;
-  void *name__5HL;
+  __ITM_CODE parent_itm_code__YEL;
+  void *name__DIL;
 };
 __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 #define ITM_OPERATOR__ (&ITM_OPERATOR_)
 
 // ITM_READ_ARG1
-#define __ITM_READ_ARG1__ 40
+#define __ITM_READ_ARG1__ 42
 typedef struct ITM_READ_ARG1_struct __ITM_READ_ARG1;
 struct ITM_READ_ARG1_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__0HL;
+  __ITM_READ parent_itm_read__4HL;
 };
 __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 #define ITM_READ_ARG1__ (&ITM_READ_ARG1_)
 
 // ITM_READ_ARG2
-#define __ITM_READ_ARG2__ 41
+#define __ITM_READ_ARG2__ 43
 typedef struct ITM_READ_ARG2_struct __ITM_READ_ARG2;
 struct ITM_READ_ARG2_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__HKL;
+  __ITM_READ parent_itm_read__LKL;
 };
 __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 #define ITM_READ_ARG2__ (&ITM_READ_ARG2_)
 
 // ITM_OLD
-#define __ITM_OLD__ 42
+#define __ITM_OLD__ 44
 typedef struct ITM_OLD_struct __ITM_OLD;
 struct ITM_OLD_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__31L;
+  __ITM_CODE parent_itm_code__B2L;
 };
 __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define ITM_OLD__ (&ITM_OLD_)
@@ -1456,68 +1482,58 @@ __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__43M;
+  __ITM_CODE parent_itm_code__C4M;
 };
 __ITM_EXTERN ITM_EXTERN_;
 #define ITM_EXTERN__ (&ITM_EXTERN_)
 
 // ITM_EXTERNAL_TYPE
-#define __ITM_EXTERNAL_TYPE__ 43
+#define __ITM_EXTERNAL_TYPE__ 45
 typedef struct ITM_EXTERNAL_TYPE_struct __ITM_EXTERNAL_TYPE;
 struct ITM_EXTERNAL_TYPE_struct {
   unsigned long __id;
-  __ITM_EXTERN parent_itm_extern__53M;
-  __BOOLEAN is_persistant__2GN;
+  __ITM_EXTERN parent_itm_extern__D4M;
+  __BOOLEAN is_persistant__AHN;
 };
 __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 #define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)
 
 // ITM_BLOCK
-#define __ITM_BLOCK__ 44
+#define __ITM_BLOCK__ 46
 typedef struct ITM_BLOCK_struct __ITM_BLOCK;
 struct ITM_BLOCK_struct {
   unsigned long __id;
-  void *list__QMDC;
+  void *list__UMDC;
 };
 __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 #define ITM_BLOCK__ (&ITM_BLOCK_)
 
 // ITM_EXTERNAL
-#define __ITM_EXTERNAL__ 45
+#define __ITM_EXTERNAL__ 47
 typedef struct ITM_EXTERNAL_struct __ITM_EXTERNAL;
 struct ITM_EXTERNAL_struct {
   unsigned long __id;
-  __ITM_EXTERN parent_itm_extern__EFN;
+  __ITM_EXTERN parent_itm_extern__IFN;
 };
 __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 #define ITM_EXTERNAL__ (&ITM_EXTERNAL_)
 
 // ITM_READ_ARGS
-#define __ITM_READ_ARGS__ 46
+#define __ITM_READ_ARGS__ 48
 typedef struct ITM_READ_ARGS_struct __ITM_READ_ARGS;
 struct ITM_READ_ARGS_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__0CO;
+  __ITM_READ parent_itm_read__4CO;
 };
 __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define ITM_READ_ARGS__ (&ITM_READ_ARGS_)
 
-// ITM_ARG
-#define __ITM_ARG__ 47
-typedef struct ITM_ARG_struct __ITM_ARG;
-struct ITM_ARG_struct {
-  unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__JHHB;
-};
-__ITM_ARG ITM_ARG_={__ITM_ARG__};
-#define ITM_ARG__ (&ITM_ARG_)
-
 // HASHED_SET_NODE[FAST_ARRAY[STRING_CONSTANT]]
 #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__JMNF;
-  void *next__VMNF;
+  void *item__LAPF;
+  void *next__XAPF;
 };
 __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1526,31 +1542,20 @@ __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__YLNF;
-  __INTEGER count__PQNF;
-  void **buckets__3LNF;
+  __INTEGER capacity__05OF;
+  __INTEGER count__REPF;
+  void **buckets__55OF;
 };
 __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
 
-// ITM_ARGS
-#define __ITM_ARGS__ 48
-typedef struct ITM_ARGS_struct __ITM_ARGS;
-struct ITM_ARGS_struct {
-  unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__QPEE;
-  void *name__TFNF;
-};
-__ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
-#define ITM_ARGS__ (&ITM_ARGS_)
-
 // ARRAYED_COLLECTION[LIP_INTEGER]
 #define __ARRAYED_COLLECTIONoLIP_INTEGERo__ 97
 typedef struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct __ARRAYED_COLLECTIONoLIP_INTEGERo;
 struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct {
-  __INTEGER upper__Y4VE;
-  __INTEGER capacity__NAWE;
-  void **storage__YAWE;
+  __INTEGER upper__SBWE;
+  __INTEGER capacity__HDWE;
+  void **storage__SDWE;
 };
 __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define ARRAYED_COLLECTIONoLIP_INTEGERo__ (&ARRAYED_COLLECTIONoLIP_INTEGERo_)
@@ -1559,7 +1564,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__5TRE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__RWRE;
 };
 __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define FAST_ARRAYoLIP_INTEGERo__ (&FAST_ARRAYoLIP_INTEGERo_)
@@ -1568,9 +1573,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__P4MF;
-  __INTEGER capacity__0CNF;
-  void **storage__FDNF;
+  __INTEGER upper__DSOF;
+  __INTEGER capacity__4WOF;
+  void **storage__JXOF;
 };
 __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define ARRAYED_COLLECTIONoLIP_STRINGo__ (&ARRAYED_COLLECTIONoLIP_STRINGo_)
@@ -1579,7 +1584,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__W2DF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__GIEF;
 };
 __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 #define FAST_ARRAYoLIP_STRINGo__ (&FAST_ARRAYoLIP_STRINGo_)
@@ -1589,7 +1594,7 @@ __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 typedef struct LIP_BOOLEAN_struct __LIP_BOOLEAN;
 struct LIP_BOOLEAN_struct {
   unsigned long __id;
-  __BOOLEAN value__5CQD;
+  __BOOLEAN value__DDQD;
 };
 __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 #define LIP_BOOLEAN__ (&LIP_BOOLEAN_)
@@ -1602,8 +1607,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__JUEE;
-  void *value__FVTE;
+  __LIP_CODE parent_lip_code__RWEE;
+  void *value__XXTE;
 };
 __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define LIP_VALUE__ (&LIP_VALUE_)
@@ -1612,9 +1617,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__JNTD;
-  __INTEGER capacity__K5TD;
-  void **storage__GAUD;
+  __INTEGER upper__WNTD;
+  __INTEGER capacity__X5TD;
+  void **storage__TAUD;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_)
@@ -1623,7 +1628,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__VJID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__ZJID;
 };
 __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_)
@@ -1668,9 +1673,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__2ENF;
-  __INTEGER capacity__TJNF;
-  void **storage__4JNF;
+  __INTEGER upper__AZOF;
+  __INTEGER capacity__V3OF;
+  void **storage__A4OF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ (&ARRAYED_COLLECTIONoLIP_SLOT_DATAo_)
@@ -1679,7 +1684,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__EUTE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__WWTE;
 };
 __FAST_ARRAYoLIP_SLOT_DATAo FAST_ARRAYoLIP_SLOT_DATAo_;
 #define FAST_ARRAYoLIP_SLOT_DATAo__ (&FAST_ARRAYoLIP_SLOT_DATAo_)
@@ -1697,9 +1702,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__FVIF;
-  __INTEGER capacity__EGNF;
-  void **storage__PGNF;
+  __INTEGER upper__1EJF;
+  __INTEGER capacity__G0OF;
+  void **storage__R0OF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ (&ARRAYED_COLLECTIONoLIP_SLOT_CODEo_)
@@ -1708,7 +1713,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__1UIF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__REJF;
 };
 __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define FAST_ARRAYoLIP_SLOT_CODEo__ (&FAST_ARRAYoLIP_SLOT_CODEo_)
@@ -1717,9 +1722,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__4OEC;
-  void *item__RPEC;
-  void *next__JPEC;
+  void *key__CPEC;
+  void *item__VPEC;
+  void *next__NPEC;
 };
 __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)
@@ -1728,9 +1733,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__NOEC;
-  __INTEGER count__PYFC;
-  void **buckets__SOEC;
+  __INTEGER capacity__ROEC;
+  __INTEGER count__TYFC;
+  void **buckets__WOEC;
 };
 __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)
@@ -1739,7 +1744,7 @@ __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_
 #define __SECTION___ 114
 typedef struct SECTION__struct __SECTION_;
 struct SECTION__struct {
-  void *name__SYDC;
+  void *name__WYDC;
 };
 __SECTION_ SECTION__;
 #define SECTION___ (&SECTION__)
@@ -1748,9 +1753,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__XREC;
-  void *key__EREC;
-  void *next__PREC;
+  void *item__1REC;
+  void *key__IREC;
+  void *next__TREC;
 };
 __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_)
@@ -1759,9 +1764,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__TQEC;
-  __INTEGER count__J1FC;
-  void **buckets__YQEC;
+  __INTEGER capacity__XQEC;
+  __INTEGER count__N1FC;
+  void **buckets__2QEC;
 };
 __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_)
@@ -1770,9 +1775,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__ATGC;
-  __INTEGER capacity__IKHC;
-  void **storage__TKHC;
+  __INTEGER upper__ETGC;
+  __INTEGER capacity__MKHC;
+  void **storage__XKHC;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1781,7 +1786,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__FU1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__JU1B;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1839,98 +1844,98 @@ void *table_type[120];
 //==========================//
 
 void *parent_numeric__J;
-__POINTER begin_memory__5UH;
-__UINTEGER_32 nb_page__ORJ;
-__UINTEGER_64 capacity_max__IA5;
-void *first_free__HDVB;
-__INTEGER type_error__4MG;
-void *msg_err__5MG;
+__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;
 void *prototype_list__BJ;
-void *prototype_dico__5SS;
-void *list_id__KAB;
-void *string_tmp__DED;
-void *string_tmp2__J0AC;
-void *alias__UED;
-void *string_tmp3__P0AC;
+void *prototype_dico__DTS;
+void *list_id__NAB;
+void *string_tmp__HED;
+void *string_tmp2__N0AC;
+void *alias__YED;
+void *string_tmp3__T0AC;
 void *short_dico__QD;
-void *object__ZAC;
-void *source__5AC;
-__INTEGER position__CBC;
-__INTEGER pos_cur__FBC;
-__INTEGER pos_line__GBC;
-__INTEGER pos_col__HBC;
-__BOOLEAN is_active_short__OBC;
-void *key_comment_default__QBC;
-__INTEGER short_derive__RBC;
-void *short_local__ZBC;
-__BOOLEAN is_catch_comment__QWC;
-void *last_string__YZC;
-void *last_section__H0C;
-void *token__WBD;
-void *last_comment__K0D;
-void *last_slot__A2D;
-__INTEGER begin_position__1AE;
-__BOOLEAN is_parameter_type__YJE;
-void *last_group__LTF;
-__INTEGER old_position__TQI;
-__INTEGER old_pos_cur__VQI;
-__INTEGER old_pos_line__XQI;
-__INTEGER old_pos_col__ZQI;
-__INTEGER old_short_derive__1QI;
-__INTEGER_64 last_integer__JRO;
-void *dico__3IP;
-void *type_void__OVF;
-void *dico__CTI;
-void *type_self__XTN;
-void *type_null__PUN;
-void *list_data__4NNC;
-void *stack__FUTE;
-void *list_method__2UIF;
-void *dico__PLN;
-void *dico__WNR;
-void *dico__HXP;
-void *storage__AURE;
-void *storage__X2DF;
-__UINTEGER_32 clone_allocation_size__NSB;
-__POINTER get_begin_memory__YBQB;
+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 *list__FK;
-void *free__RNP;
+void *free__VNP;
 void *string_tmp__VH;
 void *output_code__SI;
-void *output_decl__NFE;
-void *string_tmp2__R5I;
-void *path_file__UQTF;
+void *output_decl__RFE;
+void *string_tmp2__V5I;
+void *path_file__DHVF;
 __BOOLEAN is_short_recursive__JB;
 __BOOLEAN is_shorter2__VI;
-__BOOLEAN is_shorter__TY;
-__BOOLEAN is_short_code__D1;
-__BOOLEAN is_short_private__R1;
+__BOOLEAN is_shorter__WY;
+__BOOLEAN is_short_code__G1;
+__BOOLEAN is_short_private__U1;
 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__V0;
-void *string_tmp__0VX;
-__INTEGER index_count__X4;
-void *free_list__0TP;
-void *empty_list__BVP;
-void *bucket__MVP;
-void *free_list__FRI;
-void *free_list__R3H;
-void *free_list__04K;
-void *empty_list__R2JF;
-void *bucket__12JF;
-void *true__AMJF;
-void *free_list__WJID;
-__INTEGER last_integer__3STE;
-void *last_string__PTTE;
-__BOOLEAN push_back_flag__5GKF;
-__CHARACTER memory__WXJF;
-void *bucket_name__TUOB;
-void *bucket_list__OWOB;
-void *free_list__GU1B;
+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;
 
 //==========================//
 // STRING CONSTANT          //
@@ -2073,22 +2078,23 @@ __STRING_CONSTANT __string_130={__STRING_CONSTANT__,4,"slot"};
 __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,"title"};
-__STRING_CONSTANT __string_135={__STRING_CONSTANT__,11,"table_begin"};
-__STRING_CONSTANT __string_136={__STRING_CONSTANT__,10,"table_item"};
-__STRING_CONSTANT __string_137={__STRING_CONSTANT__,15,"table_slot_name"};
-__STRING_CONSTANT __string_138={__STRING_CONSTANT__,18,"table_slot_comment"};
-__STRING_CONSTANT __string_139={__STRING_CONSTANT__,9,"table_end"};
-__STRING_CONSTANT __string_140={__STRING_CONSTANT__,9,"sub_title"};
-__STRING_CONSTANT __string_141={__STRING_CONSTANT__,10,"slot_title"};
-__STRING_CONSTANT __string_142={__STRING_CONSTANT__,5,"index"};
-__STRING_CONSTANT __string_143={__STRING_CONSTANT__,20,"directory_list_begin"};
-__STRING_CONSTANT __string_144={__STRING_CONSTANT__,19,"directory_list_item"};
-__STRING_CONSTANT __string_145={__STRING_CONSTANT__,18,"directory_list_end"};
-__STRING_CONSTANT __string_146={__STRING_CONSTANT__,15,"file_list_begin"};
-__STRING_CONSTANT __string_147={__STRING_CONSTANT__,14,"file_list_item"};
-__STRING_CONSTANT __string_148={__STRING_CONSTANT__,13,"file_list_end"};
-__STRING_CONSTANT __string_149={__STRING_CONSTANT__,1793,"------------------\
+__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,"------------------\
 ----------------------------------------------\n--                   Lisaac \
 source Shorter                    --\n--            LORIA - LSIIT - ULP - CN\
 RS - FRANCE             --\n--         Benoit SONNTAG - sonntag at icps.u-stras\
@@ -2113,115 +2119,118 @@ 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_150={__STRING_CONSTANT__,8,"shorter/"};
-__STRING_CONSTANT __string_151={__STRING_CONSTANT__,3,".li"};
-__STRING_CONSTANT __string_152={__STRING_CONSTANT__,20,"Error: File format `"};
-__STRING_CONSTANT __string_153={__STRING_CONSTANT__,16,"' is not open !\n"};
-__STRING_CONSTANT __string_154={__STRING_CONSTANT__,26,"Incorrect slot ident\
+__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\
 ifier."};
-__STRING_CONSTANT __string_155={__STRING_CONSTANT__,23,"Double definition sl\
+__STRING_CONSTANT __string_156={__STRING_CONSTANT__,23,"Double definition sl\
 ot."};
-__STRING_CONSTANT __string_156={__STRING_CONSTANT__,26,"Assignment ':=' is n\
+__STRING_CONSTANT __string_157={__STRING_CONSTANT__,26,"Assignment ':=' is n\
 eeded."};
-__STRING_CONSTANT __string_157={__STRING_CONSTANT__,28,"Incorrect format exp\
+__STRING_CONSTANT __string_158={__STRING_CONSTANT__,28,"Incorrect format exp\
 ression."};
-__STRING_CONSTANT __string_158={__STRING_CONSTANT__,21,"Incorrect definition."};
-__STRING_CONSTANT __string_159={__STRING_CONSTANT__,20,"Added ';' is needed."};
-__STRING_CONSTANT __string_160={__STRING_CONSTANT__,17,"Incorrect symbol."};
-__STRING_CONSTANT __string_161={__STRING_CONSTANT__,18,"Error: directory `"};
-__STRING_CONSTANT __string_162={__STRING_CONSTANT__,13,"\' not found.\n"};
-__STRING_CONSTANT __string_163={__STRING_CONSTANT__,12,"\' not open.\n"};
-__STRING_CONSTANT __string_164={__STRING_CONSTANT__,14,"directory_list"};
-__STRING_CONSTANT __string_165={__STRING_CONSTANT__,9,"file_list"};
-__STRING_CONSTANT __string_166={__STRING_CONSTANT__,15,"Inherit Summary"};
-__STRING_CONSTANT __string_167={__STRING_CONSTANT__,6,"create"};
-__STRING_CONSTANT __string_168={__STRING_CONSTANT__,19,"Constructor Summary"};
-__STRING_CONSTANT __string_169={__STRING_CONSTANT__,12,"Slot Summary"};
-__STRING_CONSTANT __string_170={__STRING_CONSTANT__,18,"Constructor Detail"};
-__STRING_CONSTANT __string_171={__STRING_CONSTANT__,11,"Slot Detail"};
-__STRING_CONSTANT __string_172={__STRING_CONSTANT__,19,"Not enough memory.\n"};
-__STRING_CONSTANT __string_173={__STRING_CONSTANT__,4,"_add"};
-__STRING_CONSTANT __string_174={__STRING_CONSTANT__,4,"_sub"};
-__STRING_CONSTANT __string_175={__STRING_CONSTANT__,9,"_logicnot"};
-__STRING_CONSTANT __string_176={__STRING_CONSTANT__,4,"_not"};
-__STRING_CONSTANT __string_177={__STRING_CONSTANT__,4,"_div"};
-__STRING_CONSTANT __string_178={__STRING_CONSTANT__,4,"_mul"};
-__STRING_CONSTANT __string_179={__STRING_CONSTANT__,4,"_xor"};
-__STRING_CONSTANT __string_180={__STRING_CONSTANT__,4,"_mod"};
-__STRING_CONSTANT __string_181={__STRING_CONSTANT__,8,"_greater"};
-__STRING_CONSTANT __string_182={__STRING_CONSTANT__,5,"_less"};
-__STRING_CONSTANT __string_183={__STRING_CONSTANT__,6,"_equal"};
-__STRING_CONSTANT __string_184={__STRING_CONSTANT__,7,"_notdiv"};
-__STRING_CONSTANT __string_185={__STRING_CONSTANT__,3,"_or"};
-__STRING_CONSTANT __string_186={__STRING_CONSTANT__,4,"_and"};
-__STRING_CONSTANT __string_187={__STRING_CONSTANT__,7,"_dollar"};
-__STRING_CONSTANT __string_188={__STRING_CONSTANT__,6,"_diese"};
-__STRING_CONSTANT __string_189={__STRING_CONSTANT__,3,"_at"};
-__STRING_CONSTANT __string_190={__STRING_CONSTANT__,4,"_ask"};
-__STRING_CONSTANT __string_191={__STRING_CONSTANT__,26,"End of comment not f\
+__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\
 ound !"};
-__STRING_CONSTANT __string_192={__STRING_CONSTANT__,24,"Identifier is incorr\
+__STRING_CONSTANT __string_194={__STRING_CONSTANT__,24,"Identifier is incorr\
 ect."};
-__STRING_CONSTANT __string_193={__STRING_CONSTANT__,22,"Line counter overflo\
+__STRING_CONSTANT __string_195={__STRING_CONSTANT__,22,"Line counter overflo\
 w."};
-__STRING_CONSTANT __string_194={__STRING_CONSTANT__,40,"Column counter overf\
+__STRING_CONSTANT __string_196={__STRING_CONSTANT__,40,"Column counter overf\
 low (line too long)."};
-__STRING_CONSTANT __string_195={__STRING_CONSTANT__,20,"--SYNTAX-----------\n"};
-__STRING_CONSTANT __string_196={__STRING_CONSTANT__,20,"--SEMANTIC---------\n"};
-__STRING_CONSTANT __string_197={__STRING_CONSTANT__,20,"--WARNING----------\n"};
-__STRING_CONSTANT __string_198={__STRING_CONSTANT__,20,"--MESSAGE----------\n"};
-__STRING_CONSTANT __string_199={__STRING_CONSTANT__,6,"\nLine "};
-__STRING_CONSTANT __string_200={__STRING_CONSTANT__,8," column "};
-__STRING_CONSTANT __string_201={__STRING_CONSTANT__,4," in "};
-__STRING_CONSTANT __string_202={__STRING_CONSTANT__,3,"):\n"};
-__STRING_CONSTANT __string_203={__STRING_CONSTANT__,2,"^\n"};
-__STRING_CONSTANT __string_204={__STRING_CONSTANT__,21,"Variable not `token'."};
-__STRING_CONSTANT __string_205={__STRING_CONSTANT__,13,"Crash system."};
-__STRING_CONSTANT __string_206={__STRING_CONSTANT__,1,"."};
-__STRING_CONSTANT __string_207={__STRING_CONSTANT__,20,"Warning: directory `"};
-__STRING_CONSTANT __string_208={__STRING_CONSTANT__,36,"Error: Double defini\
+__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\
 tion prototype:\n"};
-__STRING_CONSTANT __string_209={__STRING_CONSTANT__,4,".txt"};
-__STRING_CONSTANT __string_210={__STRING_CONSTANT__,12,"Error: File "};
-__STRING_CONSTANT __string_211={__STRING_CONSTANT__,18," is not created !\n"};
-__STRING_CONSTANT __string_212={__STRING_CONSTANT__,15," is not open !\n"};
-__STRING_CONSTANT __string_213={__STRING_CONSTANT__,20,"`Section' is needed."};
-__STRING_CONSTANT __string_214={__STRING_CONSTANT__,27,"Section `Header' is \
+__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 \
 needed."};
-__STRING_CONSTANT __string_215={__STRING_CONSTANT__,22,"Slot `name' not foun\
+__STRING_CONSTANT __string_217={__STRING_CONSTANT__,22,"Slot `name' not foun\
 d."};
-__STRING_CONSTANT __string_216={__STRING_CONSTANT__,23,"Incorrect type secti\
+__STRING_CONSTANT __string_218={__STRING_CONSTANT__,23,"Incorrect type secti\
 on."};
-__STRING_CONSTANT __string_217={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
+__STRING_CONSTANT __string_219={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
 ert' must to be first section."};
-__STRING_CONSTANT __string_218={__STRING_CONSTANT__,78,"`Section Inherit' is\
+__STRING_CONSTANT __string_220={__STRING_CONSTANT__,78,"`Section Inherit' is\
  not possible with Expanded object (Use `Section Insert')."};
-__STRING_CONSTANT __string_219={__STRING_CONSTANT__,31,"No argument for inte\
+__STRING_CONSTANT __string_221={__STRING_CONSTANT__,31,"No argument for inte\
 rrupt slot."};
-__STRING_CONSTANT __string_220={__STRING_CONSTANT__,33,"No argument for inhe\
+__STRING_CONSTANT __string_222={__STRING_CONSTANT__,33,"No argument for inhe\
 ritance slot."};
-__STRING_CONSTANT __string_221={__STRING_CONSTANT__,27,"Incorrect slot decla\
+__STRING_CONSTANT __string_223={__STRING_CONSTANT__,27,"Incorrect slot decla\
 ration."};
-__STRING_CONSTANT __string_222={__STRING_CONSTANT__,22,"Incorrect result typ\
+__STRING_CONSTANT __string_224={__STRING_CONSTANT__,22,"Incorrect result typ\
 e."};
-__STRING_CONSTANT __string_223={__STRING_CONSTANT__,20,"Added ')' is needed."};
-__STRING_CONSTANT __string_224={__STRING_CONSTANT__,36,"Incorrect type for i\
+__STRING_CONSTANT __string_225={__STRING_CONSTANT__,20,"Added ')' is needed."};
+__STRING_CONSTANT __string_226={__STRING_CONSTANT__,36,"Incorrect type for i\
 nheritance slot."};
-__STRING_CONSTANT __string_225={__STRING_CONSTANT__,21,"Incorrect expression."};
-__STRING_CONSTANT __string_226={__STRING_CONSTANT__,7,"__init_"};
-__STRING_CONSTANT __string_227={__STRING_CONSTANT__,10,"Added ';'."};
-__STRING_CONSTANT __string_228={__STRING_CONSTANT__,24,"Double slot declarat\
+__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\
 ion."};
-__STRING_CONSTANT __string_229={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
+__STRING_CONSTANT __string_231={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
 t yet implemented."};
-__STRING_CONSTANT __string_230={__STRING_CONSTANT__,9,"Postfix '"};
-__STRING_CONSTANT __string_231={__STRING_CONSTANT__,7,"Infix '"};
-__STRING_CONSTANT __string_232={__STRING_CONSTANT__,8,"Prefix '"};
-__STRING_CONSTANT __string_233={__STRING_CONSTANT__,29,"Unterminated string \
+__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 \
 constant."};
-__STRING_CONSTANT __string_234={__STRING_CONSTANT__,27,"Incorrect style slot\
+__STRING_CONSTANT __string_238={__STRING_CONSTANT__,27,"Incorrect style slot\
  ('-')."};
-__STRING_CONSTANT __string_235={__STRING_CONSTANT__,2509,"#include <pthread.\
+__STRING_CONSTANT __string_239={__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\
@@ -2257,126 +2266,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_236={__STRING_CONSTANT__,11,"Added ':='."};
-__STRING_CONSTANT __string_237={__STRING_CONSTANT__,31,"Prototype identifier\
+__STRING_CONSTANT __string_240={__STRING_CONSTANT__,11,"Added ':='."};
+__STRING_CONSTANT __string_241={__STRING_CONSTANT__,31,"Prototype identifier\
  is needed."};
-__STRING_CONSTANT __string_238={__STRING_CONSTANT__,34,"Incorrect name (file\
+__STRING_CONSTANT __string_242={__STRING_CONSTANT__,34,"Incorrect name (file\
 name != name)."};
-__STRING_CONSTANT __string_239={__STRING_CONSTANT__,24,"Object can't be gene\
+__STRING_CONSTANT __string_243={__STRING_CONSTANT__,24,"Object can't be gene\
 ric."};
-__STRING_CONSTANT __string_240={__STRING_CONSTANT__,10,"Added ':'."};
-__STRING_CONSTANT __string_241={__STRING_CONSTANT__,12,"Type needed."};
-__STRING_CONSTANT __string_242={__STRING_CONSTANT__,27,"Sorry, not yet imple\
+__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\
 mented."};
-__STRING_CONSTANT __string_243={__STRING_CONSTANT__,36,"Identifier parameter\
+__STRING_CONSTANT __string_247={__STRING_CONSTANT__,36,"Identifier parameter\
  type is needed."};
-__STRING_CONSTANT __string_244={__STRING_CONSTANT__,10,"Added ')'."};
-__STRING_CONSTANT __string_245={__STRING_CONSTANT__,28,"Invalid generic list\
+__STRING_CONSTANT __string_248={__STRING_CONSTANT__,10,"Added ')'."};
+__STRING_CONSTANT __string_249={__STRING_CONSTANT__,28,"Invalid generic list\
  number."};
-__STRING_CONSTANT __string_246={__STRING_CONSTANT__,34,"Slot `name' must to \
+__STRING_CONSTANT __string_250={__STRING_CONSTANT__,34,"Slot `name' must to \
 be first slot."};
-__STRING_CONSTANT __string_247={__STRING_CONSTANT__,20,"Incorrect type list."};
-__STRING_CONSTANT __string_248={__STRING_CONSTANT__,19,"Incorrect external."};
-__STRING_CONSTANT __string_249={__STRING_CONSTANT__,3,"// "};
-__STRING_CONSTANT __string_250={__STRING_CONSTANT__,15,"Incorrect expr."};
-__STRING_CONSTANT __string_251={__STRING_CONSTANT__,33,"Double `default' slo\
+__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\
 t definition."};
-__STRING_CONSTANT __string_252={__STRING_CONSTANT__,30,"Double `type' slot d\
+__STRING_CONSTANT __string_256={__STRING_CONSTANT__,30,"Double `type' slot d\
 efinition."};
-__STRING_CONSTANT __string_253={__STRING_CONSTANT__,17,"Incorrect number."};
-__STRING_CONSTANT __string_254={__STRING_CONSTANT__,21,"Added '<-' is needed."};
-__STRING_CONSTANT __string_255={__STRING_CONSTANT__,20,"Added '(' is needed."};
-__STRING_CONSTANT __string_256={__STRING_CONSTANT__,17,"Unreachable code."};
-__STRING_CONSTANT __string_257={__STRING_CONSTANT__,17,"Incorrect string."};
-__STRING_CONSTANT __string_258={__STRING_CONSTANT__,15,"Incorrect slot."};
-__STRING_CONSTANT __string_259={__STRING_CONSTANT__,59,"For a section, the p\
+__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\
 rototype name only (without '['...']')."};
-__STRING_CONSTANT __string_260={__STRING_CONSTANT__,14,"Slot deferred."};
-__STRING_CONSTANT __string_261={__STRING_CONSTANT__,15,"Incorrect type."};
-__STRING_CONSTANT __string_262={__STRING_CONSTANT__,22,"Type `SELF' is neede\
+__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\
 d."};
-__STRING_CONSTANT __string_263={__STRING_CONSTANT__,20,"Added ':' is needed."};
-__STRING_CONSTANT __string_264={__STRING_CONSTANT__,30,"Incorrect argument i\
+__STRING_CONSTANT __string_267={__STRING_CONSTANT__,20,"Added ':' is needed."};
+__STRING_CONSTANT __string_268={__STRING_CONSTANT__,30,"Incorrect argument i\
 dentifier."};
-__STRING_CONSTANT __string_265={__STRING_CONSTANT__,24,"Incorrect argument t\
+__STRING_CONSTANT __string_269={__STRING_CONSTANT__,24,"Incorrect argument t\
 ype."};
-__STRING_CONSTANT __string_266={__STRING_CONSTANT__,30,"Incorrect argument d\
+__STRING_CONSTANT __string_270={__STRING_CONSTANT__,30,"Incorrect argument d\
 efinition."};
-__STRING_CONSTANT __string_267={__STRING_CONSTANT__,19,"Operator is needed."};
-__STRING_CONSTANT __string_268={__STRING_CONSTANT__,19,"Incorrect operator."};
-__STRING_CONSTANT __string_269={__STRING_CONSTANT__,10,"Added `''."};
-__STRING_CONSTANT __string_270={__STRING_CONSTANT__,29,"Operator declaration\
+__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\
  invalid."};
-__STRING_CONSTANT __string_271={__STRING_CONSTANT__,39,"Not associativity fo\
+__STRING_CONSTANT __string_275={__STRING_CONSTANT__,39,"Not associativity fo\
 r postfix operator."};
-__STRING_CONSTANT __string_272={__STRING_CONSTANT__,38,"Not associativity fo\
+__STRING_CONSTANT __string_276={__STRING_CONSTANT__,38,"Not associativity fo\
 r prefix operator."};
-__STRING_CONSTANT __string_273={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
+__STRING_CONSTANT __string_277={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
 n External'."};
-__STRING_CONSTANT __string_274={__STRING_CONSTANT__,7,"Added '"};
-__STRING_CONSTANT __string_275={__STRING_CONSTANT__,2,"'."};
-__STRING_CONSTANT __string_276={__STRING_CONSTANT__,10,"Added '}'."};
-__STRING_CONSTANT __string_277={__STRING_CONSTANT__,27,"`Expanded' is not po\
+__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\
 ssible."};
-__STRING_CONSTANT __string_278={__STRING_CONSTANT__,10,"Added ']'."};
-__STRING_CONSTANT __string_279={__STRING_CONSTANT__,45,"Impossible '<-' styl\
+__STRING_CONSTANT __string_282={__STRING_CONSTANT__,10,"Added ']'."};
+__STRING_CONSTANT __string_283={__STRING_CONSTANT__,45,"Impossible '<-' styl\
 e assignment with vector."};
-__STRING_CONSTANT __string_280={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
+__STRING_CONSTANT __string_284={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
 mented !"};
-__STRING_CONSTANT __string_281={__STRING_CONSTANT__,24,"Unknown escape seque\
+__STRING_CONSTANT __string_285={__STRING_CONSTANT__,1,"{"};
+__STRING_CONSTANT __string_286={__STRING_CONSTANT__,1,"}"};
+__STRING_CONSTANT __string_287={__STRING_CONSTANT__,24,"Unknown escape seque\
 nce."};
-__STRING_CONSTANT __string_282={__STRING_CONSTANT__,39,"Invalid range charac\
+__STRING_CONSTANT __string_288={__STRING_CONSTANT__,39,"Invalid range charac\
 ter number [0,255]."};
-__STRING_CONSTANT __string_283={__STRING_CONSTANT__,23,"Character '\' is nee\
+__STRING_CONSTANT __string_289={__STRING_CONSTANT__,23,"Character '\' is nee\
 ded."};
-__STRING_CONSTANT __string_284={__STRING_CONSTANT__,24,"Incorrect Result num\
+__STRING_CONSTANT __string_290={__STRING_CONSTANT__,24,"Incorrect Result num\
 ber."};
-__STRING_CONSTANT __string_285={__STRING_CONSTANT__,25,"Incorrect live type \
+__STRING_CONSTANT __string_291={__STRING_CONSTANT__,25,"Incorrect live type \
 list."};
-__STRING_CONSTANT __string_286={__STRING_CONSTANT__,23,"Incorrect octal numb\
+__STRING_CONSTANT __string_292={__STRING_CONSTANT__,23,"Incorrect octal numb\
 er."};
-__STRING_CONSTANT __string_287={__STRING_CONSTANT__,24,"Incorrect binary num\
+__STRING_CONSTANT __string_293={__STRING_CONSTANT__,24,"Incorrect binary num\
 ber."};
-__STRING_CONSTANT __string_288={__STRING_CONSTANT__,25,"Incorrect decimal nu\
+__STRING_CONSTANT __string_294={__STRING_CONSTANT__,25,"Incorrect decimal nu\
 mber."};
-__STRING_CONSTANT __string_289={__STRING_CONSTANT__,6,"Slot `"};
-__STRING_CONSTANT __string_290={__STRING_CONSTANT__,12,"' not found."};
-__STRING_CONSTANT __string_291={__STRING_CONSTANT__,30,"No argument for `exi\
+__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\
 t' method."};
-__STRING_CONSTANT __string_292={__STRING_CONSTANT__,23,"String argument need\
+__STRING_CONSTANT __string_298={__STRING_CONSTANT__,23,"String argument need\
 ed."};
-__STRING_CONSTANT __string_293={__STRING_CONSTANT__,17,"Invalid argument."};
-__STRING_CONSTANT __string_294={__STRING_CONSTANT__,21,"No expression result."};
-__STRING_CONSTANT __string_295={__STRING_CONSTANT__,15,"BOOLEAN needed."};
-__STRING_CONSTANT __string_296={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
-__STRING_CONSTANT __string_297={__STRING_CONSTANT__,22,"Prototype name neede\
+__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\
 d."};
-__STRING_CONSTANT __string_298={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
+__STRING_CONSTANT __string_304={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_299={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
+__STRING_CONSTANT __string_305={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_300={__STRING_CONSTANT__,7,"Style `"};
-__STRING_CONSTANT __string_301={__STRING_CONSTANT__,32,"' for parameter type\
+__STRING_CONSTANT __string_306={__STRING_CONSTANT__,7,"Style `"};
+__STRING_CONSTANT __string_307={__STRING_CONSTANT__,32,"' for parameter type\
  is ignored."};
-__STRING_CONSTANT __string_302={__STRING_CONSTANT__,10,"' ignored."};
-__STRING_CONSTANT __string_303={__STRING_CONSTANT__,21,"Incorrect identifier."};
-__STRING_CONSTANT __string_304={__STRING_CONSTANT__,21,"Incorrect local type."};
-__STRING_CONSTANT __string_305={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
+__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\
 ession."};
-__STRING_CONSTANT __string_306={__STRING_CONSTANT__,18,"Incorrect message."};
-__STRING_CONSTANT __string_307={__STRING_CONSTANT__,22,"Incorrect real numbe\
+__STRING_CONSTANT __string_312={__STRING_CONSTANT__,18,"Incorrect message."};
+__STRING_CONSTANT __string_313={__STRING_CONSTANT__,22,"Incorrect real numbe\
 r."};
-__STRING_CONSTANT __string_308={__STRING_CONSTANT__,28,"Character constant t\
+__STRING_CONSTANT __string_314={__STRING_CONSTANT__,28,"Character constant t\
 oo long."};
-__STRING_CONSTANT __string_309={__STRING_CONSTANT__,32,"Unterminated charact\
+__STRING_CONSTANT __string_315={__STRING_CONSTANT__,32,"Unterminated charact\
 er constant."};
-__STRING_CONSTANT __string_310={__STRING_CONSTANT__,37,"Incorrect multiple r\
+__STRING_CONSTANT __string_316={__STRING_CONSTANT__,37,"Incorrect multiple r\
 esult expression."};
-__STRING_CONSTANT __string_311={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
+__STRING_CONSTANT __string_317={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
 M.read_integer.\n"};
-__STRING_CONSTANT __string_312={__STRING_CONSTANT__,21,"Incorrect directory `"};
-__STRING_CONSTANT __string_313={__STRING_CONSTANT__,19,"Incorrect argument."};
-__STRING_CONSTANT __string_314={__STRING_CONSTANT__,15,"Type incorrect."};
+__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."};
 
 //==========================//
 // FUNCTION HEADER          //
@@ -2385,191 +2396,208 @@ __STRING_CONSTANT __string_314={__STRING_CONSTANT__,15,"Type incorrect."};
 // Debug Manager
 void print_string(char *str);
 // Source code
-static __STRING* create__BBB(__INTEGER needed_capacity__DBB);
-static __POINTER new_lab__2QJ(__UINTEGER_32 t__4QJ);
-static void** create__JFRB(__INTEGER nb_elements__LFRB);
-static void add_last__JLT(__STRING *Self__KLT,__CHARACTER ch__LLT);
-static void add_last__QRV(__FAST_ARRAYoSTRINGo *Self__RRV,void *element__SRV);
-static __INTEGER prime_number_ceiling__H41(__INTEGER integer__J41);
-static void** create__HB4(__INTEGER nb_elements__JB4);
-static void** create__XHTC(__INTEGER nb_elements__ZHTC);
-static void** create__WESB(__INTEGER nb_elements__YESB);
-static void** create__RF4(__INTEGER nb_elements__TF4);
-static void** create__2Y2(__INTEGER nb_elements__4Y2);
-static void** create__2IRB(__INTEGER nb_elements__4IRB);
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__YER(__INTEGER new_count__0ER);
-static void** create__LZBB(__INTEGER nb_elements__NZBB);
-static void** create__FLXB(__INTEGER nb_elements__HLXB);
-static void** create__AUWB(__INTEGER nb_elements__CUWB);
-static void** create__5RXB(__INTEGER nb_elements__BSXB);
-static void** create__FH5(__INTEGER nb_elements__HH5);
-static void fast_put__to__DOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__EOZ,void *v__FOZ,void *k__GOZ);
-static void** create__LHYB(__INTEGER nb_elements__NHYB);
-static void* get__TSI(void *n__VSI);
-static void** create__UGQB(__INTEGER nb_elements__WGQB);
-static void** create__E1PB(__INTEGER nb_elements__G1PB);
-static void** create__P3ZB(__INTEGER nb_elements__R3ZB);
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__RGRC(__INTEGER new_count__TGRC);
-static void** create__UYQF(__INTEGER nb_elements__WYQF);
-static void** create__OMEF(__INTEGER nb_elements__QMEF);
-static void** create__VVUF(__INTEGER nb_elements__XVUF);
-static void** create__PIIE(__INTEGER nb_elements__RIIE);
-static void* new_page__454();
-static void to_busy__index__DTFC(__MEMORY *Self__ETFC,__UINTEGER_32 sz__FTFC,__UINTEGER_32 idx__GTFC);
-static void** create__N1XC(__INTEGER nb_elements__P1XC);
-static void** create__QAYC(__INTEGER nb_elements__SAYC);
-static void** create__UKBD(__INTEGER nb_elements__WKBD);
-static void** create__RJ2(__INTEGER nb_elements__TJ2);
-static void add__YXR(__HASHED_SEToABSTRACT_STRINGo *Self__ZXR,void *e__0XR);
-static void* operator__name__GGB(void *op__JGB);
-static void print__GHD(__STRING_CONSTANT *Self__HHD);
-static void* get__YVB(void *str__0VB);
-static void copy__JCS(__STRING *Self__KCS,void *other__LCS);
-static void append__RNS(__STRING *Self__SNS,void *other__TNS);
-static void* parent_directory__4DD();
-static void* get_entry__D0AC(void *p__F0AC);
-static void put_string__E1F(void *s__G1F);
-static __PROTOTYPE* create__name__generic_count__JAC(void *f__LAC,void *n__MAC);
-static __BOOLEAN read_space__NRD();
-static __BOOLEAN read_identifier__15K();
-static __POSITION current_position__ZWF();
-static void put_error__text__0MG(__INTEGER type__2MG,void *txt__3MG);
-static void put_position__EOG(__POSITION Self__FOG);
-static __BOOLEAN read_symbol__TWJ(void *st__VWJ);
-static __BOOLEAN read_short_elt__1KKB();
-static void fast_put__to__I1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__J1R,void *k__L1R);
-static __TYPE_FULL* create__with__CQB(void *typ__EQB,__UINTEGER_8 code__FQB);
-static void** create__SYNB(__INTEGER nb_elements__UYNB);
-static void add_last__43R(__FAST_ARRAYoTYPE_IDo *Self__53R,void *element__A4R);
-static __BOOLEAN open__JERD(__DIRECTORY_UNIX *Self__KERD);
-static void check_in__begin__OQQC(void *entry__QQQC,__INTEGER n__RQQC);
-static void* add_ext__UAF(void *n__WAF);
-static void save_file__with__5CC(void *n__BDC,void *buf__CDC);
-static void resize__IXZ(__STRING *Self__JXZ,__INTEGER new_count__KXZ);
-static void move__to__by__RVCC(__CHARACTER *Self__SVCC,__INTEGER lower__TVCC,__INTEGER upper__UVCC,__INTEGER offset__VVCC);
-static __BOOLEAN __infix_equal_equal__O5DB(__STRING_CONSTANT *Self__P5DB,void *other__Q5DB);
-static void* at__AL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__BL4,void *k__CL4);
-static void go_on__SAC(void *obj__UAC);
-static void put__to__like__VYXD(void *tok__XYXD,void *buf__YYXD,void *key__ZYXD);
-static void pretty_name_in__JT1E(__ITM_SLOT *Self__KT1E,void *buffer__LT1E);
-static void pretty_name_in__4U1E(__ITM_SLOT_OPERATOR *Self__5U1E,void *buffer__AV1E);
-static void get_all_comment_slot__in__UW1E(__PROTOTYPE *Self__VW1E,void *n__WW1E,void *buf__XW1E);
-static __CHARACTER* create__RLEB(__INTEGER nb_elements__TLEB);
-static __POINTER realloc_dynamic__old_size__new_size__BELC(__POINTER p__DELC,__UINTEGER_32 old_sz__EELC,__UINTEGER_32 new_sz__FELC);
-static void** create__DBRB(__INTEGER nb_elements__FBRB);
-static void* fast_reference_at__I1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__J1T,void *k__K1T);
-static void** create__4XGE(__INTEGER nb_elements__AYGE);
-static __BOOLEAN has__LPW(__HASHED_SEToABSTRACT_STRINGo *Self__MPW,void *e__NPW);
-static void increase_capacity__ORNB(__HASHED_SEToABSTRACT_STRINGo *Self__PRNB);
-static void put_string__IHF(void *s__KHF);
-static __BOOLEAN fast_has__45X(__HASHED_SEToABSTRACT_STRINGo *Self__55X,void *e__AAY);
-static void* physical_get_entry__ZBF(void *new_path__1BF);
-static void put__to__B0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__C0S,void *v__D0S,void *k__E0S);
-static void reduce_path__A3HC(void *st__C3HC);
-static void* reference_at__UT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__VT0C,void *k__WT0C);
-static void* physical_get_entry__IW0C(void *new_path__KW0C);
-static void** create__FY1C(__INTEGER nb_elements__HY1C);
-static void** create__NQSC(__INTEGER nb_elements__PQSC);
-static void short__token__to__1AD(void *key__3AD,__INTEGER beg__4AD,__INTEGER end__5AD);
-static __INTEGER first_substring_index__UFYE(__STRING *Self__VFYE);
-static void append_in__4HH(__UINTEGER_32 Self__5HH,void *buffer__AIH);
-static __BOOLEAN read_string__1EQ();
-static void reduce_path__QC2E(void *st__SC2E);
-static void* item__FCPE(__DIRECTORY_UNIX *Self__GCPE,__INTEGER i__HCPE);
-static void* item__I0ND(__LINKED_LISToSTRING_CONSTANTo *Self__J0ND,__INTEGER i__K0ND);
-static void** create__D23(__INTEGER nb_elements__F23);
-static __BOOLEAN read_word__APF(void *st__CPF);
-static __BOOLEAN read_slot_header__CDE(__BOOLEAN first__EDE);
-static void* get_name__KUOB(void *n__MUOB);
-static void* read_type_list__YLO(__PARSER *Self__ZLO,__BOOLEAN is_section__0LO);
-static __INTEGER hash_code__540(__FAST_ARRAYoITM_TYPE_MONOo *Self__A50);
-static __CHARACTER read_style__HRF();
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__BL5B(__INTEGER new_count__DL5B);
-static void* read_loc_arg__with_self__YDHB(__PARSER *Self__ZDHB,__BOOLEAN mute__0DHB,__BOOLEAN self_first__1DHB);
-static void* read_slot_operator__VT5B(void *list_arg__XT5B);
-static void add_last__K5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__L5GC,void *element__M5GC);
-static void* read_slot_keyword__CZ5B(void *list_arg__EZ5B);
-static void** create__GPBD(__INTEGER nb_elements__IPBD);
-static void set_argument_list__FCHC(__ITM_SLOT *Self__GCHC,void *p__HCHC);
-static __ITM_TYPE_MULTI* get__SIP(void *lt__UIP);
-static void* read_type__TBM(__PARSER *Self__UBM,__BOOLEAN is_local__VBM);
-static void set_result_type__A3FC(__ITM_SLOT *Self__B3FC,void *t__C3FC);
-static void* read_contract__XSF(__PARSER *Self__YSF);
-static void* read_expr__O4I(__PARSER *Self__P4I);
-static void set_value__type__JFHC(__ITM_SLOT *Self__KFHC,void *e__LFHC,void *p__MFHC);
-static __POSITION position__VC5B(__ITM_EXPRESSION *Self__WC5B);
-static __POSITION position__VIHC(__ITM_RESULT *Self__WIHC);
-static void fast_put__to__RNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__SNGC,void *v__TNGC,void *k__UNGC);
-static void* fast_reference_at__AAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__BAGC,void *k__CAGC);
-static void set_path__4MT(__DIRECTORY_UNIX *Self__5MT,void *n__ANT);
-static void set_path__ZNT(__FILE_UNIX *Self__0NT,void *n__1NT);
-static void insert_string__to__KXU(__STRING *Self__LXU,void *s__MXU,__INTEGER i__NXU);
-static void read_escape_character__ZYIF();
-static __BOOLEAN read_cap_identifier__CZJ();
-static void add_last__CBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__DBBC,void *element__EBBC);
-static __BOOLEAN read_external__QSO();
-static void* read_expr_primary__Y3M(__PARSER *Self__Z3M);
-static __BOOLEAN read_integer__Q1P();
-static void* readlip_expr__ZSPB();
-static void run__AGFC(__LIP_AFFECT *Self__BGFC);
-static void run__TKTE(__LIP_CALL *Self__UKTE);
-static void run__MCQD(__LIP_IF *Self__NCQD);
-static void run__HPTE(__LIP_PRINT *Self__IPTE);
-static void add_last__KNV(__FAST_ARRAYoITM_TYPE_MONOo *Self__LNV,void *element__MNV);
-static void* alias__WUP(void *tmp__YUP);
-static void add__SLHB(__HASHED_SEToSTRING_CONSTANTo *Self__TLHB,void *e__ULHB);
-static void add_last__BBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__CBPD,void *element__DBPD);
-static void free__KS5(void *tmp__MS5);
-static void free__MMQ(void *tmp__OMQ);
-static __INTEGER hash_code__XMOF(__FAST_ARRAYoSTRING_CONSTANTo *Self__YMOF);
-static void copy__M2RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__N2RD,void *other__O2RD);
-static __BOOLEAN read_operator__XMM();
-static void* operator__name__NDO(void *typ__PDO,void *op__QDO);
-static void append_in__CIBC(__ITM_TYPE_MULTI *Self__DIBC,void *buffer__EIBC);
-static void append_in__4FPD(__ITM_TYPE_BLOCK *Self__5FPD,void *buffer__AGPD);
-static void append_in__CHPD(__ITM_TYPE_GENERIC *Self__DHPD,void *buffer__EHPD);
-static void* read_prototype__XNN(__PARSER *Self__YNN,void *styl__ZNN);
-static void read_def_local__N0H(__PARSER *Self__O0H);
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__CVI(__INTEGER new_count__EVI);
-static void add_last__E5U(__FAST_ARRAYoITM_CODEo *Self__F5U,void *element__G5U);
-static void* copy__A5H(void *tmp__C5H);
-static __BOOLEAN fast_has__NDV(__HASHED_SEToSTRING_CONSTANTo *Self__ODV,void *e__PDV);
-static void restore_context__DDL();
-static void* read_expr_message__KVL(__PARSER *Self__LVL);
-static void free__IVI(void *tmp__KVI);
-static __BOOLEAN is_hexadecimal_digit__H2IE(__CHARACTER Self__I2IE);
-static void* read_constant__LQO();
-static void* read_group__ZAHB(__PARSER *Self__0AHB);
-static void* readlip_expr_operator__2NZB(__PARSER *Self__3NZB);
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__MQKD(__INTEGER new_count__OQKD);
-static void add_last__DIUD(__FAST_ARRAYoLIP_CODEo *Self__EIUD,void *element__FIUD);
-static void* copy__YKID(void *tmp__0KID);
-static void* fast_reference_at__4TRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__5TRD,void *k__AURD);
-static void* run_expr__WYQD(__LIP_BINARY *Self__XYQD);
-static void* run_expr__V1QD(__LIP_UNARY *Self__W1QD);
-static void* run_expr__FRTE(__LIP_CALL *Self__GRTE);
-static void* get__WTRE(__LIP_INTEGER *Self__XTRE,__INTEGER i__YTRE);
-static void* get__N2DF(__LIP_STRING *Self__O2DF,void *str__P2DF);
-static void free__2XZF(__LIP_INTEGER *Self__3XZF);
-static void free__HJBG(__LIP_STRING *Self__IJBG);
-static void load_directory__is_recursive__EPTF(__LIP_CALL *Self__FPTF,void *path__GPTF,__BOOLEAN is_rec__HPTF);
-static void append_in__NPBG(__LIP_STRING *Self__OPBG,void *str__PPBG);
-static void print_positif__C3DG(__INTEGER Self__D3DG);
-static __BOOLEAN has__DLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ELMB,void *e__FLMB);
-static void display_row__DLIC(__ITM_TYPE_MULTI *Self__ELIC,void *buffer__FLIC);
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__AJK(__INTEGER new_count__CJK);
-static void add_last__V1U(__FAST_ARRAYoITM_LOCALo *Self__W1U,void *element__X1U);
-static void free__GJK(void *tmp__IJK);
-static void* copy__P3J(void *tmp__R3J);
-static void** create__XSQB(__INTEGER nb_elements__ZSQB);
-static void* read_send_msg__23N(__PARSER *Self__33N,void *first_arg__43N);
-static void* readlip_expr_cmp__Q01B(__PARSER *Self__R01B);
-static void** create__1CIE(__INTEGER nb_elements__3CIE);
-static void** create__XQQB(__INTEGER nb_elements__ZQQB);
-static void* read_argument__DOP(__PARSER *Self__EOP);
-static void* readlip_expr_binary__NN3B(__PARSER *Self__ON3B);
-static void* readlip_expr_unary__OZ4B(__PARSER *Self__PZ4B);
-static void* readlip_expr_base__4SEE(__PARSER *Self__5SEE);
+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);
 
 //==========================//
 // SOURCE CODE              //
@@ -2577,4485 +2605,4492 @@ static void* readlip_expr_base__4SEE(__PARSER *Self__5SEE);
 
 int main(int argc,char **argv)
 {
-  void *str__TGD,*cmd__PY;
-  __INTEGER new_count__K55G,typ_id__D55G,Self__XGF,limit_up__YGF;
-  __INTEGER idx__M33G,i__YNEB,typ_id__RTG,new_capacity__TJY;
-  __INTEGER typ_id__Y3DB,new_capacity__0UJC,typ_id__0MJ,typ_id__BNH;
-  __INTEGER new_capacity__TLY,typ_id__DOC,new_capacity__QKX,typ_id__XZQ;
-  __INTEGER typ_id__UDR,new_capacity__KI1,typ_id__ESQ,typ_id__K0O;
-  __INTEGER typ_id__R2Q,typ_id__5KK,new_capacity__XEZ,typ_id__BWQ;
-  __INTEGER typ_id__3UR,typ_id__2HK,typ_id__F4J,typ_id__1KM;
-  __INTEGER typ_id__BQLF,new_capacity__4ROF,typ_id__X3F,typ_id__CQSE;
-  __INTEGER typ_id__IBKF,typ_id__CGLF,typ_id__PUMD,typ_id__AVED;
-  __INTEGER new_capacity__N5WD,Self__CCXE,typ_id__5ALF,Self__GQ1F;
-  __INTEGER typ_id__LUKF,Self__5O1F,typ_id__02YB,new_capacity__QFOC;
-  __INTEGER typ_id__55YB,new_capacity__LJOC,typ_id__ZJ5B,typ_id__ZTB;
-  __INTEGER new_capacity__MZW,j__QY,idx__PKC,typ_id__R33G,typ_id__0GKB;
-  __INTEGER result__133G,__tmp__333G,Self__433G,result__A43G;
-  __INTEGER __tmp__C43G,Self__D43G,idx__QPEB,idx__OHZB;
-  __INTEGER new_capacity__PHZB,i__QHZB,result__F43G,__tmp__H43G;
-  __INTEGER Self__I43G,typ_id__3JZB,typ_id__M43G,typ_id__W43G;
-  __INTEGER typ_id__A53G,typ_id__WOED,typ_id__CYB,Self__5JWD;
-  __INTEGER typ_id__E2B,typ_id__K53G,typ_id__W3B,result__U53G;
-  __INTEGER __tmp__W53G,Self__X53G,result__Z53G,__tmp__153G,Self__253G;
-  __INTEGER result__CA4G,__tmp__EA4G,Self__FA4G,result__HA4G;
-  __INTEGER __tmp__JA4G,Self__KA4G,result__QA4G,__tmp__SA4G,Self__TA4G;
-  __INTEGER result__VA4G,__tmp__XA4G,Self__YA4G,i__A00G,j__C00G;
-  __INTEGER Self__Q42G,result__0A4G,__tmp__2A4G,Self__3A4G,result__DB4G;
-  __INTEGER __tmp__FB4G,Self__GB4G,result__IB4G,__tmp__KB4G,Self__LB4G;
-  __INTEGER i__M00G,j__O00G,Self__242G,result__NB4G,__tmp__PB4G;
-  __INTEGER Self__QB4G,result__SB4G,__tmp__UB4G,Self__VB4G,i1__MNAH;
-  __INTEGER i2__NNAH,__tmp__ZB4G,Self__1B4G,result__AC4G,len__FC4G;
-  __INTEGER __tmp__GC4G,__tmp__IC4G,Self__JC4G,result__GSC,n__K52G;
-  __INTEGER Self__RNAH,Self__S0QC,limit_up__T0QC,i__WNAH,i__1NAH;
-  __INTEGER i__AOAH,i__FOAH;
-  __POINTER ptr__C55G,ptr_table__M55G,next__L55G,result__N55G;
-  __POINTER ptr_table__R55G,next__Q55G,result__S55G,ptr__MTG;
-  __POINTER ptr_table__W55G,next__V55G,result__X55G,ptr_table__155G;
-  __POINTER next__055G,result__255G,ptr__T3DB,ptr_table__AAAH;
-  __POINTER next__555G,result__BAAH,ptr_table__FAAH,next__EAAH;
-  __POINTER result__GAAH,ptr__VMJ,ptr_table__KAAH,next__JAAH;
-  __POINTER result__LAAH,ptr_table__PAAH,next__OAAH,result__QAAH;
-  __POINTER ptr__2MH,ptr_table__UAAH,next__TAAH,result__VAAH;
-  __POINTER ptr_table__ZAAH,next__YAAH,result__0AAH,ptr__4NC;
-  __POINTER ptr_table__4AAH,next__3AAH,result__5AAH,ptr_table__DBAH;
-  __POINTER next__CBAH,result__EBAH,ptr__SZQ,ptr_table__IBAH,next__HBAH;
-  __POINTER result__JBAH,ptr_table__NBAH,next__MBAH,result__OBAH;
-  __POINTER ptr__PDR,ptr_table__SBAH,next__RBAH,result__TBAH;
-  __POINTER ptr_table__XBAH,next__WBAH,result__YBAH,ptr__5RQ;
-  __POINTER ptr_table__2BAH,next__1BAH,result__3BAH,ptr_table__BCAH;
-  __POINTER next__ACAH,result__CCAH,ptr__F0O,ptr_table__GCAH,next__FCAH;
-  __POINTER result__HCAH,ptr_table__LCAH,next__KCAH,result__MCAH;
-  __POINTER ptr__M2Q,ptr_table__QCAH,next__PCAH,result__RCAH;
-  __POINTER ptr_table__VCAH,next__UCAH,result__WCAH,ptr__0KK;
-  __POINTER ptr_table__0CAH,next__ZCAH,result__1CAH,ptr_table__5CAH;
-  __POINTER next__4CAH,result__ADAH,ptr__2VQ,ptr_table__EDAH,next__DDAH;
-  __POINTER result__FDAH,ptr_table__JDAH,next__IDAH,result__KDAH;
-  __POINTER ptr__YUR,ptr_table__ODAH,next__NDAH,result__PDAH;
-  __POINTER ptr_table__TDAH,next__SDAH,result__UDAH,ptr__XHK;
-  __POINTER ptr_table__YDAH,next__XDAH,result__ZDAH,ptr_table__3DAH;
-  __POINTER next__2DAH,result__4DAH,ptr__A4J,ptr_table__CEAH,next__BEAH;
-  __POINTER result__DEAH,ptr_table__HEAH,next__GEAH,result__IEAH;
-  __POINTER ptr__WKM,ptr_table__MEAH,next__LEAH,result__NEAH;
-  __POINTER ptr_table__REAH,next__QEAH,result__SEAH,ptr__2PLF;
-  __POINTER ptr_table__WEAH,next__VEAH,result__XEAH,ptr_table__1EAH;
-  __POINTER next__0EAH,result__2EAH,ptr__S3F,ptr_table__AFAH,next__5EAH;
-  __POINTER result__BFAH,ptr_table__FFAH,next__EFAH,result__GFAH;
-  __POINTER ptr__3PSE,ptr_table__KFAH,next__JFAH,result__LFAH;
-  __POINTER ptr_table__PFAH,next__OFAH,result__QFAH,ptr__DBKF;
-  __POINTER ptr_table__UFAH,next__TFAH,result__VFAH,ptr_table__ZFAH;
-  __POINTER next__YFAH,result__0FAH,ptr__3FLF,ptr_table__4FAH;
-  __POINTER next__3FAH,result__5FAH,ptr_table__DGAH,next__CGAH;
-  __POINTER result__EGAH,ptr__KUMD,ptr_table__IGAH,next__HGAH;
-  __POINTER result__JGAH,ptr_table__NGAH,next__MGAH,result__OGAH;
-  __POINTER ptr__1UED,ptr_table__SGAH,next__RGAH,result__TGAH;
-  __POINTER ptr_table__XGAH,next__WGAH,result__YGAH,result__RW0G;
-  __POINTER ptr_table__2GAH,next__1GAH,result__3GAH,ptr__0ALF;
-  __POINTER ptr_table__EHAH,next__DHAH,result__FHAH,ptr_table__JHAH;
-  __POINTER next__IHAH,result__KHAH,result__ZW0G,ptr_table__OHAH;
-  __POINTER next__NHAH,result__PHAH,ptr__GUKF,ptr_table__WHAH;
-  __POINTER next__VHAH,result__XHAH,ptr_table__1HAH,next__0HAH;
-  __POINTER result__2HAH,result__BX0G,ptr_table__AIAH,next__5HAH;
-  __POINTER result__BIAH,ptr__V2YB,ptr_table__IIAH,next__HIAH;
-  __POINTER result__JIAH,ptr_table__NIAH,next__MIAH,result__OIAH;
-  __POINTER ptr__05YB,ptr_table__SIAH,next__RIAH,result__TIAH;
-  __POINTER ptr_table__XIAH,next__WIAH,result__YIAH,ptr__UJ5B;
-  __POINTER ptr_table__2IAH,next__1IAH,result__3IAH,ptr_table__BJAH;
-  __POINTER next__AJAH,result__CJAH,ptr__UTB,ptr_table__GJAH,next__FJAH;
-  __POINTER result__HJAH,ptr_table__LJAH,next__KJAH,result__MJAH;
-  __POINTER ptr__Q33G,ptr_table__QJAH,next__PJAH,result__RJAH;
-  __POINTER ptr_table__VJAH,next__UJAH,result__WJAH,ptr__VGKB;
-  __POINTER ptr_table__3JAH,next__2JAH,result__4JAH,ptr_table__CKAH;
-  __POINTER next__BKAH,result__DKAH,ptr__YJZB,ptr_table__HKAH;
-  __POINTER next__GKAH,result__IKAH,ptr_table__MKAH,next__LKAH;
-  __POINTER result__NKAH,ptr__L43G,ptr_table__RKAH,next__QKAH;
-  __POINTER result__SKAH,ptr_table__WKAH,next__VKAH,result__XKAH;
-  __POINTER ptr__V43G,ptr_table__1KAH,next__0KAH,result__2KAH;
-  __POINTER ptr_table__ALAH,next__5KAH,result__BLAH,ptr__543G;
-  __POINTER ptr_table__ILAH,next__HLAH,result__JLAH,ptr_table__NLAH;
-  __POINTER next__MLAH,result__OLAH,ptr__ROED,ptr_table__SLAH;
-  __POINTER next__RLAH,result__TLAH,ptr_table__XLAH,next__WLAH;
-  __POINTER result__YLAH,ptr__3XB,ptr_table__2LAH,next__1LAH;
-  __POINTER result__3LAH,ptr_table__BMAH,next__AMAH,result__CMAH;
-  __POINTER result__LZ0G,ptr_table__GMAH,next__FMAH,result__HMAH;
-  __POINTER ptr__51B,ptr_table__OMAH,next__NMAH,result__PMAH;
-  __POINTER ptr_table__TMAH,next__SMAH,result__UMAH,ptr__J53G;
-  __POINTER ptr_table__YMAH,next__XMAH,result__ZMAH,ptr_table__3MAH;
-  __POINTER next__2MAH,result__4MAH,ptr__R3B,ptr_table__CNAH,next__BNAH;
-  __POINTER result__DNAH,ptr_table__HNAH,next__GNAH,result__INAH;
-  __UINTEGER_32 sz__E55G,a__F55G,new_size__G55G,t__H55G,a__I55G;
-  __UINTEGER_32 new_size__U55G,lab_type__T55G,sz__OTG,a__HV2G;
-  __UINTEGER_32 new_size__IV2G,t__MV2G,a__LV2G,new_size__455G;
-  __UINTEGER_32 lab_type__355G,sz__V3DB,a__PV2G,new_size__QV2G,t__UV2G;
-  __UINTEGER_32 a__TV2G,new_size__IAAH,lab_type__HAAH,sz__XMJ,a__XV2G;
-  __UINTEGER_32 new_size__YV2G,t__2V2G,a__1V2G,new_size__SAAH;
-  __UINTEGER_32 lab_type__RAAH,sz__4MH,a__5V2G,new_size__AW2G,t__EW2G;
-  __UINTEGER_32 a__DW2G,new_size__2AAH,lab_type__1AAH,sz__AOC,a__HW2G;
-  __UINTEGER_32 new_size__IW2G,t__MW2G,a__LW2G,new_size__GBAH;
-  __UINTEGER_32 lab_type__FBAH,sz__UZQ,a__PW2G,new_size__QW2G,t__UW2G;
-  __UINTEGER_32 a__TW2G,new_size__QBAH,lab_type__PBAH,sz__RDR,a__XW2G;
-  __UINTEGER_32 new_size__YW2G,t__2W2G,a__1W2G,new_size__0BAH;
-  __UINTEGER_32 lab_type__ZBAH,sz__BSQ,a__5W2G,new_size__AX2G,t__EX2G;
-  __UINTEGER_32 a__DX2G,new_size__ECAH,lab_type__DCAH,sz__H0O,a__HX2G;
-  __UINTEGER_32 new_size__IX2G,t__MX2G,a__LX2G,new_size__OCAH;
-  __UINTEGER_32 lab_type__NCAH,sz__O2Q,a__PX2G,new_size__QX2G,t__UX2G;
-  __UINTEGER_32 a__TX2G,new_size__YCAH,lab_type__XCAH,sz__2KK,a__XX2G;
-  __UINTEGER_32 new_size__YX2G,t__2X2G,a__1X2G,new_size__CDAH;
-  __UINTEGER_32 lab_type__BDAH,sz__4VQ,a__Z50G,new_size__050G,t__450G;
-  __UINTEGER_32 a__350G,new_size__MDAH,lab_type__LDAH,sz__0UR,a__5X2G;
-  __UINTEGER_32 new_size__AY2G,t__EY2G,a__DY2G,new_size__WDAH;
-  __UINTEGER_32 lab_type__VDAH,sz__ZHK,a__HY2G,new_size__IY2G,t__MY2G;
-  __UINTEGER_32 a__LY2G,new_size__AEAH,lab_type__5DAH,sz__C4J,a__PY2G;
-  __UINTEGER_32 new_size__QY2G,t__UY2G,a__TY2G,new_size__KEAH;
-  __UINTEGER_32 lab_type__JEAH,sz__YKM,a__XY2G,new_size__YY2G,t__2Y2G;
-  __UINTEGER_32 a__1Y2G,new_size__UEAH,lab_type__TEAH,sz__4PLF,a__5Y2G;
-  __UINTEGER_32 new_size__AZ2G,t__EZ2G,a__DZ2G,new_size__4EAH;
-  __UINTEGER_32 lab_type__3EAH,sz__U3F,a__D10G,new_size__KXG,t__TYG;
-  __UINTEGER_32 a__J10G,new_size__IFAH,lab_type__HFAH,sz__5PSE,a__HZ2G;
-  __UINTEGER_32 new_size__IZ2G,t__MZ2G,a__LZ2G,new_size__SFAH;
-  __UINTEGER_32 lab_type__RFAH,sz__FBKF,a__PZ2G,new_size__QZ2G,t__UZ2G;
-  __UINTEGER_32 a__TZ2G,new_size__2FAH,lab_type__1FAH,sz__5FLF,a__XZ2G;
-  __UINTEGER_32 new_size__YZ2G,t__2Z2G,a__1Z2G,new_size__GGAH;
-  __UINTEGER_32 lab_type__FGAH,sz__MUMD,a__5Z2G,new_size__A02G,t__E02G;
-  __UINTEGER_32 a__D02G,new_size__QGAH,lab_type__PGAH,sz__3UED,a__H02G;
-  __UINTEGER_32 new_size__I02G,t__M02G,a__L02G,new_size__0GAH;
-  __UINTEGER_32 lab_type__ZGAH,sz__SW0G,a__XW0G,new_size__TW0G;
-  __UINTEGER_32 new_size2__UW0G,a__P02G,new_size__Q02G,sz__2ALF,a__W02G;
-  __UINTEGER_32 new_size__X02G,t__102G,a__002G,new_size__MHAH;
-  __UINTEGER_32 lab_type__LHAH,sz__0W0G,a__5W0G,new_size__1W0G;
-  __UINTEGER_32 new_size2__2W0G,a__402G,new_size__502G,sz__IUKF,a__F12G;
-  __UINTEGER_32 new_size__G12G,t__K12G,a__J12G,new_size__4HAH;
-  __UINTEGER_32 lab_type__3HAH,sz__CX0G,a__HX0G,new_size__DX0G;
-  __UINTEGER_32 new_size2__EX0G,a__N12G,new_size__O12G,sz__X2YB,a__U12G;
-  __UINTEGER_32 new_size__V12G,t__Z12G,a__Y12G,new_size__QIAH;
-  __UINTEGER_32 lab_type__PIAH,sz__25YB,a__212G,new_size__312G,t__B22G;
-  __UINTEGER_32 a__A22G,new_size__0IAH,lab_type__ZIAH,sz__WJ5B,a__E22G;
-  __UINTEGER_32 new_size__F22G,t__J22G,a__I22G,new_size__EJAH;
-  __UINTEGER_32 lab_type__DJAH,sz__WTB,a__M22G,new_size__N22G,t__R22G;
-  __UINTEGER_32 a__Q22G,new_size__OJAH,lab_type__NJAH,sz__S33G,a__T33G;
-  __UINTEGER_32 new_size__U33G,t__V33G,a__W33G,new_size__YJAH;
-  __UINTEGER_32 lab_type__XJAH,sz__XGKB,a__V22G,new_size__W22G,t__022G;
-  __UINTEGER_32 a__Z22G,new_size__FKAH,lab_type__EKAH,sz__0JZB,a__A32G;
-  __UINTEGER_32 new_size__B32G,t__F32G,a__E32G,new_size__PKAH;
-  __UINTEGER_32 lab_type__OKAH,sz__N43G,a__O43G,new_size__P43G,t__Q43G;
-  __UINTEGER_32 a__R43G,new_size__ZKAH,lab_type__YKAH,sz__X43G,a__Y43G;
-  __UINTEGER_32 new_size__Z43G,t__043G,a__143G,new_size__DLAH;
-  __UINTEGER_32 lab_type__CLAH,sz__B53G,a__C53G,new_size__D53G,t__E53G;
-  __UINTEGER_32 a__F53G,new_size__QLAH,lab_type__PLAH,sz__TOED,a__EW1G;
-  __UINTEGER_32 new_size__FW1G,t__JW1G,a__IW1G,new_size__0LAH;
-  __UINTEGER_32 lab_type__ZLAH,sz__5XB,a__O32G,new_size__P32G,t__T32G;
-  __UINTEGER_32 a__S32G,new_size__EMAH,lab_type__DMAH,sz__MZ0G,a__RZ0G;
-  __UINTEGER_32 new_size__NZ0G,new_size2__OZ0G,a__W32G,new_size__X32G;
-  __UINTEGER_32 sz__B2B,a__332G,new_size__432G,t__C42G,a__B42G;
-  __UINTEGER_32 new_size__WMAH,lab_type__VMAH,sz__L53G,a__M53G;
-  __UINTEGER_32 new_size__N53G,t__O53G,a__P53G,new_size__ANAH;
-  __UINTEGER_32 lab_type__5MAH,sz__T3B,a__DL1G,new_size__EL1G,t__IL1G;
-  __UINTEGER_32 a__HL1G,new_size__KNAH,lab_type__JNAH;
-  __STRING *Self__WNEB,*new__TGSG,*new__VGSG,*Self__5Z0G,*Self__L00G;
-  __STRING *Self__XB4G,*Self__H52G,*Self__J52G,*Self__QNAH;
-  __ITM_TYPE_PARAMETER *result__1VQ,*Self__12V;
-  __LIP_BOOLEAN *result__2FLF;
-  void *result__AHAH,*result__SHAH,*result__EIAH,*result__KMAH;
-  void *txt__1,*fmt_name__0MC,*k__Y33G,*__tmp__MND,*k__IPEB;
-  void *element__K32G,*i__T43G,*element__QTEC,*i__H53G,*__tmp__4B;
-  void *__tmp__2H,*__tmp__F1XD,*__tmp__ZJTD,*__tmp__E3XD,*__tmp__CKTD;
-  void *__tmp__D5XD,*__tmp__XKTD,*__tmp__ABYD,*__tmp__ALTD,*__tmp__RCYD;
+  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 *p__AB;
-  __STRING_CONSTANT *result__P33G,*Self__3VS,*Self__S22G,*Self__UMS;
-  __STRING_CONSTANT *Self__233G,*Self__B43G,*Self__G43G,*Self__SGSG;
-  __STRING_CONSTANT *Self__UGSG,*Self__ONAH,*Self__YNAH,*Self__3NAH;
-  __STRING_CONSTANT *Self__COAH,*Self__HOAH;
-  __POSITION pos__HCSG,pos__RCSG,pos__DESG,pos__FESG,pos__HESG;
-  __POSITION pos__JESG,pos__LESG;
-  __TYPE_ID *result__I53G,*result__Q3B;
+  __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;
   void *ent__TB;
-  __DIRECTORY_UNIX *Self__YHSD;
-  void *dir__0HSD,*dir__CISD,*__tmp__AD,*dir__SB;
-  __FILE_UNIX *Self__OIRD;
-  __PROTOTYPE *Self__GJTD;
-  void *s__C0XD,*__tmp__R1XD,*s__B2XD,*__tmp__Q3XD,*s__A4XD,*__tmp__P5XD;
-  void *s__55XD,*__tmp__IBYD,*s__QBYD,*__tmp__ZCYD;
-  void *__tmp__QJTD,*__tmp__KKTD,*__tmp__ILTD;
-  __SECTION_ *Self__KZSG,*Self__LZSG,*Self__MZSG;
-  __CHARACTER *arg__SGD,*Self__N33G,*p__XNEB,*path__SY,*Self__DKC;
-  __CHARACTER *Self__R42G,*model__S42G,*Self__342G,*model__442G;
-  __CHARACTER *__tmp__YB4G,*Self__0B4G;
-  __FAST_ARRAYoSTRINGo *result__B55G,*Self__J55G,*result__R3F,*Self__TFT;
-  void *result__RGD;
-  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__LTG,*Self__IIT;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__S3DB;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__KMCC;
-  __FAST_ARRAYoPROTOTYPEo *result__UMJ,*Self__ECU;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__1MH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__PMT;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__X33G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GPEB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__Q53G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__D42G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__453G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__H42G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MA4G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__L42G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NVVB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5A4G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__X42G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3BT;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__D52G;
-  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__3NC,*Self__4OS;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__RZQ,*Self__H3V;
-  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__ODR,*Self__ZEW;
-  __FAST_ARRAYoITM_TYPE_MULTIo *result__4RQ,*Self__E1V;
-  __FAST_ARRAYoITM_TYPE_BLOCKo *result__E0O,*Self__NJV;
-  __FAST_ARRAYoITM_TYPE_GENERICo *result__L2Q,*Self__0AW;
-  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__ZKK;
-  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__5KU;
-  __FAST_ARRAYoITM_TYPE_STYLEo *result__XUR,*Self__CLW;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__WHK,*Self__DIU;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__53J,*Self__YEU;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__VKM,*Self__GUU;
-  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__1PLF,*Self__PONF;
-  __FAST_ARRAYoLIP_INTEGERo *result__2PSE,*Self__EAWE;
-  __FAST_ARRAYoLIP_STRINGo *result__CBKF,*Self__RCNF;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__JUMD,*Self__EEUD;
-  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__0UED;
-  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__CLSD;
-  void **Result__CCHE;
-  __FAST_ARRAYoLIP_SLOT_DATAo *result__ZALF,*Self__KJNF;
-  void **Result__UIXF;
-  __FAST_ARRAYoLIP_SLOT_CODEo *result__FUKF,*Self__1FNF;
-  void **Result__YEXF;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__U2YB;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__SWFC;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__Z5YB;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__RZFC;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__TJ5B,*Self__5JHC;
-  __HASHED_SEToABSTRACT_STRINGo *result__TTB,*Self__XBS;
-  __BOOLEAN __tmp__2Z,__tmp__X0,result__P5NB,__tmp__F1,result__BAOB;
-  __BOOLEAN __tmp__T1,result__TAOB,__tmp__A2,result__FBOB,__tmp__D4;
-  __BOOLEAN result__ZJAH,result__YREB,result__ELAH,result__LGG;
-  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__LNAH,is_first__B0XD;
-  __BOOLEAN is_first__A2XD,result__VNAH,is_first__53XD,result__0NAH;
-  __BOOLEAN __tmp__PKTD,is_first__45XD,result__5NAH,is_first__PBYD;
-  __BOOLEAN result__EOAH,__tmp__NLTD;
-  __CHARACTER result__0JAH,result__FLAH,result__JKZG,result__OCZG;
-  __CHARACTER Self__SNAH,result__TNAH;
-  __LINKED_LISToSTRING_CONSTANTo *result__UGKB,*Self__L32G,*Self__PTEC;
-  void *node__Z33G,*node__RPEB,*node1__SHZB,*node2__THZB,*__tmp__4QEB;
-  void *node__S53G,*node__F42G,*node__AA4G,*node__J42G,*node__OA4G;
-  void *node__N42G,*node__XVVB,*node__BB4G,*node__Z42G,*node__ICT;
-  void *node__F52G;
-  void **old_buckets__RHZB;
-  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__XJZB;
-  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__LDGC;
-  void *def__WREB;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__K43G,*Self__S43G;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__U43G,*Self__243G;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__443G,*Self__G53G;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__QOED,*Self__QKSD;
-  __FAST_ARRAYoSLOTo *result__2XB,*Self__1DS;
-  void **Result__2H1C;
-  __FAST_ARRAYoTYPE_IDo *result__41B,*Self__0GS;
+  __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;
   arg_count  = argc;
   arg_vector = argv;
   parent_numeric__J=NUMERIC__;
-  clone_allocation_size__NSB= 0;
+  clone_allocation_size__RSB= 0;
   STRING_CONSTANT__->count__DD=((__INTEGER )((0)));
-  STRING__->count__GFC= 0;
-  STRING_CONSTANT__->storage__FQO=((__CHARACTER *)(NULL));
-  STRING__->storage__RBS=NULL;
-  nb_page__ORJ= 0;
-  MEMORY__->map_size_and_id__YSB= 0;
-  capacity_max__IA5= 0;
-  get_begin_memory__YBQB=((__POINTER )(NULL));
-  begin_memory__5UH=((__POINTER )(NULL));
-  MEMORY__->map_previous_linear__XSB= 0;
-  first_free__HDVB=NULL;
-  MEMORY__->map_next_free__ZSB=NULL;
-  MEMORY__->map_previous_free__0SB=NULL;
-  STRING__->capacity__IBS= 0;
-  HASHED_SEToABSTRACT_STRINGo__->buckets__OYR=NULL;
-  HASHED_SEToABSTRACT_STRINGo__->capacity__JYR= 0;
-  HASHED_SEToABSTRACT_STRINGo__->count__PZR= 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;
   list__FK=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->item__0YR=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->next__GZR=NULL;
-  string_tmp__VH=create__BBB( 256);
-  is_shorter__TY=FALSE__;
-  ARRAYED_COLLECTIONoSTRINGo__->upper__WJC= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->capacity__2FT= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->storage__HGT=NULL;
-  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__TJC=(*ARRAYED_COLLECTIONoSTRINGo__);
-  arg__SGD=NULL;
-  str__TGD=NULL;
-  new_count__K55G=((__INTEGER )(arg_count));
-  result__B55G=NULL;
-  ptr__C55G=((__POINTER )(NULL));
-  typ_id__D55G= 0;
-  sz__E55G=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
-  if ((sz__E55G ==  0)) {
-    result__B55G=FAST_ARRAYoSTRINGo__;
+  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__;
   } else {
-    typ_id__D55G=__FAST_ARRAYoSTRINGo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__E55G);
-    if ((typ_id__D55G == (__INTEGER)(-  1))) {
-      a__F55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__G55G=(__UINTEGER_32)((__UINTEGER_32)(sz__E55G + a__F55G) & (__UINTEGER_32)(~ a__F55G));
-      ptr_table__M55G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G55G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__L55G=((__POINTER )(NULL));
-      result__N55G=((__POINTER *)ptr_table__M55G)[ 0];
-      if ((result__N55G == (void *)NULL)) {
-        result__N55G=new_lab__2QJ(new_size__G55G);
-        next__L55G=(void *)((unsigned long)result__N55G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G55G)));
-        ((__POINTER *)next__L55G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__M55G)[ 0]=next__L55G;
-      } else {
-        next__L55G=((__POINTER *)result__N55G)[ 0];
-        if ((next__L55G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N55G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G55G <<  1)) <=  4096)) {
-            next__L55G=(void *)((unsigned long)result__N55G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G55G)));
-          } else {
-            next__L55G=new_lab__2QJ(new_size__G55G);
-          };
-          ((__POINTER *)next__L55G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__M55G)[ 0]=next__L55G;
-        } else {
-          ((__POINTER *)result__N55G)[ 0]=(void *)((unsigned long)((__POINTER *)next__L55G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__N55G=next__L55G;
-        };
-      };
-      ptr__C55G=result__N55G;
-    } else {
-      t__H55G=((__UINTEGER_32 )typ_id__D55G);
-      a__I55G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__U55G=(__UINTEGER_32)((__UINTEGER_32)(sz__E55G + a__I55G) & (__UINTEGER_32)(~ a__I55G));
-      ptr_table__R55G=((__POINTER )(&(table_type[(t__H55G)])));
-      lab_type__T55G=(__UINTEGER_32)(t__H55G |  1);
-      next__Q55G=((__POINTER )(NULL));
-      result__S55G=((__POINTER *)ptr_table__R55G)[ 0];
-      if ((result__S55G == (void *)NULL)) {
-        result__S55G=new_lab__2QJ(lab_type__T55G);
-        next__Q55G=(void *)((unsigned long)result__S55G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U55G)));
-        ((__POINTER *)next__Q55G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__R55G)[ 0]=next__Q55G;
-      } else {
-        next__Q55G=((__POINTER *)result__S55G)[ 0];
-        if ((next__Q55G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S55G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__U55G <<  1)) <=  4096)) {
-            next__Q55G=(void *)((unsigned long)result__S55G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U55G)));
-          } else {
-            next__Q55G=new_lab__2QJ(lab_type__T55G);
-          };
-          ((__POINTER *)next__Q55G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__R55G)[ 0]=next__Q55G;
-        } else {
-          ((__POINTER *)result__S55G)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q55G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__S55G=next__Q55G;
-        };
-      };
-      ptr__C55G=result__S55G;
-    };
-    result__B55G=((__FAST_ARRAYoSTRINGo *)ptr__C55G);
-    *(result__B55G) = *(FAST_ARRAYoSTRINGo__);
-  };
-  Self__J55G=((__FAST_ARRAYoSTRINGo *)result__B55G);
-  if ((Self__J55G->parent_arrayed_collection__TJC.capacity__2FT < new_count__K55G)) {
-    Self__J55G->parent_arrayed_collection__TJC.storage__HGT=create__JFRB(new_count__K55G);
-    Self__J55G->parent_arrayed_collection__TJC.capacity__2FT=new_count__K55G;
-  };
-  Self__J55G->parent_arrayed_collection__TJC.upper__WJC=(__INTEGER)(-  1);
-  result__RGD=result__B55G;
-  Self__XGF= 0;
-  limit_up__YGF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
-  while ((Self__XGF <= limit_up__YGF)) {
-    arg__SGD=((__CHARACTER *)(arg_vector[(Self__XGF)]));
-    Self__N33G=((__CHARACTER *)arg__SGD);
-    idx__M33G= 0;
-    while ((! ((idx__M33G >  1024) || ('\0' == Self__N33G[idx__M33G])))) {
-      idx__M33G=(__INTEGER)(idx__M33G +  1);
-    };
-    str__TGD=create__BBB(idx__M33G);
-    Self__WNEB=((__STRING *)str__TGD);
-    p__XNEB=arg__SGD;
-    i__YNEB= 0;
-    Self__WNEB->count__GFC= 0;
-    while ((((__CHARACTER *)p__XNEB)[i__YNEB] != '\0')) {
-      add_last__JLT(Self__WNEB,((__CHARACTER *)p__XNEB)[i__YNEB]);
-      i__YNEB=(__INTEGER)(i__YNEB +  1);
-    };
-    add_last__QRV(result__RGD,str__TGD);
-    Self__XGF=(__INTEGER)(Self__XGF +  1);
+    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);
   };
   output_name__DI=NULL;
-  format_name__V0=NULL;
-  is_short_code__D1=FALSE__;
-  is_short_private__R1=FALSE__;
+  format_name__Y0=NULL;
+  is_short_code__G1=FALSE__;
+  is_short_private__U1=FALSE__;
   is_short_recursive__JB=FALSE__;
   is_shorter2__VI=FALSE__;
   input_name__3B=NULL;
-  FILE_SYSTEM__->parent_directory__5ED=1;
-  string_tmp__DED=create__BBB( 255);
+  FILE_SYSTEM__->parent_directory__DFD=1;
+  string_tmp__HED=create__EBB( 255);
   ENTRY__->path__BD=NULL;
-  ENTRY__->name__FNT=NULL;
-  ENTRY_UNIX__->parent_entry__IED=(*ENTRY__);
-  FILE_UNIX__->parent_entry_unix__MCF=(*ENTRY_UNIX__);
-  DIRECTORY_UNIX__->parent_entry_unix__JED=(*ENTRY_UNIX__);
-  DIRECTORY__->list__YERD=NULL;
-  DIRECTORY_UNIX__->parent_directory__KED=(*DIRECTORY__);
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__V0S=NULL;
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__Q0S= 0;
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__W1S= 0;
-  result__LTG=NULL;
-  ptr__MTG=((__POINTER )(NULL));
-  typ_id__RTG= 0;
-  sz__OTG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
-  if ((sz__OTG ==  0)) {
-    result__LTG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+  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__;
   } else {
-    typ_id__RTG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__OTG);
-    if ((typ_id__RTG == (__INTEGER)(-  1))) {
-      a__HV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IV2G=(__UINTEGER_32)((__UINTEGER_32)(sz__OTG + a__HV2G) & (__UINTEGER_32)(~ a__HV2G));
-      ptr_table__W55G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IV2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__V55G=((__POINTER )(NULL));
-      result__X55G=((__POINTER *)ptr_table__W55G)[ 0];
-      if ((result__X55G == (void *)NULL)) {
-        result__X55G=new_lab__2QJ(new_size__IV2G);
-        next__V55G=(void *)((unsigned long)result__X55G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IV2G)));
-        ((__POINTER *)next__V55G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__W55G)[ 0]=next__V55G;
-      } else {
-        next__V55G=((__POINTER *)result__X55G)[ 0];
-        if ((next__V55G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X55G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IV2G <<  1)) <=  4096)) {
-            next__V55G=(void *)((unsigned long)result__X55G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IV2G)));
-          } else {
-            next__V55G=new_lab__2QJ(new_size__IV2G);
-          };
-          ((__POINTER *)next__V55G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__W55G)[ 0]=next__V55G;
-        } else {
-          ((__POINTER *)result__X55G)[ 0]=(void *)((unsigned long)((__POINTER *)next__V55G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__X55G=next__V55G;
-        };
-      };
-      ptr__MTG=result__X55G;
-    } else {
-      t__MV2G=((__UINTEGER_32 )typ_id__RTG);
-      a__LV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__455G=(__UINTEGER_32)((__UINTEGER_32)(sz__OTG + a__LV2G) & (__UINTEGER_32)(~ a__LV2G));
-      ptr_table__155G=((__POINTER )(&(table_type[(t__MV2G)])));
-      lab_type__355G=(__UINTEGER_32)(t__MV2G |  1);
-      next__055G=((__POINTER )(NULL));
-      result__255G=((__POINTER *)ptr_table__155G)[ 0];
-      if ((result__255G == (void *)NULL)) {
-        result__255G=new_lab__2QJ(lab_type__355G);
-        next__055G=(void *)((unsigned long)result__255G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__455G)));
-        ((__POINTER *)next__055G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__155G)[ 0]=next__055G;
-      } else {
-        next__055G=((__POINTER *)result__255G)[ 0];
-        if ((next__055G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__255G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__455G <<  1)) <=  4096)) {
-            next__055G=(void *)((unsigned long)result__255G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__455G)));
-          } else {
-            next__055G=new_lab__2QJ(lab_type__355G);
-          };
-          ((__POINTER *)next__055G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__155G)[ 0]=next__055G;
-        } else {
-          ((__POINTER *)result__255G)[ 0]=(void *)((unsigned long)((__POINTER *)next__055G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__255G=next__055G;
-        };
-      };
-      ptr__MTG=result__255G;
-    };
-    result__LTG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__MTG);
-    *(result__LTG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
-  };
-  Self__IIT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__LTG);
-  new_capacity__TJY=prime_number_ceiling__H41( 193);
-  Self__IIT->buckets__V0S=create__HB4(new_capacity__TJY);
-  Self__IIT->capacity__Q0S=new_capacity__TJY;
-  Self__IIT->count__W1S= 0;
-  alias__UED=result__LTG;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__B1S=NULL;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__N1S=NULL;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__KSOB=NULL;
-  string_tmp2__J0AC=create__BBB( 255);
-  string_tmp3__P0AC=create__BBB( 255);
-  ITM_OBJECT__->position__3CJ=((__POSITION ) 0);
+    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);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
+  NAMED__->style__VDU='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__FNBC=NULL;
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__ANBC= 0;
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__FOBC= 0;
-  result__S3DB=NULL;
-  ptr__T3DB=((__POINTER )(NULL));
-  typ_id__Y3DB= 0;
-  sz__V3DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
-  if ((sz__V3DB ==  0)) {
-    result__S3DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+  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__;
   } else {
-    typ_id__Y3DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__V3DB);
-    if ((typ_id__Y3DB == (__INTEGER)(-  1))) {
-      a__PV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QV2G=(__UINTEGER_32)((__UINTEGER_32)(sz__V3DB + a__PV2G) & (__UINTEGER_32)(~ a__PV2G));
-      ptr_table__AAAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QV2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__555G=((__POINTER )(NULL));
-      result__BAAH=((__POINTER *)ptr_table__AAAH)[ 0];
-      if ((result__BAAH == (void *)NULL)) {
-        result__BAAH=new_lab__2QJ(new_size__QV2G);
-        next__555G=(void *)((unsigned long)result__BAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QV2G)));
-        ((__POINTER *)next__555G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AAAH)[ 0]=next__555G;
-      } else {
-        next__555G=((__POINTER *)result__BAAH)[ 0];
-        if ((next__555G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BAAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QV2G <<  1)) <=  4096)) {
-            next__555G=(void *)((unsigned long)result__BAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QV2G)));
-          } else {
-            next__555G=new_lab__2QJ(new_size__QV2G);
-          };
-          ((__POINTER *)next__555G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AAAH)[ 0]=next__555G;
-        } else {
-          ((__POINTER *)result__BAAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__555G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BAAH=next__555G;
-        };
-      };
-      ptr__T3DB=result__BAAH;
-    } else {
-      t__UV2G=((__UINTEGER_32 )typ_id__Y3DB);
-      a__TV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IAAH=(__UINTEGER_32)((__UINTEGER_32)(sz__V3DB + a__TV2G) & (__UINTEGER_32)(~ a__TV2G));
-      ptr_table__FAAH=((__POINTER )(&(table_type[(t__UV2G)])));
-      lab_type__HAAH=(__UINTEGER_32)(t__UV2G |  1);
-      next__EAAH=((__POINTER )(NULL));
-      result__GAAH=((__POINTER *)ptr_table__FAAH)[ 0];
-      if ((result__GAAH == (void *)NULL)) {
-        result__GAAH=new_lab__2QJ(lab_type__HAAH);
-        next__EAAH=(void *)((unsigned long)result__GAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAAH)));
-        ((__POINTER *)next__EAAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FAAH)[ 0]=next__EAAH;
-      } else {
-        next__EAAH=((__POINTER *)result__GAAH)[ 0];
-        if ((next__EAAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GAAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IAAH <<  1)) <=  4096)) {
-            next__EAAH=(void *)((unsigned long)result__GAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAAH)));
-          } else {
-            next__EAAH=new_lab__2QJ(lab_type__HAAH);
-          };
-          ((__POINTER *)next__EAAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FAAH)[ 0]=next__EAAH;
-        } else {
-          ((__POINTER *)result__GAAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EAAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GAAH=next__EAAH;
-        };
-      };
-      ptr__T3DB=result__GAAH;
-    };
-    result__S3DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__T3DB);
-    *(result__S3DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
-  };
-  Self__KMCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__S3DB);
-  new_capacity__0UJC=prime_number_ceiling__H41( 193);
-  Self__KMCC->buckets__FNBC=create__XHTC(new_capacity__0UJC);
-  Self__KMCC->capacity__ANBC=new_capacity__0UJC;
-  Self__KMCC->count__FOBC= 0;
-  prototype_dico__5SS=result__S3DB;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__RNBC=NULL;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__2NBC=NULL;
-  PROTOTYPE__->filename__EPG=NULL;
-  PROTOTYPE__->shortname__VHE=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__GBBC= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__IBBC= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__ECBC=NULL;
-  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__DME=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
-  ITM_TYPE_SIMPLE__->name__0XP=NULL;
-  ITM_TYPE_PARAMETER__->parent_itm_type__NDE=(*ITM_TYPE_SIMPLE__);
-  PROTOTYPE__->idf_generic_list__EME=NULL;
+    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;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__0ST=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__NCU= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__4ST=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__RCU= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  result__UMJ=NULL;
-  ptr__VMJ=((__POINTER )(NULL));
-  typ_id__0MJ= 0;
-  sz__XMJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
-  if ((sz__XMJ ==  0)) {
-    result__UMJ=FAST_ARRAYoPROTOTYPEo__;
+  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__;
   } else {
-    typ_id__0MJ=__FAST_ARRAYoPROTOTYPEo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__XMJ);
-    if ((typ_id__0MJ == (__INTEGER)(-  1))) {
-      a__XV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YV2G=(__UINTEGER_32)((__UINTEGER_32)(sz__XMJ + a__XV2G) & (__UINTEGER_32)(~ a__XV2G));
-      ptr_table__KAAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YV2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JAAH=((__POINTER )(NULL));
-      result__LAAH=((__POINTER *)ptr_table__KAAH)[ 0];
-      if ((result__LAAH == (void *)NULL)) {
-        result__LAAH=new_lab__2QJ(new_size__YV2G);
-        next__JAAH=(void *)((unsigned long)result__LAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YV2G)));
-        ((__POINTER *)next__JAAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KAAH)[ 0]=next__JAAH;
-      } else {
-        next__JAAH=((__POINTER *)result__LAAH)[ 0];
-        if ((next__JAAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LAAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YV2G <<  1)) <=  4096)) {
-            next__JAAH=(void *)((unsigned long)result__LAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YV2G)));
-          } else {
-            next__JAAH=new_lab__2QJ(new_size__YV2G);
-          };
-          ((__POINTER *)next__JAAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KAAH)[ 0]=next__JAAH;
-        } else {
-          ((__POINTER *)result__LAAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LAAH=next__JAAH;
-        };
-      };
-      ptr__VMJ=result__LAAH;
-    } else {
-      t__2V2G=((__UINTEGER_32 )typ_id__0MJ);
-      a__1V2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SAAH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMJ + a__1V2G) & (__UINTEGER_32)(~ a__1V2G));
-      ptr_table__PAAH=((__POINTER )(&(table_type[(t__2V2G)])));
-      lab_type__RAAH=(__UINTEGER_32)(t__2V2G |  1);
-      next__OAAH=((__POINTER )(NULL));
-      result__QAAH=((__POINTER *)ptr_table__PAAH)[ 0];
-      if ((result__QAAH == (void *)NULL)) {
-        result__QAAH=new_lab__2QJ(lab_type__RAAH);
-        next__OAAH=(void *)((unsigned long)result__QAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAAH)));
-        ((__POINTER *)next__OAAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PAAH)[ 0]=next__OAAH;
-      } else {
-        next__OAAH=((__POINTER *)result__QAAH)[ 0];
-        if ((next__OAAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QAAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SAAH <<  1)) <=  4096)) {
-            next__OAAH=(void *)((unsigned long)result__QAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAAH)));
-          } else {
-            next__OAAH=new_lab__2QJ(lab_type__RAAH);
-          };
-          ((__POINTER *)next__OAAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PAAH)[ 0]=next__OAAH;
-        } else {
-          ((__POINTER *)result__QAAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OAAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QAAH=next__OAAH;
-        };
-      };
-      ptr__VMJ=result__QAAH;
-    };
-    result__UMJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__VMJ);
-    *(result__UMJ) = *(FAST_ARRAYoPROTOTYPEo__);
-  };
-  Self__ECU=((__FAST_ARRAYoPROTOTYPEo *)result__UMJ);
-  if ((Self__ECU->parent_arrayed_collection__AJ.capacity__NCU <  512)) {
-    Self__ECU->parent_arrayed_collection__AJ.storage__0ST=create__WESB( 512);
-    Self__ECU->parent_arrayed_collection__AJ.capacity__NCU= 512;
-  };
-  Self__ECU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
-  prototype_list__BJ=result__UMJ;
-  PROTOTYPE__->index__FMG= 0;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__E3GD=NULL;
-  string_tmp__0VX=create__BBB( 128);
-  PROTOTYPE__->source__3AC=NULL;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__TAGC=NULL;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__M4BC= 0;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__4OGC= 0;
-  PROTOTYPE__->slot_list__MUS=NULL;
-  object__ZAC=NULL;
-  source__5AC=NULL;
-  position__CBC= 0;
-  pos_cur__FBC= 0;
-  pos_line__GBC= 0;
-  pos_col__HBC= 0;
-  key_comment_default__QBC=NULL;
-  is_catch_comment__QWC=FALSE__;
-  is_active_short__OBC=FALSE__;
-  output_code__SI=create__BBB( 4000000);
-  short_derive__RBC= 0;
-  last_comment__K0D=create__BBB( 256);
-  last_slot__A2D=NULL;
-  ITM_SLOT__->comment__GJJD=NULL;
-  ITM_SLOT__->parent_named__D5=(*NAMED__);
-  ITM_SLOT__->id_section__I1C=NULL;
-  ITM_SLOT__->result_type__K4FC=NULL;
-  ITM_SLOT__->affect__Z5FC='\0';
-  ITM_SLOT__->next__4GHC=NULL;
-  ITM_SLOT_OPERATOR__->parent_itm_slot__4T5B=(*ITM_SLOT__);
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__PCT=NULL;
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__KCT= 0;
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__YLY= 0;
-  result__1MH=NULL;
-  ptr__2MH=((__POINTER )(NULL));
-  typ_id__BNH= 0;
-  sz__4MH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
-  if ((sz__4MH ==  0)) {
-    result__1MH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    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__;
   } else {
-    typ_id__BNH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4MH);
-    if ((typ_id__BNH == (__INTEGER)(-  1))) {
-      a__5V2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__4MH + a__5V2G) & (__UINTEGER_32)(~ a__5V2G));
-      ptr_table__UAAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AW2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__TAAH=((__POINTER )(NULL));
-      result__VAAH=((__POINTER *)ptr_table__UAAH)[ 0];
-      if ((result__VAAH == (void *)NULL)) {
-        result__VAAH=new_lab__2QJ(new_size__AW2G);
-        next__TAAH=(void *)((unsigned long)result__VAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AW2G)));
-        ((__POINTER *)next__TAAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UAAH)[ 0]=next__TAAH;
-      } else {
-        next__TAAH=((__POINTER *)result__VAAH)[ 0];
-        if ((next__TAAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VAAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AW2G <<  1)) <=  4096)) {
-            next__TAAH=(void *)((unsigned long)result__VAAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AW2G)));
-          } else {
-            next__TAAH=new_lab__2QJ(new_size__AW2G);
-          };
-          ((__POINTER *)next__TAAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UAAH)[ 0]=next__TAAH;
-        } else {
-          ((__POINTER *)result__VAAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TAAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VAAH=next__TAAH;
-        };
-      };
-      ptr__2MH=result__VAAH;
-    } else {
-      t__EW2G=((__UINTEGER_32 )typ_id__BNH);
-      a__DW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2AAH=(__UINTEGER_32)((__UINTEGER_32)(sz__4MH + a__DW2G) & (__UINTEGER_32)(~ a__DW2G));
-      ptr_table__ZAAH=((__POINTER )(&(table_type[(t__EW2G)])));
-      lab_type__1AAH=(__UINTEGER_32)(t__EW2G |  1);
-      next__YAAH=((__POINTER )(NULL));
-      result__0AAH=((__POINTER *)ptr_table__ZAAH)[ 0];
-      if ((result__0AAH == (void *)NULL)) {
-        result__0AAH=new_lab__2QJ(lab_type__1AAH);
-        next__YAAH=(void *)((unsigned long)result__0AAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2AAH)));
-        ((__POINTER *)next__YAAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZAAH)[ 0]=next__YAAH;
-      } else {
-        next__YAAH=((__POINTER *)result__0AAH)[ 0];
-        if ((next__YAAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0AAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__2AAH <<  1)) <=  4096)) {
-            next__YAAH=(void *)((unsigned long)result__0AAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2AAH)));
-          } else {
-            next__YAAH=new_lab__2QJ(lab_type__1AAH);
-          };
-          ((__POINTER *)next__YAAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZAAH)[ 0]=next__YAAH;
-        } else {
-          ((__POINTER *)result__0AAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YAAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0AAH=next__YAAH;
-        };
-      };
-      ptr__2MH=result__0AAH;
-    };
-    result__1MH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__2MH);
-    *(result__1MH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
-  };
-  Self__PMT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-  new_capacity__TLY=prime_number_ceiling__H41( 193);
-  Self__PMT->buckets__PCT=create__RF4(new_capacity__TLY);
-  Self__PMT->capacity__KCT=new_capacity__TLY;
-  Self__PMT->count__YLY= 0;
-  short_dico__QD=result__1MH;
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__1CT=NULL;
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__GDT=NULL;
-  token__WBD=create__BBB( 100);
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__XX3=NULL;
-  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__PCD= 0;
+    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;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_CONSTANTo__);
-  LINKED_LISToSTRING_CONSTANTo__->mem_idx__4TEC= 0;
-  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__AUEC=NULL;
-  LINKED_LISToSTRING_CONSTANTo__->first_link__UTEC=NULL;
-  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__2NOD=NULL;
-  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__KVHD=NULL;
-  type_error__4MG= 0;
-  msg_err__5MG=create__BBB( 256);
-  begin_position__1AE= 0;
-  last_string__YZC=NULL;
-  string_tmp2__R5I=create__BBB( 256);
-  last_integer__JRO= 0;
-  LINKED_LISToSTRING_CONSTANTo__->last_link__3TEC=NULL;
-  index_count__X4= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__31R=NULL;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__Y1R= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__32R= 0;
-  result__3NC=NULL;
-  ptr__4NC=((__POINTER )(NULL));
-  typ_id__DOC= 0;
-  sz__AOC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
-  if ((sz__AOC ==  0)) {
-    result__3NC=HASHED_DICTIONARYoTYPExSTRING_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__;
   } else {
-    typ_id__DOC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__AOC);
-    if ((typ_id__DOC == (__INTEGER)(-  1))) {
-      a__HW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__AOC + a__HW2G) & (__UINTEGER_32)(~ a__HW2G));
-      ptr_table__4AAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IW2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__3AAH=((__POINTER )(NULL));
-      result__5AAH=((__POINTER *)ptr_table__4AAH)[ 0];
-      if ((result__5AAH == (void *)NULL)) {
-        result__5AAH=new_lab__2QJ(new_size__IW2G);
-        next__3AAH=(void *)((unsigned long)result__5AAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IW2G)));
-        ((__POINTER *)next__3AAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4AAH)[ 0]=next__3AAH;
-      } else {
-        next__3AAH=((__POINTER *)result__5AAH)[ 0];
-        if ((next__3AAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5AAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IW2G <<  1)) <=  4096)) {
-            next__3AAH=(void *)((unsigned long)result__5AAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IW2G)));
-          } else {
-            next__3AAH=new_lab__2QJ(new_size__IW2G);
-          };
-          ((__POINTER *)next__3AAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4AAH)[ 0]=next__3AAH;
-        } else {
-          ((__POINTER *)result__5AAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3AAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5AAH=next__3AAH;
-        };
-      };
-      ptr__4NC=result__5AAH;
-    } else {
-      t__MW2G=((__UINTEGER_32 )typ_id__DOC);
-      a__LW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GBAH=(__UINTEGER_32)((__UINTEGER_32)(sz__AOC + a__LW2G) & (__UINTEGER_32)(~ a__LW2G));
-      ptr_table__DBAH=((__POINTER )(&(table_type[(t__MW2G)])));
-      lab_type__FBAH=(__UINTEGER_32)(t__MW2G |  1);
-      next__CBAH=((__POINTER )(NULL));
-      result__EBAH=((__POINTER *)ptr_table__DBAH)[ 0];
-      if ((result__EBAH == (void *)NULL)) {
-        result__EBAH=new_lab__2QJ(lab_type__FBAH);
-        next__CBAH=(void *)((unsigned long)result__EBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GBAH)));
-        ((__POINTER *)next__CBAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DBAH)[ 0]=next__CBAH;
-      } else {
-        next__CBAH=((__POINTER *)result__EBAH)[ 0];
-        if ((next__CBAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EBAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GBAH <<  1)) <=  4096)) {
-            next__CBAH=(void *)((unsigned long)result__EBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GBAH)));
-          } else {
-            next__CBAH=new_lab__2QJ(lab_type__FBAH);
-          };
-          ((__POINTER *)next__CBAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DBAH)[ 0]=next__CBAH;
-        } else {
-          ((__POINTER *)result__EBAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CBAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EBAH=next__CBAH;
-        };
-      };
-      ptr__4NC=result__EBAH;
-    };
-    result__3NC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__4NC);
-    *(result__3NC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
-  };
-  Self__4OS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__3NC);
-  new_capacity__QKX=prime_number_ceiling__H41( 193);
-  Self__4OS->buckets__31R=create__2Y2(new_capacity__QKX);
-  Self__4OS->capacity__Y1R=new_capacity__QKX;
-  Self__4OS->count__32R= 0;
-  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__J2R=NULL;
-  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__U2R=NULL;
-  ARRAYED_COLLECTIONoSLOTo__->capacity__EES= 0;
-  FAST_ARRAYoSLOTo__->parent_arrayed_collection__J5=(*ARRAYED_COLLECTIONoSLOTo__);
-  TYPE_FULL__->flag__IFS= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->upper__C4R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__E4R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->storage__A5R=NULL;
-  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__IAB=(*ARRAYED_COLLECTIONoTYPE_IDo__);
-  list_id__KAB=NULL;
+    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;
   directory_list__YB=NULL;
   file_list__0B=NULL;
   current_list__2B=NULL;
-  LINKED_COLLECTIONoENTRYo__->upper__E12D= 0;
-  LINKED_LISToENTRYo__->parent_linked_collection__XERD=(*LINKED_COLLECTIONoENTRYo__);
-  LINKED_LISToENTRYo__->first_link__GFVE=NULL;
-  LINKED_LISToENTRYo__->mem_idx__NFVE= 0;
-  LINKED_LISToENTRYo__->mem_lnk__OFVE=NULL;
-  LINKED_LISToENTRYo__->last_link__PFVE=NULL;
-  LINKED_LIST_NODEoENTRYo__->item__ZWVE=NULL;
-  LINKED_LIST_NODEoENTRYo__->next__W0DF=NULL;
-  FILE_UNIX__->stream__UIRD=((__POINTER )(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));
   proto_input__BI=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->buckets__5DV=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->capacity__0HT= 0;
-  HASHED_SEToSTRING_CONSTANTo__->count__IHY= 0;
-  short_local__ZBC=NULL;
-  output_decl__NFE=create__BBB( 60000);
-  PROTOTYPE__->type_style__H2C=NULL;
-  is_parameter_type__YJE=FALSE__;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__VUV= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__QYV= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__LZV=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__ZTP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
-  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__0HV= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__BMV=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__PNV= 0;
-  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__JXC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
-  result__RZQ=NULL;
-  ptr__SZQ=((__POINTER )(NULL));
-  typ_id__XZQ= 0;
-  sz__UZQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__UZQ ==  0)) {
-    result__RZQ=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+  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__;
   } else {
-    typ_id__XZQ=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__UZQ);
-    if ((typ_id__XZQ == (__INTEGER)(-  1))) {
-      a__PW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__UZQ + a__PW2G) & (__UINTEGER_32)(~ a__PW2G));
-      ptr_table__IBAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QW2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__HBAH=((__POINTER )(NULL));
-      result__JBAH=((__POINTER *)ptr_table__IBAH)[ 0];
-      if ((result__JBAH == (void *)NULL)) {
-        result__JBAH=new_lab__2QJ(new_size__QW2G);
-        next__HBAH=(void *)((unsigned long)result__JBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QW2G)));
-        ((__POINTER *)next__HBAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IBAH)[ 0]=next__HBAH;
-      } else {
-        next__HBAH=((__POINTER *)result__JBAH)[ 0];
-        if ((next__HBAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JBAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QW2G <<  1)) <=  4096)) {
-            next__HBAH=(void *)((unsigned long)result__JBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QW2G)));
-          } else {
-            next__HBAH=new_lab__2QJ(new_size__QW2G);
-          };
-          ((__POINTER *)next__HBAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IBAH)[ 0]=next__HBAH;
-        } else {
-          ((__POINTER *)result__JBAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HBAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JBAH=next__HBAH;
-        };
-      };
-      ptr__SZQ=result__JBAH;
-    } else {
-      t__UW2G=((__UINTEGER_32 )typ_id__XZQ);
-      a__TW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QBAH=(__UINTEGER_32)((__UINTEGER_32)(sz__UZQ + a__TW2G) & (__UINTEGER_32)(~ a__TW2G));
-      ptr_table__NBAH=((__POINTER )(&(table_type[(t__UW2G)])));
-      lab_type__PBAH=(__UINTEGER_32)(t__UW2G |  1);
-      next__MBAH=((__POINTER )(NULL));
-      result__OBAH=((__POINTER *)ptr_table__NBAH)[ 0];
-      if ((result__OBAH == (void *)NULL)) {
-        result__OBAH=new_lab__2QJ(lab_type__PBAH);
-        next__MBAH=(void *)((unsigned long)result__OBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBAH)));
-        ((__POINTER *)next__MBAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NBAH)[ 0]=next__MBAH;
-      } else {
-        next__MBAH=((__POINTER *)result__OBAH)[ 0];
-        if ((next__MBAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OBAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QBAH <<  1)) <=  4096)) {
-            next__MBAH=(void *)((unsigned long)result__OBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBAH)));
-          } else {
-            next__MBAH=new_lab__2QJ(lab_type__PBAH);
-          };
-          ((__POINTER *)next__MBAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NBAH)[ 0]=next__MBAH;
-        } else {
-          ((__POINTER *)result__OBAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MBAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OBAH=next__MBAH;
-        };
-      };
-      ptr__SZQ=result__OBAH;
-    };
-    result__RZQ=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__SZQ);
-    *(result__RZQ) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__H3V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__RZQ);
-  if ((Self__H3V->parent_arrayed_collection__ZTP.capacity__QYV <  5)) {
-    Self__H3V->parent_arrayed_collection__ZTP.storage__LZV=create__2IRB( 5);
-    Self__H3V->parent_arrayed_collection__ZTP.capacity__QYV= 5;
-  };
-  Self__H3V->parent_arrayed_collection__ZTP.upper__VUV=(__INTEGER)(-  1);
-  free_list__0TP=result__RZQ;
-  empty_list__BVP=create_with_capacity__YER( 0);
-  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__G5V=NULL;
-  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__B5V= 0;
-  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__VHW= 0;
-  result__ODR=NULL;
-  ptr__PDR=((__POINTER )(NULL));
-  typ_id__UDR= 0;
-  sz__RDR=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__RDR ==  0)) {
-    result__ODR=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    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__;
   } else {
-    typ_id__UDR=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__RDR);
-    if ((typ_id__UDR == (__INTEGER)(-  1))) {
-      a__XW2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YW2G=(__UINTEGER_32)((__UINTEGER_32)(sz__RDR + a__XW2G) & (__UINTEGER_32)(~ a__XW2G));
-      ptr_table__SBAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YW2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RBAH=((__POINTER )(NULL));
-      result__TBAH=((__POINTER *)ptr_table__SBAH)[ 0];
-      if ((result__TBAH == (void *)NULL)) {
-        result__TBAH=new_lab__2QJ(new_size__YW2G);
-        next__RBAH=(void *)((unsigned long)result__TBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YW2G)));
-        ((__POINTER *)next__RBAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SBAH)[ 0]=next__RBAH;
-      } else {
-        next__RBAH=((__POINTER *)result__TBAH)[ 0];
-        if ((next__RBAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TBAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YW2G <<  1)) <=  4096)) {
-            next__RBAH=(void *)((unsigned long)result__TBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YW2G)));
-          } else {
-            next__RBAH=new_lab__2QJ(new_size__YW2G);
-          };
-          ((__POINTER *)next__RBAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SBAH)[ 0]=next__RBAH;
-        } else {
-          ((__POINTER *)result__TBAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TBAH=next__RBAH;
-        };
-      };
-      ptr__PDR=result__TBAH;
-    } else {
-      t__2W2G=((__UINTEGER_32 )typ_id__UDR);
-      a__1W2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0BAH=(__UINTEGER_32)((__UINTEGER_32)(sz__RDR + a__1W2G) & (__UINTEGER_32)(~ a__1W2G));
-      ptr_table__XBAH=((__POINTER )(&(table_type[(t__2W2G)])));
-      lab_type__ZBAH=(__UINTEGER_32)(t__2W2G |  1);
-      next__WBAH=((__POINTER )(NULL));
-      result__YBAH=((__POINTER *)ptr_table__XBAH)[ 0];
-      if ((result__YBAH == (void *)NULL)) {
-        result__YBAH=new_lab__2QJ(lab_type__ZBAH);
-        next__WBAH=(void *)((unsigned long)result__YBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BAH)));
-        ((__POINTER *)next__WBAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XBAH)[ 0]=next__WBAH;
-      } else {
-        next__WBAH=((__POINTER *)result__YBAH)[ 0];
-        if ((next__WBAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0BAH <<  1)) <=  4096)) {
-            next__WBAH=(void *)((unsigned long)result__YBAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BAH)));
-          } else {
-            next__WBAH=new_lab__2QJ(lab_type__ZBAH);
-          };
-          ((__POINTER *)next__WBAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XBAH)[ 0]=next__WBAH;
-        } else {
-          ((__POINTER *)result__YBAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YBAH=next__WBAH;
-        };
-      };
-      ptr__PDR=result__YBAH;
-    };
-    result__ODR=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__PDR);
-    *(result__ODR) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__ZEW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__ODR);
-  new_capacity__KI1=prime_number_ceiling__H41( 53);
-  Self__ZEW->buckets__G5V=create__LZBB(new_capacity__KI1);
-  Self__ZEW->capacity__B5V=new_capacity__KI1;
-  Self__ZEW->count__VHW= 0;
-  bucket__MVP=result__ODR;
-  ITM_TYPE_STYLE__->parent_itm_type_simple__RRN=(*ITM_TYPE_SIMPLE__);
-  ITM_TYPE_STYLE__->style__DYP=NULL;
-  ITM_TYPE_GENERIC__->parent_itm_type_style__SRN=(*ITM_TYPE_STYLE__);
-  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__S5V=NULL;
-  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__45V=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__GJP= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__N1V= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__Y1V=NULL;
-  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__2IP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
-  result__4RQ=NULL;
-  ptr__5RQ=((__POINTER )(NULL));
-  typ_id__ESQ= 0;
-  sz__BSQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
-  if ((sz__BSQ ==  0)) {
-    result__4RQ=FAST_ARRAYoITM_TYPE_MULTIo__;
+    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__;
   } else {
-    typ_id__ESQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__BSQ);
-    if ((typ_id__ESQ == (__INTEGER)(-  1))) {
-      a__5W2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AX2G=(__UINTEGER_32)((__UINTEGER_32)(sz__BSQ + a__5W2G) & (__UINTEGER_32)(~ a__5W2G));
-      ptr_table__2BAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AX2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__1BAH=((__POINTER )(NULL));
-      result__3BAH=((__POINTER *)ptr_table__2BAH)[ 0];
-      if ((result__3BAH == (void *)NULL)) {
-        result__3BAH=new_lab__2QJ(new_size__AX2G);
-        next__1BAH=(void *)((unsigned long)result__3BAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AX2G)));
-        ((__POINTER *)next__1BAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2BAH)[ 0]=next__1BAH;
-      } else {
-        next__1BAH=((__POINTER *)result__3BAH)[ 0];
-        if ((next__1BAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AX2G <<  1)) <=  4096)) {
-            next__1BAH=(void *)((unsigned long)result__3BAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AX2G)));
-          } else {
-            next__1BAH=new_lab__2QJ(new_size__AX2G);
-          };
-          ((__POINTER *)next__1BAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2BAH)[ 0]=next__1BAH;
-        } else {
-          ((__POINTER *)result__3BAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3BAH=next__1BAH;
-        };
-      };
-      ptr__5RQ=result__3BAH;
-    } else {
-      t__EX2G=((__UINTEGER_32 )typ_id__ESQ);
-      a__DX2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ECAH=(__UINTEGER_32)((__UINTEGER_32)(sz__BSQ + a__DX2G) & (__UINTEGER_32)(~ a__DX2G));
-      ptr_table__BCAH=((__POINTER )(&(table_type[(t__EX2G)])));
-      lab_type__DCAH=(__UINTEGER_32)(t__EX2G |  1);
-      next__ACAH=((__POINTER )(NULL));
-      result__CCAH=((__POINTER *)ptr_table__BCAH)[ 0];
-      if ((result__CCAH == (void *)NULL)) {
-        result__CCAH=new_lab__2QJ(lab_type__DCAH);
-        next__ACAH=(void *)((unsigned long)result__CCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECAH)));
-        ((__POINTER *)next__ACAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BCAH)[ 0]=next__ACAH;
-      } else {
-        next__ACAH=((__POINTER *)result__CCAH)[ 0];
-        if ((next__ACAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CCAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ECAH <<  1)) <=  4096)) {
-            next__ACAH=(void *)((unsigned long)result__CCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECAH)));
-          } else {
-            next__ACAH=new_lab__2QJ(lab_type__DCAH);
-          };
-          ((__POINTER *)next__ACAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BCAH)[ 0]=next__ACAH;
-        } else {
-          ((__POINTER *)result__CCAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ACAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CCAH=next__ACAH;
-        };
-      };
-      ptr__5RQ=result__CCAH;
-    };
-    result__4RQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__5RQ);
-    *(result__4RQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
-  };
-  Self__E1V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__4RQ);
-  if ((Self__E1V->parent_arrayed_collection__2IP.capacity__N1V <  32)) {
-    Self__E1V->parent_arrayed_collection__2IP.storage__Y1V=create__FLXB( 32);
-    Self__E1V->parent_arrayed_collection__2IP.capacity__N1V= 32;
-  };
-  Self__E1V->parent_arrayed_collection__2IP.upper__GJP=(__INTEGER)(-  1);
-  dico__3IP=result__4RQ;
-  ITM_TYPE_MULTI__->list_type__QJP=NULL;
-  ITM_TYPE_BLOCK__->type_argument__GMN=NULL;
-  ITM_TYPE_GENERIC__->list_type__NYP=NULL;
-  ITM_TYPE_BLOCK__->type_result__QMN=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__YLN= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__WJV= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__BKV=NULL;
-  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__OLN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
-  result__E0O=NULL;
-  ptr__F0O=((__POINTER )(NULL));
-  typ_id__K0O= 0;
-  sz__H0O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
-  if ((sz__H0O ==  0)) {
-    result__E0O=FAST_ARRAYoITM_TYPE_BLOCKo__;
+    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__;
   } else {
-    typ_id__K0O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__H0O);
-    if ((typ_id__K0O == (__INTEGER)(-  1))) {
-      a__HX2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IX2G=(__UINTEGER_32)((__UINTEGER_32)(sz__H0O + a__HX2G) & (__UINTEGER_32)(~ a__HX2G));
-      ptr_table__GCAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IX2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FCAH=((__POINTER )(NULL));
-      result__HCAH=((__POINTER *)ptr_table__GCAH)[ 0];
-      if ((result__HCAH == (void *)NULL)) {
-        result__HCAH=new_lab__2QJ(new_size__IX2G);
-        next__FCAH=(void *)((unsigned long)result__HCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IX2G)));
-        ((__POINTER *)next__FCAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GCAH)[ 0]=next__FCAH;
-      } else {
-        next__FCAH=((__POINTER *)result__HCAH)[ 0];
-        if ((next__FCAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HCAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IX2G <<  1)) <=  4096)) {
-            next__FCAH=(void *)((unsigned long)result__HCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IX2G)));
-          } else {
-            next__FCAH=new_lab__2QJ(new_size__IX2G);
-          };
-          ((__POINTER *)next__FCAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GCAH)[ 0]=next__FCAH;
-        } else {
-          ((__POINTER *)result__HCAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FCAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HCAH=next__FCAH;
-        };
-      };
-      ptr__F0O=result__HCAH;
-    } else {
-      t__MX2G=((__UINTEGER_32 )typ_id__K0O);
-      a__LX2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OCAH=(__UINTEGER_32)((__UINTEGER_32)(sz__H0O + a__LX2G) & (__UINTEGER_32)(~ a__LX2G));
-      ptr_table__LCAH=((__POINTER )(&(table_type[(t__MX2G)])));
-      lab_type__NCAH=(__UINTEGER_32)(t__MX2G |  1);
-      next__KCAH=((__POINTER )(NULL));
-      result__MCAH=((__POINTER *)ptr_table__LCAH)[ 0];
-      if ((result__MCAH == (void *)NULL)) {
-        result__MCAH=new_lab__2QJ(lab_type__NCAH);
-        next__KCAH=(void *)((unsigned long)result__MCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCAH)));
-        ((__POINTER *)next__KCAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LCAH)[ 0]=next__KCAH;
-      } else {
-        next__KCAH=((__POINTER *)result__MCAH)[ 0];
-        if ((next__KCAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MCAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OCAH <<  1)) <=  4096)) {
-            next__KCAH=(void *)((unsigned long)result__MCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCAH)));
-          } else {
-            next__KCAH=new_lab__2QJ(lab_type__NCAH);
-          };
-          ((__POINTER *)next__KCAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LCAH)[ 0]=next__KCAH;
-        } else {
-          ((__POINTER *)result__MCAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MCAH=next__KCAH;
-        };
-      };
-      ptr__F0O=result__MCAH;
-    };
-    result__E0O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__F0O);
-    *(result__E0O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
-  };
-  Self__NJV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__E0O);
-  if ((Self__NJV->parent_arrayed_collection__OLN.capacity__WJV <  32)) {
-    Self__NJV->parent_arrayed_collection__OLN.storage__BKV=create__AUWB( 32);
-    Self__NJV->parent_arrayed_collection__OLN.capacity__WJV= 32;
-  };
-  Self__NJV->parent_arrayed_collection__OLN.upper__YLN=(__INTEGER)(-  1);
-  dico__PLN=result__E0O;
-  ITM_CODE__->parent_itm_object__HDE=(*ITM_OBJECT__);
-  ITM_CONSTANT__->parent_itm_code__LVF=(*ITM_CODE__);
-  ITM_REAL__->parent_itm_constant__VQO=(*ITM_CONSTANT__);
-  ITM_NUMBER__->parent_itm_constant__HRO=(*ITM_CONSTANT__);
-  ITM_CHARACTER__->parent_itm_constant__ZRO=(*ITM_CONSTANT__);
-  ITM_STRING__->parent_itm_constant__KSO=(*ITM_CONSTANT__);
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__QXP= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__DBW= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__OBW=NULL;
-  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__GXP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
-  result__L2Q=NULL;
-  ptr__M2Q=((__POINTER )(NULL));
-  typ_id__R2Q= 0;
-  sz__O2Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
-  if ((sz__O2Q ==  0)) {
-    result__L2Q=FAST_ARRAYoITM_TYPE_GENERICo__;
+    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__;
   } else {
-    typ_id__R2Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__O2Q);
-    if ((typ_id__R2Q == (__INTEGER)(-  1))) {
-      a__PX2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QX2G=(__UINTEGER_32)((__UINTEGER_32)(sz__O2Q + a__PX2G) & (__UINTEGER_32)(~ a__PX2G));
-      ptr_table__QCAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QX2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__PCAH=((__POINTER )(NULL));
-      result__RCAH=((__POINTER *)ptr_table__QCAH)[ 0];
-      if ((result__RCAH == (void *)NULL)) {
-        result__RCAH=new_lab__2QJ(new_size__QX2G);
-        next__PCAH=(void *)((unsigned long)result__RCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QX2G)));
-        ((__POINTER *)next__PCAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QCAH)[ 0]=next__PCAH;
-      } else {
-        next__PCAH=((__POINTER *)result__RCAH)[ 0];
-        if ((next__PCAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RCAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QX2G <<  1)) <=  4096)) {
-            next__PCAH=(void *)((unsigned long)result__RCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QX2G)));
-          } else {
-            next__PCAH=new_lab__2QJ(new_size__QX2G);
-          };
-          ((__POINTER *)next__PCAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QCAH)[ 0]=next__PCAH;
-        } else {
-          ((__POINTER *)result__RCAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PCAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RCAH=next__PCAH;
-        };
-      };
-      ptr__M2Q=result__RCAH;
-    } else {
-      t__UX2G=((__UINTEGER_32 )typ_id__R2Q);
-      a__TX2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YCAH=(__UINTEGER_32)((__UINTEGER_32)(sz__O2Q + a__TX2G) & (__UINTEGER_32)(~ a__TX2G));
-      ptr_table__VCAH=((__POINTER )(&(table_type[(t__UX2G)])));
-      lab_type__XCAH=(__UINTEGER_32)(t__UX2G |  1);
-      next__UCAH=((__POINTER )(NULL));
-      result__WCAH=((__POINTER *)ptr_table__VCAH)[ 0];
-      if ((result__WCAH == (void *)NULL)) {
-        result__WCAH=new_lab__2QJ(lab_type__XCAH);
-        next__UCAH=(void *)((unsigned long)result__WCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YCAH)));
-        ((__POINTER *)next__UCAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VCAH)[ 0]=next__UCAH;
-      } else {
-        next__UCAH=((__POINTER *)result__WCAH)[ 0];
-        if ((next__UCAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WCAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YCAH <<  1)) <=  4096)) {
-            next__UCAH=(void *)((unsigned long)result__WCAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YCAH)));
-          } else {
-            next__UCAH=new_lab__2QJ(lab_type__XCAH);
-          };
-          ((__POINTER *)next__UCAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VCAH)[ 0]=next__UCAH;
-        } else {
-          ((__POINTER *)result__WCAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UCAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WCAH=next__UCAH;
-        };
-      };
-      ptr__M2Q=result__WCAH;
-    };
-    result__L2Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__M2Q);
-    *(result__L2Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
-  };
-  Self__0AW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__L2Q);
-  if ((Self__0AW->parent_arrayed_collection__GXP.capacity__DBW <  32)) {
-    Self__0AW->parent_arrayed_collection__GXP.storage__OBW=create__5RXB( 32);
-    Self__0AW->parent_arrayed_collection__GXP.capacity__DBW= 32;
-  };
-  Self__0AW->parent_arrayed_collection__GXP.upper__QXP=(__INTEGER)(-  1);
-  dico__HXP=result__L2Q;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__21T=NULL;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__X1T= 0;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__2EZ= 0;
-  result__ZKK=NULL;
-  ptr__0KK=((__POINTER )(NULL));
-  typ_id__5KK= 0;
-  sz__2KK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
-  if ((sz__2KK ==  0)) {
-    result__ZKK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    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__;
   } else {
-    typ_id__5KK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__2KK);
-    if ((typ_id__5KK == (__INTEGER)(-  1))) {
-      a__XX2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YX2G=(__UINTEGER_32)((__UINTEGER_32)(sz__2KK + a__XX2G) & (__UINTEGER_32)(~ a__XX2G));
-      ptr_table__0CAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YX2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ZCAH=((__POINTER )(NULL));
-      result__1CAH=((__POINTER *)ptr_table__0CAH)[ 0];
-      if ((result__1CAH == (void *)NULL)) {
-        result__1CAH=new_lab__2QJ(new_size__YX2G);
-        next__ZCAH=(void *)((unsigned long)result__1CAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YX2G)));
-        ((__POINTER *)next__ZCAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0CAH)[ 0]=next__ZCAH;
-      } else {
-        next__ZCAH=((__POINTER *)result__1CAH)[ 0];
-        if ((next__ZCAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1CAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YX2G <<  1)) <=  4096)) {
-            next__ZCAH=(void *)((unsigned long)result__1CAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YX2G)));
-          } else {
-            next__ZCAH=new_lab__2QJ(new_size__YX2G);
-          };
-          ((__POINTER *)next__ZCAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0CAH)[ 0]=next__ZCAH;
-        } else {
-          ((__POINTER *)result__1CAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZCAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1CAH=next__ZCAH;
-        };
-      };
-      ptr__0KK=result__1CAH;
-    } else {
-      t__2X2G=((__UINTEGER_32 )typ_id__5KK);
-      a__1X2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__CDAH=(__UINTEGER_32)((__UINTEGER_32)(sz__2KK + a__1X2G) & (__UINTEGER_32)(~ a__1X2G));
-      ptr_table__5CAH=((__POINTER )(&(table_type[(t__2X2G)])));
-      lab_type__BDAH=(__UINTEGER_32)(t__2X2G |  1);
-      next__4CAH=((__POINTER )(NULL));
-      result__ADAH=((__POINTER *)ptr_table__5CAH)[ 0];
-      if ((result__ADAH == (void *)NULL)) {
-        result__ADAH=new_lab__2QJ(lab_type__BDAH);
-        next__4CAH=(void *)((unsigned long)result__ADAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CDAH)));
-        ((__POINTER *)next__4CAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5CAH)[ 0]=next__4CAH;
-      } else {
-        next__4CAH=((__POINTER *)result__ADAH)[ 0];
-        if ((next__4CAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ADAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CDAH <<  1)) <=  4096)) {
-            next__4CAH=(void *)((unsigned long)result__ADAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CDAH)));
-          } else {
-            next__4CAH=new_lab__2QJ(lab_type__BDAH);
-          };
-          ((__POINTER *)next__4CAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5CAH)[ 0]=next__4CAH;
-        } else {
-          ((__POINTER *)result__ADAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4CAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ADAH=next__4CAH;
-        };
-      };
-      ptr__0KK=result__ADAH;
-    };
-    result__ZKK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__0KK);
-    *(result__ZKK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
-  };
-  Self__5KU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__ZKK);
-  new_capacity__XEZ=prime_number_ceiling__H41( 193);
-  Self__5KU->buckets__21T=create__FH5(new_capacity__XEZ);
-  Self__5KU->capacity__X1T=new_capacity__XEZ;
-  Self__5KU->count__2EZ= 0;
-  dico__CTI=result__ZKK;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__I2T=NULL;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__T2T=NULL;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__12T=NULL;
-  result__1VQ=NULL;
-  ptr__2VQ=((__POINTER )(NULL));
-  typ_id__BWQ= 0;
-  sz__4VQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-  if ((sz__4VQ ==  0)) {
-    result__1VQ=ITM_TYPE_PARAMETER__;
+    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__;
   } else {
-    typ_id__BWQ=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4VQ);
-    if ((typ_id__BWQ == (__INTEGER)(-  1))) {
-      a__Z50G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__050G=(__UINTEGER_32)((__UINTEGER_32)(sz__4VQ + a__Z50G) & (__UINTEGER_32)(~ a__Z50G));
-      ptr_table__EDAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__050G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__DDAH=((__POINTER )(NULL));
-      result__FDAH=((__POINTER *)ptr_table__EDAH)[ 0];
-      if ((result__FDAH == (void *)NULL)) {
-        result__FDAH=new_lab__2QJ(new_size__050G);
-        next__DDAH=(void *)((unsigned long)result__FDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__050G)));
-        ((__POINTER *)next__DDAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EDAH)[ 0]=next__DDAH;
-      } else {
-        next__DDAH=((__POINTER *)result__FDAH)[ 0];
-        if ((next__DDAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FDAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__050G <<  1)) <=  4096)) {
-            next__DDAH=(void *)((unsigned long)result__FDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__050G)));
-          } else {
-            next__DDAH=new_lab__2QJ(new_size__050G);
-          };
-          ((__POINTER *)next__DDAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EDAH)[ 0]=next__DDAH;
-        } else {
-          ((__POINTER *)result__FDAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DDAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FDAH=next__DDAH;
-        };
-      };
-      ptr__2VQ=result__FDAH;
-    } else {
-      t__450G=((__UINTEGER_32 )typ_id__BWQ);
-      a__350G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__MDAH=(__UINTEGER_32)((__UINTEGER_32)(sz__4VQ + a__350G) & (__UINTEGER_32)(~ a__350G));
-      ptr_table__JDAH=((__POINTER )(&(table_type[(t__450G)])));
-      lab_type__LDAH=(__UINTEGER_32)(t__450G |  1);
-      next__IDAH=((__POINTER )(NULL));
-      result__KDAH=((__POINTER *)ptr_table__JDAH)[ 0];
-      if ((result__KDAH == (void *)NULL)) {
-        result__KDAH=new_lab__2QJ(lab_type__LDAH);
-        next__IDAH=(void *)((unsigned long)result__KDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDAH)));
-        ((__POINTER *)next__IDAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JDAH)[ 0]=next__IDAH;
-      } else {
-        next__IDAH=((__POINTER *)result__KDAH)[ 0];
-        if ((next__IDAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KDAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__MDAH <<  1)) <=  4096)) {
-            next__IDAH=(void *)((unsigned long)result__KDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDAH)));
-          } else {
-            next__IDAH=new_lab__2QJ(lab_type__LDAH);
-          };
-          ((__POINTER *)next__IDAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JDAH)[ 0]=next__IDAH;
-        } else {
-          ((__POINTER *)result__KDAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IDAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KDAH=next__IDAH;
-        };
-      };
-      ptr__2VQ=result__KDAH;
-    };
-    result__1VQ=((__ITM_TYPE_PARAMETER *)ptr__2VQ);
-    *(result__1VQ) = *(ITM_TYPE_PARAMETER__);
-  };
-  Self__12V=((__ITM_TYPE_PARAMETER *)result__1VQ);
-  Self__12V->parent_itm_type__NDE.name__0XP=(&__string_1);
-  fast_put__to__DOZ(result__ZKK,Self__12V,(&__string_1));
-  type_self__XTN=result__1VQ;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__5NR= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__LLW= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__WLW=NULL;
-  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__VNR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
-  result__XUR=NULL;
-  ptr__YUR=((__POINTER )(NULL));
-  typ_id__3UR= 0;
-  sz__0UR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
-  if ((sz__0UR ==  0)) {
-    result__XUR=FAST_ARRAYoITM_TYPE_STYLEo__;
+    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__;
   } else {
-    typ_id__3UR=__FAST_ARRAYoITM_TYPE_STYLEo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__0UR);
-    if ((typ_id__3UR == (__INTEGER)(-  1))) {
-      a__5X2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AY2G=(__UINTEGER_32)((__UINTEGER_32)(sz__0UR + a__5X2G) & (__UINTEGER_32)(~ a__5X2G));
-      ptr_table__ODAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AY2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__NDAH=((__POINTER )(NULL));
-      result__PDAH=((__POINTER *)ptr_table__ODAH)[ 0];
-      if ((result__PDAH == (void *)NULL)) {
-        result__PDAH=new_lab__2QJ(new_size__AY2G);
-        next__NDAH=(void *)((unsigned long)result__PDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AY2G)));
-        ((__POINTER *)next__NDAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ODAH)[ 0]=next__NDAH;
-      } else {
-        next__NDAH=((__POINTER *)result__PDAH)[ 0];
-        if ((next__NDAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PDAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AY2G <<  1)) <=  4096)) {
-            next__NDAH=(void *)((unsigned long)result__PDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AY2G)));
-          } else {
-            next__NDAH=new_lab__2QJ(new_size__AY2G);
-          };
-          ((__POINTER *)next__NDAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ODAH)[ 0]=next__NDAH;
-        } else {
-          ((__POINTER *)result__PDAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NDAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PDAH=next__NDAH;
-        };
-      };
-      ptr__YUR=result__PDAH;
-    } else {
-      t__EY2G=((__UINTEGER_32 )typ_id__3UR);
-      a__DY2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__WDAH=(__UINTEGER_32)((__UINTEGER_32)(sz__0UR + a__DY2G) & (__UINTEGER_32)(~ a__DY2G));
-      ptr_table__TDAH=((__POINTER )(&(table_type[(t__EY2G)])));
-      lab_type__VDAH=(__UINTEGER_32)(t__EY2G |  1);
-      next__SDAH=((__POINTER )(NULL));
-      result__UDAH=((__POINTER *)ptr_table__TDAH)[ 0];
-      if ((result__UDAH == (void *)NULL)) {
-        result__UDAH=new_lab__2QJ(lab_type__VDAH);
-        next__SDAH=(void *)((unsigned long)result__UDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDAH)));
-        ((__POINTER *)next__SDAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TDAH)[ 0]=next__SDAH;
-      } else {
-        next__SDAH=((__POINTER *)result__UDAH)[ 0];
-        if ((next__SDAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UDAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WDAH <<  1)) <=  4096)) {
-            next__SDAH=(void *)((unsigned long)result__UDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDAH)));
-          } else {
-            next__SDAH=new_lab__2QJ(lab_type__VDAH);
-          };
-          ((__POINTER *)next__SDAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TDAH)[ 0]=next__SDAH;
-        } else {
-          ((__POINTER *)result__UDAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UDAH=next__SDAH;
-        };
-      };
-      ptr__YUR=result__UDAH;
-    };
-    result__XUR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__YUR);
-    *(result__XUR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
-  };
-  Self__CLW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__XUR);
-  if ((Self__CLW->parent_arrayed_collection__VNR.capacity__LLW <  32)) {
-    Self__CLW->parent_arrayed_collection__VNR.storage__WLW=create__LHYB( 32);
-    Self__CLW->parent_arrayed_collection__VNR.capacity__LLW= 32;
-  };
-  Self__CLW->parent_arrayed_collection__VNR.upper__5NR=(__INTEGER)(-  1);
-  dico__WNR=result__XUR;
-  type_null__PUN=get__TSI((&__string_2));
-  ITM_LIST__->parent_itm_code__04E=(*ITM_CODE__);
-  last_group__LTF=NULL;
-  old_position__TQI= 0;
-  old_pos_cur__VQI= 0;
-  old_pos_line__XQI= 0;
-  old_pos_col__ZQI= 0;
-  old_short_derive__1QI= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__Z0T= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__MIU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__XIU=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__ERI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
-  ARRAYED_COLLECTIONoITM_LOCALo__->upper__L0K= 0;
-  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__HKU= 0;
-  ARRAYED_COLLECTIONoITM_LOCALo__->storage__SKU=NULL;
-  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__U0H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
-  result__WHK=NULL;
-  ptr__XHK=((__POINTER )(NULL));
-  typ_id__2HK= 0;
-  sz__ZHK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
-  if ((sz__ZHK ==  0)) {
-    result__WHK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    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__;
   } else {
-    typ_id__2HK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__ZHK);
-    if ((typ_id__2HK == (__INTEGER)(-  1))) {
-      a__HY2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IY2G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZHK + a__HY2G) & (__UINTEGER_32)(~ a__HY2G));
-      ptr_table__YDAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IY2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__XDAH=((__POINTER )(NULL));
-      result__ZDAH=((__POINTER *)ptr_table__YDAH)[ 0];
-      if ((result__ZDAH == (void *)NULL)) {
-        result__ZDAH=new_lab__2QJ(new_size__IY2G);
-        next__XDAH=(void *)((unsigned long)result__ZDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IY2G)));
-        ((__POINTER *)next__XDAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YDAH)[ 0]=next__XDAH;
-      } else {
-        next__XDAH=((__POINTER *)result__ZDAH)[ 0];
-        if ((next__XDAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZDAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IY2G <<  1)) <=  4096)) {
-            next__XDAH=(void *)((unsigned long)result__ZDAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IY2G)));
-          } else {
-            next__XDAH=new_lab__2QJ(new_size__IY2G);
-          };
-          ((__POINTER *)next__XDAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YDAH)[ 0]=next__XDAH;
-        } else {
-          ((__POINTER *)result__ZDAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZDAH=next__XDAH;
-        };
-      };
-      ptr__XHK=result__ZDAH;
-    } else {
-      t__MY2G=((__UINTEGER_32 )typ_id__2HK);
-      a__LY2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AEAH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZHK + a__LY2G) & (__UINTEGER_32)(~ a__LY2G));
-      ptr_table__3DAH=((__POINTER )(&(table_type[(t__MY2G)])));
-      lab_type__5DAH=(__UINTEGER_32)(t__MY2G |  1);
-      next__2DAH=((__POINTER )(NULL));
-      result__4DAH=((__POINTER *)ptr_table__3DAH)[ 0];
-      if ((result__4DAH == (void *)NULL)) {
-        result__4DAH=new_lab__2QJ(lab_type__5DAH);
-        next__2DAH=(void *)((unsigned long)result__4DAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEAH)));
-        ((__POINTER *)next__2DAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3DAH)[ 0]=next__2DAH;
-      } else {
-        next__2DAH=((__POINTER *)result__4DAH)[ 0];
-        if ((next__2DAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4DAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AEAH <<  1)) <=  4096)) {
-            next__2DAH=(void *)((unsigned long)result__4DAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEAH)));
-          } else {
-            next__2DAH=new_lab__2QJ(lab_type__5DAH);
-          };
-          ((__POINTER *)next__2DAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3DAH)[ 0]=next__2DAH;
-        } else {
-          ((__POINTER *)result__4DAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2DAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4DAH=next__2DAH;
-        };
-      };
-      ptr__XHK=result__4DAH;
-    };
-    result__WHK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__XHK);
-    *(result__WHK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
-  };
-  Self__DIU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__WHK);
-  if ((Self__DIU->parent_arrayed_collection__ERI.capacity__MIU <  5)) {
-    Self__DIU->parent_arrayed_collection__ERI.storage__XIU=create__UGQB( 5);
-    Self__DIU->parent_arrayed_collection__ERI.capacity__MIU= 5;
-  };
-  Self__DIU->parent_arrayed_collection__ERI.upper__Z0T=(__INTEGER)(-  1);
-  free_list__FRI=result__WHK;
-  ITM_LOCAL__->parent_itm_object__P0H=(*ITM_OBJECT__);
-  ITM_LOCAL__->name__O2K=NULL;
-  HASHED_SET_NODEoSTRING_CONSTANTo__->item__LEV=NULL;
-  HASHED_SET_NODEoSTRING_CONSTANTo__->next__WEV=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__YVT= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__K5T= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__GAU=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__Q3H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
-  ARRAYED_COLLECTIONoITM_CODEo__->upper__MHL= 0;
-  ARRAYED_COLLECTIONoITM_CODEo__->capacity__KXT= 0;
-  ARRAYED_COLLECTIONoITM_CODEo__->storage__VXT=NULL;
-  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__BTF=(*ARRAYED_COLLECTIONoITM_CODEo__);
-  result__53J=NULL;
-  ptr__A4J=((__POINTER )(NULL));
-  typ_id__F4J= 0;
-  sz__C4J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
-  if ((sz__C4J ==  0)) {
-    result__53J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    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__;
   } else {
-    typ_id__F4J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__C4J);
-    if ((typ_id__F4J == (__INTEGER)(-  1))) {
-      a__PY2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QY2G=(__UINTEGER_32)((__UINTEGER_32)(sz__C4J + a__PY2G) & (__UINTEGER_32)(~ a__PY2G));
-      ptr_table__CEAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QY2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__BEAH=((__POINTER )(NULL));
-      result__DEAH=((__POINTER *)ptr_table__CEAH)[ 0];
-      if ((result__DEAH == (void *)NULL)) {
-        result__DEAH=new_lab__2QJ(new_size__QY2G);
-        next__BEAH=(void *)((unsigned long)result__DEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QY2G)));
-        ((__POINTER *)next__BEAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CEAH)[ 0]=next__BEAH;
-      } else {
-        next__BEAH=((__POINTER *)result__DEAH)[ 0];
-        if ((next__BEAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DEAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QY2G <<  1)) <=  4096)) {
-            next__BEAH=(void *)((unsigned long)result__DEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QY2G)));
-          } else {
-            next__BEAH=new_lab__2QJ(new_size__QY2G);
-          };
-          ((__POINTER *)next__BEAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CEAH)[ 0]=next__BEAH;
-        } else {
-          ((__POINTER *)result__DEAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BEAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DEAH=next__BEAH;
-        };
-      };
-      ptr__A4J=result__DEAH;
-    } else {
-      t__UY2G=((__UINTEGER_32 )typ_id__F4J);
-      a__TY2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__KEAH=(__UINTEGER_32)((__UINTEGER_32)(sz__C4J + a__TY2G) & (__UINTEGER_32)(~ a__TY2G));
-      ptr_table__HEAH=((__POINTER )(&(table_type[(t__UY2G)])));
-      lab_type__JEAH=(__UINTEGER_32)(t__UY2G |  1);
-      next__GEAH=((__POINTER )(NULL));
-      result__IEAH=((__POINTER *)ptr_table__HEAH)[ 0];
-      if ((result__IEAH == (void *)NULL)) {
-        result__IEAH=new_lab__2QJ(lab_type__JEAH);
-        next__GEAH=(void *)((unsigned long)result__IEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEAH)));
-        ((__POINTER *)next__GEAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HEAH)[ 0]=next__GEAH;
-      } else {
-        next__GEAH=((__POINTER *)result__IEAH)[ 0];
-        if ((next__GEAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IEAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KEAH <<  1)) <=  4096)) {
-            next__GEAH=(void *)((unsigned long)result__IEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEAH)));
-          } else {
-            next__GEAH=new_lab__2QJ(lab_type__JEAH);
-          };
-          ((__POINTER *)next__GEAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HEAH)[ 0]=next__GEAH;
-        } else {
-          ((__POINTER *)result__IEAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GEAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__IEAH=next__GEAH;
-        };
-      };
-      ptr__A4J=result__IEAH;
-    };
-    result__53J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__A4J);
-    *(result__53J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
-  };
-  Self__YEU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__53J);
-  if ((Self__YEU->parent_arrayed_collection__Q3H.capacity__K5T <  5)) {
-    Self__YEU->parent_arrayed_collection__Q3H.storage__GAU=create__E1PB( 5);
-    Self__YEU->parent_arrayed_collection__Q3H.capacity__K5T= 5;
-  };
-  Self__YEU->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(-  1);
-  free_list__R3H=result__53J;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__KSU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__PUU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__0UU=NULL;
-  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__Z4K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__L5OD= 0;
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__GBPD= 0;
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__BCPD=NULL;
-  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__X4I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
-  result__VKM=NULL;
-  ptr__WKM=((__POINTER )(NULL));
-  typ_id__1KM= 0;
-  sz__YKM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
-  if ((sz__YKM ==  0)) {
-    result__VKM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    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__;
   } else {
-    typ_id__1KM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__YKM);
-    if ((typ_id__1KM == (__INTEGER)(-  1))) {
-      a__XY2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YY2G=(__UINTEGER_32)((__UINTEGER_32)(sz__YKM + a__XY2G) & (__UINTEGER_32)(~ a__XY2G));
-      ptr_table__MEAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YY2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__LEAH=((__POINTER )(NULL));
-      result__NEAH=((__POINTER *)ptr_table__MEAH)[ 0];
-      if ((result__NEAH == (void *)NULL)) {
-        result__NEAH=new_lab__2QJ(new_size__YY2G);
-        next__LEAH=(void *)((unsigned long)result__NEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YY2G)));
-        ((__POINTER *)next__LEAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MEAH)[ 0]=next__LEAH;
-      } else {
-        next__LEAH=((__POINTER *)result__NEAH)[ 0];
-        if ((next__LEAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NEAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YY2G <<  1)) <=  4096)) {
-            next__LEAH=(void *)((unsigned long)result__NEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YY2G)));
-          } else {
-            next__LEAH=new_lab__2QJ(new_size__YY2G);
-          };
-          ((__POINTER *)next__LEAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MEAH)[ 0]=next__LEAH;
-        } else {
-          ((__POINTER *)result__NEAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LEAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NEAH=next__LEAH;
-        };
-      };
-      ptr__WKM=result__NEAH;
-    } else {
-      t__2Y2G=((__UINTEGER_32 )typ_id__1KM);
-      a__1Y2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__UEAH=(__UINTEGER_32)((__UINTEGER_32)(sz__YKM + a__1Y2G) & (__UINTEGER_32)(~ a__1Y2G));
-      ptr_table__REAH=((__POINTER )(&(table_type[(t__2Y2G)])));
-      lab_type__TEAH=(__UINTEGER_32)(t__2Y2G |  1);
-      next__QEAH=((__POINTER )(NULL));
-      result__SEAH=((__POINTER *)ptr_table__REAH)[ 0];
-      if ((result__SEAH == (void *)NULL)) {
-        result__SEAH=new_lab__2QJ(lab_type__TEAH);
-        next__QEAH=(void *)((unsigned long)result__SEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEAH)));
-        ((__POINTER *)next__QEAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__REAH)[ 0]=next__QEAH;
-      } else {
-        next__QEAH=((__POINTER *)result__SEAH)[ 0];
-        if ((next__QEAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SEAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__UEAH <<  1)) <=  4096)) {
-            next__QEAH=(void *)((unsigned long)result__SEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEAH)));
-          } else {
-            next__QEAH=new_lab__2QJ(lab_type__TEAH);
-          };
-          ((__POINTER *)next__QEAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__REAH)[ 0]=next__QEAH;
-        } else {
-          ((__POINTER *)result__SEAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QEAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SEAH=next__QEAH;
-        };
-      };
-      ptr__WKM=result__SEAH;
-    };
-    result__VKM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__WKM);
-    *(result__VKM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
-  };
-  Self__GUU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__VKM);
-  if ((Self__GUU->parent_arrayed_collection__Z4K.capacity__PUU <  5)) {
-    Self__GUU->parent_arrayed_collection__Z4K.storage__0UU=create__P3ZB( 5);
-    Self__GUU->parent_arrayed_collection__Z4K.capacity__PUU= 5;
-  };
-  Self__GUU->parent_arrayed_collection__Z4K.upper__KSU=(__INTEGER)(-  1);
-  free_list__04K=result__VKM;
-  ITM_LIST_IDF__->parent_itm_code__GCJ=(*ITM_CODE__);
-  ITM_LDOTS__->parent_itm_constant__AUF=(*ITM_CODE__);
-  ITM_PROTOTYPE__->parent_itm_constant__MVF=(*ITM_CONSTANT__);
-  ITM_WRITE__->parent_itm_code__1CJ=(*ITM_CODE__);
-  ITM_WRITE_VALUE__->parent_itm_write__2CJ=(*ITM_WRITE__);
-  ITM_WRITE_CAST__->parent_itm_write__TDJ=(*ITM_WRITE__);
-  ITM_READ__->parent_itm_code__AGJ=(*ITM_CODE__);
-  ITM_WRITE_CODE__->parent_itm_write__4GJ=(*ITM_WRITE__);
-  ITM_OPERATOR__->parent_itm_code__UEL=(*ITM_CODE__);
-  ITM_READ_ARG1__->parent_itm_read__0HL=(*ITM_READ__);
-  ITM_READ_ARG2__->parent_itm_read__HKL=(*ITM_READ__);
-  ITM_EXPRESSION__->value_list__LJV=NULL;
-  ITM_OLD__->parent_itm_code__31L=(*ITM_CODE__);
-  ITM_EXTERN__->parent_itm_code__43M=(*ITM_CODE__);
-  ITM_EXTERNAL_TYPE__->parent_itm_extern__53M=(*ITM_EXTERN__);
-  ITM_BLOCK__->list__QMDC=NULL;
-  ITM_EXTERNAL__->parent_itm_extern__EFN=(*ITM_EXTERN__);
-  ITM_READ_ARGS__->parent_itm_read__0CO=(*ITM_READ__);
-  ITM_RESULT__->value__2KFC=NULL;
-  ITM_OPERATOR__->name__5HL=NULL;
-  ITM_ARGUMENT__->parent_itm_code__C4M=(*ITM_OBJECT__);
-  ITM_ARG__->parent_itm_argument__JHHB=(*ITM_ARGUMENT__);
-  empty_list__R2JF=create_with_capacity__RGRC( 0);
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__3LNF=NULL;
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__YLNF= 0;
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__PQNF= 0;
-  result__1PLF=NULL;
-  ptr__2PLF=((__POINTER )(NULL));
-  typ_id__BQLF= 0;
-  sz__4PLF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
-  if ((sz__4PLF ==  0)) {
-    result__1PLF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    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__;
   } else {
-    typ_id__BQLF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4PLF);
-    if ((typ_id__BQLF == (__INTEGER)(-  1))) {
-      a__5Y2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AZ2G=(__UINTEGER_32)((__UINTEGER_32)(sz__4PLF + a__5Y2G) & (__UINTEGER_32)(~ a__5Y2G));
-      ptr_table__WEAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AZ2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__VEAH=((__POINTER )(NULL));
-      result__XEAH=((__POINTER *)ptr_table__WEAH)[ 0];
-      if ((result__XEAH == (void *)NULL)) {
-        result__XEAH=new_lab__2QJ(new_size__AZ2G);
-        next__VEAH=(void *)((unsigned long)result__XEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AZ2G)));
-        ((__POINTER *)next__VEAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WEAH)[ 0]=next__VEAH;
-      } else {
-        next__VEAH=((__POINTER *)result__XEAH)[ 0];
-        if ((next__VEAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XEAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AZ2G <<  1)) <=  4096)) {
-            next__VEAH=(void *)((unsigned long)result__XEAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AZ2G)));
-          } else {
-            next__VEAH=new_lab__2QJ(new_size__AZ2G);
-          };
-          ((__POINTER *)next__VEAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WEAH)[ 0]=next__VEAH;
-        } else {
-          ((__POINTER *)result__XEAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VEAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XEAH=next__VEAH;
-        };
-      };
-      ptr__2PLF=result__XEAH;
-    } else {
-      t__EZ2G=((__UINTEGER_32 )typ_id__BQLF);
-      a__DZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__4EAH=(__UINTEGER_32)((__UINTEGER_32)(sz__4PLF + a__DZ2G) & (__UINTEGER_32)(~ a__DZ2G));
-      ptr_table__1EAH=((__POINTER )(&(table_type[(t__EZ2G)])));
-      lab_type__3EAH=(__UINTEGER_32)(t__EZ2G |  1);
-      next__0EAH=((__POINTER )(NULL));
-      result__2EAH=((__POINTER *)ptr_table__1EAH)[ 0];
-      if ((result__2EAH == (void *)NULL)) {
-        result__2EAH=new_lab__2QJ(lab_type__3EAH);
-        next__0EAH=(void *)((unsigned long)result__2EAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EAH)));
-        ((__POINTER *)next__0EAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1EAH)[ 0]=next__0EAH;
-      } else {
-        next__0EAH=((__POINTER *)result__2EAH)[ 0];
-        if ((next__0EAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2EAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4EAH <<  1)) <=  4096)) {
-            next__0EAH=(void *)((unsigned long)result__2EAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EAH)));
-          } else {
-            next__0EAH=new_lab__2QJ(lab_type__3EAH);
-          };
-          ((__POINTER *)next__0EAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1EAH)[ 0]=next__0EAH;
-        } else {
-          ((__POINTER *)result__2EAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0EAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2EAH=next__0EAH;
-        };
-      };
-      ptr__2PLF=result__2EAH;
-    };
-    result__1PLF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__2PLF);
-    *(result__1PLF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
-  };
-  Self__PONF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__1PLF);
-  new_capacity__4ROF=prime_number_ceiling__H41( 53);
-  Self__PONF->buckets__3LNF=create__UYQF(new_capacity__4ROF);
-  Self__PONF->capacity__YLNF=new_capacity__4ROF;
-  Self__PONF->count__PQNF= 0;
-  bucket__12JF=result__1PLF;
-  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__JMNF=NULL;
-  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__VMNF=NULL;
-  ITM_ARGS__->parent_itm_argument__QPEE=(*ITM_ARGUMENT__);
-  ITM_ARGS__->name__TFNF=NULL;
-  ITM_EXTERNAL_TYPE__->is_persistant__2GN=FALSE__;
-  result__R3F=NULL;
-  ptr__S3F=((__POINTER )(NULL));
-  typ_id__X3F= 0;
-  sz__U3F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
-  if ((sz__U3F ==  0)) {
-    result__R3F=FAST_ARRAYoSTRINGo__;
+    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__;
   } else {
-    typ_id__X3F=__FAST_ARRAYoSTRINGo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__U3F);
-    if ((typ_id__X3F == (__INTEGER)(-  1))) {
-      a__D10G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__KXG=(__UINTEGER_32)((__UINTEGER_32)(sz__U3F + a__D10G) & (__UINTEGER_32)(~ a__D10G));
-      ptr_table__AFAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KXG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__5EAH=((__POINTER )(NULL));
-      result__BFAH=((__POINTER *)ptr_table__AFAH)[ 0];
-      if ((result__BFAH == (void *)NULL)) {
-        result__BFAH=new_lab__2QJ(new_size__KXG);
-        next__5EAH=(void *)((unsigned long)result__BFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KXG)));
-        ((__POINTER *)next__5EAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AFAH)[ 0]=next__5EAH;
-      } else {
-        next__5EAH=((__POINTER *)result__BFAH)[ 0];
-        if ((next__5EAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BFAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KXG <<  1)) <=  4096)) {
-            next__5EAH=(void *)((unsigned long)result__BFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KXG)));
-          } else {
-            next__5EAH=new_lab__2QJ(new_size__KXG);
-          };
-          ((__POINTER *)next__5EAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AFAH)[ 0]=next__5EAH;
-        } else {
-          ((__POINTER *)result__BFAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5EAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BFAH=next__5EAH;
-        };
-      };
-      ptr__S3F=result__BFAH;
-    } else {
-      t__TYG=((__UINTEGER_32 )typ_id__X3F);
-      a__J10G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IFAH=(__UINTEGER_32)((__UINTEGER_32)(sz__U3F + a__J10G) & (__UINTEGER_32)(~ a__J10G));
-      ptr_table__FFAH=((__POINTER )(&(table_type[(t__TYG)])));
-      lab_type__HFAH=(__UINTEGER_32)(t__TYG |  1);
-      next__EFAH=((__POINTER )(NULL));
-      result__GFAH=((__POINTER *)ptr_table__FFAH)[ 0];
-      if ((result__GFAH == (void *)NULL)) {
-        result__GFAH=new_lab__2QJ(lab_type__HFAH);
-        next__EFAH=(void *)((unsigned long)result__GFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IFAH)));
-        ((__POINTER *)next__EFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FFAH)[ 0]=next__EFAH;
-      } else {
-        next__EFAH=((__POINTER *)result__GFAH)[ 0];
-        if ((next__EFAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GFAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IFAH <<  1)) <=  4096)) {
-            next__EFAH=(void *)((unsigned long)result__GFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IFAH)));
-          } else {
-            next__EFAH=new_lab__2QJ(lab_type__HFAH);
-          };
-          ((__POINTER *)next__EFAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FFAH)[ 0]=next__EFAH;
-        } else {
-          ((__POINTER *)result__GFAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GFAH=next__EFAH;
-        };
-      };
-      ptr__S3F=result__GFAH;
-    };
-    result__R3F=((__FAST_ARRAYoSTRINGo *)ptr__S3F);
-    *(result__R3F) = *(FAST_ARRAYoSTRINGo__);
-  };
-  Self__TFT=((__FAST_ARRAYoSTRINGo *)result__R3F);
-  if ((Self__TFT->parent_arrayed_collection__TJC.capacity__2FT <  5)) {
-    Self__TFT->parent_arrayed_collection__TJC.storage__HGT=create__JFRB( 5);
-    Self__TFT->parent_arrayed_collection__TJC.capacity__2FT= 5;
-  };
-  Self__TFT->parent_arrayed_collection__TJC.upper__WJC=(__INTEGER)(-  1);
-  free__RNP=result__R3F;
-  type_void__OVF=get__TSI((&__string_3));
-  PROTOTYPE__->default_value__DUE=NULL;
-  PROTOTYPE__->type_c__4VE=NULL;
-  LIP_CODE__->parent_itm_object__PDE=(*ITM_OBJECT__);
-  LIP_UNARY__->parent_lip_code__104B=(*LIP_CODE__);
-  LIP_UNARY__->operator__21QD='\0';
-  LIP_UNARY__->value__Z1QD=NULL;
-  LIP_CALL__->parent_lip_code__N14B=(*LIP_CODE__);
-  LIP_CALL__->name__GLTE=NULL;
-  LIP_CALL__->argument__1KTE=NULL;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__Y4VE= 0;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__NAWE= 0;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__YAWE=NULL;
-  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__5TRE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
-  result__2PSE=NULL;
-  ptr__3PSE=((__POINTER )(NULL));
-  typ_id__CQSE= 0;
-  sz__5PSE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
-  if ((sz__5PSE ==  0)) {
-    result__2PSE=FAST_ARRAYoLIP_INTEGERo__;
+    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__;
   } else {
-    typ_id__CQSE=__FAST_ARRAYoLIP_INTEGERo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__5PSE);
-    if ((typ_id__CQSE == (__INTEGER)(-  1))) {
-      a__HZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IZ2G=(__UINTEGER_32)((__UINTEGER_32)(sz__5PSE + a__HZ2G) & (__UINTEGER_32)(~ a__HZ2G));
-      ptr_table__KFAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IZ2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JFAH=((__POINTER )(NULL));
-      result__LFAH=((__POINTER *)ptr_table__KFAH)[ 0];
-      if ((result__LFAH == (void *)NULL)) {
-        result__LFAH=new_lab__2QJ(new_size__IZ2G);
-        next__JFAH=(void *)((unsigned long)result__LFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IZ2G)));
-        ((__POINTER *)next__JFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KFAH)[ 0]=next__JFAH;
-      } else {
-        next__JFAH=((__POINTER *)result__LFAH)[ 0];
-        if ((next__JFAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LFAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IZ2G <<  1)) <=  4096)) {
-            next__JFAH=(void *)((unsigned long)result__LFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IZ2G)));
-          } else {
-            next__JFAH=new_lab__2QJ(new_size__IZ2G);
-          };
-          ((__POINTER *)next__JFAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KFAH)[ 0]=next__JFAH;
-        } else {
-          ((__POINTER *)result__LFAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LFAH=next__JFAH;
-        };
-      };
-      ptr__3PSE=result__LFAH;
-    } else {
-      t__MZ2G=((__UINTEGER_32 )typ_id__CQSE);
-      a__LZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SFAH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PSE + a__LZ2G) & (__UINTEGER_32)(~ a__LZ2G));
-      ptr_table__PFAH=((__POINTER )(&(table_type[(t__MZ2G)])));
-      lab_type__RFAH=(__UINTEGER_32)(t__MZ2G |  1);
-      next__OFAH=((__POINTER )(NULL));
-      result__QFAH=((__POINTER *)ptr_table__PFAH)[ 0];
-      if ((result__QFAH == (void *)NULL)) {
-        result__QFAH=new_lab__2QJ(lab_type__RFAH);
-        next__OFAH=(void *)((unsigned long)result__QFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFAH)));
-        ((__POINTER *)next__OFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PFAH)[ 0]=next__OFAH;
-      } else {
-        next__OFAH=((__POINTER *)result__QFAH)[ 0];
-        if ((next__OFAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QFAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SFAH <<  1)) <=  4096)) {
-            next__OFAH=(void *)((unsigned long)result__QFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFAH)));
-          } else {
-            next__OFAH=new_lab__2QJ(lab_type__RFAH);
-          };
-          ((__POINTER *)next__OFAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PFAH)[ 0]=next__OFAH;
-        } else {
-          ((__POINTER *)result__QFAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QFAH=next__OFAH;
-        };
-      };
-      ptr__3PSE=result__QFAH;
-    };
-    result__2PSE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__3PSE);
-    *(result__2PSE) = *(FAST_ARRAYoLIP_INTEGERo__);
-  };
-  Self__EAWE=((__FAST_ARRAYoLIP_INTEGERo *)result__2PSE);
-  if ((Self__EAWE->parent_arrayed_collection__5TRE.capacity__NAWE <  10)) {
-    Self__EAWE->parent_arrayed_collection__5TRE.storage__YAWE=create__OMEF( 10);
-    Self__EAWE->parent_arrayed_collection__5TRE.capacity__NAWE= 10;
-  };
-  Self__EAWE->parent_arrayed_collection__5TRE.upper__Y4VE=(__INTEGER)(-  1);
-  storage__AURE=result__2PSE;
-  LIP_INTEGER__->value__ED0F= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__P4MF= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__0CNF= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__FDNF=NULL;
-  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__W2DF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
-  result__CBKF=NULL;
-  ptr__DBKF=((__POINTER )(NULL));
-  typ_id__IBKF= 0;
-  sz__FBKF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
-  if ((sz__FBKF ==  0)) {
-    result__CBKF=FAST_ARRAYoLIP_STRINGo__;
+    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__;
   } else {
-    typ_id__IBKF=__FAST_ARRAYoLIP_STRINGo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__FBKF);
-    if ((typ_id__IBKF == (__INTEGER)(-  1))) {
-      a__PZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QZ2G=(__UINTEGER_32)((__UINTEGER_32)(sz__FBKF + a__PZ2G) & (__UINTEGER_32)(~ a__PZ2G));
-      ptr_table__UFAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QZ2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__TFAH=((__POINTER )(NULL));
-      result__VFAH=((__POINTER *)ptr_table__UFAH)[ 0];
-      if ((result__VFAH == (void *)NULL)) {
-        result__VFAH=new_lab__2QJ(new_size__QZ2G);
-        next__TFAH=(void *)((unsigned long)result__VFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZ2G)));
-        ((__POINTER *)next__TFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UFAH)[ 0]=next__TFAH;
-      } else {
-        next__TFAH=((__POINTER *)result__VFAH)[ 0];
-        if ((next__TFAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VFAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QZ2G <<  1)) <=  4096)) {
-            next__TFAH=(void *)((unsigned long)result__VFAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZ2G)));
-          } else {
-            next__TFAH=new_lab__2QJ(new_size__QZ2G);
-          };
-          ((__POINTER *)next__TFAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UFAH)[ 0]=next__TFAH;
-        } else {
-          ((__POINTER *)result__VFAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VFAH=next__TFAH;
-        };
-      };
-      ptr__DBKF=result__VFAH;
-    } else {
-      t__UZ2G=((__UINTEGER_32 )typ_id__IBKF);
-      a__TZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2FAH=(__UINTEGER_32)((__UINTEGER_32)(sz__FBKF + a__TZ2G) & (__UINTEGER_32)(~ a__TZ2G));
-      ptr_table__ZFAH=((__POINTER )(&(table_type[(t__UZ2G)])));
-      lab_type__1FAH=(__UINTEGER_32)(t__UZ2G |  1);
-      next__YFAH=((__POINTER )(NULL));
-      result__0FAH=((__POINTER *)ptr_table__ZFAH)[ 0];
-      if ((result__0FAH == (void *)NULL)) {
-        result__0FAH=new_lab__2QJ(lab_type__1FAH);
-        next__YFAH=(void *)((unsigned long)result__0FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FAH)));
-        ((__POINTER *)next__YFAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZFAH)[ 0]=next__YFAH;
-      } else {
-        next__YFAH=((__POINTER *)result__0FAH)[ 0];
-        if ((next__YFAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0FAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__2FAH <<  1)) <=  4096)) {
-            next__YFAH=(void *)((unsigned long)result__0FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FAH)));
-          } else {
-            next__YFAH=new_lab__2QJ(lab_type__1FAH);
-          };
-          ((__POINTER *)next__YFAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZFAH)[ 0]=next__YFAH;
-        } else {
-          ((__POINTER *)result__0FAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YFAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0FAH=next__YFAH;
-        };
-      };
-      ptr__DBKF=result__0FAH;
-    };
-    result__CBKF=((__FAST_ARRAYoLIP_STRINGo *)ptr__DBKF);
-    *(result__CBKF) = *(FAST_ARRAYoLIP_STRINGo__);
-  };
-  Self__RCNF=((__FAST_ARRAYoLIP_STRINGo *)result__CBKF);
-  if ((Self__RCNF->parent_arrayed_collection__W2DF.capacity__0CNF <  10)) {
-    Self__RCNF->parent_arrayed_collection__W2DF.storage__FDNF=create__VVUF( 10);
-    Self__RCNF->parent_arrayed_collection__W2DF.capacity__0CNF= 10;
-  };
-  Self__RCNF->parent_arrayed_collection__W2DF.upper__P4MF=(__INTEGER)(-  1);
-  storage__X2DF=result__CBKF;
-  LIP_STRING__->value__TMTE=NULL;
-  LIP_BOOLEAN__->value__5CQD=FALSE__;
-  result__2FLF=NULL;
-  ptr__3FLF=((__POINTER )(NULL));
-  typ_id__CGLF= 0;
-  sz__5FLF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
-  if ((sz__5FLF ==  0)) {
-    result__2FLF=LIP_BOOLEAN__;
+    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__;
   } else {
-    typ_id__CGLF=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__5FLF);
-    if ((typ_id__CGLF == (__INTEGER)(-  1))) {
-      a__XZ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YZ2G=(__UINTEGER_32)((__UINTEGER_32)(sz__5FLF + a__XZ2G) & (__UINTEGER_32)(~ a__XZ2G));
-      ptr_table__4FAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YZ2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__3FAH=((__POINTER )(NULL));
-      result__5FAH=((__POINTER *)ptr_table__4FAH)[ 0];
-      if ((result__5FAH == (void *)NULL)) {
-        result__5FAH=new_lab__2QJ(new_size__YZ2G);
-        next__3FAH=(void *)((unsigned long)result__5FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZ2G)));
-        ((__POINTER *)next__3FAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4FAH)[ 0]=next__3FAH;
-      } else {
-        next__3FAH=((__POINTER *)result__5FAH)[ 0];
-        if ((next__3FAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5FAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YZ2G <<  1)) <=  4096)) {
-            next__3FAH=(void *)((unsigned long)result__5FAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZ2G)));
-          } else {
-            next__3FAH=new_lab__2QJ(new_size__YZ2G);
-          };
-          ((__POINTER *)next__3FAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4FAH)[ 0]=next__3FAH;
-        } else {
-          ((__POINTER *)result__5FAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3FAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5FAH=next__3FAH;
-        };
-      };
-      ptr__3FLF=result__5FAH;
-    } else {
-      t__2Z2G=((__UINTEGER_32 )typ_id__CGLF);
-      a__1Z2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GGAH=(__UINTEGER_32)((__UINTEGER_32)(sz__5FLF + a__1Z2G) & (__UINTEGER_32)(~ a__1Z2G));
-      ptr_table__DGAH=((__POINTER )(&(table_type[(t__2Z2G)])));
-      lab_type__FGAH=(__UINTEGER_32)(t__2Z2G |  1);
-      next__CGAH=((__POINTER )(NULL));
-      result__EGAH=((__POINTER *)ptr_table__DGAH)[ 0];
-      if ((result__EGAH == (void *)NULL)) {
-        result__EGAH=new_lab__2QJ(lab_type__FGAH);
-        next__CGAH=(void *)((unsigned long)result__EGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGAH)));
-        ((__POINTER *)next__CGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DGAH)[ 0]=next__CGAH;
-      } else {
-        next__CGAH=((__POINTER *)result__EGAH)[ 0];
-        if ((next__CGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EGAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GGAH <<  1)) <=  4096)) {
-            next__CGAH=(void *)((unsigned long)result__EGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGAH)));
-          } else {
-            next__CGAH=new_lab__2QJ(lab_type__FGAH);
-          };
-          ((__POINTER *)next__CGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DGAH)[ 0]=next__CGAH;
-        } else {
-          ((__POINTER *)result__EGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EGAH=next__CGAH;
-        };
-      };
-      ptr__3FLF=result__EGAH;
-    };
-    result__2FLF=((__LIP_BOOLEAN *)ptr__3FLF);
-    *(result__2FLF) = *(LIP_BOOLEAN__);
-  };
-  ((__LIP_BOOLEAN *)result__2FLF)->value__5CQD=TRUE__;
-  true__AMJF=result__2FLF;
-  LIP_VALUE__->parent_lip_code__JUEE=(*LIP_CODE__);
-  LIP_VALUE__->value__FVTE=NULL;
-  LIP_BINARY__->parent_lip_code__MPZB=(*LIP_CODE__);
-  LIP_BINARY__->left__2YQD=NULL;
-  LIP_BINARY__->right__5YQD=NULL;
-  LIP_BINARY__->operator__CZQD='\0';
-  LIP_AFFECT__->parent_lip_code__ZTPB=(*LIP_CODE__);
-  LIP_AFFECT__->name__GGFC=NULL;
-  LIP_AFFECT__->value__YGFC=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__JNTD= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__K5TD= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__GAUD=NULL;
-  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__VJID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
-  ARRAYED_COLLECTIONoLIP_CODEo__->upper__MDQD= 0;
-  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__VOTD= 0;
-  ARRAYED_COLLECTIONoLIP_CODEo__->storage__APTD=NULL;
-  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__3KYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
-  result__JUMD=NULL;
-  ptr__KUMD=((__POINTER )(NULL));
-  typ_id__PUMD= 0;
-  sz__MUMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
-  if ((sz__MUMD ==  0)) {
-    result__JUMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    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__;
   } else {
-    typ_id__PUMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__MUMD);
-    if ((typ_id__PUMD == (__INTEGER)(-  1))) {
-      a__5Z2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__A02G=(__UINTEGER_32)((__UINTEGER_32)(sz__MUMD + a__5Z2G) & (__UINTEGER_32)(~ a__5Z2G));
-      ptr_table__IGAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A02G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__HGAH=((__POINTER )(NULL));
-      result__JGAH=((__POINTER *)ptr_table__IGAH)[ 0];
-      if ((result__JGAH == (void *)NULL)) {
-        result__JGAH=new_lab__2QJ(new_size__A02G);
-        next__HGAH=(void *)((unsigned long)result__JGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A02G)));
-        ((__POINTER *)next__HGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IGAH)[ 0]=next__HGAH;
-      } else {
-        next__HGAH=((__POINTER *)result__JGAH)[ 0];
-        if ((next__HGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JGAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__A02G <<  1)) <=  4096)) {
-            next__HGAH=(void *)((unsigned long)result__JGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A02G)));
-          } else {
-            next__HGAH=new_lab__2QJ(new_size__A02G);
-          };
-          ((__POINTER *)next__HGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IGAH)[ 0]=next__HGAH;
-        } else {
-          ((__POINTER *)result__JGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JGAH=next__HGAH;
-        };
-      };
-      ptr__KUMD=result__JGAH;
-    } else {
-      t__E02G=((__UINTEGER_32 )typ_id__PUMD);
-      a__D02G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QGAH=(__UINTEGER_32)((__UINTEGER_32)(sz__MUMD + a__D02G) & (__UINTEGER_32)(~ a__D02G));
-      ptr_table__NGAH=((__POINTER )(&(table_type[(t__E02G)])));
-      lab_type__PGAH=(__UINTEGER_32)(t__E02G |  1);
-      next__MGAH=((__POINTER )(NULL));
-      result__OGAH=((__POINTER *)ptr_table__NGAH)[ 0];
-      if ((result__OGAH == (void *)NULL)) {
-        result__OGAH=new_lab__2QJ(lab_type__PGAH);
-        next__MGAH=(void *)((unsigned long)result__OGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QGAH)));
-        ((__POINTER *)next__MGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NGAH)[ 0]=next__MGAH;
-      } else {
-        next__MGAH=((__POINTER *)result__OGAH)[ 0];
-        if ((next__MGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OGAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QGAH <<  1)) <=  4096)) {
-            next__MGAH=(void *)((unsigned long)result__OGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QGAH)));
-          } else {
-            next__MGAH=new_lab__2QJ(lab_type__PGAH);
-          };
-          ((__POINTER *)next__MGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NGAH)[ 0]=next__MGAH;
-        } else {
-          ((__POINTER *)result__OGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OGAH=next__MGAH;
-        };
-      };
-      ptr__KUMD=result__OGAH;
-    };
-    result__JUMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__KUMD);
-    *(result__JUMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
-  };
-  Self__EEUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__JUMD);
-  if ((Self__EEUD->parent_arrayed_collection__VJID.capacity__K5TD <  5)) {
-    Self__EEUD->parent_arrayed_collection__VJID.storage__GAUD=create__PIIE( 5);
-    Self__EEUD->parent_arrayed_collection__VJID.capacity__K5TD= 5;
-  };
-  Self__EEUD->parent_arrayed_collection__VJID.upper__JNTD=(__INTEGER)(-  1);
-  free_list__WJID=result__JUMD;
-  LIP_IF__->parent_lip_code__OOYC=(*LIP_CODE__);
-  LIP_IF__->condition__QCQD=NULL;
-  LIP_IF__->then__GDQD=NULL;
-  LIP_IF__->else__3DQD=NULL;
-  LIP_PRINT__->parent_lip_code__APYC=(*LIP_CODE__);
-  LIP_PRINT__->message__KPTE=NULL;
-  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__SURD=NULL;
-  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__NURD= 0;
-  result__0UED=NULL;
-  ptr__1UED=((__POINTER )(NULL));
-  typ_id__AVED= 0;
-  sz__3UED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
-  if ((sz__3UED ==  0)) {
-    result__0UED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    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__;
   } else {
-    typ_id__AVED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__3UED);
-    if ((typ_id__AVED == (__INTEGER)(-  1))) {
-      a__H02G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__I02G=(__UINTEGER_32)((__UINTEGER_32)(sz__3UED + a__H02G) & (__UINTEGER_32)(~ a__H02G));
-      ptr_table__SGAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__I02G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RGAH=((__POINTER )(NULL));
-      result__TGAH=((__POINTER *)ptr_table__SGAH)[ 0];
-      if ((result__TGAH == (void *)NULL)) {
-        result__TGAH=new_lab__2QJ(new_size__I02G);
-        next__RGAH=(void *)((unsigned long)result__TGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I02G)));
-        ((__POINTER *)next__RGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SGAH)[ 0]=next__RGAH;
-      } else {
-        next__RGAH=((__POINTER *)result__TGAH)[ 0];
-        if ((next__RGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TGAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__I02G <<  1)) <=  4096)) {
-            next__RGAH=(void *)((unsigned long)result__TGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I02G)));
-          } else {
-            next__RGAH=new_lab__2QJ(new_size__I02G);
-          };
-          ((__POINTER *)next__RGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SGAH)[ 0]=next__RGAH;
-        } else {
-          ((__POINTER *)result__TGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TGAH=next__RGAH;
-        };
-      };
-      ptr__1UED=result__TGAH;
-    } else {
-      t__M02G=((__UINTEGER_32 )typ_id__AVED);
-      a__L02G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0GAH=(__UINTEGER_32)((__UINTEGER_32)(sz__3UED + a__L02G) & (__UINTEGER_32)(~ a__L02G));
-      ptr_table__XGAH=((__POINTER )(&(table_type[(t__M02G)])));
-      lab_type__ZGAH=(__UINTEGER_32)(t__M02G |  1);
-      next__WGAH=((__POINTER )(NULL));
-      result__YGAH=((__POINTER *)ptr_table__XGAH)[ 0];
-      if ((result__YGAH == (void *)NULL)) {
-        result__YGAH=new_lab__2QJ(lab_type__ZGAH);
-        next__WGAH=(void *)((unsigned long)result__YGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GAH)));
-        ((__POINTER *)next__WGAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XGAH)[ 0]=next__WGAH;
-      } else {
-        next__WGAH=((__POINTER *)result__YGAH)[ 0];
-        if ((next__WGAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YGAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0GAH <<  1)) <=  4096)) {
-            next__WGAH=(void *)((unsigned long)result__YGAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GAH)));
-          } else {
-            next__WGAH=new_lab__2QJ(lab_type__ZGAH);
-          };
-          ((__POINTER *)next__WGAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XGAH)[ 0]=next__WGAH;
-        } else {
-          ((__POINTER *)result__YGAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WGAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YGAH=next__WGAH;
-        };
-      };
-      ptr__1UED=result__YGAH;
-    };
-    result__0UED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__1UED);
-    *(result__0UED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
-  };
-  Self__CLSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__0UED);
-  new_capacity__N5WD=prime_number_ceiling__H41( 193);
-  sz__SW0G=((__UINTEGER_32 )(__INTEGER)(new_capacity__N5WD * ((__INTEGER )(sizeof(void *)))));
-  result__RW0G=((__POINTER )(NULL));
-  a__XW0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__TW0G=(__UINTEGER_32)((__UINTEGER_32)(sz__SW0G + a__XW0G) & (__UINTEGER_32)(~ a__XW0G));
-  new_size2__UW0G=(__UINTEGER_32)(new_size__TW0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__UW0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__P02G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__Q02G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UW0G + a__P02G) & (__UINTEGER_32)(~ a__P02G));
-    ptr_table__2GAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q02G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__1GAH=((__POINTER )(NULL));
-    result__3GAH=((__POINTER *)ptr_table__2GAH)[ 0];
-    if ((result__3GAH == (void *)NULL)) {
-      result__3GAH=new_lab__2QJ(new_size__Q02G);
-      next__1GAH=(void *)((unsigned long)result__3GAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q02G)));
-      ((__POINTER *)next__1GAH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__2GAH)[ 0]=next__1GAH;
-    } else {
-      next__1GAH=((__POINTER *)result__3GAH)[ 0];
-      if ((next__1GAH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3GAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Q02G <<  1)) <=  4096)) {
-          next__1GAH=(void *)((unsigned long)result__3GAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q02G)));
-        } else {
-          next__1GAH=new_lab__2QJ(new_size__Q02G);
-        };
-        ((__POINTER *)next__1GAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2GAH)[ 0]=next__1GAH;
-      } else {
-        ((__POINTER *)result__3GAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1GAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__3GAH=next__1GAH;
-      };
-    };
-    ((__POINTER *)result__3GAH)[ 0]=((__POINTER ) 3);
-    result__RW0G=(void *)((unsigned long)result__3GAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    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 *))))));
   } else {
-    result__AHAH=first_free__HDVB;
-    while ((((void *)result__AHAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__AHAH)->map_size_and_id__YSB &  4294967292LU) < new_size__TW0G))) {
-      result__AHAH=((__MEMORY *)result__AHAH)->map_next_free__ZSB;
-    };
-    if (((void *)result__AHAH == (void *)NULL)) {
-      result__AHAH=new_page__454();
-    };
-    to_busy__index__DTFC(result__AHAH,new_size__TW0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__AHAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__RW0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__AHAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-  };
-  Result__CCHE=((void **)result__RW0G);
-  Self__CCXE=(__INTEGER)(new_capacity__N5WD -  1);
-  while ((Self__CCXE >=  0)) {
-    Result__CCHE[Self__CCXE]=NULL;
-    Self__CCXE=(__INTEGER)(Self__CCXE -  1);
-  };
-  Self__CLSD->buckets__SURD=Result__CCHE;
-  Self__CLSD->capacity__NURD=new_capacity__N5WD;
-  list_data__4NNC=result__0UED;
-  push_back_flag__5GKF=FALSE__;
-  memory__WXJF='\0';
-  last_integer__3STE= 0;
-  last_string__PTTE=create__BBB( 1024);
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__2ENF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__TJNF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__4JNF=NULL;
-  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__EUTE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
-  result__ZALF=NULL;
-  ptr__0ALF=((__POINTER )(NULL));
-  typ_id__5ALF= 0;
-  sz__2ALF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
-  if ((sz__2ALF ==  0)) {
-    result__ZALF=FAST_ARRAYoLIP_SLOT_DATAo__;
+    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__;
   } else {
-    typ_id__5ALF=__FAST_ARRAYoLIP_SLOT_DATAo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__2ALF);
-    if ((typ_id__5ALF == (__INTEGER)(-  1))) {
-      a__W02G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__X02G=(__UINTEGER_32)((__UINTEGER_32)(sz__2ALF + a__W02G) & (__UINTEGER_32)(~ a__W02G));
-      ptr_table__EHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X02G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__DHAH=((__POINTER )(NULL));
-      result__FHAH=((__POINTER *)ptr_table__EHAH)[ 0];
-      if ((result__FHAH == (void *)NULL)) {
-        result__FHAH=new_lab__2QJ(new_size__X02G);
-        next__DHAH=(void *)((unsigned long)result__FHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X02G)));
-        ((__POINTER *)next__DHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EHAH)[ 0]=next__DHAH;
-      } else {
-        next__DHAH=((__POINTER *)result__FHAH)[ 0];
-        if ((next__DHAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FHAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__X02G <<  1)) <=  4096)) {
-            next__DHAH=(void *)((unsigned long)result__FHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X02G)));
-          } else {
-            next__DHAH=new_lab__2QJ(new_size__X02G);
-          };
-          ((__POINTER *)next__DHAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EHAH)[ 0]=next__DHAH;
-        } else {
-          ((__POINTER *)result__FHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FHAH=next__DHAH;
-        };
-      };
-      ptr__0ALF=result__FHAH;
-    } else {
-      t__102G=((__UINTEGER_32 )typ_id__5ALF);
-      a__002G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__MHAH=(__UINTEGER_32)((__UINTEGER_32)(sz__2ALF + a__002G) & (__UINTEGER_32)(~ a__002G));
-      ptr_table__JHAH=((__POINTER )(&(table_type[(t__102G)])));
-      lab_type__LHAH=(__UINTEGER_32)(t__102G |  1);
-      next__IHAH=((__POINTER )(NULL));
-      result__KHAH=((__POINTER *)ptr_table__JHAH)[ 0];
-      if ((result__KHAH == (void *)NULL)) {
-        result__KHAH=new_lab__2QJ(lab_type__LHAH);
-        next__IHAH=(void *)((unsigned long)result__KHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MHAH)));
-        ((__POINTER *)next__IHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JHAH)[ 0]=next__IHAH;
-      } else {
-        next__IHAH=((__POINTER *)result__KHAH)[ 0];
-        if ((next__IHAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KHAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__MHAH <<  1)) <=  4096)) {
-            next__IHAH=(void *)((unsigned long)result__KHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MHAH)));
-          } else {
-            next__IHAH=new_lab__2QJ(lab_type__LHAH);
-          };
-          ((__POINTER *)next__IHAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JHAH)[ 0]=next__IHAH;
-        } else {
-          ((__POINTER *)result__KHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KHAH=next__IHAH;
-        };
-      };
-      ptr__0ALF=result__KHAH;
-    };
-    result__ZALF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__0ALF);
-    *(result__ZALF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
-  };
-  Self__KJNF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__ZALF);
-  if ((Self__KJNF->parent_arrayed_collection__EUTE.capacity__TJNF <  8)) {
-    sz__0W0G=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
-    result__ZW0G=((__POINTER )(NULL));
-    a__5W0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__1W0G=(__UINTEGER_32)((__UINTEGER_32)(sz__0W0G + a__5W0G) & (__UINTEGER_32)(~ a__5W0G));
-    new_size2__2W0G=(__UINTEGER_32)(new_size__1W0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__2W0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__402G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__502G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2W0G + a__402G) & (__UINTEGER_32)(~ a__402G));
-      ptr_table__OHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__502G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__NHAH=((__POINTER )(NULL));
-      result__PHAH=((__POINTER *)ptr_table__OHAH)[ 0];
-      if ((result__PHAH == (void *)NULL)) {
-        result__PHAH=new_lab__2QJ(new_size__502G);
-        next__NHAH=(void *)((unsigned long)result__PHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__502G)));
-        ((__POINTER *)next__NHAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OHAH)[ 0]=next__NHAH;
-      } else {
-        next__NHAH=((__POINTER *)result__PHAH)[ 0];
-        if ((next__NHAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PHAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__502G <<  1)) <=  4096)) {
-            next__NHAH=(void *)((unsigned long)result__PHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__502G)));
-          } else {
-            next__NHAH=new_lab__2QJ(new_size__502G);
-          };
-          ((__POINTER *)next__NHAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OHAH)[ 0]=next__NHAH;
-        } else {
-          ((__POINTER *)result__PHAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NHAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PHAH=next__NHAH;
-        };
-      };
-      ((__POINTER *)result__PHAH)[ 0]=((__POINTER ) 3);
-      result__ZW0G=(void *)((unsigned long)result__PHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__SHAH=first_free__HDVB;
-      while ((((void *)result__SHAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SHAH)->map_size_and_id__YSB &  4294967292LU) < new_size__1W0G))) {
-        result__SHAH=((__MEMORY *)result__SHAH)->map_next_free__ZSB;
-      };
-      if (((void *)result__SHAH == (void *)NULL)) {
-        result__SHAH=new_page__454();
-      };
-      to_busy__index__DTFC(result__SHAH,new_size__1W0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SHAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-      result__ZW0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SHAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__UIXF=((void **)result__ZW0G);
-    Self__GQ1F= 7;
-    while ((Self__GQ1F >=  0)) {
-      Result__UIXF[Self__GQ1F]=NULL;
-      Self__GQ1F=(__INTEGER)(Self__GQ1F -  1);
-    };
-    Self__KJNF->parent_arrayed_collection__EUTE.storage__4JNF=Result__UIXF;
-    Self__KJNF->parent_arrayed_collection__EUTE.capacity__TJNF= 8;
-  };
-  Self__KJNF->parent_arrayed_collection__EUTE.upper__2ENF=(__INTEGER)(-  1);
-  stack__FUTE=result__ZALF;
-  path_file__UQTF=create_with_capacity__RGRC( 3000);
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__FVIF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__EGNF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__PGNF=NULL;
-  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__1UIF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
-  result__FUKF=NULL;
-  ptr__GUKF=((__POINTER )(NULL));
-  typ_id__LUKF= 0;
-  sz__IUKF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
-  if ((sz__IUKF ==  0)) {
-    result__FUKF=FAST_ARRAYoLIP_SLOT_CODEo__;
+    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__;
   } else {
-    typ_id__LUKF=__FAST_ARRAYoLIP_SLOT_CODEo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__IUKF);
-    if ((typ_id__LUKF == (__INTEGER)(-  1))) {
-      a__F12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__G12G=(__UINTEGER_32)((__UINTEGER_32)(sz__IUKF + a__F12G) & (__UINTEGER_32)(~ a__F12G));
-      ptr_table__WHAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G12G / ((__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__2QJ(new_size__G12G);
-        next__VHAH=(void *)((unsigned long)result__XHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G12G)));
-        ((__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__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G12G <<  1)) <=  4096)) {
-            next__VHAH=(void *)((unsigned long)result__XHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G12G)));
-          } else {
-            next__VHAH=new_lab__2QJ(new_size__G12G);
-          };
-          ((__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__GUKF=result__XHAH;
-    } else {
-      t__K12G=((__UINTEGER_32 )typ_id__LUKF);
-      a__J12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__4HAH=(__UINTEGER_32)((__UINTEGER_32)(sz__IUKF + a__J12G) & (__UINTEGER_32)(~ a__J12G));
-      ptr_table__1HAH=((__POINTER )(&(table_type[(t__K12G)])));
-      lab_type__3HAH=(__UINTEGER_32)(t__K12G |  1);
-      next__0HAH=((__POINTER )(NULL));
-      result__2HAH=((__POINTER *)ptr_table__1HAH)[ 0];
-      if ((result__2HAH == (void *)NULL)) {
-        result__2HAH=new_lab__2QJ(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__5UH)))) &  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)));
-          } else {
-            next__0HAH=new_lab__2QJ(lab_type__3HAH);
-          };
-          ((__POINTER *)next__0HAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1HAH)[ 0]=next__0HAH;
-        } else {
-          ((__POINTER *)result__2HAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0HAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2HAH=next__0HAH;
-        };
-      };
-      ptr__GUKF=result__2HAH;
-    };
-    result__FUKF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__GUKF);
-    *(result__FUKF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
-  };
-  Self__1FNF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__FUKF);
-  if ((Self__1FNF->parent_arrayed_collection__1UIF.capacity__EGNF <  32)) {
-    sz__CX0G=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
-    result__BX0G=((__POINTER )(NULL));
-    a__HX0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__DX0G=(__UINTEGER_32)((__UINTEGER_32)(sz__CX0G + a__HX0G) & (__UINTEGER_32)(~ a__HX0G));
-    new_size2__EX0G=(__UINTEGER_32)(new_size__DX0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__EX0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__N12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__O12G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EX0G + a__N12G) & (__UINTEGER_32)(~ a__N12G));
-      ptr_table__AIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O12G / ((__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__2QJ(new_size__O12G);
-        next__5HAH=(void *)((unsigned long)result__BIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O12G)));
-        ((__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__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O12G <<  1)) <=  4096)) {
-            next__5HAH=(void *)((unsigned long)result__BIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O12G)));
-          } else {
-            next__5HAH=new_lab__2QJ(new_size__O12G);
-          };
-          ((__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__BX0G=(void *)((unsigned long)result__BIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__EIAH=first_free__HDVB;
-      while ((((void *)result__EIAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EIAH)->map_size_and_id__YSB &  4294967292LU) < new_size__DX0G))) {
-        result__EIAH=((__MEMORY *)result__EIAH)->map_next_free__ZSB;
-      };
-      if (((void *)result__EIAH == (void *)NULL)) {
-        result__EIAH=new_page__454();
-      };
-      to_busy__index__DTFC(result__EIAH,new_size__DX0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EIAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-      result__BX0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EIAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__YEXF=((void **)result__BX0G);
-    Self__5O1F= 31;
-    while ((Self__5O1F >=  0)) {
-      Result__YEXF[Self__5O1F]=NULL;
-      Self__5O1F=(__INTEGER)(Self__5O1F -  1);
-    };
-    Self__1FNF->parent_arrayed_collection__1UIF.storage__PGNF=Result__YEXF;
-    Self__1FNF->parent_arrayed_collection__1UIF.capacity__EGNF= 32;
-  };
-  Self__1FNF->parent_arrayed_collection__1UIF.upper__FVIF=(__INTEGER)(-  1);
-  list_method__2UIF=result__FUKF;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__SOEC=NULL;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__NOEC= 0;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__PYFC= 0;
-  result__U2YB=NULL;
-  ptr__V2YB=((__POINTER )(NULL));
-  typ_id__02YB= 0;
-  sz__X2YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
-  if ((sz__X2YB ==  0)) {
-    result__U2YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    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__;
   } else {
-    typ_id__02YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__X2YB);
-    if ((typ_id__02YB == (__INTEGER)(-  1))) {
-      a__U12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__V12G=(__UINTEGER_32)((__UINTEGER_32)(sz__X2YB + a__U12G) & (__UINTEGER_32)(~ a__U12G));
-      ptr_table__IIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V12G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__HIAH=((__POINTER )(NULL));
-      result__JIAH=((__POINTER *)ptr_table__IIAH)[ 0];
-      if ((result__JIAH == (void *)NULL)) {
-        result__JIAH=new_lab__2QJ(new_size__V12G);
-        next__HIAH=(void *)((unsigned long)result__JIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V12G)));
-        ((__POINTER *)next__HIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IIAH)[ 0]=next__HIAH;
-      } else {
-        next__HIAH=((__POINTER *)result__JIAH)[ 0];
-        if ((next__HIAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JIAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__V12G <<  1)) <=  4096)) {
-            next__HIAH=(void *)((unsigned long)result__JIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V12G)));
-          } else {
-            next__HIAH=new_lab__2QJ(new_size__V12G);
-          };
-          ((__POINTER *)next__HIAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IIAH)[ 0]=next__HIAH;
-        } else {
-          ((__POINTER *)result__JIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JIAH=next__HIAH;
-        };
-      };
-      ptr__V2YB=result__JIAH;
-    } else {
-      t__Z12G=((__UINTEGER_32 )typ_id__02YB);
-      a__Y12G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QIAH=(__UINTEGER_32)((__UINTEGER_32)(sz__X2YB + a__Y12G) & (__UINTEGER_32)(~ a__Y12G));
-      ptr_table__NIAH=((__POINTER )(&(table_type[(t__Z12G)])));
-      lab_type__PIAH=(__UINTEGER_32)(t__Z12G |  1);
-      next__MIAH=((__POINTER )(NULL));
-      result__OIAH=((__POINTER *)ptr_table__NIAH)[ 0];
-      if ((result__OIAH == (void *)NULL)) {
-        result__OIAH=new_lab__2QJ(lab_type__PIAH);
-        next__MIAH=(void *)((unsigned long)result__OIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QIAH)));
-        ((__POINTER *)next__MIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NIAH)[ 0]=next__MIAH;
-      } else {
-        next__MIAH=((__POINTER *)result__OIAH)[ 0];
-        if ((next__MIAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OIAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QIAH <<  1)) <=  4096)) {
-            next__MIAH=(void *)((unsigned long)result__OIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QIAH)));
-          } else {
-            next__MIAH=new_lab__2QJ(lab_type__PIAH);
-          };
-          ((__POINTER *)next__MIAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NIAH)[ 0]=next__MIAH;
-        } else {
-          ((__POINTER *)result__OIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OIAH=next__MIAH;
-        };
-      };
-      ptr__V2YB=result__OIAH;
-    };
-    result__U2YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__V2YB);
-    *(result__U2YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
-  };
-  Self__SWFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__U2YB);
-  new_capacity__QFOC=prime_number_ceiling__H41( 193);
-  Self__SWFC->buckets__SOEC=create__N1XC(new_capacity__QFOC);
-  Self__SWFC->capacity__NOEC=new_capacity__QFOC;
-  Self__SWFC->count__PYFC= 0;
-  bucket_name__TUOB=result__U2YB;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__4OEC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__JPEC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__RPEC=NULL;
-  SECTION___->name__SYDC=NULL;
-  last_section__H0C=NULL;
-  PROTOTYPE__->last_slot__40C=NULL;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__YQEC=NULL;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__TQEC= 0;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__J1FC= 0;
-  result__Z5YB=NULL;
-  ptr__05YB=((__POINTER )(NULL));
-  typ_id__55YB= 0;
-  sz__25YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__25YB ==  0)) {
-    result__Z5YB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    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__;
   } else {
-    typ_id__55YB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__25YB);
-    if ((typ_id__55YB == (__INTEGER)(-  1))) {
-      a__212G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__312G=(__UINTEGER_32)((__UINTEGER_32)(sz__25YB + a__212G) & (__UINTEGER_32)(~ a__212G));
-      ptr_table__SIAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__312G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RIAH=((__POINTER )(NULL));
-      result__TIAH=((__POINTER *)ptr_table__SIAH)[ 0];
-      if ((result__TIAH == (void *)NULL)) {
-        result__TIAH=new_lab__2QJ(new_size__312G);
-        next__RIAH=(void *)((unsigned long)result__TIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__312G)));
-        ((__POINTER *)next__RIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SIAH)[ 0]=next__RIAH;
-      } else {
-        next__RIAH=((__POINTER *)result__TIAH)[ 0];
-        if ((next__RIAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TIAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__312G <<  1)) <=  4096)) {
-            next__RIAH=(void *)((unsigned long)result__TIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__312G)));
-          } else {
-            next__RIAH=new_lab__2QJ(new_size__312G);
-          };
-          ((__POINTER *)next__RIAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SIAH)[ 0]=next__RIAH;
-        } else {
-          ((__POINTER *)result__TIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TIAH=next__RIAH;
-        };
-      };
-      ptr__05YB=result__TIAH;
-    } else {
-      t__B22G=((__UINTEGER_32 )typ_id__55YB);
-      a__A22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0IAH=(__UINTEGER_32)((__UINTEGER_32)(sz__25YB + a__A22G) & (__UINTEGER_32)(~ a__A22G));
-      ptr_table__XIAH=((__POINTER )(&(table_type[(t__B22G)])));
-      lab_type__ZIAH=(__UINTEGER_32)(t__B22G |  1);
-      next__WIAH=((__POINTER )(NULL));
-      result__YIAH=((__POINTER *)ptr_table__XIAH)[ 0];
-      if ((result__YIAH == (void *)NULL)) {
-        result__YIAH=new_lab__2QJ(lab_type__ZIAH);
-        next__WIAH=(void *)((unsigned long)result__YIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IAH)));
-        ((__POINTER *)next__WIAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XIAH)[ 0]=next__WIAH;
-      } else {
-        next__WIAH=((__POINTER *)result__YIAH)[ 0];
-        if ((next__WIAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YIAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0IAH <<  1)) <=  4096)) {
-            next__WIAH=(void *)((unsigned long)result__YIAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IAH)));
-          } else {
-            next__WIAH=new_lab__2QJ(lab_type__ZIAH);
-          };
-          ((__POINTER *)next__WIAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XIAH)[ 0]=next__WIAH;
-        } else {
-          ((__POINTER *)result__YIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YIAH=next__WIAH;
-        };
-      };
-      ptr__05YB=result__YIAH;
-    };
-    result__Z5YB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__05YB);
-    *(result__Z5YB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__RZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__Z5YB);
-  new_capacity__LJOC=prime_number_ceiling__H41( 193);
-  Self__RZFC->buckets__YQEC=create__QAYC(new_capacity__LJOC);
-  Self__RZFC->capacity__TQEC=new_capacity__LJOC;
-  Self__RZFC->count__J1FC= 0;
-  bucket_list__OWOB=result__Z5YB;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__EREC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__PREC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__XREC=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__ATGC= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__IKHC= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__TKHC=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__FU1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__O5GC= 0;
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__Q5GC= 0;
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__MAHC=NULL;
-  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__VBZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
-  result__TJ5B=NULL;
-  ptr__UJ5B=((__POINTER )(NULL));
-  typ_id__ZJ5B= 0;
-  sz__WJ5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
-  if ((sz__WJ5B ==  0)) {
-    result__TJ5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    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__;
   } else {
-    typ_id__ZJ5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__WJ5B);
-    if ((typ_id__ZJ5B == (__INTEGER)(-  1))) {
-      a__E22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__F22G=(__UINTEGER_32)((__UINTEGER_32)(sz__WJ5B + a__E22G) & (__UINTEGER_32)(~ a__E22G));
-      ptr_table__2IAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F22G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__1IAH=((__POINTER )(NULL));
-      result__3IAH=((__POINTER *)ptr_table__2IAH)[ 0];
-      if ((result__3IAH == (void *)NULL)) {
-        result__3IAH=new_lab__2QJ(new_size__F22G);
-        next__1IAH=(void *)((unsigned long)result__3IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F22G)));
-        ((__POINTER *)next__1IAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2IAH)[ 0]=next__1IAH;
-      } else {
-        next__1IAH=((__POINTER *)result__3IAH)[ 0];
-        if ((next__1IAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3IAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__F22G <<  1)) <=  4096)) {
-            next__1IAH=(void *)((unsigned long)result__3IAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F22G)));
-          } else {
-            next__1IAH=new_lab__2QJ(new_size__F22G);
-          };
-          ((__POINTER *)next__1IAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2IAH)[ 0]=next__1IAH;
-        } else {
-          ((__POINTER *)result__3IAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1IAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3IAH=next__1IAH;
-        };
-      };
-      ptr__UJ5B=result__3IAH;
-    } else {
-      t__J22G=((__UINTEGER_32 )typ_id__ZJ5B);
-      a__I22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__EJAH=(__UINTEGER_32)((__UINTEGER_32)(sz__WJ5B + a__I22G) & (__UINTEGER_32)(~ a__I22G));
-      ptr_table__BJAH=((__POINTER )(&(table_type[(t__J22G)])));
-      lab_type__DJAH=(__UINTEGER_32)(t__J22G |  1);
-      next__AJAH=((__POINTER )(NULL));
-      result__CJAH=((__POINTER *)ptr_table__BJAH)[ 0];
-      if ((result__CJAH == (void *)NULL)) {
-        result__CJAH=new_lab__2QJ(lab_type__DJAH);
-        next__AJAH=(void *)((unsigned long)result__CJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJAH)));
-        ((__POINTER *)next__AJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BJAH)[ 0]=next__AJAH;
-      } else {
-        next__AJAH=((__POINTER *)result__CJAH)[ 0];
-        if ((next__AJAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CJAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EJAH <<  1)) <=  4096)) {
-            next__AJAH=(void *)((unsigned long)result__CJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJAH)));
-          } else {
-            next__AJAH=new_lab__2QJ(lab_type__DJAH);
-          };
-          ((__POINTER *)next__AJAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BJAH)[ 0]=next__AJAH;
-        } else {
-          ((__POINTER *)result__CJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CJAH=next__AJAH;
-        };
-      };
-      ptr__UJ5B=result__CJAH;
-    };
-    result__TJ5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__UJ5B);
-    *(result__TJ5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
-  };
-  Self__5JHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__TJ5B);
-  if ((Self__5JHC->parent_arrayed_collection__FU1B.capacity__IKHC <  5)) {
-    Self__5JHC->parent_arrayed_collection__FU1B.storage__TKHC=create__UKBD( 5);
-    Self__5JHC->parent_arrayed_collection__FU1B.capacity__IKHC= 5;
-  };
-  Self__5JHC->parent_arrayed_collection__FU1B.upper__ATGC=(__INTEGER)(-  1);
-  free_list__GU1B=result__TJ5B;
-  ITM_SLOT_OPERATOR__->pretty_name__F0HC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__5AGC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__KBGC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__SBGC=NULL;
-  PROTOTYPE__->first_slot__SFZB=NULL;
+    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;
   txt__1=NULL;
   p__AB=NULL;
-  create__BBB( 255);
-  result__TTB=NULL;
-  ptr__UTB=((__POINTER )(NULL));
-  typ_id__ZTB= 0;
-  sz__WTB=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
-  if ((sz__WTB ==  0)) {
-    result__TTB=HASHED_SEToABSTRACT_STRINGo__;
+  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__;
   } else {
-    typ_id__ZTB=__HASHED_SEToABSTRACT_STRINGo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__WTB);
-    if ((typ_id__ZTB == (__INTEGER)(-  1))) {
-      a__M22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__N22G=(__UINTEGER_32)((__UINTEGER_32)(sz__WTB + a__M22G) & (__UINTEGER_32)(~ a__M22G));
-      ptr_table__GJAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N22G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FJAH=((__POINTER )(NULL));
-      result__HJAH=((__POINTER *)ptr_table__GJAH)[ 0];
-      if ((result__HJAH == (void *)NULL)) {
-        result__HJAH=new_lab__2QJ(new_size__N22G);
-        next__FJAH=(void *)((unsigned long)result__HJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N22G)));
-        ((__POINTER *)next__FJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GJAH)[ 0]=next__FJAH;
-      } else {
-        next__FJAH=((__POINTER *)result__HJAH)[ 0];
-        if ((next__FJAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HJAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__N22G <<  1)) <=  4096)) {
-            next__FJAH=(void *)((unsigned long)result__HJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N22G)));
-          } else {
-            next__FJAH=new_lab__2QJ(new_size__N22G);
-          };
-          ((__POINTER *)next__FJAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GJAH)[ 0]=next__FJAH;
-        } else {
-          ((__POINTER *)result__HJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HJAH=next__FJAH;
-        };
-      };
-      ptr__UTB=result__HJAH;
-    } else {
-      t__R22G=((__UINTEGER_32 )typ_id__ZTB);
-      a__Q22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OJAH=(__UINTEGER_32)((__UINTEGER_32)(sz__WTB + a__Q22G) & (__UINTEGER_32)(~ a__Q22G));
-      ptr_table__LJAH=((__POINTER )(&(table_type[(t__R22G)])));
-      lab_type__NJAH=(__UINTEGER_32)(t__R22G |  1);
-      next__KJAH=((__POINTER )(NULL));
-      result__MJAH=((__POINTER *)ptr_table__LJAH)[ 0];
-      if ((result__MJAH == (void *)NULL)) {
-        result__MJAH=new_lab__2QJ(lab_type__NJAH);
-        next__KJAH=(void *)((unsigned long)result__MJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJAH)));
-        ((__POINTER *)next__KJAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LJAH)[ 0]=next__KJAH;
-      } else {
-        next__KJAH=((__POINTER *)result__MJAH)[ 0];
-        if ((next__KJAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MJAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OJAH <<  1)) <=  4096)) {
-            next__KJAH=(void *)((unsigned long)result__MJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJAH)));
-          } else {
-            next__KJAH=new_lab__2QJ(lab_type__NJAH);
-          };
-          ((__POINTER *)next__KJAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LJAH)[ 0]=next__KJAH;
-        } else {
-          ((__POINTER *)result__MJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MJAH=next__KJAH;
-        };
-      };
-      ptr__UTB=result__MJAH;
-    };
-    result__TTB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__UTB);
-    *(result__TTB) = *(HASHED_SEToABSTRACT_STRINGo__);
-  };
-  Self__XBS=((__HASHED_SEToABSTRACT_STRINGo *)result__TTB);
-  new_capacity__MZW=prime_number_ceiling__H41( 53);
-  Self__XBS->buckets__OYR=create__RJ2(new_capacity__MZW);
-  Self__XBS->capacity__JYR=new_capacity__MZW;
-  Self__XBS->count__PZR= 0;
-  list__FK=result__TTB;
-  add__YXR(result__TTB,(&__string_4));
-  add__YXR(list__FK,(&__string_5));
-  add__YXR(list__FK,(&__string_6));
-  add__YXR(list__FK,(&__string_7));
-  add__YXR(list__FK,(&__string_8));
-  add__YXR(list__FK,(&__string_9));
-  add__YXR(list__FK,(&__string_10));
-  add__YXR(list__FK,(&__string_11));
-  add__YXR(list__FK,(&__string_12));
-  add__YXR(list__FK,(&__string_13));
-  add__YXR(list__FK,(&__string_14));
-  add__YXR(list__FK,(&__string_15));
-  add__YXR(list__FK,(&__string_16));
-  add__YXR(list__FK,(&__string_17));
-  add__YXR(list__FK,(&__string_18));
-  add__YXR(list__FK,(&__string_19));
-  add__YXR(list__FK,(&__string_20));
-  add__YXR(list__FK,(&__string_21));
-  add__YXR(list__FK,(&__string_22));
-  add__YXR(list__FK,(&__string_23));
-  add__YXR(list__FK,(&__string_24));
-  add__YXR(list__FK,(&__string_25));
-  add__YXR(list__FK,(&__string_26));
-  add__YXR(list__FK,(&__string_27));
-  add__YXR(list__FK,(&__string_28));
-  add__YXR(list__FK,(&__string_29));
-  add__YXR(list__FK,(&__string_30));
-  add__YXR(list__FK,(&__string_31));
-  add__YXR(list__FK,(&__string_32));
-  add__YXR(list__FK,(&__string_33));
-  add__YXR(list__FK,(&__string_34));
-  add__YXR(list__FK,(&__string_35));
-  add__YXR(list__FK,(&__string_36));
-  add__YXR(list__FK,(&__string_37));
-  add__YXR(list__FK,(&__string_38));
-  add__YXR(list__FK,(&__string_39));
-  add__YXR(list__FK,(&__string_40));
-  add__YXR(list__FK,(&__string_41));
-  add__YXR(list__FK,(&__string_42));
-  add__YXR(list__FK,(&__string_43));
-  add__YXR(list__FK,(&__string_44));
-  add__YXR(list__FK,(&__string_45));
-  add__YXR(list__FK,(&__string_46));
-  add__YXR(list__FK,(&__string_47));
-  add__YXR(list__FK,(&__string_1));
-  add__YXR(list__FK,(&__string_48));
-  add__YXR(list__FK,(&__string_49));
-  add__YXR(list__FK,(&__string_50));
-  add__YXR(list__FK,(&__string_51));
-  add__YXR(list__FK,(&__string_52));
-  add__YXR(list__FK,(&__string_53));
-  add__YXR(list__FK,(&__string_54));
-  add__YXR(list__FK,(&__string_55));
-  add__YXR(list__FK,(&__string_56));
-  add__YXR(list__FK,(&__string_57));
-  add__YXR(list__FK,(&__string_58));
-  add__YXR(list__FK,(&__string_59));
-  add__YXR(list__FK,(&__string_2));
-  add__YXR(list__FK,(&__string_3));
-  add__YXR(list__FK,(&__string_60));
-  add__YXR(list__FK,(&__string_61));
-  add__YXR(list__FK,(&__string_62));
-  add__YXR(list__FK,(&__string_63));
-  add__YXR(list__FK,(&__string_64));
-  add__YXR(list__FK,(&__string_65));
-  add__YXR(list__FK,(&__string_66));
-  add__YXR(list__FK,(&__string_67));
-  add__YXR(list__FK,(&__string_68));
-  add__YXR(list__FK,(&__string_69));
-  add__YXR(list__FK,(&__string_70));
-  add__YXR(list__FK,(&__string_71));
-  add__YXR(list__FK,(&__string_72));
-  add__YXR(list__FK,(&__string_73));
-  add__YXR(list__FK,(&__string_74));
-  add__YXR(list__FK,(&__string_75));
-  add__YXR(list__FK,(&__string_76));
-  add__YXR(list__FK,(&__string_77));
-  add__YXR(list__FK,(&__string_78));
-  add__YXR(list__FK,(&__string_79));
-  add__YXR(list__FK,(&__string_80));
-  add__YXR(list__FK,(&__string_81));
-  add__YXR(list__FK,(&__string_82));
-  add__YXR(list__FK,(&__string_83));
-  add__YXR(list__FK,(&__string_84));
-  add__YXR(list__FK,(&__string_85));
-  add__YXR(list__FK,(&__string_86));
-  add__YXR(list__FK,(&__string_87));
-  add__YXR(list__FK,(&__string_88));
-  add__YXR(list__FK,(&__string_89));
-  add__YXR(list__FK,(&__string_90));
-  add__YXR(list__FK,(&__string_91));
-  add__YXR(list__FK,(&__string_92));
-  add__YXR(list__FK,(&__string_93));
-  add__YXR(list__FK,(&__string_94));
-  add__YXR(list__FK,(&__string_95));
-  add__YXR(list__FK,(&__string_96));
-  add__YXR(list__FK,(&__string_97));
-  add__YXR(list__FK,(&__string_98));
-  add__YXR(list__FK,(&__string_99));
-  add__YXR(list__FK,(&__string_100));
-  add__YXR(list__FK,(&__string_101));
-  add__YXR(list__FK,(&__string_102));
-  add__YXR(list__FK,(&__string_103));
-  add__YXR(list__FK,(&__string_104));
-  add__YXR(list__FK,(&__string_105));
-  add__YXR(list__FK,(&__string_106));
-  add__YXR(list__FK,(&__string_107));
-  add__YXR(list__FK,(&__string_108));
-  add__YXR(list__FK,(&__string_109));
-  add__YXR(list__FK,(&__string_110));
-  add__YXR(list__FK,(&__string_111));
-  add__YXR(list__FK,(&__string_112));
-  add__YXR(list__FK,(&__string_113));
-  add__YXR(list__FK,(&__string_114));
-  add__YXR(list__FK,(&__string_115));
-  add__YXR(list__FK,(&__string_116));
-  add__YXR(list__FK,(&__string_117));
-  add__YXR(list__FK,(&__string_118));
-  add__YXR(list__FK,(&__string_119));
-  add__YXR(list__FK,(&__string_120));
-  add__YXR(list__FK,(&__string_121));
-  add__YXR(list__FK,(&__string_122));
-  add__YXR(list__FK,(&__string_123));
-  add__YXR(list__FK,(&__string_124));
-  add__YXR(list__FK,(&__string_125));
-  add__YXR(list__FK,(&__string_126));
-  add__YXR(list__FK,(&__string_127));
-  add__YXR(list__FK,(&__string_128));
-  add__YXR(list__FK,(&__string_129));
-  add__YXR(list__FK,(&__string_70));
-  add__YXR(list__FK,(&__string_130));
-  add__YXR(list__FK,(&__string_131));
-  add__YXR(list__FK,(&__string_132));
-  add__YXR(list__FK,(&__string_133));
-  add__YXR(list__FK,(&__string_65));
-  add__YXR(list__FK,(&__string_134));
-  add__YXR(list__FK,(&__string_135));
-  add__YXR(list__FK,(&__string_136));
-  add__YXR(list__FK,(&__string_137));
-  add__YXR(list__FK,(&__string_138));
-  add__YXR(list__FK,(&__string_139));
-  add__YXR(list__FK,(&__string_140));
-  add__YXR(list__FK,(&__string_141));
-  add__YXR(list__FK,(&__string_142));
-  add__YXR(list__FK,(&__string_66));
-  add__YXR(list__FK,(&__string_143));
-  add__YXR(list__FK,(&__string_144));
-  add__YXR(list__FK,(&__string_145));
-  add__YXR(list__FK,(&__string_146));
-  add__YXR(list__FK,(&__string_147));
-  add__YXR(list__FK,(&__string_148));
-  operator__name__GGB((&__string_16));
-  operator__name__GGB((&__string_17));
-  cmd__PY=NULL;
-  path__SY=NULL;
-  is_shorter__TY=TRUE__;
-  j__QY= 1;
-  while ((j__QY <= ((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.upper__WJC)) {
-    cmd__PY=((void **)((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.storage__HGT)[j__QY];
-    if ((((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 0] == '-')) {
-      if ((((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 1] == 'o')) {
-        j__QY=(__INTEGER)(j__QY +  1);
-        if ((j__QY > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.upper__WJC +  1))) {
-          print__GHD((&__string_149));
+    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));
           exit(( 1));
         };
-        output_name__DI=get__YVB(((void **)((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.storage__HGT)[j__QY]);
-        __tmp__2Z=TRUE__;
+        output_name__DI=get__2VB(((void **)((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.storage__LGT)[j__TY]);
+        __tmp__5Z=TRUE__;
       } else {
-        __tmp__2Z=FALSE__;
+        __tmp__5Z=FALSE__;
       };
-      if (__tmp__2Z) {
-        __tmp__X0=TRUE__;
+      if (__tmp__5Z) {
+        __tmp__00=TRUE__;
       } else {
-        result__P5NB=(((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 1] == 'f');
-        if (result__P5NB) {
-          j__QY=(__INTEGER)(j__QY +  1);
-          if ((j__QY > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.upper__WJC +  1))) {
-            print__GHD((&__string_149));
+        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));
             exit(( 1));
           };
-          format_name__V0=get__YVB(((void **)((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.storage__HGT)[j__QY]);
+          format_name__Y0=get__2VB(((void **)((__FAST_ARRAYoSTRINGo *)result__VGD)->parent_arrayed_collection__XJC.storage__LGT)[j__TY]);
         };
-        __tmp__X0=result__P5NB;
+        __tmp__00=result__T5NB;
       };
-      if (__tmp__X0) {
-        __tmp__F1=TRUE__;
+      if (__tmp__00) {
+        __tmp__I1=TRUE__;
       } else {
-        result__BAOB=(((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 1] == 'c');
-        if (result__BAOB) {
-          is_short_code__D1=TRUE__;
+        result__FAOB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'c');
+        if (result__FAOB) {
+          is_short_code__G1=TRUE__;
         };
-        __tmp__F1=result__BAOB;
+        __tmp__I1=result__FAOB;
       };
-      if (__tmp__F1) {
-        __tmp__T1=TRUE__;
+      if (__tmp__I1) {
+        __tmp__W1=TRUE__;
       } else {
-        result__TAOB=(((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 1] == 'p');
-        if (result__TAOB) {
-          is_short_private__R1=TRUE__;
+        result__XAOB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'p');
+        if (result__XAOB) {
+          is_short_private__U1=TRUE__;
         };
-        __tmp__T1=result__TAOB;
+        __tmp__W1=result__XAOB;
       };
-      if (__tmp__T1) {
-        __tmp__A2=TRUE__;
+      if (__tmp__W1) {
+        __tmp__D2=TRUE__;
       } else {
-        result__FBOB=(((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 1] == 'r');
-        if (result__FBOB) {
+        result__JBOB=(((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'r');
+        if (result__JBOB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__A2=result__FBOB;
+        __tmp__D2=result__JBOB;
       };
-      if ((! __tmp__A2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__PY)->storage__RBS)[ 1] == 'd')) {
-          is_shorter__TY=FALSE__;
+      if ((! __tmp__D2)) {
+        if ((((__CHARACTER *)((__STRING *)cmd__SY)->storage__VBS)[ 1] == 'd')) {
+          is_shorter__WY=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
         } else {
-          print__GHD((&__string_149));
+          print__KHD((&__string_150));
           exit(( 1));
         };
       };
     } else {
       if (((void *)input_name__3B != (void *)NULL)) {
-        print__GHD((&__string_149));
+        print__KHD((&__string_150));
         exit(( 1));
       };
-      copy__JCS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__RGD)->parent_arrayed_collection__TJC.storage__HGT)[j__QY]);
-      input_name__3B=get__YVB(string_tmp__VH);
+      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);
     };
-    j__QY=(__INTEGER)(j__QY +  1);
+    j__TY=(__INTEGER)(j__TY +  1);
   };
   if (((void *)input_name__3B == (void *)NULL)) {
-    print__GHD((&__string_149));
+    print__KHD((&__string_150));
     exit(( 1));
   };
-  if (((void *)format_name__V0 != (void *)NULL)) {
-    path__SY=((__CHARACTER *)(LISAAC_DIRECTORY));
-    Self__DKC=((__CHARACTER *)path__SY);
-    idx__PKC= 0;
-    while ((! ((idx__PKC >  1024) || ('\0' == Self__DKC[idx__PKC])))) {
-      idx__PKC=(__INTEGER)(idx__PKC +  1);
-    };
-    result__P33G=NULL;
-    ptr__Q33G=((__POINTER )(NULL));
-    typ_id__R33G= 0;
-    sz__S33G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__S33G ==  0)) {
-      result__P33G=STRING_CONSTANT__;
-    } else {
-      typ_id__R33G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__S33G);
-      if ((typ_id__R33G == (__INTEGER)(-  1))) {
-        a__T33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__U33G=(__UINTEGER_32)((__UINTEGER_32)(sz__S33G + a__T33G) & (__UINTEGER_32)(~ a__T33G));
-        ptr_table__QJAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__U33G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__PJAH=((__POINTER )(NULL));
-        result__RJAH=((__POINTER *)ptr_table__QJAH)[ 0];
-        if ((result__RJAH == (void *)NULL)) {
-          result__RJAH=new_lab__2QJ(new_size__U33G);
-          next__PJAH=(void *)((unsigned long)result__RJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U33G)));
-          ((__POINTER *)next__PJAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QJAH)[ 0]=next__PJAH;
-        } else {
-          next__PJAH=((__POINTER *)result__RJAH)[ 0];
-          if ((next__PJAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RJAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__U33G <<  1)) <=  4096)) {
-              next__PJAH=(void *)((unsigned long)result__RJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U33G)));
+  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)));
             } else {
-              next__PJAH=new_lab__2QJ(new_size__U33G);
-            };
-            ((__POINTER *)next__PJAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QJAH)[ 0]=next__PJAH;
-          } else {
-            ((__POINTER *)result__RJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__RJAH=next__PJAH;
-          };
-        };
-        ptr__Q33G=result__RJAH;
-      } else {
-        t__V33G=((__UINTEGER_32 )typ_id__R33G);
-        a__W33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YJAH=(__UINTEGER_32)((__UINTEGER_32)(sz__S33G + a__W33G) & (__UINTEGER_32)(~ a__W33G));
-        ptr_table__VJAH=((__POINTER )(&(table_type[(t__V33G)])));
-        lab_type__XJAH=(__UINTEGER_32)(t__V33G |  1);
-        next__UJAH=((__POINTER )(NULL));
-        result__WJAH=((__POINTER *)ptr_table__VJAH)[ 0];
-        if ((result__WJAH == (void *)NULL)) {
-          result__WJAH=new_lab__2QJ(lab_type__XJAH);
-          next__UJAH=(void *)((unsigned long)result__WJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YJAH)));
-          ((__POINTER *)next__UJAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VJAH)[ 0]=next__UJAH;
-        } else {
-          next__UJAH=((__POINTER *)result__WJAH)[ 0];
-          if ((next__UJAH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WJAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YJAH <<  1)) <=  4096)) {
-              next__UJAH=(void *)((unsigned long)result__WJAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YJAH)));
+              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)));
             } else {
-              next__UJAH=new_lab__2QJ(lab_type__XJAH);
+              next__DOCH=new_lab__ARJ(lab_type__GOCH);
             };
-            ((__POINTER *)next__UJAH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VJAH)[ 0]=next__UJAH;
+            ((__POINTER *)next__DOCH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EOCH)[ 0]=next__DOCH;
           } else {
-            ((__POINTER *)result__WJAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UJAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WJAH=next__UJAH;
+            ((__POINTER *)result__FOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FOCH=next__DOCH;
           };
         };
-        ptr__Q33G=result__WJAH;
+        ptr__YAAH=result__FOCH;
       };
-      result__P33G=((__STRING_CONSTANT *)ptr__Q33G);
-      *(result__P33G) = *(STRING_CONSTANT__);
+      result__XAAH=((__STRING_CONSTANT *)ptr__YAAH);
+      *(result__XAAH) = *(STRING_CONSTANT__);
     };
-    Self__3VS=((__STRING_CONSTANT *)result__P33G);
-    Self__3VS->storage__FQO=path__SY;
-    Self__3VS->count__DD=idx__PKC;
-    copy__JCS(string_tmp__VH,result__P33G);
-    Self__S22G=((__STRING_CONSTANT *)result__P33G);
-    if ((((__CHARACTER *)Self__S22G->storage__FQO)[(__INTEGER)(Self__S22G->count__DD -  1)] != '/')) {
-      Self__UMS=((__STRING_CONSTANT *)result__P33G);
-      __tmp__D4=(((__CHARACTER *)Self__UMS->storage__FQO)[(__INTEGER)(Self__UMS->count__DD -  1)] != '\\');
+    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)] != '\\');
     } else {
-      __tmp__D4=FALSE__;
+      __tmp__G4=FALSE__;
     };
-    if (__tmp__D4) {
-      add_last__JLT(string_tmp__VH,'/');
+    if (__tmp__G4) {
+      add_last__NLT(string_tmp__VH,'/');
     };
-    append__RNS(string_tmp__VH,(&__string_150));
-    append__RNS(string_tmp__VH,format_name__V0);
-    append__RNS(string_tmp__VH,(&__string_151));
-    fmt_name__0MC=get__YVB(string_tmp__VH);
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    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) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    if (((void *)get_entry__D0AC(fmt_name__0MC) == (void *)NULL)) {
-      put_string__E1F((&__string_152));
-      put_string__E1F(fmt_name__0MC);
-      put_string__E1F((&__string_153));
+    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));
       exit(( 1));
     };
-    object__ZAC=create__name__generic_count__JAC(fmt_name__0MC,(&__string_114));
-    source__5AC=((__PROTOTYPE *)object__ZAC)->source__3AC;
-    position__CBC= 1;
-    pos_cur__FBC= 1;
-    pos_line__GBC= 1;
-    pos_col__HBC= 0;
-    while_do__TJF:
+    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:
     {
-      result__ZJAH=FALSE__;
-      if ((! read_space__NRD())) {
-        result__ZJAH=FALSE__;
+      result__IOCH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__IOCH=FALSE__;
       } else {
-        result__0JAH='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__0JAH=((__CHARACTER )(( 0)));
+        result__JOCH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__JOCH=((__CHARACTER )(( 0)));
         } else {
-          result__0JAH=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__JOCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__0JAH == '-')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__ZJAH=TRUE__;
+        if ((result__JOCH == '-')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__IOCH=TRUE__;
         };
       };
-      if (result__ZJAH) {
-        if ((! read_identifier__15K())) {
-          pos__HCSG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_154));
-          put_position__EOG(pos__HCSG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        result__UGKB=NULL;
-        ptr__VGKB=((__POINTER )(NULL));
-        typ_id__0GKB= 0;
-        sz__XGKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
-        if ((sz__XGKB ==  0)) {
-          result__UGKB=LINKED_LISToSTRING_CONSTANTo__;
-        } else {
-          typ_id__0GKB=__LINKED_LISToSTRING_CONSTANTo__;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__XGKB);
-          if ((typ_id__0GKB == (__INTEGER)(-  1))) {
-            a__V22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__W22G=(__UINTEGER_32)((__UINTEGER_32)(sz__XGKB + a__V22G) & (__UINTEGER_32)(~ a__V22G));
-            ptr_table__3JAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W22G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__2JAH=((__POINTER )(NULL));
-            result__4JAH=((__POINTER *)ptr_table__3JAH)[ 0];
-            if ((result__4JAH == (void *)NULL)) {
-              result__4JAH=new_lab__2QJ(new_size__W22G);
-              next__2JAH=(void *)((unsigned long)result__4JAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W22G)));
-              ((__POINTER *)next__2JAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3JAH)[ 0]=next__2JAH;
+        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;
             } else {
-              next__2JAH=((__POINTER *)result__4JAH)[ 0];
-              if ((next__2JAH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4JAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W22G <<  1)) <=  4096)) {
-                  next__2JAH=(void *)((unsigned long)result__4JAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W22G)));
+              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)));
                 } else {
-                  next__2JAH=new_lab__2QJ(new_size__W22G);
+                  next__LOCH=new_lab__ARJ(new_size__V54G);
                 };
-                ((__POINTER *)next__2JAH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3JAH)[ 0]=next__2JAH;
+                ((__POINTER *)next__LOCH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MOCH)[ 0]=next__LOCH;
               } else {
-                ((__POINTER *)result__4JAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2JAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4JAH=next__2JAH;
+                ((__POINTER *)result__NOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NOCH=next__LOCH;
               };
             };
-            ptr__VGKB=result__4JAH;
-          } else {
-            t__022G=((__UINTEGER_32 )typ_id__0GKB);
-            a__Z22G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__FKAH=(__UINTEGER_32)((__UINTEGER_32)(sz__XGKB + a__Z22G) & (__UINTEGER_32)(~ a__Z22G));
-            ptr_table__CKAH=((__POINTER )(&(table_type[(t__022G)])));
-            lab_type__EKAH=(__UINTEGER_32)(t__022G |  1);
-            next__BKAH=((__POINTER )(NULL));
-            result__DKAH=((__POINTER *)ptr_table__CKAH)[ 0];
-            if ((result__DKAH == (void *)NULL)) {
-              result__DKAH=new_lab__2QJ(lab_type__EKAH);
-              next__BKAH=(void *)((unsigned long)result__DKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FKAH)));
-              ((__POINTER *)next__BKAH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CKAH)[ 0]=next__BKAH;
+            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;
             } else {
-              next__BKAH=((__POINTER *)result__DKAH)[ 0];
-              if ((next__BKAH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DKAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FKAH <<  1)) <=  4096)) {
-                  next__BKAH=(void *)((unsigned long)result__DKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FKAH)));
+              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)));
                 } else {
-                  next__BKAH=new_lab__2QJ(lab_type__EKAH);
+                  next__QOCH=new_lab__ARJ(lab_type__TOCH);
                 };
-                ((__POINTER *)next__BKAH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CKAH)[ 0]=next__BKAH;
+                ((__POINTER *)next__QOCH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ROCH)[ 0]=next__QOCH;
               } else {
-                ((__POINTER *)result__DKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DKAH=next__BKAH;
+                ((__POINTER *)result__SOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SOCH=next__QOCH;
               };
             };
-            ptr__VGKB=result__DKAH;
-          };
-          result__UGKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__VGKB);
-          *(result__UGKB) = *(LINKED_LISToSTRING_CONSTANTo__);
-        };
-        Self__X33G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        k__Y33G=last_string__YZC;
-        Self__233G=((__STRING_CONSTANT *)last_string__YZC);
-        result__133G= 0;
-        __tmp__333G=Self__233G->count__DD;
-        Self__433G= 1;
-        while ((Self__433G <= __tmp__333G)) {
-          result__133G=(__INTEGER)((__INTEGER)( 5 * result__133G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__233G->storage__FQO)[(__INTEGER)(Self__433G -  1)])));
-          Self__433G=(__INTEGER)(Self__433G +  1);
-        };
-        if ((result__133G <  0)) {
-          result__133G=(__INTEGER)(~ result__133G);
-        };
-        node__Z33G=((void **)Self__X33G->buckets__PCT)[(__INTEGER)(result__133G % Self__X33G->capacity__KCT)];
-        while ((! (((void *)node__Z33G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Z33G)->key__1CT == (void *)k__Y33G)))) {
-          node__Z33G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Z33G)->next__GDT;
-        };
-        if (((void *)node__Z33G != (void *)NULL)) {
-          pos__RCSG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_155));
-          put_position__EOG(pos__RCSG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+            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)) {
             exit(( 1));
           };
         };
-        __tmp__MND=last_string__YZC;
-        Self__GPEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        k__IPEB=last_string__YZC;
-        Self__B43G=((__STRING_CONSTANT *)last_string__YZC);
-        result__A43G= 0;
-        __tmp__C43G=Self__B43G->count__DD;
-        Self__D43G= 1;
-        while ((Self__D43G <= __tmp__C43G)) {
-          result__A43G=(__INTEGER)((__INTEGER)( 5 * result__A43G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__B43G->storage__FQO)[(__INTEGER)(Self__D43G -  1)])));
-          Self__D43G=(__INTEGER)(Self__D43G +  1);
-        };
-        if ((result__A43G <  0)) {
-          result__A43G=(__INTEGER)(~ result__A43G);
-        };
-        idx__QPEB=(__INTEGER)(result__A43G % Self__GPEB->capacity__KCT);
-        node__RPEB=((void **)Self__GPEB->buckets__PCT)[idx__QPEB];
-        while ((! (((void *)node__RPEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RPEB)->key__1CT == (void *)k__IPEB)))) {
-          node__RPEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RPEB)->next__GDT;
-        };
-        if (((void *)node__RPEB == (void *)NULL)) {
-          if ((Self__GPEB->capacity__KCT == Self__GPEB->count__YLY)) {
-            idx__OHZB= 0;
-            node1__SHZB=NULL;
-            node2__THZB=NULL;
-            old_buckets__RHZB=Self__GPEB->buckets__PCT;
-            new_capacity__PHZB=prime_number_ceiling__H41((__INTEGER)(Self__GPEB->capacity__KCT +  1));
-            Self__GPEB->buckets__PCT=create__RF4(new_capacity__PHZB);
-            i__QHZB=(__INTEGER)(Self__GPEB->capacity__KCT -  1);
-            Self__GPEB->capacity__KCT=new_capacity__PHZB;
-            while ((i__QHZB >=  0)) {
-              node1__SHZB=((void **)old_buckets__RHZB)[i__QHZB];
-              while (((void *)node1__SHZB != (void *)NULL)) {
-                node2__THZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__SHZB)->next__GDT;
-                Self__G43G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__SHZB)->key__1CT);
-                result__F43G= 0;
-                __tmp__H43G=Self__G43G->count__DD;
-                Self__I43G= 1;
-                while ((Self__I43G <= __tmp__H43G)) {
-                  result__F43G=(__INTEGER)((__INTEGER)( 5 * result__F43G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__G43G->storage__FQO)[(__INTEGER)(Self__I43G -  1)])));
-                  Self__I43G=(__INTEGER)(Self__I43G +  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);
                 };
-                if ((result__F43G <  0)) {
-                  result__F43G=(__INTEGER)(~ result__F43G);
+                if ((result__NBAH <  0)) {
+                  result__NBAH=(__INTEGER)(~ result__NBAH);
                 };
-                idx__OHZB=(__INTEGER)(result__F43G % Self__GPEB->capacity__KCT);
-                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__SHZB)->next__GDT=((void **)Self__GPEB->buckets__PCT)[idx__OHZB];
-                ((void **)Self__GPEB->buckets__PCT)[idx__OHZB]=node1__SHZB;
-                node1__SHZB=node2__THZB;
+                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;
               };
-              i__QHZB=(__INTEGER)(i__QHZB -  1);
-            };
-            idx__QPEB=(__INTEGER)(result__A43G % new_capacity__PHZB);
-          };
-          __tmp__4QEB=((void **)Self__GPEB->buckets__PCT)[idx__QPEB];
-          result__XJZB=NULL;
-          ptr__YJZB=((__POINTER )(NULL));
-          typ_id__3JZB= 0;
-          sz__0JZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
-          if ((sz__0JZB ==  0)) {
-            result__XJZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-          } else {
-            typ_id__3JZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__0JZB);
-            if ((typ_id__3JZB == (__INTEGER)(-  1))) {
-              a__A32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__B32G=(__UINTEGER_32)((__UINTEGER_32)(sz__0JZB + a__A32G) & (__UINTEGER_32)(~ a__A32G));
-              ptr_table__HKAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B32G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__GKAH=((__POINTER )(NULL));
-              result__IKAH=((__POINTER *)ptr_table__HKAH)[ 0];
-              if ((result__IKAH == (void *)NULL)) {
-                result__IKAH=new_lab__2QJ(new_size__B32G);
-                next__GKAH=(void *)((unsigned long)result__IKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B32G)));
-                ((__POINTER *)next__GKAH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HKAH)[ 0]=next__GKAH;
+              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;
               } else {
-                next__GKAH=((__POINTER *)result__IKAH)[ 0];
-                if ((next__GKAH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IKAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__B32G <<  1)) <=  4096)) {
-                    next__GKAH=(void *)((unsigned long)result__IKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B32G)));
+                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)));
                   } else {
-                    next__GKAH=new_lab__2QJ(new_size__B32G);
+                    next__VOCH=new_lab__ARJ(new_size__AA5G);
                   };
-                  ((__POINTER *)next__GKAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HKAH)[ 0]=next__GKAH;
+                  ((__POINTER *)next__VOCH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WOCH)[ 0]=next__VOCH;
                 } else {
-                  ((__POINTER *)result__IKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IKAH=next__GKAH;
+                  ((__POINTER *)result__XOCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VOCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XOCH=next__VOCH;
                 };
               };
-              ptr__YJZB=result__IKAH;
+              ptr__2JZB=result__XOCH;
             } else {
-              t__F32G=((__UINTEGER_32 )typ_id__3JZB);
-              a__E32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__PKAH=(__UINTEGER_32)((__UINTEGER_32)(sz__0JZB + a__E32G) & (__UINTEGER_32)(~ a__E32G));
-              ptr_table__MKAH=((__POINTER )(&(table_type[(t__F32G)])));
-              lab_type__OKAH=(__UINTEGER_32)(t__F32G |  1);
-              next__LKAH=((__POINTER )(NULL));
-              result__NKAH=((__POINTER *)ptr_table__MKAH)[ 0];
-              if ((result__NKAH == (void *)NULL)) {
-                result__NKAH=new_lab__2QJ(lab_type__OKAH);
-                next__LKAH=(void *)((unsigned long)result__NKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKAH)));
-                ((__POINTER *)next__LKAH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MKAH)[ 0]=next__LKAH;
+              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;
               } 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__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PKAH <<  1)) <=  4096)) {
-                    next__LKAH=(void *)((unsigned long)result__NKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKAH)));
+                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)));
                   } else {
-                    next__LKAH=new_lab__2QJ(lab_type__OKAH);
+                    next__0OCH=new_lab__ARJ(lab_type__3OCH);
                   };
-                  ((__POINTER *)next__LKAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MKAH)[ 0]=next__LKAH;
+                  ((__POINTER *)next__0OCH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1OCH)[ 0]=next__0OCH;
                 } else {
-                  ((__POINTER *)result__NKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__NKAH=next__LKAH;
+                  ((__POINTER *)result__2OCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2OCH=next__0OCH;
                 };
               };
-              ptr__YJZB=result__NKAH;
-            };
-            result__XJZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__YJZB);
-            *(result__XJZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
-          };
-          Self__LDGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__XJZB);
-          Self__LDGC->item__XX3=result__UGKB;
-          Self__LDGC->key__1CT=__tmp__MND;
-          Self__LDGC->next__GDT=__tmp__4QEB;
-          node__RPEB=result__XJZB;
-          ((void **)Self__GPEB->buckets__PCT)[idx__QPEB]=result__XJZB;
-          Self__GPEB->count__YLY=(__INTEGER)(Self__GPEB->count__YLY +  1);
-        } else {
-          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RPEB)->item__XX3=result__UGKB;
-        };
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__DESG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_156));
-          put_position__EOG(pos__DESG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+              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)) {
             exit(( 1));
           };
         };
-        def__WREB=result__UGKB;
-        result__YREB=FALSE__;
-        if (read_short_elt__1KKB()) {
-          result__YREB=TRUE__;
-          Self__L32G=((__LINKED_LISToSTRING_CONSTANTo *)result__UGKB);
-          element__K32G=last_string__YZC;
-          if (((void *)Self__L32G->first_link__UTEC == (void *)NULL)) {
-            i__T43G=last_string__YZC;
-            result__K43G=NULL;
-            ptr__L43G=((__POINTER )(NULL));
-            typ_id__M43G= 0;
-            sz__N43G=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-            if ((sz__N43G ==  0)) {
-              result__K43G=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+        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__;
             } else {
-              typ_id__M43G=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-              clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__N43G);
-              if ((typ_id__M43G == (__INTEGER)(-  1))) {
-                a__O43G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__P43G=(__UINTEGER_32)((__UINTEGER_32)(sz__N43G + a__O43G) & (__UINTEGER_32)(~ a__O43G));
-                ptr_table__RKAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P43G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__QKAH=((__POINTER )(NULL));
-                result__SKAH=((__POINTER *)ptr_table__RKAH)[ 0];
-                if ((result__SKAH == (void *)NULL)) {
-                  result__SKAH=new_lab__2QJ(new_size__P43G);
-                  next__QKAH=(void *)((unsigned long)result__SKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P43G)));
-                  ((__POINTER *)next__QKAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__RKAH)[ 0]=next__QKAH;
+              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;
                 } else {
-                  next__QKAH=((__POINTER *)result__SKAH)[ 0];
-                  if ((next__QKAH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SKAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__P43G <<  1)) <=  4096)) {
-                      next__QKAH=(void *)((unsigned long)result__SKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P43G)));
+                  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)));
                     } else {
-                      next__QKAH=new_lab__2QJ(new_size__P43G);
+                      next__5OCH=new_lab__ARJ(new_size__XBAH);
                     };
-                    ((__POINTER *)next__QKAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__RKAH)[ 0]=next__QKAH;
+                    ((__POINTER *)next__5OCH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__APCH)[ 0]=next__5OCH;
                   } else {
-                    ((__POINTER *)result__SKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__SKAH=next__QKAH;
+                    ((__POINTER *)result__BPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__BPCH=next__5OCH;
                   };
                 };
-                ptr__L43G=result__SKAH;
+                ptr__TBAH=result__BPCH;
               } else {
-                t__Q43G=((__UINTEGER_32 )typ_id__M43G);
-                a__R43G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__ZKAH=(__UINTEGER_32)((__UINTEGER_32)(sz__N43G + a__R43G) & (__UINTEGER_32)(~ a__R43G));
-                ptr_table__WKAH=((__POINTER )(&(table_type[(t__Q43G)])));
-                lab_type__YKAH=(__UINTEGER_32)(t__Q43G |  1);
-                next__VKAH=((__POINTER )(NULL));
-                result__XKAH=((__POINTER *)ptr_table__WKAH)[ 0];
-                if ((result__XKAH == (void *)NULL)) {
-                  result__XKAH=new_lab__2QJ(lab_type__YKAH);
-                  next__VKAH=(void *)((unsigned long)result__XKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZKAH)));
-                  ((__POINTER *)next__VKAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WKAH)[ 0]=next__VKAH;
+                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;
                 } else {
-                  next__VKAH=((__POINTER *)result__XKAH)[ 0];
-                  if ((next__VKAH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XKAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZKAH <<  1)) <=  4096)) {
-                      next__VKAH=(void *)((unsigned long)result__XKAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZKAH)));
+                  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)));
                     } else {
-                      next__VKAH=new_lab__2QJ(lab_type__YKAH);
+                      next__EPCH=new_lab__ARJ(lab_type__HPCH);
                     };
-                    ((__POINTER *)next__VKAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__WKAH)[ 0]=next__VKAH;
+                    ((__POINTER *)next__EPCH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__FPCH)[ 0]=next__EPCH;
                   } else {
-                    ((__POINTER *)result__XKAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VKAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__XKAH=next__VKAH;
+                    ((__POINTER *)result__GPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__GPCH=next__EPCH;
                   };
                 };
-                ptr__L43G=result__XKAH;
+                ptr__TBAH=result__GPCH;
               };
-              result__K43G=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__L43G);
-              *(result__K43G) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
-            };
-            Self__S43G=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__K43G);
-            Self__S43G->item__KVHD=i__T43G;
-            Self__S43G->next__2NOD=NULL;
-            Self__L32G->first_link__UTEC=result__K43G;
-            Self__L32G->parent_linked_collection__LD.upper__PCD= 1;
-            Self__L32G->last_link__3TEC=result__K43G;
-            Self__L32G->mem_idx__4TEC= 1;
-            Self__L32G->mem_lnk__AUEC=result__K43G;
-          } else {
-            result__U43G=NULL;
-            ptr__V43G=((__POINTER )(NULL));
-            typ_id__W43G= 0;
-            sz__X43G=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-            if ((sz__X43G ==  0)) {
-              result__U43G=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              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__;
             } else {
-              typ_id__W43G=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-              clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__X43G);
-              if ((typ_id__W43G == (__INTEGER)(-  1))) {
-                a__Y43G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__Z43G=(__UINTEGER_32)((__UINTEGER_32)(sz__X43G + a__Y43G) & (__UINTEGER_32)(~ a__Y43G));
-                ptr_table__1KAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z43G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__0KAH=((__POINTER )(NULL));
-                result__2KAH=((__POINTER *)ptr_table__1KAH)[ 0];
-                if ((result__2KAH == (void *)NULL)) {
-                  result__2KAH=new_lab__2QJ(new_size__Z43G);
-                  next__0KAH=(void *)((unsigned long)result__2KAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z43G)));
-                  ((__POINTER *)next__0KAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1KAH)[ 0]=next__0KAH;
+              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;
                 } else {
-                  next__0KAH=((__POINTER *)result__2KAH)[ 0];
-                  if ((next__0KAH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2KAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Z43G <<  1)) <=  4096)) {
-                      next__0KAH=(void *)((unsigned long)result__2KAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z43G)));
+                  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)));
                     } else {
-                      next__0KAH=new_lab__2QJ(new_size__Z43G);
+                      next__JPCH=new_lab__ARJ(new_size__BCAH);
                     };
-                    ((__POINTER *)next__0KAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__1KAH)[ 0]=next__0KAH;
+                    ((__POINTER *)next__JPCH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__KPCH)[ 0]=next__JPCH;
                   } else {
-                    ((__POINTER *)result__2KAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0KAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__2KAH=next__0KAH;
+                    ((__POINTER *)result__LPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__LPCH=next__JPCH;
                   };
                 };
-                ptr__V43G=result__2KAH;
+                ptr__3BAH=result__LPCH;
               } else {
-                t__043G=((__UINTEGER_32 )typ_id__W43G);
-                a__143G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__DLAH=(__UINTEGER_32)((__UINTEGER_32)(sz__X43G + a__143G) & (__UINTEGER_32)(~ a__143G));
-                ptr_table__ALAH=((__POINTER )(&(table_type[(t__043G)])));
-                lab_type__CLAH=(__UINTEGER_32)(t__043G |  1);
-                next__5KAH=((__POINTER )(NULL));
-                result__BLAH=((__POINTER *)ptr_table__ALAH)[ 0];
-                if ((result__BLAH == (void *)NULL)) {
-                  result__BLAH=new_lab__2QJ(lab_type__CLAH);
-                  next__5KAH=(void *)((unsigned long)result__BLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DLAH)));
-                  ((__POINTER *)next__5KAH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ALAH)[ 0]=next__5KAH;
+                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;
                 } else {
-                  next__5KAH=((__POINTER *)result__BLAH)[ 0];
-                  if ((next__5KAH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BLAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DLAH <<  1)) <=  4096)) {
-                      next__5KAH=(void *)((unsigned long)result__BLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DLAH)));
+                  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)));
                     } else {
-                      next__5KAH=new_lab__2QJ(lab_type__CLAH);
+                      next__OPCH=new_lab__ARJ(lab_type__RPCH);
                     };
-                    ((__POINTER *)next__5KAH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__ALAH)[ 0]=next__5KAH;
+                    ((__POINTER *)next__OPCH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__PPCH)[ 0]=next__OPCH;
                   } else {
-                    ((__POINTER *)result__BLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5KAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BLAH=next__5KAH;
+                    ((__POINTER *)result__QPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__QPCH=next__OPCH;
                   };
                 };
-                ptr__V43G=result__BLAH;
+                ptr__3BAH=result__QPCH;
               };
-              result__U43G=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__V43G);
-              *(result__U43G) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__2BAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__3BAH);
+              *(result__2BAH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            Self__243G=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__U43G);
-            Self__243G->item__KVHD=element__K32G;
-            Self__243G->next__2NOD=NULL;
-            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__L32G->last_link__3TEC)->next__2NOD=result__U43G;
-            Self__L32G->parent_linked_collection__LD.upper__PCD=(__INTEGER)(Self__L32G->parent_linked_collection__LD.upper__PCD +  1);
-            Self__L32G->last_link__3TEC=result__U43G;
+            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;
           };
-          while_do__SRSB:
+          while_do__WRSB:
           {
-            result__ELAH=FALSE__;
-            if ((! read_space__NRD())) {
-              result__ELAH=FALSE__;
+            result__TPCH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__TPCH=FALSE__;
             } else {
-              result__FLAH='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__FLAH=((__CHARACTER )(( 0)));
+              result__UPCH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__UPCH=((__CHARACTER )(( 0)));
               } else {
-                result__FLAH=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__UPCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__FLAH == '+')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__ELAH=TRUE__;
+              if ((result__UPCH == '+')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__TPCH=TRUE__;
               };
             };
-            if (result__ELAH) {
-              if ((! read_short_elt__1KKB())) {
-                pos__FESG=current_position__ZWF();
-                put_error__text__0MG( 0,(&__string_157));
-                put_position__EOG(pos__FESG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+            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)) {
                   exit(( 1));
                 };
               };
-              Self__PTEC=((__LINKED_LISToSTRING_CONSTANTo *)def__WREB);
-              element__QTEC=last_string__YZC;
-              if (((void *)Self__PTEC->first_link__UTEC == (void *)NULL)) {
-                i__H53G=last_string__YZC;
-                result__443G=NULL;
-                ptr__543G=((__POINTER )(NULL));
-                typ_id__A53G= 0;
-                sz__B53G=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-                if ((sz__B53G ==  0)) {
-                  result__443G=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              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__;
                 } else {
-                  typ_id__A53G=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__B53G);
-                  if ((typ_id__A53G == (__INTEGER)(-  1))) {
-                    a__C53G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__D53G=(__UINTEGER_32)((__UINTEGER_32)(sz__B53G + a__C53G) & (__UINTEGER_32)(~ a__C53G));
-                    ptr_table__ILAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D53G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__HLAH=((__POINTER )(NULL));
-                    result__JLAH=((__POINTER *)ptr_table__ILAH)[ 0];
-                    if ((result__JLAH == (void *)NULL)) {
-                      result__JLAH=new_lab__2QJ(new_size__D53G);
-                      next__HLAH=(void *)((unsigned long)result__JLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D53G)));
-                      ((__POINTER *)next__HLAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__ILAH)[ 0]=next__HLAH;
+                  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;
                     } else {
-                      next__HLAH=((__POINTER *)result__JLAH)[ 0];
-                      if ((next__HLAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JLAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__D53G <<  1)) <=  4096)) {
-                          next__HLAH=(void *)((unsigned long)result__JLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D53G)));
+                      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)));
                         } else {
-                          next__HLAH=new_lab__2QJ(new_size__D53G);
+                          next__WPCH=new_lab__ARJ(new_size__LCAH);
                         };
-                        ((__POINTER *)next__HLAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__ILAH)[ 0]=next__HLAH;
+                        ((__POINTER *)next__WPCH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__XPCH)[ 0]=next__WPCH;
                       } else {
-                        ((__POINTER *)result__JLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__JLAH=next__HLAH;
+                        ((__POINTER *)result__YPCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WPCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__YPCH=next__WPCH;
                       };
                     };
-                    ptr__543G=result__JLAH;
+                    ptr__HCAH=result__YPCH;
                   } else {
-                    t__E53G=((__UINTEGER_32 )typ_id__A53G);
-                    a__F53G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__QLAH=(__UINTEGER_32)((__UINTEGER_32)(sz__B53G + a__F53G) & (__UINTEGER_32)(~ a__F53G));
-                    ptr_table__NLAH=((__POINTER )(&(table_type[(t__E53G)])));
-                    lab_type__PLAH=(__UINTEGER_32)(t__E53G |  1);
-                    next__MLAH=((__POINTER )(NULL));
-                    result__OLAH=((__POINTER *)ptr_table__NLAH)[ 0];
-                    if ((result__OLAH == (void *)NULL)) {
-                      result__OLAH=new_lab__2QJ(lab_type__PLAH);
-                      next__MLAH=(void *)((unsigned long)result__OLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QLAH)));
-                      ((__POINTER *)next__MLAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__NLAH)[ 0]=next__MLAH;
+                    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;
                     } else {
-                      next__MLAH=((__POINTER *)result__OLAH)[ 0];
-                      if ((next__MLAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OLAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QLAH <<  1)) <=  4096)) {
-                          next__MLAH=(void *)((unsigned long)result__OLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QLAH)));
+                      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)));
                         } else {
-                          next__MLAH=new_lab__2QJ(lab_type__PLAH);
+                          next__1PCH=new_lab__ARJ(lab_type__4PCH);
                         };
-                        ((__POINTER *)next__MLAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__NLAH)[ 0]=next__MLAH;
+                        ((__POINTER *)next__1PCH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__2PCH)[ 0]=next__1PCH;
                       } else {
-                        ((__POINTER *)result__OLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__OLAH=next__MLAH;
+                        ((__POINTER *)result__3PCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__3PCH=next__1PCH;
                       };
                     };
-                    ptr__543G=result__OLAH;
+                    ptr__HCAH=result__3PCH;
                   };
-                  result__443G=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__543G);
-                  *(result__443G) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__GCAH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__HCAH);
+                  *(result__GCAH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                Self__G53G=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__443G);
-                Self__G53G->item__KVHD=i__H53G;
-                Self__G53G->next__2NOD=NULL;
-                Self__PTEC->first_link__UTEC=result__443G;
-                Self__PTEC->parent_linked_collection__LD.upper__PCD= 1;
-                Self__PTEC->last_link__3TEC=result__443G;
-                Self__PTEC->mem_idx__4TEC= 1;
-                Self__PTEC->mem_lnk__AUEC=result__443G;
+                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;
               } else {
-                result__QOED=NULL;
-                ptr__ROED=((__POINTER )(NULL));
-                typ_id__WOED= 0;
-                sz__TOED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-                if ((sz__TOED ==  0)) {
-                  result__QOED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                result__UOED=NULL;
+                ptr__VOED=((__POINTER )(NULL));
+                typ_id__0OED= 0;
+                sz__XOED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__XOED ==  0)) {
+                  result__UOED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  typ_id__WOED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__TOED);
-                  if ((typ_id__WOED == (__INTEGER)(-  1))) {
-                    a__EW1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__FW1G=(__UINTEGER_32)((__UINTEGER_32)(sz__TOED + a__EW1G) & (__UINTEGER_32)(~ a__EW1G));
-                    ptr_table__SLAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FW1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__RLAH=((__POINTER )(NULL));
-                    result__TLAH=((__POINTER *)ptr_table__SLAH)[ 0];
-                    if ((result__TLAH == (void *)NULL)) {
-                      result__TLAH=new_lab__2QJ(new_size__FW1G);
-                      next__RLAH=(void *)((unsigned long)result__TLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FW1G)));
-                      ((__POINTER *)next__RLAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__SLAH)[ 0]=next__RLAH;
+                  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;
                     } else {
-                      next__RLAH=((__POINTER *)result__TLAH)[ 0];
-                      if ((next__RLAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TLAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FW1G <<  1)) <=  4096)) {
-                          next__RLAH=(void *)((unsigned long)result__TLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FW1G)));
+                      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)));
                         } else {
-                          next__RLAH=new_lab__2QJ(new_size__FW1G);
+                          next__AQCH=new_lab__ARJ(new_size__ZW3G);
                         };
-                        ((__POINTER *)next__RLAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__SLAH)[ 0]=next__RLAH;
+                        ((__POINTER *)next__AQCH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BQCH)[ 0]=next__AQCH;
                       } else {
-                        ((__POINTER *)result__TLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__TLAH=next__RLAH;
+                        ((__POINTER *)result__CQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__CQCH=next__AQCH;
                       };
                     };
-                    ptr__ROED=result__TLAH;
+                    ptr__VOED=result__CQCH;
                   } else {
-                    t__JW1G=((__UINTEGER_32 )typ_id__WOED);
-                    a__IW1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__0LAH=(__UINTEGER_32)((__UINTEGER_32)(sz__TOED + a__IW1G) & (__UINTEGER_32)(~ a__IW1G));
-                    ptr_table__XLAH=((__POINTER )(&(table_type[(t__JW1G)])));
-                    lab_type__ZLAH=(__UINTEGER_32)(t__JW1G |  1);
-                    next__WLAH=((__POINTER )(NULL));
-                    result__YLAH=((__POINTER *)ptr_table__XLAH)[ 0];
-                    if ((result__YLAH == (void *)NULL)) {
-                      result__YLAH=new_lab__2QJ(lab_type__ZLAH);
-                      next__WLAH=(void *)((unsigned long)result__YLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LAH)));
-                      ((__POINTER *)next__WLAH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__XLAH)[ 0]=next__WLAH;
+                    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;
                     } else {
-                      next__WLAH=((__POINTER *)result__YLAH)[ 0];
-                      if ((next__WLAH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YLAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0LAH <<  1)) <=  4096)) {
-                          next__WLAH=(void *)((unsigned long)result__YLAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LAH)));
+                      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)));
                         } else {
-                          next__WLAH=new_lab__2QJ(lab_type__ZLAH);
+                          next__FQCH=new_lab__ARJ(lab_type__IQCH);
                         };
-                        ((__POINTER *)next__WLAH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__XLAH)[ 0]=next__WLAH;
+                        ((__POINTER *)next__FQCH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__GQCH)[ 0]=next__FQCH;
                       } else {
-                        ((__POINTER *)result__YLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__YLAH=next__WLAH;
+                        ((__POINTER *)result__HQCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__HQCH=next__FQCH;
                       };
                     };
-                    ptr__ROED=result__YLAH;
+                    ptr__VOED=result__HQCH;
                   };
-                  result__QOED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__ROED);
-                  *(result__QOED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__UOED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__VOED);
+                  *(result__UOED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                Self__QKSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__QOED);
-                Self__QKSD->item__KVHD=element__QTEC;
-                Self__QKSD->next__2NOD=NULL;
-                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__PTEC->last_link__3TEC)->next__2NOD=result__QOED;
-                Self__PTEC->parent_linked_collection__LD.upper__PCD=(__INTEGER)(Self__PTEC->parent_linked_collection__LD.upper__PCD +  1);
-                Self__PTEC->last_link__3TEC=result__QOED;
+                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;
               };
-              goto while_do__SRSB;
+              goto while_do__WRSB;
             };
           };
         };
-        if ((! result__YREB)) {
-          pos__HESG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_158));
-          put_position__EOG(pos__HESG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        result__LGG=FALSE__;
-        if ((! read_space__NRD())) {
-          result__LGG=FALSE__;
+        result__PGG=FALSE__;
+        if ((! read_space__RRD())) {
+          result__PGG=FALSE__;
         } else {
-          result__JKZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__JKZG=((__CHARACTER )(( 0)));
+          result__TJ1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__TJ1G=((__CHARACTER )(( 0)));
           } else {
-            result__JKZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__TJ1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__JKZG == ';')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__LGG=TRUE__;
+          if ((result__TJ1G == ';')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__PGG=TRUE__;
           };
         };
-        if ((! result__LGG)) {
-          pos__JESG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_159));
-          put_position__EOG(pos__JESG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        goto while_do__TJF;
+        goto while_do__XJF;
       };
     };
-    read_space__NRD();
-    result__OCZG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__OCZG=((__CHARACTER )(( 0)));
+    read_space__RRD();
+    result__OB1G='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__OB1G=((__CHARACTER )(( 0)));
     } else {
-      result__OCZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__OB1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__OCZG != ((__CHARACTER )(( 0))))) {
-      pos__LESG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_160));
-      put_position__EOG(pos__LESG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
-    object__ZAC=NULL;
+    object__3AC=NULL;
   };
-  index_count__X4=(__INTEGER)(index_count__X4 +  1);
-  fast_put__to__I1R(result__3NC,(&__string_2));
-  result__2XB=NULL;
-  ptr__3XB=((__POINTER )(NULL));
-  typ_id__CYB= 0;
-  sz__5XB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
-  if ((sz__5XB ==  0)) {
-    result__2XB=FAST_ARRAYoSLOTo__;
+  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__;
   } else {
-    typ_id__CYB=__FAST_ARRAYoSLOTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__5XB);
-    if ((typ_id__CYB == (__INTEGER)(-  1))) {
-      a__O32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__P32G=(__UINTEGER_32)((__UINTEGER_32)(sz__5XB + a__O32G) & (__UINTEGER_32)(~ a__O32G));
-      ptr_table__2LAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P32G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__1LAH=((__POINTER )(NULL));
-      result__3LAH=((__POINTER *)ptr_table__2LAH)[ 0];
-      if ((result__3LAH == (void *)NULL)) {
-        result__3LAH=new_lab__2QJ(new_size__P32G);
-        next__1LAH=(void *)((unsigned long)result__3LAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P32G)));
-        ((__POINTER *)next__1LAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2LAH)[ 0]=next__1LAH;
-      } else {
-        next__1LAH=((__POINTER *)result__3LAH)[ 0];
-        if ((next__1LAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3LAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__P32G <<  1)) <=  4096)) {
-            next__1LAH=(void *)((unsigned long)result__3LAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P32G)));
-          } else {
-            next__1LAH=new_lab__2QJ(new_size__P32G);
-          };
-          ((__POINTER *)next__1LAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2LAH)[ 0]=next__1LAH;
-        } else {
-          ((__POINTER *)result__3LAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1LAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3LAH=next__1LAH;
-        };
-      };
-      ptr__3XB=result__3LAH;
-    } else {
-      t__T32G=((__UINTEGER_32 )typ_id__CYB);
-      a__S32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__EMAH=(__UINTEGER_32)((__UINTEGER_32)(sz__5XB + a__S32G) & (__UINTEGER_32)(~ a__S32G));
-      ptr_table__BMAH=((__POINTER )(&(table_type[(t__T32G)])));
-      lab_type__DMAH=(__UINTEGER_32)(t__T32G |  1);
-      next__AMAH=((__POINTER )(NULL));
-      result__CMAH=((__POINTER *)ptr_table__BMAH)[ 0];
-      if ((result__CMAH == (void *)NULL)) {
-        result__CMAH=new_lab__2QJ(lab_type__DMAH);
-        next__AMAH=(void *)((unsigned long)result__CMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EMAH)));
-        ((__POINTER *)next__AMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BMAH)[ 0]=next__AMAH;
-      } else {
-        next__AMAH=((__POINTER *)result__CMAH)[ 0];
-        if ((next__AMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CMAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EMAH <<  1)) <=  4096)) {
-            next__AMAH=(void *)((unsigned long)result__CMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EMAH)));
-          } else {
-            next__AMAH=new_lab__2QJ(lab_type__DMAH);
-          };
-          ((__POINTER *)next__AMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BMAH)[ 0]=next__AMAH;
-        } else {
-          ((__POINTER *)result__CMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CMAH=next__AMAH;
-        };
-      };
-      ptr__3XB=result__CMAH;
-    };
-    result__2XB=((__FAST_ARRAYoSLOTo *)ptr__3XB);
-    *(result__2XB) = *(FAST_ARRAYoSLOTo__);
-  };
-  Self__1DS=((__FAST_ARRAYoSLOTo *)result__2XB);
-  if ((Self__1DS->parent_arrayed_collection__J5.capacity__EES <  1)) {
-    sz__MZ0G=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
-    result__LZ0G=((__POINTER )(NULL));
-    a__RZ0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__NZ0G=(__UINTEGER_32)((__UINTEGER_32)(sz__MZ0G + a__RZ0G) & (__UINTEGER_32)(~ a__RZ0G));
-    new_size2__OZ0G=(__UINTEGER_32)(new_size__NZ0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__OZ0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__W32G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__X32G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OZ0G + a__W32G) & (__UINTEGER_32)(~ a__W32G));
-      ptr_table__GMAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X32G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FMAH=((__POINTER )(NULL));
-      result__HMAH=((__POINTER *)ptr_table__GMAH)[ 0];
-      if ((result__HMAH == (void *)NULL)) {
-        result__HMAH=new_lab__2QJ(new_size__X32G);
-        next__FMAH=(void *)((unsigned long)result__HMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X32G)));
-        ((__POINTER *)next__FMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GMAH)[ 0]=next__FMAH;
-      } else {
-        next__FMAH=((__POINTER *)result__HMAH)[ 0];
-        if ((next__FMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HMAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__X32G <<  1)) <=  4096)) {
-            next__FMAH=(void *)((unsigned long)result__HMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X32G)));
-          } else {
-            next__FMAH=new_lab__2QJ(new_size__X32G);
-          };
-          ((__POINTER *)next__FMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GMAH)[ 0]=next__FMAH;
-        } else {
-          ((__POINTER *)result__HMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HMAH=next__FMAH;
-        };
-      };
-      ((__POINTER *)result__HMAH)[ 0]=((__POINTER ) 3);
-      result__LZ0G=(void *)((unsigned long)result__HMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__KMAH=first_free__HDVB;
-      while ((((void *)result__KMAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KMAH)->map_size_and_id__YSB &  4294967292LU) < new_size__NZ0G))) {
-        result__KMAH=((__MEMORY *)result__KMAH)->map_next_free__ZSB;
-      };
-      if (((void *)result__KMAH == (void *)NULL)) {
-        result__KMAH=new_page__454();
-      };
-      to_busy__index__DTFC(result__KMAH,new_size__NZ0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KMAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-      result__LZ0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KMAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__2H1C=((void **)result__LZ0G);
-    Self__5JWD= 0;
-    while ((Self__5JWD >=  0)) {
-      Result__2H1C[Self__5JWD]=NULL;
-      Self__5JWD=(__INTEGER)(Self__5JWD -  1);
-    };
-    Self__1DS->parent_arrayed_collection__J5.capacity__EES= 1;
-  };
-  create__with__CQB(TYPE_NULL__, 0);
-  fast_put__to__I1R(result__3NC,(&__string_3));
-  create__with__CQB(TYPE_VOID__, 0);
-  fast_put__to__I1R(result__3NC,(&__string_45));
-  create__with__CQB(TYPE_CONTEXT__, 1);
-  result__41B=NULL;
-  ptr__51B=((__POINTER )(NULL));
-  typ_id__E2B= 0;
-  sz__B2B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
-  if ((sz__B2B ==  0)) {
-    result__41B=FAST_ARRAYoTYPE_IDo__;
+    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__;
   } else {
-    typ_id__E2B=__FAST_ARRAYoTYPE_IDo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__B2B);
-    if ((typ_id__E2B == (__INTEGER)(-  1))) {
-      a__332G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__432G=(__UINTEGER_32)((__UINTEGER_32)(sz__B2B + a__332G) & (__UINTEGER_32)(~ a__332G));
-      ptr_table__OMAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__432G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__NMAH=((__POINTER )(NULL));
-      result__PMAH=((__POINTER *)ptr_table__OMAH)[ 0];
-      if ((result__PMAH == (void *)NULL)) {
-        result__PMAH=new_lab__2QJ(new_size__432G);
-        next__NMAH=(void *)((unsigned long)result__PMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__432G)));
-        ((__POINTER *)next__NMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OMAH)[ 0]=next__NMAH;
-      } else {
-        next__NMAH=((__POINTER *)result__PMAH)[ 0];
-        if ((next__NMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PMAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__432G <<  1)) <=  4096)) {
-            next__NMAH=(void *)((unsigned long)result__PMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__432G)));
-          } else {
-            next__NMAH=new_lab__2QJ(new_size__432G);
-          };
-          ((__POINTER *)next__NMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OMAH)[ 0]=next__NMAH;
-        } else {
-          ((__POINTER *)result__PMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PMAH=next__NMAH;
-        };
-      };
-      ptr__51B=result__PMAH;
-    } else {
-      t__C42G=((__UINTEGER_32 )typ_id__E2B);
-      a__B42G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__WMAH=(__UINTEGER_32)((__UINTEGER_32)(sz__B2B + a__B42G) & (__UINTEGER_32)(~ a__B42G));
-      ptr_table__TMAH=((__POINTER )(&(table_type[(t__C42G)])));
-      lab_type__VMAH=(__UINTEGER_32)(t__C42G |  1);
-      next__SMAH=((__POINTER )(NULL));
-      result__UMAH=((__POINTER *)ptr_table__TMAH)[ 0];
-      if ((result__UMAH == (void *)NULL)) {
-        result__UMAH=new_lab__2QJ(lab_type__VMAH);
-        next__SMAH=(void *)((unsigned long)result__UMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMAH)));
-        ((__POINTER *)next__SMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TMAH)[ 0]=next__SMAH;
-      } else {
-        next__SMAH=((__POINTER *)result__UMAH)[ 0];
-        if ((next__SMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UMAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WMAH <<  1)) <=  4096)) {
-            next__SMAH=(void *)((unsigned long)result__UMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMAH)));
-          } else {
-            next__SMAH=new_lab__2QJ(lab_type__VMAH);
-          };
-          ((__POINTER *)next__SMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TMAH)[ 0]=next__SMAH;
-        } else {
-          ((__POINTER *)result__UMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UMAH=next__SMAH;
-        };
-      };
-      ptr__51B=result__UMAH;
-    };
-    result__41B=((__FAST_ARRAYoTYPE_IDo *)ptr__51B);
-    *(result__41B) = *(FAST_ARRAYoTYPE_IDo__);
-  };
-  Self__0GS=((__FAST_ARRAYoTYPE_IDo *)result__41B);
-  if ((Self__0GS->parent_arrayed_collection__IAB.capacity__E4R <  3)) {
-    Self__0GS->parent_arrayed_collection__IAB.storage__A5R=create__SYNB( 3);
-    Self__0GS->parent_arrayed_collection__IAB.capacity__E4R= 3;
-  };
-  Self__0GS->parent_arrayed_collection__IAB.upper__C4R=(__INTEGER)(-  1);
-  list_id__KAB=result__41B;
-  result__I53G=NULL;
-  ptr__J53G=((__POINTER )(NULL));
-  typ_id__K53G= 0;
-  sz__L53G=((__UINTEGER_32 )sizeof(__TYPE_ID));
-  if ((sz__L53G ==  0)) {
-    result__I53G=TYPE_ID__;
+    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__;
   } else {
-    typ_id__K53G=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__L53G);
-    if ((typ_id__K53G == (__INTEGER)(-  1))) {
-      a__M53G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__N53G=(__UINTEGER_32)((__UINTEGER_32)(sz__L53G + a__M53G) & (__UINTEGER_32)(~ a__M53G));
-      ptr_table__YMAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N53G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__XMAH=((__POINTER )(NULL));
-      result__ZMAH=((__POINTER *)ptr_table__YMAH)[ 0];
-      if ((result__ZMAH == (void *)NULL)) {
-        result__ZMAH=new_lab__2QJ(new_size__N53G);
-        next__XMAH=(void *)((unsigned long)result__ZMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N53G)));
-        ((__POINTER *)next__XMAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YMAH)[ 0]=next__XMAH;
-      } else {
-        next__XMAH=((__POINTER *)result__ZMAH)[ 0];
-        if ((next__XMAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZMAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__N53G <<  1)) <=  4096)) {
-            next__XMAH=(void *)((unsigned long)result__ZMAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N53G)));
-          } else {
-            next__XMAH=new_lab__2QJ(new_size__N53G);
-          };
-          ((__POINTER *)next__XMAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YMAH)[ 0]=next__XMAH;
-        } else {
-          ((__POINTER *)result__ZMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZMAH=next__XMAH;
-        };
-      };
-      ptr__J53G=result__ZMAH;
-    } else {
-      t__O53G=((__UINTEGER_32 )typ_id__K53G);
-      a__P53G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ANAH=(__UINTEGER_32)((__UINTEGER_32)(sz__L53G + a__P53G) & (__UINTEGER_32)(~ a__P53G));
-      ptr_table__3MAH=((__POINTER )(&(table_type[(t__O53G)])));
-      lab_type__5MAH=(__UINTEGER_32)(t__O53G |  1);
-      next__2MAH=((__POINTER )(NULL));
-      result__4MAH=((__POINTER *)ptr_table__3MAH)[ 0];
-      if ((result__4MAH == (void *)NULL)) {
-        result__4MAH=new_lab__2QJ(lab_type__5MAH);
-        next__2MAH=(void *)((unsigned long)result__4MAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ANAH)));
-        ((__POINTER *)next__2MAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3MAH)[ 0]=next__2MAH;
-      } else {
-        next__2MAH=((__POINTER *)result__4MAH)[ 0];
-        if ((next__2MAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4MAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ANAH <<  1)) <=  4096)) {
-            next__2MAH=(void *)((unsigned long)result__4MAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ANAH)));
-          } else {
-            next__2MAH=new_lab__2QJ(lab_type__5MAH);
-          };
-          ((__POINTER *)next__2MAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3MAH)[ 0]=next__2MAH;
-        } else {
-          ((__POINTER *)result__4MAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2MAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4MAH=next__2MAH;
-        };
-      };
-      ptr__J53G=result__4MAH;
-    };
-    result__I53G=((__TYPE_ID *)ptr__J53G);
-    *(result__I53G) = *(TYPE_ID__);
-  };
-  create__with__CQB(((__TYPE_ID *)result__I53G), 0);
-  add_last__43R(result__41B,result__I53G);
-  result__Q3B=NULL;
-  ptr__R3B=((__POINTER )(NULL));
-  typ_id__W3B= 0;
-  sz__T3B=((__UINTEGER_32 )sizeof(__TYPE_ID));
-  if ((sz__T3B ==  0)) {
-    result__Q3B=TYPE_ID__;
+    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__;
   } else {
-    typ_id__W3B=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__T3B);
-    if ((typ_id__W3B == (__INTEGER)(-  1))) {
-      a__DL1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__EL1G=(__UINTEGER_32)((__UINTEGER_32)(sz__T3B + a__DL1G) & (__UINTEGER_32)(~ a__DL1G));
-      ptr_table__CNAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EL1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__BNAH=((__POINTER )(NULL));
-      result__DNAH=((__POINTER *)ptr_table__CNAH)[ 0];
-      if ((result__DNAH == (void *)NULL)) {
-        result__DNAH=new_lab__2QJ(new_size__EL1G);
-        next__BNAH=(void *)((unsigned long)result__DNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EL1G)));
-        ((__POINTER *)next__BNAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CNAH)[ 0]=next__BNAH;
-      } else {
-        next__BNAH=((__POINTER *)result__DNAH)[ 0];
-        if ((next__BNAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DNAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EL1G <<  1)) <=  4096)) {
-            next__BNAH=(void *)((unsigned long)result__DNAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EL1G)));
-          } else {
-            next__BNAH=new_lab__2QJ(new_size__EL1G);
-          };
-          ((__POINTER *)next__BNAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CNAH)[ 0]=next__BNAH;
-        } else {
-          ((__POINTER *)result__DNAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BNAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DNAH=next__BNAH;
-        };
-      };
-      ptr__R3B=result__DNAH;
-    } else {
-      t__IL1G=((__UINTEGER_32 )typ_id__W3B);
-      a__HL1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__KNAH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3B + a__HL1G) & (__UINTEGER_32)(~ a__HL1G));
-      ptr_table__HNAH=((__POINTER )(&(table_type[(t__IL1G)])));
-      lab_type__JNAH=(__UINTEGER_32)(t__IL1G |  1);
-      next__GNAH=((__POINTER )(NULL));
-      result__INAH=((__POINTER *)ptr_table__HNAH)[ 0];
-      if ((result__INAH == (void *)NULL)) {
-        result__INAH=new_lab__2QJ(lab_type__JNAH);
-        next__GNAH=(void *)((unsigned long)result__INAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KNAH)));
-        ((__POINTER *)next__GNAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HNAH)[ 0]=next__GNAH;
-      } else {
-        next__GNAH=((__POINTER *)result__INAH)[ 0];
-        if ((next__GNAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__INAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KNAH <<  1)) <=  4096)) {
-            next__GNAH=(void *)((unsigned long)result__INAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KNAH)));
-          } else {
-            next__GNAH=new_lab__2QJ(lab_type__JNAH);
-          };
-          ((__POINTER *)next__GNAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HNAH)[ 0]=next__GNAH;
-        } else {
-          ((__POINTER *)result__INAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GNAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__INAH=next__GNAH;
-        };
-      };
-      ptr__R3B=result__INAH;
-    };
-    result__Q3B=((__TYPE_ID *)ptr__R3B);
-    *(result__Q3B) = *(TYPE_ID__);
-  };
-  create__with__CQB(((__TYPE_ID *)result__Q3B), 0);
-  add_last__43R(list_id__KAB,result__Q3B);
+    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);
   if (is_short_recursive__JB) {
-    directory_list__YB=create__BBB( 100);
-    file_list__0B=create__BBB( 100);
-    current_list__2B=create__BBB( 100);
+    directory_list__YB=create__EBB( 100);
+    file_list__0B=create__EBB( 100);
+    current_list__2B=create__EBB( 100);
     __tmp__4B=input_name__3B;
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    ent__TB=get_entry__D0AC(__tmp__4B);
+    ent__TB=get_entry__H0AC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__YHSD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__0HSD=Self__YHSD;
-        __tmp__FC=((void *)Self__YHSD != (void *)NULL);
+        Self__2HSD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__4HSD=Self__2HSD;
+        __tmp__FC=((void *)Self__2HSD != (void *)NULL);
       } else {
-        dir__CISD=NULL;
+        dir__GISD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
     };
     if (__tmp__JC) {
-      print__GHD((&__string_161));
-      print__GHD(input_name__3B);
-      print__GHD((&__string_162));
+      print__KHD((&__string_162));
+      print__KHD(input_name__3B);
+      print__KHD((&__string_163));
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__JERD(ent__TB);
+      __tmp__UC=open__NERD(ent__TB);
     } else {
-      Self__OIRD=((__FILE_UNIX *)ent__TB);
-      Self__OIRD->stream__UIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__OIRD->parent_entry_unix__MCF.parent_entry__IED.path__BD)->storage__FQO),"r+b")));
-      __tmp__UC=(Self__OIRD->stream__UIRD != (void *)NULL);
+      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);
     };
     if ((! __tmp__UC)) {
-      print__GHD((&__string_161));
-      print__GHD(input_name__3B);
-      print__GHD((&__string_163));
+      print__KHD((&__string_162));
+      print__KHD(input_name__3B);
+      print__KHD((&__string_164));
       exit(( 1));
     };
     if (ent__TB==NULL) {
@@ -7071,17819 +7106,18728 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    check_in__begin__OQQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__JED.parent_entry__IED.path__BD)->count__DD +  1));
-    Self__Q53G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-    result__U53G= 0;
-    __tmp__W53G=((__STRING_CONSTANT *)(&__string_142))->count__DD;
-    Self__X53G= 1;
-    while ((Self__X53G <= __tmp__W53G)) {
-      result__U53G=(__INTEGER)((__INTEGER)( 5 * result__U53G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_142))->storage__FQO)[(__INTEGER)(Self__X53G -  1)])));
-      Self__X53G=(__INTEGER)(Self__X53G +  1);
-    };
-    if ((result__U53G <  0)) {
-      result__U53G=(__INTEGER)(~ result__U53G);
-    };
-    node__S53G=((void **)Self__Q53G->buckets__PCT)[(__INTEGER)(result__U53G % Self__Q53G->capacity__KCT)];
-    while ((! (((void *)node__S53G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__S53G)->key__1CT == (void *)(&__string_142))))) {
-      node__S53G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__S53G)->next__GDT;
-    };
-    if (((void *)node__S53G != (void *)NULL)) {
-      Self__D42G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-      result__Z53G= 0;
-      __tmp__153G=((__STRING_CONSTANT *)(&__string_142))->count__DD;
-      Self__253G= 1;
-      while ((Self__253G <= __tmp__153G)) {
-        result__Z53G=(__INTEGER)((__INTEGER)( 5 * result__Z53G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_142))->storage__FQO)[(__INTEGER)(Self__253G -  1)])));
-        Self__253G=(__INTEGER)(Self__253G +  1);
-      };
-      if ((result__Z53G <  0)) {
-        result__Z53G=(__INTEGER)(~ result__Z53G);
-      };
-      node__F42G=((void **)Self__D42G->buckets__PCT)[(__INTEGER)(result__Z53G % Self__D42G->capacity__KCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__F42G)->key__1CT != (void *)(&__string_142))) {
-        node__F42G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__F42G)->next__GDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__F42G)->item__XX3)->first_link__UTEC)->item__KVHD;
-      Self__SGSG=((__STRING_CONSTANT *)txt__1);
-      new__TGSG=create__BBB(Self__SGSG->count__DD);
-      copy__JCS(new__TGSG,Self__SGSG);
-      save_file__with__5CC(add_ext__UAF((&__string_142)),new__TGSG);
-    };
-    Self__453G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-    result__CA4G= 0;
-    __tmp__EA4G=((__STRING_CONSTANT *)(&__string_66))->count__DD;
-    Self__FA4G= 1;
-    while ((Self__FA4G <= __tmp__EA4G)) {
-      result__CA4G=(__INTEGER)((__INTEGER)( 5 * result__CA4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__FQO)[(__INTEGER)(Self__FA4G -  1)])));
-      Self__FA4G=(__INTEGER)(Self__FA4G +  1);
-    };
-    if ((result__CA4G <  0)) {
-      result__CA4G=(__INTEGER)(~ result__CA4G);
-    };
-    node__AA4G=((void **)Self__453G->buckets__PCT)[(__INTEGER)(result__CA4G % Self__453G->capacity__KCT)];
-    while ((! (((void *)node__AA4G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AA4G)->key__1CT == (void *)(&__string_66))))) {
-      node__AA4G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AA4G)->next__GDT;
-    };
-    if (((void *)node__AA4G != (void *)NULL)) {
-      Self__H42G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-      result__HA4G= 0;
-      __tmp__JA4G=((__STRING_CONSTANT *)(&__string_66))->count__DD;
-      Self__KA4G= 1;
-      while ((Self__KA4G <= __tmp__JA4G)) {
-        result__HA4G=(__INTEGER)((__INTEGER)( 5 * result__HA4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__FQO)[(__INTEGER)(Self__KA4G -  1)])));
-        Self__KA4G=(__INTEGER)(Self__KA4G +  1);
-      };
-      if ((result__HA4G <  0)) {
-        result__HA4G=(__INTEGER)(~ result__HA4G);
-      };
-      node__J42G=((void **)Self__H42G->buckets__PCT)[(__INTEGER)(result__HA4G % Self__H42G->capacity__KCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__J42G)->key__1CT != (void *)(&__string_66))) {
-        node__J42G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__J42G)->next__GDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__J42G)->item__XX3)->first_link__UTEC)->item__KVHD;
-      Self__UGSG=((__STRING_CONSTANT *)txt__1);
-      new__VGSG=create__BBB(Self__UGSG->count__DD);
-      copy__JCS(new__VGSG,Self__UGSG);
-      save_file__with__5CC(add_ext__UAF((&__string_66)),new__VGSG);
-    };
-    Self__MA4G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-    result__QA4G= 0;
-    __tmp__SA4G=((__STRING_CONSTANT *)(&__string_143))->count__DD;
-    Self__TA4G= 1;
-    while ((Self__TA4G <= __tmp__SA4G)) {
-      result__QA4G=(__INTEGER)((__INTEGER)( 5 * result__QA4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_143))->storage__FQO)[(__INTEGER)(Self__TA4G -  1)])));
-      Self__TA4G=(__INTEGER)(Self__TA4G +  1);
-    };
-    if ((result__QA4G <  0)) {
-      result__QA4G=(__INTEGER)(~ result__QA4G);
-    };
-    node__OA4G=((void **)Self__MA4G->buckets__PCT)[(__INTEGER)(result__QA4G % Self__MA4G->capacity__KCT)];
-    while ((! (((void *)node__OA4G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__OA4G)->key__1CT == (void *)(&__string_143))))) {
-      node__OA4G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__OA4G)->next__GDT;
-    };
-    if (((void *)node__OA4G != (void *)NULL)) {
-      Self__L42G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-      result__VA4G= 0;
-      __tmp__XA4G=((__STRING_CONSTANT *)(&__string_143))->count__DD;
-      Self__YA4G= 1;
-      while ((Self__YA4G <= __tmp__XA4G)) {
-        result__VA4G=(__INTEGER)((__INTEGER)( 5 * result__VA4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_143))->storage__FQO)[(__INTEGER)(Self__YA4G -  1)])));
-        Self__YA4G=(__INTEGER)(Self__YA4G +  1);
-      };
-      if ((result__VA4G <  0)) {
-        result__VA4G=(__INTEGER)(~ result__VA4G);
-      };
-      node__N42G=((void **)Self__L42G->buckets__PCT)[(__INTEGER)(result__VA4G % Self__L42G->capacity__KCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__N42G)->key__1CT != (void *)(&__string_143))) {
-        node__N42G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__N42G)->next__GDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__N42G)->item__XX3)->first_link__UTEC)->item__KVHD;
-      Self__5Z0G=((__STRING *)directory_list__YB);
-      i__A00G=Self__5Z0G->count__GFC;
-      j__C00G=((__STRING_CONSTANT *)txt__1)->count__DD;
-      resize__IXZ(Self__5Z0G,(__INTEGER)(i__A00G + j__C00G));
-      if (((i__A00G >  0) && (j__C00G >  0))) {
-        move__to__by__RVCC(Self__5Z0G->storage__RBS, 0,(__INTEGER)(i__A00G -  1),j__C00G);
-      };
-      Self__R42G=((__CHARACTER *)Self__5Z0G->storage__RBS);
-      model__S42G=((__STRING_CONSTANT *)txt__1)->storage__FQO;
-      Self__Q42G=(__INTEGER)(j__C00G -  1);
-      while ((Self__Q42G >=  0)) {
-        Self__R42G[Self__Q42G]=((__CHARACTER *)model__S42G)[Self__Q42G];
-        Self__Q42G=(__INTEGER)(Self__Q42G -  1);
-      };
-    };
-    Self__NVVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-    result__0A4G= 0;
-    __tmp__2A4G=((__STRING_CONSTANT *)(&__string_145))->count__DD;
-    Self__3A4G= 1;
-    while ((Self__3A4G <= __tmp__2A4G)) {
-      result__0A4G=(__INTEGER)((__INTEGER)( 5 * result__0A4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_145))->storage__FQO)[(__INTEGER)(Self__3A4G -  1)])));
-      Self__3A4G=(__INTEGER)(Self__3A4G +  1);
-    };
-    if ((result__0A4G <  0)) {
-      result__0A4G=(__INTEGER)(~ result__0A4G);
-    };
-    node__XVVB=((void **)Self__NVVB->buckets__PCT)[(__INTEGER)(result__0A4G % Self__NVVB->capacity__KCT)];
-    while ((! (((void *)node__XVVB == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XVVB)->key__1CT,(&__string_145))))) {
-      node__XVVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__XVVB)->next__GDT;
-    };
-    if (((void *)node__XVVB != (void *)NULL)) {
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__AL4(result__1MH,(&__string_145)))->first_link__UTEC)->item__KVHD;
-      append__RNS(directory_list__YB,txt__1);
-    };
-    save_file__with__5CC(add_ext__UAF((&__string_164)),directory_list__YB);
-    Self__5A4G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-    result__DB4G= 0;
-    __tmp__FB4G=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-    Self__GB4G= 1;
-    while ((Self__GB4G <= __tmp__FB4G)) {
-      result__DB4G=(__INTEGER)((__INTEGER)( 5 * result__DB4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__FQO)[(__INTEGER)(Self__GB4G -  1)])));
-      Self__GB4G=(__INTEGER)(Self__GB4G +  1);
-    };
-    if ((result__DB4G <  0)) {
-      result__DB4G=(__INTEGER)(~ result__DB4G);
-    };
-    node__BB4G=((void **)Self__5A4G->buckets__PCT)[(__INTEGER)(result__DB4G % Self__5A4G->capacity__KCT)];
-    while ((! (((void *)node__BB4G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BB4G)->key__1CT == (void *)(&__string_146))))) {
-      node__BB4G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BB4G)->next__GDT;
-    };
-    if (((void *)node__BB4G != (void *)NULL)) {
-      Self__X42G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-      result__IB4G= 0;
-      __tmp__KB4G=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-      Self__LB4G= 1;
-      while ((Self__LB4G <= __tmp__KB4G)) {
-        result__IB4G=(__INTEGER)((__INTEGER)( 5 * result__IB4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__FQO)[(__INTEGER)(Self__LB4G -  1)])));
-        Self__LB4G=(__INTEGER)(Self__LB4G +  1);
-      };
-      if ((result__IB4G <  0)) {
-        result__IB4G=(__INTEGER)(~ result__IB4G);
-      };
-      node__Z42G=((void **)Self__X42G->buckets__PCT)[(__INTEGER)(result__IB4G % Self__X42G->capacity__KCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Z42G)->key__1CT != (void *)(&__string_146))) {
-        node__Z42G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Z42G)->next__GDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Z42G)->item__XX3)->first_link__UTEC)->item__KVHD;
-      Self__L00G=((__STRING *)file_list__0B);
-      i__M00G=Self__L00G->count__GFC;
-      j__O00G=((__STRING_CONSTANT *)txt__1)->count__DD;
-      resize__IXZ(Self__L00G,(__INTEGER)(i__M00G + j__O00G));
-      if (((i__M00G >  0) && (j__O00G >  0))) {
-        move__to__by__RVCC(Self__L00G->storage__RBS, 0,(__INTEGER)(i__M00G -  1),j__O00G);
-      };
-      Self__342G=((__CHARACTER *)Self__L00G->storage__RBS);
-      model__442G=((__STRING_CONSTANT *)txt__1)->storage__FQO;
-      Self__242G=(__INTEGER)(j__O00G -  1);
-      while ((Self__242G >=  0)) {
-        Self__342G[Self__242G]=((__CHARACTER *)model__442G)[Self__242G];
-        Self__242G=(__INTEGER)(Self__242G -  1);
-      };
-    };
-    Self__3BT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-    result__NB4G= 0;
-    __tmp__PB4G=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-    Self__QB4G= 1;
-    while ((Self__QB4G <= __tmp__PB4G)) {
-      result__NB4G=(__INTEGER)((__INTEGER)( 5 * result__NB4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__FQO)[(__INTEGER)(Self__QB4G -  1)])));
-      Self__QB4G=(__INTEGER)(Self__QB4G +  1);
-    };
-    if ((result__NB4G <  0)) {
-      result__NB4G=(__INTEGER)(~ result__NB4G);
-    };
-    node__ICT=((void **)Self__3BT->buckets__PCT)[(__INTEGER)(result__NB4G % Self__3BT->capacity__KCT)];
-    while ((! (((void *)node__ICT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ICT)->key__1CT == (void *)(&__string_148))))) {
-      node__ICT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ICT)->next__GDT;
-    };
-    if (((void *)node__ICT != (void *)NULL)) {
-      Self__D52G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__1MH);
-      result__SB4G= 0;
-      __tmp__UB4G=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-      Self__VB4G= 1;
-      while ((Self__VB4G <= __tmp__UB4G)) {
-        result__SB4G=(__INTEGER)((__INTEGER)( 5 * result__SB4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__FQO)[(__INTEGER)(Self__VB4G -  1)])));
-        Self__VB4G=(__INTEGER)(Self__VB4G +  1);
-      };
-      if ((result__SB4G <  0)) {
-        result__SB4G=(__INTEGER)(~ result__SB4G);
-      };
-      node__F52G=((void **)Self__D52G->buckets__PCT)[(__INTEGER)(result__SB4G % Self__D52G->capacity__KCT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__F52G)->key__1CT != (void *)(&__string_148))) {
-        node__F52G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__F52G)->next__GDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__F52G)->item__XX3)->first_link__UTEC)->item__KVHD;
-      append__RNS(file_list__0B,txt__1);
-    };
-    save_file__with__5CC(add_ext__UAF((&__string_165)),file_list__0B);
+    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);
   } else {
-    Self__ONAH=((__STRING_CONSTANT *)input_name__3B);
-    result__LNAH=FALSE__;
-    i1__MNAH= 0;
-    i2__NNAH= 0;
-    if ((((__STRING_CONSTANT *)(&__string_151))->count__DD <= Self__ONAH->count__DD)) {
-      i1__MNAH=(__INTEGER)((__INTEGER)(Self__ONAH->count__DD - ((__STRING_CONSTANT *)(&__string_151))->count__DD) +  1);
-      i2__NNAH= 1;
-      while ((! (((i1__MNAH > Self__ONAH->count__DD) || (i2__NNAH > ((__STRING_CONSTANT *)(&__string_151))->count__DD)) || (((__CHARACTER *)Self__ONAH->storage__FQO)[(__INTEGER)(i1__MNAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__FQO)[(__INTEGER)(i2__NNAH -  1)])))) {
-        i1__MNAH=(__INTEGER)(i1__MNAH +  1);
-        i2__NNAH=(__INTEGER)(i2__NNAH +  1);
-      };
-      result__LNAH=(i1__MNAH > Self__ONAH->count__DD);
-    };
-    if ((! result__LNAH)) {
-      copy__JCS(string_tmp__VH,input_name__3B);
-      append__RNS(string_tmp__VH,(&__string_151));
-      input_name__3B=get__YVB(string_tmp__VH);
+    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);
     };
     __tmp__2H=input_name__3B;
-    copy__JCS(string_tmp__VH,input_name__3B);
-    Self__XB4G=((__STRING *)string_tmp__VH);
-    __tmp__YB4G=Self__XB4G->storage__RBS;
-    __tmp__ZB4G=(__INTEGER)(Self__XB4G->count__GFC -  1);
-    Self__0B4G=((__CHARACTER *)__tmp__YB4G);
-    Self__1B4G=__tmp__ZB4G;
-    while ((Self__1B4G >=  0)) {
-      if (('\\' == Self__0B4G[Self__1B4G])) {
-        Self__0B4G[Self__1B4G]='/';
+    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]='/';
       };
-      Self__1B4G=(__INTEGER)(Self__1B4G -  1);
+      Self__DFAH=(__INTEGER)(Self__DFAH -  1);
     };
-    result__AC4G=((__STRING *)string_tmp__VH)->count__GFC;
-    while ((! ((result__AC4G <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__RBS)[(__INTEGER)(result__AC4G -  1)] == '/')))) {
-      result__AC4G=(__INTEGER)(result__AC4G -  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);
     };
-    if ((result__AC4G >=  1)) {
-      Self__H52G=((__STRING *)string_tmp__VH);
-      if ((result__AC4G > Self__H52G->count__GFC)) {
-        Self__H52G->count__GFC= 0;
+    if ((result__IFAH >=  1)) {
+      Self__GC5G=((__STRING *)string_tmp__VH);
+      if ((result__IFAH > Self__GC5G->count__KFC)) {
+        Self__GC5G->count__KFC= 0;
       } else {
-        if ((result__AC4G >  0)) {
-          len__FC4G=(__INTEGER)((__INTEGER)(result__AC4G -  1) +  1);
-          if ((len__FC4G >  0)) {
-            __tmp__GC4G=(__INTEGER)(result__AC4G +  1);
-            __tmp__IC4G=Self__H52G->count__GFC;
-            Self__JC4G=__tmp__GC4G;
-            while ((Self__JC4G <= __tmp__IC4G)) {
-              ((__CHARACTER *)Self__H52G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__JC4G - len__FC4G) -  1)]=((__CHARACTER *)Self__H52G->storage__RBS)[(__INTEGER)(Self__JC4G -  1)];
-              Self__JC4G=(__INTEGER)(Self__JC4G +  1);
+        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);
             };
-            Self__H52G->count__GFC=(__INTEGER)(Self__H52G->count__GFC - len__FC4G);
+            Self__GC5G->count__KFC=(__INTEGER)(Self__GC5G->count__KFC - len__NFAH);
           };
         };
       };
     };
-    result__GSC=((__STRING *)string_tmp__VH)->count__GFC;
-    while ((! ((result__GSC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__RBS)[(__INTEGER)(result__GSC -  1)] == '.')))) {
-      result__GSC=(__INTEGER)(result__GSC -  1);
+    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);
     };
-    Self__J52G=((__STRING *)string_tmp__VH);
-    n__K52G=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__GFC - result__GSC) +  1);
-    if ((n__K52G > Self__J52G->count__GFC)) {
-      Self__J52G->count__GFC= 0;
+    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;
     } else {
-      Self__J52G->count__GFC=(__INTEGER)(Self__J52G->count__GFC - n__K52G);
+      Self__IC5G->count__KFC=(__INTEGER)(Self__IC5G->count__KFC - n__JC5G);
     };
-    Self__QNAH=((__STRING *)string_tmp__VH);
-    Self__RNAH=Self__QNAH->count__GFC;
-    while ((Self__RNAH >=  1)) {
-      Self__SNAH=((__CHARACTER *)Self__QNAH->storage__RBS)[(__INTEGER)(Self__RNAH -  1)];
-      result__TNAH='\0';
-      if (((((__INTEGER_8 )Self__SNAH) <  97) || (((__INTEGER_8 )Self__SNAH) >  122))) {
-        result__TNAH=Self__SNAH;
+    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;
       } else {
-        result__TNAH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__SNAH) -  32))));
+        result__CSCH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__BSCH) -  32))));
       };
-      ((__CHARACTER *)Self__QNAH->storage__RBS)[(__INTEGER)(Self__RNAH -  1)]=result__TNAH;
-      Self__RNAH=(__INTEGER)(Self__RNAH -  1);
+      ((__CHARACTER *)Self__5RCH->storage__VBS)[(__INTEGER)(Self__ASCH -  1)]=result__CSCH;
+      Self__ASCH=(__INTEGER)(Self__ASCH -  1);
     };
-    proto_input__BI=create__name__generic_count__JAC(__tmp__2H,get__YVB(string_tmp__VH));
-    go_on__SAC(proto_input__BI);
+    proto_input__BI=create__name__generic_count__NAC(__tmp__2H,get__2VB(string_tmp__VH));
+    go_on__WAC(proto_input__BI);
     if (((void *)output_name__DI == (void *)NULL)) {
-      output_name__DI=add_ext__UAF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      output_name__DI=add_ext__YAF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
     };
-    save_file__with__5CC(output_name__DI,output_code__SI);
+    save_file__with__DDC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    Self__S0QC= 0;
-    limit_up__T0QC=result__UMJ->parent_arrayed_collection__AJ.upper__HJ;
-    while ((Self__S0QC <= limit_up__T0QC)) {
-      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__0ST)[Self__S0QC];
-      ((__STRING *)output_code__SI)->count__GFC= 0;
-      Self__GJTD=((__PROTOTYPE *)p__AB);
-      put__to__like__VYXD(Self__GJTD->parent_named__5.name__LI,output_code__SI,(&__string_134));
-      is_first__B0XD=TRUE__;
-      s__C0XD=Self__GJTD->first_slot__SFZB;
-      while (((void *)s__C0XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__C0XD)->__id==__ITM_SLOT__) {
-          __tmp__QJTD=((__ITM_SLOT *)s__C0XD)->id_section__I1C;
+    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__QJTD=((__ITM_SLOT_OPERATOR *)s__C0XD)->parent_itm_slot__4T5B.id_section__I1C;
+          __tmp__UJTD=((__ITM_SLOT_OPERATOR *)s__P0XD)->parent_itm_slot__CU5B.id_section__M1C;
         };
-        Self__KZSG=((__SECTION_ *)__tmp__QJTD);
-        if ((((void *)Self__KZSG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__KZSG->name__SYDC == (void *)(&__string_24)))) {
-          if (is_first__B0XD) {
-            put__to__like__VYXD((&__string_166),output_code__SI,(&__string_135));
-            is_first__B0XD=FALSE__;
+        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__GFC= 0;
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__C0XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__JT1E(s__C0XD,string_tmp2__R5I);
+          ((__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);
           } else {
-            pretty_name_in__4U1E(s__C0XD,string_tmp2__R5I);
+            pretty_name_in__YX1E(s__P0XD,string_tmp2__V5I);
           };
-          put__to__like__VYXD(string_tmp2__R5I,string_tmp__VH,(&__string_137));
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__C0XD)->__id==__ITM_SLOT__) {
-            __tmp__F1XD=((__ITM_SLOT *)s__C0XD)->parent_named__D5.name__LI;
+          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;
           } else {
-            __tmp__F1XD=((__ITM_SLOT_OPERATOR *)s__C0XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__S1XD=((__ITM_SLOT_OPERATOR *)s__P0XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          get_all_comment_slot__in__UW1E(Self__GJTD,__tmp__F1XD,string_tmp2__R5I);
-          put__to__like__VYXD(string_tmp2__R5I,string_tmp__VH,(&__string_138));
-          put__to__like__VYXD(string_tmp__VH,output_code__SI,(&__string_136));
+          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__C0XD)->__id==__ITM_SLOT__) {
-          __tmp__R1XD=((__ITM_SLOT *)s__C0XD)->next__4GHC;
+        if (((struct ___OBJ *)s__P0XD)->__id==__ITM_SLOT__) {
+          __tmp__41XD=((__ITM_SLOT *)s__P0XD)->next__CHHC;
         } else {
-          __tmp__R1XD=((__ITM_SLOT_OPERATOR *)s__C0XD)->parent_itm_slot__4T5B.next__4GHC;
+          __tmp__41XD=((__ITM_SLOT_OPERATOR *)s__P0XD)->parent_itm_slot__CU5B.next__CHHC;
         };
-        s__C0XD=__tmp__R1XD;
+        s__P0XD=__tmp__41XD;
       };
-      if ((! is_first__B0XD)) {
-        put__to__like__VYXD(NULL,output_code__SI,(&__string_139));
+      if ((! is_first__O0XD)) {
+        put__to__like__CZXD(NULL,output_code__SI,(&__string_140));
       };
-      is_first__A2XD=TRUE__;
-      s__B2XD=Self__GJTD->first_slot__SFZB;
-      while (((void *)s__B2XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__B2XD)->__id==__ITM_SLOT__) {
-          __tmp__ZJTD=((__ITM_SLOT *)s__B2XD)->parent_named__D5.name__LI;
+      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;
         } else {
-          __tmp__ZJTD=((__ITM_SLOT_OPERATOR *)s__B2XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+          __tmp__3JTD=((__ITM_SLOT_OPERATOR *)s__O2XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
         };
-        Self__YNAH=((__STRING_CONSTANT *)__tmp__ZJTD);
-        result__VNAH=FALSE__;
-        i__WNAH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_167))->count__DD <= Self__YNAH->count__DD)) {
-          i__WNAH=((__STRING_CONSTANT *)(&__string_167))->count__DD;
-          while ((! ((i__WNAH ==  0) || (((__CHARACTER *)Self__YNAH->storage__FQO)[(__INTEGER)(i__WNAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_167))->storage__FQO)[(__INTEGER)(i__WNAH -  1)])))) {
-            i__WNAH=(__INTEGER)(i__WNAH -  1);
+        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);
           };
-          result__VNAH=(i__WNAH ==  0);
+          result__ESCH=(i__FSCH ==  0);
         };
-        if (result__VNAH) {
-          if (is_first__A2XD) {
-            put__to__like__VYXD((&__string_168),output_code__SI,(&__string_135));
-            is_first__A2XD=FALSE__;
+        if (result__ESCH) {
+          if (is_first__N2XD) {
+            put__to__like__CZXD((&__string_169),output_code__SI,(&__string_136));
+            is_first__N2XD=FALSE__;
           };
-          ((__STRING *)string_tmp__VH)->count__GFC= 0;
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__B2XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__JT1E(s__B2XD,string_tmp2__R5I);
+          ((__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);
           } else {
-            pretty_name_in__4U1E(s__B2XD,string_tmp2__R5I);
+            pretty_name_in__YX1E(s__O2XD,string_tmp2__V5I);
           };
-          put__to__like__VYXD(string_tmp2__R5I,string_tmp__VH,(&__string_137));
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__B2XD)->__id==__ITM_SLOT__) {
-            __tmp__E3XD=((__ITM_SLOT *)s__B2XD)->parent_named__D5.name__LI;
+          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;
           } else {
-            __tmp__E3XD=((__ITM_SLOT_OPERATOR *)s__B2XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__R3XD=((__ITM_SLOT_OPERATOR *)s__O2XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          get_all_comment_slot__in__UW1E(Self__GJTD,__tmp__E3XD,string_tmp2__R5I);
-          put__to__like__VYXD(string_tmp2__R5I,string_tmp__VH,(&__string_138));
-          put__to__like__VYXD(string_tmp__VH,output_code__SI,(&__string_136));
+          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__B2XD)->__id==__ITM_SLOT__) {
-          __tmp__Q3XD=((__ITM_SLOT *)s__B2XD)->next__4GHC;
+        if (((struct ___OBJ *)s__O2XD)->__id==__ITM_SLOT__) {
+          __tmp__33XD=((__ITM_SLOT *)s__O2XD)->next__CHHC;
         } else {
-          __tmp__Q3XD=((__ITM_SLOT_OPERATOR *)s__B2XD)->parent_itm_slot__4T5B.next__4GHC;
+          __tmp__33XD=((__ITM_SLOT_OPERATOR *)s__O2XD)->parent_itm_slot__CU5B.next__CHHC;
         };
-        s__B2XD=__tmp__Q3XD;
+        s__O2XD=__tmp__33XD;
       };
-      if ((! is_first__A2XD)) {
-        put__to__like__VYXD(NULL,output_code__SI,(&__string_139));
+      if ((! is_first__N2XD)) {
+        put__to__like__CZXD(NULL,output_code__SI,(&__string_140));
       };
-      is_first__53XD=TRUE__;
-      s__A4XD=Self__GJTD->first_slot__SFZB;
-      while (((void *)s__A4XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__A4XD)->__id==__ITM_SLOT__) {
-          __tmp__CKTD=((__ITM_SLOT *)s__A4XD)->parent_named__D5.name__LI;
+      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;
         } else {
-          __tmp__CKTD=((__ITM_SLOT_OPERATOR *)s__A4XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+          __tmp__GKTD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
         };
-        Self__3NAH=((__STRING_CONSTANT *)__tmp__CKTD);
-        result__0NAH=FALSE__;
-        i__1NAH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_167))->count__DD <= Self__3NAH->count__DD)) {
-          i__1NAH=((__STRING_CONSTANT *)(&__string_167))->count__DD;
-          while ((! ((i__1NAH ==  0) || (((__CHARACTER *)Self__3NAH->storage__FQO)[(__INTEGER)(i__1NAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_167))->storage__FQO)[(__INTEGER)(i__1NAH -  1)])))) {
-            i__1NAH=(__INTEGER)(i__1NAH -  1);
+        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);
           };
-          result__0NAH=(i__1NAH ==  0);
+          result__JSCH=(i__KSCH ==  0);
         };
-        if ((! result__0NAH)) {
-          if (((struct ___OBJ *)s__A4XD)->__id==__ITM_SLOT__) {
-            __tmp__KKTD=((__ITM_SLOT *)s__A4XD)->id_section__I1C;
+        if ((! result__JSCH)) {
+          if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
+            __tmp__OKTD=((__ITM_SLOT *)s__N4XD)->id_section__M1C;
           } else {
-            __tmp__KKTD=((__ITM_SLOT_OPERATOR *)s__A4XD)->parent_itm_slot__4T5B.id_section__I1C;
+            __tmp__OKTD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.id_section__M1C;
           };
-          Self__LZSG=((__SECTION_ *)__tmp__KKTD);
-          __tmp__PKTD=(! (((void *)Self__LZSG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__LZSG->name__SYDC == (void *)(&__string_24))));
+          Self__FXUG=((__SECTION_ *)__tmp__OKTD);
+          __tmp__TKTD=(! (((void *)Self__FXUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__FXUG->name__WYDC == (void *)(&__string_24))));
         } else {
-          __tmp__PKTD=FALSE__;
+          __tmp__TKTD=FALSE__;
         };
-        if (__tmp__PKTD) {
-          if (is_first__53XD) {
-            put__to__like__VYXD((&__string_169),output_code__SI,(&__string_135));
-            is_first__53XD=FALSE__;
+        if (__tmp__TKTD) {
+          if (is_first__M4XD) {
+            put__to__like__CZXD((&__string_170),output_code__SI,(&__string_136));
+            is_first__M4XD=FALSE__;
           };
-          ((__STRING *)string_tmp__VH)->count__GFC= 0;
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__A4XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__JT1E(s__A4XD,string_tmp2__R5I);
+          ((__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);
           } else {
-            pretty_name_in__4U1E(s__A4XD,string_tmp2__R5I);
+            pretty_name_in__YX1E(s__N4XD,string_tmp2__V5I);
           };
-          put__to__like__VYXD(string_tmp2__R5I,string_tmp__VH,(&__string_137));
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__A4XD)->__id==__ITM_SLOT__) {
-            __tmp__D5XD=((__ITM_SLOT *)s__A4XD)->parent_named__D5.name__LI;
+          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;
           } else {
-            __tmp__D5XD=((__ITM_SLOT_OPERATOR *)s__A4XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__Q5XD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          get_all_comment_slot__in__UW1E(Self__GJTD,__tmp__D5XD,string_tmp2__R5I);
-          put__to__like__VYXD(string_tmp2__R5I,string_tmp__VH,(&__string_138));
-          put__to__like__VYXD(string_tmp__VH,output_code__SI,(&__string_136));
+          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__A4XD)->__id==__ITM_SLOT__) {
-          __tmp__P5XD=((__ITM_SLOT *)s__A4XD)->next__4GHC;
+        if (((struct ___OBJ *)s__N4XD)->__id==__ITM_SLOT__) {
+          __tmp__25XD=((__ITM_SLOT *)s__N4XD)->next__CHHC;
         } else {
-          __tmp__P5XD=((__ITM_SLOT_OPERATOR *)s__A4XD)->parent_itm_slot__4T5B.next__4GHC;
+          __tmp__25XD=((__ITM_SLOT_OPERATOR *)s__N4XD)->parent_itm_slot__CU5B.next__CHHC;
         };
-        s__A4XD=__tmp__P5XD;
+        s__N4XD=__tmp__25XD;
       };
-      if ((! is_first__53XD)) {
-        put__to__like__VYXD(NULL,output_code__SI,(&__string_139));
+      if ((! is_first__M4XD)) {
+        put__to__like__CZXD(NULL,output_code__SI,(&__string_140));
       };
-      is_first__45XD=TRUE__;
-      s__55XD=Self__GJTD->first_slot__SFZB;
-      while (((void *)s__55XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__55XD)->__id==__ITM_SLOT__) {
-          __tmp__XKTD=((__ITM_SLOT *)s__55XD)->parent_named__D5.name__LI;
+      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;
         } else {
-          __tmp__XKTD=((__ITM_SLOT_OPERATOR *)s__55XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+          __tmp__1KTD=((__ITM_SLOT_OPERATOR *)s__MAYD)->parent_itm_slot__CU5B.id_section__M1C;
         };
-        Self__COAH=((__STRING_CONSTANT *)__tmp__XKTD);
-        result__5NAH=FALSE__;
-        i__AOAH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_167))->count__DD <= Self__COAH->count__DD)) {
-          i__AOAH=((__STRING_CONSTANT *)(&__string_167))->count__DD;
-          while ((! ((i__AOAH ==  0) || (((__CHARACTER *)Self__COAH->storage__FQO)[(__INTEGER)(i__AOAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_167))->storage__FQO)[(__INTEGER)(i__AOAH -  1)])))) {
-            i__AOAH=(__INTEGER)(i__AOAH -  1);
+        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__;
+          };
+          ((__STRING *)string_tmp2__V5I)->count__KFC= 0;
+          if (((struct ___OBJ *)s__MAYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DW1E(s__MAYD,string_tmp2__V5I);
+          } else {
+            pretty_name_in__YX1E(s__MAYD,string_tmp2__V5I);
           };
-          result__5NAH=(i__AOAH ==  0);
+          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);
+          } else {
+            shorter_profile_in__GC2E(s__MAYD,output_code__SI);
+          };
+          ((__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;
+          } else {
+            __tmp__NBYD=((__ITM_SLOT_OPERATOR *)s__MAYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
+          };
+          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 (result__5NAH) {
-          if (is_first__45XD) {
-            put__to__like__VYXD((&__string_170),output_code__SI,(&__string_140));
-            is_first__45XD=FALSE__;
+        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;
+        };
+        s__MAYD=__tmp__VBYD;
+      };
+      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;
+        } else {
+          __tmp__ELTD=((__ITM_SLOT_OPERATOR *)s__3BYD)->parent_itm_slot__CU5B.parent_named__G5.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);
+          };
+          result__OSCH=(i__PSCH ==  0);
+        };
+        if (result__OSCH) {
+          if (is_first__2BYD) {
+            put__to__like__CZXD((&__string_172),output_code__SI,(&__string_141));
+            is_first__2BYD=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);
+          } else {
+            pretty_name_in__YX1E(s__3BYD,string_tmp2__V5I);
           };
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__55XD)->__id==__ITM_SLOT__) {
-            pretty_name_in__JT1E(s__55XD,string_tmp2__R5I);
+          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);
           } else {
-            pretty_name_in__4U1E(s__55XD,string_tmp2__R5I);
+            shorter_profile_in__GC2E(s__3BYD,output_code__SI);
           };
-          put__to__like__VYXD(string_tmp2__R5I,output_code__SI,(&__string_141));
-          ((__STRING *)string_tmp__VH)->count__GFC= 0;
-          if (((struct ___OBJ *)s__55XD)->__id==__ITM_SLOT__) {
-            __tmp__ABYD=((__ITM_SLOT *)s__55XD)->parent_named__D5.name__LI;
+          ((__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;
           } else {
-            __tmp__ABYD=((__ITM_SLOT_OPERATOR *)s__55XD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__4CYD=((__ITM_SLOT_OPERATOR *)s__3BYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          get_all_comment_slot__in__UW1E(Self__GJTD,__tmp__ABYD,string_tmp__VH);
-          put__to__like__VYXD(string_tmp__VH,output_code__SI,(&__string_138));
+          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__55XD)->__id==__ITM_SLOT__) {
-          __tmp__IBYD=((__ITM_SLOT *)s__55XD)->next__4GHC;
+        if (((struct ___OBJ *)s__3BYD)->__id==__ITM_SLOT__) {
+          __tmp__GDYD=((__ITM_SLOT *)s__3BYD)->next__CHHC;
         } else {
-          __tmp__IBYD=((__ITM_SLOT_OPERATOR *)s__55XD)->parent_itm_slot__4T5B.next__4GHC;
+          __tmp__GDYD=((__ITM_SLOT_OPERATOR *)s__3BYD)->parent_itm_slot__CU5B.next__CHHC;
         };
-        s__55XD=__tmp__IBYD;
+        s__3BYD=__tmp__GDYD;
       };
-      is_first__PBYD=TRUE__;
-      s__QBYD=Self__GJTD->first_slot__SFZB;
-      while (((void *)s__QBYD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__QBYD)->__id==__ITM_SLOT__) {
-          __tmp__ALTD=((__ITM_SLOT *)s__QBYD)->parent_named__D5.name__LI;
+      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;
         } else {
-          __tmp__ALTD=((__ITM_SLOT_OPERATOR *)s__QBYD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+          __tmp__NLTD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
         };
-        Self__HOAH=((__STRING_CONSTANT *)__tmp__ALTD);
-        result__EOAH=FALSE__;
-        i__FOAH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_167))->count__DD <= Self__HOAH->count__DD)) {
-          i__FOAH=((__STRING_CONSTANT *)(&__string_167))->count__DD;
-          while ((! ((i__FOAH ==  0) || (((__CHARACTER *)Self__HOAH->storage__FQO)[(__INTEGER)(i__FOAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_167))->storage__FQO)[(__INTEGER)(i__FOAH -  1)])))) {
-            i__FOAH=(__INTEGER)(i__FOAH -  1);
+        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);
           };
-          result__EOAH=(i__FOAH ==  0);
+          result__TSCH=(i__USCH ==  0);
         };
-        if ((! result__EOAH)) {
-          if (((struct ___OBJ *)s__QBYD)->__id==__ITM_SLOT__) {
-            __tmp__ILTD=((__ITM_SLOT *)s__QBYD)->id_section__I1C;
+        if ((! result__TSCH)) {
+          if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
+            __tmp__VLTD=((__ITM_SLOT *)s__ODYD)->id_section__M1C;
           } else {
-            __tmp__ILTD=((__ITM_SLOT_OPERATOR *)s__QBYD)->parent_itm_slot__4T5B.id_section__I1C;
+            __tmp__VLTD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.id_section__M1C;
           };
-          Self__MZSG=((__SECTION_ *)__tmp__ILTD);
-          __tmp__NLTD=(! (((void *)Self__MZSG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__MZSG->name__SYDC == (void *)(&__string_24))));
+          Self__HXUG=((__SECTION_ *)__tmp__VLTD);
+          __tmp__0LTD=(! (((void *)Self__HXUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__HXUG->name__WYDC == (void *)(&__string_24))));
         } else {
-          __tmp__NLTD=FALSE__;
+          __tmp__0LTD=FALSE__;
         };
-        if (__tmp__NLTD) {
-          if (is_first__PBYD) {
-            put__to__like__VYXD((&__string_171),output_code__SI,(&__string_140));
-            is_first__PBYD=FALSE__;
+        if (__tmp__0LTD) {
+          if (is_first__NDYD) {
+            put__to__like__CZXD((&__string_173),output_code__SI,(&__string_141));
+            is_first__NDYD=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);
+          } else {
+            pretty_name_in__YX1E(s__ODYD,string_tmp2__V5I);
           };
-          ((__STRING *)string_tmp2__R5I)->count__GFC= 0;
-          if (((struct ___OBJ *)s__QBYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__JT1E(s__QBYD,string_tmp2__R5I);
+          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);
           } else {
-            pretty_name_in__4U1E(s__QBYD,string_tmp2__R5I);
+            shorter_profile_in__GC2E(s__ODYD,output_code__SI);
           };
-          put__to__like__VYXD(string_tmp2__R5I,output_code__SI,(&__string_141));
-          ((__STRING *)string_tmp__VH)->count__GFC= 0;
-          if (((struct ___OBJ *)s__QBYD)->__id==__ITM_SLOT__) {
-            __tmp__RCYD=((__ITM_SLOT *)s__QBYD)->parent_named__D5.name__LI;
+          ((__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;
           } else {
-            __tmp__RCYD=((__ITM_SLOT_OPERATOR *)s__QBYD)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__PEYD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          get_all_comment_slot__in__UW1E(Self__GJTD,__tmp__RCYD,string_tmp__VH);
-          put__to__like__VYXD(string_tmp__VH,output_code__SI,(&__string_138));
+          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__QBYD)->__id==__ITM_SLOT__) {
-          __tmp__ZCYD=((__ITM_SLOT *)s__QBYD)->next__4GHC;
+        if (((struct ___OBJ *)s__ODYD)->__id==__ITM_SLOT__) {
+          __tmp__XEYD=((__ITM_SLOT *)s__ODYD)->next__CHHC;
         } else {
-          __tmp__ZCYD=((__ITM_SLOT_OPERATOR *)s__QBYD)->parent_itm_slot__4T5B.next__4GHC;
+          __tmp__XEYD=((__ITM_SLOT_OPERATOR *)s__ODYD)->parent_itm_slot__CU5B.next__CHHC;
         };
-        s__QBYD=__tmp__ZCYD;
+        s__ODYD=__tmp__XEYD;
       };
-      save_file__with__5CC(add_ext__UAF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
-      Self__S0QC=(__INTEGER)(Self__S0QC +  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);
     };
   };
   return( 0);
 }
 
-static __STRING* create__BBB(__INTEGER needed_capacity__DBB)
+static __STRING* create__EBB(__INTEGER needed_capacity__GBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __STRING *result__YRB,*Self__ZAS;
-  __POINTER ptr__ZRB,ptr_table__KOAH,next__JOAH,result__LOAH;
-  __POINTER ptr_table__FTH,next__KTH,result__ITH;
-  __INTEGER typ_id__5RB;
-  __UINTEGER_32 sz__2RB,a__N52G,new_size__O52G,t__S52G,a__R52G;
-  __UINTEGER_32 new_size__ETH,lab_type__GTH;
-  result__YRB=NULL;
-  ptr__ZRB=((__POINTER )(NULL));
-  typ_id__5RB= 0;
-  sz__2RB=((__UINTEGER_32 )sizeof(__STRING));
-  if ((sz__2RB ==  0)) {
-    result__YRB=STRING__;
+  __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__;
   } else {
-    typ_id__5RB=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__2RB);
-    if ((typ_id__5RB == (__INTEGER)(-  1))) {
-      a__N52G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__O52G=(__UINTEGER_32)((__UINTEGER_32)(sz__2RB + a__N52G) & (__UINTEGER_32)(~ a__N52G));
-      ptr_table__KOAH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O52G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JOAH=((__POINTER )(NULL));
-      result__LOAH=((__POINTER *)ptr_table__KOAH)[ 0];
-      if ((result__LOAH == (void *)NULL)) {
-        result__LOAH=new_lab__2QJ(new_size__O52G);
-        next__JOAH=(void *)((unsigned long)result__LOAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O52G)));
-        ((__POINTER *)next__JOAH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KOAH)[ 0]=next__JOAH;
+    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;
       } else {
-        next__JOAH=((__POINTER *)result__LOAH)[ 0];
-        if ((next__JOAH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LOAH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O52G <<  1)) <=  4096)) {
-            next__JOAH=(void *)((unsigned long)result__LOAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O52G)));
+        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)));
           } else {
-            next__JOAH=new_lab__2QJ(new_size__O52G);
+            next__YSCH=new_lab__ARJ(new_size__NC5G);
           };
-          ((__POINTER *)next__JOAH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KOAH)[ 0]=next__JOAH;
+          ((__POINTER *)next__YSCH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZSCH)[ 0]=next__YSCH;
         } else {
-          ((__POINTER *)result__LOAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JOAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LOAH=next__JOAH;
+          ((__POINTER *)result__0SCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YSCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0SCH=next__YSCH;
         };
       };
-      ptr__ZRB=result__LOAH;
+      ptr__3RB=result__0SCH;
     } else {
-      t__S52G=((__UINTEGER_32 )typ_id__5RB);
-      a__R52G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ETH=(__UINTEGER_32)((__UINTEGER_32)(sz__2RB + a__R52G) & (__UINTEGER_32)(~ a__R52G));
-      ptr_table__FTH=((__POINTER )(&(table_type[(t__S52G)])));
-      lab_type__GTH=(__UINTEGER_32)(t__S52G |  1);
-      next__KTH=((__POINTER )(NULL));
-      result__ITH=((__POINTER *)ptr_table__FTH)[ 0];
-      if ((result__ITH == (void *)NULL)) {
-        result__ITH=new_lab__2QJ(lab_type__GTH);
-        next__KTH=(void *)((unsigned long)result__ITH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ETH)));
-        ((__POINTER *)next__KTH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FTH)[ 0]=next__KTH;
+      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;
       } else {
-        next__KTH=((__POINTER *)result__ITH)[ 0];
-        if ((next__KTH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ITH - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ETH <<  1)) <=  4096)) {
-            next__KTH=(void *)((unsigned long)result__ITH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ETH)));
+        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)));
           } else {
-            next__KTH=new_lab__2QJ(lab_type__GTH);
+            next__OTH=new_lab__ARJ(lab_type__KTH);
           };
-          ((__POINTER *)next__KTH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FTH)[ 0]=next__KTH;
+          ((__POINTER *)next__OTH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JTH)[ 0]=next__OTH;
         } else {
-          ((__POINTER *)result__ITH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KTH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ITH=next__KTH;
+          ((__POINTER *)result__MTH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OTH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MTH=next__OTH;
         };
       };
-      ptr__ZRB=result__ITH;
+      ptr__3RB=result__MTH;
     };
-    result__YRB=((__STRING *)ptr__ZRB);
-    *(result__YRB) = *(STRING__);
+    result__2RB=((__STRING *)ptr__3RB);
+    *(result__2RB) = *(STRING__);
   };
-  Self__ZAS=((__STRING *)result__YRB);
-  if ((needed_capacity__DBB >  0)) {
-    if ((Self__ZAS->capacity__IBS < needed_capacity__DBB)) {
-      Self__ZAS->storage__RBS=create__RLEB(needed_capacity__DBB);
-      Self__ZAS->capacity__IBS=needed_capacity__DBB;
+  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__ZAS->count__GFC= 0;
-  return(result__YRB);
+  Self__3AS->count__KFC= 0;
+  return(result__2RB);
 }
 
-static __POINTER new_lab__2QJ(__UINTEGER_32 t__4QJ)
+static __POINTER new_lab__ARJ(__UINTEGER_32 t__CRJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 idx__ARJ,pv__HRJ;
-  void *blc__DRJ,*prev__ERJ,*prev__V3ZG,*next__W3ZG;
-  __MEMORY *Self__VOWG,*Self__U3ZG;
-  __POINTER result__FRJ;
-  __BOOLEAN __tmp__HSJ;
-  idx__ARJ= 0;
-  blc__DRJ=NULL;
-  prev__ERJ=NULL;
-  pv__HRJ= 0;
-  while_do__NCK:
+  __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:
   {
-    if ((idx__ARJ < nb_page__ORJ)) {
-      blc__DRJ=((void *)(last_block[(idx__ARJ)]));
-      __tmp__HSJ=(((__UINTEGER_32)(((__MEMORY *)blc__DRJ)->map_size_and_id__YSB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__DRJ)->map_size_and_id__YSB &  1) ==  1));
+    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));
     } else {
-      __tmp__HSJ=FALSE__;
+      __tmp__LSJ=FALSE__;
     };
-    if (__tmp__HSJ) {
-      idx__ARJ=(__UINTEGER_32)(idx__ARJ +  1);
-      goto while_do__NCK;
+    if (__tmp__LSJ) {
+      idx__ERJ=(__UINTEGER_32)(idx__ERJ +  1);
+      goto while_do__RCK;
     };
   };
-  if ((idx__ARJ >= nb_page__ORJ)) {
-    blc__DRJ=new_page__454();
+  if ((idx__ERJ >= nb_page__SRJ)) {
+    blc__HRJ=new_page__CA5();
   };
-  ((__MEMORY *)blc__DRJ)->map_size_and_id__YSB=(__UINTEGER_32)(((__MEMORY *)blc__DRJ)->map_size_and_id__YSB -  4096);
-  Self__VOWG=((__MEMORY *)blc__DRJ);
-  result__FRJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__VOWG) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__VOWG->map_size_and_id__YSB &  4294967292LU))))));
-  if (((__UINTEGER_32)(((__MEMORY *)blc__DRJ)->map_size_and_id__YSB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    Self__U3ZG=((__MEMORY *)blc__DRJ);
-    prev__V3ZG=Self__U3ZG->map_previous_free__0SB;
-    next__W3ZG=Self__U3ZG->map_next_free__ZSB;
-    if (((void *)prev__V3ZG == (void *)NULL)) {
-      first_free__HDVB=next__W3ZG;
+  ((__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;
     } else {
-      ((__MEMORY *)prev__V3ZG)->map_next_free__ZSB=next__W3ZG;
+      ((__MEMORY *)prev__S31G)->map_next_free__3SB=next__T31G;
     };
-    if (((void *)next__W3ZG != (void *)NULL)) {
-      ((__MEMORY *)next__W3ZG)->map_previous_free__0SB=prev__V3ZG;
+    if (((void *)next__T31G != (void *)NULL)) {
+      ((__MEMORY *)next__T31G)->map_previous_free__4SB=prev__S31G;
     };
-    pv__HRJ=((__MEMORY *)blc__DRJ)->map_previous_linear__XSB;
-    if ((pv__HRJ !=  4294967295LU)) {
-      prev__ERJ=((void *)(void *)((unsigned long)begin_memory__5UH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__HRJ))));
-      ((__MEMORY *)prev__ERJ)->map_size_and_id__YSB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__ERJ)->map_size_and_id__YSB + ((__MEMORY *)blc__DRJ)->map_size_and_id__YSB) +  8);
-      last_block[(idx__ARJ)] = (prev__ERJ);
+    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);
     };
   };
-  ((__POINTER *)result__FRJ)[ 0]=((__POINTER )t__4QJ);
-  return((void *)((unsigned long)result__FRJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
+  ((__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 *)))))));
 }
 
-static void** create__JFRB(__INTEGER nb_elements__LFRB)
+static void** create__NFRB(__INTEGER nb_elements__PFRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__PWZG,a__WP1G,new_size__QWZG,new_size2__RWZG,a__0P1G;
-  __UINTEGER_32 new_size__1P1G;
-  __POINTER result__OWZG,ptr_table__CT4G,next__BT4G,result__DT4G;
-  void *result__GT4G;
-  __INTEGER Self__15MC;
-  void **Result__RDUB;
-  sz__PWZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__LFRB * ((__INTEGER )(sizeof(void *)))));
-  result__OWZG=((__POINTER )(NULL));
-  a__WP1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__QWZG=(__UINTEGER_32)((__UINTEGER_32)(sz__PWZG + a__WP1G) & (__UINTEGER_32)(~ a__WP1G));
-  new_size2__RWZG=(__UINTEGER_32)(new_size__QWZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__RWZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__0P1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__1P1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RWZG + a__0P1G) & (__UINTEGER_32)(~ a__0P1G));
-    ptr_table__CT4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1P1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__BT4G=((__POINTER )(NULL));
-    result__DT4G=((__POINTER *)ptr_table__CT4G)[ 0];
-    if ((result__DT4G == (void *)NULL)) {
-      result__DT4G=new_lab__2QJ(new_size__1P1G);
-      next__BT4G=(void *)((unsigned long)result__DT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1P1G)));
-      ((__POINTER *)next__BT4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__CT4G)[ 0]=next__BT4G;
-    } else {
-      next__BT4G=((__POINTER *)result__DT4G)[ 0];
-      if ((next__BT4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DT4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1P1G <<  1)) <=  4096)) {
-          next__BT4G=(void *)((unsigned long)result__DT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1P1G)));
-        } else {
-          next__BT4G=new_lab__2QJ(new_size__1P1G);
-        };
-        ((__POINTER *)next__BT4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CT4G)[ 0]=next__BT4G;
-      } else {
-        ((__POINTER *)result__DT4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BT4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__DT4G=next__BT4G;
-      };
-    };
-    ((__POINTER *)result__DT4G)[ 0]=((__POINTER ) 3);
-    result__OWZG=(void *)((unsigned long)result__DT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__GT4G=first_free__HDVB;
-    while ((((void *)result__GT4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GT4G)->map_size_and_id__YSB &  4294967292LU) < new_size__QWZG))) {
-      result__GT4G=((__MEMORY *)result__GT4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__GT4G == (void *)NULL)) {
-      result__GT4G=new_page__454();
+    if (((void *)result__CXAH == (void *)NULL)) {
+      result__CXAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__GT4G,new_size__QWZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GT4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__OWZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GT4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__RDUB=((void **)result__OWZG);
-  Self__15MC=(__INTEGER)(nb_elements__LFRB -  1);
-  while ((Self__15MC >=  0)) {
-    Result__RDUB[Self__15MC]=NULL;
-    Self__15MC=(__INTEGER)(Self__15MC -  1);
+  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);
   };
-  return(Result__RDUB);
+  return(Result__VDUB);
 }
 
-static void add_last__JLT(__STRING *Self__KLT,__CHARACTER ch__LLT)
+static void add_last__NLT(__STRING *Self__OLT,__CHARACTER ch__PLT)
 // ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__MLT,old_nb_elts__400G,upper__W52G,Self__U52G;
-  __CHARACTER *Self__300G,*new__A10G;
-  new_capacity__MLT= 0;
-  if ((Self__KLT->capacity__IBS <= Self__KLT->count__GFC)) {
-    if ((Self__KLT->capacity__IBS ==  0)) {
-      Self__KLT->capacity__IBS= 32;
-      Self__KLT->storage__RBS=create__RLEB( 32);
-    } else {
-      new_capacity__MLT=(__INTEGER)(Self__KLT->capacity__IBS <<  1);
-      Self__300G=((__CHARACTER *)Self__KLT->storage__RBS);
-      old_nb_elts__400G=Self__KLT->capacity__IBS;
-      new__A10G=((__CHARACTER *)realloc_dynamic__old_size__new_size__BELC(((__POINTER )Self__300G),((__UINTEGER_32 )old_nb_elts__400G),((__UINTEGER_32 )new_capacity__MLT)));
-      upper__W52G=(__INTEGER)(new_capacity__MLT -  1);
-      Self__U52G=old_nb_elts__400G;
-      while ((Self__U52G <= upper__W52G)) {
-        new__A10G[Self__U52G]='\0';
-        Self__U52G=(__INTEGER)(Self__U52G +  1);
-      };
-      Self__KLT->storage__RBS=new__A10G;
-      Self__KLT->capacity__IBS=new_capacity__MLT;
-    };
-  };
-  ((__CHARACTER *)Self__KLT->storage__RBS)[Self__KLT->count__GFC]=ch__LLT;
-  Self__KLT->count__GFC=(__INTEGER)(Self__KLT->count__GFC +  1);
+  __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);
 }
 
-static void add_last__QRV(__FAST_ARRAYoSTRINGo *Self__RRV,void *element__SRV)
+static void add_last__URV(__FAST_ARRAYoSTRINGo *Self__VRV,void *element__WRV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__TRV,__tmp__XSV,__tmp__3HEC,Self__FKVD;
-  __BOOLEAN __tmp__BSV;
-  void **__tmp__WSV,**new__JHEC;
-  new_capacity__TRV= 0;
-  if (((__INTEGER)(Self__RRV->parent_arrayed_collection__TJC.upper__WJC +  1) <= (__INTEGER)(Self__RRV->parent_arrayed_collection__TJC.capacity__2FT -  1))) {
-    Self__RRV->parent_arrayed_collection__TJC.upper__WJC=(__INTEGER)(Self__RRV->parent_arrayed_collection__TJC.upper__WJC +  1);
-    __tmp__BSV=TRUE__;
+  __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__;
   } else {
-    __tmp__BSV=FALSE__;
-  };
-  if ((! __tmp__BSV)) {
-    if ((Self__RRV->parent_arrayed_collection__TJC.capacity__2FT ==  0)) {
-      Self__RRV->parent_arrayed_collection__TJC.storage__HGT=create__JFRB( 2);
-      Self__RRV->parent_arrayed_collection__TJC.capacity__2FT= 2;
-      Self__RRV->parent_arrayed_collection__TJC.upper__WJC= 0;
-    } else {
-      new_capacity__TRV=(__INTEGER)(Self__RRV->parent_arrayed_collection__TJC.capacity__2FT <<  1);
-      __tmp__WSV=Self__RRV->parent_arrayed_collection__TJC.storage__HGT;
-      __tmp__XSV=Self__RRV->parent_arrayed_collection__TJC.capacity__2FT;
-      new__JHEC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__WSV)),((__UINTEGER_32 )(__INTEGER)(__tmp__XSV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__TRV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__3HEC=(__INTEGER)(new_capacity__TRV -  1);
-      Self__FKVD=__tmp__XSV;
-      while ((Self__FKVD <= __tmp__3HEC)) {
-        new__JHEC[Self__FKVD]=NULL;
-        Self__FKVD=(__INTEGER)(Self__FKVD +  1);
-      };
-      Self__RRV->parent_arrayed_collection__TJC.storage__HGT=new__JHEC;
-      Self__RRV->parent_arrayed_collection__TJC.capacity__2FT=new_capacity__TRV;
-      Self__RRV->parent_arrayed_collection__TJC.upper__WJC=(__INTEGER)(Self__RRV->parent_arrayed_collection__TJC.upper__WJC +  1);
-    };
-  };
-  ((void **)Self__RRV->parent_arrayed_collection__TJC.storage__HGT)[Self__RRV->parent_arrayed_collection__TJC.upper__WJC]=element__SRV;
+    __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;
 }
 
-static __INTEGER prime_number_ceiling__H41(__INTEGER integer__J41)
+static __INTEGER prime_number_ceiling__L41(__INTEGER integer__N41)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__L41;
-  __BOOLEAN __tmp__T41,__tmp__A51,result__MQCB,__tmp__N51,result__4QCB;
-  __BOOLEAN __tmp__051,result__QRCB,__tmp__HA2,result__CSCB,__tmp__UA2;
-  __BOOLEAN result__USCB,__tmp__BB2,result__GTCB,__tmp__OB2;
-  __BOOLEAN result__YTCB,__tmp__1B2,result__KUCB,__tmp__IC2;
-  __BOOLEAN result__2UCB,__tmp__VC2,result__OVCB,__tmp__CD2;
-  __BOOLEAN result__AWCB,__tmp__PD2,result__SWCB,__tmp__2D2;
-  __BOOLEAN result__EXCB,__tmp__JE2,result__WXCB,__tmp__WE2;
-  __BOOLEAN result__IYCB,__tmp__DF2,result__0YCB,__tmp__QF2;
-  __BOOLEAN result__MZCB,__tmp__3F2,result__4ZCB,__tmp__KG2;
-  __BOOLEAN result__Q0CB,__tmp__XG2,result__C1CB,__tmp__EH2;
-  __BOOLEAN result__U1CB,__tmp__RH2,result__G2CB,__tmp__4H2;
-  __BOOLEAN result__Y2CB,__tmp__LI2,result__K3CB,__tmp__YI2;
-  __BOOLEAN result__23CB;
-  result__L41= 0;
-  if ((integer__J41 <=  11)) {
-    result__L41= 11;
-    __tmp__T41=TRUE__;
+  __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__;
   } else {
-    __tmp__T41=FALSE__;
+    __tmp__X41=FALSE__;
   };
-  if (__tmp__T41) {
-    __tmp__A51=TRUE__;
+  if (__tmp__X41) {
+    __tmp__E51=TRUE__;
   } else {
-    result__MQCB=(integer__J41 <=  23);
-    if (result__MQCB) {
-      result__L41= 23;
+    result__QQCB=(integer__N41 <=  23);
+    if (result__QQCB) {
+      result__P41= 23;
     };
-    __tmp__A51=result__MQCB;
+    __tmp__E51=result__QQCB;
   };
-  if (__tmp__A51) {
-    __tmp__N51=TRUE__;
+  if (__tmp__E51) {
+    __tmp__R51=TRUE__;
   } else {
-    result__4QCB=(integer__J41 <=  53);
-    if (result__4QCB) {
-      result__L41= 53;
+    result__CRCB=(integer__N41 <=  53);
+    if (result__CRCB) {
+      result__P41= 53;
     };
-    __tmp__N51=result__4QCB;
+    __tmp__R51=result__CRCB;
   };
-  if (__tmp__N51) {
-    __tmp__051=TRUE__;
+  if (__tmp__R51) {
+    __tmp__451=TRUE__;
   } else {
-    result__QRCB=(integer__J41 <=  97);
-    if (result__QRCB) {
-      result__L41= 97;
+    result__URCB=(integer__N41 <=  97);
+    if (result__URCB) {
+      result__P41= 97;
     };
-    __tmp__051=result__QRCB;
+    __tmp__451=result__URCB;
   };
-  if (__tmp__051) {
-    __tmp__HA2=TRUE__;
+  if (__tmp__451) {
+    __tmp__LA2=TRUE__;
   } else {
-    result__CSCB=(integer__J41 <=  193);
-    if (result__CSCB) {
-      result__L41= 193;
+    result__GSCB=(integer__N41 <=  193);
+    if (result__GSCB) {
+      result__P41= 193;
     };
-    __tmp__HA2=result__CSCB;
+    __tmp__LA2=result__GSCB;
   };
-  if (__tmp__HA2) {
-    __tmp__UA2=TRUE__;
+  if (__tmp__LA2) {
+    __tmp__YA2=TRUE__;
   } else {
-    result__USCB=(integer__J41 <=  389);
-    if (result__USCB) {
-      result__L41= 389;
+    result__YSCB=(integer__N41 <=  389);
+    if (result__YSCB) {
+      result__P41= 389;
     };
-    __tmp__UA2=result__USCB;
+    __tmp__YA2=result__YSCB;
   };
-  if (__tmp__UA2) {
-    __tmp__BB2=TRUE__;
+  if (__tmp__YA2) {
+    __tmp__FB2=TRUE__;
   } else {
-    result__GTCB=(integer__J41 <=  769);
-    if (result__GTCB) {
-      result__L41= 769;
+    result__KTCB=(integer__N41 <=  769);
+    if (result__KTCB) {
+      result__P41= 769;
     };
-    __tmp__BB2=result__GTCB;
+    __tmp__FB2=result__KTCB;
   };
-  if (__tmp__BB2) {
-    __tmp__OB2=TRUE__;
+  if (__tmp__FB2) {
+    __tmp__SB2=TRUE__;
   } else {
-    result__YTCB=(integer__J41 <=  1543);
-    if (result__YTCB) {
-      result__L41= 1543;
+    result__2TCB=(integer__N41 <=  1543);
+    if (result__2TCB) {
+      result__P41= 1543;
     };
-    __tmp__OB2=result__YTCB;
+    __tmp__SB2=result__2TCB;
   };
-  if (__tmp__OB2) {
-    __tmp__1B2=TRUE__;
+  if (__tmp__SB2) {
+    __tmp__5B2=TRUE__;
   } else {
-    result__KUCB=(integer__J41 <=  3079);
-    if (result__KUCB) {
-      result__L41= 3079;
+    result__OUCB=(integer__N41 <=  3079);
+    if (result__OUCB) {
+      result__P41= 3079;
     };
-    __tmp__1B2=result__KUCB;
+    __tmp__5B2=result__OUCB;
   };
-  if (__tmp__1B2) {
-    __tmp__IC2=TRUE__;
+  if (__tmp__5B2) {
+    __tmp__MC2=TRUE__;
   } else {
-    result__2UCB=(integer__J41 <=  6151);
-    if (result__2UCB) {
-      result__L41= 6151;
+    result__AVCB=(integer__N41 <=  6151);
+    if (result__AVCB) {
+      result__P41= 6151;
     };
-    __tmp__IC2=result__2UCB;
+    __tmp__MC2=result__AVCB;
   };
-  if (__tmp__IC2) {
-    __tmp__VC2=TRUE__;
+  if (__tmp__MC2) {
+    __tmp__ZC2=TRUE__;
   } else {
-    result__OVCB=(integer__J41 <=  12289);
-    if (result__OVCB) {
-      result__L41= 12289;
+    result__SVCB=(integer__N41 <=  12289);
+    if (result__SVCB) {
+      result__P41= 12289;
     };
-    __tmp__VC2=result__OVCB;
+    __tmp__ZC2=result__SVCB;
   };
-  if (__tmp__VC2) {
-    __tmp__CD2=TRUE__;
+  if (__tmp__ZC2) {
+    __tmp__GD2=TRUE__;
   } else {
-    result__AWCB=(integer__J41 <=  24593);
-    if (result__AWCB) {
-      result__L41= 24593;
+    result__EWCB=(integer__N41 <=  24593);
+    if (result__EWCB) {
+      result__P41= 24593;
     };
-    __tmp__CD2=result__AWCB;
+    __tmp__GD2=result__EWCB;
   };
-  if (__tmp__CD2) {
-    __tmp__PD2=TRUE__;
+  if (__tmp__GD2) {
+    __tmp__TD2=TRUE__;
   } else {
-    result__SWCB=(integer__J41 <=  49157);
-    if (result__SWCB) {
-      result__L41= 49157;
+    result__WWCB=(integer__N41 <=  49157);
+    if (result__WWCB) {
+      result__P41= 49157;
     };
-    __tmp__PD2=result__SWCB;
+    __tmp__TD2=result__WWCB;
   };
-  if (__tmp__PD2) {
-    __tmp__2D2=TRUE__;
+  if (__tmp__TD2) {
+    __tmp__AE2=TRUE__;
   } else {
-    result__EXCB=(integer__J41 <=  98317);
-    if (result__EXCB) {
-      result__L41= 98317;
+    result__IXCB=(integer__N41 <=  98317);
+    if (result__IXCB) {
+      result__P41= 98317;
     };
-    __tmp__2D2=result__EXCB;
+    __tmp__AE2=result__IXCB;
   };
-  if (__tmp__2D2) {
-    __tmp__JE2=TRUE__;
+  if (__tmp__AE2) {
+    __tmp__NE2=TRUE__;
   } else {
-    result__WXCB=(integer__J41 <=  196613);
-    if (result__WXCB) {
-      result__L41= 196613;
+    result__0XCB=(integer__N41 <=  196613);
+    if (result__0XCB) {
+      result__P41= 196613;
     };
-    __tmp__JE2=result__WXCB;
+    __tmp__NE2=result__0XCB;
   };
-  if (__tmp__JE2) {
-    __tmp__WE2=TRUE__;
+  if (__tmp__NE2) {
+    __tmp__0E2=TRUE__;
   } else {
-    result__IYCB=(integer__J41 <=  393241);
-    if (result__IYCB) {
-      result__L41= 393241;
+    result__MYCB=(integer__N41 <=  393241);
+    if (result__MYCB) {
+      result__P41= 393241;
     };
-    __tmp__WE2=result__IYCB;
+    __tmp__0E2=result__MYCB;
   };
-  if (__tmp__WE2) {
-    __tmp__DF2=TRUE__;
+  if (__tmp__0E2) {
+    __tmp__HF2=TRUE__;
   } else {
-    result__0YCB=(integer__J41 <=  786433);
-    if (result__0YCB) {
-      result__L41= 786433;
+    result__4YCB=(integer__N41 <=  786433);
+    if (result__4YCB) {
+      result__P41= 786433;
     };
-    __tmp__DF2=result__0YCB;
+    __tmp__HF2=result__4YCB;
   };
-  if (__tmp__DF2) {
-    __tmp__QF2=TRUE__;
+  if (__tmp__HF2) {
+    __tmp__UF2=TRUE__;
   } else {
-    result__MZCB=(integer__J41 <=  1572869);
-    if (result__MZCB) {
-      result__L41= 1572869;
+    result__QZCB=(integer__N41 <=  1572869);
+    if (result__QZCB) {
+      result__P41= 1572869;
     };
-    __tmp__QF2=result__MZCB;
+    __tmp__UF2=result__QZCB;
   };
-  if (__tmp__QF2) {
-    __tmp__3F2=TRUE__;
+  if (__tmp__UF2) {
+    __tmp__BG2=TRUE__;
   } else {
-    result__4ZCB=(integer__J41 <=  3145739);
-    if (result__4ZCB) {
-      result__L41= 3145739;
+    result__C0CB=(integer__N41 <=  3145739);
+    if (result__C0CB) {
+      result__P41= 3145739;
     };
-    __tmp__3F2=result__4ZCB;
+    __tmp__BG2=result__C0CB;
   };
-  if (__tmp__3F2) {
-    __tmp__KG2=TRUE__;
+  if (__tmp__BG2) {
+    __tmp__OG2=TRUE__;
   } else {
-    result__Q0CB=(integer__J41 <=  6291469);
-    if (result__Q0CB) {
-      result__L41= 6291469;
+    result__U0CB=(integer__N41 <=  6291469);
+    if (result__U0CB) {
+      result__P41= 6291469;
     };
-    __tmp__KG2=result__Q0CB;
+    __tmp__OG2=result__U0CB;
   };
-  if (__tmp__KG2) {
-    __tmp__XG2=TRUE__;
+  if (__tmp__OG2) {
+    __tmp__1G2=TRUE__;
   } else {
-    result__C1CB=(integer__J41 <=  12582917);
-    if (result__C1CB) {
-      result__L41= 12582917;
+    result__G1CB=(integer__N41 <=  12582917);
+    if (result__G1CB) {
+      result__P41= 12582917;
     };
-    __tmp__XG2=result__C1CB;
+    __tmp__1G2=result__G1CB;
   };
-  if (__tmp__XG2) {
-    __tmp__EH2=TRUE__;
+  if (__tmp__1G2) {
+    __tmp__IH2=TRUE__;
   } else {
-    result__U1CB=(integer__J41 <=  25165843);
-    if (result__U1CB) {
-      result__L41= 25165843;
+    result__Y1CB=(integer__N41 <=  25165843);
+    if (result__Y1CB) {
+      result__P41= 25165843;
     };
-    __tmp__EH2=result__U1CB;
+    __tmp__IH2=result__Y1CB;
   };
-  if (__tmp__EH2) {
-    __tmp__RH2=TRUE__;
+  if (__tmp__IH2) {
+    __tmp__VH2=TRUE__;
   } else {
-    result__G2CB=(integer__J41 <=  50331653);
-    if (result__G2CB) {
-      result__L41= 50331653;
+    result__K2CB=(integer__N41 <=  50331653);
+    if (result__K2CB) {
+      result__P41= 50331653;
     };
-    __tmp__RH2=result__G2CB;
+    __tmp__VH2=result__K2CB;
   };
-  if (__tmp__RH2) {
-    __tmp__4H2=TRUE__;
+  if (__tmp__VH2) {
+    __tmp__CI2=TRUE__;
   } else {
-    result__Y2CB=(integer__J41 <=  100663319);
-    if (result__Y2CB) {
-      result__L41= 100663319;
+    result__22CB=(integer__N41 <=  100663319);
+    if (result__22CB) {
+      result__P41= 100663319;
     };
-    __tmp__4H2=result__Y2CB;
+    __tmp__CI2=result__22CB;
   };
-  if (__tmp__4H2) {
-    __tmp__LI2=TRUE__;
+  if (__tmp__CI2) {
+    __tmp__PI2=TRUE__;
   } else {
-    result__K3CB=(integer__J41 <=  201326611);
-    if (result__K3CB) {
-      result__L41= 201326611;
+    result__O3CB=(integer__N41 <=  201326611);
+    if (result__O3CB) {
+      result__P41= 201326611;
     };
-    __tmp__LI2=result__K3CB;
+    __tmp__PI2=result__O3CB;
   };
-  if (__tmp__LI2) {
-    __tmp__YI2=TRUE__;
+  if (__tmp__PI2) {
+    __tmp__2I2=TRUE__;
   } else {
-    result__23CB=(integer__J41 <=  402653189);
-    if (result__23CB) {
-      result__L41= 402653189;
+    result__A4CB=(integer__N41 <=  402653189);
+    if (result__A4CB) {
+      result__P41= 402653189;
     };
-    __tmp__YI2=result__23CB;
+    __tmp__2I2=result__A4CB;
   };
-  if ((! __tmp__YI2)) {
-    if ((integer__J41 <=  805306457)) {
-      result__L41= 805306457;
+  if ((! __tmp__2I2)) {
+    if ((integer__N41 <=  805306457)) {
+      result__P41= 805306457;
     } else {
-      result__L41= 1610612741;
+      result__P41= 1610612741;
     };
   };
-  return(result__L41);
+  return(result__P41);
 }
 
-static void** create__HB4(__INTEGER nb_elements__JB4)
+static void** create__LB4(__INTEGER nb_elements__NB4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__M10G,a__R10G,new_size__N10G,new_size2__O10G,a__V10G;
-  __UINTEGER_32 new_size__W10G;
-  __POINTER result__L10G,ptr_table__NC4G,next__MC4G,result__OC4G;
-  void *result__OOAH;
-  __INTEGER Self__Z0JC;
-  void **Result__4YEB;
-  sz__M10G=((__UINTEGER_32 )(__INTEGER)(nb_elements__JB4 * ((__INTEGER )(sizeof(void *)))));
-  result__L10G=((__POINTER )(NULL));
-  a__R10G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__N10G=(__UINTEGER_32)((__UINTEGER_32)(sz__M10G + a__R10G) & (__UINTEGER_32)(~ a__R10G));
-  new_size2__O10G=(__UINTEGER_32)(new_size__N10G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__O10G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__V10G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__W10G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__O10G + a__V10G) & (__UINTEGER_32)(~ a__V10G));
-    ptr_table__NC4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W10G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__MC4G=((__POINTER )(NULL));
-    result__OC4G=((__POINTER *)ptr_table__NC4G)[ 0];
-    if ((result__OC4G == (void *)NULL)) {
-      result__OC4G=new_lab__2QJ(new_size__W10G);
-      next__MC4G=(void *)((unsigned long)result__OC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W10G)));
-      ((__POINTER *)next__MC4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__NC4G)[ 0]=next__MC4G;
-    } else {
-      next__MC4G=((__POINTER *)result__OC4G)[ 0];
-      if ((next__MC4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OC4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W10G <<  1)) <=  4096)) {
-          next__MC4G=(void *)((unsigned long)result__OC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W10G)));
-        } else {
-          next__MC4G=new_lab__2QJ(new_size__W10G);
-        };
-        ((__POINTER *)next__MC4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NC4G)[ 0]=next__MC4G;
-      } else {
-        ((__POINTER *)result__OC4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MC4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__OC4G=next__MC4G;
-      };
-    };
-    ((__POINTER *)result__OC4G)[ 0]=((__POINTER ) 3);
-    result__L10G=(void *)((unsigned long)result__OC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__OOAH=first_free__HDVB;
-    while ((((void *)result__OOAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OOAH)->map_size_and_id__YSB &  4294967292LU) < new_size__N10G))) {
-      result__OOAH=((__MEMORY *)result__OOAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__OOAH == (void *)NULL)) {
-      result__OOAH=new_page__454();
+    if (((void *)result__3SCH == (void *)NULL)) {
+      result__3SCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__OOAH,new_size__N10G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OOAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__L10G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OOAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__4YEB=((void **)result__L10G);
-  Self__Z0JC=(__INTEGER)(nb_elements__JB4 -  1);
-  while ((Self__Z0JC >=  0)) {
-    Result__4YEB[Self__Z0JC]=NULL;
-    Self__Z0JC=(__INTEGER)(Self__Z0JC -  1);
+  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);
   };
-  return(Result__4YEB);
+  return(Result__CZEB);
 }
 
-static void** create__XHTC(__INTEGER nb_elements__ZHTC)
+static void** create__1HTC(__INTEGER nb_elements__3HTC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__Y10G,a__310G,new_size__Z10G,new_size2__010G,a__B20G;
-  __UINTEGER_32 new_size__C20G;
-  __POINTER result__X10G,ptr_table__SC4G,next__RC4G,result__TC4G;
-  void *result__ROAH;
-  __INTEGER Self__APWD;
-  void **Result__DD3C;
-  sz__Y10G=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZHTC * ((__INTEGER )(sizeof(void *)))));
-  result__X10G=((__POINTER )(NULL));
-  a__310G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__Z10G=(__UINTEGER_32)((__UINTEGER_32)(sz__Y10G + a__310G) & (__UINTEGER_32)(~ a__310G));
-  new_size2__010G=(__UINTEGER_32)(new_size__Z10G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__010G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__B20G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__C20G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__010G + a__B20G) & (__UINTEGER_32)(~ a__B20G));
-    ptr_table__SC4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C20G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__RC4G=((__POINTER )(NULL));
-    result__TC4G=((__POINTER *)ptr_table__SC4G)[ 0];
-    if ((result__TC4G == (void *)NULL)) {
-      result__TC4G=new_lab__2QJ(new_size__C20G);
-      next__RC4G=(void *)((unsigned long)result__TC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C20G)));
-      ((__POINTER *)next__RC4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__SC4G)[ 0]=next__RC4G;
-    } else {
-      next__RC4G=((__POINTER *)result__TC4G)[ 0];
-      if ((next__RC4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TC4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__C20G <<  1)) <=  4096)) {
-          next__RC4G=(void *)((unsigned long)result__TC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C20G)));
-        } else {
-          next__RC4G=new_lab__2QJ(new_size__C20G);
-        };
-        ((__POINTER *)next__RC4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SC4G)[ 0]=next__RC4G;
-      } else {
-        ((__POINTER *)result__TC4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RC4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__TC4G=next__RC4G;
-      };
-    };
-    ((__POINTER *)result__TC4G)[ 0]=((__POINTER ) 3);
-    result__X10G=(void *)((unsigned long)result__TC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__ROAH=first_free__HDVB;
-    while ((((void *)result__ROAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ROAH)->map_size_and_id__YSB &  4294967292LU) < new_size__Z10G))) {
-      result__ROAH=((__MEMORY *)result__ROAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__ROAH == (void *)NULL)) {
-      result__ROAH=new_page__454();
+    if (((void *)result__ATCH == (void *)NULL)) {
+      result__ATCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__ROAH,new_size__Z10G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ROAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__X10G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ROAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__DD3C=((void **)result__X10G);
-  Self__APWD=(__INTEGER)(nb_elements__ZHTC -  1);
-  while ((Self__APWD >=  0)) {
-    Result__DD3C[Self__APWD]=NULL;
-    Self__APWD=(__INTEGER)(Self__APWD -  1);
+  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);
   };
-  return(Result__DD3C);
+  return(Result__HD3C);
 }
 
-static void** create__WESB(__INTEGER nb_elements__YESB)
+static void** create__0ESB(__INTEGER nb_elements__2ESB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__E20G,a__J20G,new_size__F20G,new_size2__G20G,a__N20G;
-  __UINTEGER_32 new_size__O20G;
-  __POINTER result__D20G,ptr_table__XC4G,next__WC4G,result__YC4G;
-  void *result__UOAH;
-  __INTEGER Self__BHNC;
-  void **Result__PJVB;
-  sz__E20G=((__UINTEGER_32 )(__INTEGER)(nb_elements__YESB * ((__INTEGER )(sizeof(void *)))));
-  result__D20G=((__POINTER )(NULL));
-  a__J20G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__F20G=(__UINTEGER_32)((__UINTEGER_32)(sz__E20G + a__J20G) & (__UINTEGER_32)(~ a__J20G));
-  new_size2__G20G=(__UINTEGER_32)(new_size__F20G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__G20G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__N20G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__O20G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__G20G + a__N20G) & (__UINTEGER_32)(~ a__N20G));
-    ptr_table__XC4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O20G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__WC4G=((__POINTER )(NULL));
-    result__YC4G=((__POINTER *)ptr_table__XC4G)[ 0];
-    if ((result__YC4G == (void *)NULL)) {
-      result__YC4G=new_lab__2QJ(new_size__O20G);
-      next__WC4G=(void *)((unsigned long)result__YC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O20G)));
-      ((__POINTER *)next__WC4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__XC4G)[ 0]=next__WC4G;
-    } else {
-      next__WC4G=((__POINTER *)result__YC4G)[ 0];
-      if ((next__WC4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YC4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O20G <<  1)) <=  4096)) {
-          next__WC4G=(void *)((unsigned long)result__YC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O20G)));
-        } else {
-          next__WC4G=new_lab__2QJ(new_size__O20G);
-        };
-        ((__POINTER *)next__WC4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XC4G)[ 0]=next__WC4G;
-      } else {
-        ((__POINTER *)result__YC4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WC4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__YC4G=next__WC4G;
-      };
-    };
-    ((__POINTER *)result__YC4G)[ 0]=((__POINTER ) 3);
-    result__D20G=(void *)((unsigned long)result__YC4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__UOAH=first_free__HDVB;
-    while ((((void *)result__UOAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UOAH)->map_size_and_id__YSB &  4294967292LU) < new_size__F20G))) {
-      result__UOAH=((__MEMORY *)result__UOAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__UOAH == (void *)NULL)) {
-      result__UOAH=new_page__454();
+    if (((void *)result__DTCH == (void *)NULL)) {
+      result__DTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__UOAH,new_size__F20G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UOAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__D20G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UOAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__PJVB=((void **)result__D20G);
-  Self__BHNC=(__INTEGER)(nb_elements__YESB -  1);
-  while ((Self__BHNC >=  0)) {
-    Result__PJVB[Self__BHNC]=NULL;
-    Self__BHNC=(__INTEGER)(Self__BHNC -  1);
+  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);
   };
-  return(Result__PJVB);
+  return(Result__TJVB);
 }
 
-static void** create__RF4(__INTEGER nb_elements__TF4)
+static void** create__VF4(__INTEGER nb_elements__XF4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__Q20G,a__V20G,new_size__R20G,new_size2__S20G,a__Z20G;
-  __UINTEGER_32 new_size__020G;
-  __POINTER result__P20G,ptr_table__2C4G,next__1C4G,result__3C4G;
-  void *result__XOAH;
-  __INTEGER Self__A2JC;
-  void **Result__54EB;
-  sz__Q20G=((__UINTEGER_32 )(__INTEGER)(nb_elements__TF4 * ((__INTEGER )(sizeof(void *)))));
-  result__P20G=((__POINTER )(NULL));
-  a__V20G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__R20G=(__UINTEGER_32)((__UINTEGER_32)(sz__Q20G + a__V20G) & (__UINTEGER_32)(~ a__V20G));
-  new_size2__S20G=(__UINTEGER_32)(new_size__R20G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__S20G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__Z20G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__020G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__S20G + a__Z20G) & (__UINTEGER_32)(~ a__Z20G));
-    ptr_table__2C4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__020G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__1C4G=((__POINTER )(NULL));
-    result__3C4G=((__POINTER *)ptr_table__2C4G)[ 0];
-    if ((result__3C4G == (void *)NULL)) {
-      result__3C4G=new_lab__2QJ(new_size__020G);
-      next__1C4G=(void *)((unsigned long)result__3C4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__020G)));
-      ((__POINTER *)next__1C4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__2C4G)[ 0]=next__1C4G;
-    } else {
-      next__1C4G=((__POINTER *)result__3C4G)[ 0];
-      if ((next__1C4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3C4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__020G <<  1)) <=  4096)) {
-          next__1C4G=(void *)((unsigned long)result__3C4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__020G)));
-        } else {
-          next__1C4G=new_lab__2QJ(new_size__020G);
-        };
-        ((__POINTER *)next__1C4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2C4G)[ 0]=next__1C4G;
-      } else {
-        ((__POINTER *)result__3C4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1C4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__3C4G=next__1C4G;
-      };
-    };
-    ((__POINTER *)result__3C4G)[ 0]=((__POINTER ) 3);
-    result__P20G=(void *)((unsigned long)result__3C4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__XOAH=first_free__HDVB;
-    while ((((void *)result__XOAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XOAH)->map_size_and_id__YSB &  4294967292LU) < new_size__R20G))) {
-      result__XOAH=((__MEMORY *)result__XOAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__XOAH == (void *)NULL)) {
-      result__XOAH=new_page__454();
+    if (((void *)result__GTCH == (void *)NULL)) {
+      result__GTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__XOAH,new_size__R20G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XOAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__P20G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XOAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__54EB=((void **)result__P20G);
-  Self__A2JC=(__INTEGER)(nb_elements__TF4 -  1);
-  while ((Self__A2JC >=  0)) {
-    Result__54EB[Self__A2JC]=NULL;
-    Self__A2JC=(__INTEGER)(Self__A2JC -  1);
+  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);
   };
-  return(Result__54EB);
+  return(Result__D5EB);
 }
 
-static void** create__2Y2(__INTEGER nb_elements__4Y2)
+static void** create__AZ2(__INTEGER nb_elements__CZ2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__220G,a__B30G,new_size__320G,new_size2__420G,a__F30G;
-  __UINTEGER_32 new_size__G30G;
-  __POINTER result__120G,ptr_table__BD4G,next__AD4G,result__CD4G;
-  void *result__0OAH;
-  __INTEGER Self__CUJC;
-  void **Result__TQDB;
-  sz__220G=((__UINTEGER_32 )(__INTEGER)(nb_elements__4Y2 * ((__INTEGER )(sizeof(void *)))));
-  result__120G=((__POINTER )(NULL));
-  a__B30G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__320G=(__UINTEGER_32)((__UINTEGER_32)(sz__220G + a__B30G) & (__UINTEGER_32)(~ a__B30G));
-  new_size2__420G=(__UINTEGER_32)(new_size__320G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__420G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__F30G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__G30G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__420G + a__F30G) & (__UINTEGER_32)(~ a__F30G));
-    ptr_table__BD4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G30G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__AD4G=((__POINTER )(NULL));
-    result__CD4G=((__POINTER *)ptr_table__BD4G)[ 0];
-    if ((result__CD4G == (void *)NULL)) {
-      result__CD4G=new_lab__2QJ(new_size__G30G);
-      next__AD4G=(void *)((unsigned long)result__CD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G30G)));
-      ((__POINTER *)next__AD4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__BD4G)[ 0]=next__AD4G;
-    } else {
-      next__AD4G=((__POINTER *)result__CD4G)[ 0];
-      if ((next__AD4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CD4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G30G <<  1)) <=  4096)) {
-          next__AD4G=(void *)((unsigned long)result__CD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G30G)));
-        } else {
-          next__AD4G=new_lab__2QJ(new_size__G30G);
-        };
-        ((__POINTER *)next__AD4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BD4G)[ 0]=next__AD4G;
-      } else {
-        ((__POINTER *)result__CD4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__AD4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__CD4G=next__AD4G;
-      };
-    };
-    ((__POINTER *)result__CD4G)[ 0]=((__POINTER ) 3);
-    result__120G=(void *)((unsigned long)result__CD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__0OAH=first_free__HDVB;
-    while ((((void *)result__0OAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0OAH)->map_size_and_id__YSB &  4294967292LU) < new_size__320G))) {
-      result__0OAH=((__MEMORY *)result__0OAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__0OAH == (void *)NULL)) {
-      result__0OAH=new_page__454();
+    if (((void *)result__JTCH == (void *)NULL)) {
+      result__JTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__0OAH,new_size__320G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0OAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__120G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0OAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__TQDB=((void **)result__120G);
-  Self__CUJC=(__INTEGER)(nb_elements__4Y2 -  1);
-  while ((Self__CUJC >=  0)) {
-    Result__TQDB[Self__CUJC]=NULL;
-    Self__CUJC=(__INTEGER)(Self__CUJC -  1);
+  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);
   };
-  return(Result__TQDB);
+  return(Result__XQDB);
 }
 
-static void** create__2IRB(__INTEGER nb_elements__4IRB)
+static void** create__AJRB(__INTEGER nb_elements__CJRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__I30G,a__N30G,new_size__J30G,new_size2__K30G,a__R30G;
-  __UINTEGER_32 new_size__S30G;
-  __POINTER result__H30G,ptr_table__GD4G,next__FD4G,result__HD4G;
-  void *result__3OAH;
-  __INTEGER Self__CBNC;
-  void **Result__GIUB;
-  sz__I30G=((__UINTEGER_32 )(__INTEGER)(nb_elements__4IRB * ((__INTEGER )(sizeof(void *)))));
-  result__H30G=((__POINTER )(NULL));
-  a__N30G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__J30G=(__UINTEGER_32)((__UINTEGER_32)(sz__I30G + a__N30G) & (__UINTEGER_32)(~ a__N30G));
-  new_size2__K30G=(__UINTEGER_32)(new_size__J30G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__K30G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__R30G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__S30G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__K30G + a__R30G) & (__UINTEGER_32)(~ a__R30G));
-    ptr_table__GD4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S30G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__FD4G=((__POINTER )(NULL));
-    result__HD4G=((__POINTER *)ptr_table__GD4G)[ 0];
-    if ((result__HD4G == (void *)NULL)) {
-      result__HD4G=new_lab__2QJ(new_size__S30G);
-      next__FD4G=(void *)((unsigned long)result__HD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S30G)));
-      ((__POINTER *)next__FD4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__GD4G)[ 0]=next__FD4G;
-    } else {
-      next__FD4G=((__POINTER *)result__HD4G)[ 0];
-      if ((next__FD4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HD4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__S30G <<  1)) <=  4096)) {
-          next__FD4G=(void *)((unsigned long)result__HD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S30G)));
-        } else {
-          next__FD4G=new_lab__2QJ(new_size__S30G);
-        };
-        ((__POINTER *)next__FD4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GD4G)[ 0]=next__FD4G;
-      } else {
-        ((__POINTER *)result__HD4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__FD4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__HD4G=next__FD4G;
-      };
-    };
-    ((__POINTER *)result__HD4G)[ 0]=((__POINTER ) 3);
-    result__H30G=(void *)((unsigned long)result__HD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__3OAH=first_free__HDVB;
-    while ((((void *)result__3OAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3OAH)->map_size_and_id__YSB &  4294967292LU) < new_size__J30G))) {
-      result__3OAH=((__MEMORY *)result__3OAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__3OAH == (void *)NULL)) {
-      result__3OAH=new_page__454();
+    if (((void *)result__MTCH == (void *)NULL)) {
+      result__MTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__3OAH,new_size__J30G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3OAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__H30G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3OAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__GIUB=((void **)result__H30G);
-  Self__CBNC=(__INTEGER)(nb_elements__4IRB -  1);
-  while ((Self__CBNC >=  0)) {
-    Result__GIUB[Self__CBNC]=NULL;
-    Self__CBNC=(__INTEGER)(Self__CBNC -  1);
+  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);
   };
-  return(Result__GIUB);
+  return(Result__KIUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__YER(__INTEGER new_count__0ER)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__2ER(__INTEGER new_count__4ER)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__WKR,ptr_table__LD4G,next__KD4G,result__MD4G;
-  __POINTER ptr_table__QD4G,next__PD4G,result__RD4G;
-  __INTEGER typ_id__1KR;
-  __UINTEGER_32 sz__YKR,a__V30G,new_size__W30G,t__030G,a__Z30G;
-  __UINTEGER_32 new_size__TD4G,lab_type__SD4G;
-  __FAST_ARRAYoITM_TYPE_MONOo *result__VKR,*Self__PJW;
-  result__VKR=NULL;
-  ptr__WKR=((__POINTER )(NULL));
-  typ_id__1KR= 0;
-  sz__YKR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
-  if ((sz__YKR ==  0)) {
-    result__VKR=FAST_ARRAYoITM_TYPE_MONOo__;
+  __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__;
   } else {
-    typ_id__1KR=__FAST_ARRAYoITM_TYPE_MONOo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__YKR);
-    if ((typ_id__1KR == (__INTEGER)(-  1))) {
-      a__V30G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__W30G=(__UINTEGER_32)((__UINTEGER_32)(sz__YKR + a__V30G) & (__UINTEGER_32)(~ a__V30G));
-      ptr_table__LD4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W30G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__KD4G=((__POINTER )(NULL));
-      result__MD4G=((__POINTER *)ptr_table__LD4G)[ 0];
-      if ((result__MD4G == (void *)NULL)) {
-        result__MD4G=new_lab__2QJ(new_size__W30G);
-        next__KD4G=(void *)((unsigned long)result__MD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W30G)));
-        ((__POINTER *)next__KD4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LD4G)[ 0]=next__KD4G;
-      } else {
-        next__KD4G=((__POINTER *)result__MD4G)[ 0];
-        if ((next__KD4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MD4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W30G <<  1)) <=  4096)) {
-            next__KD4G=(void *)((unsigned long)result__MD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W30G)));
-          } else {
-            next__KD4G=new_lab__2QJ(new_size__W30G);
-          };
-          ((__POINTER *)next__KD4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LD4G)[ 0]=next__KD4G;
-        } else {
-          ((__POINTER *)result__MD4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__KD4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MD4G=next__KD4G;
-        };
-      };
-      ptr__WKR=result__MD4G;
-    } else {
-      t__030G=((__UINTEGER_32 )typ_id__1KR);
-      a__Z30G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TD4G=(__UINTEGER_32)((__UINTEGER_32)(sz__YKR + a__Z30G) & (__UINTEGER_32)(~ a__Z30G));
-      ptr_table__QD4G=((__POINTER )(&(table_type[(t__030G)])));
-      lab_type__SD4G=(__UINTEGER_32)(t__030G |  1);
-      next__PD4G=((__POINTER )(NULL));
-      result__RD4G=((__POINTER *)ptr_table__QD4G)[ 0];
-      if ((result__RD4G == (void *)NULL)) {
-        result__RD4G=new_lab__2QJ(lab_type__SD4G);
-        next__PD4G=(void *)((unsigned long)result__RD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TD4G)));
-        ((__POINTER *)next__PD4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QD4G)[ 0]=next__PD4G;
-      } else {
-        next__PD4G=((__POINTER *)result__RD4G)[ 0];
-        if ((next__PD4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RD4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TD4G <<  1)) <=  4096)) {
-            next__PD4G=(void *)((unsigned long)result__RD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TD4G)));
-          } else {
-            next__PD4G=new_lab__2QJ(lab_type__SD4G);
-          };
-          ((__POINTER *)next__PD4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QD4G)[ 0]=next__PD4G;
-        } else {
-          ((__POINTER *)result__RD4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__PD4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RD4G=next__PD4G;
-        };
-      };
-      ptr__WKR=result__RD4G;
-    };
-    result__VKR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__WKR);
-    *(result__VKR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
-  };
-  Self__PJW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__VKR);
-  if ((Self__PJW->parent_arrayed_collection__JXC.capacity__PNV < new_count__0ER)) {
-    Self__PJW->parent_arrayed_collection__JXC.storage__BMV=create__DBRB(new_count__0ER);
-    Self__PJW->parent_arrayed_collection__JXC.capacity__PNV=new_count__0ER;
-  };
-  Self__PJW->parent_arrayed_collection__JXC.upper__0HV=(__INTEGER)(-  1);
-  return(result__VKR);
+    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);
 }
 
-static void** create__LZBB(__INTEGER nb_elements__NZBB)
+static void** create__PZBB(__INTEGER nb_elements__RZBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__230G,a__B40G,new_size__330G,new_size2__430G,a__F40G;
-  __UINTEGER_32 new_size__G40G;
-  __POINTER result__130G,ptr_table__VD4G,next__UD4G,result__WD4G;
-  void *result__APAH;
-  __INTEGER Self__ULKC;
-  void **Result__XXIB;
-  sz__230G=((__UINTEGER_32 )(__INTEGER)(nb_elements__NZBB * ((__INTEGER )(sizeof(void *)))));
-  result__130G=((__POINTER )(NULL));
-  a__B40G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__330G=(__UINTEGER_32)((__UINTEGER_32)(sz__230G + a__B40G) & (__UINTEGER_32)(~ a__B40G));
-  new_size2__430G=(__UINTEGER_32)(new_size__330G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__430G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__F40G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__G40G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__430G + a__F40G) & (__UINTEGER_32)(~ a__F40G));
-    ptr_table__VD4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G40G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__UD4G=((__POINTER )(NULL));
-    result__WD4G=((__POINTER *)ptr_table__VD4G)[ 0];
-    if ((result__WD4G == (void *)NULL)) {
-      result__WD4G=new_lab__2QJ(new_size__G40G);
-      next__UD4G=(void *)((unsigned long)result__WD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G40G)));
-      ((__POINTER *)next__UD4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__VD4G)[ 0]=next__UD4G;
-    } else {
-      next__UD4G=((__POINTER *)result__WD4G)[ 0];
-      if ((next__UD4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WD4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G40G <<  1)) <=  4096)) {
-          next__UD4G=(void *)((unsigned long)result__WD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G40G)));
-        } else {
-          next__UD4G=new_lab__2QJ(new_size__G40G);
-        };
-        ((__POINTER *)next__UD4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VD4G)[ 0]=next__UD4G;
-      } else {
-        ((__POINTER *)result__WD4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__UD4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__WD4G=next__UD4G;
-      };
-    };
-    ((__POINTER *)result__WD4G)[ 0]=((__POINTER ) 3);
-    result__130G=(void *)((unsigned long)result__WD4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__APAH=first_free__HDVB;
-    while ((((void *)result__APAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__APAH)->map_size_and_id__YSB &  4294967292LU) < new_size__330G))) {
-      result__APAH=((__MEMORY *)result__APAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__APAH == (void *)NULL)) {
-      result__APAH=new_page__454();
+    if (((void *)result__PTCH == (void *)NULL)) {
+      result__PTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__APAH,new_size__330G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__APAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__130G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__APAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__XXIB=((void **)result__130G);
-  Self__ULKC=(__INTEGER)(nb_elements__NZBB -  1);
-  while ((Self__ULKC >=  0)) {
-    Result__XXIB[Self__ULKC]=NULL;
-    Self__ULKC=(__INTEGER)(Self__ULKC -  1);
+  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);
   };
-  return(Result__XXIB);
+  return(Result__1XIB);
 }
 
-static void** create__FLXB(__INTEGER nb_elements__HLXB)
+static void** create__JLXB(__INTEGER nb_elements__LLXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__I40G,a__N40G,new_size__J40G,new_size2__K40G,a__R40G;
-  __UINTEGER_32 new_size__S40G;
-  __POINTER result__H40G,ptr_table__0D4G,next__ZD4G,result__1D4G;
-  void *result__DPAH;
-  __INTEGER Self__BZOC;
-  void **Result__YW0B;
-  sz__I40G=((__UINTEGER_32 )(__INTEGER)(nb_elements__HLXB * ((__INTEGER )(sizeof(void *)))));
-  result__H40G=((__POINTER )(NULL));
-  a__N40G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__J40G=(__UINTEGER_32)((__UINTEGER_32)(sz__I40G + a__N40G) & (__UINTEGER_32)(~ a__N40G));
-  new_size2__K40G=(__UINTEGER_32)(new_size__J40G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__K40G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__R40G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__S40G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__K40G + a__R40G) & (__UINTEGER_32)(~ a__R40G));
-    ptr_table__0D4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S40G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__ZD4G=((__POINTER )(NULL));
-    result__1D4G=((__POINTER *)ptr_table__0D4G)[ 0];
-    if ((result__1D4G == (void *)NULL)) {
-      result__1D4G=new_lab__2QJ(new_size__S40G);
-      next__ZD4G=(void *)((unsigned long)result__1D4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S40G)));
-      ((__POINTER *)next__ZD4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__0D4G)[ 0]=next__ZD4G;
-    } else {
-      next__ZD4G=((__POINTER *)result__1D4G)[ 0];
-      if ((next__ZD4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1D4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__S40G <<  1)) <=  4096)) {
-          next__ZD4G=(void *)((unsigned long)result__1D4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S40G)));
-        } else {
-          next__ZD4G=new_lab__2QJ(new_size__S40G);
-        };
-        ((__POINTER *)next__ZD4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0D4G)[ 0]=next__ZD4G;
-      } else {
-        ((__POINTER *)result__1D4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZD4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__1D4G=next__ZD4G;
-      };
-    };
-    ((__POINTER *)result__1D4G)[ 0]=((__POINTER ) 3);
-    result__H40G=(void *)((unsigned long)result__1D4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__DPAH=first_free__HDVB;
-    while ((((void *)result__DPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__J40G))) {
-      result__DPAH=((__MEMORY *)result__DPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__DPAH == (void *)NULL)) {
-      result__DPAH=new_page__454();
+    if (((void *)result__STCH == (void *)NULL)) {
+      result__STCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__DPAH,new_size__J40G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__H40G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__YW0B=((void **)result__H40G);
-  Self__BZOC=(__INTEGER)(nb_elements__HLXB -  1);
-  while ((Self__BZOC >=  0)) {
-    Result__YW0B[Self__BZOC]=NULL;
-    Self__BZOC=(__INTEGER)(Self__BZOC -  1);
+  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);
   };
-  return(Result__YW0B);
+  return(Result__2W0B);
 }
 
-static void** create__AUWB(__INTEGER nb_elements__CUWB)
+static void** create__EUWB(__INTEGER nb_elements__GUWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__U40G,a__Z40G,new_size__V40G,new_size2__W40G,a__340G;
-  __UINTEGER_32 new_size__440G;
-  __POINTER result__T40G,ptr_table__5D4G,next__4D4G,result__AE4G;
-  void *result__GPAH;
-  __INTEGER Self__0XOC;
-  void **Result__BJ0B;
-  sz__U40G=((__UINTEGER_32 )(__INTEGER)(nb_elements__CUWB * ((__INTEGER )(sizeof(void *)))));
-  result__T40G=((__POINTER )(NULL));
-  a__Z40G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__V40G=(__UINTEGER_32)((__UINTEGER_32)(sz__U40G + a__Z40G) & (__UINTEGER_32)(~ a__Z40G));
-  new_size2__W40G=(__UINTEGER_32)(new_size__V40G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__W40G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__340G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__440G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__W40G + a__340G) & (__UINTEGER_32)(~ a__340G));
-    ptr_table__5D4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__440G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__4D4G=((__POINTER )(NULL));
-    result__AE4G=((__POINTER *)ptr_table__5D4G)[ 0];
-    if ((result__AE4G == (void *)NULL)) {
-      result__AE4G=new_lab__2QJ(new_size__440G);
-      next__4D4G=(void *)((unsigned long)result__AE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__440G)));
-      ((__POINTER *)next__4D4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__5D4G)[ 0]=next__4D4G;
-    } else {
-      next__4D4G=((__POINTER *)result__AE4G)[ 0];
-      if ((next__4D4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AE4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__440G <<  1)) <=  4096)) {
-          next__4D4G=(void *)((unsigned long)result__AE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__440G)));
-        } else {
-          next__4D4G=new_lab__2QJ(new_size__440G);
-        };
-        ((__POINTER *)next__4D4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5D4G)[ 0]=next__4D4G;
-      } else {
-        ((__POINTER *)result__AE4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4D4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__AE4G=next__4D4G;
-      };
-    };
-    ((__POINTER *)result__AE4G)[ 0]=((__POINTER ) 3);
-    result__T40G=(void *)((unsigned long)result__AE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__GPAH=first_free__HDVB;
-    while ((((void *)result__GPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__V40G))) {
-      result__GPAH=((__MEMORY *)result__GPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__GPAH == (void *)NULL)) {
-      result__GPAH=new_page__454();
+    if (((void *)result__VTCH == (void *)NULL)) {
+      result__VTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__GPAH,new_size__V40G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__T40G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__BJ0B=((void **)result__T40G);
-  Self__0XOC=(__INTEGER)(nb_elements__CUWB -  1);
-  while ((Self__0XOC >=  0)) {
-    Result__BJ0B[Self__0XOC]=NULL;
-    Self__0XOC=(__INTEGER)(Self__0XOC -  1);
+  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);
   };
-  return(Result__BJ0B);
+  return(Result__FJ0B);
 }
 
-static void** create__5RXB(__INTEGER nb_elements__BSXB)
+static void** create__DSXB(__INTEGER nb_elements__FSXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__A50G,a__F50G,new_size__B50G,new_size2__C50G,a__J50G;
-  __UINTEGER_32 new_size__K50G;
-  __POINTER result__540G,ptr_table__EE4G,next__DE4G,result__FE4G;
-  void *result__JPAH;
-  __INTEGER Self__I0OC;
-  void **Result__O40B;
-  sz__A50G=((__UINTEGER_32 )(__INTEGER)(nb_elements__BSXB * ((__INTEGER )(sizeof(void *)))));
-  result__540G=((__POINTER )(NULL));
-  a__F50G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__B50G=(__UINTEGER_32)((__UINTEGER_32)(sz__A50G + a__F50G) & (__UINTEGER_32)(~ a__F50G));
-  new_size2__C50G=(__UINTEGER_32)(new_size__B50G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__C50G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__J50G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__K50G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__C50G + a__J50G) & (__UINTEGER_32)(~ a__J50G));
-    ptr_table__EE4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K50G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__DE4G=((__POINTER )(NULL));
-    result__FE4G=((__POINTER *)ptr_table__EE4G)[ 0];
-    if ((result__FE4G == (void *)NULL)) {
-      result__FE4G=new_lab__2QJ(new_size__K50G);
-      next__DE4G=(void *)((unsigned long)result__FE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K50G)));
-      ((__POINTER *)next__DE4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__EE4G)[ 0]=next__DE4G;
-    } else {
-      next__DE4G=((__POINTER *)result__FE4G)[ 0];
-      if ((next__DE4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FE4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__K50G <<  1)) <=  4096)) {
-          next__DE4G=(void *)((unsigned long)result__FE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K50G)));
-        } else {
-          next__DE4G=new_lab__2QJ(new_size__K50G);
-        };
-        ((__POINTER *)next__DE4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EE4G)[ 0]=next__DE4G;
-      } else {
-        ((__POINTER *)result__FE4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__DE4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__FE4G=next__DE4G;
-      };
-    };
-    ((__POINTER *)result__FE4G)[ 0]=((__POINTER ) 3);
-    result__540G=(void *)((unsigned long)result__FE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__JPAH=first_free__HDVB;
-    while ((((void *)result__JPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__B50G))) {
-      result__JPAH=((__MEMORY *)result__JPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__JPAH == (void *)NULL)) {
-      result__JPAH=new_page__454();
+    if (((void *)result__YTCH == (void *)NULL)) {
+      result__YTCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__JPAH,new_size__B50G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__540G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__O40B=((void **)result__540G);
-  Self__I0OC=(__INTEGER)(nb_elements__BSXB -  1);
-  while ((Self__I0OC >=  0)) {
-    Result__O40B[Self__I0OC]=NULL;
-    Self__I0OC=(__INTEGER)(Self__I0OC -  1);
+  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);
   };
-  return(Result__O40B);
+  return(Result__S40B);
 }
 
-static void** create__FH5(__INTEGER nb_elements__HH5)
+static void** create__JH5(__INTEGER nb_elements__LH5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__M50G,a__R50G,new_size__N50G,new_size2__O50G,a__V50G;
-  __UINTEGER_32 new_size__W50G;
-  __POINTER result__L50G,ptr_table__JE4G,next__IE4G,result__KE4G;
-  void *result__MPAH;
-  __INTEGER Self__35JC;
-  void **Result__4AGB;
-  sz__M50G=((__UINTEGER_32 )(__INTEGER)(nb_elements__HH5 * ((__INTEGER )(sizeof(void *)))));
-  result__L50G=((__POINTER )(NULL));
-  a__R50G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__N50G=(__UINTEGER_32)((__UINTEGER_32)(sz__M50G + a__R50G) & (__UINTEGER_32)(~ a__R50G));
-  new_size2__O50G=(__UINTEGER_32)(new_size__N50G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__O50G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__V50G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__W50G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__O50G + a__V50G) & (__UINTEGER_32)(~ a__V50G));
-    ptr_table__JE4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W50G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__IE4G=((__POINTER )(NULL));
-    result__KE4G=((__POINTER *)ptr_table__JE4G)[ 0];
-    if ((result__KE4G == (void *)NULL)) {
-      result__KE4G=new_lab__2QJ(new_size__W50G);
-      next__IE4G=(void *)((unsigned long)result__KE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W50G)));
-      ((__POINTER *)next__IE4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__JE4G)[ 0]=next__IE4G;
-    } else {
-      next__IE4G=((__POINTER *)result__KE4G)[ 0];
-      if ((next__IE4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KE4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W50G <<  1)) <=  4096)) {
-          next__IE4G=(void *)((unsigned long)result__KE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W50G)));
-        } else {
-          next__IE4G=new_lab__2QJ(new_size__W50G);
-        };
-        ((__POINTER *)next__IE4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JE4G)[ 0]=next__IE4G;
-      } else {
-        ((__POINTER *)result__KE4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__IE4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__KE4G=next__IE4G;
-      };
-    };
-    ((__POINTER *)result__KE4G)[ 0]=((__POINTER ) 3);
-    result__L50G=(void *)((unsigned long)result__KE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__MPAH=first_free__HDVB;
-    while ((((void *)result__MPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__N50G))) {
-      result__MPAH=((__MEMORY *)result__MPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__MPAH == (void *)NULL)) {
-      result__MPAH=new_page__454();
+    if (((void *)result__1TCH == (void *)NULL)) {
+      result__1TCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__MPAH,new_size__N50G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__L50G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__4AGB=((void **)result__L50G);
-  Self__35JC=(__INTEGER)(nb_elements__HH5 -  1);
-  while ((Self__35JC >=  0)) {
-    Result__4AGB[Self__35JC]=NULL;
-    Self__35JC=(__INTEGER)(Self__35JC -  1);
+  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);
   };
-  return(Result__4AGB);
+  return(Result__CBGB);
 }
 
-static void fast_put__to__DOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__EOZ,void *v__FOZ,void *k__GOZ)
+static void fast_put__to__HOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__IOZ,void *v__JOZ,void *k__KOZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__LO3G,*Self__QO3G;
-  __INTEGER result__KO3G,__tmp__MO3G,Self__NO3G,idx__OOZ,idx__BCTB;
-  __INTEGER new_capacity__CCTB,i__DCTB,result__PO3G,__tmp__RO3G;
-  __INTEGER Self__SO3G,typ_id__QETB;
-  __POINTER ptr__LETB,ptr_table__OE4G,next__NE4G,result__PE4G;
-  __POINTER ptr_table__TE4G,next__SE4G,result__UE4G;
-  __UINTEGER_32 sz__NETB,a__XS1G,new_size__YS1G,t__2S1G,a__1S1G;
-  __UINTEGER_32 new_size__WE4G,lab_type__VE4G;
-  void *node__POZ,*node1__FCTB,*node2__GCTB,*__tmp__2PZ;
-  void **old_buckets__ECTB;
-  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__KETB;
-  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__2WEC;
-  Self__LO3G=((__STRING_CONSTANT *)k__GOZ);
-  result__KO3G= 0;
-  __tmp__MO3G=Self__LO3G->count__DD;
-  Self__NO3G= 1;
-  while ((Self__NO3G <= __tmp__MO3G)) {
-    result__KO3G=(__INTEGER)((__INTEGER)( 5 * result__KO3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LO3G->storage__FQO)[(__INTEGER)(Self__NO3G -  1)])));
-    Self__NO3G=(__INTEGER)(Self__NO3G +  1);
-  };
-  if ((result__KO3G <  0)) {
-    result__KO3G=(__INTEGER)(~ result__KO3G);
-  };
-  idx__OOZ=(__INTEGER)(result__KO3G % Self__EOZ->capacity__X1T);
-  node__POZ=((void **)Self__EOZ->buckets__21T)[idx__OOZ];
-  while ((! (((void *)node__POZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__POZ)->key__I2T == (void *)k__GOZ)))) {
-    node__POZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__POZ)->next__T2T;
-  };
-  if (((void *)node__POZ == (void *)NULL)) {
-    if ((Self__EOZ->capacity__X1T == Self__EOZ->count__2EZ)) {
-      idx__BCTB= 0;
-      node1__FCTB=NULL;
-      node2__GCTB=NULL;
-      old_buckets__ECTB=Self__EOZ->buckets__21T;
-      new_capacity__CCTB=prime_number_ceiling__H41((__INTEGER)(Self__EOZ->capacity__X1T +  1));
-      Self__EOZ->buckets__21T=create__FH5(new_capacity__CCTB);
-      i__DCTB=(__INTEGER)(Self__EOZ->capacity__X1T -  1);
-      Self__EOZ->capacity__X1T=new_capacity__CCTB;
-      while ((i__DCTB >=  0)) {
-        node1__FCTB=((void **)old_buckets__ECTB)[i__DCTB];
-        while (((void *)node1__FCTB != (void *)NULL)) {
-          node2__GCTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__FCTB)->next__T2T;
-          Self__QO3G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__FCTB)->key__I2T);
-          result__PO3G= 0;
-          __tmp__RO3G=Self__QO3G->count__DD;
-          Self__SO3G= 1;
-          while ((Self__SO3G <= __tmp__RO3G)) {
-            result__PO3G=(__INTEGER)((__INTEGER)( 5 * result__PO3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QO3G->storage__FQO)[(__INTEGER)(Self__SO3G -  1)])));
-            Self__SO3G=(__INTEGER)(Self__SO3G +  1);
-          };
-          if ((result__PO3G <  0)) {
-            result__PO3G=(__INTEGER)(~ result__PO3G);
-          };
-          idx__BCTB=(__INTEGER)(result__PO3G % Self__EOZ->capacity__X1T);
-          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__FCTB)->next__T2T=((void **)Self__EOZ->buckets__21T)[idx__BCTB];
-          ((void **)Self__EOZ->buckets__21T)[idx__BCTB]=node1__FCTB;
-          node1__FCTB=node2__GCTB;
-        };
-        i__DCTB=(__INTEGER)(i__DCTB -  1);
-      };
-      idx__OOZ=(__INTEGER)(result__KO3G % new_capacity__CCTB);
-    };
-    __tmp__2PZ=((void **)Self__EOZ->buckets__21T)[idx__OOZ];
-    result__KETB=NULL;
-    ptr__LETB=((__POINTER )(NULL));
-    typ_id__QETB= 0;
-    sz__NETB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
-    if ((sz__NETB ==  0)) {
-      result__KETB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-    } else {
-      typ_id__QETB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__NETB);
-      if ((typ_id__QETB == (__INTEGER)(-  1))) {
-        a__XS1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YS1G=(__UINTEGER_32)((__UINTEGER_32)(sz__NETB + a__XS1G) & (__UINTEGER_32)(~ a__XS1G));
-        ptr_table__OE4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YS1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__NE4G=((__POINTER )(NULL));
-        result__PE4G=((__POINTER *)ptr_table__OE4G)[ 0];
-        if ((result__PE4G == (void *)NULL)) {
-          result__PE4G=new_lab__2QJ(new_size__YS1G);
-          next__NE4G=(void *)((unsigned long)result__PE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YS1G)));
-          ((__POINTER *)next__NE4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OE4G)[ 0]=next__NE4G;
-        } else {
-          next__NE4G=((__POINTER *)result__PE4G)[ 0];
-          if ((next__NE4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PE4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YS1G <<  1)) <=  4096)) {
-              next__NE4G=(void *)((unsigned long)result__PE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YS1G)));
+  __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)));
             } else {
-              next__NE4G=new_lab__2QJ(new_size__YS1G);
-            };
-            ((__POINTER *)next__NE4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OE4G)[ 0]=next__NE4G;
-          } else {
-            ((__POINTER *)result__PE4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NE4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PE4G=next__NE4G;
-          };
-        };
-        ptr__LETB=result__PE4G;
-      } else {
-        t__2S1G=((__UINTEGER_32 )typ_id__QETB);
-        a__1S1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__WE4G=(__UINTEGER_32)((__UINTEGER_32)(sz__NETB + a__1S1G) & (__UINTEGER_32)(~ a__1S1G));
-        ptr_table__TE4G=((__POINTER )(&(table_type[(t__2S1G)])));
-        lab_type__VE4G=(__UINTEGER_32)(t__2S1G |  1);
-        next__SE4G=((__POINTER )(NULL));
-        result__UE4G=((__POINTER *)ptr_table__TE4G)[ 0];
-        if ((result__UE4G == (void *)NULL)) {
-          result__UE4G=new_lab__2QJ(lab_type__VE4G);
-          next__SE4G=(void *)((unsigned long)result__UE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WE4G)));
-          ((__POINTER *)next__SE4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TE4G)[ 0]=next__SE4G;
-        } else {
-          next__SE4G=((__POINTER *)result__UE4G)[ 0];
-          if ((next__SE4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UE4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WE4G <<  1)) <=  4096)) {
-              next__SE4G=(void *)((unsigned long)result__UE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WE4G)));
+              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)));
             } else {
-              next__SE4G=new_lab__2QJ(lab_type__VE4G);
+              next__0HAH=new_lab__ARJ(lab_type__3HAH);
             };
-            ((__POINTER *)next__SE4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TE4G)[ 0]=next__SE4G;
+            ((__POINTER *)next__0HAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1HAH)[ 0]=next__0HAH;
           } else {
-            ((__POINTER *)result__UE4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SE4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UE4G=next__SE4G;
+            ((__POINTER *)result__2HAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0HAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2HAH=next__0HAH;
           };
         };
-        ptr__LETB=result__UE4G;
+        ptr__PETB=result__2HAH;
       };
-      result__KETB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__LETB);
-      *(result__KETB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+      result__OETB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__PETB);
+      *(result__OETB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
     };
-    Self__2WEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__KETB);
-    Self__2WEC->item__12T=v__FOZ;
-    Self__2WEC->key__I2T=k__GOZ;
-    Self__2WEC->next__T2T=__tmp__2PZ;
-    node__POZ=result__KETB;
-    ((void **)Self__EOZ->buckets__21T)[idx__OOZ]=result__KETB;
-    Self__EOZ->count__2EZ=(__INTEGER)(Self__EOZ->count__2EZ +  1);
+    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);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__POZ)->item__12T=v__FOZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__TOZ)->item__52T=v__JOZ;
   };
 }
 
-static void** create__LHYB(__INTEGER nb_elements__NHYB)
+static void** create__PHYB(__INTEGER nb_elements__RHYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__AA1G,a__FA1G,new_size__BA1G,new_size2__CA1G,a__JA1G;
-  __UINTEGER_32 new_size__KA1G;
-  __POINTER result__550G,ptr_table__YE4G,next__XE4G,result__ZE4G;
-  void *result__PPAH;
-  __INTEGER Self__P1OC;
-  void **Result__MI1B;
-  sz__AA1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__NHYB * ((__INTEGER )(sizeof(void *)))));
-  result__550G=((__POINTER )(NULL));
-  a__FA1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__BA1G=(__UINTEGER_32)((__UINTEGER_32)(sz__AA1G + a__FA1G) & (__UINTEGER_32)(~ a__FA1G));
-  new_size2__CA1G=(__UINTEGER_32)(new_size__BA1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__CA1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JA1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KA1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CA1G + a__JA1G) & (__UINTEGER_32)(~ a__JA1G));
-    ptr_table__YE4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KA1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__XE4G=((__POINTER )(NULL));
-    result__ZE4G=((__POINTER *)ptr_table__YE4G)[ 0];
-    if ((result__ZE4G == (void *)NULL)) {
-      result__ZE4G=new_lab__2QJ(new_size__KA1G);
-      next__XE4G=(void *)((unsigned long)result__ZE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KA1G)));
-      ((__POINTER *)next__XE4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__YE4G)[ 0]=next__XE4G;
-    } else {
-      next__XE4G=((__POINTER *)result__ZE4G)[ 0];
-      if ((next__XE4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZE4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KA1G <<  1)) <=  4096)) {
-          next__XE4G=(void *)((unsigned long)result__ZE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KA1G)));
-        } else {
-          next__XE4G=new_lab__2QJ(new_size__KA1G);
-        };
-        ((__POINTER *)next__XE4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YE4G)[ 0]=next__XE4G;
-      } else {
-        ((__POINTER *)result__ZE4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__XE4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__ZE4G=next__XE4G;
-      };
-    };
-    ((__POINTER *)result__ZE4G)[ 0]=((__POINTER ) 3);
-    result__550G=(void *)((unsigned long)result__ZE4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__PPAH=first_free__HDVB;
-    while ((((void *)result__PPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__BA1G))) {
-      result__PPAH=((__MEMORY *)result__PPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__PPAH == (void *)NULL)) {
-      result__PPAH=new_page__454();
+    if (((void *)result__4TCH == (void *)NULL)) {
+      result__4TCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__PPAH,new_size__BA1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__550G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__MI1B=((void **)result__550G);
-  Self__P1OC=(__INTEGER)(nb_elements__NHYB -  1);
-  while ((Self__P1OC >=  0)) {
-    Result__MI1B[Self__P1OC]=NULL;
-    Self__P1OC=(__INTEGER)(Self__P1OC -  1);
+  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);
   };
-  return(Result__MI1B);
+  return(Result__QI1B);
 }
 
-static void* get__TSI(void *n__VSI)
+static void* get__XSI(void *n__ZSI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__3SI;
-  __ITM_TYPE_SIMPLE *result__1LL,*Self__CRU;
-  __POINTER ptr__2LL,ptr_table__3E4G,next__2E4G,result__4E4G;
-  __POINTER ptr_table__CF4G,next__BF4G,result__DF4G;
-  __INTEGER typ_id__BML;
-  __UINTEGER_32 sz__4LL,a__NA1G,new_size__OA1G,t__SA1G,a__RA1G;
-  __UINTEGER_32 new_size__FF4G,lab_type__EF4G;
-  result__3SI=fast_reference_at__I1T(dico__CTI,n__VSI);
-  if (((void *)result__3SI == (void *)NULL)) {
-    result__1LL=NULL;
-    ptr__2LL=((__POINTER )(NULL));
-    typ_id__BML= 0;
-    sz__4LL=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
-    if ((sz__4LL ==  0)) {
-      result__1LL=ITM_TYPE_SIMPLE__;
-    } else {
-      typ_id__BML=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4LL);
-      if ((typ_id__BML == (__INTEGER)(-  1))) {
-        a__NA1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OA1G=(__UINTEGER_32)((__UINTEGER_32)(sz__4LL + a__NA1G) & (__UINTEGER_32)(~ a__NA1G));
-        ptr_table__3E4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OA1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__2E4G=((__POINTER )(NULL));
-        result__4E4G=((__POINTER *)ptr_table__3E4G)[ 0];
-        if ((result__4E4G == (void *)NULL)) {
-          result__4E4G=new_lab__2QJ(new_size__OA1G);
-          next__2E4G=(void *)((unsigned long)result__4E4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OA1G)));
-          ((__POINTER *)next__2E4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3E4G)[ 0]=next__2E4G;
-        } else {
-          next__2E4G=((__POINTER *)result__4E4G)[ 0];
-          if ((next__2E4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4E4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OA1G <<  1)) <=  4096)) {
-              next__2E4G=(void *)((unsigned long)result__4E4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OA1G)));
+  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)));
             } else {
-              next__2E4G=new_lab__2QJ(new_size__OA1G);
-            };
-            ((__POINTER *)next__2E4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3E4G)[ 0]=next__2E4G;
-          } else {
-            ((__POINTER *)result__4E4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2E4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__4E4G=next__2E4G;
-          };
-        };
-        ptr__2LL=result__4E4G;
-      } else {
-        t__SA1G=((__UINTEGER_32 )typ_id__BML);
-        a__RA1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__FF4G=(__UINTEGER_32)((__UINTEGER_32)(sz__4LL + a__RA1G) & (__UINTEGER_32)(~ a__RA1G));
-        ptr_table__CF4G=((__POINTER )(&(table_type[(t__SA1G)])));
-        lab_type__EF4G=(__UINTEGER_32)(t__SA1G |  1);
-        next__BF4G=((__POINTER )(NULL));
-        result__DF4G=((__POINTER *)ptr_table__CF4G)[ 0];
-        if ((result__DF4G == (void *)NULL)) {
-          result__DF4G=new_lab__2QJ(lab_type__EF4G);
-          next__BF4G=(void *)((unsigned long)result__DF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FF4G)));
-          ((__POINTER *)next__BF4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CF4G)[ 0]=next__BF4G;
-        } else {
-          next__BF4G=((__POINTER *)result__DF4G)[ 0];
-          if ((next__BF4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DF4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FF4G <<  1)) <=  4096)) {
-              next__BF4G=(void *)((unsigned long)result__DF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FF4G)));
+              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)));
             } else {
-              next__BF4G=new_lab__2QJ(lab_type__EF4G);
+              next__JIAH=new_lab__ARJ(lab_type__MIAH);
             };
-            ((__POINTER *)next__BF4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CF4G)[ 0]=next__BF4G;
+            ((__POINTER *)next__JIAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KIAH)[ 0]=next__JIAH;
           } else {
-            ((__POINTER *)result__DF4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BF4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DF4G=next__BF4G;
+            ((__POINTER *)result__LIAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LIAH=next__JIAH;
           };
         };
-        ptr__2LL=result__DF4G;
+        ptr__AML=result__LIAH;
       };
-      result__1LL=((__ITM_TYPE_SIMPLE *)ptr__2LL);
-      *(result__1LL) = *(ITM_TYPE_SIMPLE__);
+      result__5LL=((__ITM_TYPE_SIMPLE *)ptr__AML);
+      *(result__5LL) = *(ITM_TYPE_SIMPLE__);
     };
-    Self__CRU=((__ITM_TYPE_SIMPLE *)result__1LL);
-    Self__CRU->name__0XP=n__VSI;
-    fast_put__to__DOZ(dico__CTI,Self__CRU,n__VSI);
-    result__3SI=result__1LL;
+    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;
   };
-  return(result__3SI);
+  return(result__BTI);
 }
 
-static void** create__UGQB(__INTEGER nb_elements__WGQB)
+static void** create__YGQB(__INTEGER nb_elements__0GQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__UA1G,a__ZA1G,new_size__VA1G,new_size2__WA1G,a__3A1G;
-  __UINTEGER_32 new_size__4A1G;
-  __POINTER result__TA1G,ptr_table__HF4G,next__GF4G,result__IF4G;
-  void *result__SPAH;
-  __INTEGER Self__UWMC;
-  void **Result__BATB;
-  sz__UA1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__WGQB * ((__INTEGER )(sizeof(void *)))));
-  result__TA1G=((__POINTER )(NULL));
-  a__ZA1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__VA1G=(__UINTEGER_32)((__UINTEGER_32)(sz__UA1G + a__ZA1G) & (__UINTEGER_32)(~ a__ZA1G));
-  new_size2__WA1G=(__UINTEGER_32)(new_size__VA1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__WA1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__3A1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__4A1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WA1G + a__3A1G) & (__UINTEGER_32)(~ a__3A1G));
-    ptr_table__HF4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4A1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__GF4G=((__POINTER )(NULL));
-    result__IF4G=((__POINTER *)ptr_table__HF4G)[ 0];
-    if ((result__IF4G == (void *)NULL)) {
-      result__IF4G=new_lab__2QJ(new_size__4A1G);
-      next__GF4G=(void *)((unsigned long)result__IF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4A1G)));
-      ((__POINTER *)next__GF4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__HF4G)[ 0]=next__GF4G;
-    } else {
-      next__GF4G=((__POINTER *)result__IF4G)[ 0];
-      if ((next__GF4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IF4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4A1G <<  1)) <=  4096)) {
-          next__GF4G=(void *)((unsigned long)result__IF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4A1G)));
-        } else {
-          next__GF4G=new_lab__2QJ(new_size__4A1G);
-        };
-        ((__POINTER *)next__GF4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HF4G)[ 0]=next__GF4G;
-      } else {
-        ((__POINTER *)result__IF4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GF4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__IF4G=next__GF4G;
-      };
-    };
-    ((__POINTER *)result__IF4G)[ 0]=((__POINTER ) 3);
-    result__TA1G=(void *)((unsigned long)result__IF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__SPAH=first_free__HDVB;
-    while ((((void *)result__SPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__VA1G))) {
-      result__SPAH=((__MEMORY *)result__SPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__SPAH == (void *)NULL)) {
-      result__SPAH=new_page__454();
+    if (((void *)result__BUCH == (void *)NULL)) {
+      result__BUCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__SPAH,new_size__VA1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__TA1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__BATB=((void **)result__TA1G);
-  Self__UWMC=(__INTEGER)(nb_elements__WGQB -  1);
-  while ((Self__UWMC >=  0)) {
-    Result__BATB[Self__UWMC]=NULL;
-    Self__UWMC=(__INTEGER)(Self__UWMC -  1);
+  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);
   };
-  return(Result__BATB);
+  return(Result__FATB);
 }
 
-static void** create__E1PB(__INTEGER nb_elements__G1PB)
+static void** create__I1PB(__INTEGER nb_elements__K1PB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__AB1G,a__FB1G,new_size__BB1G,new_size2__CB1G,a__JB1G;
-  __UINTEGER_32 new_size__KB1G;
-  __POINTER result__5A1G,ptr_table__MF4G,next__LF4G,result__NF4G;
-  void *result__VPAH;
-  __INTEGER Self__NVMC;
-  void **Result__WXSB;
-  sz__AB1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__G1PB * ((__INTEGER )(sizeof(void *)))));
-  result__5A1G=((__POINTER )(NULL));
-  a__FB1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__BB1G=(__UINTEGER_32)((__UINTEGER_32)(sz__AB1G + a__FB1G) & (__UINTEGER_32)(~ a__FB1G));
-  new_size2__CB1G=(__UINTEGER_32)(new_size__BB1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__CB1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JB1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KB1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CB1G + a__JB1G) & (__UINTEGER_32)(~ a__JB1G));
-    ptr_table__MF4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KB1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__LF4G=((__POINTER )(NULL));
-    result__NF4G=((__POINTER *)ptr_table__MF4G)[ 0];
-    if ((result__NF4G == (void *)NULL)) {
-      result__NF4G=new_lab__2QJ(new_size__KB1G);
-      next__LF4G=(void *)((unsigned long)result__NF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KB1G)));
-      ((__POINTER *)next__LF4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__MF4G)[ 0]=next__LF4G;
-    } else {
-      next__LF4G=((__POINTER *)result__NF4G)[ 0];
-      if ((next__LF4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NF4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KB1G <<  1)) <=  4096)) {
-          next__LF4G=(void *)((unsigned long)result__NF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KB1G)));
-        } else {
-          next__LF4G=new_lab__2QJ(new_size__KB1G);
-        };
-        ((__POINTER *)next__LF4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MF4G)[ 0]=next__LF4G;
-      } else {
-        ((__POINTER *)result__NF4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LF4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__NF4G=next__LF4G;
-      };
-    };
-    ((__POINTER *)result__NF4G)[ 0]=((__POINTER ) 3);
-    result__5A1G=(void *)((unsigned long)result__NF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__VPAH=first_free__HDVB;
-    while ((((void *)result__VPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__BB1G))) {
-      result__VPAH=((__MEMORY *)result__VPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__VPAH == (void *)NULL)) {
-      result__VPAH=new_page__454();
+    if (((void *)result__EUCH == (void *)NULL)) {
+      result__EUCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__VPAH,new_size__BB1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__5A1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__WXSB=((void **)result__5A1G);
-  Self__NVMC=(__INTEGER)(nb_elements__G1PB -  1);
-  while ((Self__NVMC >=  0)) {
-    Result__WXSB[Self__NVMC]=NULL;
-    Self__NVMC=(__INTEGER)(Self__NVMC -  1);
+  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);
   };
-  return(Result__WXSB);
+  return(Result__0XSB);
 }
 
-static void** create__P3ZB(__INTEGER nb_elements__R3ZB)
+static void** create__T3ZB(__INTEGER nb_elements__V3ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MB1G,a__RB1G,new_size__NB1G,new_size2__OB1G,a__VB1G;
-  __UINTEGER_32 new_size__WB1G;
-  __POINTER result__LB1G,ptr_table__RF4G,next__QF4G,result__SF4G;
-  void *result__YPAH;
-  __INTEGER Self__14OC;
-  void **Result__RE2B;
-  sz__MB1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__R3ZB * ((__INTEGER )(sizeof(void *)))));
-  result__LB1G=((__POINTER )(NULL));
-  a__RB1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NB1G=(__UINTEGER_32)((__UINTEGER_32)(sz__MB1G + a__RB1G) & (__UINTEGER_32)(~ a__RB1G));
-  new_size2__OB1G=(__UINTEGER_32)(new_size__NB1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OB1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VB1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WB1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OB1G + a__VB1G) & (__UINTEGER_32)(~ a__VB1G));
-    ptr_table__RF4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WB1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__QF4G=((__POINTER )(NULL));
-    result__SF4G=((__POINTER *)ptr_table__RF4G)[ 0];
-    if ((result__SF4G == (void *)NULL)) {
-      result__SF4G=new_lab__2QJ(new_size__WB1G);
-      next__QF4G=(void *)((unsigned long)result__SF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WB1G)));
-      ((__POINTER *)next__QF4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__RF4G)[ 0]=next__QF4G;
-    } else {
-      next__QF4G=((__POINTER *)result__SF4G)[ 0];
-      if ((next__QF4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SF4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WB1G <<  1)) <=  4096)) {
-          next__QF4G=(void *)((unsigned long)result__SF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WB1G)));
-        } else {
-          next__QF4G=new_lab__2QJ(new_size__WB1G);
-        };
-        ((__POINTER *)next__QF4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__RF4G)[ 0]=next__QF4G;
-      } else {
-        ((__POINTER *)result__SF4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QF4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__SF4G=next__QF4G;
-      };
-    };
-    ((__POINTER *)result__SF4G)[ 0]=((__POINTER ) 3);
-    result__LB1G=(void *)((unsigned long)result__SF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__YPAH=first_free__HDVB;
-    while ((((void *)result__YPAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YPAH)->map_size_and_id__YSB &  4294967292LU) < new_size__NB1G))) {
-      result__YPAH=((__MEMORY *)result__YPAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__YPAH == (void *)NULL)) {
-      result__YPAH=new_page__454();
+    if (((void *)result__HUCH == (void *)NULL)) {
+      result__HUCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__YPAH,new_size__NB1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YPAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__LB1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YPAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__RE2B=((void **)result__LB1G);
-  Self__14OC=(__INTEGER)(nb_elements__R3ZB -  1);
-  while ((Self__14OC >=  0)) {
-    Result__RE2B[Self__14OC]=NULL;
-    Self__14OC=(__INTEGER)(Self__14OC -  1);
+  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);
   };
-  return(Result__RE2B);
+  return(Result__VE2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__RGRC(__INTEGER new_count__TGRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__VGRC(__INTEGER new_count__XGRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__YB1C,ptr_table__WF4G,next__VF4G,result__XF4G;
-  __POINTER ptr_table__1F4G,next__0F4G,result__2F4G;
-  __INTEGER typ_id__3B1C;
-  __UINTEGER_32 sz__0B1C,a__ZB1G,new_size__0B1G,t__4B1G,a__3B1G;
-  __UINTEGER_32 new_size__4F4G,lab_type__3F4G;
-  __FAST_ARRAYoSTRING_CONSTANTo *result__XB1C,*Self__O3RD;
-  result__XB1C=NULL;
-  ptr__YB1C=((__POINTER )(NULL));
-  typ_id__3B1C= 0;
-  sz__0B1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
-  if ((sz__0B1C ==  0)) {
-    result__XB1C=FAST_ARRAYoSTRING_CONSTANTo__;
+  __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__;
   } else {
-    typ_id__3B1C=__FAST_ARRAYoSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__0B1C);
-    if ((typ_id__3B1C == (__INTEGER)(-  1))) {
-      a__ZB1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0B1G=(__UINTEGER_32)((__UINTEGER_32)(sz__0B1C + a__ZB1G) & (__UINTEGER_32)(~ a__ZB1G));
-      ptr_table__WF4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0B1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__VF4G=((__POINTER )(NULL));
-      result__XF4G=((__POINTER *)ptr_table__WF4G)[ 0];
-      if ((result__XF4G == (void *)NULL)) {
-        result__XF4G=new_lab__2QJ(new_size__0B1G);
-        next__VF4G=(void *)((unsigned long)result__XF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0B1G)));
-        ((__POINTER *)next__VF4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WF4G)[ 0]=next__VF4G;
-      } else {
-        next__VF4G=((__POINTER *)result__XF4G)[ 0];
-        if ((next__VF4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XF4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0B1G <<  1)) <=  4096)) {
-            next__VF4G=(void *)((unsigned long)result__XF4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0B1G)));
-          } else {
-            next__VF4G=new_lab__2QJ(new_size__0B1G);
-          };
-          ((__POINTER *)next__VF4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WF4G)[ 0]=next__VF4G;
-        } else {
-          ((__POINTER *)result__XF4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VF4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XF4G=next__VF4G;
-        };
-      };
-      ptr__YB1C=result__XF4G;
-    } else {
-      t__4B1G=((__UINTEGER_32 )typ_id__3B1C);
-      a__3B1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__4F4G=(__UINTEGER_32)((__UINTEGER_32)(sz__0B1C + a__3B1G) & (__UINTEGER_32)(~ a__3B1G));
-      ptr_table__1F4G=((__POINTER )(&(table_type[(t__4B1G)])));
-      lab_type__3F4G=(__UINTEGER_32)(t__4B1G |  1);
-      next__0F4G=((__POINTER )(NULL));
-      result__2F4G=((__POINTER *)ptr_table__1F4G)[ 0];
-      if ((result__2F4G == (void *)NULL)) {
-        result__2F4G=new_lab__2QJ(lab_type__3F4G);
-        next__0F4G=(void *)((unsigned long)result__2F4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4F4G)));
-        ((__POINTER *)next__0F4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1F4G)[ 0]=next__0F4G;
-      } else {
-        next__0F4G=((__POINTER *)result__2F4G)[ 0];
-        if ((next__0F4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2F4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4F4G <<  1)) <=  4096)) {
-            next__0F4G=(void *)((unsigned long)result__2F4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4F4G)));
-          } else {
-            next__0F4G=new_lab__2QJ(lab_type__3F4G);
-          };
-          ((__POINTER *)next__0F4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1F4G)[ 0]=next__0F4G;
-        } else {
-          ((__POINTER *)result__2F4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0F4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2F4G=next__0F4G;
-        };
-      };
-      ptr__YB1C=result__2F4G;
-    };
-    result__XB1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__YB1C);
-    *(result__XB1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
-  };
-  Self__O3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__XB1C);
-  if ((Self__O3RD->parent_arrayed_collection__X4I.capacity__GBPD < new_count__TGRC)) {
-    Self__O3RD->parent_arrayed_collection__X4I.storage__BCPD=create__4XGE(new_count__TGRC);
-    Self__O3RD->parent_arrayed_collection__X4I.capacity__GBPD=new_count__TGRC;
-  };
-  Self__O3RD->parent_arrayed_collection__X4I.upper__L5OD=(__INTEGER)(-  1);
-  return(result__XB1C);
+    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);
 }
 
-static void** create__UYQF(__INTEGER nb_elements__WYQF)
+static void** create__DPSF(__INTEGER nb_elements__FPSF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__AC1G,a__FC1G,new_size__BC1G,new_size2__CC1G,a__JC1G;
-  __UINTEGER_32 new_size__KC1G;
-  __POINTER result__5B1G,ptr_table__AG4G,next__5F4G,result__BG4G;
-  void *result__1PAH;
-  __INTEGER Self__4J1F;
-  void **Result__OAVF;
-  sz__AC1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__WYQF * ((__INTEGER )(sizeof(void *)))));
-  result__5B1G=((__POINTER )(NULL));
-  a__FC1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__BC1G=(__UINTEGER_32)((__UINTEGER_32)(sz__AC1G + a__FC1G) & (__UINTEGER_32)(~ a__FC1G));
-  new_size2__CC1G=(__UINTEGER_32)(new_size__BC1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__CC1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JC1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KC1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CC1G + a__JC1G) & (__UINTEGER_32)(~ a__JC1G));
-    ptr_table__AG4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KC1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__5F4G=((__POINTER )(NULL));
-    result__BG4G=((__POINTER *)ptr_table__AG4G)[ 0];
-    if ((result__BG4G == (void *)NULL)) {
-      result__BG4G=new_lab__2QJ(new_size__KC1G);
-      next__5F4G=(void *)((unsigned long)result__BG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KC1G)));
-      ((__POINTER *)next__5F4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__AG4G)[ 0]=next__5F4G;
-    } else {
-      next__5F4G=((__POINTER *)result__BG4G)[ 0];
-      if ((next__5F4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BG4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KC1G <<  1)) <=  4096)) {
-          next__5F4G=(void *)((unsigned long)result__BG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KC1G)));
-        } else {
-          next__5F4G=new_lab__2QJ(new_size__KC1G);
-        };
-        ((__POINTER *)next__5F4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AG4G)[ 0]=next__5F4G;
-      } else {
-        ((__POINTER *)result__BG4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__5F4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__BG4G=next__5F4G;
-      };
-    };
-    ((__POINTER *)result__BG4G)[ 0]=((__POINTER ) 3);
-    result__5B1G=(void *)((unsigned long)result__BG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__1PAH=first_free__HDVB;
-    while ((((void *)result__1PAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1PAH)->map_size_and_id__YSB &  4294967292LU) < new_size__BC1G))) {
-      result__1PAH=((__MEMORY *)result__1PAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__1PAH == (void *)NULL)) {
-      result__1PAH=new_page__454();
+    if (((void *)result__KUCH == (void *)NULL)) {
+      result__KUCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__1PAH,new_size__BC1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1PAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__5B1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1PAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__OAVF=((void **)result__5B1G);
-  Self__4J1F=(__INTEGER)(nb_elements__WYQF -  1);
-  while ((Self__4J1F >=  0)) {
-    Result__OAVF[Self__4J1F]=NULL;
-    Self__4J1F=(__INTEGER)(Self__4J1F -  1);
+  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);
   };
-  return(Result__OAVF);
+  return(Result__KYWF);
 }
 
-static void** create__OMEF(__INTEGER nb_elements__QMEF)
+static void** create__4XEF(__INTEGER nb_elements__AYEF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MC1G,a__RC1G,new_size__NC1G,new_size2__OC1G,a__VC1G;
-  __UINTEGER_32 new_size__WC1G;
-  __POINTER result__LC1G,ptr_table__FG4G,next__EG4G,result__GG4G;
-  void *result__4PAH;
-  __INTEGER Self__W4NF;
-  void **Result__LPIF;
-  sz__MC1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__QMEF * ((__INTEGER )(sizeof(void *)))));
-  result__LC1G=((__POINTER )(NULL));
-  a__RC1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NC1G=(__UINTEGER_32)((__UINTEGER_32)(sz__MC1G + a__RC1G) & (__UINTEGER_32)(~ a__RC1G));
-  new_size2__OC1G=(__UINTEGER_32)(new_size__NC1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OC1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VC1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WC1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OC1G + a__VC1G) & (__UINTEGER_32)(~ a__VC1G));
-    ptr_table__FG4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WC1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__EG4G=((__POINTER )(NULL));
-    result__GG4G=((__POINTER *)ptr_table__FG4G)[ 0];
-    if ((result__GG4G == (void *)NULL)) {
-      result__GG4G=new_lab__2QJ(new_size__WC1G);
-      next__EG4G=(void *)((unsigned long)result__GG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WC1G)));
-      ((__POINTER *)next__EG4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__FG4G)[ 0]=next__EG4G;
-    } else {
-      next__EG4G=((__POINTER *)result__GG4G)[ 0];
-      if ((next__EG4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GG4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WC1G <<  1)) <=  4096)) {
-          next__EG4G=(void *)((unsigned long)result__GG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WC1G)));
-        } else {
-          next__EG4G=new_lab__2QJ(new_size__WC1G);
-        };
-        ((__POINTER *)next__EG4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FG4G)[ 0]=next__EG4G;
-      } else {
-        ((__POINTER *)result__GG4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__EG4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__GG4G=next__EG4G;
-      };
-    };
-    ((__POINTER *)result__GG4G)[ 0]=((__POINTER ) 3);
-    result__LC1G=(void *)((unsigned long)result__GG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__4PAH=first_free__HDVB;
-    while ((((void *)result__4PAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4PAH)->map_size_and_id__YSB &  4294967292LU) < new_size__NC1G))) {
-      result__4PAH=((__MEMORY *)result__4PAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__4PAH == (void *)NULL)) {
-      result__4PAH=new_page__454();
+    if (((void *)result__NUCH == (void *)NULL)) {
+      result__NUCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__4PAH,new_size__NC1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4PAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__LC1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4PAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__LPIF=((void **)result__LC1G);
-  Self__W4NF=(__INTEGER)(nb_elements__QMEF -  1);
-  while ((Self__W4NF >=  0)) {
-    Result__LPIF[Self__W4NF]=NULL;
-    Self__W4NF=(__INTEGER)(Self__W4NF -  1);
+  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);
   };
-  return(Result__LPIF);
+  return(Result__B5IF);
 }
 
-static void** create__VVUF(__INTEGER nb_elements__XVUF)
+static void** create__RNWF(__INTEGER nb_elements__TNWF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YC1G,a__3C1G,new_size__ZC1G,new_size2__0C1G,a__BD1G;
-  __UINTEGER_32 new_size__CD1G;
-  __POINTER result__XC1G,ptr_table__KG4G,next__JG4G,result__LG4G;
-  void *result__BQAH;
-  __INTEGER Self__YN1F;
-  void **Result__FBXF;
-  sz__YC1G=((__UINTEGER_32 )(__INTEGER)(nb_elements__XVUF * ((__INTEGER )(sizeof(void *)))));
-  result__XC1G=((__POINTER )(NULL));
-  a__3C1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZC1G=(__UINTEGER_32)((__UINTEGER_32)(sz__YC1G + a__3C1G) & (__UINTEGER_32)(~ a__3C1G));
-  new_size2__0C1G=(__UINTEGER_32)(new_size__ZC1G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0C1G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BD1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CD1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0C1G + a__BD1G) & (__UINTEGER_32)(~ a__BD1G));
-    ptr_table__KG4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CD1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__JG4G=((__POINTER )(NULL));
-    result__LG4G=((__POINTER *)ptr_table__KG4G)[ 0];
-    if ((result__LG4G == (void *)NULL)) {
-      result__LG4G=new_lab__2QJ(new_size__CD1G);
-      next__JG4G=(void *)((unsigned long)result__LG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CD1G)));
-      ((__POINTER *)next__JG4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__KG4G)[ 0]=next__JG4G;
-    } else {
-      next__JG4G=((__POINTER *)result__LG4G)[ 0];
-      if ((next__JG4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LG4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CD1G <<  1)) <=  4096)) {
-          next__JG4G=(void *)((unsigned long)result__LG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CD1G)));
-        } else {
-          next__JG4G=new_lab__2QJ(new_size__CD1G);
-        };
-        ((__POINTER *)next__JG4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KG4G)[ 0]=next__JG4G;
-      } else {
-        ((__POINTER *)result__LG4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JG4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__LG4G=next__JG4G;
-      };
-    };
-    ((__POINTER *)result__LG4G)[ 0]=((__POINTER ) 3);
-    result__XC1G=(void *)((unsigned long)result__LG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__BQAH=first_free__HDVB;
-    while ((((void *)result__BQAH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BQAH)->map_size_and_id__YSB &  4294967292LU) < new_size__ZC1G))) {
-      result__BQAH=((__MEMORY *)result__BQAH)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__BQAH == (void *)NULL)) {
-      result__BQAH=new_page__454();
+    if (((void *)result__QUCH == (void *)NULL)) {
+      result__QUCH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__BQAH,new_size__ZC1G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BQAH)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__XC1G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BQAH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__FBXF=((void **)result__XC1G);
-  Self__YN1F=(__INTEGER)(nb_elements__XVUF -  1);
-  while ((Self__YN1F >=  0)) {
-    Result__FBXF[Self__YN1F]=NULL;
-    Self__YN1F=(__INTEGER)(Self__YN1F -  1);
+  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);
   };
-  return(Result__FBXF);
+  return(Result__VZYF);
 }
 
-static void** create__PIIE(__INTEGER nb_elements__RIIE)
+static void** create__5KIE(__INTEGER nb_elements__BLIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__COJB,a__FD1G,new_size__EOJB,new_size2__HOJB,a__JD1G;
-  __UINTEGER_32 new_size__KD1G;
-  __POINTER result__KOJB,ptr_table__PG4G,next__OG4G,result__QG4G;
-  void *result__ICVB;
-  __INTEGER Self__SIXE;
-  void **Result__JINE;
-  sz__COJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__RIIE * ((__INTEGER )(sizeof(void *)))));
-  result__KOJB=((__POINTER )(NULL));
-  a__FD1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__EOJB=(__UINTEGER_32)((__UINTEGER_32)(sz__COJB + a__FD1G) & (__UINTEGER_32)(~ a__FD1G));
-  new_size2__HOJB=(__UINTEGER_32)(new_size__EOJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__HOJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JD1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KD1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HOJB + a__JD1G) & (__UINTEGER_32)(~ a__JD1G));
-    ptr_table__PG4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KD1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__OG4G=((__POINTER )(NULL));
-    result__QG4G=((__POINTER *)ptr_table__PG4G)[ 0];
-    if ((result__QG4G == (void *)NULL)) {
-      result__QG4G=new_lab__2QJ(new_size__KD1G);
-      next__OG4G=(void *)((unsigned long)result__QG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KD1G)));
-      ((__POINTER *)next__OG4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__PG4G)[ 0]=next__OG4G;
-    } else {
-      next__OG4G=((__POINTER *)result__QG4G)[ 0];
-      if ((next__OG4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QG4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KD1G <<  1)) <=  4096)) {
-          next__OG4G=(void *)((unsigned long)result__QG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KD1G)));
-        } else {
-          next__OG4G=new_lab__2QJ(new_size__KD1G);
-        };
-        ((__POINTER *)next__OG4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PG4G)[ 0]=next__OG4G;
-      } else {
-        ((__POINTER *)result__QG4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__OG4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__QG4G=next__OG4G;
-      };
-    };
-    ((__POINTER *)result__QG4G)[ 0]=((__POINTER ) 3);
-    result__KOJB=(void *)((unsigned long)result__QG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__ICVB=first_free__HDVB;
-    while ((((void *)result__ICVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ICVB)->map_size_and_id__YSB &  4294967292LU) < new_size__EOJB))) {
-      result__ICVB=((__MEMORY *)result__ICVB)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__ICVB == (void *)NULL)) {
-      result__ICVB=new_page__454();
+    if (((void *)result__MCVB == (void *)NULL)) {
+      result__MCVB=new_page__CA5();
     };
-    to_busy__index__DTFC(result__ICVB,new_size__EOJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ICVB)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__KOJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ICVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__JINE=((void **)result__KOJB);
-  Self__SIXE=(__INTEGER)(nb_elements__RIIE -  1);
-  while ((Self__SIXE >=  0)) {
-    Result__JINE[Self__SIXE]=NULL;
-    Self__SIXE=(__INTEGER)(Self__SIXE -  1);
+  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);
   };
-  return(Result__JINE);
+  return(Result__ZKNE);
 }
 
-static void* new_page__454()
+static void* new_page__CA5()
 // () With resultNo recursive, No inlinable.
 {
-  __UINTEGER_64 cap__B1SB,old_size__BA5;
-  __POINTER mem__E1SB;
-  void *block__HA5;
-  if ((capacity_max__IA5 ==  0)) {
-    mem__E1SB=((__POINTER )(NULL));
-    cap__B1SB= 33554432;
+  __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;
     do {
-      cap__B1SB=(__UINTEGER_64)(cap__B1SB <<  1);
-      mem__E1SB=((__POINTER )(malloc((cap__B1SB))));
-      if ((mem__E1SB != (void *)NULL)) {
-        free((mem__E1SB));
-      };
-    } while ((! ((mem__E1SB == (void *)NULL) || (cap__B1SB == ((__UINTEGER_64 )(2048LU << 20))))));
-    if ((mem__E1SB == (void *)NULL)) {
-      cap__B1SB=(__UINTEGER_64)(cap__B1SB >>  1);
-    };
-    get_begin_memory__YBQB=((__POINTER )(malloc((cap__B1SB))));
-    capacity_max__IA5=cap__B1SB;
-    begin_memory__5UH=get_begin_memory__YBQB;
-  };
-  old_size__BA5=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__ORJ <<  26));
-  nb_page__ORJ=(__UINTEGER_32)(nb_page__ORJ +  1);
-  if (((__UINTEGER_64)(old_size__BA5 +  67108864) > capacity_max__IA5)) {
-    print__GHD((&__string_172));
+      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));
     exit(( 1));
   };
-  block__HA5=((void *)(void *)((unsigned long)begin_memory__5UH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__BA5)))));
-  ((__MEMORY *)block__HA5)->map_previous_linear__XSB= 4294967295LU;
-  ((__MEMORY *)block__HA5)->map_size_and_id__YSB= 67108858;
-  ((__MEMORY *)block__HA5)->map_next_free__ZSB=first_free__HDVB;
-  ((__MEMORY *)block__HA5)->map_previous_free__0SB=NULL;
-  if (((void *)first_free__HDVB != (void *)NULL)) {
-    ((__MEMORY *)first_free__HDVB)->map_previous_free__0SB=block__HA5;
-  };
-  first_free__HDVB=block__HA5;
-  last_block[((__UINTEGER_32)(nb_page__ORJ -  1))] = (block__HA5);
-  return(block__HA5);
+  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);
 }
 
-static void to_busy__index__DTFC(__MEMORY *Self__ETFC,__UINTEGER_32 sz__FTFC,__UINTEGER_32 idx__GTFC)
+static void to_busy__index__HTFC(__MEMORY *Self__ITFC,__UINTEGER_32 sz__JTFC,__UINTEGER_32 idx__KTFC)
 // ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  void *new__NTFC,*prev__ZCOC,*next__0COC;
-  __UINTEGER_32 siz__HTFC,new_size__KTFC;
-  __MEMORY *Self__TRCC,*Self__KOWG;
-  new__NTFC=NULL;
-  prev__ZCOC=Self__ETFC->map_previous_free__0SB;
-  next__0COC=Self__ETFC->map_next_free__ZSB;
-  if (((void *)prev__ZCOC == (void *)NULL)) {
-    first_free__HDVB=next__0COC;
+  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;
   } else {
-    ((__MEMORY *)prev__ZCOC)->map_next_free__ZSB=next__0COC;
+    ((__MEMORY *)prev__3COC)->map_next_free__3SB=next__4COC;
   };
-  if (((void *)next__0COC != (void *)NULL)) {
-    ((__MEMORY *)next__0COC)->map_previous_free__0SB=prev__ZCOC;
+  if (((void *)next__4COC != (void *)NULL)) {
+    ((__MEMORY *)next__4COC)->map_previous_free__4SB=prev__3COC;
   };
-  siz__HTFC=Self__ETFC->map_size_and_id__YSB;
-  new_size__KTFC=(__UINTEGER_32)(siz__HTFC - sz__FTFC);
-  if ((new_size__KTFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
-    siz__HTFC=sz__FTFC;
-    new__NTFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ETFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__FTFC))));
-    ((__MEMORY *)new__NTFC)->map_previous_linear__XSB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__ETFC) - (unsigned long)begin_memory__5UH))));
-    ((__MEMORY *)new__NTFC)->map_size_and_id__YSB=(__UINTEGER_32)(new_size__KTFC -  8);
-    Self__TRCC=((__MEMORY *)new__NTFC);
-    Self__TRCC->map_next_free__ZSB=first_free__HDVB;
-    Self__TRCC->map_previous_free__0SB=NULL;
-    if (((void *)first_free__HDVB != (void *)NULL)) {
-      ((__MEMORY *)first_free__HDVB)->map_previous_free__0SB=Self__TRCC;
+  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;
     };
-    first_free__HDVB=Self__TRCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__NTFC)->map_size_and_id__YSB &  2) !=  0)) {
-      last_block[(idx__GTFC)] = (new__NTFC);
+    first_free__LDVB=Self__XRCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__RTFC)->map_size_and_id__2SB &  2) !=  0)) {
+      last_block[(idx__KTFC)] = (new__RTFC);
     } else {
-      Self__KOWG=((__MEMORY *)new__NTFC);
-      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__KOWG) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__KOWG->map_size_and_id__YSB &  4294967292LU))))))->map_previous_linear__XSB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__NTFC)) - (unsigned long)begin_memory__5UH))));
+      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__ETFC->map_size_and_id__YSB=(__UINTEGER_32)(siz__HTFC |  1);
+  Self__ITFC->map_size_and_id__2SB=(__UINTEGER_32)(siz__LTFC |  1);
 }
 
-static void** create__N1XC(__INTEGER nb_elements__P1XC)
+static void** create__R1XC(__INTEGER nb_elements__T1XC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__GJZG,a__ND1G,new_size__HJZG,new_size2__IJZG,a__RD1G;
-  __UINTEGER_32 new_size__SD1G;
-  __POINTER result__FJZG,ptr_table__UG4G,next__TG4G,result__VG4G;
-  void *result__YG4G;
-  __INTEGER Self__5QWD;
-  void **Result__PS5C;
-  sz__GJZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__P1XC * ((__INTEGER )(sizeof(void *)))));
-  result__FJZG=((__POINTER )(NULL));
-  a__ND1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__HJZG=(__UINTEGER_32)((__UINTEGER_32)(sz__GJZG + a__ND1G) & (__UINTEGER_32)(~ a__ND1G));
-  new_size2__IJZG=(__UINTEGER_32)(new_size__HJZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__IJZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__RD1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__SD1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IJZG + a__RD1G) & (__UINTEGER_32)(~ a__RD1G));
-    ptr_table__UG4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SD1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__TG4G=((__POINTER )(NULL));
-    result__VG4G=((__POINTER *)ptr_table__UG4G)[ 0];
-    if ((result__VG4G == (void *)NULL)) {
-      result__VG4G=new_lab__2QJ(new_size__SD1G);
-      next__TG4G=(void *)((unsigned long)result__VG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SD1G)));
-      ((__POINTER *)next__TG4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__UG4G)[ 0]=next__TG4G;
-    } else {
-      next__TG4G=((__POINTER *)result__VG4G)[ 0];
-      if ((next__TG4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VG4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SD1G <<  1)) <=  4096)) {
-          next__TG4G=(void *)((unsigned long)result__VG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SD1G)));
-        } else {
-          next__TG4G=new_lab__2QJ(new_size__SD1G);
-        };
-        ((__POINTER *)next__TG4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UG4G)[ 0]=next__TG4G;
-      } else {
-        ((__POINTER *)result__VG4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__TG4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__VG4G=next__TG4G;
-      };
-    };
-    ((__POINTER *)result__VG4G)[ 0]=((__POINTER ) 3);
-    result__FJZG=(void *)((unsigned long)result__VG4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__YG4G=first_free__HDVB;
-    while ((((void *)result__YG4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YG4G)->map_size_and_id__YSB &  4294967292LU) < new_size__HJZG))) {
-      result__YG4G=((__MEMORY *)result__YG4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__YG4G == (void *)NULL)) {
-      result__YG4G=new_page__454();
+    if (((void *)result__AKAH == (void *)NULL)) {
+      result__AKAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__YG4G,new_size__HJZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YG4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__FJZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YG4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__PS5C=((void **)result__FJZG);
-  Self__5QWD=(__INTEGER)(nb_elements__P1XC -  1);
-  while ((Self__5QWD >=  0)) {
-    Result__PS5C[Self__5QWD]=NULL;
-    Self__5QWD=(__INTEGER)(Self__5QWD -  1);
+  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);
   };
-  return(Result__PS5C);
+  return(Result__TS5C);
 }
 
-static void** create__QAYC(__INTEGER nb_elements__SAYC)
+static void** create__UAYC(__INTEGER nb_elements__WAYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__KJZG,a__YD1G,new_size__LJZG,new_size2__MJZG,a__2D1G;
-  __UINTEGER_32 new_size__3D1G;
-  __POINTER result__JJZG,ptr_table__2G4G,next__1G4G,result__3G4G;
-  void *result__AH4G;
-  __INTEGER Self__ZUWD;
-  void **Result__ZX5C;
-  sz__KJZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__SAYC * ((__INTEGER )(sizeof(void *)))));
-  result__JJZG=((__POINTER )(NULL));
-  a__YD1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__LJZG=(__UINTEGER_32)((__UINTEGER_32)(sz__KJZG + a__YD1G) & (__UINTEGER_32)(~ a__YD1G));
-  new_size2__MJZG=(__UINTEGER_32)(new_size__LJZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__MJZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__2D1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__3D1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MJZG + a__2D1G) & (__UINTEGER_32)(~ a__2D1G));
-    ptr_table__2G4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3D1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__1G4G=((__POINTER )(NULL));
-    result__3G4G=((__POINTER *)ptr_table__2G4G)[ 0];
-    if ((result__3G4G == (void *)NULL)) {
-      result__3G4G=new_lab__2QJ(new_size__3D1G);
-      next__1G4G=(void *)((unsigned long)result__3G4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3D1G)));
-      ((__POINTER *)next__1G4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__2G4G)[ 0]=next__1G4G;
-    } else {
-      next__1G4G=((__POINTER *)result__3G4G)[ 0];
-      if ((next__1G4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3G4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3D1G <<  1)) <=  4096)) {
-          next__1G4G=(void *)((unsigned long)result__3G4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3D1G)));
-        } else {
-          next__1G4G=new_lab__2QJ(new_size__3D1G);
-        };
-        ((__POINTER *)next__1G4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2G4G)[ 0]=next__1G4G;
-      } else {
-        ((__POINTER *)result__3G4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1G4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__3G4G=next__1G4G;
-      };
-    };
-    ((__POINTER *)result__3G4G)[ 0]=((__POINTER ) 3);
-    result__JJZG=(void *)((unsigned long)result__3G4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__AH4G=first_free__HDVB;
-    while ((((void *)result__AH4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__AH4G)->map_size_and_id__YSB &  4294967292LU) < new_size__LJZG))) {
-      result__AH4G=((__MEMORY *)result__AH4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__AH4G == (void *)NULL)) {
-      result__AH4G=new_page__454();
+    if (((void *)result__IKAH == (void *)NULL)) {
+      result__IKAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__AH4G,new_size__LJZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__AH4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__JJZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__AH4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__ZX5C=((void **)result__JJZG);
-  Self__ZUWD=(__INTEGER)(nb_elements__SAYC -  1);
-  while ((Self__ZUWD >=  0)) {
-    Result__ZX5C[Self__ZUWD]=NULL;
-    Self__ZUWD=(__INTEGER)(Self__ZUWD -  1);
+  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);
   };
-  return(Result__ZX5C);
+  return(Result__3X5C);
 }
 
-static void** create__UKBD(__INTEGER nb_elements__WKBD)
+static void** create__YKBD(__INTEGER nb_elements__0KBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__OJZG,a__DE1G,new_size__PJZG,new_size2__QJZG,a__HE1G;
-  __UINTEGER_32 new_size__IE1G;
-  __POINTER result__NJZG,ptr_table__EH4G,next__DH4G,result__FH4G;
-  void *result__IH4G;
-  __INTEGER Self__EDXD;
-  void **Result__R5FD;
-  sz__OJZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__WKBD * ((__INTEGER )(sizeof(void *)))));
-  result__NJZG=((__POINTER )(NULL));
-  a__DE1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__PJZG=(__UINTEGER_32)((__UINTEGER_32)(sz__OJZG + a__DE1G) & (__UINTEGER_32)(~ a__DE1G));
-  new_size2__QJZG=(__UINTEGER_32)(new_size__PJZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__QJZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__HE1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__IE1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QJZG + a__HE1G) & (__UINTEGER_32)(~ a__HE1G));
-    ptr_table__EH4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IE1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__DH4G=((__POINTER )(NULL));
-    result__FH4G=((__POINTER *)ptr_table__EH4G)[ 0];
-    if ((result__FH4G == (void *)NULL)) {
-      result__FH4G=new_lab__2QJ(new_size__IE1G);
-      next__DH4G=(void *)((unsigned long)result__FH4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IE1G)));
-      ((__POINTER *)next__DH4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__EH4G)[ 0]=next__DH4G;
-    } else {
-      next__DH4G=((__POINTER *)result__FH4G)[ 0];
-      if ((next__DH4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FH4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IE1G <<  1)) <=  4096)) {
-          next__DH4G=(void *)((unsigned long)result__FH4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IE1G)));
-        } else {
-          next__DH4G=new_lab__2QJ(new_size__IE1G);
-        };
-        ((__POINTER *)next__DH4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EH4G)[ 0]=next__DH4G;
-      } else {
-        ((__POINTER *)result__FH4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__DH4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__FH4G=next__DH4G;
-      };
-    };
-    ((__POINTER *)result__FH4G)[ 0]=((__POINTER ) 3);
-    result__NJZG=(void *)((unsigned long)result__FH4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__IH4G=first_free__HDVB;
-    while ((((void *)result__IH4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__IH4G)->map_size_and_id__YSB &  4294967292LU) < new_size__PJZG))) {
-      result__IH4G=((__MEMORY *)result__IH4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__IH4G == (void *)NULL)) {
-      result__IH4G=new_page__454();
+    if (((void *)result__QKAH == (void *)NULL)) {
+      result__QKAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__IH4G,new_size__PJZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__IH4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__NJZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__IH4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__R5FD=((void **)result__NJZG);
-  Self__EDXD=(__INTEGER)(nb_elements__WKBD -  1);
-  while ((Self__EDXD >=  0)) {
-    Result__R5FD[Self__EDXD]=NULL;
-    Self__EDXD=(__INTEGER)(Self__EDXD -  1);
+  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);
   };
-  return(Result__R5FD);
+  return(Result__V5FD);
 }
 
-static void** create__RJ2(__INTEGER nb_elements__TJ2)
+static void** create__VJ2(__INTEGER nb_elements__XJ2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__SJZG,a__OE1G,new_size__TJZG,new_size2__UJZG,a__SE1G;
-  __UINTEGER_32 new_size__TE1G;
-  __POINTER result__RJZG,ptr_table__MH4G,next__LH4G,result__NH4G;
-  void *result__QH4G;
-  __INTEGER Self__1SJC;
-  void **Result__IADB;
-  sz__SJZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__TJ2 * ((__INTEGER )(sizeof(void *)))));
-  result__RJZG=((__POINTER )(NULL));
-  a__OE1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__TJZG=(__UINTEGER_32)((__UINTEGER_32)(sz__SJZG + a__OE1G) & (__UINTEGER_32)(~ a__OE1G));
-  new_size2__UJZG=(__UINTEGER_32)(new_size__TJZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__UJZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__SE1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__TE1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UJZG + a__SE1G) & (__UINTEGER_32)(~ a__SE1G));
-    ptr_table__MH4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TE1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__LH4G=((__POINTER )(NULL));
-    result__NH4G=((__POINTER *)ptr_table__MH4G)[ 0];
-    if ((result__NH4G == (void *)NULL)) {
-      result__NH4G=new_lab__2QJ(new_size__TE1G);
-      next__LH4G=(void *)((unsigned long)result__NH4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TE1G)));
-      ((__POINTER *)next__LH4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__MH4G)[ 0]=next__LH4G;
-    } else {
-      next__LH4G=((__POINTER *)result__NH4G)[ 0];
-      if ((next__LH4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NH4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TE1G <<  1)) <=  4096)) {
-          next__LH4G=(void *)((unsigned long)result__NH4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TE1G)));
-        } else {
-          next__LH4G=new_lab__2QJ(new_size__TE1G);
-        };
-        ((__POINTER *)next__LH4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MH4G)[ 0]=next__LH4G;
-      } else {
-        ((__POINTER *)result__NH4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LH4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__NH4G=next__LH4G;
-      };
-    };
-    ((__POINTER *)result__NH4G)[ 0]=((__POINTER ) 3);
-    result__RJZG=(void *)((unsigned long)result__NH4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__QH4G=first_free__HDVB;
-    while ((((void *)result__QH4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QH4G)->map_size_and_id__YSB &  4294967292LU) < new_size__TJZG))) {
-      result__QH4G=((__MEMORY *)result__QH4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__QH4G == (void *)NULL)) {
-      result__QH4G=new_page__454();
+    if (((void *)result__YKAH == (void *)NULL)) {
+      result__YKAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__QH4G,new_size__TJZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QH4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__RJZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QH4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__IADB=((void **)result__RJZG);
-  Self__1SJC=(__INTEGER)(nb_elements__TJ2 -  1);
-  while ((Self__1SJC >=  0)) {
-    Result__IADB[Self__1SJC]=NULL;
-    Self__1SJC=(__INTEGER)(Self__1SJC -  1);
+  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);
   };
-  return(Result__IADB);
+  return(Result__MADB);
 }
 
-static void add__YXR(__HASHED_SEToABSTRACT_STRINGo *Self__ZXR,void *e__0XR)
+static void add__2XR(__HASHED_SEToABSTRACT_STRINGo *Self__3XR,void *e__4XR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__TH4G,__tmp__VH4G,Self__WH4G,idx__CYR,typ_id__0H4G;
-  __POINTER ptr__ZH4G,ptr_table__EI4G,next__DI4G,result__FI4G;
-  __POINTER ptr_table__JI4G,next__II4G,result__KI4G;
-  __UINTEGER_32 sz__1H4G,a__2H4G,new_size__3H4G,t__4H4G,a__5H4G;
-  __UINTEGER_32 new_size__MI4G,lab_type__LI4G;
-  void *node__FYR,*n__CI4G;
-  __HASHED_SET_NODEoABSTRACT_STRINGo *result__YH4G,*Self__AI4G;
-  has__LPW(Self__ZXR,e__0XR);
-  has__LPW(Self__ZXR,e__0XR);
-  result__TH4G= 0;
-  __tmp__VH4G=((__STRING_CONSTANT *)e__0XR)->count__DD;
-  Self__WH4G= 1;
-  while ((Self__WH4G <= __tmp__VH4G)) {
-    result__TH4G=(__INTEGER)((__INTEGER)( 5 * result__TH4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__0XR)->storage__FQO)[(__INTEGER)(Self__WH4G -  1)])));
-    Self__WH4G=(__INTEGER)(Self__WH4G +  1);
-  };
-  if ((result__TH4G <  0)) {
-    result__TH4G=(__INTEGER)(~ result__TH4G);
-  };
-  idx__CYR=(__INTEGER)(result__TH4G % Self__ZXR->capacity__JYR);
-  node__FYR=((void **)Self__ZXR->buckets__OYR)[idx__CYR];
-  while ((! (((void *)node__FYR == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__FYR)->item__0YR,e__0XR)))) {
-    node__FYR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__FYR)->next__GZR;
-  };
-  if (((void *)node__FYR == (void *)NULL)) {
-    if ((Self__ZXR->capacity__JYR == Self__ZXR->count__PZR)) {
-      increase_capacity__ORNB(Self__ZXR);
-      idx__CYR=(__INTEGER)(result__TH4G % Self__ZXR->capacity__JYR);
-    };
-    n__CI4G=((void **)Self__ZXR->buckets__OYR)[idx__CYR];
-    result__YH4G=NULL;
-    ptr__ZH4G=((__POINTER )(NULL));
-    typ_id__0H4G= 0;
-    sz__1H4G=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
-    if ((sz__1H4G ==  0)) {
-      result__YH4G=HASHED_SET_NODEoABSTRACT_STRINGo__;
-    } else {
-      typ_id__0H4G=__HASHED_SET_NODEoABSTRACT_STRINGo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__1H4G);
-      if ((typ_id__0H4G == (__INTEGER)(-  1))) {
-        a__2H4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__3H4G=(__UINTEGER_32)((__UINTEGER_32)(sz__1H4G + a__2H4G) & (__UINTEGER_32)(~ a__2H4G));
-        ptr_table__EI4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3H4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__DI4G=((__POINTER )(NULL));
-        result__FI4G=((__POINTER *)ptr_table__EI4G)[ 0];
-        if ((result__FI4G == (void *)NULL)) {
-          result__FI4G=new_lab__2QJ(new_size__3H4G);
-          next__DI4G=(void *)((unsigned long)result__FI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3H4G)));
-          ((__POINTER *)next__DI4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EI4G)[ 0]=next__DI4G;
-        } else {
-          next__DI4G=((__POINTER *)result__FI4G)[ 0];
-          if ((next__DI4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FI4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3H4G <<  1)) <=  4096)) {
-              next__DI4G=(void *)((unsigned long)result__FI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3H4G)));
+  __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)));
             } else {
-              next__DI4G=new_lab__2QJ(new_size__3H4G);
-            };
-            ((__POINTER *)next__DI4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EI4G)[ 0]=next__DI4G;
-          } else {
-            ((__POINTER *)result__FI4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__DI4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FI4G=next__DI4G;
-          };
-        };
-        ptr__ZH4G=result__FI4G;
-      } else {
-        t__4H4G=((__UINTEGER_32 )typ_id__0H4G);
-        a__5H4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__MI4G=(__UINTEGER_32)((__UINTEGER_32)(sz__1H4G + a__5H4G) & (__UINTEGER_32)(~ a__5H4G));
-        ptr_table__JI4G=((__POINTER )(&(table_type[(t__4H4G)])));
-        lab_type__LI4G=(__UINTEGER_32)(t__4H4G |  1);
-        next__II4G=((__POINTER )(NULL));
-        result__KI4G=((__POINTER *)ptr_table__JI4G)[ 0];
-        if ((result__KI4G == (void *)NULL)) {
-          result__KI4G=new_lab__2QJ(lab_type__LI4G);
-          next__II4G=(void *)((unsigned long)result__KI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MI4G)));
-          ((__POINTER *)next__II4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JI4G)[ 0]=next__II4G;
-        } else {
-          next__II4G=((__POINTER *)result__KI4G)[ 0];
-          if ((next__II4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KI4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__MI4G <<  1)) <=  4096)) {
-              next__II4G=(void *)((unsigned long)result__KI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MI4G)));
+              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)));
             } else {
-              next__II4G=new_lab__2QJ(lab_type__LI4G);
+              next__QLAH=new_lab__ARJ(lab_type__TLAH);
             };
-            ((__POINTER *)next__II4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JI4G)[ 0]=next__II4G;
+            ((__POINTER *)next__QLAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RLAH)[ 0]=next__QLAH;
           } else {
-            ((__POINTER *)result__KI4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__II4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KI4G=next__II4G;
+            ((__POINTER *)result__SLAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QLAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SLAH=next__QLAH;
           };
         };
-        ptr__ZH4G=result__KI4G;
+        ptr__BLAH=result__SLAH;
       };
-      result__YH4G=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__ZH4G);
-      *(result__YH4G) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+      result__ALAH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__BLAH);
+      *(result__ALAH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
     };
-    Self__AI4G=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__YH4G);
-    Self__AI4G->item__0YR=e__0XR;
-    Self__AI4G->next__GZR=n__CI4G;
-    node__FYR=result__YH4G;
-    ((void **)Self__ZXR->buckets__OYR)[idx__CYR]=result__YH4G;
-    Self__ZXR->count__PZR=(__INTEGER)(Self__ZXR->count__PZR +  1);
+    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);
   };
 }
 
-static void* operator__name__GGB(void *op__JGB)
+static void* operator__name__KGB(void *op__NGB)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__RGB,Self__KVB;
-  __CHARACTER c__LGB;
-  __BOOLEAN __tmp__5GB,__tmp__MHB,result__IFDB,__tmp__ZHB,result__0FDB;
-  __BOOLEAN __tmp__GIB,result__MGDB,__tmp__TIB,result__4GDB,__tmp__AJB;
-  __BOOLEAN result__QHDB,__tmp__NJB,result__CIDB,__tmp__0JB;
-  __BOOLEAN result__UIDB,__tmp__HKB,result__GJDB,__tmp__UKB;
-  __BOOLEAN result__YJDB,__tmp__BLB,result__KKDB,__tmp__OLB;
-  __BOOLEAN result__2KDB,__tmp__1LB,result__OLDB,__tmp__IMB;
-  __BOOLEAN result__AMDB,__tmp__VMB,result__SMDB,__tmp__CNB;
-  __BOOLEAN result__ENDB,__tmp__PNB,result__WNDB;
-  c__LGB='\0';
-  copy__JCS(string_tmp__VH,(&__string_81));
-  __tmp__RGB=((__STRING_CONSTANT *)op__JGB)->count__DD;
-  Self__KVB= 1;
-  while ((Self__KVB <= __tmp__RGB)) {
-    c__LGB=((__CHARACTER *)((__STRING_CONSTANT *)op__JGB)->storage__FQO)[(__INTEGER)(Self__KVB -  1)];
-    if ((c__LGB == '+')) {
-      append__RNS(string_tmp__VH,(&__string_173));
-      __tmp__5GB=TRUE__;
+  __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__;
     } else {
-      __tmp__5GB=FALSE__;
+      __tmp__DHB=FALSE__;
     };
-    if (__tmp__5GB) {
-      __tmp__MHB=TRUE__;
+    if (__tmp__DHB) {
+      __tmp__QHB=TRUE__;
     } else {
-      result__IFDB=(c__LGB == '-');
-      if (result__IFDB) {
-        append__RNS(string_tmp__VH,(&__string_174));
+      result__MFDB=(c__PGB == '-');
+      if (result__MFDB) {
+        append__VNS(string_tmp__VH,(&__string_176));
       };
-      __tmp__MHB=result__IFDB;
+      __tmp__QHB=result__MFDB;
     };
-    if (__tmp__MHB) {
-      __tmp__ZHB=TRUE__;
+    if (__tmp__QHB) {
+      __tmp__3HB=TRUE__;
     } else {
-      result__0FDB=(c__LGB == '~');
-      if (result__0FDB) {
-        append__RNS(string_tmp__VH,(&__string_175));
+      result__4FDB=(c__PGB == '~');
+      if (result__4FDB) {
+        append__VNS(string_tmp__VH,(&__string_177));
       };
-      __tmp__ZHB=result__0FDB;
+      __tmp__3HB=result__4FDB;
     };
-    if (__tmp__ZHB) {
-      __tmp__GIB=TRUE__;
+    if (__tmp__3HB) {
+      __tmp__KIB=TRUE__;
     } else {
-      result__MGDB=(c__LGB == '!');
-      if (result__MGDB) {
-        append__RNS(string_tmp__VH,(&__string_176));
+      result__QGDB=(c__PGB == '!');
+      if (result__QGDB) {
+        append__VNS(string_tmp__VH,(&__string_178));
       };
-      __tmp__GIB=result__MGDB;
+      __tmp__KIB=result__QGDB;
     };
-    if (__tmp__GIB) {
-      __tmp__TIB=TRUE__;
+    if (__tmp__KIB) {
+      __tmp__XIB=TRUE__;
     } else {
-      result__4GDB=(c__LGB == '/');
-      if (result__4GDB) {
-        append__RNS(string_tmp__VH,(&__string_177));
+      result__CHDB=(c__PGB == '/');
+      if (result__CHDB) {
+        append__VNS(string_tmp__VH,(&__string_179));
       };
-      __tmp__TIB=result__4GDB;
+      __tmp__XIB=result__CHDB;
     };
-    if (__tmp__TIB) {
-      __tmp__AJB=TRUE__;
+    if (__tmp__XIB) {
+      __tmp__EJB=TRUE__;
     } else {
-      result__QHDB=(c__LGB == '*');
-      if (result__QHDB) {
-        append__RNS(string_tmp__VH,(&__string_178));
+      result__UHDB=(c__PGB == '*');
+      if (result__UHDB) {
+        append__VNS(string_tmp__VH,(&__string_180));
       };
-      __tmp__AJB=result__QHDB;
+      __tmp__EJB=result__UHDB;
     };
-    if (__tmp__AJB) {
-      __tmp__NJB=TRUE__;
+    if (__tmp__EJB) {
+      __tmp__RJB=TRUE__;
     } else {
-      result__CIDB=(c__LGB == '^');
-      if (result__CIDB) {
-        append__RNS(string_tmp__VH,(&__string_179));
+      result__GIDB=(c__PGB == '^');
+      if (result__GIDB) {
+        append__VNS(string_tmp__VH,(&__string_181));
       };
-      __tmp__NJB=result__CIDB;
+      __tmp__RJB=result__GIDB;
     };
-    if (__tmp__NJB) {
-      __tmp__0JB=TRUE__;
+    if (__tmp__RJB) {
+      __tmp__4JB=TRUE__;
     } else {
-      result__UIDB=(c__LGB == '%');
-      if (result__UIDB) {
-        append__RNS(string_tmp__VH,(&__string_180));
+      result__YIDB=(c__PGB == '%');
+      if (result__YIDB) {
+        append__VNS(string_tmp__VH,(&__string_182));
       };
-      __tmp__0JB=result__UIDB;
+      __tmp__4JB=result__YIDB;
     };
-    if (__tmp__0JB) {
-      __tmp__HKB=TRUE__;
+    if (__tmp__4JB) {
+      __tmp__LKB=TRUE__;
     } else {
-      result__GJDB=(c__LGB == '>');
-      if (result__GJDB) {
-        append__RNS(string_tmp__VH,(&__string_181));
+      result__KJDB=(c__PGB == '>');
+      if (result__KJDB) {
+        append__VNS(string_tmp__VH,(&__string_183));
       };
-      __tmp__HKB=result__GJDB;
+      __tmp__LKB=result__KJDB;
     };
-    if (__tmp__HKB) {
-      __tmp__UKB=TRUE__;
+    if (__tmp__LKB) {
+      __tmp__YKB=TRUE__;
     } else {
-      result__YJDB=(c__LGB == '<');
-      if (result__YJDB) {
-        append__RNS(string_tmp__VH,(&__string_182));
+      result__2JDB=(c__PGB == '<');
+      if (result__2JDB) {
+        append__VNS(string_tmp__VH,(&__string_184));
       };
-      __tmp__UKB=result__YJDB;
+      __tmp__YKB=result__2JDB;
     };
-    if (__tmp__UKB) {
-      __tmp__BLB=TRUE__;
+    if (__tmp__YKB) {
+      __tmp__FLB=TRUE__;
     } else {
-      result__KKDB=(c__LGB == '=');
-      if (result__KKDB) {
-        append__RNS(string_tmp__VH,(&__string_183));
+      result__OKDB=(c__PGB == '=');
+      if (result__OKDB) {
+        append__VNS(string_tmp__VH,(&__string_185));
       };
-      __tmp__BLB=result__KKDB;
+      __tmp__FLB=result__OKDB;
     };
-    if (__tmp__BLB) {
-      __tmp__OLB=TRUE__;
+    if (__tmp__FLB) {
+      __tmp__SLB=TRUE__;
     } else {
-      result__2KDB=(c__LGB == '\\');
-      if (result__2KDB) {
-        append__RNS(string_tmp__VH,(&__string_184));
+      result__ALDB=(c__PGB == '\\');
+      if (result__ALDB) {
+        append__VNS(string_tmp__VH,(&__string_186));
       };
-      __tmp__OLB=result__2KDB;
+      __tmp__SLB=result__ALDB;
     };
-    if (__tmp__OLB) {
-      __tmp__1LB=TRUE__;
+    if (__tmp__SLB) {
+      __tmp__5LB=TRUE__;
     } else {
-      result__OLDB=(c__LGB == '|');
-      if (result__OLDB) {
-        append__RNS(string_tmp__VH,(&__string_185));
+      result__SLDB=(c__PGB == '|');
+      if (result__SLDB) {
+        append__VNS(string_tmp__VH,(&__string_187));
       };
-      __tmp__1LB=result__OLDB;
+      __tmp__5LB=result__SLDB;
     };
-    if (__tmp__1LB) {
-      __tmp__IMB=TRUE__;
+    if (__tmp__5LB) {
+      __tmp__MMB=TRUE__;
     } else {
-      result__AMDB=(c__LGB == '&');
-      if (result__AMDB) {
-        append__RNS(string_tmp__VH,(&__string_186));
+      result__EMDB=(c__PGB == '&');
+      if (result__EMDB) {
+        append__VNS(string_tmp__VH,(&__string_188));
       };
-      __tmp__IMB=result__AMDB;
+      __tmp__MMB=result__EMDB;
     };
-    if (__tmp__IMB) {
-      __tmp__VMB=TRUE__;
+    if (__tmp__MMB) {
+      __tmp__ZMB=TRUE__;
     } else {
-      result__SMDB=(c__LGB == '$');
-      if (result__SMDB) {
-        append__RNS(string_tmp__VH,(&__string_187));
+      result__WMDB=(c__PGB == '$');
+      if (result__WMDB) {
+        append__VNS(string_tmp__VH,(&__string_189));
       };
-      __tmp__VMB=result__SMDB;
+      __tmp__ZMB=result__WMDB;
     };
-    if (__tmp__VMB) {
-      __tmp__CNB=TRUE__;
+    if (__tmp__ZMB) {
+      __tmp__GNB=TRUE__;
     } else {
-      result__ENDB=(c__LGB == '#');
-      if (result__ENDB) {
-        append__RNS(string_tmp__VH,(&__string_188));
+      result__INDB=(c__PGB == '#');
+      if (result__INDB) {
+        append__VNS(string_tmp__VH,(&__string_190));
       };
-      __tmp__CNB=result__ENDB;
+      __tmp__GNB=result__INDB;
     };
-    if (__tmp__CNB) {
-      __tmp__PNB=TRUE__;
+    if (__tmp__GNB) {
+      __tmp__TNB=TRUE__;
     } else {
-      result__WNDB=(c__LGB == '@');
-      if (result__WNDB) {
-        append__RNS(string_tmp__VH,(&__string_189));
+      result__0NDB=(c__PGB == '@');
+      if (result__0NDB) {
+        append__VNS(string_tmp__VH,(&__string_191));
       };
-      __tmp__PNB=result__WNDB;
+      __tmp__TNB=result__0NDB;
     };
-    if ((! __tmp__PNB)) {
-      if ((c__LGB == '?')) {
-        append__RNS(string_tmp__VH,(&__string_190));
+    if ((! __tmp__TNB)) {
+      if ((c__PGB == '?')) {
+        append__VNS(string_tmp__VH,(&__string_192));
       };
     };
-    Self__KVB=(__INTEGER)(Self__KVB +  1);
+    Self__OVB=(__INTEGER)(Self__OVB +  1);
   };
-  return(get__YVB(string_tmp__VH));
+  return(get__2VB(string_tmp__VH));
 }
 
-static void print__GHD(__STRING_CONSTANT *Self__HHD)
+static void print__KHD(__STRING_CONSTANT *Self__LHD)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__IHF(Self__HHD);
+  put_string__MHF(Self__LHD);
 }
 
-static void* get__YVB(void *str__0VB)
+static void* get__2VB(void *str__4VB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__2VB,*__tmp__0WB;
-  void *result__5KS;
-  __STRING *Self__RFX;
-  __INTEGER result__TFX,__tmp__UFX,Self__3U2,typ_id__XKD,c__AFT;
-  __INTEGER Self__QC3G,result__XI4G,__tmp__ZI4G,Self__0I4G,idx__B3S;
-  __INTEGER typ_id__YFJB;
-  __STRING_CONSTANT *result__RKD,*result__IGF,*Self__4ET,*Self__YI4G;
-  __POINTER ptr__SKD,ptr_table__OI4G,next__NI4G,result__PI4G;
-  __POINTER ptr_table__TI4G,next__SI4G,result__UI4G,ptr__TFJB;
-  __POINTER ptr_table__3I4G,next__2I4G,result__4I4G,ptr_table__CJ4G;
-  __POINTER next__BJ4G,result__DJ4G;
-  __UINTEGER_32 sz__UKD,a__MF1G,new_size__NF1G,t__RF1G,a__QF1G;
-  __UINTEGER_32 new_size__WI4G,lab_type__VI4G,sz__VFJB,a__MT1G;
-  __UINTEGER_32 new_size__NT1G,t__RT1G,a__QT1G,new_size__FJ4G;
-  __UINTEGER_32 lab_type__EJ4G;
-  __HASHED_SEToABSTRACT_STRINGo *Self__MKS,*Self__Y2S;
-  void *node__4KS,*node__C3S,*n__XJCB;
-  __CHARACTER *Self__RC3G,*model__SC3G;
-  __HASHED_SET_NODEoABSTRACT_STRINGo *result__SFJB,*Self__15CC;
-  result__2VB=NULL;
-  Self__MKS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
-  result__5KS=NULL;
-  Self__RFX=((__STRING *)str__0VB);
-  result__TFX= 0;
-  __tmp__UFX=Self__RFX->count__GFC;
-  Self__3U2= 1;
-  while ((Self__3U2 <= __tmp__UFX)) {
-    result__TFX=(__INTEGER)((__INTEGER)( 5 * result__TFX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RFX->storage__RBS)[(__INTEGER)(Self__3U2 -  1)])));
-    Self__3U2=(__INTEGER)(Self__3U2 +  1);
-  };
-  if ((result__TFX <  0)) {
-    result__TFX=(__INTEGER)(~ result__TFX);
-  };
-  node__4KS=((void **)Self__MKS->buckets__OYR)[(__INTEGER)(result__TFX % Self__MKS->capacity__JYR)];
-  while ((! (((void *)node__4KS == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__4KS)->item__0YR,str__0VB)))) {
-    node__4KS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__4KS)->next__GZR;
-  };
-  if (((void *)node__4KS != (void *)NULL)) {
-    result__5KS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__4KS)->item__0YR;
-  };
-  if (((void *)result__5KS == (void *)NULL)) {
-    result__RKD=NULL;
-    ptr__SKD=((__POINTER )(NULL));
-    typ_id__XKD= 0;
-    sz__UKD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__UKD ==  0)) {
-      result__RKD=STRING_CONSTANT__;
-    } else {
-      typ_id__XKD=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__UKD);
-      if ((typ_id__XKD == (__INTEGER)(-  1))) {
-        a__MF1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NF1G=(__UINTEGER_32)((__UINTEGER_32)(sz__UKD + a__MF1G) & (__UINTEGER_32)(~ a__MF1G));
-        ptr_table__OI4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NF1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__NI4G=((__POINTER )(NULL));
-        result__PI4G=((__POINTER *)ptr_table__OI4G)[ 0];
-        if ((result__PI4G == (void *)NULL)) {
-          result__PI4G=new_lab__2QJ(new_size__NF1G);
-          next__NI4G=(void *)((unsigned long)result__PI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NF1G)));
-          ((__POINTER *)next__NI4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OI4G)[ 0]=next__NI4G;
-        } else {
-          next__NI4G=((__POINTER *)result__PI4G)[ 0];
-          if ((next__NI4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PI4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NF1G <<  1)) <=  4096)) {
-              next__NI4G=(void *)((unsigned long)result__PI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NF1G)));
+  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)));
             } else {
-              next__NI4G=new_lab__2QJ(new_size__NF1G);
-            };
-            ((__POINTER *)next__NI4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OI4G)[ 0]=next__NI4G;
-          } else {
-            ((__POINTER *)result__PI4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NI4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PI4G=next__NI4G;
-          };
-        };
-        ptr__SKD=result__PI4G;
-      } else {
-        t__RF1G=((__UINTEGER_32 )typ_id__XKD);
-        a__QF1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__WI4G=(__UINTEGER_32)((__UINTEGER_32)(sz__UKD + a__QF1G) & (__UINTEGER_32)(~ a__QF1G));
-        ptr_table__TI4G=((__POINTER )(&(table_type[(t__RF1G)])));
-        lab_type__VI4G=(__UINTEGER_32)(t__RF1G |  1);
-        next__SI4G=((__POINTER )(NULL));
-        result__UI4G=((__POINTER *)ptr_table__TI4G)[ 0];
-        if ((result__UI4G == (void *)NULL)) {
-          result__UI4G=new_lab__2QJ(lab_type__VI4G);
-          next__SI4G=(void *)((unsigned long)result__UI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WI4G)));
-          ((__POINTER *)next__SI4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TI4G)[ 0]=next__SI4G;
-        } else {
-          next__SI4G=((__POINTER *)result__UI4G)[ 0];
-          if ((next__SI4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UI4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WI4G <<  1)) <=  4096)) {
-              next__SI4G=(void *)((unsigned long)result__UI4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WI4G)));
+              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)));
             } else {
-              next__SI4G=new_lab__2QJ(lab_type__VI4G);
-            };
-            ((__POINTER *)next__SI4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TI4G)[ 0]=next__SI4G;
-          } else {
-            ((__POINTER *)result__UI4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SI4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UI4G=next__SI4G;
-          };
-        };
-        ptr__SKD=result__UI4G;
-      };
-      result__RKD=((__STRING_CONSTANT *)ptr__SKD);
-      *(result__RKD) = *(STRING_CONSTANT__);
-    };
-    result__IGF=result__RKD;
-    Self__4ET=((__STRING_CONSTANT *)result__RKD);
-    c__AFT=((__STRING *)str__0VB)->count__GFC;
-    if ((c__AFT !=  0)) {
-      Self__4ET->storage__FQO=create__RLEB((__INTEGER)(c__AFT +  1));
-      Self__RC3G=((__CHARACTER *)Self__4ET->storage__FQO);
-      model__SC3G=((__STRING *)str__0VB)->storage__RBS;
-      Self__QC3G=(__INTEGER)(c__AFT -  1);
-      while ((Self__QC3G >=  0)) {
-        Self__RC3G[Self__QC3G]=((__CHARACTER *)model__SC3G)[Self__QC3G];
-        Self__QC3G=(__INTEGER)(Self__QC3G -  1);
-      };
-      ((__CHARACTER *)Self__4ET->storage__FQO)[c__AFT]='\0';
-      Self__4ET->count__DD=c__AFT;
-    };
-    result__2VB=result__RKD;
-    Self__Y2S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
-    fast_has__45X(Self__Y2S,result__RKD);
-    fast_has__45X(Self__Y2S,result__RKD);
-    Self__YI4G=((__STRING_CONSTANT *)result__RKD);
-    result__XI4G= 0;
-    __tmp__ZI4G=Self__YI4G->count__DD;
-    Self__0I4G= 1;
-    while ((Self__0I4G <= __tmp__ZI4G)) {
-      result__XI4G=(__INTEGER)((__INTEGER)( 5 * result__XI4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YI4G->storage__FQO)[(__INTEGER)(Self__0I4G -  1)])));
-      Self__0I4G=(__INTEGER)(Self__0I4G +  1);
-    };
-    if ((result__XI4G <  0)) {
-      result__XI4G=(__INTEGER)(~ result__XI4G);
-    };
-    idx__B3S=(__INTEGER)(result__XI4G % Self__Y2S->capacity__JYR);
-    node__C3S=((void **)Self__Y2S->buckets__OYR)[idx__B3S];
-    while ((! (((void *)node__C3S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__C3S)->item__0YR == (void *)result__IGF)))) {
-      node__C3S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__C3S)->next__GZR;
-    };
-    if (((void *)node__C3S == (void *)NULL)) {
-      if ((Self__Y2S->capacity__JYR == Self__Y2S->count__PZR)) {
-        increase_capacity__ORNB(Self__Y2S);
-        idx__B3S=(__INTEGER)(result__XI4G % Self__Y2S->capacity__JYR);
-      };
-      n__XJCB=((void **)Self__Y2S->buckets__OYR)[idx__B3S];
-      result__SFJB=NULL;
-      ptr__TFJB=((__POINTER )(NULL));
-      typ_id__YFJB= 0;
-      sz__VFJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
-      if ((sz__VFJB ==  0)) {
-        result__SFJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
-      } else {
-        typ_id__YFJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__VFJB);
-        if ((typ_id__YFJB == (__INTEGER)(-  1))) {
-          a__MT1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__NT1G=(__UINTEGER_32)((__UINTEGER_32)(sz__VFJB + a__MT1G) & (__UINTEGER_32)(~ a__MT1G));
-          ptr_table__3I4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NT1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__2I4G=((__POINTER )(NULL));
-          result__4I4G=((__POINTER *)ptr_table__3I4G)[ 0];
-          if ((result__4I4G == (void *)NULL)) {
-            result__4I4G=new_lab__2QJ(new_size__NT1G);
-            next__2I4G=(void *)((unsigned long)result__4I4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NT1G)));
-            ((__POINTER *)next__2I4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3I4G)[ 0]=next__2I4G;
-          } else {
-            next__2I4G=((__POINTER *)result__4I4G)[ 0];
-            if ((next__2I4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4I4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NT1G <<  1)) <=  4096)) {
-                next__2I4G=(void *)((unsigned long)result__4I4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NT1G)));
+              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)));
               } else {
-                next__2I4G=new_lab__2QJ(new_size__NT1G);
+                next__EMAH=new_lab__ARJ(new_size__BU3G);
               };
-              ((__POINTER *)next__2I4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3I4G)[ 0]=next__2I4G;
+              ((__POINTER *)next__EMAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FMAH)[ 0]=next__EMAH;
             } else {
-              ((__POINTER *)result__4I4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2I4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4I4G=next__2I4G;
-            };
-          };
-          ptr__TFJB=result__4I4G;
-        } else {
-          t__RT1G=((__UINTEGER_32 )typ_id__YFJB);
-          a__QT1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__FJ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__VFJB + a__QT1G) & (__UINTEGER_32)(~ a__QT1G));
-          ptr_table__CJ4G=((__POINTER )(&(table_type[(t__RT1G)])));
-          lab_type__EJ4G=(__UINTEGER_32)(t__RT1G |  1);
-          next__BJ4G=((__POINTER )(NULL));
-          result__DJ4G=((__POINTER *)ptr_table__CJ4G)[ 0];
-          if ((result__DJ4G == (void *)NULL)) {
-            result__DJ4G=new_lab__2QJ(lab_type__EJ4G);
-            next__BJ4G=(void *)((unsigned long)result__DJ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJ4G)));
-            ((__POINTER *)next__BJ4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CJ4G)[ 0]=next__BJ4G;
-          } else {
-            next__BJ4G=((__POINTER *)result__DJ4G)[ 0];
-            if ((next__BJ4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DJ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FJ4G <<  1)) <=  4096)) {
-                next__BJ4G=(void *)((unsigned long)result__DJ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJ4G)));
+              ((__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)));
               } else {
-                next__BJ4G=new_lab__2QJ(lab_type__EJ4G);
+                next__JMAH=new_lab__ARJ(lab_type__MMAH);
               };
-              ((__POINTER *)next__BJ4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CJ4G)[ 0]=next__BJ4G;
+              ((__POINTER *)next__JMAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KMAH)[ 0]=next__JMAH;
             } else {
-              ((__POINTER *)result__DJ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BJ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__DJ4G=next__BJ4G;
+              ((__POINTER *)result__LMAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JMAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LMAH=next__JMAH;
             };
           };
-          ptr__TFJB=result__DJ4G;
+          ptr__XFJB=result__LMAH;
         };
-        result__SFJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__TFJB);
-        *(result__SFJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__WFJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__XFJB);
+        *(result__WFJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      Self__15CC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__SFJB);
-      Self__15CC->item__0YR=result__RKD;
-      Self__15CC->next__GZR=n__XJCB;
-      node__C3S=result__SFJB;
-      ((void **)Self__Y2S->buckets__OYR)[idx__B3S]=result__SFJB;
-      Self__Y2S->count__PZR=(__INTEGER)(Self__Y2S->count__PZR +  1);
+      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);
     };
   } else {
-    if (result__5KS==NULL) {
-      __tmp__0WB=NULL;
+    if (result__DLS==NULL) {
+      __tmp__4WB=NULL;
     } else {
-      __tmp__0WB=((void *)result__5KS);
+      __tmp__4WB=((void *)result__DLS);
     };
-    result__2VB=__tmp__0WB;
+    result__AWB=__tmp__4WB;
   };
-  return(result__2VB);
+  return(result__AWB);
 }
 
-static void copy__JCS(__STRING *Self__KCS,void *other__LCS)
+static void copy__NCS(__STRING *Self__OCS,void *other__PCS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__MCS,Self__1C3G;
-  __CHARACTER *__tmp__BDS,*__tmp__DDS,*Self__2C3G,*model__3C3G;
-  if (((struct ___OBJ *)other__LCS)->__id==__STRING_CONSTANT__) {
-    __tmp__MCS=((__STRING_CONSTANT *)other__LCS)->count__DD;
+  __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;
   } else {
-    __tmp__MCS=((__STRING *)other__LCS)->count__GFC;
+    __tmp__QCS=((__STRING *)other__PCS)->count__KFC;
   };
-  Self__KCS->count__GFC=__tmp__MCS;
-  if ((__tmp__MCS >  0)) {
-    if ((Self__KCS->capacity__IBS < __tmp__MCS)) {
-      Self__KCS->storage__RBS=create__RLEB(__tmp__MCS);
-      Self__KCS->capacity__IBS=Self__KCS->count__GFC;
+  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;
     };
-    __tmp__BDS=Self__KCS->storage__RBS;
-    if (((struct ___OBJ *)other__LCS)->__id==__STRING_CONSTANT__) {
-      __tmp__DDS=((__STRING_CONSTANT *)other__LCS)->storage__FQO;
+    __tmp__FDS=Self__OCS->storage__VBS;
+    if (((struct ___OBJ *)other__PCS)->__id==__STRING_CONSTANT__) {
+      __tmp__HDS=((__STRING_CONSTANT *)other__PCS)->storage__JQO;
     } else {
-      __tmp__DDS=((__STRING *)other__LCS)->storage__RBS;
+      __tmp__HDS=((__STRING *)other__PCS)->storage__VBS;
     };
-    Self__2C3G=((__CHARACTER *)__tmp__BDS);
-    model__3C3G=__tmp__DDS;
-    Self__1C3G=(__INTEGER)(Self__KCS->count__GFC -  1);
-    while ((Self__1C3G >=  0)) {
-      Self__2C3G[Self__1C3G]=((__CHARACTER *)model__3C3G)[Self__1C3G];
-      Self__1C3G=(__INTEGER)(Self__1C3G -  1);
+    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);
     };
   };
 }
 
-static void append__RNS(__STRING *Self__SNS,void *other__TNS)
+static void append__VNS(__STRING *Self__WNS,void *other__XNS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__2NS,needed_capacity__VNS,old_nb_elts__J0DC;
-  __INTEGER upper__FD3G,Self__DD3G,dest__VKBC,src_capacity__WKBC;
-  __INTEGER i2__GLBC,i1__FLBC;
-  __CHARACTER *Self__I0DC,*new__A1DC,*__tmp__ZOS,*__tmp__0OS,*Self__TKBC;
-  __CHARACTER *src__UKBC;
-  if (((struct ___OBJ *)other__TNS)->__id==__STRING_CONSTANT__) {
-    __tmp__2NS=((__STRING_CONSTANT *)other__TNS)->count__DD;
+  __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;
   } else {
-    __tmp__2NS=((__STRING *)other__TNS)->count__GFC;
-  };
-  needed_capacity__VNS=(__INTEGER)(Self__SNS->count__GFC + __tmp__2NS);
-  if ((Self__SNS->capacity__IBS < needed_capacity__VNS)) {
-    if ((Self__SNS->capacity__IBS ==  0)) {
-      Self__SNS->capacity__IBS=needed_capacity__VNS;
-      Self__SNS->storage__RBS=create__RLEB(needed_capacity__VNS);
-    } else {
-      Self__I0DC=((__CHARACTER *)Self__SNS->storage__RBS);
-      old_nb_elts__J0DC=Self__SNS->capacity__IBS;
-      new__A1DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__BELC(((__POINTER )Self__I0DC),((__UINTEGER_32 )old_nb_elts__J0DC),((__UINTEGER_32 )needed_capacity__VNS)));
-      upper__FD3G=(__INTEGER)(needed_capacity__VNS -  1);
-      Self__DD3G=old_nb_elts__J0DC;
-      while ((Self__DD3G <= upper__FD3G)) {
-        new__A1DC[Self__DD3G]='\0';
-        Self__DD3G=(__INTEGER)(Self__DD3G +  1);
-      };
-      Self__SNS->storage__RBS=new__A1DC;
-      Self__SNS->capacity__IBS=needed_capacity__VNS;
-    };
-  };
-  __tmp__ZOS=Self__SNS->storage__RBS;
-  if (((struct ___OBJ *)other__TNS)->__id==__STRING_CONSTANT__) {
-    __tmp__0OS=((__STRING_CONSTANT *)other__TNS)->storage__FQO;
+    __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;
   } else {
-    __tmp__0OS=((__STRING *)other__TNS)->storage__RBS;
-  };
-  Self__TKBC=((__CHARACTER *)__tmp__ZOS);
-  src__UKBC=__tmp__0OS;
-  dest__VKBC=Self__SNS->count__GFC;
-  src_capacity__WKBC=__tmp__2NS;
-  i2__GLBC= 0;
-  i1__FLBC=dest__VKBC;
-  while ((i2__GLBC != src_capacity__WKBC)) {
-    Self__TKBC[i1__FLBC]=((__CHARACTER *)src__UKBC)[i2__GLBC];
-    i2__GLBC=(__INTEGER)(i2__GLBC +  1);
-    i1__FLBC=(__INTEGER)(i1__FLBC +  1);
-  };
-  Self__SNS->count__GFC=needed_capacity__VNS;
+    __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;
 }
 
-static void* parent_directory__4DD()
+static void* parent_directory__CED()
 // () With resultNo recursive, No inlinable.
 {
-  __STRING *Self__KD3G,*Self__GJ4G;
-  void *__tmp__OED;
-  void *__tmp__PED,*result__CED;
-  __CHARACTER *cwd__BED;
-  ((__STRING *)string_tmp__DED)->count__GFC= 0;
-  Self__KD3G=((__STRING *)string_tmp__DED);
-  if ((Self__KD3G->capacity__IBS > Self__KD3G->count__GFC)) {
-    ((__CHARACTER *)Self__KD3G->storage__RBS)[Self__KD3G->count__GFC]='\0';
+  __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';
   } else {
-    add_last__JLT(Self__KD3G,'\0');
-    Self__KD3G->count__GFC=(__INTEGER)(Self__KD3G->count__GFC -  1);
-  };
-  cwd__BED=Self__KD3G->storage__RBS;
-  getcwd((cwd__BED),255);
-  Self__GJ4G=((__STRING *)string_tmp__DED);
-  Self__GJ4G->count__GFC= 0;
-  while ((((__CHARACTER *)cwd__BED)[Self__GJ4G->count__GFC] != '\0')) {
-    Self__GJ4G->count__GFC=(__INTEGER)(Self__GJ4G->count__GFC +  1);
-  };
-  if (((void *)Self__GJ4G->storage__RBS != (void *)cwd__BED)) {
-    Self__GJ4G->storage__RBS=cwd__BED;
-    Self__GJ4G->capacity__IBS=(__INTEGER)(Self__GJ4G->count__GFC +  1);
-  };
-  __tmp__OED=physical_get_entry__ZBF(string_tmp__DED);
-  if (__tmp__OED==NULL) {
-    __tmp__PED=NULL;
+    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;
   } else {
-    switch (((struct ___OBJ *)__tmp__OED)->__id) {
+    switch (((struct ___OBJ *)__tmp__SED)->__id) {
     case __DIRECTORY_UNIX__: {
-      __tmp__PED=((void *)__tmp__OED);
+      __tmp__TED=((void *)__tmp__SED);
     } break;
     case __FILE_UNIX__: {
-      __tmp__PED=NULL;
+      __tmp__TED=NULL;
     } break;
     }
   };
-  result__CED=__tmp__PED;
-  put__to__B0S(alias__UED,__tmp__PED,((__DIRECTORY_UNIX *)__tmp__PED)->parent_entry_unix__JED.parent_entry__IED.path__BD);
-  FILE_SYSTEM__->parent_directory__4ED=__tmp__PED;
-  FILE_SYSTEM__->parent_directory__5ED=0;
-  return(__tmp__PED);
+  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);
 }
 
-static void* get_entry__D0AC(void *p__F0AC)
+static void* get_entry__H0AC(void *p__J0AC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__H0AC;
-  __INTEGER idx__I0AC,idx__AK3G,n__FK3G,n__GK3G,__tmp__S2AC;
-  void *__tmp__ZEIC,*__tmp__32AC,*dir__12AC;
-  __STRING *Self__SF1G,*Self__EK3G;
-  __CHARACTER *Self__CK3G;
-  __BOOLEAN __tmp__B2AC,__tmp__M2AC;
-  result__H0AC=NULL;
-  idx__I0AC= 0;
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  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) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
-    __tmp__ZEIC=FILE_SYSTEM__->parent_directory__4ED;
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    __tmp__3EIC=FILE_SYSTEM__->parent_directory__CFD;
   } else {
-    __tmp__ZEIC=parent_directory__4DD();
+    __tmp__3EIC=parent_directory__CED();
   };
-  copy__JCS(string_tmp2__J0AC,((__DIRECTORY_UNIX *)__tmp__ZEIC)->parent_entry_unix__JED.parent_entry__IED.path__BD);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  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) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  add_last__JLT(string_tmp2__J0AC,'/');
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  add_last__NLT(string_tmp2__N0AC,'/');
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  append__RNS(string_tmp2__J0AC,p__F0AC);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  append__VNS(string_tmp2__N0AC,p__J0AC);
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  reduce_path__A3HC(string_tmp2__J0AC);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  reduce_path__E3HC(string_tmp2__N0AC);
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  copy__JCS(string_tmp3__P0AC,string_tmp2__J0AC);
+  copy__NCS(string_tmp3__T0AC,string_tmp2__N0AC);
   do {
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    result__H0AC=reference_at__UT0C(alias__UED,string_tmp2__J0AC);
-    if (((void *)result__H0AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    result__L0AC=reference_at__YT0C(alias__YED,string_tmp2__N0AC);
+    if (((void *)result__L0AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__DFD==0) {
       } else {
-        parent_directory__4DD();
+        parent_directory__CED();
       };
-      Self__SF1G=((__STRING *)string_tmp2__J0AC);
-      Self__CK3G=((__CHARACTER *)Self__SF1G->storage__RBS);
-      idx__AK3G=(__INTEGER)(Self__SF1G->count__GFC -  1);
-      while ((! ((idx__AK3G <  0) || ('/' == Self__CK3G[idx__AK3G])))) {
-        idx__AK3G=(__INTEGER)(idx__AK3G -  1);
+      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);
       };
-      idx__I0AC=(__INTEGER)( 1 + idx__AK3G);
-      if ((idx__I0AC >  0)) {
-        if (FILE_SYSTEM__->parent_directory__5ED==0) {
+      idx__M0AC=(__INTEGER)( 1 + idx__FN5G);
+      if ((idx__M0AC >  0)) {
+        if (FILE_SYSTEM__->parent_directory__DFD==0) {
         } else {
-          parent_directory__4DD();
+          parent_directory__CED();
         };
-        Self__EK3G=((__STRING *)string_tmp2__J0AC);
-        n__FK3G=(__INTEGER)(idx__I0AC -  1);
-        if ((n__FK3G < Self__EK3G->count__GFC)) {
-          n__GK3G=(__INTEGER)(Self__EK3G->count__GFC - n__FK3G);
-          if ((n__GK3G > Self__EK3G->count__GFC)) {
-            Self__EK3G->count__GFC= 0;
+        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;
           } else {
-            Self__EK3G->count__GFC=(__INTEGER)(Self__EK3G->count__GFC - n__GK3G);
+            Self__JN5G->count__KFC=(__INTEGER)(Self__JN5G->count__KFC - n__LN5G);
           };
         };
       } else {
-        if (FILE_SYSTEM__->parent_directory__5ED==0) {
+        if (FILE_SYSTEM__->parent_directory__DFD==0) {
         } else {
-          parent_directory__4DD();
+          parent_directory__CED();
         };
-        ((__STRING *)string_tmp2__J0AC)->count__GFC= 0;
+        ((__STRING *)string_tmp2__N0AC)->count__KFC= 0;
       };
     };
-    if (((void *)result__H0AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (((void *)result__L0AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__DFD==0) {
       } else {
-        parent_directory__4DD();
+        parent_directory__CED();
       };
-      __tmp__B2AC=(((__STRING *)string_tmp2__J0AC)->count__GFC !=  0);
+      __tmp__F2AC=(((__STRING *)string_tmp2__N0AC)->count__KFC !=  0);
     } else {
-      __tmp__B2AC=FALSE__;
+      __tmp__F2AC=FALSE__;
     };
-  } while (__tmp__B2AC);
-  if (((void *)result__H0AC == (void *)NULL)) {
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  } while (__tmp__F2AC);
+  if (((void *)result__L0AC == (void *)NULL)) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    result__H0AC=physical_get_entry__IW0C(string_tmp3__P0AC);
-    __tmp__M2AC=TRUE__;
+    result__L0AC=physical_get_entry__MW0C(string_tmp3__T0AC);
+    __tmp__Q2AC=TRUE__;
   } else {
-    __tmp__M2AC=FALSE__;
+    __tmp__Q2AC=FALSE__;
   };
-  if ((! __tmp__M2AC)) {
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  if ((! __tmp__Q2AC)) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    __tmp__S2AC=((__STRING *)string_tmp3__P0AC)->count__GFC;
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    __tmp__W2AC=((__STRING *)string_tmp3__T0AC)->count__KFC;
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    if ((__tmp__S2AC != ((__STRING *)string_tmp2__J0AC)->count__GFC)) {
-      if (result__H0AC==NULL) {
-        __tmp__32AC=NULL;
+    if ((__tmp__W2AC != ((__STRING *)string_tmp2__N0AC)->count__KFC)) {
+      if (result__L0AC==NULL) {
+        __tmp__B3AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__H0AC)->__id) {
+        switch (((struct ___OBJ *)result__L0AC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__32AC=((void *)result__H0AC);
+          __tmp__B3AC=((void *)result__L0AC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__32AC=NULL;
+          __tmp__B3AC=NULL;
         } break;
         }
       };
-      dir__12AC=__tmp__32AC;
-      if (FILE_SYSTEM__->parent_directory__5ED==0) {
+      dir__52AC=__tmp__B3AC;
+      if (FILE_SYSTEM__->parent_directory__DFD==0) {
       } else {
-        parent_directory__4DD();
+        parent_directory__CED();
       };
-      result__H0AC=physical_get_entry__ZBF(string_tmp3__P0AC);
+      result__L0AC=physical_get_entry__3BF(string_tmp3__T0AC);
     };
   };
-  return(result__H0AC);
+  return(result__L0AC);
 }
 
-static void put_string__E1F(void *s__G1F)
+static void put_string__I1F(void *s__K1F)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__V1F,__tmp__X1F,Self__IWG,limit_up__JWG;
-  __CHARACTER __tmp__41F;
-  if (((struct ___OBJ *)s__G1F)->__id==__STRING_CONSTANT__) {
-    __tmp__V1F= 1;
+  __INTEGER __tmp__Z1F,__tmp__11F,Self__MWG,limit_up__NWG;
+  __CHARACTER __tmp__C2F;
+  if (((struct ___OBJ *)s__K1F)->__id==__STRING_CONSTANT__) {
+    __tmp__Z1F= 1;
   } else {
-    __tmp__V1F= 1;
+    __tmp__Z1F= 1;
   };
-  if (((struct ___OBJ *)s__G1F)->__id==__STRING_CONSTANT__) {
-    __tmp__X1F=((__STRING_CONSTANT *)s__G1F)->count__DD;
+  if (((struct ___OBJ *)s__K1F)->__id==__STRING_CONSTANT__) {
+    __tmp__11F=((__STRING_CONSTANT *)s__K1F)->count__DD;
   } else {
-    __tmp__X1F=((__STRING *)s__G1F)->count__GFC;
+    __tmp__11F=((__STRING *)s__K1F)->count__KFC;
   };
-  Self__IWG=__tmp__V1F;
-  limit_up__JWG=__tmp__X1F;
-  while ((Self__IWG <= limit_up__JWG)) {
-    if (((struct ___OBJ *)s__G1F)->__id==__STRING_CONSTANT__) {
-      __tmp__41F=((__CHARACTER *)((__STRING_CONSTANT *)s__G1F)->storage__FQO)[(__INTEGER)(Self__IWG -  1)];
+  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)];
     } else {
-      __tmp__41F=((__CHARACTER *)((__STRING *)s__G1F)->storage__RBS)[(__INTEGER)(Self__IWG -  1)];
+      __tmp__C2F=((__CHARACTER *)((__STRING *)s__K1F)->storage__VBS)[(__INTEGER)(Self__MWG -  1)];
     };
-    fputc((int)(__tmp__41F),stderr);
-    Self__IWG=(__INTEGER)(Self__IWG +  1);
+    fputc((int)(__tmp__C2F),stderr);
+    Self__MWG=(__INTEGER)(Self__MWG +  1);
   };
 }
 
-static __PROTOTYPE* create__name__generic_count__JAC(void *f__LAC,void *n__MAC)
+static __PROTOTYPE* create__name__generic_count__NAC(void *f__PAC,void *n__QAC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __PROTOTYPE *result__LUC,*Self__QSS;
-  __POINTER ptr__MUC,ptr_table__KJ4G,next__JJ4G,result__LJ4G;
-  __POINTER ptr_table__PJ4G,next__OJ4G,result__QJ4G,ptr__WE3;
-  __POINTER ptr_table__3J4G,next__2J4G,result__4J4G,ptr_table__CK4G;
-  __POINTER next__BK4G,result__DK4G,ptr__10GD,ptr_table__MK4G;
-  __POINTER next__LK4G,result__NK4G,ptr_table__RK4G,next__QK4G;
-  __POINTER result__SK4G,file__USS,ptr__1K3,ptr_table__WK4G,next__VK4G;
-  __POINTER result__XK4G,ptr_table__1K4G,next__0K4G,result__2K4G;
-  __INTEGER typ_id__RUC,idx__IK3G,idx__XSS,len__VJ4G,__tmp__WJ4G;
-  __INTEGER __tmp__YJ4G,Self__ZJ4G,typ_id__1E3,new_capacity__CTX;
-  __INTEGER __tmp__GUX,__tmp__RNEC,Self__DOVD,result__GK4G,__tmp__IK4G;
-  __INTEGER Self__JK4G,idx__2MBC,idx__QYGD,new_capacity__RYGD,i__SYGD;
-  __INTEGER result__QNW,__tmp__RNW,Self__HT1,typ_id__A1GD,result__DWX;
-  __INTEGER typ_id__AL3,new_capacity__DMJC;
-  __UINTEGER_32 sz__OUC,a__1F1G,new_size__2F1G,t__AG1G,a__5F1G;
-  __UINTEGER_32 new_size__SJ4G,lab_type__RJ4G,sz__YE3,a__DG1G;
-  __UINTEGER_32 new_size__EG1G,t__IG1G,a__HG1G,new_size__FK4G;
-  __UINTEGER_32 lab_type__EK4G,sz__30GD,a__0G1G,new_size__1G1G,t__5G1G;
-  __UINTEGER_32 a__4G1G,new_size__UK4G,lab_type__TK4G,sz__3K3,a__CH1G;
-  __UINTEGER_32 new_size__DH1G,t__HH1G,a__GH1G,new_size__4K4G;
-  __UINTEGER_32 lab_type__3K4G;
-  __STRING_CONSTANT *Self__IRX,*Self__HK4G,*Self__ONW;
-  __STRING *Self__ND3G,*Self__VD3G,*Self__YD3G,*Self__NYS;
-  void *__tmp__FUS;
-  __CHARACTER *Self__KK3G,*ptr__MWX;
-  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__VE3,*Self__P2BC;
-  __FAST_ARRAYoPROTOTYPEo *Self__ATX;
-  __BOOLEAN __tmp__QTX;
-  void **__tmp__FUX,**new__3MEC;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__SMBC;
-  void *node__4MBC,*node1__UYGD,*node2__VYGD,*__tmp__SOBC;
-  void **old_buckets__TYGD;
-  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__00GD;
-  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__J3SD;
-  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__0K3,*Self__F4BC;
-  result__LUC=NULL;
-  ptr__MUC=((__POINTER )(NULL));
-  typ_id__RUC= 0;
-  sz__OUC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
-  if ((sz__OUC ==  0)) {
-    result__LUC=PROTOTYPE__;
+  __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__;
   } else {
-    typ_id__RUC=__PROTOTYPE__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__OUC);
-    if ((typ_id__RUC == (__INTEGER)(-  1))) {
-      a__1F1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2F1G=(__UINTEGER_32)((__UINTEGER_32)(sz__OUC + a__1F1G) & (__UINTEGER_32)(~ a__1F1G));
-      ptr_table__KJ4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2F1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JJ4G=((__POINTER )(NULL));
-      result__LJ4G=((__POINTER *)ptr_table__KJ4G)[ 0];
-      if ((result__LJ4G == (void *)NULL)) {
-        result__LJ4G=new_lab__2QJ(new_size__2F1G);
-        next__JJ4G=(void *)((unsigned long)result__LJ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2F1G)));
-        ((__POINTER *)next__JJ4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KJ4G)[ 0]=next__JJ4G;
-      } else {
-        next__JJ4G=((__POINTER *)result__LJ4G)[ 0];
-        if ((next__JJ4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LJ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__2F1G <<  1)) <=  4096)) {
-            next__JJ4G=(void *)((unsigned long)result__LJ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2F1G)));
-          } else {
-            next__JJ4G=new_lab__2QJ(new_size__2F1G);
-          };
-          ((__POINTER *)next__JJ4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KJ4G)[ 0]=next__JJ4G;
-        } else {
-          ((__POINTER *)result__LJ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JJ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LJ4G=next__JJ4G;
-        };
-      };
-      ptr__MUC=result__LJ4G;
-    } else {
-      t__AG1G=((__UINTEGER_32 )typ_id__RUC);
-      a__5F1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SJ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__OUC + a__5F1G) & (__UINTEGER_32)(~ a__5F1G));
-      ptr_table__PJ4G=((__POINTER )(&(table_type[(t__AG1G)])));
-      lab_type__RJ4G=(__UINTEGER_32)(t__AG1G |  1);
-      next__OJ4G=((__POINTER )(NULL));
-      result__QJ4G=((__POINTER *)ptr_table__PJ4G)[ 0];
-      if ((result__QJ4G == (void *)NULL)) {
-        result__QJ4G=new_lab__2QJ(lab_type__RJ4G);
-        next__OJ4G=(void *)((unsigned long)result__QJ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJ4G)));
-        ((__POINTER *)next__OJ4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PJ4G)[ 0]=next__OJ4G;
-      } else {
-        next__OJ4G=((__POINTER *)result__QJ4G)[ 0];
-        if ((next__OJ4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QJ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SJ4G <<  1)) <=  4096)) {
-            next__OJ4G=(void *)((unsigned long)result__QJ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJ4G)));
-          } else {
-            next__OJ4G=new_lab__2QJ(lab_type__RJ4G);
-          };
-          ((__POINTER *)next__OJ4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PJ4G)[ 0]=next__OJ4G;
-        } else {
-          ((__POINTER *)result__QJ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__OJ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QJ4G=next__OJ4G;
-        };
-      };
-      ptr__MUC=result__QJ4G;
-    };
-    result__LUC=((__PROTOTYPE *)ptr__MUC);
-    *(result__LUC) = *(PROTOTYPE__);
-  };
-  Self__QSS=((__PROTOTYPE *)result__LUC);
-  Self__QSS->filename__EPG=f__LAC;
-  Self__QSS->parent_named__5.name__LI=n__MAC;
-  Self__IRX=((__STRING_CONSTANT *)n__MAC);
-  Self__KK3G=((__CHARACTER *)Self__IRX->storage__FQO);
-  idx__IK3G=(__INTEGER)(Self__IRX->count__DD -  1);
-  while ((! ((idx__IK3G <  0) || ('.' == Self__KK3G[idx__IK3G])))) {
-    idx__IK3G=(__INTEGER)(idx__IK3G -  1);
-  };
-  idx__XSS=(__INTEGER)( 1 + idx__IK3G);
-  if ((idx__XSS !=  0)) {
-    copy__JCS(string_tmp__VH,n__MAC);
-    Self__ND3G=((__STRING *)string_tmp__VH);
-    if ((idx__XSS > Self__ND3G->count__GFC)) {
-      Self__ND3G->count__GFC= 0;
-    } else {
-      if ((idx__XSS >  0)) {
-        len__VJ4G=(__INTEGER)((__INTEGER)(idx__XSS -  1) +  1);
-        if ((len__VJ4G >  0)) {
-          __tmp__WJ4G=(__INTEGER)(idx__XSS +  1);
-          __tmp__YJ4G=Self__ND3G->count__GFC;
-          Self__ZJ4G=__tmp__WJ4G;
-          while ((Self__ZJ4G <= __tmp__YJ4G)) {
-            ((__CHARACTER *)Self__ND3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__ZJ4G - len__VJ4G) -  1)]=((__CHARACTER *)Self__ND3G->storage__RBS)[(__INTEGER)(Self__ZJ4G -  1)];
-            Self__ZJ4G=(__INTEGER)(Self__ZJ4G +  1);
-          };
-          Self__ND3G->count__GFC=(__INTEGER)(Self__ND3G->count__GFC - len__VJ4G);
-        };
-      };
-    };
-    Self__QSS->shortname__VHE=get__YVB(string_tmp__VH);
+    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);
   } else {
-    Self__QSS->shortname__VHE=n__MAC;
-  };
-  result__VE3=NULL;
-  ptr__WE3=((__POINTER )(NULL));
-  typ_id__1E3= 0;
-  sz__YE3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
-  if ((sz__YE3 ==  0)) {
-    result__VE3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    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__;
   } else {
-    typ_id__1E3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__YE3);
-    if ((typ_id__1E3 == (__INTEGER)(-  1))) {
-      a__DG1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__EG1G=(__UINTEGER_32)((__UINTEGER_32)(sz__YE3 + a__DG1G) & (__UINTEGER_32)(~ a__DG1G));
-      ptr_table__3J4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EG1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__2J4G=((__POINTER )(NULL));
-      result__4J4G=((__POINTER *)ptr_table__3J4G)[ 0];
-      if ((result__4J4G == (void *)NULL)) {
-        result__4J4G=new_lab__2QJ(new_size__EG1G);
-        next__2J4G=(void *)((unsigned long)result__4J4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EG1G)));
-        ((__POINTER *)next__2J4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3J4G)[ 0]=next__2J4G;
-      } else {
-        next__2J4G=((__POINTER *)result__4J4G)[ 0];
-        if ((next__2J4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4J4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EG1G <<  1)) <=  4096)) {
-            next__2J4G=(void *)((unsigned long)result__4J4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EG1G)));
-          } else {
-            next__2J4G=new_lab__2QJ(new_size__EG1G);
-          };
-          ((__POINTER *)next__2J4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3J4G)[ 0]=next__2J4G;
-        } else {
-          ((__POINTER *)result__4J4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2J4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4J4G=next__2J4G;
-        };
-      };
-      ptr__WE3=result__4J4G;
-    } else {
-      t__IG1G=((__UINTEGER_32 )typ_id__1E3);
-      a__HG1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__FK4G=(__UINTEGER_32)((__UINTEGER_32)(sz__YE3 + a__HG1G) & (__UINTEGER_32)(~ a__HG1G));
-      ptr_table__CK4G=((__POINTER )(&(table_type[(t__IG1G)])));
-      lab_type__EK4G=(__UINTEGER_32)(t__IG1G |  1);
-      next__BK4G=((__POINTER )(NULL));
-      result__DK4G=((__POINTER *)ptr_table__CK4G)[ 0];
-      if ((result__DK4G == (void *)NULL)) {
-        result__DK4G=new_lab__2QJ(lab_type__EK4G);
-        next__BK4G=(void *)((unsigned long)result__DK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FK4G)));
-        ((__POINTER *)next__BK4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CK4G)[ 0]=next__BK4G;
-      } else {
-        next__BK4G=((__POINTER *)result__DK4G)[ 0];
-        if ((next__BK4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DK4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FK4G <<  1)) <=  4096)) {
-            next__BK4G=(void *)((unsigned long)result__DK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FK4G)));
-          } else {
-            next__BK4G=new_lab__2QJ(lab_type__EK4G);
-          };
-          ((__POINTER *)next__BK4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CK4G)[ 0]=next__BK4G;
-        } else {
-          ((__POINTER *)result__DK4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BK4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DK4G=next__BK4G;
-        };
-      };
-      ptr__WE3=result__DK4G;
-    };
-    result__VE3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__WE3);
-    *(result__VE3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
-  };
-  Self__P2BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__VE3);
-  if ((Self__P2BC->parent_arrayed_collection__DME.capacity__IBBC <  0)) {
-    Self__P2BC->parent_arrayed_collection__DME.storage__ECBC=create__FY1C( 0);
-    Self__P2BC->parent_arrayed_collection__DME.capacity__IBBC= 0;
-  };
-  Self__P2BC->parent_arrayed_collection__DME.upper__GBBC=(__INTEGER)(-  1);
-  Self__QSS->idf_generic_list__EME=result__VE3;
-  Self__QSS->index__FMG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
-  Self__ATX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
-  new_capacity__CTX= 0;
-  if (((__INTEGER)(Self__ATX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__ATX->parent_arrayed_collection__AJ.capacity__NCU -  1))) {
-    Self__ATX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__ATX->parent_arrayed_collection__AJ.upper__HJ +  1);
-    __tmp__QTX=TRUE__;
+    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__;
   } else {
-    __tmp__QTX=FALSE__;
-  };
-  if ((! __tmp__QTX)) {
-    if ((Self__ATX->parent_arrayed_collection__AJ.capacity__NCU ==  0)) {
-      Self__ATX->parent_arrayed_collection__AJ.storage__0ST=create__WESB( 2);
-      Self__ATX->parent_arrayed_collection__AJ.capacity__NCU= 2;
-      Self__ATX->parent_arrayed_collection__AJ.upper__HJ= 0;
-    } else {
-      new_capacity__CTX=(__INTEGER)(Self__ATX->parent_arrayed_collection__AJ.capacity__NCU <<  1);
-      __tmp__FUX=Self__ATX->parent_arrayed_collection__AJ.storage__0ST;
-      __tmp__GUX=Self__ATX->parent_arrayed_collection__AJ.capacity__NCU;
-      new__3MEC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__FUX)),((__UINTEGER_32 )(__INTEGER)(__tmp__GUX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__CTX * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__RNEC=(__INTEGER)(new_capacity__CTX -  1);
-      Self__DOVD=__tmp__GUX;
-      while ((Self__DOVD <= __tmp__RNEC)) {
-        new__3MEC[Self__DOVD]=NULL;
-        Self__DOVD=(__INTEGER)(Self__DOVD +  1);
-      };
-      Self__ATX->parent_arrayed_collection__AJ.storage__0ST=new__3MEC;
-      Self__ATX->parent_arrayed_collection__AJ.capacity__NCU=new_capacity__CTX;
-      Self__ATX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__ATX->parent_arrayed_collection__AJ.upper__HJ +  1);
-    };
-  };
-  ((void **)Self__ATX->parent_arrayed_collection__AJ.storage__0ST)[Self__ATX->parent_arrayed_collection__AJ.upper__HJ]=Self__QSS;
-  Self__SMBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__5SS);
-  Self__HK4G=((__STRING_CONSTANT *)f__LAC);
-  result__GK4G= 0;
-  __tmp__IK4G=Self__HK4G->count__DD;
-  Self__JK4G= 1;
-  while ((Self__JK4G <= __tmp__IK4G)) {
-    result__GK4G=(__INTEGER)((__INTEGER)( 5 * result__GK4G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HK4G->storage__FQO)[(__INTEGER)(Self__JK4G -  1)])));
-    Self__JK4G=(__INTEGER)(Self__JK4G +  1);
-  };
-  if ((result__GK4G <  0)) {
-    result__GK4G=(__INTEGER)(~ result__GK4G);
-  };
-  idx__2MBC=(__INTEGER)(result__GK4G % Self__SMBC->capacity__ANBC);
-  node__4MBC=((void **)Self__SMBC->buckets__FNBC)[idx__2MBC];
-  while ((! (((void *)node__4MBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__4MBC)->key__RNBC == (void *)f__LAC)))) {
-    node__4MBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__4MBC)->next__2NBC;
-  };
-  if (((void *)node__4MBC == (void *)NULL)) {
-    if ((Self__SMBC->capacity__ANBC == Self__SMBC->count__FOBC)) {
-      idx__QYGD= 0;
-      node1__UYGD=NULL;
-      node2__VYGD=NULL;
-      old_buckets__TYGD=Self__SMBC->buckets__FNBC;
-      new_capacity__RYGD=prime_number_ceiling__H41((__INTEGER)(Self__SMBC->capacity__ANBC +  1));
-      Self__SMBC->buckets__FNBC=create__XHTC(new_capacity__RYGD);
-      i__SYGD=(__INTEGER)(Self__SMBC->capacity__ANBC -  1);
-      Self__SMBC->capacity__ANBC=new_capacity__RYGD;
-      while ((i__SYGD >=  0)) {
-        node1__UYGD=((void **)old_buckets__TYGD)[i__SYGD];
-        while (((void *)node1__UYGD != (void *)NULL)) {
-          node2__VYGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__UYGD)->next__2NBC;
-          Self__ONW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__UYGD)->key__RNBC);
-          result__QNW= 0;
-          __tmp__RNW=Self__ONW->count__DD;
-          Self__HT1= 1;
-          while ((Self__HT1 <= __tmp__RNW)) {
-            result__QNW=(__INTEGER)((__INTEGER)( 5 * result__QNW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ONW->storage__FQO)[(__INTEGER)(Self__HT1 -  1)])));
-            Self__HT1=(__INTEGER)(Self__HT1 +  1);
-          };
-          if ((result__QNW <  0)) {
-            result__QNW=(__INTEGER)(~ result__QNW);
-          };
-          idx__QYGD=(__INTEGER)(result__QNW % Self__SMBC->capacity__ANBC);
-          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__UYGD)->next__2NBC=((void **)Self__SMBC->buckets__FNBC)[idx__QYGD];
-          ((void **)Self__SMBC->buckets__FNBC)[idx__QYGD]=node1__UYGD;
-          node1__UYGD=node2__VYGD;
-        };
-        i__SYGD=(__INTEGER)(i__SYGD -  1);
-      };
-      idx__2MBC=(__INTEGER)(result__GK4G % new_capacity__RYGD);
-    };
-    __tmp__SOBC=((void **)Self__SMBC->buckets__FNBC)[idx__2MBC];
-    result__00GD=NULL;
-    ptr__10GD=((__POINTER )(NULL));
-    typ_id__A1GD= 0;
-    sz__30GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
-    if ((sz__30GD ==  0)) {
-      result__00GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
-    } else {
-      typ_id__A1GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__30GD);
-      if ((typ_id__A1GD == (__INTEGER)(-  1))) {
-        a__0G1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__1G1G=(__UINTEGER_32)((__UINTEGER_32)(sz__30GD + a__0G1G) & (__UINTEGER_32)(~ a__0G1G));
-        ptr_table__MK4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1G1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__LK4G=((__POINTER )(NULL));
-        result__NK4G=((__POINTER *)ptr_table__MK4G)[ 0];
-        if ((result__NK4G == (void *)NULL)) {
-          result__NK4G=new_lab__2QJ(new_size__1G1G);
-          next__LK4G=(void *)((unsigned long)result__NK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1G1G)));
-          ((__POINTER *)next__LK4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MK4G)[ 0]=next__LK4G;
-        } else {
-          next__LK4G=((__POINTER *)result__NK4G)[ 0];
-          if ((next__LK4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NK4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1G1G <<  1)) <=  4096)) {
-              next__LK4G=(void *)((unsigned long)result__NK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1G1G)));
+    __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)));
             } else {
-              next__LK4G=new_lab__2QJ(new_size__1G1G);
-            };
-            ((__POINTER *)next__LK4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MK4G)[ 0]=next__LK4G;
-          } else {
-            ((__POINTER *)result__NK4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LK4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NK4G=next__LK4G;
-          };
-        };
-        ptr__10GD=result__NK4G;
-      } else {
-        t__5G1G=((__UINTEGER_32 )typ_id__A1GD);
-        a__4G1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__UK4G=(__UINTEGER_32)((__UINTEGER_32)(sz__30GD + a__4G1G) & (__UINTEGER_32)(~ a__4G1G));
-        ptr_table__RK4G=((__POINTER )(&(table_type[(t__5G1G)])));
-        lab_type__TK4G=(__UINTEGER_32)(t__5G1G |  1);
-        next__QK4G=((__POINTER )(NULL));
-        result__SK4G=((__POINTER *)ptr_table__RK4G)[ 0];
-        if ((result__SK4G == (void *)NULL)) {
-          result__SK4G=new_lab__2QJ(lab_type__TK4G);
-          next__QK4G=(void *)((unsigned long)result__SK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UK4G)));
-          ((__POINTER *)next__QK4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RK4G)[ 0]=next__QK4G;
-        } else {
-          next__QK4G=((__POINTER *)result__SK4G)[ 0];
-          if ((next__QK4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SK4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__UK4G <<  1)) <=  4096)) {
-              next__QK4G=(void *)((unsigned long)result__SK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UK4G)));
+              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)));
             } else {
-              next__QK4G=new_lab__2QJ(lab_type__TK4G);
+              next__YNAH=new_lab__ARJ(lab_type__1NAH);
             };
-            ((__POINTER *)next__QK4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RK4G)[ 0]=next__QK4G;
+            ((__POINTER *)next__YNAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZNAH)[ 0]=next__YNAH;
           } else {
-            ((__POINTER *)result__SK4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QK4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SK4G=next__QK4G;
+            ((__POINTER *)result__0NAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YNAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0NAH=next__YNAH;
           };
         };
-        ptr__10GD=result__SK4G;
+        ptr__50GD=result__0NAH;
       };
-      result__00GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__10GD);
-      *(result__00GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
+      result__40GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__50GD);
+      *(result__40GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    Self__J3SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__00GD);
-    Self__J3SD->item__E3GD=Self__QSS;
-    Self__J3SD->key__RNBC=f__LAC;
-    Self__J3SD->next__2NBC=__tmp__SOBC;
-    node__4MBC=result__00GD;
-    ((void **)Self__SMBC->buckets__FNBC)[idx__2MBC]=result__00GD;
-    Self__SMBC->count__FOBC=(__INTEGER)(Self__SMBC->count__FOBC +  1);
+    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);
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__4MBC)->item__E3GD=Self__QSS;
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__CNBC)->item__I3GD=Self__USS;
   };
-  copy__JCS(string_tmp__0VX,f__LAC);
-  Self__VD3G=((__STRING *)string_tmp__0VX);
-  if ((Self__VD3G->capacity__IBS > Self__VD3G->count__GFC)) {
-    ((__CHARACTER *)Self__VD3G->storage__RBS)[Self__VD3G->count__GFC]='\0';
+  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';
   } else {
-    add_last__JLT(Self__VD3G,'\0');
-    Self__VD3G->count__GFC=(__INTEGER)(Self__VD3G->count__GFC -  1);
-  };
-  file__USS=((__POINTER )(fopen((char*)(Self__VD3G->storage__RBS),"rb")));
-  fseek((FILE*)((file__USS)),0,SEEK_END);
-  result__DWX=((__INTEGER )(ftell((FILE *)(file__USS))));
-  fseek((FILE*)((file__USS)),0,SEEK_SET);
-  Self__QSS->source__3AC=create__BBB((__INTEGER)(result__DWX +  1));
-  __tmp__FUS=Self__QSS->source__3AC;
-  Self__YD3G=((__STRING *)__tmp__FUS);
-  if ((Self__YD3G->capacity__IBS > Self__YD3G->count__GFC)) {
-    ((__CHARACTER *)Self__YD3G->storage__RBS)[Self__YD3G->count__GFC]='\0';
+    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';
   } else {
-    add_last__JLT(Self__YD3G,'\0');
-    Self__YD3G->count__GFC=(__INTEGER)(Self__YD3G->count__GFC -  1);
-  };
-  ptr__MWX=Self__YD3G->storage__RBS;
-  fread((void *)((ptr__MWX)),(size_t)(1), (size_t)((result__DWX)),(FILE*)((file__USS)));
-  ((__CHARACTER *)ptr__MWX)[result__DWX]='\0';
-  Self__NYS=((__STRING *)__tmp__FUS);
-  Self__NYS->count__GFC= 0;
-  while ((((__CHARACTER *)ptr__MWX)[Self__NYS->count__GFC] != '\0')) {
-    Self__NYS->count__GFC=(__INTEGER)(Self__NYS->count__GFC +  1);
-  };
-  if (((void *)Self__NYS->storage__RBS != (void *)ptr__MWX)) {
-    Self__NYS->storage__RBS=ptr__MWX;
-    Self__NYS->capacity__IBS=(__INTEGER)(Self__NYS->count__GFC +  1);
-  };
-  fclose((FILE*)((file__USS)));
-  result__0K3=NULL;
-  ptr__1K3=((__POINTER )(NULL));
-  typ_id__AL3= 0;
-  sz__3K3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
-  if ((sz__3K3 ==  0)) {
-    result__0K3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    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__;
   } else {
-    typ_id__AL3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__3K3);
-    if ((typ_id__AL3 == (__INTEGER)(-  1))) {
-      a__CH1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DH1G=(__UINTEGER_32)((__UINTEGER_32)(sz__3K3 + a__CH1G) & (__UINTEGER_32)(~ a__CH1G));
-      ptr_table__WK4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DH1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__VK4G=((__POINTER )(NULL));
-      result__XK4G=((__POINTER *)ptr_table__WK4G)[ 0];
-      if ((result__XK4G == (void *)NULL)) {
-        result__XK4G=new_lab__2QJ(new_size__DH1G);
-        next__VK4G=(void *)((unsigned long)result__XK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DH1G)));
-        ((__POINTER *)next__VK4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WK4G)[ 0]=next__VK4G;
-      } else {
-        next__VK4G=((__POINTER *)result__XK4G)[ 0];
-        if ((next__VK4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XK4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DH1G <<  1)) <=  4096)) {
-            next__VK4G=(void *)((unsigned long)result__XK4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DH1G)));
-          } else {
-            next__VK4G=new_lab__2QJ(new_size__DH1G);
-          };
-          ((__POINTER *)next__VK4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WK4G)[ 0]=next__VK4G;
-        } else {
-          ((__POINTER *)result__XK4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VK4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XK4G=next__VK4G;
-        };
-      };
-      ptr__1K3=result__XK4G;
-    } else {
-      t__HH1G=((__UINTEGER_32 )typ_id__AL3);
-      a__GH1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__4K4G=(__UINTEGER_32)((__UINTEGER_32)(sz__3K3 + a__GH1G) & (__UINTEGER_32)(~ a__GH1G));
-      ptr_table__1K4G=((__POINTER )(&(table_type[(t__HH1G)])));
-      lab_type__3K4G=(__UINTEGER_32)(t__HH1G |  1);
-      next__0K4G=((__POINTER )(NULL));
-      result__2K4G=((__POINTER *)ptr_table__1K4G)[ 0];
-      if ((result__2K4G == (void *)NULL)) {
-        result__2K4G=new_lab__2QJ(lab_type__3K4G);
-        next__0K4G=(void *)((unsigned long)result__2K4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4K4G)));
-        ((__POINTER *)next__0K4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1K4G)[ 0]=next__0K4G;
-      } else {
-        next__0K4G=((__POINTER *)result__2K4G)[ 0];
-        if ((next__0K4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2K4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4K4G <<  1)) <=  4096)) {
-            next__0K4G=(void *)((unsigned long)result__2K4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4K4G)));
-          } else {
-            next__0K4G=new_lab__2QJ(lab_type__3K4G);
-          };
-          ((__POINTER *)next__0K4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1K4G)[ 0]=next__0K4G;
-        } else {
-          ((__POINTER *)result__2K4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0K4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2K4G=next__0K4G;
-        };
-      };
-      ptr__1K3=result__2K4G;
-    };
-    result__0K3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__1K3);
-    *(result__0K3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
-  };
-  Self__F4BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__0K3);
-  new_capacity__DMJC=prime_number_ceiling__H41( 193);
-  Self__F4BC->buckets__TAGC=create__NQSC(new_capacity__DMJC);
-  Self__F4BC->capacity__M4BC=new_capacity__DMJC;
-  Self__F4BC->count__4OGC= 0;
-  Self__QSS->slot_list__MUS=result__0K3;
-  Self__QSS->parent_named__5.parent_itm_object__4.position__3CJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__QSS->index__FMG) |  131072));
-  return(result__LUC);
+    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);
 }
 
-static __BOOLEAN read_space__NRD()
+static __BOOLEAN read_space__RRD()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos2__SRD,short_line__URD,level_comment__VRD,pos__RRD;
-  __INTEGER posold__QRD,begin__4CUG,end__5CUG,start__AL4G,end__5K4G;
-  __INTEGER len__BL4G,__tmp__CL4G,__tmp__EL4G,Self__FL4G,begin__ZEMD;
-  __INTEGER start__JL4G,end__IL4G,len__KL4G,__tmp__LL4G,__tmp__NL4G;
-  __INTEGER Self__OL4G;
-  void *key__TRD,*__tmp__E2D;
-  __STRING *Self__DL4G,*Self__ML4G;
-  void *__tmp__B2D;
-  __POSITION pos__ZRMG;
-  __CHARACTER result__ENZG,result__JNZG,result__ONZG,result__TNZG;
-  __CHARACTER result__2NZG,result__BOZG,result__GOZG,result__LOZG;
-  __CHARACTER result__VOZG,result__0OZG,result__5OZG,result__EPZG;
-  __CHARACTER result__JPZG,result__OPZG,result__TPZG,result__YPZG;
-  __CHARACTER result__3PZG,result__CQZG,result__LQZG,result__QQZG;
-  __CHARACTER result__ZQZG,result__I5E;
-  __BOOLEAN __tmp__YTD,result__GJ1G,result__KJ1G,__tmp__0YD;
-  __BOOLEAN result__NJ1G,__tmp__1YD,__tmp__20D,__tmp__D5D;
-  pos2__SRD= 0;
-  key__TRD=NULL;
-  short_line__URD= 0;
-  level_comment__VRD= 0;
-  pos__RRD=position__CBC;
-  posold__QRD=(__INTEGER)(-  1);
-  while ((posold__QRD != position__CBC)) {
-    posold__QRD=position__CBC;
-    if (is_shorter__TY) {
-      while (((position__CBC >  2) && (((__INTEGER_8 )((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)((__INTEGER)(position__CBC -  1) -  1)]) <= ((__INTEGER_8 )' ')))) {
-        position__CBC=(__INTEGER)(position__CBC -  1);
-      };
-      short_line__URD= 0;
-    };
-    until_do__DNI:
+  __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:
     {
-      result__ENZG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__ENZG=((__CHARACTER )(( 0)));
+      result__OM1G='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__OM1G=((__CHARACTER )(( 0)));
       } else {
-        result__ENZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__OM1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__ENZG == ((__CHARACTER )(( 0))))) {
-        __tmp__YTD=TRUE__;
+      if ((result__OM1G == ((__CHARACTER )(( 0))))) {
+        __tmp__2TD=TRUE__;
       } else {
-        result__JNZG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__JNZG=((__CHARACTER )(( 0)));
+        result__TM1G='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__TM1G=((__CHARACTER )(( 0)));
         } else {
-          result__JNZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__TM1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__YTD=(((__INTEGER_8 )result__JNZG) > ((__INTEGER_8 )' '));
+        __tmp__2TD=(((__INTEGER_8 )result__TM1G) > ((__INTEGER_8 )' '));
       };
-      if ((! __tmp__YTD)) {
-        if (is_shorter__TY) {
-          result__ONZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__ONZG=((__CHARACTER )(( 0)));
+      if ((! __tmp__2TD)) {
+        if (is_shorter__WY) {
+          result__YM1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__YM1G=((__CHARACTER )(( 0)));
           } else {
-            result__ONZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__YM1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__ONZG == '\n')) {
-            short_line__URD=(__INTEGER)(short_line__URD +  1);
-            if ((short_line__URD ==  2)) {
-              key_comment_default__QBC=(&__string_127);
+          if ((result__YM1G == '\n')) {
+            short_line__YRD=(__INTEGER)(short_line__YRD +  1);
+            if ((short_line__YRD ==  2)) {
+              key_comment_default__UBC=(&__string_127);
               if (is_shorter2__VI) {
-                is_catch_comment__QWC=FALSE__;
+                is_catch_comment__UWC=FALSE__;
               };
             };
           };
         };
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto until_do__DNI;
-      };
-    };
-    if ((position__CBC < ((__STRING *)source__5AC)->count__GFC)) {
-      result__TNZG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__TNZG=((__CHARACTER )(( 0)));
-      } else {
-        result__TNZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-      };
-      if (((result__TNZG == '/') & (((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)((__INTEGER)(position__CBC +  1) -  1)] == '/'))) {
-        position__CBC=(__INTEGER)(position__CBC +  2);
-        pos2__SRD=position__CBC;
-        if (is_shorter__TY) {
-          if (is_active_short__OBC) {
-            begin__4CUG=(__INTEGER)(position__CBC -  2);
-            end__5CUG=(__INTEGER)(position__CBC -  1);
-            Self__DL4G=((__STRING *)output_code__SI);
-            start__AL4G=(__INTEGER)(begin__4CUG + short_derive__RBC);
-            end__5K4G=(__INTEGER)(end__5CUG + short_derive__RBC);
-            len__BL4G=(__INTEGER)((__INTEGER)(end__5K4G - start__AL4G) +  1);
-            if ((len__BL4G >  0)) {
-              __tmp__CL4G=(__INTEGER)(end__5K4G +  1);
-              __tmp__EL4G=Self__DL4G->count__GFC;
-              Self__FL4G=__tmp__CL4G;
-              while ((Self__FL4G <= __tmp__EL4G)) {
-                ((__CHARACTER *)Self__DL4G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__FL4G - len__BL4G) -  1)]=((__CHARACTER *)Self__DL4G->storage__RBS)[(__INTEGER)(Self__FL4G -  1)];
-                Self__FL4G=(__INTEGER)(Self__FL4G +  1);
+        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);
               };
-              Self__DL4G->count__GFC=(__INTEGER)(Self__DL4G->count__GFC - len__BL4G);
+              Self__LOAH->count__KFC=(__INTEGER)(Self__LOAH->count__KFC - len__JOAH);
             };
-            short_derive__RBC=(__INTEGER)(short_derive__RBC - (__INTEGER)((__INTEGER)(end__5CUG - begin__4CUG) +  1));
-            while_do__HFMD:
+            short_derive__VBC=(__INTEGER)(short_derive__VBC - (__INTEGER)((__INTEGER)(end__0AWG - begin__ZAWG) +  1));
+            while_do__LFMD:
             {
-              result__2NZG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__2NZG=((__CHARACTER )(( 0)));
+              result__GN1G='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__GN1G=((__CHARACTER )(( 0)));
               } else {
-                result__2NZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__GN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__2NZG == ' ')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                goto while_do__HFMD;
+              if ((result__GN1G == ' ')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                goto while_do__LFMD;
               };
             };
-            result__BOZG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__BOZG=((__CHARACTER )(( 0)));
+            result__LN1G='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__LN1G=((__CHARACTER )(( 0)));
             } else {
-              result__BOZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__LN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__BOZG == '*')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              while_do__5LND:
+            if ((result__LN1G == '*')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              while_do__DMND:
               {
-                result__GOZG='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__GOZG=((__CHARACTER )(( 0)));
+                result__QN1G='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__QN1G=((__CHARACTER )(( 0)));
                 } else {
-                  result__GOZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__QN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                if ((result__GOZG == ' ')) {
-                  position__CBC=(__INTEGER)(position__CBC +  1);
-                  goto while_do__5LND;
+                if ((result__QN1G == ' ')) {
+                  position__GBC=(__INTEGER)(position__GBC +  1);
+                  goto while_do__DMND;
                 };
               };
-              result__LOZG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__LOZG=((__CHARACTER )(( 0)));
+              result__VN1G='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__VN1G=((__CHARACTER )(( 0)));
               } else {
-                result__LOZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__VN1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              result__GJ1G=FALSE__;
-              if ((((__INTEGER_8 )result__LOZG) >= ((__INTEGER_8 )'a'))) {
-                result__GJ1G=(((__INTEGER_8 )result__LOZG) <= ((__INTEGER_8 )'z'));
+              result__2I3G=FALSE__;
+              if ((((__INTEGER_8 )result__VN1G) >= ((__INTEGER_8 )'a'))) {
+                result__2I3G=(((__INTEGER_8 )result__VN1G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__GJ1G) {
-                ((__STRING *)string_tmp__VH)->count__GFC= 0;
+              if (result__2I3G) {
+                ((__STRING *)string_tmp__VH)->count__KFC= 0;
                 do {
-                  result__VOZG='\0';
-                  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                    result__VOZG=((__CHARACTER )(( 0)));
+                  result__5N1G='\0';
+                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                    result__5N1G=((__CHARACTER )(( 0)));
                   } else {
-                    result__VOZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                    result__5N1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                   };
-                  add_last__JLT(string_tmp__VH,result__VOZG);
-                  position__CBC=(__INTEGER)(position__CBC +  1);
-                  result__0OZG='\0';
-                  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                    result__0OZG=((__CHARACTER )(( 0)));
+                  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)));
                   } else {
-                    result__0OZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                    result__EO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                   };
-                  result__KJ1G=FALSE__;
-                  if ((((__INTEGER_8 )result__0OZG) >= ((__INTEGER_8 )'a'))) {
-                    result__KJ1G=(((__INTEGER_8 )result__0OZG) <= ((__INTEGER_8 )'z'));
+                  result__AJ3G=FALSE__;
+                  if ((((__INTEGER_8 )result__EO1G) >= ((__INTEGER_8 )'a'))) {
+                    result__AJ3G=(((__INTEGER_8 )result__EO1G) <= ((__INTEGER_8 )'z'));
                   };
-                  if (result__KJ1G) {
-                    __tmp__0YD=TRUE__;
+                  if (result__AJ3G) {
+                    __tmp__4YD=TRUE__;
                   } else {
-                    result__5OZG='\0';
-                    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                      result__5OZG=((__CHARACTER )(( 0)));
+                    result__JO1G='\0';
+                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                      result__JO1G=((__CHARACTER )(( 0)));
                     } else {
-                      result__5OZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                      result__JO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                     };
-                    result__NJ1G=FALSE__;
-                    if ((((__INTEGER_8 )result__5OZG) >= ((__INTEGER_8 )'0'))) {
-                      result__NJ1G=(((__INTEGER_8 )result__5OZG) <= ((__INTEGER_8 )'9'));
+                    result__DJ3G=FALSE__;
+                    if ((((__INTEGER_8 )result__JO1G) >= ((__INTEGER_8 )'0'))) {
+                      result__DJ3G=(((__INTEGER_8 )result__JO1G) <= ((__INTEGER_8 )'9'));
                     };
-                    __tmp__0YD=result__NJ1G;
+                    __tmp__4YD=result__DJ3G;
                   };
-                  if (__tmp__0YD) {
-                    __tmp__1YD=TRUE__;
+                  if (__tmp__4YD) {
+                    __tmp__5YD=TRUE__;
                   } else {
-                    result__EPZG='\0';
-                    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                      result__EPZG=((__CHARACTER )(( 0)));
+                    result__OO1G='\0';
+                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                      result__OO1G=((__CHARACTER )(( 0)));
                     } else {
-                      result__EPZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                      result__OO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                     };
-                    __tmp__1YD=(result__EPZG == '_');
+                    __tmp__5YD=(result__OO1G == '_');
                   };
-                } while (__tmp__1YD);
-                while_do__QY5D:
+                } while (__tmp__5YD);
+                while_do__Y05D:
                 {
-                  result__JPZG='\0';
-                  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                    result__JPZG=((__CHARACTER )(( 0)));
+                  result__TO1G='\0';
+                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                    result__TO1G=((__CHARACTER )(( 0)));
                   } else {
-                    result__JPZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                    result__TO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                   };
-                  if ((result__JPZG == ' ')) {
-                    position__CBC=(__INTEGER)(position__CBC +  1);
-                    goto while_do__QY5D;
+                  if ((result__TO1G == ' ')) {
+                    position__GBC=(__INTEGER)(position__GBC +  1);
+                    goto while_do__Y05D;
                   };
                 };
-                result__OPZG='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__OPZG=((__CHARACTER )(( 0)));
+                result__YO1G='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__YO1G=((__CHARACTER )(( 0)));
                 } else {
-                  result__OPZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__YO1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                if ((result__OPZG == ':')) {
-                  position__CBC=(__INTEGER)(position__CBC +  1);
-                  key__TRD=get__YVB(string_tmp__VH);
-                  begin__ZEMD=(__INTEGER)(pos2__SRD +  1);
-                  Self__ML4G=((__STRING *)output_code__SI);
-                  start__JL4G=(__INTEGER)(begin__ZEMD + short_derive__RBC);
-                  end__IL4G=(__INTEGER)(position__CBC + short_derive__RBC);
-                  len__KL4G=(__INTEGER)((__INTEGER)(end__IL4G - start__JL4G) +  1);
-                  if ((len__KL4G >  0)) {
-                    __tmp__LL4G=(__INTEGER)(end__IL4G +  1);
-                    __tmp__NL4G=Self__ML4G->count__GFC;
-                    Self__OL4G=__tmp__LL4G;
-                    while ((Self__OL4G <= __tmp__NL4G)) {
-                      ((__CHARACTER *)Self__ML4G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__OL4G - len__KL4G) -  1)]=((__CHARACTER *)Self__ML4G->storage__RBS)[(__INTEGER)(Self__OL4G -  1)];
-                      Self__OL4G=(__INTEGER)(Self__OL4G +  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);
                     };
-                    Self__ML4G->count__GFC=(__INTEGER)(Self__ML4G->count__GFC - len__KL4G);
+                    Self__UOAH->count__KFC=(__INTEGER)(Self__UOAH->count__KFC - len__SOAH);
                   };
-                  short_derive__RBC=(__INTEGER)(short_derive__RBC - (__INTEGER)((__INTEGER)(position__CBC - begin__ZEMD) +  1));
-                  pos2__SRD=position__CBC;
+                  short_derive__VBC=(__INTEGER)(short_derive__VBC - (__INTEGER)((__INTEGER)(position__GBC - begin__3EMD) +  1));
+                  pos2__WRD=position__GBC;
                 };
               };
             };
           };
         };
-        if (is_catch_comment__QWC) {
-          add_last__JLT(last_comment__K0D,'\t');
+        if (is_catch_comment__UWC) {
+          add_last__NLT(last_comment__O0D,'\t');
         };
-        until_do__Q5BD:
+        until_do__U5BD:
         {
-          result__TPZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__TPZG=((__CHARACTER )(( 0)));
+          result__3O1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__3O1G=((__CHARACTER )(( 0)));
           } else {
-            result__TPZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__3O1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__TPZG == ((__CHARACTER )(( 0))))) {
-            __tmp__20D=TRUE__;
+          if ((result__3O1G == ((__CHARACTER )(( 0))))) {
+            __tmp__A1D=TRUE__;
           } else {
-            result__YPZG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__YPZG=((__CHARACTER )(( 0)));
+            result__CP1G='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__CP1G=((__CHARACTER )(( 0)));
             } else {
-              result__YPZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__CP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            __tmp__20D=(result__YPZG == '\n');
+            __tmp__A1D=(result__CP1G == '\n');
           };
-          if ((! __tmp__20D)) {
-            if (is_catch_comment__QWC) {
-              result__3PZG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__3PZG=((__CHARACTER )(( 0)));
+          if ((! __tmp__A1D)) {
+            if (is_catch_comment__UWC) {
+              result__HP1G='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__HP1G=((__CHARACTER )(( 0)));
               } else {
-                result__3PZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__HP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              add_last__JLT(last_comment__K0D,result__3PZG);
+              add_last__NLT(last_comment__O0D,result__HP1G);
             };
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            goto until_do__Q5BD;
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            goto until_do__U5BD;
           };
         };
-        if (is_catch_comment__QWC) {
-          add_last__JLT(last_comment__K0D,'\n');
+        if (is_catch_comment__UWC) {
+          add_last__NLT(last_comment__O0D,'\n');
         };
-        if (((void *)key_comment_default__QBC == (void *)(&__string_128))) {
-          __tmp__B2D=last_slot__A2D;
-          __tmp__E2D=get__YVB(last_comment__K0D);
-          if (((struct ___OBJ *)__tmp__B2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)__tmp__B2D)->comment__GJJD=__tmp__E2D;
+        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;
           } else {
-            ((__ITM_SLOT_OPERATOR *)__tmp__B2D)->parent_itm_slot__4T5B.comment__GJJD=__tmp__E2D;
+            ((__ITM_SLOT_OPERATOR *)__tmp__F2D)->parent_itm_slot__CU5B.comment__KJJD=__tmp__I2D;
           };
         };
-        if (((void *)key__TRD == (void *)NULL)) {
-          short__token__to__1AD(key_comment_default__QBC,pos2__SRD,position__CBC);
+        if (((void *)key__XRD == (void *)NULL)) {
+          short__token__to__5AD(key_comment_default__UBC,pos2__WRD,position__GBC);
         } else {
-          short__token__to__1AD(key__TRD,pos2__SRD,position__CBC);
+          short__token__to__5AD(key__XRD,pos2__WRD,position__GBC);
         };
       };
     };
-    if ((position__CBC < ((__STRING *)source__5AC)->count__GFC)) {
-      pos2__SRD=position__CBC;
-      result__CQZG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__CQZG=((__CHARACTER )(( 0)));
+    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)));
       } else {
-        result__CQZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__MP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if (((result__CQZG == '/') && (((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)((__INTEGER)(position__CBC +  1) -  1)] == '*'))) {
-        position__CBC=(__INTEGER)(position__CBC +  2);
-        level_comment__VRD= 1;
-        until_do__ZC2D:
+      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:
         {
-          result__LQZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__LQZG=((__CHARACTER )(( 0)));
+          result__VP1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__VP1G=((__CHARACTER )(( 0)));
           } else {
-            result__LQZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__VP1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((! ((result__LQZG == ((__CHARACTER )(( 0)))) || (level_comment__VRD ==  0)))) {
-            result__QQZG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__QQZG=((__CHARACTER )(( 0)));
+          if ((! ((result__VP1G == ((__CHARACTER )(( 0)))) || (level_comment__ZRD ==  0)))) {
+            result__0P1G='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__0P1G=((__CHARACTER )(( 0)));
             } else {
-              result__QQZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__0P1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if (((result__QQZG == '/') && (((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)((__INTEGER)(position__CBC +  1) -  1)] == '*'))) {
-              level_comment__VRD=(__INTEGER)(level_comment__VRD +  1);
-              position__CBC=(__INTEGER)(position__CBC +  2);
-              __tmp__D5D=TRUE__;
+            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__;
             } else {
-              __tmp__D5D=FALSE__;
+              __tmp__H5D=FALSE__;
             };
-            if ((! __tmp__D5D)) {
-              result__ZQZG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__ZQZG=((__CHARACTER )(( 0)));
+            if ((! __tmp__H5D)) {
+              result__DQ1G='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__DQ1G=((__CHARACTER )(( 0)));
               } else {
-                result__ZQZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__DQ1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if (((result__ZQZG == '*') && (((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)((__INTEGER)(position__CBC +  1) -  1)] == '/'))) {
-                level_comment__VRD=(__INTEGER)(level_comment__VRD -  1);
-                position__CBC=(__INTEGER)(position__CBC +  2);
+              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);
               } else {
-                position__CBC=(__INTEGER)(position__CBC +  1);
+                position__GBC=(__INTEGER)(position__GBC +  1);
               };
             };
-            goto until_do__ZC2D;
+            goto until_do__XE2D;
           };
         };
-        if ((level_comment__VRD !=  0)) {
-          position__CBC=pos2__SRD;
-          pos__ZRMG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_191));
-          put_position__EOG(pos__ZRMG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        short__token__to__1AD((&__string_70),pos2__SRD,position__CBC);
+        short__token__to__5AD((&__string_70),pos2__WRD,position__GBC);
       };
     };
   };
-  begin_position__1AE=position__CBC;
-  result__I5E='\0';
-  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-    result__I5E=((__CHARACTER )(( 0)));
+  begin_position__5AE=position__GBC;
+  result__M5E='\0';
+  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+    result__M5E=((__CHARACTER )(( 0)));
   } else {
-    result__I5E=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+    result__M5E=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
   };
-  return(((position__CBC != pos__RRD) | (result__I5E != ((__CHARACTER )(( 0))))));
+  return(((position__GBC != pos__VRD) | (result__M5E != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__15K()
+static __BOOLEAN read_identifier__55K()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__55K,idx__AAL;
-  __POSITION pos__2KSG;
-  __BOOLEAN result__45K,__tmp__NAL,result__KH1G,__tmp__3BL,result__PH1G;
-  __BOOLEAN result__SH1G,__tmp__ZBL,__tmp__0BL;
-  __CHARACTER result__OKZG,result__YKZG,result__3KZG,result__CLZG;
-  __CHARACTER result__HLZG,result__MLZG;
-  result__45K=FALSE__;
-  posold__55K= 0;
-  idx__AAL= 0;
-  if ((! read_space__NRD())) {
-    __tmp__NAL=TRUE__;
+  __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__;
   } else {
-    result__OKZG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__OKZG=((__CHARACTER )(( 0)));
+    result__YJ1G='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__YJ1G=((__CHARACTER )(( 0)));
     } else {
-      result__OKZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__YJ1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    result__KH1G=FALSE__;
-    if ((((__INTEGER_8 )result__OKZG) >= ((__INTEGER_8 )'a'))) {
-      result__KH1G=(((__INTEGER_8 )result__OKZG) <= ((__INTEGER_8 )'z'));
+    result__AH3G=FALSE__;
+    if ((((__INTEGER_8 )result__YJ1G) >= ((__INTEGER_8 )'a'))) {
+      result__AH3G=(((__INTEGER_8 )result__YJ1G) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__NAL=(! result__KH1G);
+    __tmp__RAL=(! result__AH3G);
   };
-  if (__tmp__NAL) {
-    result__45K=FALSE__;
+  if (__tmp__RAL) {
+    result__CAL=FALSE__;
   } else {
-    posold__55K=position__CBC;
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    until_do__NGYE:
+    posold__DAL=position__GBC;
+    ((__STRING *)string_tmp__VH)->count__KFC= 0;
+    until_do__HJYE:
     {
-      result__YKZG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__YKZG=((__CHARACTER )(( 0)));
+      result__CK1G='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__CK1G=((__CHARACTER )(( 0)));
       } else {
-        result__YKZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__CK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__YKZG == ((__CHARACTER )(( 0))))) {
-        __tmp__3BL=TRUE__;
+      if ((result__CK1G == ((__CHARACTER )(( 0))))) {
+        __tmp__BCL=TRUE__;
       } else {
-        result__3KZG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__3KZG=((__CHARACTER )(( 0)));
+        result__HK1G='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__HK1G=((__CHARACTER )(( 0)));
         } else {
-          result__3KZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__HK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        result__PH1G=FALSE__;
-        if ((((__INTEGER_8 )result__3KZG) >= ((__INTEGER_8 )'a'))) {
-          result__PH1G=(((__INTEGER_8 )result__3KZG) <= ((__INTEGER_8 )'z'));
+        result__FH3G=FALSE__;
+        if ((((__INTEGER_8 )result__HK1G) >= ((__INTEGER_8 )'a'))) {
+          result__FH3G=(((__INTEGER_8 )result__HK1G) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__PH1G)) {
-          result__CLZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__CLZG=((__CHARACTER )(( 0)));
+        if ((! result__FH3G)) {
+          result__MK1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__MK1G=((__CHARACTER )(( 0)));
           } else {
-            result__CLZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__MK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          result__SH1G=FALSE__;
-          if ((((__INTEGER_8 )result__CLZG) >= ((__INTEGER_8 )'0'))) {
-            result__SH1G=(((__INTEGER_8 )result__CLZG) <= ((__INTEGER_8 )'9'));
+          result__IH3G=FALSE__;
+          if ((((__INTEGER_8 )result__MK1G) >= ((__INTEGER_8 )'0'))) {
+            result__IH3G=(((__INTEGER_8 )result__MK1G) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__ZBL=(! result__SH1G);
+          __tmp__3BL=(! result__IH3G);
         } else {
-          __tmp__ZBL=FALSE__;
+          __tmp__3BL=FALSE__;
         };
-        if (__tmp__ZBL) {
-          result__HLZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__HLZG=((__CHARACTER )(( 0)));
+        if (__tmp__3BL) {
+          result__RK1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__RK1G=((__CHARACTER )(( 0)));
           } else {
-            result__HLZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__RK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__0BL=(result__HLZG != '_');
+          __tmp__4BL=(result__RK1G != '_');
         } else {
-          __tmp__0BL=FALSE__;
+          __tmp__4BL=FALSE__;
         };
-        __tmp__3BL=__tmp__0BL;
+        __tmp__BCL=__tmp__4BL;
       };
-      if ((! __tmp__3BL)) {
-        result__MLZG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__MLZG=((__CHARACTER )(( 0)));
+      if ((! __tmp__BCL)) {
+        result__WK1G='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__WK1G=((__CHARACTER )(( 0)));
         } else {
-          result__MLZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__WK1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        add_last__JLT(string_tmp__VH,result__MLZG);
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto until_do__NGYE;
+        add_last__NLT(string_tmp__VH,result__WK1G);
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        goto until_do__HJYE;
       };
     };
-    if ((((__STRING *)string_tmp__VH)->count__GFC !=  0)) {
-      idx__AAL=first_substring_index__UFYE(string_tmp__VH);
-      if ((idx__AAL !=  0)) {
-        position__CBC=(__INTEGER)(posold__55K + idx__AAL);
-        pos__2KSG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_192));
-        put_position__EOG(pos__2KSG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+    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)) {
           exit(( 1));
         };
       };
-      last_string__YZC=get__YVB(string_tmp__VH);
-      result__45K=TRUE__;
+      last_string__2ZC=get__2VB(string_tmp__VH);
+      result__CAL=TRUE__;
     };
   };
-  return(result__45K);
+  return(result__CAL);
 }
 
-static __POSITION current_position__ZWF()
+static __POSITION current_position__3WF()
 // () With resultNo recursive, No inlinable.
 {
-  __POSITION result__2WF;
-  result__2WF=((__POSITION ) 0);
-  while ((pos_cur__FBC != position__CBC)) {
-    if ((((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(pos_cur__FBC -  1)] == '\n')) {
-      pos_col__HBC= 0;
-      pos_line__GBC=(__INTEGER)(pos_line__GBC +  1);
-    } else {
-      pos_col__HBC=(__INTEGER)(pos_col__HBC +  1);
-    };
-    pos_cur__FBC=(__INTEGER)(pos_cur__FBC +  1);
-  };
-  if ((pos_line__GBC >  32767)) {
-    result__2WF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZAC)->index__FMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HBC <<  9))) |  4294836224LU));
-    put_error__text__0MG( 0,(&__string_193));
-    put_position__EOG(result__2WF);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  __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)) {
       exit(( 1));
     };
   };
-  if ((pos_col__HBC >  255)) {
-    result__2WF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZAC)->index__FMG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GBC <<  17))));
-    put_error__text__0MG( 0,(&__string_194));
-    put_position__EOG(result__2WF);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZAC)->index__FMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HBC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GBC <<  17)))));
+  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)))));
 }
 
-static void put_error__text__0MG(__INTEGER type__2MG,void *txt__3MG)
+static void put_error__text__4MG(__INTEGER type__ANG,void *txt__BNG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__4MG=type__2MG;
-  ((__STRING *)msg_err__5MG)->count__GFC= 0;
-  if ((type__2MG ==  0)) {
-    append__RNS(msg_err__5MG,(&__string_195));
+  type_error__CNG=type__ANG;
+  ((__STRING *)msg_err__DNG)->count__KFC= 0;
+  if ((type__ANG ==  0)) {
+    append__VNS(msg_err__DNG,(&__string_197));
   };
-  if ((type__2MG ==  1)) {
-    append__RNS(msg_err__5MG,(&__string_196));
+  if ((type__ANG ==  1)) {
+    append__VNS(msg_err__DNG,(&__string_198));
   };
-  if ((type__2MG ==  2)) {
-    append__RNS(msg_err__5MG,(&__string_197));
+  if ((type__ANG ==  2)) {
+    append__VNS(msg_err__DNG,(&__string_199));
   };
-  if ((type__2MG ==  3)) {
-    append__RNS(msg_err__5MG,(&__string_198));
+  if ((type__ANG ==  3)) {
+    append__VNS(msg_err__DNG,(&__string_200));
   };
-  append__RNS(msg_err__5MG,txt__3MG);
+  append__VNS(msg_err__DNG,txt__BNG);
 }
 
-static void put_position__EOG(__POSITION Self__FOG)
+static void put_position__IOG(__POSITION Self__JOG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __UINTEGER_32 c__HOG,__tmp__PPG,cols__KOG;
-  void *src__NOG;
-  __INTEGER pos__GOG,Self__2KH,limit_up__3KH;
-  __CHARACTER char__OOG;
-  c__HOG= 0;
-  char__OOG='\0';
-  append__RNS(msg_err__5MG,(&__string_199));
-  append_in__4HH((__UINTEGER_32)(((__UINTEGER_32 )Self__FOG) >>  17),msg_err__5MG);
-  append__RNS(msg_err__5MG,(&__string_200));
-  append_in__4HH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FOG) >>  9) &  255),msg_err__5MG);
-  append__RNS(msg_err__5MG,(&__string_201));
-  append__RNS(msg_err__5MG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__0ST)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FOG)) &  511)])->parent_named__5.name__LI);
-  add_last__JLT(msg_err__5MG,'(');
-  append__RNS(msg_err__5MG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__0ST)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FOG)) &  511)])->filename__EPG);
-  append__RNS(msg_err__5MG,(&__string_202));
-  src__NOG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__0ST)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__FOG)) &  511)])->source__3AC;
-  pos__GOG= 1;
-  __tmp__PPG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FOG) >>  17) -  1);
-  Self__2KH= 1;
-  limit_up__3KH=((__INTEGER )__tmp__PPG);
-  while ((Self__2KH <= limit_up__3KH)) {
-    while ((((__CHARACTER *)((__STRING *)src__NOG)->storage__RBS)[(__INTEGER)(pos__GOG -  1)] != '\n')) {
-      pos__GOG=(__INTEGER)(pos__GOG +  1);
-    };
-    pos__GOG=(__INTEGER)(pos__GOG +  1);
-    Self__2KH=(__INTEGER)(Self__2KH +  1);
-  };
-  ((__STRING *)string_tmp__VH)->count__GFC= 0;
-  cols__KOG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__FOG) >>  9) &  255);
-  while ((! ((pos__GOG > ((__STRING *)src__NOG)->count__GFC) || (((__CHARACTER *)((__STRING *)src__NOG)->storage__RBS)[(__INTEGER)(pos__GOG -  1)] == '\n')))) {
-    char__OOG=((__CHARACTER *)((__STRING *)src__NOG)->storage__RBS)[(__INTEGER)(pos__GOG -  1)];
-    add_last__JLT(msg_err__5MG,char__OOG);
-    if ((c__HOG < cols__KOG)) {
-      if ((char__OOG == '\t')) {
-        add_last__JLT(string_tmp__VH,'\t');
-      } else {
-        add_last__JLT(string_tmp__VH,' ');
-      };
-    };
-    c__HOG=(__UINTEGER_32)(c__HOG +  1);
-    pos__GOG=(__INTEGER)(pos__GOG +  1);
-  };
-  add_last__JLT(msg_err__5MG,'\n');
-  append__RNS(msg_err__5MG,string_tmp__VH);
-  append__RNS(msg_err__5MG,(&__string_203));
+  __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));
 }
 
-static __BOOLEAN read_symbol__TWJ(void *st__VWJ)
+static __BOOLEAN read_symbol__XWJ(void *st__ZWJ)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__XWJ,j__YWJ;
-  __BOOLEAN result__ZWJ,__tmp__BYJ,__tmp__4XJ;
-  __CHARACTER result__OMZG,result__TMZG;
-  posold__XWJ= 0;
-  j__YWJ= 0;
-  result__ZWJ=FALSE__;
-  if ((! read_space__NRD())) {
-    result__ZWJ=FALSE__;
+  __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__;
   } else {
-    posold__XWJ=position__CBC;
-    j__YWJ= 1;
-    until_do__OC5:
+    posold__1WJ=position__GBC;
+    j__2WJ= 1;
+    until_do__SC5:
     {
-      result__OMZG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__OMZG=((__CHARACTER )(( 0)));
+      result__YL1G='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__YL1G=((__CHARACTER )(( 0)));
       } else {
-        result__OMZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__YL1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__OMZG == ((__CHARACTER )(( 0))))) {
-        __tmp__BYJ=TRUE__;
+      if ((result__YL1G == ((__CHARACTER )(( 0))))) {
+        __tmp__FYJ=TRUE__;
       } else {
-        if ((j__YWJ > ((__STRING_CONSTANT *)st__VWJ)->count__DD)) {
-          __tmp__4XJ=TRUE__;
+        if ((j__2WJ > ((__STRING_CONSTANT *)st__ZWJ)->count__DD)) {
+          __tmp__CYJ=TRUE__;
         } else {
-          result__TMZG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__TMZG=((__CHARACTER )(( 0)));
+          result__3L1G='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__3L1G=((__CHARACTER )(( 0)));
           } else {
-            result__TMZG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__3L1G=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__4XJ=(result__TMZG != ((__CHARACTER *)((__STRING_CONSTANT *)st__VWJ)->storage__FQO)[(__INTEGER)(j__YWJ -  1)]);
+          __tmp__CYJ=(result__3L1G != ((__CHARACTER *)((__STRING_CONSTANT *)st__ZWJ)->storage__JQO)[(__INTEGER)(j__2WJ -  1)]);
         };
-        __tmp__BYJ=__tmp__4XJ;
+        __tmp__FYJ=__tmp__CYJ;
       };
-      if ((! __tmp__BYJ)) {
-        j__YWJ=(__INTEGER)(j__YWJ +  1);
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto until_do__OC5;
+      if ((! __tmp__FYJ)) {
+        j__2WJ=(__INTEGER)(j__2WJ +  1);
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        goto until_do__SC5;
       };
     };
-    if ((j__YWJ > ((__STRING_CONSTANT *)st__VWJ)->count__DD)) {
-      result__ZWJ=TRUE__;
-      last_string__YZC=st__VWJ;
+    if ((j__2WJ > ((__STRING_CONSTANT *)st__ZWJ)->count__DD)) {
+      result__3WJ=TRUE__;
+      last_string__2ZC=st__ZWJ;
     } else {
-      position__CBC=posold__XWJ;
-      result__ZWJ=FALSE__;
+      position__GBC=posold__1WJ;
+      result__3WJ=FALSE__;
     };
   };
-  return(result__ZWJ);
+  return(result__3WJ);
 }
 
-static __BOOLEAN read_short_elt__1KKB()
+static __BOOLEAN read_short_elt__5KKB()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER j__5KKB;
-  __POSITION pos__KIG;
-  __BOOLEAN result__4KKB,__tmp__SLKB;
-  __CHARACTER __tmp__XMKB;
-  result__4KKB=FALSE__;
-  j__5KKB= 0;
-  if (read_identifier__15K()) {
-    if (((void *)last_string__YZC != (void *)(&__string_115))) {
-      pos__KIG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_204));
-      put_position__EOG(pos__KIG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  __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)) {
         exit(( 1));
       };
     };
-    last_string__YZC=NULL;
-    result__4KKB=TRUE__;
-    __tmp__SLKB=TRUE__;
+    last_string__2ZC=NULL;
+    result__CLKB=TRUE__;
+    __tmp__WLKB=TRUE__;
   } else {
-    __tmp__SLKB=FALSE__;
+    __tmp__WLKB=FALSE__;
   };
-  if ((! __tmp__SLKB)) {
-    if (read_string__1EQ()) {
-      ((__STRING *)string_tmp__VH)->count__GFC= 0;
-      j__5KKB= 1;
-      while ((j__5KKB <= ((__STRING_CONSTANT *)last_string__YZC)->count__DD)) {
-        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[(__INTEGER)(j__5KKB -  1)] == '\\')) {
-          j__5KKB=(__INTEGER)(j__5KKB +  1);
-          __tmp__XMKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[(__INTEGER)(j__5KKB -  1)];
-          if ((__tmp__XMKB == 'a')) {
-            add_last__JLT(string_tmp__VH,'\a');
+  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__XMKB == 'b')) {
-            add_last__JLT(string_tmp__VH,'\b');
+          if ((__tmp__1MKB == 'b')) {
+            add_last__NLT(string_tmp__VH,'\b');
           };
-          if ((__tmp__XMKB == 'f')) {
-            add_last__JLT(string_tmp__VH,'\f');
+          if ((__tmp__1MKB == 'f')) {
+            add_last__NLT(string_tmp__VH,'\f');
           };
-          if ((__tmp__XMKB == 'n')) {
-            add_last__JLT(string_tmp__VH,'\n');
+          if ((__tmp__1MKB == 'n')) {
+            add_last__NLT(string_tmp__VH,'\n');
           };
-          if ((__tmp__XMKB == 'r')) {
-            add_last__JLT(string_tmp__VH,'\r');
+          if ((__tmp__1MKB == 'r')) {
+            add_last__NLT(string_tmp__VH,'\r');
           };
-          if ((__tmp__XMKB == 't')) {
-            add_last__JLT(string_tmp__VH,'\t');
+          if ((__tmp__1MKB == 't')) {
+            add_last__NLT(string_tmp__VH,'\t');
           };
-          if ((__tmp__XMKB == 'v')) {
-            add_last__JLT(string_tmp__VH,'\v');
+          if ((__tmp__1MKB == 'v')) {
+            add_last__NLT(string_tmp__VH,'\v');
           };
-          if ((__tmp__XMKB == '\\')) {
-            add_last__JLT(string_tmp__VH,'\\');
+          if ((__tmp__1MKB == '\\')) {
+            add_last__NLT(string_tmp__VH,'\\');
           };
-          if ((__tmp__XMKB == '?')) {
-            add_last__JLT(string_tmp__VH,'\?');
+          if ((__tmp__1MKB == '?')) {
+            add_last__NLT(string_tmp__VH,'\?');
           };
-          if ((__tmp__XMKB == '\'')) {
-            add_last__JLT(string_tmp__VH,'\'');
+          if ((__tmp__1MKB == '\'')) {
+            add_last__NLT(string_tmp__VH,'\'');
           };
-          if ((__tmp__XMKB == '\"')) {
-            add_last__JLT(string_tmp__VH,'\"');
+          if ((__tmp__1MKB == '\"')) {
+            add_last__NLT(string_tmp__VH,'\"');
           };
         } else {
-          add_last__JLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[(__INTEGER)(j__5KKB -  1)]);
+          add_last__NLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__2ZC)->storage__JQO)[(__INTEGER)(j__DLKB -  1)]);
         };
-        j__5KKB=(__INTEGER)(j__5KKB +  1);
+        j__DLKB=(__INTEGER)(j__DLKB +  1);
       };
-      last_string__YZC=get__YVB(string_tmp__VH);
-      result__4KKB=TRUE__;
+      last_string__2ZC=get__2VB(string_tmp__VH);
+      result__CLKB=TRUE__;
     };
   };
-  return(result__4KKB);
+  return(result__CLKB);
 }
 
-static void fast_put__to__I1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__J1R,void *k__L1R)
+static void fast_put__to__M1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__N1R,void *k__P1R)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__MK3G,__tmp__OK3G,Self__PK3G,idx__T1R,idx__1TNB;
-  __INTEGER new_capacity__2TNB,i__3TNB,result__RK3G,__tmp__TK3G;
-  __INTEGER Self__UK3G,typ_id__MWNB;
-  __STRING_CONSTANT *Self__SK3G;
-  __POINTER ptr__HWNB,ptr_table__SL4G,next__RL4G,result__TL4G;
-  __POINTER ptr_table__XL4G,next__WL4G,result__YL4G;
-  __UINTEGER_32 sz__JWNB,a__IK1G,new_size__JK1G,t__NK1G,a__MK1G;
-  __UINTEGER_32 new_size__0L4G,lab_type__ZL4G;
-  void *node__W1R,*node1__5TNB,*node2__AUNB,*__tmp__K3R;
-  void **old_buckets__4TNB;
-  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__GWNB;
-  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__HTDC;
-  result__MK3G= 0;
-  __tmp__OK3G=((__STRING_CONSTANT *)k__L1R)->count__DD;
-  Self__PK3G= 1;
-  while ((Self__PK3G <= __tmp__OK3G)) {
-    result__MK3G=(__INTEGER)((__INTEGER)( 5 * result__MK3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__L1R)->storage__FQO)[(__INTEGER)(Self__PK3G -  1)])));
-    Self__PK3G=(__INTEGER)(Self__PK3G +  1);
-  };
-  if ((result__MK3G <  0)) {
-    result__MK3G=(__INTEGER)(~ result__MK3G);
-  };
-  idx__T1R=(__INTEGER)(result__MK3G % Self__J1R->capacity__Y1R);
-  node__W1R=((void **)Self__J1R->buckets__31R)[idx__T1R];
-  while ((! (((void *)node__W1R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__W1R)->key__J2R == (void *)k__L1R)))) {
-    node__W1R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__W1R)->next__U2R;
-  };
-  if (((void *)node__W1R == (void *)NULL)) {
-    if ((Self__J1R->capacity__Y1R == Self__J1R->count__32R)) {
-      idx__1TNB= 0;
-      node1__5TNB=NULL;
-      node2__AUNB=NULL;
-      old_buckets__4TNB=Self__J1R->buckets__31R;
-      new_capacity__2TNB=prime_number_ceiling__H41((__INTEGER)(Self__J1R->capacity__Y1R +  1));
-      Self__J1R->buckets__31R=create__2Y2(new_capacity__2TNB);
-      i__3TNB=(__INTEGER)(Self__J1R->capacity__Y1R -  1);
-      Self__J1R->capacity__Y1R=new_capacity__2TNB;
-      while ((i__3TNB >=  0)) {
-        node1__5TNB=((void **)old_buckets__4TNB)[i__3TNB];
-        while (((void *)node1__5TNB != (void *)NULL)) {
-          node2__AUNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__5TNB)->next__U2R;
-          Self__SK3G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__5TNB)->key__J2R);
-          result__RK3G= 0;
-          __tmp__TK3G=Self__SK3G->count__DD;
-          Self__UK3G= 1;
-          while ((Self__UK3G <= __tmp__TK3G)) {
-            result__RK3G=(__INTEGER)((__INTEGER)( 5 * result__RK3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SK3G->storage__FQO)[(__INTEGER)(Self__UK3G -  1)])));
-            Self__UK3G=(__INTEGER)(Self__UK3G +  1);
-          };
-          if ((result__RK3G <  0)) {
-            result__RK3G=(__INTEGER)(~ result__RK3G);
-          };
-          idx__1TNB=(__INTEGER)(result__RK3G % Self__J1R->capacity__Y1R);
-          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__5TNB)->next__U2R=((void **)Self__J1R->buckets__31R)[idx__1TNB];
-          ((void **)Self__J1R->buckets__31R)[idx__1TNB]=node1__5TNB;
-          node1__5TNB=node2__AUNB;
-        };
-        i__3TNB=(__INTEGER)(i__3TNB -  1);
-      };
-      idx__T1R=(__INTEGER)(result__MK3G % new_capacity__2TNB);
-    };
-    __tmp__K3R=((void **)Self__J1R->buckets__31R)[idx__T1R];
-    result__GWNB=NULL;
-    ptr__HWNB=((__POINTER )(NULL));
-    typ_id__MWNB= 0;
-    sz__JWNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
-    if ((sz__JWNB ==  0)) {
-      result__GWNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
-    } else {
-      typ_id__MWNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__JWNB);
-      if ((typ_id__MWNB == (__INTEGER)(-  1))) {
-        a__IK1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__JK1G=(__UINTEGER_32)((__UINTEGER_32)(sz__JWNB + a__IK1G) & (__UINTEGER_32)(~ a__IK1G));
-        ptr_table__SL4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JK1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__RL4G=((__POINTER )(NULL));
-        result__TL4G=((__POINTER *)ptr_table__SL4G)[ 0];
-        if ((result__TL4G == (void *)NULL)) {
-          result__TL4G=new_lab__2QJ(new_size__JK1G);
-          next__RL4G=(void *)((unsigned long)result__TL4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JK1G)));
-          ((__POINTER *)next__RL4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SL4G)[ 0]=next__RL4G;
-        } else {
-          next__RL4G=((__POINTER *)result__TL4G)[ 0];
-          if ((next__RL4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TL4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__JK1G <<  1)) <=  4096)) {
-              next__RL4G=(void *)((unsigned long)result__TL4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JK1G)));
+  __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)));
             } else {
-              next__RL4G=new_lab__2QJ(new_size__JK1G);
-            };
-            ((__POINTER *)next__RL4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SL4G)[ 0]=next__RL4G;
-          } else {
-            ((__POINTER *)result__TL4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RL4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__TL4G=next__RL4G;
-          };
-        };
-        ptr__HWNB=result__TL4G;
-      } else {
-        t__NK1G=((__UINTEGER_32 )typ_id__MWNB);
-        a__MK1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__0L4G=(__UINTEGER_32)((__UINTEGER_32)(sz__JWNB + a__MK1G) & (__UINTEGER_32)(~ a__MK1G));
-        ptr_table__XL4G=((__POINTER )(&(table_type[(t__NK1G)])));
-        lab_type__ZL4G=(__UINTEGER_32)(t__NK1G |  1);
-        next__WL4G=((__POINTER )(NULL));
-        result__YL4G=((__POINTER *)ptr_table__XL4G)[ 0];
-        if ((result__YL4G == (void *)NULL)) {
-          result__YL4G=new_lab__2QJ(lab_type__ZL4G);
-          next__WL4G=(void *)((unsigned long)result__YL4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0L4G)));
-          ((__POINTER *)next__WL4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XL4G)[ 0]=next__WL4G;
-        } else {
-          next__WL4G=((__POINTER *)result__YL4G)[ 0];
-          if ((next__WL4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YL4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0L4G <<  1)) <=  4096)) {
-              next__WL4G=(void *)((unsigned long)result__YL4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0L4G)));
+              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)));
             } else {
-              next__WL4G=new_lab__2QJ(lab_type__ZL4G);
+              next__4OAH=new_lab__ARJ(lab_type__BPAH);
             };
-            ((__POINTER *)next__WL4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XL4G)[ 0]=next__WL4G;
+            ((__POINTER *)next__4OAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5OAH)[ 0]=next__4OAH;
           } else {
-            ((__POINTER *)result__YL4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WL4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YL4G=next__WL4G;
+            ((__POINTER *)result__APAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4OAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__APAH=next__4OAH;
           };
         };
-        ptr__HWNB=result__YL4G;
+        ptr__LWNB=result__APAH;
       };
-      result__GWNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__HWNB);
-      *(result__GWNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+      result__KWNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__LWNB);
+      *(result__KWNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
     };
-    Self__HTDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__GWNB);
-    Self__HTDC->key__J2R=k__L1R;
-    Self__HTDC->next__U2R=__tmp__K3R;
-    node__W1R=result__GWNB;
-    ((void **)Self__J1R->buckets__31R)[idx__T1R]=result__GWNB;
-    Self__J1R->count__32R=(__INTEGER)(Self__J1R->count__32R +  1);
+    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);
   };
 }
 
-static __TYPE_FULL* create__with__CQB(void *typ__EQB,__UINTEGER_8 code__FQB)
+static __TYPE_FULL* create__with__GQB(void *typ__IQB,__UINTEGER_8 code__JQB)
 // ({TYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_ID},{UINTEGER_8}) With resultNo recursive, No inlinable.
 {
-  __TYPE_FULL *result__L0B,*Self__EFS;
-  __POINTER ptr__M0B,ptr_table__2L4G,next__1L4G,result__3L4G;
-  __POINTER ptr_table__BM4G,next__AM4G,result__CM4G;
-  __INTEGER typ_id__R0B;
-  __UINTEGER_32 sz__O0B,a__QK1G,new_size__RK1G,t__VK1G,a__UK1G;
-  __UINTEGER_32 new_size__EM4G,lab_type__DM4G;
-  void *__tmp__QFS,*__tmp__YFS;
-  __BOOLEAN __tmp__EGS,__tmp__FGS;
-  result__L0B=NULL;
-  ptr__M0B=((__POINTER )(NULL));
-  typ_id__R0B= 0;
-  sz__O0B=((__UINTEGER_32 )sizeof(__TYPE_FULL));
-  if ((sz__O0B ==  0)) {
-    result__L0B=TYPE_FULL__;
+  __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__;
   } else {
-    typ_id__R0B=__TYPE_FULL__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__O0B);
-    if ((typ_id__R0B == (__INTEGER)(-  1))) {
-      a__QK1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__RK1G=(__UINTEGER_32)((__UINTEGER_32)(sz__O0B + a__QK1G) & (__UINTEGER_32)(~ a__QK1G));
-      ptr_table__2L4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RK1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__1L4G=((__POINTER )(NULL));
-      result__3L4G=((__POINTER *)ptr_table__2L4G)[ 0];
-      if ((result__3L4G == (void *)NULL)) {
-        result__3L4G=new_lab__2QJ(new_size__RK1G);
-        next__1L4G=(void *)((unsigned long)result__3L4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RK1G)));
-        ((__POINTER *)next__1L4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2L4G)[ 0]=next__1L4G;
-      } else {
-        next__1L4G=((__POINTER *)result__3L4G)[ 0];
-        if ((next__1L4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3L4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__RK1G <<  1)) <=  4096)) {
-            next__1L4G=(void *)((unsigned long)result__3L4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RK1G)));
-          } else {
-            next__1L4G=new_lab__2QJ(new_size__RK1G);
-          };
-          ((__POINTER *)next__1L4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2L4G)[ 0]=next__1L4G;
-        } else {
-          ((__POINTER *)result__3L4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1L4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3L4G=next__1L4G;
-        };
-      };
-      ptr__M0B=result__3L4G;
-    } else {
-      t__VK1G=((__UINTEGER_32 )typ_id__R0B);
-      a__UK1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__EM4G=(__UINTEGER_32)((__UINTEGER_32)(sz__O0B + a__UK1G) & (__UINTEGER_32)(~ a__UK1G));
-      ptr_table__BM4G=((__POINTER )(&(table_type[(t__VK1G)])));
-      lab_type__DM4G=(__UINTEGER_32)(t__VK1G |  1);
-      next__AM4G=((__POINTER )(NULL));
-      result__CM4G=((__POINTER *)ptr_table__BM4G)[ 0];
-      if ((result__CM4G == (void *)NULL)) {
-        result__CM4G=new_lab__2QJ(lab_type__DM4G);
-        next__AM4G=(void *)((unsigned long)result__CM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EM4G)));
-        ((__POINTER *)next__AM4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BM4G)[ 0]=next__AM4G;
-      } else {
-        next__AM4G=((__POINTER *)result__CM4G)[ 0];
-        if ((next__AM4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CM4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EM4G <<  1)) <=  4096)) {
-            next__AM4G=(void *)((unsigned long)result__CM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EM4G)));
-          } else {
-            next__AM4G=new_lab__2QJ(lab_type__DM4G);
-          };
-          ((__POINTER *)next__AM4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BM4G)[ 0]=next__AM4G;
-        } else {
-          ((__POINTER *)result__CM4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__AM4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CM4G=next__AM4G;
-        };
-      };
-      ptr__M0B=result__CM4G;
-    };
-    result__L0B=((__TYPE_FULL *)ptr__M0B);
-    *(result__L0B) = *(TYPE_FULL__);
-  };
-  Self__EFS=((__TYPE_FULL *)result__L0B);
-  Self__EFS->flag__IFS=code__FQB;
-  if (((void *)typ__EQB != (void *)NULL)) {
-    switch (((struct ___OBJ *)typ__EQB)->__id) {
+    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) {
     case __TYPE_NULL__: {
-      __tmp__QFS=(&__string_2);
+      __tmp__UFS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__QFS=(&__string_3);
+      __tmp__UFS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__QFS=(&__string_45);
+      __tmp__UFS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__QFS=(&__string_47);
+      __tmp__UFS=(&__string_47);
     } break;
     };
-    __tmp__EGS=((void *)__tmp__QFS != (void *)NULL);
+    __tmp__IGS=((void *)__tmp__UFS != (void *)NULL);
   } else {
-    __tmp__EGS=FALSE__;
+    __tmp__IGS=FALSE__;
   };
-  if (__tmp__EGS) {
-    switch (((struct ___OBJ *)typ__EQB)->__id) {
+  if (__tmp__IGS) {
+    switch (((struct ___OBJ *)typ__IQB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__YFS=(&__string_2);
+      __tmp__2FS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__YFS=(&__string_3);
+      __tmp__2FS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__YFS=(&__string_45);
+      __tmp__2FS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__YFS=(&__string_47);
+      __tmp__2FS=(&__string_47);
     } break;
     };
-    __tmp__FGS=__infix_equal_equal__O5DB(__tmp__YFS,(&__string_33));
+    __tmp__JGS=__infix_equal_equal__S5DB(__tmp__2FS,(&__string_33));
   } else {
-    __tmp__FGS=FALSE__;
+    __tmp__JGS=FALSE__;
   };
-  if ((__tmp__FGS && (! ((__UINTEGER_8)(Self__EFS->flag__IFS &  1) !=  0)))) {
-    print__GHD((&__string_205));
+  if ((__tmp__JGS && (! ((__UINTEGER_8)(Self__IFS->flag__MFS &  1) !=  0)))) {
+    print__KHD((&__string_207));
     fputc((int)('\n'),stdout);
     exit(( 1));
   };
-  return(result__L0B);
+  return(result__P0B);
 }
 
-static void** create__SYNB(__INTEGER nb_elements__UYNB)
+static void** create__WYNB(__INTEGER nb_elements__YYNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__HRZG,a__YK1G,new_size__IRZG,new_size2__JRZG,a__2K1G;
-  __UINTEGER_32 new_size__3K1G;
-  __POINTER result__GRZG,ptr_table__GM4G,next__FM4G,result__HM4G;
-  void *result__KM4G;
-  __INTEGER Self__LFMC;
-  void **Result__V3RB;
-  sz__HRZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__UYNB * ((__INTEGER )(sizeof(void *)))));
-  result__GRZG=((__POINTER )(NULL));
-  a__YK1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__IRZG=(__UINTEGER_32)((__UINTEGER_32)(sz__HRZG + a__YK1G) & (__UINTEGER_32)(~ a__YK1G));
-  new_size2__JRZG=(__UINTEGER_32)(new_size__IRZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__JRZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__2K1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__3K1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__JRZG + a__2K1G) & (__UINTEGER_32)(~ a__2K1G));
-    ptr_table__GM4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3K1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__FM4G=((__POINTER )(NULL));
-    result__HM4G=((__POINTER *)ptr_table__GM4G)[ 0];
-    if ((result__HM4G == (void *)NULL)) {
-      result__HM4G=new_lab__2QJ(new_size__3K1G);
-      next__FM4G=(void *)((unsigned long)result__HM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3K1G)));
-      ((__POINTER *)next__FM4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__GM4G)[ 0]=next__FM4G;
-    } else {
-      next__FM4G=((__POINTER *)result__HM4G)[ 0];
-      if ((next__FM4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HM4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3K1G <<  1)) <=  4096)) {
-          next__FM4G=(void *)((unsigned long)result__HM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3K1G)));
-        } else {
-          next__FM4G=new_lab__2QJ(new_size__3K1G);
-        };
-        ((__POINTER *)next__FM4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GM4G)[ 0]=next__FM4G;
-      } else {
-        ((__POINTER *)result__HM4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__FM4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__HM4G=next__FM4G;
-      };
-    };
-    ((__POINTER *)result__HM4G)[ 0]=((__POINTER ) 3);
-    result__GRZG=(void *)((unsigned long)result__HM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__KM4G=first_free__HDVB;
-    while ((((void *)result__KM4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KM4G)->map_size_and_id__YSB &  4294967292LU) < new_size__IRZG))) {
-      result__KM4G=((__MEMORY *)result__KM4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__KM4G == (void *)NULL)) {
-      result__KM4G=new_page__454();
+    if (((void *)result__SPAH == (void *)NULL)) {
+      result__SPAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__KM4G,new_size__IRZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KM4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__GRZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KM4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__V3RB=((void **)result__GRZG);
-  Self__LFMC=(__INTEGER)(nb_elements__UYNB -  1);
-  while ((Self__LFMC >=  0)) {
-    Result__V3RB[Self__LFMC]=NULL;
-    Self__LFMC=(__INTEGER)(Self__LFMC -  1);
+  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);
   };
-  return(Result__V3RB);
+  return(Result__Z3RB);
 }
 
-static void add_last__43R(__FAST_ARRAYoTYPE_IDo *Self__53R,void *element__A4R)
+static void add_last__C4R(__FAST_ARRAYoTYPE_IDo *Self__D4R,void *element__E4R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__B4R,__tmp__K5R,__tmp__NVDC,Self__L4UD;
-  __BOOLEAN __tmp__R4R;
-  void **__tmp__J5R,**new__ZUDC;
-  new_capacity__B4R= 0;
-  if (((__INTEGER)(Self__53R->parent_arrayed_collection__IAB.upper__C4R +  1) <= (__INTEGER)(Self__53R->parent_arrayed_collection__IAB.capacity__E4R -  1))) {
-    Self__53R->parent_arrayed_collection__IAB.upper__C4R=(__INTEGER)(Self__53R->parent_arrayed_collection__IAB.upper__C4R +  1);
-    __tmp__R4R=TRUE__;
+  __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__;
   } else {
-    __tmp__R4R=FALSE__;
-  };
-  if ((! __tmp__R4R)) {
-    if ((Self__53R->parent_arrayed_collection__IAB.capacity__E4R ==  0)) {
-      Self__53R->parent_arrayed_collection__IAB.storage__A5R=create__SYNB( 2);
-      Self__53R->parent_arrayed_collection__IAB.capacity__E4R= 2;
-      Self__53R->parent_arrayed_collection__IAB.upper__C4R= 0;
-    } else {
-      new_capacity__B4R=(__INTEGER)(Self__53R->parent_arrayed_collection__IAB.capacity__E4R <<  1);
-      __tmp__J5R=Self__53R->parent_arrayed_collection__IAB.storage__A5R;
-      __tmp__K5R=Self__53R->parent_arrayed_collection__IAB.capacity__E4R;
-      new__ZUDC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__J5R)),((__UINTEGER_32 )(__INTEGER)(__tmp__K5R * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__B4R * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__NVDC=(__INTEGER)(new_capacity__B4R -  1);
-      Self__L4UD=__tmp__K5R;
-      while ((Self__L4UD <= __tmp__NVDC)) {
-        new__ZUDC[Self__L4UD]=NULL;
-        Self__L4UD=(__INTEGER)(Self__L4UD +  1);
-      };
-      Self__53R->parent_arrayed_collection__IAB.storage__A5R=new__ZUDC;
-      Self__53R->parent_arrayed_collection__IAB.capacity__E4R=new_capacity__B4R;
-      Self__53R->parent_arrayed_collection__IAB.upper__C4R=(__INTEGER)(Self__53R->parent_arrayed_collection__IAB.upper__C4R +  1);
-    };
-  };
-  ((void **)Self__53R->parent_arrayed_collection__IAB.storage__A5R)[Self__53R->parent_arrayed_collection__IAB.upper__C4R]=element__A4R;
+    __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;
 }
 
-static __BOOLEAN open__JERD(__DIRECTORY_UNIX *Self__KERD)
+static __BOOLEAN open__NERD(__DIRECTORY_UNIX *Self__OERD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __POINTER dirent__QERD,ptr__XDLE,ptr_table__OM4G,next__NM4G;
-  __POINTER result__PM4G,ptr_table__TM4G,next__SM4G,result__UM4G;
-  __POINTER dir__OERD,ptr__3M4G,ptr_table__HN4G,next__GN4G,result__IN4G;
-  __POINTER ptr_table__MN4G,next__LN4G,result__NN4G,ptr__SLLF;
-  __POINTER ptr_table__RN4G,next__QN4G,result__SN4G,ptr_table__WN4G;
-  __POINTER next__VN4G,result__XN4G;
-  __INTEGER i__UERD,typ_id__2DLE,i__YM4G,Self__ITDF,i__2L1G,j__4L1G;
-  __INTEGER Self__3E3G,idx__OJ2E,idx__EC3,n__ATTD,n__AV1G,typ_id__4M4G;
-  __INTEGER typ_id__XLLF;
-  __UINTEGER_32 sz__ZDLE,a__LL1G,new_size__ML1G,t__QL1G,a__PL1G;
-  __UINTEGER_32 new_size__WM4G,lab_type__VM4G,sz__5M4G,a__AN4G;
-  __UINTEGER_32 new_size__BN4G,t__CN4G,a__DN4G,new_size__PN4G;
-  __UINTEGER_32 lab_type__ON4G,sz__ULLF,a__ZW1G,new_size__0W1G,t__4W1G;
-  __UINTEGER_32 a__3W1G,new_size__ZN4G,lab_type__YN4G;
-  __STRING *new__I0PE,*Self__P0PE,*Self__IB2E,*Self__1L1G,*Self__JXSD;
-  __STRING *Self__5STD;
-  void *other__3L1G;
-  void *result__NJ2E;
-  void *__tmp__BM2E,*dir__5L2E;
-  void *__tmp__DHRD;
-  __CHARACTER *n__NERD,*Self__ZM4G,*other__0M4G,*Self__4E3G,*model__5E3G;
-  __CHARACTER *Self__YB3;
-  __BOOLEAN result__TERD,result__A4QE,__tmp__QL2E;
-  __LINKED_LISToENTRYo *result__WDLE,*Self__EFVE,*Self__Q4JF;
-  __LINKED_LIST_NODEoENTRYo *result__2M4G,*Self__EN4G,*result__RLLF;
-  __LINKED_LIST_NODEoENTRYo *Self__3NNF;
-  n__NERD=NULL;
-  dirent__QERD=((__POINTER )(NULL));
-  result__TERD=FALSE__;
-  i__UERD= 0;
-  if (((void *)Self__KERD->parent_directory__KED.list__YERD == (void *)NULL)) {
-    result__WDLE=NULL;
-    ptr__XDLE=((__POINTER )(NULL));
-    typ_id__2DLE= 0;
-    sz__ZDLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
-    if ((sz__ZDLE ==  0)) {
-      result__WDLE=LINKED_LISToENTRYo__;
-    } else {
-      typ_id__2DLE=__LINKED_LISToENTRYo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__ZDLE);
-      if ((typ_id__2DLE == (__INTEGER)(-  1))) {
-        a__LL1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__ML1G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZDLE + a__LL1G) & (__UINTEGER_32)(~ a__LL1G));
-        ptr_table__OM4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ML1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__NM4G=((__POINTER )(NULL));
-        result__PM4G=((__POINTER *)ptr_table__OM4G)[ 0];
-        if ((result__PM4G == (void *)NULL)) {
-          result__PM4G=new_lab__2QJ(new_size__ML1G);
-          next__NM4G=(void *)((unsigned long)result__PM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ML1G)));
-          ((__POINTER *)next__NM4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OM4G)[ 0]=next__NM4G;
-        } else {
-          next__NM4G=((__POINTER *)result__PM4G)[ 0];
-          if ((next__NM4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PM4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ML1G <<  1)) <=  4096)) {
-              next__NM4G=(void *)((unsigned long)result__PM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ML1G)));
+  __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)));
             } else {
-              next__NM4G=new_lab__2QJ(new_size__ML1G);
-            };
-            ((__POINTER *)next__NM4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OM4G)[ 0]=next__NM4G;
-          } else {
-            ((__POINTER *)result__PM4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NM4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PM4G=next__NM4G;
-          };
-        };
-        ptr__XDLE=result__PM4G;
-      } else {
-        t__QL1G=((__UINTEGER_32 )typ_id__2DLE);
-        a__PL1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__WM4G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZDLE + a__PL1G) & (__UINTEGER_32)(~ a__PL1G));
-        ptr_table__TM4G=((__POINTER )(&(table_type[(t__QL1G)])));
-        lab_type__VM4G=(__UINTEGER_32)(t__QL1G |  1);
-        next__SM4G=((__POINTER )(NULL));
-        result__UM4G=((__POINTER *)ptr_table__TM4G)[ 0];
-        if ((result__UM4G == (void *)NULL)) {
-          result__UM4G=new_lab__2QJ(lab_type__VM4G);
-          next__SM4G=(void *)((unsigned long)result__UM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WM4G)));
-          ((__POINTER *)next__SM4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TM4G)[ 0]=next__SM4G;
-        } else {
-          next__SM4G=((__POINTER *)result__UM4G)[ 0];
-          if ((next__SM4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UM4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WM4G <<  1)) <=  4096)) {
-              next__SM4G=(void *)((unsigned long)result__UM4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WM4G)));
+              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)));
             } else {
-              next__SM4G=new_lab__2QJ(lab_type__VM4G);
+              next__0PAH=new_lab__ARJ(lab_type__3PAH);
             };
-            ((__POINTER *)next__SM4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TM4G)[ 0]=next__SM4G;
+            ((__POINTER *)next__0PAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1PAH)[ 0]=next__0PAH;
           } else {
-            ((__POINTER *)result__UM4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SM4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UM4G=next__SM4G;
+            ((__POINTER *)result__2PAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2PAH=next__0PAH;
           };
         };
-        ptr__XDLE=result__UM4G;
+        ptr__HGLE=result__2PAH;
       };
-      result__WDLE=((__LINKED_LISToENTRYo *)ptr__XDLE);
-      *(result__WDLE) = *(LINKED_LISToENTRYo__);
+      result__GGLE=((__LINKED_LISToENTRYo *)ptr__HGLE);
+      *(result__GGLE) = *(LINKED_LISToENTRYo__);
     };
-    Self__KERD->parent_directory__KED.list__YERD=result__WDLE;
+    Self__OERD->parent_directory__OED.list__2ERD=result__GGLE;
   } else {
-    Self__EFVE=((__LINKED_LISToENTRYo *)Self__KERD->parent_directory__KED.list__YERD);
-    if (((void *)Self__EFVE->first_link__GFVE != (void *)NULL)) {
-      Self__EFVE->first_link__GFVE=NULL;
-      Self__EFVE->mem_idx__NFVE= 0;
-      Self__EFVE->mem_lnk__OFVE=NULL;
-      Self__EFVE->parent_linked_collection__XERD.upper__E12D= 0;
-      Self__EFVE->last_link__PFVE=NULL;
-    };
-  };
-  dir__OERD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__KERD->parent_entry_unix__JED.parent_entry__IED.path__BD)->storage__FQO))));
-  if ((dir__OERD != (void *)NULL)) {
-    result__TERD=TRUE__;
+    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__;
     do {
-      dirent__QERD=((__POINTER )(readdir((dir__OERD))));
-      if ((dirent__QERD != (void *)NULL)) {
-        n__NERD=((__CHARACTER *)(((struct dirent *)(dirent__QERD))->d_name));
-        ((__STRING *)string_tmp__DED)->count__GFC= 0;
-        i__UERD= 0;
-        while ((((__CHARACTER *)n__NERD)[i__UERD] != '\0')) {
-          add_last__JLT(string_tmp__DED,((__CHARACTER *)n__NERD)[i__UERD]);
-          i__UERD=(__INTEGER)(i__UERD +  1);
-        };
-        new__I0PE=create__BBB(((__STRING_CONSTANT *)(&__string_206))->count__DD);
-        copy__JCS(new__I0PE,(&__string_206));
-        Self__P0PE=((__STRING *)string_tmp__DED);
-        result__A4QE=FALSE__;
-        if ((Self__P0PE->count__GFC == new__I0PE->count__GFC)) {
-          if ((Self__P0PE->count__GFC ==  0)) {
-            result__A4QE=TRUE__;
-          } else {
-            Self__ZM4G=((__CHARACTER *)Self__P0PE->storage__RBS);
-            other__0M4G=new__I0PE->storage__RBS;
-            i__YM4G=(__INTEGER)(Self__P0PE->count__GFC -  1);
-            while (((i__YM4G >=  0) && (Self__ZM4G[i__YM4G] == ((__CHARACTER *)other__0M4G)[i__YM4G]))) {
-              i__YM4G=(__INTEGER)(i__YM4G -  1);
-            };
-            result__A4QE=(i__YM4G <  0);
-          };
-        };
-        if ((! result__A4QE)) {
-          Self__IB2E=((__STRING *)string_tmp__DED);
-          add_last__JLT(Self__IB2E,' ');
-          Self__ITDF=Self__IB2E->count__GFC;
-          while ((Self__ITDF >=  2)) {
-            ((__CHARACTER *)Self__IB2E->storage__RBS)[(__INTEGER)(Self__ITDF -  1)]=((__CHARACTER *)Self__IB2E->storage__RBS)[(__INTEGER)((__INTEGER)(Self__ITDF -  1) -  1)];
-            Self__ITDF=(__INTEGER)(Self__ITDF -  1);
-          };
-          ((__CHARACTER *)Self__IB2E->storage__RBS)[ 0]='/';
-          Self__1L1G=((__STRING *)string_tmp__DED);
-          other__3L1G=Self__KERD->parent_entry_unix__JED.parent_entry__IED.path__BD;
-          i__2L1G=Self__1L1G->count__GFC;
-          j__4L1G=((__STRING_CONSTANT *)other__3L1G)->count__DD;
-          resize__IXZ(Self__1L1G,(__INTEGER)(i__2L1G + j__4L1G));
-          if (((i__2L1G >  0) && (j__4L1G >  0))) {
-            move__to__by__RVCC(Self__1L1G->storage__RBS, 0,(__INTEGER)(i__2L1G -  1),j__4L1G);
-          };
-          Self__4E3G=((__CHARACTER *)Self__1L1G->storage__RBS);
-          model__5E3G=((__STRING_CONSTANT *)other__3L1G)->storage__FQO;
-          Self__3E3G=(__INTEGER)(j__4L1G -  1);
-          while ((Self__3E3G >=  0)) {
-            Self__4E3G[Self__3E3G]=((__CHARACTER *)model__5E3G)[Self__3E3G];
-            Self__3E3G=(__INTEGER)(Self__3E3G -  1);
-          };
-          reduce_path__QC2E(string_tmp__DED);
-          result__NJ2E=NULL;
-          idx__OJ2E= 0;
-          copy__JCS(string_tmp2__J0AC,Self__KERD->parent_entry_unix__JED.parent_entry__IED.path__BD);
-          add_last__JLT(string_tmp2__J0AC,'/');
-          append__RNS(string_tmp2__J0AC,string_tmp__DED);
-          reduce_path__QC2E(string_tmp2__J0AC);
-          copy__JCS(string_tmp3__P0AC,string_tmp2__J0AC);
+      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);
           do {
-            result__NJ2E=reference_at__UT0C(alias__UED,string_tmp2__J0AC);
-            if (((void *)result__NJ2E == (void *)NULL)) {
-              Self__JXSD=((__STRING *)string_tmp2__J0AC);
-              Self__YB3=((__CHARACTER *)Self__JXSD->storage__RBS);
-              idx__EC3=(__INTEGER)(Self__JXSD->count__GFC -  1);
-              while ((! ((idx__EC3 <  0) || ('/' == Self__YB3[idx__EC3])))) {
-                idx__EC3=(__INTEGER)(idx__EC3 -  1);
+            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);
               };
-              idx__OJ2E=(__INTEGER)( 1 + idx__EC3);
-              if ((idx__OJ2E >  0)) {
-                Self__5STD=((__STRING *)string_tmp2__J0AC);
-                n__ATTD=(__INTEGER)(idx__OJ2E -  1);
-                if ((n__ATTD < Self__5STD->count__GFC)) {
-                  n__AV1G=(__INTEGER)(Self__5STD->count__GFC - n__ATTD);
-                  if ((n__AV1G > Self__5STD->count__GFC)) {
-                    Self__5STD->count__GFC= 0;
+              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;
                   } else {
-                    Self__5STD->count__GFC=(__INTEGER)(Self__5STD->count__GFC - n__AV1G);
+                    Self__MTTD->count__KFC=(__INTEGER)(Self__MTTD->count__KFC - n__UV3G);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__J0AC)->count__GFC= 0;
+                ((__STRING *)string_tmp2__N0AC)->count__KFC= 0;
               };
             };
-          } while ((((void *)result__NJ2E == (void *)NULL) && (((__STRING *)string_tmp2__J0AC)->count__GFC !=  0)));
-          if (((void *)result__NJ2E == (void *)NULL)) {
-            if (FILE_SYSTEM__->parent_directory__5ED==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) {
             } else {
-              parent_directory__4DD();
+              parent_directory__CED();
             };
-            result__NJ2E=physical_get_entry__IW0C(string_tmp3__P0AC);
-            __tmp__QL2E=TRUE__;
+            result__JP2E=physical_get_entry__MW0C(string_tmp3__T0AC);
+            __tmp__MR2E=TRUE__;
           } else {
-            __tmp__QL2E=FALSE__;
+            __tmp__MR2E=FALSE__;
           };
-          if ((! __tmp__QL2E)) {
-            if ((((__STRING *)string_tmp3__P0AC)->count__GFC != ((__STRING *)string_tmp2__J0AC)->count__GFC)) {
-              if (result__NJ2E==NULL) {
-                __tmp__BM2E=NULL;
+          if ((! __tmp__MR2E)) {
+            if ((((__STRING *)string_tmp3__T0AC)->count__KFC != ((__STRING *)string_tmp2__N0AC)->count__KFC)) {
+              if (result__JP2E==NULL) {
+                __tmp__3R2E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__NJ2E)->__id) {
+                switch (((struct ___OBJ *)result__JP2E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__BM2E=((void *)result__NJ2E);
+                  __tmp__3R2E=((void *)result__JP2E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__BM2E=NULL;
+                  __tmp__3R2E=NULL;
                 } break;
                 }
               };
-              dir__5L2E=__tmp__BM2E;
-              result__NJ2E=physical_get_entry__ZBF(string_tmp3__P0AC);
+              dir__1R2E=__tmp__3R2E;
+              result__JP2E=physical_get_entry__3BF(string_tmp3__T0AC);
             };
           };
-          if (((void *)result__NJ2E == (void *)NULL)) {
-            result__TERD=FALSE__;
+          if (((void *)result__JP2E == (void *)NULL)) {
+            result__XERD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__NJ2E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__DHRD=((__DIRECTORY_UNIX *)result__NJ2E)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+            if (((struct ___OBJ *)result__JP2E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__HHRD=((__DIRECTORY_UNIX *)result__JP2E)->parent_entry_unix__NED.parent_entry__MED.path__BD;
             } else {
-              __tmp__DHRD=((__FILE_UNIX *)result__NJ2E)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
-            };
-            if ((((__STRING_CONSTANT *)__tmp__DHRD)->count__DD >= ((__STRING_CONSTANT *)Self__KERD->parent_entry_unix__JED.parent_entry__IED.path__BD)->count__DD)) {
-              Self__Q4JF=((__LINKED_LISToENTRYo *)Self__KERD->parent_directory__KED.list__YERD);
-              if (((void *)Self__Q4JF->first_link__GFVE == (void *)NULL)) {
-                result__2M4G=NULL;
-                ptr__3M4G=((__POINTER )(NULL));
-                typ_id__4M4G= 0;
-                sz__5M4G=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
-                if ((sz__5M4G ==  0)) {
-                  result__2M4G=LINKED_LIST_NODEoENTRYo__;
+              __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__;
                 } else {
-                  typ_id__4M4G=__LINKED_LIST_NODEoENTRYo__;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__5M4G);
-                  if ((typ_id__4M4G == (__INTEGER)(-  1))) {
-                    a__AN4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__BN4G=(__UINTEGER_32)((__UINTEGER_32)(sz__5M4G + a__AN4G) & (__UINTEGER_32)(~ a__AN4G));
-                    ptr_table__HN4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BN4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__GN4G=((__POINTER )(NULL));
-                    result__IN4G=((__POINTER *)ptr_table__HN4G)[ 0];
-                    if ((result__IN4G == (void *)NULL)) {
-                      result__IN4G=new_lab__2QJ(new_size__BN4G);
-                      next__GN4G=(void *)((unsigned long)result__IN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BN4G)));
-                      ((__POINTER *)next__GN4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__HN4G)[ 0]=next__GN4G;
+                  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;
                     } else {
-                      next__GN4G=((__POINTER *)result__IN4G)[ 0];
-                      if ((next__GN4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IN4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__BN4G <<  1)) <=  4096)) {
-                          next__GN4G=(void *)((unsigned long)result__IN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BN4G)));
+                      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)));
                         } else {
-                          next__GN4G=new_lab__2QJ(new_size__BN4G);
+                          next__OQAH=new_lab__ARJ(new_size__JQAH);
                         };
-                        ((__POINTER *)next__GN4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__HN4G)[ 0]=next__GN4G;
+                        ((__POINTER *)next__OQAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__PQAH)[ 0]=next__OQAH;
                       } else {
-                        ((__POINTER *)result__IN4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GN4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__IN4G=next__GN4G;
+                        ((__POINTER *)result__QQAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__QQAH=next__OQAH;
                       };
                     };
-                    ptr__3M4G=result__IN4G;
+                    ptr__FQAH=result__QQAH;
                   } else {
-                    t__CN4G=((__UINTEGER_32 )typ_id__4M4G);
-                    a__DN4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__PN4G=(__UINTEGER_32)((__UINTEGER_32)(sz__5M4G + a__DN4G) & (__UINTEGER_32)(~ a__DN4G));
-                    ptr_table__MN4G=((__POINTER )(&(table_type[(t__CN4G)])));
-                    lab_type__ON4G=(__UINTEGER_32)(t__CN4G |  1);
-                    next__LN4G=((__POINTER )(NULL));
-                    result__NN4G=((__POINTER *)ptr_table__MN4G)[ 0];
-                    if ((result__NN4G == (void *)NULL)) {
-                      result__NN4G=new_lab__2QJ(lab_type__ON4G);
-                      next__LN4G=(void *)((unsigned long)result__NN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PN4G)));
-                      ((__POINTER *)next__LN4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__MN4G)[ 0]=next__LN4G;
+                    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;
                     } else {
-                      next__LN4G=((__POINTER *)result__NN4G)[ 0];
-                      if ((next__LN4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NN4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PN4G <<  1)) <=  4096)) {
-                          next__LN4G=(void *)((unsigned long)result__NN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PN4G)));
+                      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)));
                         } else {
-                          next__LN4G=new_lab__2QJ(lab_type__ON4G);
+                          next__TQAH=new_lab__ARJ(lab_type__WQAH);
                         };
-                        ((__POINTER *)next__LN4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__MN4G)[ 0]=next__LN4G;
+                        ((__POINTER *)next__TQAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__UQAH)[ 0]=next__TQAH;
                       } else {
-                        ((__POINTER *)result__NN4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LN4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__NN4G=next__LN4G;
+                        ((__POINTER *)result__VQAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__VQAH=next__TQAH;
                       };
                     };
-                    ptr__3M4G=result__NN4G;
+                    ptr__FQAH=result__VQAH;
                   };
-                  result__2M4G=((__LINKED_LIST_NODEoENTRYo *)ptr__3M4G);
-                  *(result__2M4G) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__EQAH=((__LINKED_LIST_NODEoENTRYo *)ptr__FQAH);
+                  *(result__EQAH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                Self__EN4G=((__LINKED_LIST_NODEoENTRYo *)result__2M4G);
-                Self__EN4G->item__ZWVE=result__NJ2E;
-                Self__EN4G->next__W0DF=NULL;
-                Self__Q4JF->first_link__GFVE=result__2M4G;
-                Self__Q4JF->parent_linked_collection__XERD.upper__E12D= 1;
-                Self__Q4JF->last_link__PFVE=result__2M4G;
-                Self__Q4JF->mem_idx__NFVE= 1;
-                Self__Q4JF->mem_lnk__OFVE=result__2M4G;
+                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;
               } else {
-                result__RLLF=NULL;
-                ptr__SLLF=((__POINTER )(NULL));
-                typ_id__XLLF= 0;
-                sz__ULLF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
-                if ((sz__ULLF ==  0)) {
-                  result__RLLF=LINKED_LIST_NODEoENTRYo__;
+                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__;
                 } else {
-                  typ_id__XLLF=__LINKED_LIST_NODEoENTRYo__;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__ULLF);
-                  if ((typ_id__XLLF == (__INTEGER)(-  1))) {
-                    a__ZW1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__0W1G=(__UINTEGER_32)((__UINTEGER_32)(sz__ULLF + a__ZW1G) & (__UINTEGER_32)(~ a__ZW1G));
-                    ptr_table__RN4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0W1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__QN4G=((__POINTER )(NULL));
-                    result__SN4G=((__POINTER *)ptr_table__RN4G)[ 0];
-                    if ((result__SN4G == (void *)NULL)) {
-                      result__SN4G=new_lab__2QJ(new_size__0W1G);
-                      next__QN4G=(void *)((unsigned long)result__SN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0W1G)));
-                      ((__POINTER *)next__QN4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__RN4G)[ 0]=next__QN4G;
+                  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;
                     } else {
-                      next__QN4G=((__POINTER *)result__SN4G)[ 0];
-                      if ((next__QN4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SN4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0W1G <<  1)) <=  4096)) {
-                          next__QN4G=(void *)((unsigned long)result__SN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0W1G)));
+                      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)));
                         } else {
-                          next__QN4G=new_lab__2QJ(new_size__0W1G);
+                          next__YQAH=new_lab__ARJ(new_size__OX3G);
                         };
-                        ((__POINTER *)next__QN4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__RN4G)[ 0]=next__QN4G;
+                        ((__POINTER *)next__YQAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ZQAH)[ 0]=next__YQAH;
                       } else {
-                        ((__POINTER *)result__SN4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QN4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__SN4G=next__QN4G;
+                        ((__POINTER *)result__0QAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__0QAH=next__YQAH;
                       };
                     };
-                    ptr__SLLF=result__SN4G;
+                    ptr__MYMF=result__0QAH;
                   } else {
-                    t__4W1G=((__UINTEGER_32 )typ_id__XLLF);
-                    a__3W1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__ZN4G=(__UINTEGER_32)((__UINTEGER_32)(sz__ULLF + a__3W1G) & (__UINTEGER_32)(~ a__3W1G));
-                    ptr_table__WN4G=((__POINTER )(&(table_type[(t__4W1G)])));
-                    lab_type__YN4G=(__UINTEGER_32)(t__4W1G |  1);
-                    next__VN4G=((__POINTER )(NULL));
-                    result__XN4G=((__POINTER *)ptr_table__WN4G)[ 0];
-                    if ((result__XN4G == (void *)NULL)) {
-                      result__XN4G=new_lab__2QJ(lab_type__YN4G);
-                      next__VN4G=(void *)((unsigned long)result__XN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZN4G)));
-                      ((__POINTER *)next__VN4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__WN4G)[ 0]=next__VN4G;
+                    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;
                     } else {
-                      next__VN4G=((__POINTER *)result__XN4G)[ 0];
-                      if ((next__VN4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XN4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZN4G <<  1)) <=  4096)) {
-                          next__VN4G=(void *)((unsigned long)result__XN4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZN4G)));
+                      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)));
                         } else {
-                          next__VN4G=new_lab__2QJ(lab_type__YN4G);
+                          next__3QAH=new_lab__ARJ(lab_type__ARAH);
                         };
-                        ((__POINTER *)next__VN4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__WN4G)[ 0]=next__VN4G;
+                        ((__POINTER *)next__3QAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__4QAH)[ 0]=next__3QAH;
                       } else {
-                        ((__POINTER *)result__XN4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VN4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__XN4G=next__VN4G;
+                        ((__POINTER *)result__5QAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3QAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__5QAH=next__3QAH;
                       };
                     };
-                    ptr__SLLF=result__XN4G;
+                    ptr__MYMF=result__5QAH;
                   };
-                  result__RLLF=((__LINKED_LIST_NODEoENTRYo *)ptr__SLLF);
-                  *(result__RLLF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__LYMF=((__LINKED_LIST_NODEoENTRYo *)ptr__MYMF);
+                  *(result__LYMF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                Self__3NNF=((__LINKED_LIST_NODEoENTRYo *)result__RLLF);
-                Self__3NNF->item__ZWVE=result__NJ2E;
-                Self__3NNF->next__W0DF=NULL;
-                ((__LINKED_LIST_NODEoENTRYo *)Self__Q4JF->last_link__PFVE)->next__W0DF=result__RLLF;
-                Self__Q4JF->parent_linked_collection__XERD.upper__E12D=(__INTEGER)(Self__Q4JF->parent_linked_collection__XERD.upper__E12D +  1);
-                Self__Q4JF->last_link__PFVE=result__RLLF;
+                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;
               };
             };
           };
         };
       };
-    } while (((dirent__QERD != (void *)NULL) & result__TERD));
-    closedir((dir__OERD));
+    } while (((dirent__UERD != (void *)NULL) & result__XERD));
+    closedir((dir__SERD));
   };
-  return(result__TERD);
+  return(result__XERD);
 }
 
-static void check_in__begin__OQQC(void *entry__QQQC,__INTEGER n__RQQC)
+static void check_in__begin__SQQC(void *entry__UQQC,__INTEGER n__VQQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  void *tok__TQQC,*__tmp__3QQC,*__tmp__NSQC,*k__DWDC,*k__WH5F;
-  void *__tmp__ZUQC,*__tmp__4UQC;
-  void *dir__VQQC,*__tmp__ERQC;
-  __FILE_UNIX *Self__MJUG;
-  __INTEGER __tmp__JRQC,Self__I12D,__tmp__4RQC,Self__Z12D,i1__JIS;
-  __INTEGER i2__KIS,Self__IPX,result__0K3G,__tmp__2K3G,Self__3K3G;
-  __INTEGER result__5K3G,__tmp__BL3G,Self__CL3G,__tmp__JTQC,Self__GH5F;
-  __INTEGER result__EL3G,__tmp__GL3G,Self__HL3G,result__JL3G;
-  __INTEGER __tmp__LL3G,Self__ML3G,result__SL3G,__tmp__UL3G,Self__VL3G;
-  __INTEGER result__XL3G,__tmp__ZL3G,Self__0L3G,i__YXBD,j__ZXBD;
-  __INTEGER Self__4CKB,result__AM3G,__tmp__CM3G,Self__DM3G,result__FM3G;
-  __INTEGER __tmp__HM3G,Self__IM3G,len__RVU,__tmp__OWU,__tmp__PWU;
-  __INTEGER Self__GQGB,__tmp__5PS,Self__YRIC,result__OM3G,__tmp__QM3G;
-  __INTEGER Self__RM3G,result__TM3G,__tmp__VM3G,Self__WM3G,__tmp__XXQC;
-  __INTEGER Self__DCRE;
-  void *__tmp__PRQC,*__tmp__ESQC,*__tmp__MSQC,*__tmp__YUQC,*__tmp__3UQC;
-  __STRING_CONSTANT *Self__FIS,*Self__FL3G,*Self__KL3G;
-  __STRING *Self__4QS,*Self__ESS,*Self__WXBD,*Self__J32,*Self__XPS;
-  void *tok_lst__UQQC;
-  __BOOLEAN __tmp__WQQC,__tmp__QRQC,__tmp__FSQC,result__IIS;
-  __CHARACTER Self__GJOB,result__IJOB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WK3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__EF3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__OL3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__IF3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__2L3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__PF3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KM3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ZW3;
-  void *node__YK3G,*node__GF3G,*node__QL3G,*node__KF3G,*node__4L3G;
-  void *node__RF3G,*node__MM3G,*node__EX3;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__CWDC,*Self__VH5F;
-  void *node__MWDC,*node__AI5F;
-  __CHARACTER *Self__LMEB,*model__MMEB,*__tmp__2PS,*Self__XLBC;
-  tok__TQQC=NULL;
-  tok_lst__UQQC=NULL;
-  dir__VQQC=NULL;
-  if (((struct ___OBJ *)entry__QQQC)->__id==__DIRECTORY_UNIX__) {
-    __tmp__WQQC=open__JERD(entry__QQQC);
+  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);
   } else {
-    Self__MJUG=((__FILE_UNIX *)entry__QQQC);
-    Self__MJUG->stream__UIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__MJUG->parent_entry_unix__MCF.parent_entry__IED.path__BD)->storage__FQO),"r+b")));
-    __tmp__WQQC=(Self__MJUG->stream__UIRD != (void *)NULL);
+    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);
   };
-  if ((! __tmp__WQQC)) {
-    print__GHD((&__string_207));
-    if (((struct ___OBJ *)entry__QQQC)->__id==__DIRECTORY_UNIX__) {
-      __tmp__3QQC=((__DIRECTORY_UNIX *)entry__QQQC)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+  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;
     } else {
-      __tmp__3QQC=((__FILE_UNIX *)entry__QQQC)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
+      __tmp__BRQC=((__FILE_UNIX *)entry__UQQC)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
     };
-    print__GHD(__tmp__3QQC);
-    print__GHD((&__string_163));
+    print__KHD(__tmp__BRQC);
+    print__KHD((&__string_164));
   } else {
-    if (entry__QQQC==NULL) {
-      __tmp__ERQC=NULL;
+    if (entry__UQQC==NULL) {
+      __tmp__IRQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__QQQC)->__id) {
+      switch (((struct ___OBJ *)entry__UQQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__ERQC=((void *)entry__QQQC);
+        __tmp__IRQC=((void *)entry__UQQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__ERQC=NULL;
+        __tmp__IRQC=NULL;
       } break;
       }
     };
-    dir__VQQC=__tmp__ERQC;
-    __tmp__JRQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__ERQC)->parent_directory__KED.list__YERD)->parent_linked_collection__XERD.upper__E12D;
-    Self__I12D= 1;
-    while ((Self__I12D <= __tmp__JRQC)) {
-      __tmp__PRQC=item__FCPE(dir__VQQC,Self__I12D);
-      if (((struct ___OBJ *)__tmp__PRQC)->__id==__DIRECTORY_UNIX__) {
-        __tmp__QRQC=((void *)((__DIRECTORY_UNIX *)__tmp__PRQC) != (void *)NULL);
-      } else {
-        __tmp__QRQC=FALSE__;
-      };
-      if (__tmp__QRQC) {
-        check_in__begin__OQQC(item__FCPE(dir__VQQC,Self__I12D),n__RQQC);
-      };
-      Self__I12D=(__INTEGER)(Self__I12D +  1);
-    };
-    __tmp__4RQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__ERQC)->parent_directory__KED.list__YERD)->parent_linked_collection__XERD.upper__E12D;
-    Self__Z12D= 1;
-    while ((Self__Z12D <= __tmp__4RQC)) {
-      __tmp__ESQC=item__FCPE(dir__VQQC,Self__Z12D);
-      if (((struct ___OBJ *)__tmp__ESQC)->__id==__DIRECTORY_UNIX__) {
-        __tmp__FSQC=((void *)((__DIRECTORY_UNIX *)__tmp__ESQC) != (void *)NULL);
-      } else {
-        __tmp__FSQC=FALSE__;
-      };
-      if ((! __tmp__FSQC)) {
-        __tmp__MSQC=item__FCPE(dir__VQQC,Self__Z12D);
-        if (((struct ___OBJ *)__tmp__MSQC)->__id==__DIRECTORY_UNIX__) {
-          __tmp__NSQC=((__DIRECTORY_UNIX *)__tmp__MSQC)->parent_entry_unix__JED.parent_entry__IED.name__FNT;
-        } else {
-          __tmp__NSQC=((__FILE_UNIX *)__tmp__MSQC)->parent_entry_unix__MCF.parent_entry__IED.name__FNT;
-        };
-        Self__FIS=((__STRING_CONSTANT *)__tmp__NSQC);
-        result__IIS=FALSE__;
-        i1__JIS= 0;
-        i2__KIS= 0;
-        if ((((__STRING_CONSTANT *)(&__string_151))->count__DD <= Self__FIS->count__DD)) {
-          i1__JIS=(__INTEGER)((__INTEGER)(Self__FIS->count__DD - ((__STRING_CONSTANT *)(&__string_151))->count__DD) +  1);
-          i2__KIS= 1;
-          while ((! (((i1__JIS > Self__FIS->count__DD) || (i2__KIS > ((__STRING_CONSTANT *)(&__string_151))->count__DD)) || (((__CHARACTER *)Self__FIS->storage__FQO)[(__INTEGER)(i1__JIS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__FQO)[(__INTEGER)(i2__KIS -  1)])))) {
-            i1__JIS=(__INTEGER)(i1__JIS +  1);
-            i2__KIS=(__INTEGER)(i2__KIS +  1);
-          };
-          result__IIS=(i1__JIS > Self__FIS->count__DD);
-        };
-        if (result__IIS) {
-          copy__JCS(string_tmp__VH,__tmp__NSQC);
-          Self__4QS=((__STRING *)string_tmp__VH);
-          if (( 3 > Self__4QS->count__GFC)) {
-            Self__4QS->count__GFC= 0;
-          } else {
-            Self__4QS->count__GFC=(__INTEGER)(Self__4QS->count__GFC -  3);
-          };
-          Self__ESS=((__STRING *)string_tmp__VH);
-          Self__IPX=Self__ESS->count__GFC;
-          while ((Self__IPX >=  1)) {
-            Self__GJOB=((__CHARACTER *)Self__ESS->storage__RBS)[(__INTEGER)(Self__IPX -  1)];
-            result__IJOB='\0';
-            if (((((__INTEGER_8 )Self__GJOB) <  97) || (((__INTEGER_8 )Self__GJOB) >  122))) {
-              result__IJOB=Self__GJOB;
+    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;
             } else {
-              result__IJOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__GJOB) -  32))));
-            };
-            ((__CHARACTER *)Self__ESS->storage__RBS)[(__INTEGER)(Self__IPX -  1)]=result__IJOB;
-            Self__IPX=(__INTEGER)(Self__IPX -  1);
-          };
-          tok__TQQC=get__YVB(string_tmp__VH);
-          Self__WK3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-          result__0K3G= 0;
-          __tmp__2K3G=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-          Self__3K3G= 1;
-          while ((Self__3K3G <= __tmp__2K3G)) {
-            result__0K3G=(__INTEGER)((__INTEGER)( 5 * result__0K3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__FQO)[(__INTEGER)(Self__3K3G -  1)])));
-            Self__3K3G=(__INTEGER)(Self__3K3G +  1);
-          };
-          if ((result__0K3G <  0)) {
-            result__0K3G=(__INTEGER)(~ result__0K3G);
-          };
-          node__YK3G=((void **)Self__WK3G->buckets__PCT)[(__INTEGER)(result__0K3G % Self__WK3G->capacity__KCT)];
-          while ((! (((void *)node__YK3G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YK3G)->key__1CT == (void *)(&__string_147))))) {
-            node__YK3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YK3G)->next__GDT;
-          };
-          if (((void *)node__YK3G != (void *)NULL)) {
-            Self__EF3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-            result__5K3G= 0;
-            __tmp__BL3G=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-            Self__CL3G= 1;
-            while ((Self__CL3G <= __tmp__BL3G)) {
-              result__5K3G=(__INTEGER)((__INTEGER)( 5 * result__5K3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__FQO)[(__INTEGER)(Self__CL3G -  1)])));
-              Self__CL3G=(__INTEGER)(Self__CL3G +  1);
-            };
-            if ((result__5K3G <  0)) {
-              result__5K3G=(__INTEGER)(~ result__5K3G);
-            };
-            node__GF3G=((void **)Self__EF3G->buckets__PCT)[(__INTEGER)(result__5K3G % Self__EF3G->capacity__KCT)];
-            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GF3G)->key__1CT != (void *)(&__string_147))) {
-              node__GF3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GF3G)->next__GDT;
-            };
-            tok_lst__UQQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__GF3G)->item__XX3;
-            __tmp__JTQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__UQQC)->parent_linked_collection__LD.upper__PCD;
-            Self__GH5F= 1;
-            while ((Self__GH5F <= __tmp__JTQC)) {
-              if (((void *)item__I0ND(tok_lst__UQQC,Self__GH5F) == (void *)NULL)) {
-                append__RNS(current_list__2B,tok__TQQC);
-                append__RNS(file_list__0B,tok__TQQC);
+              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);
               } else {
-                append__RNS(current_list__2B,item__I0ND(tok_lst__UQQC,Self__GH5F));
-                append__RNS(file_list__0B,item__I0ND(tok_lst__UQQC,Self__GH5F));
+                append__VNS(current_list__2B,item__M0ND(tok_lst__YQQC,Self__CCBG));
+                append__VNS(file_list__0B,item__M0ND(tok_lst__YQQC,Self__CCBG));
               };
-              Self__GH5F=(__INTEGER)(Self__GH5F +  1);
-            };
-          } else {
-            append__RNS(current_list__2B,tok__TQQC);
-            add_last__JLT(current_list__2B,'\n');
-            append__RNS(file_list__0B,tok__TQQC);
-            add_last__JLT(file_list__0B,'\n');
-          };
-          Self__CWDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__5SS);
-          k__DWDC=tok__TQQC;
-          Self__FL3G=((__STRING_CONSTANT *)tok__TQQC);
-          result__EL3G= 0;
-          __tmp__GL3G=Self__FL3G->count__DD;
-          Self__HL3G= 1;
-          while ((Self__HL3G <= __tmp__GL3G)) {
-            result__EL3G=(__INTEGER)((__INTEGER)( 5 * result__EL3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FL3G->storage__FQO)[(__INTEGER)(Self__HL3G -  1)])));
-            Self__HL3G=(__INTEGER)(Self__HL3G +  1);
-          };
-          if ((result__EL3G <  0)) {
-            result__EL3G=(__INTEGER)(~ result__EL3G);
-          };
-          node__MWDC=((void **)Self__CWDC->buckets__FNBC)[(__INTEGER)(result__EL3G % Self__CWDC->capacity__ANBC)];
-          while ((! (((void *)node__MWDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__MWDC)->key__RNBC == (void *)k__DWDC)))) {
-            node__MWDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__MWDC)->next__2NBC;
-          };
-          if (((void *)node__MWDC != (void *)NULL)) {
-            print__GHD((&__string_208));
-            Self__VH5F=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__5SS);
-            k__WH5F=tok__TQQC;
-            Self__KL3G=((__STRING_CONSTANT *)tok__TQQC);
-            result__JL3G= 0;
-            __tmp__LL3G=Self__KL3G->count__DD;
-            Self__ML3G= 1;
-            while ((Self__ML3G <= __tmp__LL3G)) {
-              result__JL3G=(__INTEGER)((__INTEGER)( 5 * result__JL3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KL3G->storage__FQO)[(__INTEGER)(Self__ML3G -  1)])));
-              Self__ML3G=(__INTEGER)(Self__ML3G +  1);
-            };
-            if ((result__JL3G <  0)) {
-              result__JL3G=(__INTEGER)(~ result__JL3G);
-            };
-            node__AI5F=((void **)Self__VH5F->buckets__FNBC)[(__INTEGER)(result__JL3G % Self__VH5F->capacity__ANBC)];
-            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__AI5F)->key__RNBC != (void *)k__WH5F)) {
-              node__AI5F=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__AI5F)->next__2NBC;
-            };
-            print__GHD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__AI5F)->item__E3GD)->filename__EPG);
+              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);
             fputc((int)('\n'),stdout);
-            __tmp__YUQC=item__FCPE(dir__VQQC,Self__Z12D);
-            if (((struct ___OBJ *)__tmp__YUQC)->__id==__DIRECTORY_UNIX__) {
-              __tmp__ZUQC=((__DIRECTORY_UNIX *)__tmp__YUQC)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+            __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;
             } else {
-              __tmp__ZUQC=((__FILE_UNIX *)__tmp__YUQC)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
+              __tmp__3UQC=((__FILE_UNIX *)__tmp__2UQC)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
             };
-            print__GHD(__tmp__ZUQC);
+            print__KHD(__tmp__3UQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __tmp__3UQC=item__FCPE(dir__VQQC,Self__Z12D);
-          if (((struct ___OBJ *)__tmp__3UQC)->__id==__DIRECTORY_UNIX__) {
-            __tmp__4UQC=((__DIRECTORY_UNIX *)__tmp__3UQC)->parent_entry_unix__JED.parent_entry__IED.path__BD;
-          } else {
-            __tmp__4UQC=((__FILE_UNIX *)__tmp__3UQC)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
-          };
-          proto_input__BI=create__name__generic_count__JAC(__tmp__4UQC,tok__TQQC);
-          go_on__SAC(proto_input__BI);
-          if (is_shorter__TY) {
-            save_file__with__5CC(add_ext__UAF(tok__TQQC),output_code__SI);
-          };
-        };
-      };
-      Self__Z12D=(__INTEGER)(Self__Z12D +  1);
-    };
-    if ((((__STRING *)current_list__2B)->count__GFC !=  0)) {
-      Self__OL3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      result__SL3G= 0;
-      __tmp__UL3G=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-      Self__VL3G= 1;
-      while ((Self__VL3G <= __tmp__UL3G)) {
-        result__SL3G=(__INTEGER)((__INTEGER)( 5 * result__SL3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__FQO)[(__INTEGER)(Self__VL3G -  1)])));
-        Self__VL3G=(__INTEGER)(Self__VL3G +  1);
-      };
-      if ((result__SL3G <  0)) {
-        result__SL3G=(__INTEGER)(~ result__SL3G);
-      };
-      node__QL3G=((void **)Self__OL3G->buckets__PCT)[(__INTEGER)(result__SL3G % Self__OL3G->capacity__KCT)];
-      while ((! (((void *)node__QL3G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QL3G)->key__1CT == (void *)(&__string_146))))) {
-        node__QL3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QL3G)->next__GDT;
-      };
-      if (((void *)node__QL3G != (void *)NULL)) {
-        Self__IF3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__XL3G= 0;
-        __tmp__ZL3G=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-        Self__0L3G= 1;
-        while ((Self__0L3G <= __tmp__ZL3G)) {
-          result__XL3G=(__INTEGER)((__INTEGER)( 5 * result__XL3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__FQO)[(__INTEGER)(Self__0L3G -  1)])));
-          Self__0L3G=(__INTEGER)(Self__0L3G +  1);
-        };
-        if ((result__XL3G <  0)) {
-          result__XL3G=(__INTEGER)(~ result__XL3G);
-        };
-        node__KF3G=((void **)Self__IF3G->buckets__PCT)[(__INTEGER)(result__XL3G % Self__IF3G->capacity__KCT)];
-        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KF3G)->key__1CT != (void *)(&__string_146))) {
-          node__KF3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KF3G)->next__GDT;
-        };
-        tok__TQQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KF3G)->item__XX3)->first_link__UTEC)->item__KVHD;
-        Self__WXBD=((__STRING *)current_list__2B);
-        i__YXBD=Self__WXBD->count__GFC;
-        j__ZXBD=((__STRING_CONSTANT *)tok__TQQC)->count__DD;
-        resize__IXZ(Self__WXBD,(__INTEGER)(i__YXBD + j__ZXBD));
-        if (((i__YXBD >  0) && (j__ZXBD >  0))) {
-          move__to__by__RVCC(Self__WXBD->storage__RBS, 0,(__INTEGER)(i__YXBD -  1),j__ZXBD);
-        };
-        Self__LMEB=((__CHARACTER *)Self__WXBD->storage__RBS);
-        model__MMEB=((__STRING_CONSTANT *)tok__TQQC)->storage__FQO;
-        Self__4CKB=(__INTEGER)(j__ZXBD -  1);
-        while ((Self__4CKB >=  0)) {
-          Self__LMEB[Self__4CKB]=((__CHARACTER *)model__MMEB)[Self__4CKB];
-          Self__4CKB=(__INTEGER)(Self__4CKB -  1);
-        };
-      };
-      Self__2L3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      result__AM3G= 0;
-      __tmp__CM3G=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-      Self__DM3G= 1;
-      while ((Self__DM3G <= __tmp__CM3G)) {
-        result__AM3G=(__INTEGER)((__INTEGER)( 5 * result__AM3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__FQO)[(__INTEGER)(Self__DM3G -  1)])));
-        Self__DM3G=(__INTEGER)(Self__DM3G +  1);
-      };
-      if ((result__AM3G <  0)) {
-        result__AM3G=(__INTEGER)(~ result__AM3G);
-      };
-      node__4L3G=((void **)Self__2L3G->buckets__PCT)[(__INTEGER)(result__AM3G % Self__2L3G->capacity__KCT)];
-      while ((! (((void *)node__4L3G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4L3G)->key__1CT == (void *)(&__string_148))))) {
-        node__4L3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4L3G)->next__GDT;
-      };
-      if (((void *)node__4L3G != (void *)NULL)) {
-        Self__PF3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__FM3G= 0;
-        __tmp__HM3G=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-        Self__IM3G= 1;
-        while ((Self__IM3G <= __tmp__HM3G)) {
-          result__FM3G=(__INTEGER)((__INTEGER)( 5 * result__FM3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__FQO)[(__INTEGER)(Self__IM3G -  1)])));
-          Self__IM3G=(__INTEGER)(Self__IM3G +  1);
-        };
-        if ((result__FM3G <  0)) {
-          result__FM3G=(__INTEGER)(~ result__FM3G);
-        };
-        node__RF3G=((void **)Self__PF3G->buckets__PCT)[(__INTEGER)(result__FM3G % Self__PF3G->capacity__KCT)];
-        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RF3G)->key__1CT != (void *)(&__string_148))) {
-          node__RF3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RF3G)->next__GDT;
-        };
-        tok__TQQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RF3G)->item__XX3)->first_link__UTEC)->item__KVHD;
-        append__RNS(current_list__2B,tok__TQQC);
-      };
-      copy__JCS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__ERQC)->parent_entry_unix__JED.parent_entry__IED.path__BD);
-      Self__J32=((__STRING *)string_tmp__VH);
-      if ((n__RQQC > Self__J32->count__GFC)) {
-        Self__J32->count__GFC= 0;
-      } else {
-        if ((n__RQQC >  0)) {
-          len__RVU=(__INTEGER)((__INTEGER)(n__RQQC -  1) +  1);
-          if ((len__RVU >  0)) {
-            __tmp__OWU=(__INTEGER)(n__RQQC +  1);
-            __tmp__PWU=Self__J32->count__GFC;
-            Self__GQGB=__tmp__OWU;
-            while ((Self__GQGB <= __tmp__PWU)) {
-              ((__CHARACTER *)Self__J32->storage__RBS)[(__INTEGER)((__INTEGER)(Self__GQGB - len__RVU) -  1)]=((__CHARACTER *)Self__J32->storage__RBS)[(__INTEGER)(Self__GQGB -  1)];
-              Self__GQGB=(__INTEGER)(Self__GQGB +  1);
-            };
-            Self__J32->count__GFC=(__INTEGER)(Self__J32->count__GFC - len__RVU);
-          };
-        };
-      };
-      if ((((__STRING *)string_tmp__VH)->count__GFC !=  0)) {
-        Self__XPS=((__STRING *)string_tmp__VH);
-        __tmp__2PS=Self__XPS->storage__RBS;
-        __tmp__5PS=(__INTEGER)(Self__XPS->count__GFC -  1);
-        Self__XLBC=((__CHARACTER *)__tmp__2PS);
-        Self__YRIC=__tmp__5PS;
-        while ((Self__YRIC >=  0)) {
-          if (('/' == Self__XLBC[Self__YRIC])) {
-            Self__XLBC[Self__YRIC]='-';
-          };
-          Self__YRIC=(__INTEGER)(Self__YRIC -  1);
-        };
-        tok__TQQC=get__YVB(string_tmp__VH);
-        Self__KM3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__OM3G= 0;
-        __tmp__QM3G=((__STRING_CONSTANT *)(&__string_144))->count__DD;
-        Self__RM3G= 1;
-        while ((Self__RM3G <= __tmp__QM3G)) {
-          result__OM3G=(__INTEGER)((__INTEGER)( 5 * result__OM3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_144))->storage__FQO)[(__INTEGER)(Self__RM3G -  1)])));
-          Self__RM3G=(__INTEGER)(Self__RM3G +  1);
-        };
-        if ((result__OM3G <  0)) {
-          result__OM3G=(__INTEGER)(~ result__OM3G);
-        };
-        node__MM3G=((void **)Self__KM3G->buckets__PCT)[(__INTEGER)(result__OM3G % Self__KM3G->capacity__KCT)];
-        while ((! (((void *)node__MM3G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MM3G)->key__1CT == (void *)(&__string_144))))) {
-          node__MM3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MM3G)->next__GDT;
-        };
-        if (((void *)node__MM3G != (void *)NULL)) {
-          Self__ZW3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-          result__TM3G= 0;
-          __tmp__VM3G=((__STRING_CONSTANT *)(&__string_144))->count__DD;
-          Self__WM3G= 1;
-          while ((Self__WM3G <= __tmp__VM3G)) {
-            result__TM3G=(__INTEGER)((__INTEGER)( 5 * result__TM3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_144))->storage__FQO)[(__INTEGER)(Self__WM3G -  1)])));
-            Self__WM3G=(__INTEGER)(Self__WM3G +  1);
-          };
-          if ((result__TM3G <  0)) {
-            result__TM3G=(__INTEGER)(~ result__TM3G);
-          };
-          node__EX3=((void **)Self__ZW3->buckets__PCT)[(__INTEGER)(result__TM3G % Self__ZW3->capacity__KCT)];
-          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EX3)->key__1CT != (void *)(&__string_144))) {
-            node__EX3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EX3)->next__GDT;
-          };
-          tok_lst__UQQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EX3)->item__XX3;
-          __tmp__XXQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__UQQC)->parent_linked_collection__LD.upper__PCD;
-          Self__DCRE= 1;
-          while ((Self__DCRE <= __tmp__XXQC)) {
-            if (((void *)item__I0ND(tok_lst__UQQC,Self__DCRE) == (void *)NULL)) {
-              append__RNS(directory_list__YB,tok__TQQC);
+          __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);
             } else {
-              append__RNS(directory_list__YB,item__I0ND(tok_lst__UQQC,Self__DCRE));
+              append__VNS(directory_list__YB,item__M0ND(tok_lst__YQQC,Self__VERE));
             };
-            Self__DCRE=(__INTEGER)(Self__DCRE +  1);
+            Self__VERE=(__INTEGER)(Self__VERE +  1);
           };
         } else {
-          append__RNS(directory_list__YB,tok__TQQC);
-          add_last__JLT(directory_list__YB,'\n');
+          append__VNS(directory_list__YB,tok__XQQC);
+          add_last__NLT(directory_list__YB,'\n');
         };
-        save_file__with__5CC(add_ext__UAF(tok__TQQC),current_list__2B);
-        ((__STRING *)current_list__2B)->count__GFC= 0;
+        save_file__with__DDC(add_ext__YAF(tok__XQQC),current_list__2B);
+        ((__STRING *)current_list__2B)->count__KFC= 0;
       };
     };
   };
 }
 
-static void* add_ext__UAF(void *n__WAF)
+static void* add_ext__YAF(void *n__0AF)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__2M3G,__tmp__4M3G,Self__5M3G,result__BN3G;
-  __INTEGER __tmp__DN3G,Self__EN3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__YM3G;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DM1G;
-  void *node__0M3G,*node__FM1G;
-  copy__JCS(string_tmp__VH,n__WAF);
-  Self__YM3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-  result__2M3G= 0;
-  __tmp__4M3G=((__STRING_CONSTANT *)(&__string_116))->count__DD;
-  Self__5M3G= 1;
-  while ((Self__5M3G <= __tmp__4M3G)) {
-    result__2M3G=(__INTEGER)((__INTEGER)( 5 * result__2M3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__FQO)[(__INTEGER)(Self__5M3G -  1)])));
-    Self__5M3G=(__INTEGER)(Self__5M3G +  1);
-  };
-  if ((result__2M3G <  0)) {
-    result__2M3G=(__INTEGER)(~ result__2M3G);
-  };
-  node__0M3G=((void **)Self__YM3G->buckets__PCT)[(__INTEGER)(result__2M3G % Self__YM3G->capacity__KCT)];
-  while ((! (((void *)node__0M3G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0M3G)->key__1CT == (void *)(&__string_116))))) {
-    node__0M3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0M3G)->next__GDT;
-  };
-  if (((void *)node__0M3G != (void *)NULL)) {
-    Self__DM1G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-    result__BN3G= 0;
-    __tmp__DN3G=((__STRING_CONSTANT *)(&__string_116))->count__DD;
-    Self__EN3G= 1;
-    while ((Self__EN3G <= __tmp__DN3G)) {
-      result__BN3G=(__INTEGER)((__INTEGER)( 5 * result__BN3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__FQO)[(__INTEGER)(Self__EN3G -  1)])));
-      Self__EN3G=(__INTEGER)(Self__EN3G +  1);
-    };
-    if ((result__BN3G <  0)) {
-      result__BN3G=(__INTEGER)(~ result__BN3G);
-    };
-    node__FM1G=((void **)Self__DM1G->buckets__PCT)[(__INTEGER)(result__BN3G % Self__DM1G->capacity__KCT)];
-    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FM1G)->key__1CT != (void *)(&__string_116))) {
-      node__FM1G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FM1G)->next__GDT;
-    };
-    append__RNS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FM1G)->item__XX3)->first_link__UTEC)->item__KVHD);
+  __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);
   } else {
-    append__RNS(string_tmp__VH,(&__string_209));
+    append__VNS(string_tmp__VH,(&__string_211));
   };
-  return(get__YVB(string_tmp__VH));
+  return(get__2VB(string_tmp__VH));
 }
 
-static void save_file__with__5CC(void *n__BDC,void *buf__CDC)
+static void save_file__with__DDC(void *n__FDC,void *buf__GDC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING *Self__HM1G,*Self__TDT,*Self__HXS;
-  void *result__BZAC,*__tmp__RZAC,*__tmp__DFC,*file__EDC;
-  void *__tmp__R2HC;
-  __POINTER stream__5DIC,ptr__EUMF;
-  void *__tmp__QZAC;
-  __FILE_UNIX *Self__AKUG,*Self__JCTE,*Self__SDTE;
-  __INTEGER __tmp__IFC;
-  __BOOLEAN __tmp__ZDC,result__BEIC;
+  __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;
   if (((void *)output_name__DI != (void *)NULL)) {
-    copy__JCS(string_tmp__VH,output_name__DI);
-    Self__HM1G=((__STRING *)string_tmp__VH);
-    if ((((__CHARACTER *)Self__HM1G->storage__RBS)[(__INTEGER)(Self__HM1G->count__GFC -  1)] != '/')) {
-      __tmp__ZDC=TRUE__;
+    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__;
     } else {
-      Self__TDT=((__STRING *)string_tmp__VH);
-      __tmp__ZDC=(((__CHARACTER *)Self__TDT->storage__RBS)[(__INTEGER)(Self__TDT->count__GFC -  1)] != '\\');
+      Self__XDT=((__STRING *)string_tmp__VH);
+      __tmp__3DC=(((__CHARACTER *)Self__XDT->storage__VBS)[(__INTEGER)(Self__XDT->count__KFC -  1)] != '\\');
     };
-    if (__tmp__ZDC) {
-      add_last__JLT(string_tmp__VH,'/');
+    if (__tmp__3DC) {
+      add_last__NLT(string_tmp__VH,'/');
     };
   } else {
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
+    ((__STRING *)string_tmp__VH)->count__KFC= 0;
   };
-  append__RNS(string_tmp__VH,n__BDC);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  append__VNS(string_tmp__VH,n__FDC);
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  result__BZAC=NULL;
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  result__FZAC=NULL;
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
-    __tmp__R2HC=FILE_SYSTEM__->parent_directory__4ED;
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
+    __tmp__V2HC=FILE_SYSTEM__->parent_directory__CFD;
   } else {
-    __tmp__R2HC=parent_directory__4DD();
+    __tmp__V2HC=parent_directory__CED();
   };
-  copy__JCS(string_tmp__DED,((__DIRECTORY_UNIX *)__tmp__R2HC)->parent_entry_unix__JED.parent_entry__IED.path__BD);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  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) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  add_last__JLT(string_tmp__DED,'/');
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  add_last__NLT(string_tmp__HED,'/');
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  append__RNS(string_tmp__DED,string_tmp__VH);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  append__VNS(string_tmp__HED,string_tmp__VH);
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  reduce_path__A3HC(string_tmp__DED);
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  reduce_path__E3HC(string_tmp__HED);
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  if (FILE_SYSTEM__->parent_directory__DFD==0) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  result__BEIC=FALSE__;
-  Self__HXS=((__STRING *)string_tmp__DED);
-  if ((Self__HXS->capacity__IBS > Self__HXS->count__GFC)) {
-    ((__CHARACTER *)Self__HXS->storage__RBS)[Self__HXS->count__GFC]='\0';
+  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';
   } else {
-    add_last__JLT(Self__HXS,'\0');
-    Self__HXS->count__GFC=(__INTEGER)(Self__HXS->count__GFC -  1);
+    add_last__NLT(Self__LXS,'\0');
+    Self__LXS->count__KFC=(__INTEGER)(Self__LXS->count__KFC -  1);
   };
-  stream__5DIC=((__POINTER )(fopen((char*)(Self__HXS->storage__RBS),"w+b")));
-  if ((stream__5DIC != (void *)NULL)) {
-    result__BEIC=(((__INTEGER )(fclose((FILE*)(stream__5DIC)))) ==  0);
+  stream__DEIC=((__POINTER )(fopen((char*)(Self__LXS->storage__VBS),"w+b")));
+  if ((stream__DEIC != (void *)NULL)) {
+    result__FEIC=(((__INTEGER )(fclose((FILE*)(stream__DEIC)))) ==  0);
   };
-  if (result__BEIC) {
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  if (result__FEIC) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    __tmp__QZAC=get_entry__D0AC(string_tmp__DED);
-    if (__tmp__QZAC==NULL) {
-      __tmp__RZAC=NULL;
+    __tmp__UZAC=get_entry__H0AC(string_tmp__HED);
+    if (__tmp__UZAC==NULL) {
+      __tmp__VZAC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__QZAC)->__id) {
+      switch (((struct ___OBJ *)__tmp__UZAC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__RZAC=NULL;
+        __tmp__VZAC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__RZAC=((void *)__tmp__QZAC);
+        __tmp__VZAC=((void *)__tmp__UZAC);
       } break;
       }
     };
-    result__BZAC=__tmp__RZAC;
+    result__FZAC=__tmp__VZAC;
   };
-  if (((void *)result__BZAC == (void *)NULL)) {
-    put_string__E1F((&__string_210));
-    put_string__E1F(string_tmp__VH);
-    put_string__E1F((&__string_211));
+  if (((void *)result__FZAC == (void *)NULL)) {
+    put_string__I1F((&__string_212));
+    put_string__I1F(string_tmp__VH);
+    put_string__I1F((&__string_213));
     exit(( 1));
   };
-  Self__AKUG=((__FILE_UNIX *)result__BZAC);
-  Self__AKUG->stream__UIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__AKUG->parent_entry_unix__MCF.parent_entry__IED.path__BD)->storage__FQO),"r+b")));
-  if ((! (Self__AKUG->stream__UIRD != (void *)NULL))) {
-    put_string__E1F((&__string_210));
-    put_string__E1F(string_tmp__VH);
-    put_string__E1F((&__string_212));
+  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));
     exit(( 1));
   };
-  if (result__BZAC==NULL) {
-    __tmp__DFC=NULL;
+  if (result__FZAC==NULL) {
+    __tmp__HFC=NULL;
   } else {
-    __tmp__DFC=((void *)result__BZAC);
-  };
-  file__EDC=__tmp__DFC;
-  __tmp__IFC=((__STRING *)buf__CDC)->count__GFC;
-  Self__JCTE=((__FILE_UNIX *)__tmp__DFC);
-  ptr__EUMF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__CDC)->storage__RBS));
-  ptr__EUMF=(void *)((unsigned long)ptr__EUMF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
-  fwrite((void *)((((__UINTEGER_8 *)ptr__EUMF))),(size_t)(1), (size_t)((__tmp__IFC)),(FILE*)((Self__JCTE->stream__UIRD)));
-  Self__SDTE=((__FILE_UNIX *)__tmp__DFC);
-  fclose((FILE*)((Self__SDTE->stream__UIRD)));
-  Self__SDTE->stream__UIRD=NULL;
+    __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;
 }
 
-static void resize__IXZ(__STRING *Self__JXZ,__INTEGER new_count__KXZ)
+static void resize__MXZ(__STRING *Self__NXZ,__INTEGER new_count__OXZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER old_nb_elts__F2ZG,upper__WF3G,Self__UF3G,lower__WN3C;
-  __INTEGER upper__XN3C,Self__STDD;
-  __CHARACTER *Self__E2ZG,*new__H2ZG,*Self__VN3C;
-  if ((! (new_count__KXZ <= Self__JXZ->count__GFC))) {
-    if ((Self__JXZ->capacity__IBS < new_count__KXZ)) {
-      if ((Self__JXZ->capacity__IBS ==  0)) {
-        Self__JXZ->storage__RBS=create__RLEB(new_count__KXZ);
-      } else {
-        Self__E2ZG=((__CHARACTER *)Self__JXZ->storage__RBS);
-        old_nb_elts__F2ZG=Self__JXZ->capacity__IBS;
-        new__H2ZG=((__CHARACTER *)realloc_dynamic__old_size__new_size__BELC(((__POINTER )Self__E2ZG),((__UINTEGER_32 )old_nb_elts__F2ZG),((__UINTEGER_32 )new_count__KXZ)));
-        upper__WF3G=(__INTEGER)(new_count__KXZ -  1);
-        Self__UF3G=old_nb_elts__F2ZG;
-        while ((Self__UF3G <= upper__WF3G)) {
-          new__H2ZG[Self__UF3G]='\0';
-          Self__UF3G=(__INTEGER)(Self__UF3G +  1);
-        };
-        Self__JXZ->storage__RBS=new__H2ZG;
-      };
-      Self__JXZ->capacity__IBS=new_count__KXZ;
-    } else {
-      Self__VN3C=((__CHARACTER *)Self__JXZ->storage__RBS);
-      lower__WN3C=Self__JXZ->count__GFC;
-      upper__XN3C=(__INTEGER)(new_count__KXZ -  1);
-      Self__STDD=lower__WN3C;
-      while ((Self__STDD <= upper__XN3C)) {
-        Self__VN3C[Self__STDD]='\0';
-        Self__STDD=(__INTEGER)(Self__STDD +  1);
-      };
-    };
-  };
-  Self__JXZ->count__GFC=new_count__KXZ;
+  __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;
 }
 
-static void move__to__by__RVCC(__CHARACTER *Self__SVCC,__INTEGER lower__TVCC,__INTEGER upper__UVCC,__INTEGER offset__VVCC)
+static void move__to__by__VVCC(__CHARACTER *Self__WVCC,__INTEGER lower__XVCC,__INTEGER upper__YVCC,__INTEGER offset__ZVCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER Self__ZIHD,Self__IJHD;
-  if ((offset__VVCC !=  0)) {
-    if ((offset__VVCC <  0)) {
-      Self__ZIHD=lower__TVCC;
-      while ((Self__ZIHD <= upper__UVCC)) {
-        Self__SVCC[(__INTEGER)(Self__ZIHD + offset__VVCC)]=Self__SVCC[Self__ZIHD];
-        Self__ZIHD=(__INTEGER)(Self__ZIHD +  1);
+  __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);
       };
     } else {
-      Self__IJHD=upper__UVCC;
-      while ((Self__IJHD >= lower__TVCC)) {
-        Self__SVCC[(__INTEGER)(Self__IJHD + offset__VVCC)]=Self__SVCC[Self__IJHD];
-        Self__IJHD=(__INTEGER)(Self__IJHD -  1);
+      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);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__O5DB(__STRING_CONSTANT *Self__P5DB,void *other__Q5DB)
+static __BOOLEAN __infix_equal_equal__S5DB(__STRING_CONSTANT *Self__T5DB,void *other__U5DB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__Z5DB,__tmp__05DB,i__Q0YB;
-  __BOOLEAN result__S5DB;
-  __CHARACTER *__tmp__LAEB,*__tmp__MAEB,*Self__2ZYB,*other__3ZYB;
-  result__S5DB=FALSE__;
-  __tmp__Z5DB=Self__P5DB->count__DD;
-  if (((struct ___OBJ *)other__Q5DB)->__id==__STRING_CONSTANT__) {
-    __tmp__05DB=((__STRING_CONSTANT *)other__Q5DB)->count__DD;
+  __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;
   } else {
-    __tmp__05DB=((__STRING *)other__Q5DB)->count__GFC;
+    __tmp__45DB=((__STRING *)other__U5DB)->count__KFC;
   };
-  if ((__tmp__Z5DB == __tmp__05DB)) {
-    if ((Self__P5DB->count__DD ==  0)) {
-      result__S5DB=TRUE__;
+  if ((__tmp__35DB == __tmp__45DB)) {
+    if ((Self__T5DB->count__DD ==  0)) {
+      result__W5DB=TRUE__;
     } else {
-      __tmp__LAEB=Self__P5DB->storage__FQO;
-      if (((struct ___OBJ *)other__Q5DB)->__id==__STRING_CONSTANT__) {
-        __tmp__MAEB=((__STRING_CONSTANT *)other__Q5DB)->storage__FQO;
+      __tmp__PAEB=Self__T5DB->storage__JQO;
+      if (((struct ___OBJ *)other__U5DB)->__id==__STRING_CONSTANT__) {
+        __tmp__QAEB=((__STRING_CONSTANT *)other__U5DB)->storage__JQO;
       } else {
-        __tmp__MAEB=((__STRING *)other__Q5DB)->storage__RBS;
+        __tmp__QAEB=((__STRING *)other__U5DB)->storage__VBS;
       };
-      Self__2ZYB=((__CHARACTER *)__tmp__LAEB);
-      other__3ZYB=__tmp__MAEB;
-      i__Q0YB=(__INTEGER)(Self__P5DB->count__DD -  1);
-      while (((i__Q0YB >=  0) && (Self__2ZYB[i__Q0YB] == ((__CHARACTER *)other__3ZYB)[i__Q0YB]))) {
-        i__Q0YB=(__INTEGER)(i__Q0YB -  1);
+      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);
       };
-      result__S5DB=(i__Q0YB <  0);
+      result__W5DB=(i__U0YB <  0);
     };
   };
-  return(result__S5DB);
+  return(result__W5DB);
 }
 
-static void* at__AL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__BL4,void *k__CL4)
+static void* at__EL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FL4,void *k__GL4)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__HN3G;
-  __INTEGER result__GN3G,__tmp__IN3G,Self__JN3G;
-  void *node__ML4;
-  Self__HN3G=((__STRING_CONSTANT *)k__CL4);
-  result__GN3G= 0;
-  __tmp__IN3G=Self__HN3G->count__DD;
-  Self__JN3G= 1;
-  while ((Self__JN3G <= __tmp__IN3G)) {
-    result__GN3G=(__INTEGER)((__INTEGER)( 5 * result__GN3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HN3G->storage__FQO)[(__INTEGER)(Self__JN3G -  1)])));
-    Self__JN3G=(__INTEGER)(Self__JN3G +  1);
-  };
-  if ((result__GN3G <  0)) {
-    result__GN3G=(__INTEGER)(~ result__GN3G);
-  };
-  node__ML4=((void **)Self__BL4->buckets__PCT)[(__INTEGER)(result__GN3G % Self__BL4->capacity__KCT)];
-  while ((! __infix_equal_equal__O5DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ML4)->key__1CT,k__CL4))) {
-    node__ML4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ML4)->next__GDT;
-  };
-  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ML4)->item__XX3);
+  __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);
 }
 
-static void go_on__SAC(void *obj__UAC)
+static void go_on__WAC(void *obj__YAC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __POINTER ptr__UEG,ptr_table__1N4G,next__0N4G,result__2N4G;
-  __POINTER ptr_table__AO4G,next__5N4G,result__BO4G,ptr__FO4G;
-  __POINTER ptr_table__NO4G,next__MO4G,result__OO4G,ptr_table__SO4G;
-  __POINTER next__RO4G,result__TO4G,ptr__IFID,ptr_table__XO4G;
-  __POINTER next__WO4G,result__YO4G,ptr_table__2O4G,next__1O4G;
-  __POINTER result__3O4G,ptr__EP4G,ptr_table__NP4G,next__MP4G;
-  __POINTER result__OP4G,ptr_table__SP4G,next__RP4G,result__TP4G;
-  __POINTER ptr__IQ4G,ptr_table__RQ4G,next__QQ4G,result__SQ4G;
-  __POINTER ptr_table__WQ4G,next__VQ4G,result__XQ4G,ptr__1Q4G;
-  __POINTER ptr_table__HR4G,next__GR4G,result__IR4G,ptr_table__MR4G;
-  __POINTER next__LR4G,result__NR4G,ptr__RR4G,ptr_table__0R4G;
-  __POINTER next__ZR4G,result__1R4G,ptr_table__5R4G,next__4R4G;
-  __POINTER result__AS4G,ptr__ES4G,ptr_table__NS4G,next__MS4G;
-  __POINTER result__OS4G,ptr_table__SS4G,next__RS4G,result__TS4G;
-  __INTEGER typ_id__ZEG,new_capacity__DHY,pos_sec__BXC,old_derive__CXC;
-  __INTEGER typ_id__GO4G,h__G0FC,idx__H0FC,idx__4CID,new_capacity__5CID;
-  __INTEGER i__ADID,typ_id__NFID,old_pos__CXOB,old_derive__DXOB;
-  __INTEGER typ_id__FP4G,new_capacity__4LHC,other_upper__3LHC;
-  __INTEGER Self__G1WD,new_capacity__JUHC,__tmp__NVHC,__tmp__0ITD;
-  __INTEGER Self__00WE,__tmp__CEHC,typ_id__JQ4G,typ_id__2Q4G;
-  __INTEGER typ_id__SR4G,typ_id__FS4G,start__MN3G,end__LN3G,len__NN3G;
-  __INTEGER __tmp__ON3G,__tmp__QN3G,Self__RN3G,__tmp__YJ3B,Self__FZPC;
-  __INTEGER start__VN3G,end__UN3G,len__WN3G,__tmp__XN3G,__tmp__ZN3G;
-  __INTEGER Self__0N3G;
-  __UINTEGER_32 sz__WEG,a__0M1G,new_size__1M1G,t__5M1G,a__4M1G;
-  __UINTEGER_32 new_size__DO4G,lab_type__CO4G,sz__HO4G,a__IO4G;
-  __UINTEGER_32 new_size__JO4G,t__KO4G,a__LO4G,new_size__VO4G;
-  __UINTEGER_32 lab_type__UO4G,sz__KFID,a__QN1G,new_size__RN1G,t__VN1G;
-  __UINTEGER_32 a__UN1G,new_size__5O4G,lab_type__4O4G,sz__GP4G,a__HP4G;
-  __UINTEGER_32 new_size__IP4G,t__JP4G,a__KP4G,new_size__VP4G;
-  __UINTEGER_32 lab_type__UP4G,sz__KQ4G,a__LQ4G,new_size__MQ4G,t__NQ4G;
-  __UINTEGER_32 a__OQ4G,new_size__ZQ4G,lab_type__YQ4G,sz__3Q4G,a__4Q4G;
-  __UINTEGER_32 new_size__5Q4G,t__AR4G,a__BR4G,new_size__PR4G;
-  __UINTEGER_32 lab_type__OR4G,sz__TR4G,a__UR4G,new_size__VR4G,t__WR4G;
-  __UINTEGER_32 a__XR4G,new_size__CS4G,lab_type__BS4G,sz__GS4G,a__HS4G;
-  __UINTEGER_32 new_size__IS4G,t__JS4G,a__KS4G,new_size__VS4G;
-  __UINTEGER_32 lab_type__US4G;
-  __POSITION pos__Z2MG,pos__12MG,pos__32MG,pos__I3MG,pos__K3MG;
-  __POSITION pos__N3MG,pos__P3MG,p__LP4G,__tmp__UEHC,__tmp__BFHC;
-  __POSITION pos__3BNG,pos__5BNG,pos__BCNG,pos__DCNG,pos__BZID;
-  __POSITION pos__HCNG,__tmp__XDBD,__tmp__5DBD,__tmp__TEBD,__tmp__2EBD;
-  __POSITION pos__RCNG,__tmp__F5OB,__tmp__H5OB,pos__MDNG,pos__ODNG;
-  void *n__OSOB,*n__KDBD,*__tmp__04OB,*__tmp__QFZB;
-  __SECTION_ *Self__BNUG,*Self__CNUG,*result__EO4G,*Self__ZQUG;
-  __SECTION_ *Self__RBFC;
-  void *__tmp__H1C,*s__EXOB,*result__QBZB,*__tmp__10OB,*__tmp__BJ3B;
-  void *s__OFZB,*__tmp__4FZB;
-  void *__tmp__J1C,*result__RQEC,*result__KWOB,*sec__LDBD;
-  void *t__4WOB;
-  void *arg__PBZB,*__tmp__BEHC,*__tmp__TEHC,*__tmp__AFHC;
-  __ITM_ARG *result__DP4G,*result__HQ4G;
-  __ITM_SLOT_OPERATOR *Self__YDHC,*Self__M4FC,*Self__DGHC;
-  void *tm__O4FC,*__tmp__X4FC;
-  void *expr__UI3B;
-  void *__tmp__CJ3B;
-  __ITM_SLOT *result__0Q4G,*Self__CR4G;
-  __ITM_PROTOTYPE *result__QR4G;
-  __ITM_READ_ARG1 *result__DS4G;
-  __STRING *Self__PN3G,*Self__YN3G;
-  __PROTOTYPE *Self__NFZB;
-  __HASHED_SEToSTRING_CONSTANTo *result__TEG,*Self__MHT,*Self__TJ3B;
-  void *t__KXC,*k__GQEC,*k__5ZFC,*lt__5WOB;
-  __BOOLEAN result__FQAH,result__HQAH,result__JBE,result__4FEB;
-  __BOOLEAN __tmp__LGEB,result__HD5,result__AN1G,result__GX5;
-  __BOOLEAN __tmp__DIEB,result__3UAB,__tmp__EIEB,__tmp__HIEB,__tmp__01C;
-  __BOOLEAN __tmp__P1C,result__3WOB,result__AP4G,result__WP4G;
-  __BOOLEAN __tmp__ADZB,result__ZP4G,__tmp__XUHC,__tmp__GEHC;
-  __BOOLEAN result__4P4G,__tmp__XYOB,result__BQ4G,result__EQ4G;
-  __BOOLEAN result__WS4G,__tmp__Q3OB,__tmp__R3OB;
-  __CHARACTER result__YMUG,result__ZMUG,result__0MUG,result__1MUG;
-  __CHARACTER result__2MUG,result__3MUG,result__4MUG,result__5MUG;
-  __CHARACTER result__ANUG,affect__BXOB,result__BP4G,result__XP4G;
-  __CHARACTER result__0P4G,result__5P4G,result__CQ4G,result__FQ4G;
-  __CHARACTER result__XS4G,result__DRUG,result__ERUG,result__FRUG;
-  __CHARACTER result__GRUG,result__TRUG;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__FQEC;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__3ZFC;
-  void *node__QQEC,*node__I0FC,*node1__CDID,*node2__DDID,*__tmp__W1FC;
-  void **old_buckets__BDID;
-  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__HFID;
-  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__ZDTD;
-  void *result__AU1B,*result__CU4B,*larg__MDBD;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__GCZC,*Self__2CZC;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__HUHC;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__1LHC,*Self__AO1G,*Self__JO1G;
-  void **__tmp__RMHC,**__tmp__TMHC,**Self__UGSD;
-  void **__tmp__MVHC,**new__GITD;
-  void *__tmp__Y4OB,*__tmp__PFZB;
-  void **__tmp__VJ3B,**Self__DHHC;
-  object__ZAC=obj__UAC;
-  source__5AC=((__PROTOTYPE *)obj__UAC)->source__3AC;
-  position__CBC= 1;
-  pos_cur__FBC= 1;
-  pos_line__GBC= 1;
-  pos_col__HBC= 0;
-  is_catch_comment__QWC=FALSE__;
-  if (is_shorter__TY) {
-    is_active_short__OBC=TRUE__;
-    key_comment_default__QBC=(&__string_129);
-    short_derive__RBC= 0;
-    copy__JCS(output_code__SI,source__5AC);
-    result__TEG=NULL;
-    ptr__UEG=((__POINTER )(NULL));
-    typ_id__ZEG= 0;
-    sz__WEG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
-    if ((sz__WEG ==  0)) {
-      result__TEG=HASHED_SEToSTRING_CONSTANTo__;
-    } else {
-      typ_id__ZEG=__HASHED_SEToSTRING_CONSTANTo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__WEG);
-      if ((typ_id__ZEG == (__INTEGER)(-  1))) {
-        a__0M1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__1M1G=(__UINTEGER_32)((__UINTEGER_32)(sz__WEG + a__0M1G) & (__UINTEGER_32)(~ a__0M1G));
-        ptr_table__1N4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1M1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__0N4G=((__POINTER )(NULL));
-        result__2N4G=((__POINTER *)ptr_table__1N4G)[ 0];
-        if ((result__2N4G == (void *)NULL)) {
-          result__2N4G=new_lab__2QJ(new_size__1M1G);
-          next__0N4G=(void *)((unsigned long)result__2N4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1M1G)));
-          ((__POINTER *)next__0N4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1N4G)[ 0]=next__0N4G;
-        } else {
-          next__0N4G=((__POINTER *)result__2N4G)[ 0];
-          if ((next__0N4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2N4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1M1G <<  1)) <=  4096)) {
-              next__0N4G=(void *)((unsigned long)result__2N4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1M1G)));
+  __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)));
             } else {
-              next__0N4G=new_lab__2QJ(new_size__1M1G);
-            };
-            ((__POINTER *)next__0N4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1N4G)[ 0]=next__0N4G;
-          } else {
-            ((__POINTER *)result__2N4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0N4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2N4G=next__0N4G;
-          };
-        };
-        ptr__UEG=result__2N4G;
-      } else {
-        t__5M1G=((__UINTEGER_32 )typ_id__ZEG);
-        a__4M1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__DO4G=(__UINTEGER_32)((__UINTEGER_32)(sz__WEG + a__4M1G) & (__UINTEGER_32)(~ a__4M1G));
-        ptr_table__AO4G=((__POINTER )(&(table_type[(t__5M1G)])));
-        lab_type__CO4G=(__UINTEGER_32)(t__5M1G |  1);
-        next__5N4G=((__POINTER )(NULL));
-        result__BO4G=((__POINTER *)ptr_table__AO4G)[ 0];
-        if ((result__BO4G == (void *)NULL)) {
-          result__BO4G=new_lab__2QJ(lab_type__CO4G);
-          next__5N4G=(void *)((unsigned long)result__BO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DO4G)));
-          ((__POINTER *)next__5N4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AO4G)[ 0]=next__5N4G;
-        } else {
-          next__5N4G=((__POINTER *)result__BO4G)[ 0];
-          if ((next__5N4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BO4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DO4G <<  1)) <=  4096)) {
-              next__5N4G=(void *)((unsigned long)result__BO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DO4G)));
+              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)));
             } else {
-              next__5N4G=new_lab__2QJ(lab_type__CO4G);
+              next__HRAH=new_lab__ARJ(lab_type__KRAH);
             };
-            ((__POINTER *)next__5N4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AO4G)[ 0]=next__5N4G;
+            ((__POINTER *)next__HRAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IRAH)[ 0]=next__HRAH;
           } else {
-            ((__POINTER *)result__BO4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__5N4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BO4G=next__5N4G;
+            ((__POINTER *)result__JRAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HRAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__JRAH=next__HRAH;
           };
         };
-        ptr__UEG=result__BO4G;
+        ptr__YEG=result__JRAH;
       };
-      result__TEG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__UEG);
-      *(result__TEG) = *(HASHED_SEToSTRING_CONSTANTo__);
+      result__XEG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__YEG);
+      *(result__XEG) = *(HASHED_SEToSTRING_CONSTANTo__);
     };
-    Self__MHT=((__HASHED_SEToSTRING_CONSTANTo *)result__TEG);
-    new_capacity__DHY=prime_number_ceiling__H41( 53);
-    Self__MHT->buckets__5DV=create__D23(new_capacity__DHY);
-    Self__MHT->capacity__0HT=new_capacity__DHY;
-    Self__MHT->count__IHY= 0;
-    short_local__ZBC=result__TEG;
-    short__token__to__1AD((&__string_117), 1, 1);
+    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);
   };
-  t__KXC=NULL;
-  read_space__NRD();
-  pos_sec__BXC=position__CBC;
-  old_derive__CXC=short_derive__RBC;
-  result__FQAH=read_word__APF((&__string_4));
-  if (is_shorter__TY) {
-    if (result__FQAH) {
-      short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+  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);
     };
   };
-  if ((! result__FQAH)) {
-    pos__Z2MG=current_position__ZWF();
-    put_error__text__0MG( 0,(&__string_213));
-    put_position__EOG(pos__Z2MG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  key_comment_default__QBC=(&__string_127);
+  key_comment_default__UBC=(&__string_127);
   if (is_shorter2__VI) {
-    is_catch_comment__QWC=FALSE__;
+    is_catch_comment__UWC=FALSE__;
   };
-  result__HQAH=read_word__APF((&__string_22));
-  if (is_shorter__TY) {
-    if (result__HQAH) {
+  result__WUCH=read_word__EPF((&__string_22));
+  if (is_shorter__WY) {
+    if (result__WUCH) {
       if (((void *)(&__string_22) == (void *)(&__string_4))) {
-        short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
       } else {
-        short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
       };
     };
   };
-  if ((! result__HQAH)) {
-    pos__12MG=current_position__ZWF();
-    put_error__text__0MG( 0,(&__string_214));
-    put_position__EOG(pos__12MG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  if ((! read_slot_header__CDE(TRUE__))) {
-    pos__32MG=current_position__ZWF();
-    put_error__text__0MG( 0,(&__string_215));
-    put_position__EOG(pos__32MG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__CDE(FALSE__)) {
+  while (read_slot_header__GDE(FALSE__)) {
   };
-  while_do__N4E:
+  while_do__R4E:
   {
-    result__JBE=read_word__APF((&__string_4));
-    if (is_shorter__TY) {
-      if (result__JBE) {
-        short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+    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);
       };
     };
-    if (result__JBE) {
-      result__4FEB=FALSE__;
-      if ((! read_space__NRD())) {
-        __tmp__LGEB=TRUE__;
+    if (result__NBE) {
+      result__CGEB=FALSE__;
+      if ((! read_space__RRD())) {
+        __tmp__PGEB=TRUE__;
       } else {
-        result__YMUG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__YMUG=((__CHARACTER )(( 0)));
+        result__TKWG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__TKWG=((__CHARACTER )(( 0)));
         } else {
-          result__YMUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__TKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        result__HD5=FALSE__;
-        if ((((__INTEGER_8 )result__YMUG) >= ((__INTEGER_8 )'A'))) {
-          result__HD5=(((__INTEGER_8 )result__YMUG) <= ((__INTEGER_8 )'Z'));
+        result__LD5=FALSE__;
+        if ((((__INTEGER_8 )result__TKWG) >= ((__INTEGER_8 )'A'))) {
+          result__LD5=(((__INTEGER_8 )result__TKWG) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__LGEB=(! result__HD5);
+        __tmp__PGEB=(! result__LD5);
       };
-      if (__tmp__LGEB) {
-        result__4FEB=FALSE__;
+      if (__tmp__PGEB) {
+        result__CGEB=FALSE__;
       } else {
-        ((__STRING *)string_tmp__VH)->count__GFC= 0;
-        result__ZMUG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__ZMUG=((__CHARACTER )(( 0)));
+        ((__STRING *)string_tmp__VH)->count__KFC= 0;
+        result__UKWG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__UKWG=((__CHARACTER )(( 0)));
         } else {
-          result__ZMUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__UKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        add_last__JLT(string_tmp__VH,result__ZMUG);
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__0MUG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__0MUG=((__CHARACTER )(( 0)));
+        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)));
         } else {
-          result__0MUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__VKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        result__AN1G=FALSE__;
-        if ((((__INTEGER_8 )result__0MUG) >= ((__INTEGER_8 )'a'))) {
-          result__AN1G=(((__INTEGER_8 )result__0MUG) <= ((__INTEGER_8 )'z'));
+        result__WM3G=FALSE__;
+        if ((((__INTEGER_8 )result__VKWG) >= ((__INTEGER_8 )'a'))) {
+          result__WM3G=(((__INTEGER_8 )result__VKWG) <= ((__INTEGER_8 )'z'));
         };
-        if (result__AN1G) {
-          result__1MUG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__1MUG=((__CHARACTER )(( 0)));
+        if (result__WM3G) {
+          result__WKWG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__WKWG=((__CHARACTER )(( 0)));
           } else {
-            result__1MUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__WKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__1MUG);
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          while_do__PXEF:
+          add_last__NLT(string_tmp__VH,result__WKWG);
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          while_do__5CFF:
           {
-            result__2MUG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__2MUG=((__CHARACTER )(( 0)));
+            result__XKWG='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__XKWG=((__CHARACTER )(( 0)));
             } else {
-              result__2MUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__XKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__2MUG != ((__CHARACTER )(( 0))))) {
-              result__3MUG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__3MUG=((__CHARACTER )(( 0)));
+            if ((result__XKWG != ((__CHARACTER )(( 0))))) {
+              result__YKWG='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__YKWG=((__CHARACTER )(( 0)));
               } else {
-                result__3MUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__YKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              result__GX5=FALSE__;
-              if ((((__INTEGER_8 )result__3MUG) >= ((__INTEGER_8 )'a'))) {
-                result__GX5=(((__INTEGER_8 )result__3MUG) <= ((__INTEGER_8 )'z'));
+              result__KX5=FALSE__;
+              if ((((__INTEGER_8 )result__YKWG) >= ((__INTEGER_8 )'a'))) {
+                result__KX5=(((__INTEGER_8 )result__YKWG) <= ((__INTEGER_8 )'z'));
               };
-              if (result__GX5) {
-                __tmp__DIEB=TRUE__;
+              if (result__KX5) {
+                __tmp__HIEB=TRUE__;
               } else {
-                result__4MUG='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__4MUG=((__CHARACTER )(( 0)));
+                result__ZKWG='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__ZKWG=((__CHARACTER )(( 0)));
                 } else {
-                  result__4MUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__ZKWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                result__3UAB=FALSE__;
-                if ((((__INTEGER_8 )result__4MUG) >= ((__INTEGER_8 )'0'))) {
-                  result__3UAB=(((__INTEGER_8 )result__4MUG) <= ((__INTEGER_8 )'9'));
+                result__BVAB=FALSE__;
+                if ((((__INTEGER_8 )result__ZKWG) >= ((__INTEGER_8 )'0'))) {
+                  result__BVAB=(((__INTEGER_8 )result__ZKWG) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__DIEB=result__3UAB;
+                __tmp__HIEB=result__BVAB;
               };
-              if (__tmp__DIEB) {
-                __tmp__EIEB=TRUE__;
+              if (__tmp__HIEB) {
+                __tmp__IIEB=TRUE__;
               } else {
-                result__5MUG='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__5MUG=((__CHARACTER )(( 0)));
+                result__0KWG='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__0KWG=((__CHARACTER )(( 0)));
                 } else {
-                  result__5MUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__0KWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                __tmp__EIEB=(result__5MUG == '_');
+                __tmp__IIEB=(result__0KWG == '_');
               };
-              __tmp__HIEB=__tmp__EIEB;
+              __tmp__LIEB=__tmp__IIEB;
             } else {
-              __tmp__HIEB=FALSE__;
+              __tmp__LIEB=FALSE__;
             };
-            if (__tmp__HIEB) {
-              result__ANUG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__ANUG=((__CHARACTER )(( 0)));
+            if (__tmp__LIEB) {
+              result__1KWG='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__1KWG=((__CHARACTER )(( 0)));
               } else {
-                result__ANUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__1KWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              add_last__JLT(string_tmp__VH,result__ANUG);
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              goto while_do__PXEF;
+              add_last__NLT(string_tmp__VH,result__1KWG);
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              goto while_do__5CFF;
             };
           };
-          last_string__YZC=get__YVB(string_tmp__VH);
-          result__4FEB=TRUE__;
-          short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          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);
         } else {
-          position__CBC=(__INTEGER)(position__CBC -  1);
-          result__4FEB=FALSE__;
+          position__GBC=(__INTEGER)(position__GBC -  1);
+          result__CGEB=FALSE__;
         };
       };
-      if (result__4FEB) {
-        n__OSOB=last_string__YZC;
-        if ((! (((((((((void *)n__OSOB == (void *)(&__string_23)) || ((void *)n__OSOB == (void *)(&__string_24))) || ((void *)n__OSOB == (void *)(&__string_25))) || ((void *)n__OSOB == (void *)(&__string_26))) || ((void *)n__OSOB == (void *)(&__string_27))) || ((void *)n__OSOB == (void *)(&__string_28))) || ((void *)n__OSOB == (void *)(&__string_29))) || ((void *)n__OSOB == (void *)(&__string_30))))) {
-          pos__I3MG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_216));
-          put_position__EOG(pos__I3MG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        last_section__H0C=get_name__KUOB(last_string__YZC);
-        if (((void *)((__SECTION_ *)last_section__H0C)->name__SYDC == (void *)(&__string_28))) {
-          __tmp__01C=TRUE__;
+        last_section__L0C=get_name__OUOB(last_string__2ZC);
+        if (((void *)((__SECTION_ *)last_section__L0C)->name__WYDC == (void *)(&__string_28))) {
+          __tmp__41C=TRUE__;
         } else {
-          Self__BNUG=((__SECTION_ *)last_section__H0C);
-          if (((((void *)Self__BNUG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__BNUG->name__SYDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__ZAC)->last_slot__40C != (void *)NULL))) {
-            __tmp__H1C=((__PROTOTYPE *)object__ZAC)->last_slot__40C;
-            if (((struct ___OBJ *)__tmp__H1C)->__id==__ITM_SLOT__) {
-              __tmp__J1C=((__ITM_SLOT *)__tmp__H1C)->id_section__I1C;
+          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;
             } else {
-              __tmp__J1C=((__ITM_SLOT_OPERATOR *)__tmp__H1C)->parent_itm_slot__4T5B.id_section__I1C;
+              __tmp__N1C=((__ITM_SLOT_OPERATOR *)__tmp__L1C)->parent_itm_slot__CU5B.id_section__M1C;
             };
-            Self__CNUG=((__SECTION_ *)__tmp__J1C);
-            __tmp__P1C=(! (((void *)Self__CNUG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__CNUG->name__SYDC == (void *)(&__string_24))));
+            Self__3KWG=((__SECTION_ *)__tmp__N1C);
+            __tmp__T1C=(! (((void *)Self__3KWG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__3KWG->name__WYDC == (void *)(&__string_24))));
           } else {
-            __tmp__P1C=FALSE__;
+            __tmp__T1C=FALSE__;
           };
-          if (__tmp__P1C) {
-            pos__K3MG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_217));
-            put_position__EOG(pos__K3MG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          __tmp__01C=__tmp__P1C;
+          __tmp__41C=__tmp__T1C;
         };
-        if ((! __tmp__01C)) {
-          if ((((((void *)((__SECTION_ *)last_section__H0C)->name__SYDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__ZAC)->type_style__H2C == (void *)(&__string_9))) && ((void *)((__PROTOTYPE *)object__ZAC)->parent_named__5.name__LI != (void *)(&__string_42))) && ((void *)((__PROTOTYPE *)object__ZAC)->parent_named__5.name__LI != (void *)(&__string_43)))) {
-            pos__N3MG=current_position__ZWF();
-            put_error__text__0MG( 2,(&__string_218));
-            put_position__EOG(pos__N3MG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        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)) {
               exit(( 1));
             };
           };
         };
       } else {
-        t__KXC=read_type_list__YLO(PARSER__,TRUE__);
-        if (((void *)t__KXC == (void *)NULL)) {
-          pos__P3MG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_216));
-          put_position__EOG(pos__P3MG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        Self__FQEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__OWOB);
-        k__GQEC=t__KXC;
-        result__RQEC=NULL;
-        node__QQEC=((void **)Self__FQEC->buckets__YQEC)[(__INTEGER)(hash_code__540(t__KXC) % Self__FQEC->capacity__TQEC)];
-        while ((! (((void *)node__QQEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__QQEC)->key__EREC == (void *)k__GQEC)))) {
-          node__QQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__QQEC)->next__PREC;
-        };
-        if (((void *)node__QQEC != (void *)NULL)) {
-          result__RQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__QQEC)->item__XREC;
-        };
-        result__KWOB=result__RQEC;
-        if (((void *)result__RQEC == (void *)NULL)) {
-          result__EO4G=NULL;
-          ptr__FO4G=((__POINTER )(NULL));
-          typ_id__GO4G= 0;
-          sz__HO4G=((__UINTEGER_32 )sizeof(__SECTION_));
-          if ((sz__HO4G ==  0)) {
-            result__EO4G=SECTION___;
-          } else {
-            typ_id__GO4G=__SECTION___;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__HO4G);
-            if ((typ_id__GO4G == (__INTEGER)(-  1))) {
-              a__IO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__JO4G=(__UINTEGER_32)((__UINTEGER_32)(sz__HO4G + a__IO4G) & (__UINTEGER_32)(~ a__IO4G));
-              ptr_table__NO4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JO4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__MO4G=((__POINTER )(NULL));
-              result__OO4G=((__POINTER *)ptr_table__NO4G)[ 0];
-              if ((result__OO4G == (void *)NULL)) {
-                result__OO4G=new_lab__2QJ(new_size__JO4G);
-                next__MO4G=(void *)((unsigned long)result__OO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JO4G)));
-                ((__POINTER *)next__MO4G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NO4G)[ 0]=next__MO4G;
+        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;
               } else {
-                next__MO4G=((__POINTER *)result__OO4G)[ 0];
-                if ((next__MO4G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OO4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__JO4G <<  1)) <=  4096)) {
-                    next__MO4G=(void *)((unsigned long)result__OO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JO4G)));
+                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)));
                   } else {
-                    next__MO4G=new_lab__2QJ(new_size__JO4G);
+                    next__URAH=new_lab__ARJ(new_size__RRAH);
                   };
-                  ((__POINTER *)next__MO4G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__NO4G)[ 0]=next__MO4G;
+                  ((__POINTER *)next__URAH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VRAH)[ 0]=next__URAH;
                 } else {
-                  ((__POINTER *)result__OO4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MO4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__OO4G=next__MO4G;
+                  ((__POINTER *)result__WRAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__URAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WRAH=next__URAH;
                 };
               };
-              ptr__FO4G=result__OO4G;
+              ptr__NRAH=result__WRAH;
             } else {
-              t__KO4G=((__UINTEGER_32 )typ_id__GO4G);
-              a__LO4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__VO4G=(__UINTEGER_32)((__UINTEGER_32)(sz__HO4G + a__LO4G) & (__UINTEGER_32)(~ a__LO4G));
-              ptr_table__SO4G=((__POINTER )(&(table_type[(t__KO4G)])));
-              lab_type__UO4G=(__UINTEGER_32)(t__KO4G |  1);
-              next__RO4G=((__POINTER )(NULL));
-              result__TO4G=((__POINTER *)ptr_table__SO4G)[ 0];
-              if ((result__TO4G == (void *)NULL)) {
-                result__TO4G=new_lab__2QJ(lab_type__UO4G);
-                next__RO4G=(void *)((unsigned long)result__TO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VO4G)));
-                ((__POINTER *)next__RO4G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SO4G)[ 0]=next__RO4G;
+              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;
               } else {
-                next__RO4G=((__POINTER *)result__TO4G)[ 0];
-                if ((next__RO4G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TO4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VO4G <<  1)) <=  4096)) {
-                    next__RO4G=(void *)((unsigned long)result__TO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VO4G)));
+                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)));
                   } else {
-                    next__RO4G=new_lab__2QJ(lab_type__UO4G);
+                    next__ZRAH=new_lab__ARJ(lab_type__2RAH);
                   };
-                  ((__POINTER *)next__RO4G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SO4G)[ 0]=next__RO4G;
+                  ((__POINTER *)next__ZRAH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0RAH)[ 0]=next__ZRAH;
                 } else {
-                  ((__POINTER *)result__TO4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RO4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TO4G=next__RO4G;
+                  ((__POINTER *)result__1RAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZRAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1RAH=next__ZRAH;
                 };
               };
-              ptr__FO4G=result__TO4G;
-            };
-            result__EO4G=((__SECTION_ *)ptr__FO4G);
-            *(result__EO4G) = *(SECTION___);
-          };
-          result__KWOB=result__EO4G;
-          ((__SECTION_ *)result__EO4G)->name__SYDC=NULL;
-          Self__3ZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__OWOB);
-          k__5ZFC=t__KXC;
-          h__G0FC=hash_code__540(t__KXC);
-          idx__H0FC=(__INTEGER)(h__G0FC % Self__3ZFC->capacity__TQEC);
-          node__I0FC=((void **)Self__3ZFC->buckets__YQEC)[idx__H0FC];
-          while ((! (((void *)node__I0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__I0FC)->key__EREC == (void *)k__5ZFC)))) {
-            node__I0FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__I0FC)->next__PREC;
-          };
-          if (((void *)node__I0FC == (void *)NULL)) {
-            if ((Self__3ZFC->capacity__TQEC == Self__3ZFC->count__J1FC)) {
-              idx__4CID= 0;
-              node1__CDID=NULL;
-              node2__DDID=NULL;
-              old_buckets__BDID=Self__3ZFC->buckets__YQEC;
-              new_capacity__5CID=prime_number_ceiling__H41((__INTEGER)(Self__3ZFC->capacity__TQEC +  1));
-              Self__3ZFC->buckets__YQEC=create__QAYC(new_capacity__5CID);
-              i__ADID=(__INTEGER)(Self__3ZFC->capacity__TQEC -  1);
-              Self__3ZFC->capacity__TQEC=new_capacity__5CID;
-              while ((i__ADID >=  0)) {
-                node1__CDID=((void **)old_buckets__BDID)[i__ADID];
-                while (((void *)node1__CDID != (void *)NULL)) {
-                  node2__DDID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__CDID)->next__PREC;
-                  idx__4CID=(__INTEGER)(hash_code__540(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__CDID)->key__EREC) % Self__3ZFC->capacity__TQEC);
-                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__CDID)->next__PREC=((void **)Self__3ZFC->buckets__YQEC)[idx__4CID];
-                  ((void **)Self__3ZFC->buckets__YQEC)[idx__4CID]=node1__CDID;
-                  node1__CDID=node2__DDID;
+              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;
                 };
-                i__ADID=(__INTEGER)(i__ADID -  1);
+                i__EDID=(__INTEGER)(i__EDID -  1);
               };
-              idx__H0FC=(__INTEGER)(h__G0FC % Self__3ZFC->capacity__TQEC);
-            };
-            __tmp__W1FC=((void **)Self__3ZFC->buckets__YQEC)[idx__H0FC];
-            result__HFID=NULL;
-            ptr__IFID=((__POINTER )(NULL));
-            typ_id__NFID= 0;
-            sz__KFID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
-            if ((sz__KFID ==  0)) {
-              result__HFID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              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__;
             } else {
-              typ_id__NFID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
-              clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__KFID);
-              if ((typ_id__NFID == (__INTEGER)(-  1))) {
-                a__QN1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__RN1G=(__UINTEGER_32)((__UINTEGER_32)(sz__KFID + a__QN1G) & (__UINTEGER_32)(~ a__QN1G));
-                ptr_table__XO4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RN1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__WO4G=((__POINTER )(NULL));
-                result__YO4G=((__POINTER *)ptr_table__XO4G)[ 0];
-                if ((result__YO4G == (void *)NULL)) {
-                  result__YO4G=new_lab__2QJ(new_size__RN1G);
-                  next__WO4G=(void *)((unsigned long)result__YO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RN1G)));
-                  ((__POINTER *)next__WO4G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XO4G)[ 0]=next__WO4G;
+              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;
                 } else {
-                  next__WO4G=((__POINTER *)result__YO4G)[ 0];
-                  if ((next__WO4G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YO4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__RN1G <<  1)) <=  4096)) {
-                      next__WO4G=(void *)((unsigned long)result__YO4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RN1G)));
+                  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)));
                     } else {
-                      next__WO4G=new_lab__2QJ(new_size__RN1G);
+                      next__4RAH=new_lab__ARJ(new_size__HN3G);
                     };
-                    ((__POINTER *)next__WO4G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__XO4G)[ 0]=next__WO4G;
+                    ((__POINTER *)next__4RAH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__5RAH)[ 0]=next__4RAH;
                   } else {
-                    ((__POINTER *)result__YO4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WO4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__YO4G=next__WO4G;
+                    ((__POINTER *)result__ASAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__ASAH=next__4RAH;
                   };
                 };
-                ptr__IFID=result__YO4G;
+                ptr__MFID=result__ASAH;
               } else {
-                t__VN1G=((__UINTEGER_32 )typ_id__NFID);
-                a__UN1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__5O4G=(__UINTEGER_32)((__UINTEGER_32)(sz__KFID + a__UN1G) & (__UINTEGER_32)(~ a__UN1G));
-                ptr_table__2O4G=((__POINTER )(&(table_type[(t__VN1G)])));
-                lab_type__4O4G=(__UINTEGER_32)(t__VN1G |  1);
-                next__1O4G=((__POINTER )(NULL));
-                result__3O4G=((__POINTER *)ptr_table__2O4G)[ 0];
-                if ((result__3O4G == (void *)NULL)) {
-                  result__3O4G=new_lab__2QJ(lab_type__4O4G);
-                  next__1O4G=(void *)((unsigned long)result__3O4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5O4G)));
-                  ((__POINTER *)next__1O4G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__2O4G)[ 0]=next__1O4G;
+                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;
                 } else {
-                  next__1O4G=((__POINTER *)result__3O4G)[ 0];
-                  if ((next__1O4G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3O4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__5O4G <<  1)) <=  4096)) {
-                      next__1O4G=(void *)((unsigned long)result__3O4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5O4G)));
+                  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)));
                     } else {
-                      next__1O4G=new_lab__2QJ(lab_type__4O4G);
+                      next__DSAH=new_lab__ARJ(lab_type__GSAH);
                     };
-                    ((__POINTER *)next__1O4G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__2O4G)[ 0]=next__1O4G;
+                    ((__POINTER *)next__DSAH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__ESAH)[ 0]=next__DSAH;
                   } else {
-                    ((__POINTER *)result__3O4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1O4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__3O4G=next__1O4G;
+                    ((__POINTER *)result__FSAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DSAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__FSAH=next__DSAH;
                   };
                 };
-                ptr__IFID=result__3O4G;
+                ptr__MFID=result__FSAH;
               };
-              result__HFID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__IFID);
-              *(result__HFID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__LFID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__MFID);
+              *(result__LFID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            Self__ZDTD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__HFID);
-            Self__ZDTD->item__XREC=result__EO4G;
-            Self__ZDTD->key__EREC=t__KXC;
-            Self__ZDTD->next__PREC=__tmp__W1FC;
-            node__I0FC=result__HFID;
-            ((void **)Self__3ZFC->buckets__YQEC)[idx__H0FC]=result__HFID;
-            Self__3ZFC->count__J1FC=(__INTEGER)(Self__3ZFC->count__J1FC +  1);
+            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);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__I0FC)->item__XREC=result__EO4G;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__M0FC)->item__1REC=result__MRAH;
           };
         };
-        last_section__H0C=result__KWOB;
+        last_section__L0C=result__OWOB;
       };
       do {
-        result__3WOB=FALSE__;
-        t__4WOB=NULL;
-        lt__5WOB=NULL;
-        affect__BXOB='\0';
-        old_pos__CXOB= 0;
-        old_derive__DXOB= 0;
-        s__EXOB=NULL;
-        if ((read_style__HRF() != ' ')) {
-          key_comment_default__QBC=(&__string_128);
+        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);
           if (is_shorter2__VI) {
-            is_catch_comment__QWC=TRUE__;
-            ((__STRING *)last_comment__K0D)->count__GFC= 0;
-          };
-          result__3WOB=TRUE__;
-          result__QBZB=NULL;
-          result__AU1B=NULL;
-          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__GU1B)->parent_arrayed_collection__FU1B.upper__ATGC <  0)) {
-            result__AU1B=create_with_capacity__BL5B( 16);
-          } else {
-            Self__GCZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__GU1B);
-            result__AU1B=((void **)Self__GCZC->parent_arrayed_collection__FU1B.storage__TKHC)[Self__GCZC->parent_arrayed_collection__FU1B.upper__ATGC];
-            Self__2CZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__GU1B);
-            Self__2CZC->parent_arrayed_collection__FU1B.upper__ATGC=(__INTEGER)(Self__2CZC->parent_arrayed_collection__FU1B.upper__ATGC -  1);
-          };
-          arg__PBZB=read_loc_arg__with_self__YDHB(PARSER__,FALSE__,TRUE__);
-          if (((void *)arg__PBZB == (void *)NULL)) {
-            result__AP4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__AP4G=FALSE__;
+            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__;
             } else {
-              result__BP4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__BP4G=((__CHARACTER )(( 0)));
+              result__JSAH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__JSAH=((__CHARACTER )(( 0)));
               } else {
-                result__BP4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__JSAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__BP4G == '\'')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__AP4G=TRUE__;
+              if ((result__JSAH == '\'')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__ISAH=TRUE__;
               };
             };
-            if (result__AP4G) {
-              result__QBZB=read_slot_operator__VT5B(result__AU1B);
+            if (result__ISAH) {
+              result__UBZB=read_slot_operator__ZT5B(result__EU1B);
             } else {
-              p__LP4G=current_position__ZWF();
-              result__DP4G=NULL;
-              ptr__EP4G=((__POINTER )(NULL));
-              typ_id__FP4G= 0;
-              sz__GP4G=((__UINTEGER_32 )sizeof(__ITM_ARG));
-              if ((sz__GP4G ==  0)) {
-                result__DP4G=ITM_ARG__;
+              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__;
               } else {
-                typ_id__FP4G=-1;
-                clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__GP4G);
-                if ((typ_id__FP4G == (__INTEGER)(-  1))) {
-                  a__HP4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__IP4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GP4G + a__HP4G) & (__UINTEGER_32)(~ a__HP4G));
-                  ptr_table__NP4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IP4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                  next__MP4G=((__POINTER )(NULL));
-                  result__OP4G=((__POINTER *)ptr_table__NP4G)[ 0];
-                  if ((result__OP4G == (void *)NULL)) {
-                    result__OP4G=new_lab__2QJ(new_size__IP4G);
-                    next__MP4G=(void *)((unsigned long)result__OP4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IP4G)));
-                    ((__POINTER *)next__MP4G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__NP4G)[ 0]=next__MP4G;
+                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;
                   } else {
-                    next__MP4G=((__POINTER *)result__OP4G)[ 0];
-                    if ((next__MP4G == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OP4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IP4G <<  1)) <=  4096)) {
-                        next__MP4G=(void *)((unsigned long)result__OP4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IP4G)));
+                    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)));
                       } else {
-                        next__MP4G=new_lab__2QJ(new_size__IP4G);
+                        next__XSAH=new_lab__ARJ(new_size__QSAH);
                       };
-                      ((__POINTER *)next__MP4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__NP4G)[ 0]=next__MP4G;
+                      ((__POINTER *)next__XSAH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__YSAH)[ 0]=next__XSAH;
                     } else {
-                      ((__POINTER *)result__OP4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MP4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__OP4G=next__MP4G;
+                      ((__POINTER *)result__ZSAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XSAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__ZSAH=next__XSAH;
                     };
                   };
-                  ptr__EP4G=result__OP4G;
+                  ptr__MSAH=result__ZSAH;
                 } else {
-                  t__JP4G=((__UINTEGER_32 )typ_id__FP4G);
-                  a__KP4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__VP4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GP4G + a__KP4G) & (__UINTEGER_32)(~ a__KP4G));
-                  ptr_table__SP4G=((__POINTER )(&(table_type[(t__JP4G)])));
-                  lab_type__UP4G=(__UINTEGER_32)(t__JP4G |  1);
-                  next__RP4G=((__POINTER )(NULL));
-                  result__TP4G=((__POINTER *)ptr_table__SP4G)[ 0];
-                  if ((result__TP4G == (void *)NULL)) {
-                    result__TP4G=new_lab__2QJ(lab_type__UP4G);
-                    next__RP4G=(void *)((unsigned long)result__TP4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VP4G)));
-                    ((__POINTER *)next__RP4G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__SP4G)[ 0]=next__RP4G;
+                  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;
                   } else {
-                    next__RP4G=((__POINTER *)result__TP4G)[ 0];
-                    if ((next__RP4G == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TP4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VP4G <<  1)) <=  4096)) {
-                        next__RP4G=(void *)((unsigned long)result__TP4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VP4G)));
+                    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)));
                       } else {
-                        next__RP4G=new_lab__2QJ(lab_type__UP4G);
+                        next__2SAH=new_lab__ARJ(lab_type__5SAH);
                       };
-                      ((__POINTER *)next__RP4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__SP4G)[ 0]=next__RP4G;
+                      ((__POINTER *)next__2SAH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__3SAH)[ 0]=next__2SAH;
                     } else {
-                      ((__POINTER *)result__TP4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RP4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__TP4G=next__RP4G;
+                      ((__POINTER *)result__4SAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2SAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__4SAH=next__2SAH;
                     };
                   };
-                  ptr__EP4G=result__TP4G;
+                  ptr__MSAH=result__4SAH;
                 };
-                result__DP4G=((__ITM_ARG *)ptr__EP4G);
-                *(result__DP4G) = *(ITM_ARG__);
+                result__LSAH=((__ITM_ARG *)ptr__MSAH);
+                *(result__LSAH) = *(ITM_ARG__);
               };
-              ((__ITM_ARG *)result__DP4G)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ=p__LP4G;
-              arg__PBZB=result__DP4G;
-              add_last__K5GC(result__AU1B,result__DP4G);
-              result__QBZB=read_slot_keyword__CZ5B(result__AU1B);
-            };
-          } else {
-            add_last__K5GC(result__AU1B,arg__PBZB);
-            result__WP4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__WP4G=FALSE__;
+              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__;
             } else {
-              result__XP4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__XP4G=((__CHARACTER )(( 0)));
+              result__CTAH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__CTAH=((__CHARACTER )(( 0)));
               } else {
-                result__XP4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__CTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__XP4G == '.')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__WP4G=TRUE__;
+              if ((result__CTAH == '.')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__BTAH=TRUE__;
               };
             };
-            if (result__WP4G) {
-              result__QBZB=read_slot_keyword__CZ5B(result__AU1B);
-              __tmp__ADZB=TRUE__;
+            if (result__BTAH) {
+              result__UBZB=read_slot_keyword__GZ5B(result__EU1B);
+              __tmp__EDZB=TRUE__;
             } else {
-              __tmp__ADZB=FALSE__;
+              __tmp__EDZB=FALSE__;
             };
-            if ((! __tmp__ADZB)) {
-              result__ZP4G=FALSE__;
-              if ((! read_space__NRD())) {
-                result__ZP4G=FALSE__;
+            if ((! __tmp__EDZB)) {
+              result__ETAH=FALSE__;
+              if ((! read_space__RRD())) {
+                result__ETAH=FALSE__;
               } else {
-                result__0P4G='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__0P4G=((__CHARACTER )(( 0)));
+                result__FTAH='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__FTAH=((__CHARACTER )(( 0)));
                 } else {
-                  result__0P4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__FTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                if ((result__0P4G == '\'')) {
-                  position__CBC=(__INTEGER)(position__CBC +  1);
-                  result__ZP4G=TRUE__;
+                if ((result__FTAH == '\'')) {
+                  position__GBC=(__INTEGER)(position__GBC +  1);
+                  result__ETAH=TRUE__;
                 };
               };
-              if (result__ZP4G) {
-                result__QBZB=read_slot_operator__VT5B(result__AU1B);
+              if (result__ETAH) {
+                result__UBZB=read_slot_operator__ZT5B(result__EU1B);
               };
             };
           };
-          if (((void *)result__QBZB != (void *)NULL)) {
-            result__CU4B=create_with_capacity__BL5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__AU1B)->parent_arrayed_collection__VBZB.upper__O5GC +  1));
-            Self__1LHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__CU4B);
-            new_capacity__4LHC= 0;
-            other_upper__3LHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__AU1B)->parent_arrayed_collection__VBZB.upper__O5GC;
-            if ((other_upper__3LHC >=  0)) {
-              new_capacity__4LHC=(__INTEGER)(other_upper__3LHC +  1);
-              if ((Self__1LHC->parent_arrayed_collection__VBZB.capacity__Q5GC < new_capacity__4LHC)) {
-                Self__1LHC->parent_arrayed_collection__VBZB.storage__MAHC=create__GPBD(new_capacity__4LHC);
-                Self__1LHC->parent_arrayed_collection__VBZB.capacity__Q5GC=new_capacity__4LHC;
+          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;
               };
-              __tmp__RMHC=Self__1LHC->parent_arrayed_collection__VBZB.storage__MAHC;
-              __tmp__TMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__AU1B)->parent_arrayed_collection__VBZB.storage__MAHC;
-              Self__UGSD=((void **)__tmp__RMHC);
-              Self__G1WD=other_upper__3LHC;
-              while ((Self__G1WD >=  0)) {
-                Self__UGSD[Self__G1WD]=((void **)__tmp__TMHC)[Self__G1WD];
-                Self__G1WD=(__INTEGER)(Self__G1WD -  1);
+              __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);
               };
             };
-            Self__1LHC->parent_arrayed_collection__VBZB.upper__O5GC=other_upper__3LHC;
-            ((__FAST_ARRAYoITM_ARGUMENTo *)result__AU1B)->parent_arrayed_collection__VBZB.upper__O5GC=(__INTEGER)(-  1);
-            Self__HUHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__GU1B);
-            new_capacity__JUHC= 0;
-            if (((__INTEGER)(Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC +  1) <= (__INTEGER)(Self__HUHC->parent_arrayed_collection__FU1B.capacity__IKHC -  1))) {
-              Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC=(__INTEGER)(Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC +  1);
-              __tmp__XUHC=TRUE__;
+            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__;
             } else {
-              __tmp__XUHC=FALSE__;
+              __tmp__1UHC=FALSE__;
             };
-            if ((! __tmp__XUHC)) {
-              if ((Self__HUHC->parent_arrayed_collection__FU1B.capacity__IKHC ==  0)) {
-                Self__HUHC->parent_arrayed_collection__FU1B.storage__TKHC=create__UKBD( 2);
-                Self__HUHC->parent_arrayed_collection__FU1B.capacity__IKHC= 2;
-                Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC= 0;
+            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;
               } else {
-                new_capacity__JUHC=(__INTEGER)(Self__HUHC->parent_arrayed_collection__FU1B.capacity__IKHC <<  1);
-                __tmp__MVHC=Self__HUHC->parent_arrayed_collection__FU1B.storage__TKHC;
-                __tmp__NVHC=Self__HUHC->parent_arrayed_collection__FU1B.capacity__IKHC;
-                new__GITD=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__MVHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__NVHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__JUHC * ((__INTEGER )(sizeof(void *)))))));
-                __tmp__0ITD=(__INTEGER)(new_capacity__JUHC -  1);
-                Self__00WE=__tmp__NVHC;
-                while ((Self__00WE <= __tmp__0ITD)) {
-                  new__GITD[Self__00WE]=NULL;
-                  Self__00WE=(__INTEGER)(Self__00WE +  1);
+                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);
                 };
-                Self__HUHC->parent_arrayed_collection__FU1B.storage__TKHC=new__GITD;
-                Self__HUHC->parent_arrayed_collection__FU1B.capacity__IKHC=new_capacity__JUHC;
-                Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC=(__INTEGER)(Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC +  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);
               };
             };
-            ((void **)Self__HUHC->parent_arrayed_collection__FU1B.storage__TKHC)[Self__HUHC->parent_arrayed_collection__FU1B.upper__ATGC]=result__AU1B;
-            if (((struct ___OBJ *)result__QBZB)->__id==__ITM_SLOT__) {
-              set_argument_list__FCHC(result__QBZB,result__CU4B);
+            ((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);
             } else {
-              Self__YDHC=((__ITM_SLOT_OPERATOR *)result__QBZB);
-              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__CU4B)->parent_arrayed_collection__VBZB.upper__O5GC +  1) >  1)) {
-                __tmp__GEHC=TRUE__;
+              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__;
               } else {
-                __tmp__BEHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__CU4B)->parent_arrayed_collection__VBZB.storage__MAHC)[ 0];
-                if (((struct ___OBJ *)__tmp__BEHC)->__id==__ITM_ARG__) {
-                  __tmp__CEHC= 1;
+                __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;
                 } else {
-                  __tmp__CEHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__BEHC)->name__TFNF)->parent_arrayed_collection__X4I.upper__L5OD +  1);
+                  __tmp__GEHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__FEHC)->name__QPOF)->parent_arrayed_collection__14I.upper__P5OD +  1);
                 };
-                __tmp__GEHC=(__tmp__CEHC >  1);
+                __tmp__KEHC=(__tmp__GEHC >  1);
               };
-              if (__tmp__GEHC) {
-                if (((void *)((__SECTION_ *)Self__YDHC->parent_itm_slot__4T5B.id_section__I1C)->name__SYDC == (void *)(&__string_25))) {
-                  Self__AO1G=((__FAST_ARRAYoITM_ARGUMENTo *)result__CU4B);
-                  __tmp__TEHC=((void **)Self__AO1G->parent_arrayed_collection__VBZB.storage__MAHC)[Self__AO1G->parent_arrayed_collection__VBZB.upper__O5GC];
-                  if (((struct ___OBJ *)__tmp__TEHC)->__id==__ITM_ARG__) {
-                    __tmp__UEHC=((__ITM_ARG *)__tmp__TEHC)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ;
+              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;
                   } else {
-                    __tmp__UEHC=((__ITM_ARGS *)__tmp__TEHC)->parent_itm_argument__QPEE.parent_itm_code__C4M.position__3CJ;
+                    __tmp__YEHC=((__ITM_ARGS *)__tmp__XEHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
                   };
-                  put_error__text__0MG( 1,(&__string_219));
-                  put_position__EOG(__tmp__UEHC);
-                  put_string__E1F(msg_err__5MG);
-                  if ((type_error__4MG !=  2)) {
+                  put_error__text__4MG( 1,(&__string_221));
+                  put_position__IOG(__tmp__YEHC);
+                  put_string__I1F(msg_err__DNG);
+                  if ((type_error__CNG !=  2)) {
                     exit(( 1));
                   };
                 };
-                Self__ZQUG=((__SECTION_ *)Self__YDHC->parent_itm_slot__4T5B.id_section__I1C);
-                if ((((void *)Self__ZQUG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__ZQUG->name__SYDC == (void *)(&__string_24)))) {
-                  Self__JO1G=((__FAST_ARRAYoITM_ARGUMENTo *)result__CU4B);
-                  __tmp__AFHC=((void **)Self__JO1G->parent_arrayed_collection__VBZB.storage__MAHC)[Self__JO1G->parent_arrayed_collection__VBZB.upper__O5GC];
-                  if (((struct ___OBJ *)__tmp__AFHC)->__id==__ITM_ARG__) {
-                    __tmp__BFHC=((__ITM_ARG *)__tmp__AFHC)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ;
+                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;
                   } else {
-                    __tmp__BFHC=((__ITM_ARGS *)__tmp__AFHC)->parent_itm_argument__QPEE.parent_itm_code__C4M.position__3CJ;
+                    __tmp__FFHC=((__ITM_ARGS *)__tmp__EFHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
                   };
-                  put_error__text__0MG( 1,(&__string_220));
-                  put_position__EOG(__tmp__BFHC);
-                  put_string__E1F(msg_err__5MG);
-                  if ((type_error__4MG !=  2)) {
+                  put_error__text__4MG( 1,(&__string_222));
+                  put_position__IOG(__tmp__FFHC);
+                  put_string__I1F(msg_err__DNG);
+                  if ((type_error__CNG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
+              Self__2DHC->parent_itm_slot__CU5B.argument_list__0DHC=result__GU4B;
             };
           };
-          last_slot__A2D=result__QBZB;
-          if (((void *)result__QBZB == (void *)NULL)) {
-            pos__3BNG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_221));
-            put_position__EOG(pos__3BNG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
+          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__E2D)->parent_named__G5.style__VDU=style__EXOB;
+          } else {
+            ((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.style__VDU=style__EXOB;
           };
-          if (((read_symbol__TWJ((&__string_12)) || read_symbol__TWJ((&__string_13))) || read_symbol__TWJ((&__string_14)))) {
-            affect__BXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[ 0];
+          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];
           } else {
-            affect__BXOB=' ';
+            affect__FXOB=' ';
           };
-          if ((affect__BXOB == ' ')) {
-            result__4P4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__4P4G=FALSE__;
+          if ((affect__FXOB == ' ')) {
+            result__JTAH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__JTAH=FALSE__;
             } else {
-              result__5P4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__5P4G=((__CHARACTER )(( 0)));
+              result__KTAH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__KTAH=((__CHARACTER )(( 0)));
               } else {
-                result__5P4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__KTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__5P4G == ':')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__4P4G=TRUE__;
+              if ((result__KTAH == ':')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__JTAH=TRUE__;
               };
             };
-            __tmp__XYOB=result__4P4G;
+            __tmp__1YOB=result__JTAH;
           } else {
-            __tmp__XYOB=FALSE__;
+            __tmp__1YOB=FALSE__;
           };
-          if (__tmp__XYOB) {
-            result__BQ4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__BQ4G=FALSE__;
+          if (__tmp__1YOB) {
+            result__MTAH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__MTAH=FALSE__;
             } else {
-              result__CQ4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__CQ4G=((__CHARACTER )(( 0)));
+              result__NTAH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__NTAH=((__CHARACTER )(( 0)));
               } else {
-                result__CQ4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__NTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__CQ4G == '(')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__BQ4G=TRUE__;
+              if ((result__NTAH == '(')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__MTAH=TRUE__;
               };
             };
-            if (result__BQ4G) {
-              lt__5WOB=read_type_list__YLO(PARSER__,FALSE__);
-              if (((void *)lt__5WOB == (void *)NULL)) {
-                pos__5BNG=current_position__ZWF();
-                put_error__text__0MG( 0,(&__string_222));
-                put_position__EOG(pos__5BNG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+            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)) {
                   exit(( 1));
                 };
               };
-              result__EQ4G=FALSE__;
-              if ((! read_space__NRD())) {
-                result__EQ4G=FALSE__;
+              result__PTAH=FALSE__;
+              if ((! read_space__RRD())) {
+                result__PTAH=FALSE__;
               } else {
-                result__FQ4G='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__FQ4G=((__CHARACTER )(( 0)));
+                result__QTAH='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__QTAH=((__CHARACTER )(( 0)));
                 } else {
-                  result__FQ4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__QTAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                if ((result__FQ4G == ')')) {
-                  position__CBC=(__INTEGER)(position__CBC +  1);
-                  result__EQ4G=TRUE__;
+                if ((result__QTAH == ')')) {
+                  position__GBC=(__INTEGER)(position__GBC +  1);
+                  result__PTAH=TRUE__;
                 };
               };
-              if ((! result__EQ4G)) {
-                pos__BCNG=current_position__ZWF();
-                put_error__text__0MG( 2,(&__string_223));
-                put_position__EOG(pos__BCNG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+              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)) {
                   exit(( 1));
                 };
               };
-              t__4WOB=get__SIP(lt__5WOB);
+              t__CXOB=get__WIP(lt__DXOB);
             } else {
-              t__4WOB=read_type__TBM(PARSER__,FALSE__);
-              if (((void *)t__4WOB == (void *)NULL)) {
-                pos__DCNG=current_position__ZWF();
-                put_error__text__0MG( 0,(&__string_222));
-                put_position__EOG(pos__DCNG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+              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)) {
                   exit(( 1));
                 };
               };
             };
-            if (((read_symbol__TWJ((&__string_12)) || read_symbol__TWJ((&__string_13))) || read_symbol__TWJ((&__string_14)))) {
-              affect__BXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[ 0];
+            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];
             };
           } else {
-            t__4WOB=type_void__OVF;
+            t__CXOB=type_void__SVF;
           };
-          __tmp__10OB=last_slot__A2D;
-          if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
-            set_result_type__A3FC(last_slot__A2D,t__4WOB);
+          __tmp__50OB=last_slot__E2D;
+          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
+            set_result_type__E3FC(last_slot__E2D,t__CXOB);
           } else {
-            Self__M4FC=((__ITM_SLOT_OPERATOR *)__tmp__10OB);
-            tm__O4FC=NULL;
-            Self__RBFC=((__SECTION_ *)Self__M4FC->parent_itm_slot__4T5B.id_section__I1C);
-            if ((((void *)Self__RBFC->name__SYDC == (void *)(&__string_23)) || ((void *)Self__RBFC->name__SYDC == (void *)(&__string_24)))) {
-              if (t__4WOB==NULL) {
-                __tmp__X4FC=NULL;
+            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;
               } else {
-                switch (((struct ___OBJ *)t__4WOB)->__id) {
+                switch (((struct ___OBJ *)t__CXOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__X4FC=((void *)t__4WOB);
+                  __tmp__14FC=((void *)t__CXOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__X4FC=((void *)t__4WOB);
+                  __tmp__14FC=((void *)t__CXOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__X4FC=NULL;
+                  __tmp__14FC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__X4FC=((void *)t__4WOB);
+                  __tmp__14FC=((void *)t__CXOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__X4FC=((void *)t__4WOB);
+                  __tmp__14FC=((void *)t__CXOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__X4FC=((void *)t__4WOB);
+                  __tmp__14FC=((void *)t__CXOB);
                 } break;
                 }
               };
-              tm__O4FC=__tmp__X4FC;
-              if (((((void *)__tmp__X4FC == (void *)NULL) || ((void *)__tmp__X4FC == (void *)type_self__XTN)) || ((void *)__tmp__X4FC == (void *)type_void__OVF))) {
-                pos__BZID=Self__M4FC->parent_itm_slot__4T5B.parent_named__D5.parent_itm_object__4.position__3CJ;
-                put_error__text__0MG( 1,(&__string_224));
-                put_position__EOG(pos__BZID);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+              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)) {
                   exit(( 1));
                 };
               };
             };
-            Self__M4FC->parent_itm_slot__4T5B.result_type__K4FC=t__4WOB;
+            Self__Q4FC->parent_itm_slot__CU5B.result_type__O4FC=t__CXOB;
           };
-          if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__A2D)->affect__Z5FC=affect__BXOB;
+          if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__E2D)->affect__35FC=affect__FXOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__A2D)->parent_itm_slot__4T5B.affect__Z5FC=affect__BXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.affect__35FC=affect__FXOB;
           };
-          if ((affect__BXOB != ' ')) {
-            read_space__NRD();
-            old_pos__CXOB=position__CBC;
-            old_derive__DXOB=short_derive__RBC;
-            if (((void *)read_contract__XSF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
+          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__) {
               };
             };
-            expr__UI3B=read_expr__O4I(PARSER__);
-            if (((void *)expr__UI3B == (void *)NULL)) {
-              pos__HCNG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_225));
-              put_position__EOG(pos__HCNG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+            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)) {
                 exit(( 1));
               };
             };
-            __tmp__BJ3B=last_slot__A2D;
-            __tmp__CJ3B=object__ZAC;
-            if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
-              set_value__type__JFHC(last_slot__A2D,expr__UI3B,object__ZAC);
+            __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);
             } else {
-              Self__DGHC=((__ITM_SLOT_OPERATOR *)__tmp__BJ3B);
-              if ((Self__DGHC->parent_itm_slot__4T5B.affect__Z5FC != '<')) {
-                copy__JCS(string_tmp__VH,(&__string_226));
-                append__RNS(string_tmp__VH,Self__DGHC->parent_itm_slot__4T5B.parent_named__D5.name__LI);
-                n__KDBD=get__YVB(string_tmp__VH);
-                sec__LDBD=get_name__KUOB((&__string_27));
-                larg__MDBD=create_with_capacity__BL5B( 1);
-                switch (((struct ___OBJ *)expr__UI3B)->__id) {
+              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) {
                 case __ITM_LIST__: {
-                  __tmp__XDBD=((__ITM_LIST *)expr__UI3B)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__XDBD=((__ITM_LDOTS *)expr__UI3B)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__XDBD=((__ITM_PROTOTYPE *)expr__UI3B)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__XDBD=((__ITM_LIST_IDF *)expr__UI3B)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__XDBD=((__ITM_WRITE_VALUE *)expr__UI3B)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__XDBD=((__ITM_WRITE_CAST *)expr__UI3B)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__XDBD=((__ITM_READ *)expr__UI3B)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__XDBD=((__ITM_WRITE_CODE *)expr__UI3B)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__XDBD=((__ITM_OPERATOR *)expr__UI3B)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__XDBD=((__ITM_READ_ARG1 *)expr__UI3B)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__XDBD=((__ITM_READ_ARG2 *)expr__UI3B)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__XDBD=position__VC5B(expr__UI3B);
+                  __tmp__1DBD=position__ZC5B(expr__YI3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__XDBD=((__ITM_OLD *)expr__UI3B)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__XDBD=((__ITM_EXTERNAL_TYPE *)expr__UI3B)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__XDBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__UI3B)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__XDBD=((__ITM_EXTERNAL *)expr__UI3B)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__XDBD=((__ITM_READ_ARGS *)expr__UI3B)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__XDBD=((__ITM_REAL *)expr__UI3B)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__XDBD=((__ITM_NUMBER *)expr__UI3B)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__XDBD=((__ITM_CHARACTER *)expr__UI3B)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__XDBD=((__ITM_STRING *)expr__UI3B)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__1DBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__XDBD=position__VIHC(expr__UI3B);
+                  __tmp__1DBD=position__ZIHC(expr__YI3B);
                 } break;
                 };
-                result__HQ4G=NULL;
-                ptr__IQ4G=((__POINTER )(NULL));
-                typ_id__JQ4G= 0;
-                sz__KQ4G=((__UINTEGER_32 )sizeof(__ITM_ARG));
-                if ((sz__KQ4G ==  0)) {
-                  result__HQ4G=ITM_ARG__;
+                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__;
                 } else {
-                  typ_id__JQ4G=-1;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__KQ4G);
-                  if ((typ_id__JQ4G == (__INTEGER)(-  1))) {
-                    a__LQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__MQ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__KQ4G + a__LQ4G) & (__UINTEGER_32)(~ a__LQ4G));
-                    ptr_table__RQ4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MQ4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__QQ4G=((__POINTER )(NULL));
-                    result__SQ4G=((__POINTER *)ptr_table__RQ4G)[ 0];
-                    if ((result__SQ4G == (void *)NULL)) {
-                      result__SQ4G=new_lab__2QJ(new_size__MQ4G);
-                      next__QQ4G=(void *)((unsigned long)result__SQ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQ4G)));
-                      ((__POINTER *)next__QQ4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__RQ4G)[ 0]=next__QQ4G;
+                  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;
                     } else {
-                      next__QQ4G=((__POINTER *)result__SQ4G)[ 0];
-                      if ((next__QQ4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SQ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__MQ4G <<  1)) <=  4096)) {
-                          next__QQ4G=(void *)((unsigned long)result__SQ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MQ4G)));
+                      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)));
                         } else {
-                          next__QQ4G=new_lab__2QJ(new_size__MQ4G);
+                          next__4TAH=new_lab__ARJ(new_size__XTAH);
                         };
-                        ((__POINTER *)next__QQ4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__RQ4G)[ 0]=next__QQ4G;
+                        ((__POINTER *)next__4TAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__5TAH)[ 0]=next__4TAH;
                       } else {
-                        ((__POINTER *)result__SQ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QQ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__SQ4G=next__QQ4G;
+                        ((__POINTER *)result__AUAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4TAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__AUAH=next__4TAH;
                       };
                     };
-                    ptr__IQ4G=result__SQ4G;
+                    ptr__TTAH=result__AUAH;
                   } else {
-                    t__NQ4G=((__UINTEGER_32 )typ_id__JQ4G);
-                    a__OQ4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__ZQ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__KQ4G + a__OQ4G) & (__UINTEGER_32)(~ a__OQ4G));
-                    ptr_table__WQ4G=((__POINTER )(&(table_type[(t__NQ4G)])));
-                    lab_type__YQ4G=(__UINTEGER_32)(t__NQ4G |  1);
-                    next__VQ4G=((__POINTER )(NULL));
-                    result__XQ4G=((__POINTER *)ptr_table__WQ4G)[ 0];
-                    if ((result__XQ4G == (void *)NULL)) {
-                      result__XQ4G=new_lab__2QJ(lab_type__YQ4G);
-                      next__VQ4G=(void *)((unsigned long)result__XQ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZQ4G)));
-                      ((__POINTER *)next__VQ4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__WQ4G)[ 0]=next__VQ4G;
+                    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;
                     } else {
-                      next__VQ4G=((__POINTER *)result__XQ4G)[ 0];
-                      if ((next__VQ4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XQ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZQ4G <<  1)) <=  4096)) {
-                          next__VQ4G=(void *)((unsigned long)result__XQ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZQ4G)));
+                      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)));
                         } else {
-                          next__VQ4G=new_lab__2QJ(lab_type__YQ4G);
+                          next__DUAH=new_lab__ARJ(lab_type__GUAH);
                         };
-                        ((__POINTER *)next__VQ4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__WQ4G)[ 0]=next__VQ4G;
+                        ((__POINTER *)next__DUAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__EUAH)[ 0]=next__DUAH;
                       } else {
-                        ((__POINTER *)result__XQ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VQ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__XQ4G=next__VQ4G;
+                        ((__POINTER *)result__FUAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DUAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__FUAH=next__DUAH;
                       };
                     };
-                    ptr__IQ4G=result__XQ4G;
+                    ptr__TTAH=result__FUAH;
                   };
-                  result__HQ4G=((__ITM_ARG *)ptr__IQ4G);
-                  *(result__HQ4G) = *(ITM_ARG__);
+                  result__STAH=((__ITM_ARG *)ptr__TTAH);
+                  *(result__STAH) = *(ITM_ARG__);
                 };
-                ((__ITM_ARG *)result__HQ4G)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ=__tmp__XDBD;
-                add_last__K5GC(larg__MDBD,result__HQ4G);
-                switch (((struct ___OBJ *)expr__UI3B)->__id) {
+                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) {
                 case __ITM_LIST__: {
-                  __tmp__5DBD=((__ITM_LIST *)expr__UI3B)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__5DBD=((__ITM_LDOTS *)expr__UI3B)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__5DBD=((__ITM_PROTOTYPE *)expr__UI3B)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__5DBD=((__ITM_LIST_IDF *)expr__UI3B)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__5DBD=((__ITM_WRITE_VALUE *)expr__UI3B)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__5DBD=((__ITM_WRITE_CAST *)expr__UI3B)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__5DBD=((__ITM_READ *)expr__UI3B)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__5DBD=((__ITM_WRITE_CODE *)expr__UI3B)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__5DBD=((__ITM_OPERATOR *)expr__UI3B)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__5DBD=((__ITM_READ_ARG1 *)expr__UI3B)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__5DBD=((__ITM_READ_ARG2 *)expr__UI3B)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__5DBD=position__VC5B(expr__UI3B);
+                  __tmp__DEBD=position__ZC5B(expr__YI3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__5DBD=((__ITM_OLD *)expr__UI3B)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__5DBD=((__ITM_EXTERNAL_TYPE *)expr__UI3B)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__5DBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__UI3B)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__5DBD=((__ITM_EXTERNAL *)expr__UI3B)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__5DBD=((__ITM_READ_ARGS *)expr__UI3B)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__5DBD=((__ITM_REAL *)expr__UI3B)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__5DBD=((__ITM_NUMBER *)expr__UI3B)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__5DBD=((__ITM_CHARACTER *)expr__UI3B)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__5DBD=((__ITM_STRING *)expr__UI3B)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__DEBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__5DBD=position__VIHC(expr__UI3B);
+                  __tmp__DEBD=position__ZIHC(expr__YI3B);
                 } break;
                 };
-                result__0Q4G=NULL;
-                ptr__1Q4G=((__POINTER )(NULL));
-                typ_id__2Q4G= 0;
-                sz__3Q4G=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-                if ((sz__3Q4G ==  0)) {
-                  result__0Q4G=ITM_SLOT__;
+                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__;
                 } else {
-                  typ_id__2Q4G=-1;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__3Q4G);
-                  if ((typ_id__2Q4G == (__INTEGER)(-  1))) {
-                    a__4Q4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__5Q4G=(__UINTEGER_32)((__UINTEGER_32)(sz__3Q4G + a__4Q4G) & (__UINTEGER_32)(~ a__4Q4G));
-                    ptr_table__HR4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5Q4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__GR4G=((__POINTER )(NULL));
-                    result__IR4G=((__POINTER *)ptr_table__HR4G)[ 0];
-                    if ((result__IR4G == (void *)NULL)) {
-                      result__IR4G=new_lab__2QJ(new_size__5Q4G);
-                      next__GR4G=(void *)((unsigned long)result__IR4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5Q4G)));
-                      ((__POINTER *)next__GR4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__HR4G)[ 0]=next__GR4G;
+                  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;
                     } else {
-                      next__GR4G=((__POINTER *)result__IR4G)[ 0];
-                      if ((next__GR4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IR4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__5Q4G <<  1)) <=  4096)) {
-                          next__GR4G=(void *)((unsigned long)result__IR4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5Q4G)));
+                      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)));
                         } else {
-                          next__GR4G=new_lab__2QJ(new_size__5Q4G);
+                          next__UUAH=new_lab__ARJ(new_size__NUAH);
                         };
-                        ((__POINTER *)next__GR4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__HR4G)[ 0]=next__GR4G;
+                        ((__POINTER *)next__UUAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__VUAH)[ 0]=next__UUAH;
                       } else {
-                        ((__POINTER *)result__IR4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GR4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__IR4G=next__GR4G;
+                        ((__POINTER *)result__WUAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UUAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__WUAH=next__UUAH;
                       };
                     };
-                    ptr__1Q4G=result__IR4G;
+                    ptr__JUAH=result__WUAH;
                   } else {
-                    t__AR4G=((__UINTEGER_32 )typ_id__2Q4G);
-                    a__BR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__PR4G=(__UINTEGER_32)((__UINTEGER_32)(sz__3Q4G + a__BR4G) & (__UINTEGER_32)(~ a__BR4G));
-                    ptr_table__MR4G=((__POINTER )(&(table_type[(t__AR4G)])));
-                    lab_type__OR4G=(__UINTEGER_32)(t__AR4G |  1);
-                    next__LR4G=((__POINTER )(NULL));
-                    result__NR4G=((__POINTER *)ptr_table__MR4G)[ 0];
-                    if ((result__NR4G == (void *)NULL)) {
-                      result__NR4G=new_lab__2QJ(lab_type__OR4G);
-                      next__LR4G=(void *)((unsigned long)result__NR4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PR4G)));
-                      ((__POINTER *)next__LR4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__MR4G)[ 0]=next__LR4G;
+                    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;
                     } else {
-                      next__LR4G=((__POINTER *)result__NR4G)[ 0];
-                      if ((next__LR4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NR4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PR4G <<  1)) <=  4096)) {
-                          next__LR4G=(void *)((unsigned long)result__NR4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PR4G)));
+                      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)));
                         } else {
-                          next__LR4G=new_lab__2QJ(lab_type__OR4G);
+                          next__ZUAH=new_lab__ARJ(lab_type__2UAH);
                         };
-                        ((__POINTER *)next__LR4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__MR4G)[ 0]=next__LR4G;
+                        ((__POINTER *)next__ZUAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__0UAH)[ 0]=next__ZUAH;
                       } else {
-                        ((__POINTER *)result__NR4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LR4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__NR4G=next__LR4G;
+                        ((__POINTER *)result__1UAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZUAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__1UAH=next__ZUAH;
                       };
                     };
-                    ptr__1Q4G=result__NR4G;
+                    ptr__JUAH=result__1UAH;
                   };
-                  result__0Q4G=((__ITM_SLOT *)ptr__1Q4G);
-                  *(result__0Q4G) = *(ITM_SLOT__);
+                  result__IUAH=((__ITM_SLOT *)ptr__JUAH);
+                  *(result__IUAH) = *(ITM_SLOT__);
                 };
-                Self__CR4G=((__ITM_SLOT *)result__0Q4G);
-                Self__CR4G->parent_named__D5.name__LI=n__KDBD;
-                Self__CR4G->parent_named__D5.parent_itm_object__4.position__3CJ=__tmp__5DBD;
-                Self__CR4G->id_section__I1C=sec__LDBD;
-                ((__ITM_SLOT *)result__0Q4G)->affect__Z5FC='<';
-                set_value__type__JFHC(result__0Q4G,expr__UI3B,__tmp__CJ3B);
-                set_argument_list__FCHC(result__0Q4G,larg__MDBD);
-                set_result_type__A3FC(result__0Q4G,Self__DGHC->parent_itm_slot__4T5B.result_type__K4FC);
-                fast_put__to__RNGC(((__PROTOTYPE *)__tmp__CJ3B)->slot_list__MUS,result__0Q4G,result__0Q4G->parent_named__D5.name__LI);
-                switch (((struct ___OBJ *)expr__UI3B)->__id) {
+                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) {
                 case __ITM_LIST__: {
-                  __tmp__TEBD=((__ITM_LIST *)expr__UI3B)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__TEBD=((__ITM_LDOTS *)expr__UI3B)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__TEBD=((__ITM_PROTOTYPE *)expr__UI3B)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__TEBD=((__ITM_LIST_IDF *)expr__UI3B)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__TEBD=((__ITM_WRITE_VALUE *)expr__UI3B)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__TEBD=((__ITM_WRITE_CAST *)expr__UI3B)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__TEBD=((__ITM_READ *)expr__UI3B)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__TEBD=((__ITM_WRITE_CODE *)expr__UI3B)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__TEBD=((__ITM_OPERATOR *)expr__UI3B)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__TEBD=((__ITM_READ_ARG1 *)expr__UI3B)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__TEBD=((__ITM_READ_ARG2 *)expr__UI3B)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__TEBD=position__VC5B(expr__UI3B);
+                  __tmp__XEBD=position__ZC5B(expr__YI3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__TEBD=((__ITM_OLD *)expr__UI3B)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__TEBD=((__ITM_EXTERNAL_TYPE *)expr__UI3B)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__TEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__UI3B)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__TEBD=((__ITM_EXTERNAL *)expr__UI3B)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__TEBD=((__ITM_READ_ARGS *)expr__UI3B)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__TEBD=((__ITM_REAL *)expr__UI3B)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__TEBD=((__ITM_NUMBER *)expr__UI3B)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__TEBD=((__ITM_CHARACTER *)expr__UI3B)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__TEBD=((__ITM_STRING *)expr__UI3B)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__XEBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__TEBD=position__VIHC(expr__UI3B);
+                  __tmp__XEBD=position__ZIHC(expr__YI3B);
                 } break;
                 };
-                get__TSI(((__PROTOTYPE *)__tmp__CJ3B)->parent_named__5.name__LI);
-                result__QR4G=NULL;
-                ptr__RR4G=((__POINTER )(NULL));
-                typ_id__SR4G= 0;
-                sz__TR4G=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-                if ((sz__TR4G ==  0)) {
-                  result__QR4G=ITM_PROTOTYPE__;
+                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__;
                 } else {
-                  typ_id__SR4G=-1;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__TR4G);
-                  if ((typ_id__SR4G == (__INTEGER)(-  1))) {
-                    a__UR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__VR4G=(__UINTEGER_32)((__UINTEGER_32)(sz__TR4G + a__UR4G) & (__UINTEGER_32)(~ a__UR4G));
-                    ptr_table__0R4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VR4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__ZR4G=((__POINTER )(NULL));
-                    result__1R4G=((__POINTER *)ptr_table__0R4G)[ 0];
-                    if ((result__1R4G == (void *)NULL)) {
-                      result__1R4G=new_lab__2QJ(new_size__VR4G);
-                      next__ZR4G=(void *)((unsigned long)result__1R4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VR4G)));
-                      ((__POINTER *)next__ZR4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__0R4G)[ 0]=next__ZR4G;
+                  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;
                     } else {
-                      next__ZR4G=((__POINTER *)result__1R4G)[ 0];
-                      if ((next__ZR4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1R4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VR4G <<  1)) <=  4096)) {
-                          next__ZR4G=(void *)((unsigned long)result__1R4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VR4G)));
+                      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)));
                         } else {
-                          next__ZR4G=new_lab__2QJ(new_size__VR4G);
+                          next__HVAH=new_lab__ARJ(new_size__DVAH);
                         };
-                        ((__POINTER *)next__ZR4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__0R4G)[ 0]=next__ZR4G;
+                        ((__POINTER *)next__HVAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__IVAH)[ 0]=next__HVAH;
                       } else {
-                        ((__POINTER *)result__1R4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZR4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__1R4G=next__ZR4G;
+                        ((__POINTER *)result__JVAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HVAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__JVAH=next__HVAH;
                       };
                     };
-                    ptr__RR4G=result__1R4G;
+                    ptr__5UAH=result__JVAH;
                   } else {
-                    t__WR4G=((__UINTEGER_32 )typ_id__SR4G);
-                    a__XR4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__CS4G=(__UINTEGER_32)((__UINTEGER_32)(sz__TR4G + a__XR4G) & (__UINTEGER_32)(~ a__XR4G));
-                    ptr_table__5R4G=((__POINTER )(&(table_type[(t__WR4G)])));
-                    lab_type__BS4G=(__UINTEGER_32)(t__WR4G |  1);
-                    next__4R4G=((__POINTER )(NULL));
-                    result__AS4G=((__POINTER *)ptr_table__5R4G)[ 0];
-                    if ((result__AS4G == (void *)NULL)) {
-                      result__AS4G=new_lab__2QJ(lab_type__BS4G);
-                      next__4R4G=(void *)((unsigned long)result__AS4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CS4G)));
-                      ((__POINTER *)next__4R4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__5R4G)[ 0]=next__4R4G;
+                    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;
                     } else {
-                      next__4R4G=((__POINTER *)result__AS4G)[ 0];
-                      if ((next__4R4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AS4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CS4G <<  1)) <=  4096)) {
-                          next__4R4G=(void *)((unsigned long)result__AS4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CS4G)));
+                      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)));
                         } else {
-                          next__4R4G=new_lab__2QJ(lab_type__BS4G);
+                          next__MVAH=new_lab__ARJ(lab_type__PVAH);
                         };
-                        ((__POINTER *)next__4R4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__5R4G)[ 0]=next__4R4G;
+                        ((__POINTER *)next__MVAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__NVAH)[ 0]=next__MVAH;
                       } else {
-                        ((__POINTER *)result__AS4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4R4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__AS4G=next__4R4G;
+                        ((__POINTER *)result__OVAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MVAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__OVAH=next__MVAH;
                       };
                     };
-                    ptr__RR4G=result__AS4G;
+                    ptr__5UAH=result__OVAH;
                   };
-                  result__QR4G=((__ITM_PROTOTYPE *)ptr__RR4G);
-                  *(result__QR4G) = *(ITM_PROTOTYPE__);
+                  result__4UAH=((__ITM_PROTOTYPE *)ptr__5UAH);
+                  *(result__4UAH) = *(ITM_PROTOTYPE__);
                 };
-                ((__ITM_PROTOTYPE *)result__QR4G)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=__tmp__TEBD;
-                switch (((struct ___OBJ *)expr__UI3B)->__id) {
+                ((__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) {
                 case __ITM_LIST__: {
-                  __tmp__2EBD=((__ITM_LIST *)expr__UI3B)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_LIST *)expr__YI3B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__2EBD=((__ITM_LDOTS *)expr__UI3B)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_LDOTS *)expr__YI3B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__2EBD=((__ITM_PROTOTYPE *)expr__UI3B)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_PROTOTYPE *)expr__YI3B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__2EBD=((__ITM_LIST_IDF *)expr__UI3B)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_LIST_IDF *)expr__YI3B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__2EBD=((__ITM_WRITE_VALUE *)expr__UI3B)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_WRITE_VALUE *)expr__YI3B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__2EBD=((__ITM_WRITE_CAST *)expr__UI3B)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_WRITE_CAST *)expr__YI3B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__2EBD=((__ITM_READ *)expr__UI3B)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_READ *)expr__YI3B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__2EBD=((__ITM_WRITE_CODE *)expr__UI3B)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_WRITE_CODE *)expr__YI3B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__2EBD=((__ITM_OPERATOR *)expr__UI3B)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_OPERATOR *)expr__YI3B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__2EBD=((__ITM_READ_ARG1 *)expr__UI3B)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_READ_ARG1 *)expr__YI3B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__2EBD=((__ITM_READ_ARG2 *)expr__UI3B)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_READ_ARG2 *)expr__YI3B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__2EBD=position__VC5B(expr__UI3B);
+                  __tmp__AFBD=position__ZC5B(expr__YI3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__2EBD=((__ITM_OLD *)expr__UI3B)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_OLD *)expr__YI3B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__2EBD=((__ITM_EXTERNAL_TYPE *)expr__UI3B)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_EXTERNAL_TYPE *)expr__YI3B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__2EBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__UI3B)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__YI3B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__2EBD=((__ITM_EXTERNAL *)expr__UI3B)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_EXTERNAL *)expr__YI3B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__2EBD=((__ITM_READ_ARGS *)expr__UI3B)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_READ_ARGS *)expr__YI3B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__2EBD=((__ITM_REAL *)expr__UI3B)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_REAL *)expr__YI3B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__2EBD=((__ITM_NUMBER *)expr__UI3B)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_NUMBER *)expr__YI3B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__2EBD=((__ITM_CHARACTER *)expr__UI3B)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_CHARACTER *)expr__YI3B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__2EBD=((__ITM_STRING *)expr__UI3B)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+                  __tmp__AFBD=((__ITM_STRING *)expr__YI3B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__2EBD=position__VIHC(expr__UI3B);
+                  __tmp__AFBD=position__ZIHC(expr__YI3B);
                 } break;
                 };
-                result__DS4G=NULL;
-                ptr__ES4G=((__POINTER )(NULL));
-                typ_id__FS4G= 0;
-                sz__GS4G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-                if ((sz__GS4G ==  0)) {
-                  result__DS4G=ITM_READ_ARG1__;
+                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__;
                 } else {
-                  typ_id__FS4G=-1;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__GS4G);
-                  if ((typ_id__FS4G == (__INTEGER)(-  1))) {
-                    a__HS4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__IS4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GS4G + a__HS4G) & (__UINTEGER_32)(~ a__HS4G));
-                    ptr_table__NS4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IS4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__MS4G=((__POINTER )(NULL));
-                    result__OS4G=((__POINTER *)ptr_table__NS4G)[ 0];
-                    if ((result__OS4G == (void *)NULL)) {
-                      result__OS4G=new_lab__2QJ(new_size__IS4G);
-                      next__MS4G=(void *)((unsigned long)result__OS4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IS4G)));
-                      ((__POINTER *)next__MS4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__NS4G)[ 0]=next__MS4G;
+                  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;
                     } else {
-                      next__MS4G=((__POINTER *)result__OS4G)[ 0];
-                      if ((next__MS4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OS4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IS4G <<  1)) <=  4096)) {
-                          next__MS4G=(void *)((unsigned long)result__OS4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IS4G)));
+                      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)));
                         } else {
-                          next__MS4G=new_lab__2QJ(new_size__IS4G);
+                          next__0VAH=new_lab__ARJ(new_size__WVAH);
                         };
-                        ((__POINTER *)next__MS4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__NS4G)[ 0]=next__MS4G;
+                        ((__POINTER *)next__0VAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__1VAH)[ 0]=next__0VAH;
                       } else {
-                        ((__POINTER *)result__OS4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MS4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__OS4G=next__MS4G;
+                        ((__POINTER *)result__2VAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__2VAH=next__0VAH;
                       };
                     };
-                    ptr__ES4G=result__OS4G;
+                    ptr__SVAH=result__2VAH;
                   } else {
-                    t__JS4G=((__UINTEGER_32 )typ_id__FS4G);
-                    a__KS4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__VS4G=(__UINTEGER_32)((__UINTEGER_32)(sz__GS4G + a__KS4G) & (__UINTEGER_32)(~ a__KS4G));
-                    ptr_table__SS4G=((__POINTER )(&(table_type[(t__JS4G)])));
-                    lab_type__US4G=(__UINTEGER_32)(t__JS4G |  1);
-                    next__RS4G=((__POINTER )(NULL));
-                    result__TS4G=((__POINTER *)ptr_table__SS4G)[ 0];
-                    if ((result__TS4G == (void *)NULL)) {
-                      result__TS4G=new_lab__2QJ(lab_type__US4G);
-                      next__RS4G=(void *)((unsigned long)result__TS4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VS4G)));
-                      ((__POINTER *)next__RS4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__SS4G)[ 0]=next__RS4G;
+                    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;
                     } else {
-                      next__RS4G=((__POINTER *)result__TS4G)[ 0];
-                      if ((next__RS4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TS4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VS4G <<  1)) <=  4096)) {
-                          next__RS4G=(void *)((unsigned long)result__TS4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VS4G)));
+                      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)));
                         } else {
-                          next__RS4G=new_lab__2QJ(lab_type__US4G);
+                          next__5VAH=new_lab__ARJ(lab_type__CWAH);
                         };
-                        ((__POINTER *)next__RS4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__SS4G)[ 0]=next__RS4G;
+                        ((__POINTER *)next__5VAH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__AWAH)[ 0]=next__5VAH;
                       } else {
-                        ((__POINTER *)result__TS4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RS4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__TS4G=next__RS4G;
+                        ((__POINTER *)result__BWAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5VAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__BWAH=next__5VAH;
                       };
                     };
-                    ptr__ES4G=result__TS4G;
+                    ptr__SVAH=result__BWAH;
                   };
-                  result__DS4G=((__ITM_READ_ARG1 *)ptr__ES4G);
-                  *(result__DS4G) = *(ITM_READ_ARG1__);
+                  result__RVAH=((__ITM_READ_ARG1 *)ptr__SVAH);
+                  *(result__RVAH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__DS4G)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=__tmp__2EBD;
+                ((__ITM_READ_ARG1 *)result__RVAH)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__AFBD;
               };
             };
-            if (((void *)read_contract__XSF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__1SF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__E2D)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__WS4G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__WS4G=FALSE__;
+          result__EWAH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__EWAH=FALSE__;
           } else {
-            result__XS4G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__XS4G=((__CHARACTER )(( 0)));
+            result__FWAH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__FWAH=((__CHARACTER )(( 0)));
             } else {
-              result__XS4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__FWAH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__XS4G == ';')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__WS4G=TRUE__;
+            if ((result__FWAH == ';')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__EWAH=TRUE__;
             };
           };
-          if ((! result__WS4G)) {
-            pos__RCNG=current_position__ZWF();
-            put_error__text__0MG( 2,(&__string_227));
-            put_position__EOG(pos__RCNG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          if (is_shorter__TY) {
-            if ((((! is_short_code__D1) && (old_pos__CXOB !=  0)) && ((void *)((__SECTION_ *)last_section__H0C)->name__SYDC != (void *)(&__string_22)))) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__ZWF()) >>  9) &  255) <  5)) {
-                while_do__R2KE:
+          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:
                 {
-                  result__DRUG='\0';
-                  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                    result__DRUG=((__CHARACTER )(( 0)));
+                  result__4OWG='\0';
+                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                    result__4OWG=((__CHARACTER )(( 0)));
                   } else {
-                    result__DRUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                    result__4OWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                   };
-                  if ((result__DRUG != ((__CHARACTER )(( 0))))) {
-                    result__ERUG='\0';
-                    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                      result__ERUG=((__CHARACTER )(( 0)));
+                  if ((result__4OWG != ((__CHARACTER )(( 0))))) {
+                    result__5OWG='\0';
+                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                      result__5OWG=((__CHARACTER )(( 0)));
                     } else {
-                      result__ERUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                      result__5OWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                     };
-                    __tmp__Q3OB=(((((((result__ERUG == ' ') || (result__ERUG == '\t')) || (result__ERUG == '\n')) || (result__ERUG == '\r')) || (result__ERUG == '\0')) || (result__ERUG == '\f')) || (result__ERUG == '\v'));
+                    __tmp__U3OB=(((((((result__5OWG == ' ') || (result__5OWG == '\t')) || (result__5OWG == '\n')) || (result__5OWG == '\r')) || (result__5OWG == '\0')) || (result__5OWG == '\f')) || (result__5OWG == '\v'));
                   } else {
-                    __tmp__Q3OB=FALSE__;
+                    __tmp__U3OB=FALSE__;
                   };
-                  if (__tmp__Q3OB) {
-                    result__FRUG='\0';
-                    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                      result__FRUG=((__CHARACTER )(( 0)));
+                  if (__tmp__U3OB) {
+                    result__APWG='\0';
+                    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                      result__APWG=((__CHARACTER )(( 0)));
                     } else {
-                      result__FRUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                      result__APWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                     };
-                    __tmp__R3OB=(result__FRUG != '\n');
+                    __tmp__V3OB=(result__APWG != '\n');
                   } else {
-                    __tmp__R3OB=FALSE__;
+                    __tmp__V3OB=FALSE__;
                   };
-                  if (__tmp__R3OB) {
-                    position__CBC=(__INTEGER)(position__CBC +  1);
-                    goto while_do__R2KE;
+                  if (__tmp__V3OB) {
+                    position__GBC=(__INTEGER)(position__GBC +  1);
+                    goto while_do__B5KE;
                   };
                 };
-                result__GRUG='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__GRUG=((__CHARACTER )(( 0)));
+                result__BPWG='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__BPWG=((__CHARACTER )(( 0)));
                 } else {
-                  result__GRUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__BPWG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                if ((result__GRUG == '\n')) {
-                  position__CBC=(__INTEGER)(position__CBC +  1);
+                if ((result__BPWG == '\n')) {
+                  position__GBC=(__INTEGER)(position__GBC +  1);
                 };
               };
-              Self__PN3G=((__STRING *)output_code__SI);
-              start__MN3G=(__INTEGER)(old_pos__CXOB + old_derive__DXOB);
-              end__LN3G=(__INTEGER)((__INTEGER)(position__CBC + short_derive__RBC) -  1);
-              len__NN3G=(__INTEGER)((__INTEGER)(end__LN3G - start__MN3G) +  1);
-              if ((len__NN3G >  0)) {
-                __tmp__ON3G=(__INTEGER)(end__LN3G +  1);
-                __tmp__QN3G=Self__PN3G->count__GFC;
-                Self__RN3G=__tmp__ON3G;
-                while ((Self__RN3G <= __tmp__QN3G)) {
-                  ((__CHARACTER *)Self__PN3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__RN3G - len__NN3G) -  1)]=((__CHARACTER *)Self__PN3G->storage__RBS)[(__INTEGER)(Self__RN3G -  1)];
-                  Self__RN3G=(__INTEGER)(Self__RN3G +  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__PN3G->count__GFC=(__INTEGER)(Self__PN3G->count__GFC - len__NN3G);
+                Self__UQ5G->count__KFC=(__INTEGER)(Self__UQ5G->count__KFC - len__SQ5G);
               };
-              short_derive__RBC=(__INTEGER)(old_derive__DXOB - (__INTEGER)(position__CBC - old_pos__CXOB));
+              short_derive__VBC=(__INTEGER)(old_derive__HXOB - (__INTEGER)(position__GBC - old_pos__GXOB));
             };
           };
-          __tmp__Y4OB=((__PROTOTYPE *)object__ZAC)->slot_list__MUS;
-          if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
-            __tmp__04OB=((__ITM_SLOT *)last_slot__A2D)->parent_named__D5.name__LI;
+          __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;
           } else {
-            __tmp__04OB=((__ITM_SLOT_OPERATOR *)last_slot__A2D)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__44OB=((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          s__EXOB=fast_reference_at__AAGC(__tmp__Y4OB,__tmp__04OB);
-          if (((void *)s__EXOB != (void *)NULL)) {
-            put_error__text__0MG( 1,(&__string_228));
-            if (((struct ___OBJ *)s__EXOB)->__id==__ITM_SLOT__) {
-              __tmp__F5OB=((__ITM_SLOT *)s__EXOB)->parent_named__D5.parent_itm_object__4.position__3CJ;
+          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;
             } else {
-              __tmp__F5OB=((__ITM_SLOT_OPERATOR *)s__EXOB)->parent_itm_slot__4T5B.parent_named__D5.parent_itm_object__4.position__3CJ;
+              __tmp__J5OB=((__ITM_SLOT_OPERATOR *)s__IXOB)->parent_itm_slot__CU5B.parent_named__G5.parent_itm_object__4.position__BDJ;
             };
-            put_position__EOG(__tmp__F5OB);
-            if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
-              __tmp__H5OB=((__ITM_SLOT *)last_slot__A2D)->parent_named__D5.parent_itm_object__4.position__3CJ;
+            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;
             } else {
-              __tmp__H5OB=((__ITM_SLOT_OPERATOR *)last_slot__A2D)->parent_itm_slot__4T5B.parent_named__D5.parent_itm_object__4.position__3CJ;
+              __tmp__L5OB=((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.parent_itm_object__4.position__BDJ;
             };
-            put_position__EOG(__tmp__H5OB);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+            put_position__IOG(__tmp__L5OB);
+            put_string__I1F(msg_err__DNG);
+            if ((type_error__CNG !=  2)) {
               exit(( 1));
             };
           };
-          Self__NFZB=((__PROTOTYPE *)object__ZAC);
-          s__OFZB=last_slot__A2D;
-          __tmp__PFZB=Self__NFZB->slot_list__MUS;
-          if (((struct ___OBJ *)last_slot__A2D)->__id==__ITM_SLOT__) {
-            __tmp__QFZB=((__ITM_SLOT *)last_slot__A2D)->parent_named__D5.name__LI;
+          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;
           } else {
-            __tmp__QFZB=((__ITM_SLOT_OPERATOR *)last_slot__A2D)->parent_itm_slot__4T5B.parent_named__D5.name__LI;
+            __tmp__UFZB=((__ITM_SLOT_OPERATOR *)last_slot__E2D)->parent_itm_slot__CU5B.parent_named__G5.name__LI;
           };
-          fast_put__to__RNGC(__tmp__PFZB,last_slot__A2D,__tmp__QFZB);
-          if (((void *)Self__NFZB->first_slot__SFZB == (void *)NULL)) {
-            Self__NFZB->first_slot__SFZB=s__OFZB;
+          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;
           } else {
-            __tmp__4FZB=Self__NFZB->last_slot__40C;
-            if (((struct ___OBJ *)__tmp__4FZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__4FZB)->next__4GHC=s__OFZB;
+            __tmp__CGZB=Self__RFZB->last_slot__C1C;
+            if (((struct ___OBJ *)__tmp__CGZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__CGZB)->next__CHHC=s__SFZB;
             } else {
-              ((__ITM_SLOT_OPERATOR *)__tmp__4FZB)->parent_itm_slot__4T5B.next__4GHC=s__OFZB;
-            };
-          };
-          Self__NFZB->last_slot__40C=s__OFZB;
-          if (is_shorter__TY) {
-            Self__TJ3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__ZBC);
-            Self__TJ3B->count__IHY= 0;
-            __tmp__VJ3B=Self__TJ3B->buckets__5DV;
-            __tmp__YJ3B=(__INTEGER)(Self__TJ3B->capacity__0HT -  1);
-            Self__DHHC=((void **)__tmp__VJ3B);
-            Self__FZPC=__tmp__YJ3B;
-            while ((Self__FZPC >=  0)) {
-              Self__DHHC[Self__FZPC]=NULL;
-              Self__FZPC=(__INTEGER)(Self__FZPC -  1);
-            };
-          };
-        };
-      } while (result__3WOB);
-      if (is_shorter__TY) {
-        if (((! is_short_private__R1) && ((void *)((__SECTION_ *)last_section__H0C)->name__SYDC == (void *)(&__string_26)))) {
-          Self__YN3G=((__STRING *)output_code__SI);
-          start__VN3G=(__INTEGER)(pos_sec__BXC + old_derive__CXC);
-          end__UN3G=(__INTEGER)((__INTEGER)(position__CBC + short_derive__RBC) -  1);
-          len__WN3G=(__INTEGER)((__INTEGER)(end__UN3G - start__VN3G) +  1);
-          if ((len__WN3G >  0)) {
-            __tmp__XN3G=(__INTEGER)(end__UN3G +  1);
-            __tmp__ZN3G=Self__YN3G->count__GFC;
-            Self__0N3G=__tmp__XN3G;
-            while ((Self__0N3G <= __tmp__ZN3G)) {
-              ((__CHARACTER *)Self__YN3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__0N3G - len__WN3G) -  1)]=((__CHARACTER *)Self__YN3G->storage__RBS)[(__INTEGER)(Self__0N3G -  1)];
-              Self__0N3G=(__INTEGER)(Self__0N3G +  1);
-            };
-            Self__YN3G->count__GFC=(__INTEGER)(Self__YN3G->count__GFC - len__WN3G);
-          };
-          short_derive__RBC=(__INTEGER)(old_derive__CXC - (__INTEGER)(position__CBC - pos_sec__BXC));
-        };
-        pos_sec__BXC=position__CBC;
-        old_derive__CXC=short_derive__RBC;
-      };
-      goto while_do__N4E;
-    };
-  };
-  if (((void *)read_contract__XSF(PARSER__) != (void *)NULL)) {
-    pos__MDNG=current_position__ZWF();
-    put_error__text__0MG( 2,(&__string_229));
-    put_position__EOG(pos__MDNG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+              ((__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)) {
       exit(( 1));
     };
   };
-  read_space__NRD();
-  result__TRUG='\0';
-  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-    result__TRUG=((__CHARACTER )(( 0)));
+  read_space__RRD();
+  result__OPWG='\0';
+  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+    result__OPWG=((__CHARACTER )(( 0)));
   } else {
-    result__TRUG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-  };
-  if ((result__TRUG != ((__CHARACTER )(( 0))))) {
-    pos__ODNG=current_position__ZWF();
-    put_error__text__0MG( 0,(&__string_160));
-    put_position__EOG(pos__ODNG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    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)) {
       exit(( 1));
     };
   };
-  short__token__to__1AD((&__string_118),((__STRING *)source__5AC)->count__GFC,((__STRING *)source__5AC)->count__GFC);
-  object__ZAC=NULL;
+  short__token__to__5AD((&__string_118),((__STRING *)source__DBC)->count__KFC,((__STRING *)source__DBC)->count__KFC);
+  object__3AC=NULL;
 }
 
-static void put__to__like__VYXD(void *tok__XYXD,void *buf__YYXD,void *key__ZYXD)
+static void put__to__like__CZXD(void *tok__EZXD,void *buf__FZXD,void *key__GZXD)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__3N3G,__tmp__5N3G,Self__AO3G,__tmp__FZXD,Self__5WME;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WP4D;
-  void *result__BQ4D,*lst__0YXD;
-  void *node__AQ4D;
-  Self__WP4D=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-  result__BQ4D=NULL;
-  result__3N3G= 0;
-  __tmp__5N3G=((__STRING_CONSTANT *)key__ZYXD)->count__DD;
-  Self__AO3G= 1;
-  while ((Self__AO3G <= __tmp__5N3G)) {
-    result__3N3G=(__INTEGER)((__INTEGER)( 5 * result__3N3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)key__ZYXD)->storage__FQO)[(__INTEGER)(Self__AO3G -  1)])));
-    Self__AO3G=(__INTEGER)(Self__AO3G +  1);
-  };
-  if ((result__3N3G <  0)) {
-    result__3N3G=(__INTEGER)(~ result__3N3G);
-  };
-  node__AQ4D=((void **)Self__WP4D->buckets__PCT)[(__INTEGER)(result__3N3G % Self__WP4D->capacity__KCT)];
-  while ((! (((void *)node__AQ4D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AQ4D)->key__1CT == (void *)key__ZYXD)))) {
-    node__AQ4D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AQ4D)->next__GDT;
-  };
-  if (((void *)node__AQ4D != (void *)NULL)) {
-    result__BQ4D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AQ4D)->item__XX3;
-  };
-  lst__0YXD=result__BQ4D;
-  if (((void *)result__BQ4D != (void *)NULL)) {
-    __tmp__FZXD=((__LINKED_LISToSTRING_CONSTANTo *)result__BQ4D)->parent_linked_collection__LD.upper__PCD;
-    Self__5WME= 1;
-    while ((Self__5WME <= __tmp__FZXD)) {
-      if (((void *)item__I0ND(lst__0YXD,Self__5WME) == (void *)NULL)) {
-        append__RNS(buf__YYXD,tok__XYXD);
-      } else {
-        append__RNS(buf__YYXD,item__I0ND(lst__0YXD,Self__5WME));
-      };
-      Self__5WME=(__INTEGER)(Self__5WME +  1);
+  __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);
+      } else {
+        append__VNS(buf__FZXD,item__M0ND(lst__HZXD,Self__PZME));
+      };
+      Self__PZME=(__INTEGER)(Self__PZME +  1);
     };
   };
 }
 
-static void pretty_name_in__JT1E(__ITM_SLOT *Self__KT1E,void *buffer__LT1E)
+static void pretty_name_in__DW1E(__ITM_SLOT *Self__EW1E,void *buffer__FW1E)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__MT1E;
-  __STRING_CONSTANT *Self__3O1G;
-  j__MT1E= 1;
-  while ((j__MT1E < ((__STRING_CONSTANT *)Self__KT1E->parent_named__D5.name__LI)->count__DD)) {
-    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__KT1E->parent_named__D5.name__LI)->storage__FQO)[(__INTEGER)(j__MT1E -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__KT1E->parent_named__D5.name__LI)->storage__FQO)[(__INTEGER)((__INTEGER)(j__MT1E +  1) -  1)] == '_'))) {
-      add_last__JLT(buffer__LT1E,' ');
-      j__MT1E=(__INTEGER)(j__MT1E +  2);
+  __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);
     } else {
-      add_last__JLT(buffer__LT1E,((__CHARACTER *)((__STRING_CONSTANT *)Self__KT1E->parent_named__D5.name__LI)->storage__FQO)[(__INTEGER)(j__MT1E -  1)]);
-      j__MT1E=(__INTEGER)(j__MT1E +  1);
+      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);
     };
   };
-  Self__3O1G=((__STRING_CONSTANT *)Self__KT1E->parent_named__D5.name__LI);
-  add_last__JLT(buffer__LT1E,((__CHARACTER *)Self__3O1G->storage__FQO)[(__INTEGER)(Self__3O1G->count__DD -  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)]);
 }
 
-static void pretty_name_in__4U1E(__ITM_SLOT_OPERATOR *Self__5U1E,void *buffer__AV1E)
+static void pretty_name_in__YX1E(__ITM_SLOT_OPERATOR *Self__ZX1E,void *buffer__0X1E)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__LQAH,*Self__SCQE;
-  __INTEGER i__JQAH,i__WCQE;
-  __BOOLEAN result__IQAH,__tmp__LV1E,result__VCQE;
-  Self__LQAH=((__STRING_CONSTANT *)Self__5U1E->parent_itm_slot__4T5B.parent_named__D5.name__LI);
-  result__IQAH=FALSE__;
-  i__JQAH= 0;
-  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__LQAH->count__DD)) {
-    i__JQAH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
-    while ((! ((i__JQAH ==  0) || (((__CHARACTER *)Self__LQAH->storage__FQO)[(__INTEGER)(i__JQAH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__FQO)[(__INTEGER)(i__JQAH -  1)])))) {
-      i__JQAH=(__INTEGER)(i__JQAH -  1);
-    };
-    result__IQAH=(i__JQAH ==  0);
-  };
-  if (result__IQAH) {
-    append__RNS(buffer__AV1E,(&__string_230));
-    __tmp__LV1E=TRUE__;
+  __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__;
   } else {
-    __tmp__LV1E=FALSE__;
+    __tmp__FY1E=FALSE__;
   };
-  if ((! __tmp__LV1E)) {
-    Self__SCQE=((__STRING_CONSTANT *)Self__5U1E->parent_itm_slot__4T5B.parent_named__D5.name__LI);
-    result__VCQE=FALSE__;
-    i__WCQE= 0;
-    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__SCQE->count__DD)) {
-      i__WCQE=((__STRING_CONSTANT *)(&__string_81))->count__DD;
-      while ((! ((i__WCQE ==  0) || (((__CHARACTER *)Self__SCQE->storage__FQO)[(__INTEGER)(i__WCQE -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__FQO)[(__INTEGER)(i__WCQE -  1)])))) {
-        i__WCQE=(__INTEGER)(i__WCQE -  1);
+  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);
       };
-      result__VCQE=(i__WCQE ==  0);
+      result__GFQE=(i__HFQE ==  0);
     };
-    if (result__VCQE) {
-      append__RNS(buffer__AV1E,(&__string_231));
+    if (result__GFQE) {
+      append__VNS(buffer__0X1E,(&__string_233));
     } else {
-      append__RNS(buffer__AV1E,(&__string_232));
+      append__VNS(buffer__0X1E,(&__string_234));
     };
   };
-  append__RNS(buffer__AV1E,Self__5U1E->pretty_name__F0HC);
-  add_last__JLT(buffer__AV1E,'\'');
+  append__VNS(buffer__0X1E,Self__ZX1E->pretty_name__J0HC);
+  add_last__NLT(buffer__0X1E,'\'');
 }
 
-static void get_all_comment_slot__in__UW1E(__PROTOTYPE *Self__VW1E,void *n__WW1E,void *buf__XW1E)
+static void get_all_comment_slot__in__OZ1E(__PROTOTYPE *Self__PZ1E,void *n__QZ1E,void *buf__RZ1E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *ps__ZW1E,*__tmp__HY1E;
-  void *p__0W1E;
-  __INTEGER i__1W1E;
-  void *s__YW1E,*__tmp__2Z1E;
-  void *__tmp__DX1E,*__tmp__MX1E,*__tmp__GZ1E,*__tmp__HZ1E;
-  void *__tmp__0X1E;
-  __SECTION_ *Self__LMSG;
-  void *__tmp__FY1E;
-  __BOOLEAN __tmp__GX1E,__tmp__4X1E;
-  ps__ZW1E=NULL;
-  p__0W1E=NULL;
-  i__1W1E= 0;
-  s__YW1E=fast_reference_at__AAGC(Self__VW1E->slot_list__MUS,n__WW1E);
-  if (((void *)s__YW1E != (void *)NULL)) {
-    if (((struct ___OBJ *)s__YW1E)->__id==__ITM_SLOT__) {
-      __tmp__DX1E=((__ITM_SLOT *)s__YW1E)->comment__GJJD;
-    } else {
-      __tmp__DX1E=((__ITM_SLOT_OPERATOR *)s__YW1E)->parent_itm_slot__4T5B.comment__GJJD;
-    };
-    __tmp__GX1E=((void *)__tmp__DX1E != (void *)NULL);
+  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);
   } else {
-    __tmp__GX1E=FALSE__;
+    __tmp__A01E=FALSE__;
   };
-  if (__tmp__GX1E) {
-    if (((struct ___OBJ *)s__YW1E)->__id==__ITM_SLOT__) {
-      __tmp__MX1E=((__ITM_SLOT *)s__YW1E)->comment__GJJD;
+  if (__tmp__A01E) {
+    if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
+      __tmp__G01E=((__ITM_SLOT *)s__SZ1E)->comment__KJJD;
     } else {
-      __tmp__MX1E=((__ITM_SLOT_OPERATOR *)s__YW1E)->parent_itm_slot__4T5B.comment__GJJD;
+      __tmp__G01E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.comment__KJJD;
     };
-    append__RNS(buf__XW1E,__tmp__MX1E);
+    append__VNS(buf__RZ1E,__tmp__G01E);
   };
-  s__YW1E=Self__VW1E->first_slot__SFZB;
-  while_do__WRDF:
+  s__SZ1E=Self__PZ1E->first_slot__WFZB;
+  while_do__SXDF:
   {
-    if (((void *)s__YW1E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__YW1E)->__id==__ITM_SLOT__) {
-        __tmp__0X1E=((__ITM_SLOT *)s__YW1E)->id_section__I1C;
+    if (((void *)s__SZ1E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
+        __tmp__U01E=((__ITM_SLOT *)s__SZ1E)->id_section__M1C;
       } else {
-        __tmp__0X1E=((__ITM_SLOT_OPERATOR *)s__YW1E)->parent_itm_slot__4T5B.id_section__I1C;
+        __tmp__U01E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.id_section__M1C;
       };
-      Self__LMSG=((__SECTION_ *)__tmp__0X1E);
-      __tmp__4X1E=(((void *)Self__LMSG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__LMSG->name__SYDC == (void *)(&__string_24)));
+      Self__DKUG=((__SECTION_ *)__tmp__U01E);
+      __tmp__Y01E=(((void *)Self__DKUG->name__WYDC == (void *)(&__string_23)) || ((void *)Self__DKUG->name__WYDC == (void *)(&__string_24)));
     } else {
-      __tmp__4X1E=FALSE__;
+      __tmp__Y01E=FALSE__;
     };
-    if (__tmp__4X1E) {
-      if (((struct ___OBJ *)s__YW1E)->__id==__ITM_SLOT__) {
-        __tmp__FY1E=((__ITM_SLOT *)s__YW1E)->result_type__K4FC;
+    if (__tmp__Y01E) {
+      if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
+        __tmp__501E=((__ITM_SLOT *)s__SZ1E)->result_type__O4FC;
       } else {
-        __tmp__FY1E=((__ITM_SLOT_OPERATOR *)s__YW1E)->parent_itm_slot__4T5B.result_type__K4FC;
+        __tmp__501E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.result_type__O4FC;
       };
-      if (__tmp__FY1E==NULL) {
-        __tmp__HY1E=NULL;
+      if (__tmp__501E==NULL) {
+        __tmp__B11E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__FY1E)->__id) {
+        switch (((struct ___OBJ *)__tmp__501E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__HY1E=((void *)__tmp__FY1E);
+          __tmp__B11E=((void *)__tmp__501E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__HY1E=((void *)__tmp__FY1E);
+          __tmp__B11E=((void *)__tmp__501E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__HY1E=NULL;
+          __tmp__B11E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__HY1E=NULL;
+          __tmp__B11E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__HY1E=((void *)__tmp__FY1E);
+          __tmp__B11E=((void *)__tmp__501E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__HY1E=((void *)__tmp__FY1E);
+          __tmp__B11E=((void *)__tmp__501E);
         } break;
         }
       };
-      ps__ZW1E=__tmp__HY1E;
-      if (((void *)__tmp__HY1E != (void *)NULL)) {
-        p__0W1E=NULL;
-        i__1W1E= 0;
-        while (((i__1W1E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__0W1E == (void *)NULL))) {
-          __tmp__GZ1E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__0ST)[i__1W1E])->parent_named__5.name__LI;
-          switch (((struct ___OBJ *)ps__ZW1E)->__id) {
+      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) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__HZ1E=((__ITM_TYPE_PARAMETER *)ps__ZW1E)->parent_itm_type__NDE.name__0XP;
+            __tmp__B21E=((__ITM_TYPE_PARAMETER *)ps__TZ1E)->parent_itm_type__RDE.name__4XP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__HZ1E=((__ITM_TYPE_SIMPLE *)ps__ZW1E)->name__0XP;
+            __tmp__B21E=((__ITM_TYPE_SIMPLE *)ps__TZ1E)->name__4XP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__HZ1E=((__ITM_TYPE_GENERIC *)ps__ZW1E)->parent_itm_type_style__SRN.parent_itm_type_simple__RRN.name__0XP;
+            __tmp__B21E=((__ITM_TYPE_GENERIC *)ps__TZ1E)->parent_itm_type_style__WRN.parent_itm_type_simple__VRN.name__4XP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__HZ1E=((__ITM_TYPE_STYLE *)ps__ZW1E)->parent_itm_type_simple__RRN.name__0XP;
+            __tmp__B21E=((__ITM_TYPE_STYLE *)ps__TZ1E)->parent_itm_type_simple__VRN.name__4XP;
           } break;
           };
-          if (((void *)__tmp__GZ1E == (void *)__tmp__HZ1E)) {
-            p__0W1E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__0ST)[i__1W1E];
+          if (((void *)__tmp__A21E == (void *)__tmp__B21E)) {
+            p__UZ1E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__4ST)[i__VZ1E];
           };
-          i__1W1E=(__INTEGER)(i__1W1E +  1);
+          i__VZ1E=(__INTEGER)(i__VZ1E +  1);
         };
-        if (((void *)p__0W1E != (void *)NULL)) {
-          get_all_comment_slot__in__UW1E(p__0W1E,n__WW1E,buf__XW1E);
+        if (((void *)p__UZ1E != (void *)NULL)) {
+          get_all_comment_slot__in__OZ1E(p__UZ1E,n__QZ1E,buf__RZ1E);
         };
       };
-      if (((struct ___OBJ *)s__YW1E)->__id==__ITM_SLOT__) {
-        __tmp__2Z1E=((__ITM_SLOT *)s__YW1E)->next__4GHC;
+      if (((struct ___OBJ *)s__SZ1E)->__id==__ITM_SLOT__) {
+        __tmp__W21E=((__ITM_SLOT *)s__SZ1E)->next__CHHC;
+      } else {
+        __tmp__W21E=((__ITM_SLOT_OPERATOR *)s__SZ1E)->parent_itm_slot__CU5B.next__CHHC;
+      };
+      s__SZ1E=__tmp__W21E;
+      goto while_do__SXDF;
+    };
+  };
+}
+
+static void shorter_profile_in__JB2E(__ITM_SLOT *Self__KB2E,void *buf__LB2E)
+// ({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));
+  } else {
+    put__to__like__QJIF((&__string_236),buf__LB2E,(&__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);
+  } 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) {
+    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));
+      } else {
+        put__to__like__L3LF(Self__RV1G->parent_itm_type__RDE.name__4XP,buf__LB2E,(&__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));
+      } else {
+        put__to__like__C5LF(Self__TV1G->name__4XP,buf__LB2E,(&__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,')');
+    } break;
+    case __ITM_TYPE_BLOCK__: {
+      shorter_in__FXJF(__tmp__DC2E,buf__LB2E);
+    } break;
+    case __ITM_TYPE_GENERIC__: {
+      shorter_in__NYJF(__tmp__DC2E,buf__LB2E);
+    } 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,' ');
+      };
+      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));
+      } else {
+        put__to__like__HBMF(Self__HWAH->parent_itm_type_simple__VRN.name__4XP,buf__LB2E,(&__string_125));
+      };
+    } break;
+    };
+  };
+}
+
+static void shorter_profile_in__GC2E(__ITM_SLOT_OPERATOR *Self__HC2E,void *buf__IC2E)
+// ({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));
+  } 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__;
+  } 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 {
-        __tmp__2Z1E=((__ITM_SLOT_OPERATOR *)s__YW1E)->parent_itm_slot__4T5B.next__4GHC;
+        shorter_in__NPOF(__tmp__F3DF,buf__IC2E);
       };
-      s__YW1E=__tmp__2Z1E;
-      goto while_do__WRDF;
+    };
+  };
+  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) {
+    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));
+      } else {
+        put__to__like__L3LF(Self__VV1G->parent_itm_type__RDE.name__4XP,buf__IC2E,(&__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));
+      } else {
+        put__to__like__C5LF(Self__XV1G->name__4XP,buf__IC2E,(&__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,')');
+    } break;
+    case __ITM_TYPE_BLOCK__: {
+      shorter_in__FXJF(__tmp__AD2E,buf__IC2E);
+    } break;
+    case __ITM_TYPE_GENERIC__: {
+      shorter_in__NYJF(__tmp__AD2E,buf__IC2E);
+    } 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,' ');
+      };
+      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));
+      } else {
+        put__to__like__HBMF(Self__TWAH->parent_itm_type_simple__VRN.name__4XP,buf__IC2E,(&__string_125));
+      };
+    } break;
     };
   };
 }
 
-static __CHARACTER* create__RLEB(__INTEGER nb_elements__TLEB)
+static __CHARACTER* create__VLEB(__INTEGER nb_elements__XLEB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__LWZG,a__LP1G,new_size__MWZG,new_size2__NWZG,a__PP1G;
-  __UINTEGER_32 new_size__QP1G;
-  __POINTER result__KWZG,ptr_table__0S4G,next__ZS4G,result__1S4G;
-  void *result__4S4G;
-  __INTEGER Self__BUKC;
-  __CHARACTER *Result__SAKB;
-  sz__LWZG=((__UINTEGER_32 )nb_elements__TLEB);
-  result__KWZG=((__POINTER )(NULL));
-  a__LP1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__MWZG=(__UINTEGER_32)((__UINTEGER_32)(sz__LWZG + a__LP1G) & (__UINTEGER_32)(~ a__LP1G));
-  new_size2__NWZG=(__UINTEGER_32)(new_size__MWZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__NWZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__PP1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__QP1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NWZG + a__PP1G) & (__UINTEGER_32)(~ a__PP1G));
-    ptr_table__0S4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QP1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__ZS4G=((__POINTER )(NULL));
-    result__1S4G=((__POINTER *)ptr_table__0S4G)[ 0];
-    if ((result__1S4G == (void *)NULL)) {
-      result__1S4G=new_lab__2QJ(new_size__QP1G);
-      next__ZS4G=(void *)((unsigned long)result__1S4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QP1G)));
-      ((__POINTER *)next__ZS4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__0S4G)[ 0]=next__ZS4G;
-    } else {
-      next__ZS4G=((__POINTER *)result__1S4G)[ 0];
-      if ((next__ZS4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1S4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QP1G <<  1)) <=  4096)) {
-          next__ZS4G=(void *)((unsigned long)result__1S4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QP1G)));
-        } else {
-          next__ZS4G=new_lab__2QJ(new_size__QP1G);
-        };
-        ((__POINTER *)next__ZS4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0S4G)[ 0]=next__ZS4G;
-      } else {
-        ((__POINTER *)result__1S4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZS4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__1S4G=next__ZS4G;
-      };
-    };
-    ((__POINTER *)result__1S4G)[ 0]=((__POINTER ) 3);
-    result__KWZG=(void *)((unsigned long)result__1S4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__4S4G=first_free__HDVB;
-    while ((((void *)result__4S4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4S4G)->map_size_and_id__YSB &  4294967292LU) < new_size__MWZG))) {
-      result__4S4G=((__MEMORY *)result__4S4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__4S4G == (void *)NULL)) {
-      result__4S4G=new_page__454();
+    if (((void *)result__0WAH == (void *)NULL)) {
+      result__0WAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__4S4G,new_size__MWZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4S4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__KWZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4S4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__SAKB=((__CHARACTER *)result__KWZG);
-  Self__BUKC=(__INTEGER)(nb_elements__TLEB -  1);
-  while ((Self__BUKC >=  0)) {
-    Result__SAKB[Self__BUKC]='\0';
-    Self__BUKC=(__INTEGER)(Self__BUKC -  1);
+  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);
   };
-  return(Result__SAKB);
+  return(Result__WAKB);
 }
 
-static __POINTER realloc_dynamic__old_size__new_size__BELC(__POINTER p__DELC,__UINTEGER_32 old_sz__EELC,__UINTEGER_32 new_sz__FELC)
+static __POINTER realloc_dynamic__old_size__new_size__FELC(__POINTER p__HELC,__UINTEGER_32 old_sz__IELC,__UINTEGER_32 new_sz__JELC)
 // ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  void *mem__QELC,*result__OT4G,*nxt__ZCED,*result__0CED,*result__RT4G;
-  void *next__QBND,*new_free__PBND,*prev__CR1G,*next__DR1G;
-  __POINTER result__RELC,result__WWZG,ptr_table__KT4G,next__JT4G;
-  __POINTER result__LT4G,__tmp__VFLC,last__2NHD,src__FAED,dst__GAED;
-  __UINTEGER_32 a__BQ1G,old_size__HELC,old_size2__KELC,a__FQ1G;
-  __UINTEGER_32 new_size__NELC,a__JQ1G,new_size__YWZG,new_size2__ZWZG;
-  __UINTEGER_32 a__NQ1G,new_size__OQ1G,a__CRH,__tmp__CGLC,sz__4CED;
-  __UINTEGER_32 old_size__1CED,prev__RBND,new_size__UBND;
-  __INTEGER siz__DO3G,Self__IO3G,siz__KAED,Self__PLHD;
-  __MEMORY *Self__VCED;
-  __POINTER *na_src__FO3G,*na_dst__HO3G,*na_src__IAED,*na_dst__JAED;
-  mem__QELC=NULL;
-  result__RELC=((__POINTER )(NULL));
-  a__BQ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  old_size__HELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__EELC + a__BQ1G) & (__UINTEGER_32)(~ a__BQ1G));
-  old_size2__KELC=(__UINTEGER_32)(old_size__HELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  a__FQ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NELC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__FELC + a__FQ1G) & (__UINTEGER_32)(~ a__FQ1G));
-  if ((old_size2__KELC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    result__WWZG=((__POINTER )(NULL));
-    a__JQ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__YWZG=(__UINTEGER_32)((__UINTEGER_32)(new_size__NELC + a__JQ1G) & (__UINTEGER_32)(~ a__JQ1G));
-    new_size2__ZWZG=(__UINTEGER_32)(new_size__YWZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__ZWZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__NQ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OQ1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZWZG + a__NQ1G) & (__UINTEGER_32)(~ a__NQ1G));
-      ptr_table__KT4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OQ1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JT4G=((__POINTER )(NULL));
-      result__LT4G=((__POINTER *)ptr_table__KT4G)[ 0];
-      if ((result__LT4G == (void *)NULL)) {
-        result__LT4G=new_lab__2QJ(new_size__OQ1G);
-        next__JT4G=(void *)((unsigned long)result__LT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQ1G)));
-        ((__POINTER *)next__JT4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KT4G)[ 0]=next__JT4G;
-      } else {
-        next__JT4G=((__POINTER *)result__LT4G)[ 0];
-        if ((next__JT4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LT4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OQ1G <<  1)) <=  4096)) {
-            next__JT4G=(void *)((unsigned long)result__LT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQ1G)));
-          } else {
-            next__JT4G=new_lab__2QJ(new_size__OQ1G);
-          };
-          ((__POINTER *)next__JT4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KT4G)[ 0]=next__JT4G;
-        } else {
-          ((__POINTER *)result__LT4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JT4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LT4G=next__JT4G;
-        };
-      };
-      ((__POINTER *)result__LT4G)[ 0]=((__POINTER ) 3);
-      result__WWZG=(void *)((unsigned long)result__LT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__OT4G=first_free__HDVB;
-      while ((((void *)result__OT4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OT4G)->map_size_and_id__YSB &  4294967292LU) < new_size__YWZG))) {
-        result__OT4G=((__MEMORY *)result__OT4G)->map_next_free__ZSB;
-      };
-      if (((void *)result__OT4G == (void *)NULL)) {
-        result__OT4G=new_page__454();
-      };
-      to_busy__index__DTFC(result__OT4G,new_size__YWZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OT4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-      result__WWZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OT4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    result__RELC=result__WWZG;
-    siz__DO3G=((__INTEGER )old_size__HELC);
-    siz__DO3G=(__INTEGER)(siz__DO3G / ((__INTEGER )(sizeof(void *))));
-    na_src__FO3G=((__POINTER *)p__DELC);
-    na_dst__HO3G=((__POINTER *)result__WWZG);
-    Self__IO3G=(__INTEGER)(siz__DO3G -  1);
-    while ((Self__IO3G >=  0)) {
-      na_dst__HO3G[Self__IO3G]=na_src__FO3G[Self__IO3G];
-      Self__IO3G=(__INTEGER)(Self__IO3G -  1);
-    };
-    __tmp__VFLC=(void *)((unsigned long)p__DELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
-    a__CRH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    last__2NHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__KELC + a__CRH) & (__UINTEGER_32)(~ a__CRH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
-    ((__POINTER *)__tmp__VFLC)[ 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__2NHD)[ 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__2NHD)[ 0]=__tmp__VFLC;
+  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;
   } else {
-    mem__QELC=((void *)(void *)((unsigned long)p__DELC - (unsigned long)((__POINTER ) 8)));
-    __tmp__CGLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__DELC - (unsigned long)begin_memory__5UH)))) >>  26);
-    Self__VCED=((__MEMORY *)mem__QELC);
-    nxt__ZCED=NULL;
-    result__0CED=NULL;
-    sz__4CED= 0;
-    old_size__1CED=(__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  4294967292LU);
-    if ((new_size__NELC > old_size__1CED)) {
-      if ((! ((__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  2) !=  0))) {
-        nxt__ZCED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__VCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  4294967292LU)))));
-        sz__4CED=(__UINTEGER_32)((__UINTEGER_32)(new_size__NELC - old_size__1CED) -  8);
-        if ((((__UINTEGER_32)(((__MEMORY *)nxt__ZCED)->map_size_and_id__YSB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__ZCED)->map_size_and_id__YSB &  4294967292LU) >= sz__4CED))) {
-          to_busy__index__DTFC(nxt__ZCED,sz__4CED,__tmp__CGLC);
-          Self__VCED->map_size_and_id__YSB=(__UINTEGER_32)((__UINTEGER_32)(Self__VCED->map_size_and_id__YSB + (__UINTEGER_32)(((__MEMORY *)nxt__ZCED)->map_size_and_id__YSB &  4294967294LU)) +  8);
-          if (((__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  2) !=  0)) {
-            last_block[(__tmp__CGLC)] = (Self__VCED);
-          } else {
-            nxt__ZCED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__VCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  4294967292LU)))));
-            ((__MEMORY *)nxt__ZCED)->map_previous_linear__XSB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__VCED) - (unsigned long)begin_memory__5UH))));
-          };
-          result__0CED=Self__VCED;
-        };
-      };
-      if (((void *)result__0CED == (void *)NULL)) {
-        result__RT4G=first_free__HDVB;
-        while ((((void *)result__RT4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__RT4G)->map_size_and_id__YSB &  4294967292LU) < new_size__NELC))) {
-          result__RT4G=((__MEMORY *)result__RT4G)->map_next_free__ZSB;
-        };
-        if (((void *)result__RT4G == (void *)NULL)) {
-          result__RT4G=new_page__454();
-        };
-        to_busy__index__DTFC(result__RT4G,new_size__NELC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__RT4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-        result__0CED=result__RT4G;
-        src__FAED=(void *)((unsigned long)((__POINTER )Self__VCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-        dst__GAED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__RT4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-        siz__KAED=((__INTEGER )old_size__1CED);
-        siz__KAED=(__INTEGER)(siz__KAED / ((__INTEGER )(sizeof(void *))));
-        na_src__IAED=((__POINTER *)src__FAED);
-        na_dst__JAED=((__POINTER *)dst__GAED);
-        Self__PLHD=(__INTEGER)(siz__KAED -  1);
-        while ((Self__PLHD >=  0)) {
-          na_dst__JAED[Self__PLHD]=na_src__IAED[Self__PLHD];
-          Self__PLHD=(__INTEGER)(Self__PLHD -  1);
-        };
-        prev__RBND=Self__VCED->map_previous_linear__XSB;
-        next__QBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__VCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  4294967292LU)))));
-        new_free__PBND=((void *)(void *)((unsigned long)begin_memory__5UH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__RBND))));
-        new_size__UBND=(__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  4294967294LU);
-        if (((prev__RBND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__PBND)->map_size_and_id__YSB &  1) !=  0))) {
-          new_free__PBND=Self__VCED;
-          Self__VCED->map_next_free__ZSB=first_free__HDVB;
-          Self__VCED->map_previous_free__0SB=NULL;
-          if (((void *)first_free__HDVB != (void *)NULL)) {
-            ((__MEMORY *)first_free__HDVB)->map_previous_free__0SB=Self__VCED;
-          };
-          first_free__HDVB=Self__VCED;
-        } else {
-          new_size__UBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__UBND + ((__MEMORY *)new_free__PBND)->map_size_and_id__YSB) +  8);
-        };
-        if (((! ((__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__QBND)->map_size_and_id__YSB &  1) ==  0))) {
-          new_size__UBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__UBND + ((__MEMORY *)next__QBND)->map_size_and_id__YSB) +  8);
-          prev__CR1G=((__MEMORY *)next__QBND)->map_previous_free__0SB;
-          next__DR1G=((__MEMORY *)next__QBND)->map_next_free__ZSB;
-          if (((void *)prev__CR1G == (void *)NULL)) {
-            first_free__HDVB=next__DR1G;
-          } else {
-            ((__MEMORY *)prev__CR1G)->map_next_free__ZSB=next__DR1G;
-          };
-          if (((void *)next__DR1G != (void *)NULL)) {
-            ((__MEMORY *)next__DR1G)->map_previous_free__0SB=prev__CR1G;
-          };
-        };
-        ((__MEMORY *)new_free__PBND)->map_size_and_id__YSB=new_size__UBND;
-        if (((__UINTEGER_32)(((__MEMORY *)new_free__PBND)->map_size_and_id__YSB &  2) !=  0)) {
-          last_block[(__tmp__CGLC)] = (new_free__PBND);
-        } else {
-          next__QBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__VCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__VCED->map_size_and_id__YSB &  4294967292LU)))));
-          ((__MEMORY *)next__QBND)->map_previous_linear__XSB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__PBND) - (unsigned long)begin_memory__5UH))));
-        };
-      };
-    } else {
-      result__0CED=Self__VCED;
-    };
-    result__RELC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0CED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-  };
-  return(result__RELC);
+    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);
 }
 
-static void** create__DBRB(__INTEGER nb_elements__FBRB)
+static void** create__HBRB(__INTEGER nb_elements__JBRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__CXZG,a__HXZG,new_size__DXZG,new_size2__EXZG,a__BS1G;
-  __UINTEGER_32 new_size__CS1G;
-  __POINTER result__BXZG,ptr_table__VT4G,next__UT4G,result__WT4G;
-  void *result__ZT4G;
-  __INTEGER Self__U4MC;
-  void **Result__L4TB;
-  sz__CXZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__FBRB * ((__INTEGER )(sizeof(void *)))));
-  result__BXZG=((__POINTER )(NULL));
-  a__HXZG=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__DXZG=(__UINTEGER_32)((__UINTEGER_32)(sz__CXZG + a__HXZG) & (__UINTEGER_32)(~ a__HXZG));
-  new_size2__EXZG=(__UINTEGER_32)(new_size__DXZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__EXZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BS1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CS1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EXZG + a__BS1G) & (__UINTEGER_32)(~ a__BS1G));
-    ptr_table__VT4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CS1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__UT4G=((__POINTER )(NULL));
-    result__WT4G=((__POINTER *)ptr_table__VT4G)[ 0];
-    if ((result__WT4G == (void *)NULL)) {
-      result__WT4G=new_lab__2QJ(new_size__CS1G);
-      next__UT4G=(void *)((unsigned long)result__WT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CS1G)));
-      ((__POINTER *)next__UT4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__VT4G)[ 0]=next__UT4G;
-    } else {
-      next__UT4G=((__POINTER *)result__WT4G)[ 0];
-      if ((next__UT4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WT4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CS1G <<  1)) <=  4096)) {
-          next__UT4G=(void *)((unsigned long)result__WT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CS1G)));
-        } else {
-          next__UT4G=new_lab__2QJ(new_size__CS1G);
-        };
-        ((__POINTER *)next__UT4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VT4G)[ 0]=next__UT4G;
-      } else {
-        ((__POINTER *)result__WT4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__UT4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__WT4G=next__UT4G;
-      };
-    };
-    ((__POINTER *)result__WT4G)[ 0]=((__POINTER ) 3);
-    result__BXZG=(void *)((unsigned long)result__WT4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__ZT4G=first_free__HDVB;
-    while ((((void *)result__ZT4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ZT4G)->map_size_and_id__YSB &  4294967292LU) < new_size__DXZG))) {
-      result__ZT4G=((__MEMORY *)result__ZT4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__ZT4G == (void *)NULL)) {
-      result__ZT4G=new_page__454();
+    if (((void *)result__VXAH == (void *)NULL)) {
+      result__VXAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__ZT4G,new_size__DXZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZT4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__BXZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZT4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__L4TB=((void **)result__BXZG);
-  Self__U4MC=(__INTEGER)(nb_elements__FBRB -  1);
-  while ((Self__U4MC >=  0)) {
-    Result__L4TB[Self__U4MC]=NULL;
-    Self__U4MC=(__INTEGER)(Self__U4MC -  1);
+  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);
   };
-  return(Result__L4TB);
+  return(Result__P4TB);
 }
 
-static void* fast_reference_at__I1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__J1T,void *k__K1T)
+static void* fast_reference_at__M1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__N1T,void *k__O1T)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__V1T;
-  __STRING_CONSTANT *Self__VO3G;
-  __INTEGER result__UO3G,__tmp__WO3G,Self__XO3G;
-  void *node__U1T;
-  result__V1T=NULL;
-  Self__VO3G=((__STRING_CONSTANT *)k__K1T);
-  result__UO3G= 0;
-  __tmp__WO3G=Self__VO3G->count__DD;
-  Self__XO3G= 1;
-  while ((Self__XO3G <= __tmp__WO3G)) {
-    result__UO3G=(__INTEGER)((__INTEGER)( 5 * result__UO3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__VO3G->storage__FQO)[(__INTEGER)(Self__XO3G -  1)])));
-    Self__XO3G=(__INTEGER)(Self__XO3G +  1);
-  };
-  if ((result__UO3G <  0)) {
-    result__UO3G=(__INTEGER)(~ result__UO3G);
-  };
-  node__U1T=((void **)Self__J1T->buckets__21T)[(__INTEGER)(result__UO3G % Self__J1T->capacity__X1T)];
-  while ((! (((void *)node__U1T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__U1T)->key__I2T == (void *)k__K1T)))) {
-    node__U1T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__U1T)->next__T2T;
-  };
-  if (((void *)node__U1T != (void *)NULL)) {
-    result__V1T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__U1T)->item__12T;
-  };
-  return(result__V1T);
+  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);
 }
 
-static void** create__4XGE(__INTEGER nb_elements__AYGE)
+static void** create__G0GE(__INTEGER nb_elements__I0GE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__KXZG,a__PXZG,new_size__LXZG,new_size2__MXZG,a__CT1G;
-  __UINTEGER_32 new_size__DT1G;
-  __POINTER result__JXZG,ptr_table__3T4G,next__2T4G,result__4T4G;
-  void *result__BU4G;
-  __INTEGER Self__KFXE;
-  void **Result__YHME;
-  sz__KXZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__AYGE * ((__INTEGER )(sizeof(void *)))));
-  result__JXZG=((__POINTER )(NULL));
-  a__PXZG=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__LXZG=(__UINTEGER_32)((__UINTEGER_32)(sz__KXZG + a__PXZG) & (__UINTEGER_32)(~ a__PXZG));
-  new_size2__MXZG=(__UINTEGER_32)(new_size__LXZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__MXZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__CT1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__DT1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MXZG + a__CT1G) & (__UINTEGER_32)(~ a__CT1G));
-    ptr_table__3T4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DT1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__2T4G=((__POINTER )(NULL));
-    result__4T4G=((__POINTER *)ptr_table__3T4G)[ 0];
-    if ((result__4T4G == (void *)NULL)) {
-      result__4T4G=new_lab__2QJ(new_size__DT1G);
-      next__2T4G=(void *)((unsigned long)result__4T4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DT1G)));
-      ((__POINTER *)next__2T4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__3T4G)[ 0]=next__2T4G;
-    } else {
-      next__2T4G=((__POINTER *)result__4T4G)[ 0];
-      if ((next__2T4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4T4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DT1G <<  1)) <=  4096)) {
-          next__2T4G=(void *)((unsigned long)result__4T4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DT1G)));
-        } else {
-          next__2T4G=new_lab__2QJ(new_size__DT1G);
-        };
-        ((__POINTER *)next__2T4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3T4G)[ 0]=next__2T4G;
-      } else {
-        ((__POINTER *)result__4T4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2T4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__4T4G=next__2T4G;
-      };
-    };
-    ((__POINTER *)result__4T4G)[ 0]=((__POINTER ) 3);
-    result__JXZG=(void *)((unsigned long)result__4T4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__BU4G=first_free__HDVB;
-    while ((((void *)result__BU4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BU4G)->map_size_and_id__YSB &  4294967292LU) < new_size__LXZG))) {
-      result__BU4G=((__MEMORY *)result__BU4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__BU4G == (void *)NULL)) {
-      result__BU4G=new_page__454();
+    if (((void *)result__3XAH == (void *)NULL)) {
+      result__3XAH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__BU4G,new_size__LXZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BU4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__JXZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BU4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__YHME=((void **)result__JXZG);
-  Self__KFXE=(__INTEGER)(nb_elements__AYGE -  1);
-  while ((Self__KFXE >=  0)) {
-    Result__YHME[Self__KFXE]=NULL;
-    Self__KFXE=(__INTEGER)(Self__KFXE -  1);
+  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);
   };
-  return(Result__YHME);
+  return(Result__IKME);
 }
 
-static __BOOLEAN has__LPW(__HASHED_SEToABSTRACT_STRINGo *Self__MPW,void *e__NPW)
+static __BOOLEAN has__PPW(__HASHED_SEToABSTRACT_STRINGo *Self__QPW,void *e__RPW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__ZO3G,__tmp__1O3G,Self__2O3G;
-  void *node__WPW;
-  result__ZO3G= 0;
-  __tmp__1O3G=((__STRING_CONSTANT *)e__NPW)->count__DD;
-  Self__2O3G= 1;
-  while ((Self__2O3G <= __tmp__1O3G)) {
-    result__ZO3G=(__INTEGER)((__INTEGER)( 5 * result__ZO3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__NPW)->storage__FQO)[(__INTEGER)(Self__2O3G -  1)])));
-    Self__2O3G=(__INTEGER)(Self__2O3G +  1);
-  };
-  if ((result__ZO3G <  0)) {
-    result__ZO3G=(__INTEGER)(~ result__ZO3G);
-  };
-  node__WPW=((void **)Self__MPW->buckets__OYR)[(__INTEGER)(result__ZO3G % Self__MPW->capacity__JYR)];
-  while ((! (((void *)node__WPW == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__WPW)->item__0YR,e__NPW)))) {
-    node__WPW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__WPW)->next__GZR;
-  };
-  return(((void *)node__WPW != (void *)NULL));
+  __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));
 }
 
-static void increase_capacity__ORNB(__HASHED_SEToABSTRACT_STRINGo *Self__PRNB)
+static void increase_capacity__SRNB(__HASHED_SEToABSTRACT_STRINGo *Self__TRNB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER idx__RRNB,new_capacity__SRNB,i__QRNB,result__4O3G;
-  __INTEGER __tmp__AP3G,Self__BP3G;
-  __STRING_CONSTANT *Self__5O3G;
-  void *node1__URNB,*node2__VRNB;
-  void **old_buckets__TRNB;
-  idx__RRNB= 0;
-  node1__URNB=NULL;
-  node2__VRNB=NULL;
-  new_capacity__SRNB=prime_number_ceiling__H41((__INTEGER)(Self__PRNB->capacity__JYR +  1));
-  old_buckets__TRNB=Self__PRNB->buckets__OYR;
-  Self__PRNB->buckets__OYR=create__RJ2(new_capacity__SRNB);
-  i__QRNB=(__INTEGER)(Self__PRNB->capacity__JYR -  1);
-  Self__PRNB->capacity__JYR=new_capacity__SRNB;
-  while ((i__QRNB >=  0)) {
-    node1__URNB=((void **)old_buckets__TRNB)[i__QRNB];
-    while (((void *)node1__URNB != (void *)NULL)) {
-      node2__VRNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__URNB)->next__GZR;
-      Self__5O3G=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__URNB)->item__0YR);
-      result__4O3G= 0;
-      __tmp__AP3G=Self__5O3G->count__DD;
-      Self__BP3G= 1;
-      while ((Self__BP3G <= __tmp__AP3G)) {
-        result__4O3G=(__INTEGER)((__INTEGER)( 5 * result__4O3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5O3G->storage__FQO)[(__INTEGER)(Self__BP3G -  1)])));
-        Self__BP3G=(__INTEGER)(Self__BP3G +  1);
-      };
-      if ((result__4O3G <  0)) {
-        result__4O3G=(__INTEGER)(~ result__4O3G);
-      };
-      idx__RRNB=(__INTEGER)(result__4O3G % Self__PRNB->capacity__JYR);
-      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__URNB)->next__GZR=((void **)Self__PRNB->buckets__OYR)[idx__RRNB];
-      ((void **)Self__PRNB->buckets__OYR)[idx__RRNB]=node1__URNB;
-      node1__URNB=node2__VRNB;
-    };
-    i__QRNB=(__INTEGER)(i__QRNB -  1);
+  __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);
   };
 }
 
-static void put_string__IHF(void *s__KHF)
+static void put_string__MHF(void *s__OHF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__1HF,Self__PAG,limit_up__QAG;
-  __CHARACTER __tmp__CIF;
-  if (((struct ___OBJ *)s__KHF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__5HF,Self__TAG,limit_up__UAG;
+  __CHARACTER __tmp__GIF;
+  if (((struct ___OBJ *)s__OHF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__KHF)->__id==__STRING_CONSTANT__) {
-    __tmp__1HF=((__STRING_CONSTANT *)s__KHF)->count__DD;
+  if (((struct ___OBJ *)s__OHF)->__id==__STRING_CONSTANT__) {
+    __tmp__5HF=((__STRING_CONSTANT *)s__OHF)->count__DD;
   } else {
-    __tmp__1HF=((__STRING *)s__KHF)->count__GFC;
+    __tmp__5HF=((__STRING *)s__OHF)->count__KFC;
   };
-  Self__PAG= 1;
-  limit_up__QAG=__tmp__1HF;
-  while ((Self__PAG <= limit_up__QAG)) {
-    if (((struct ___OBJ *)s__KHF)->__id==__STRING_CONSTANT__) {
-      __tmp__CIF=((__CHARACTER *)((__STRING_CONSTANT *)s__KHF)->storage__FQO)[(__INTEGER)(Self__PAG -  1)];
+  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)];
     } else {
-      __tmp__CIF=((__CHARACTER *)((__STRING *)s__KHF)->storage__RBS)[(__INTEGER)(Self__PAG -  1)];
+      __tmp__GIF=((__CHARACTER *)((__STRING *)s__OHF)->storage__VBS)[(__INTEGER)(Self__TAG -  1)];
     };
-    fputc((int)(__tmp__CIF),stdout);
-    Self__PAG=(__INTEGER)(Self__PAG +  1);
+    fputc((int)(__tmp__GIF),stdout);
+    Self__TAG=(__INTEGER)(Self__TAG +  1);
   };
 }
 
-static __BOOLEAN fast_has__45X(__HASHED_SEToABSTRACT_STRINGo *Self__55X,void *e__AAY)
+static __BOOLEAN fast_has__CAY(__HASHED_SEToABSTRACT_STRINGo *Self__DAY,void *e__EAY)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__EP3G;
-  __INTEGER result__DP3G,__tmp__FP3G,Self__GP3G;
-  void *node__JAY;
-  Self__EP3G=((__STRING_CONSTANT *)e__AAY);
-  result__DP3G= 0;
-  __tmp__FP3G=Self__EP3G->count__DD;
-  Self__GP3G= 1;
-  while ((Self__GP3G <= __tmp__FP3G)) {
-    result__DP3G=(__INTEGER)((__INTEGER)( 5 * result__DP3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EP3G->storage__FQO)[(__INTEGER)(Self__GP3G -  1)])));
-    Self__GP3G=(__INTEGER)(Self__GP3G +  1);
-  };
-  if ((result__DP3G <  0)) {
-    result__DP3G=(__INTEGER)(~ result__DP3G);
-  };
-  node__JAY=((void **)Self__55X->buckets__OYR)[(__INTEGER)(result__DP3G % Self__55X->capacity__JYR)];
-  while ((! (((void *)node__JAY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JAY)->item__0YR == (void *)e__AAY)))) {
-    node__JAY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JAY)->next__GZR;
-  };
-  return(((void *)node__JAY != (void *)NULL));
+  __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));
 }
 
-static void* physical_get_entry__ZBF(void *new_path__1BF)
+static void* physical_get_entry__3BF(void *new_path__5BF)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__4BF;
-  __STRING *Self__YT1G;
-  __FILE_UNIX *result__EU4G;
-  __POINTER ptr__FU4G,ptr_table__NU4G,next__MU4G,result__OU4G;
-  __POINTER ptr_table__SU4G,next__RU4G,result__TU4G,ptr__XU4G;
-  __POINTER ptr_table__5U4G,next__4U4G,result__AV4G,ptr_table__EV4G;
-  __POINTER next__DV4G,result__FV4G;
-  __INTEGER typ_id__GU4G,typ_id__YU4G;
-  __UINTEGER_32 sz__HU4G,a__IU4G,new_size__JU4G,t__KU4G,a__LU4G;
-  __UINTEGER_32 new_size__VU4G,lab_type__UU4G,sz__ZU4G,a__0U4G;
-  __UINTEGER_32 new_size__1U4G,t__2U4G,a__3U4G,new_size__HV4G;
-  __UINTEGER_32 lab_type__GV4G;
-  __DIRECTORY_UNIX *result__WU4G;
-  void *__tmp__XCF;
-  __CHARACTER *pe__3BF;
-  result__4BF=NULL;
-  Self__YT1G=((__STRING *)new_path__1BF);
-  if ((Self__YT1G->capacity__IBS > Self__YT1G->count__GFC)) {
-    ((__CHARACTER *)Self__YT1G->storage__RBS)[Self__YT1G->count__GFC]='\0';
+  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';
   } else {
-    add_last__JLT(Self__YT1G,'\0');
-    Self__YT1G->count__GFC=(__INTEGER)(Self__YT1G->count__GFC -  1);
+    add_last__NLT(Self__MU3G,'\0');
+    Self__MU3G->count__KFC=(__INTEGER)(Self__MU3G->count__KFC -  1);
   };
-  pe__3BF=Self__YT1G->storage__RBS;
+  pe__BCF=Self__MU3G->storage__VBS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__3BF),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__BCF),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      result__EU4G=NULL;
-      ptr__FU4G=((__POINTER )(NULL));
-      typ_id__GU4G= 0;
-      sz__HU4G=((__UINTEGER_32 )sizeof(__FILE_UNIX));
-      if ((sz__HU4G ==  0)) {
-        result__EU4G=FILE_UNIX__;
-      } else {
-        typ_id__GU4G=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__HU4G);
-        if ((typ_id__GU4G == (__INTEGER)(-  1))) {
-          a__IU4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__JU4G=(__UINTEGER_32)((__UINTEGER_32)(sz__HU4G + a__IU4G) & (__UINTEGER_32)(~ a__IU4G));
-          ptr_table__NU4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JU4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__MU4G=((__POINTER )(NULL));
-          result__OU4G=((__POINTER *)ptr_table__NU4G)[ 0];
-          if ((result__OU4G == (void *)NULL)) {
-            result__OU4G=new_lab__2QJ(new_size__JU4G);
-            next__MU4G=(void *)((unsigned long)result__OU4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JU4G)));
-            ((__POINTER *)next__MU4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NU4G)[ 0]=next__MU4G;
-          } else {
-            next__MU4G=((__POINTER *)result__OU4G)[ 0];
-            if ((next__MU4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OU4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__JU4G <<  1)) <=  4096)) {
-                next__MU4G=(void *)((unsigned long)result__OU4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JU4G)));
+      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)));
               } else {
-                next__MU4G=new_lab__2QJ(new_size__JU4G);
+                next__IYAH=new_lab__ARJ(new_size__FYAH);
               };
-              ((__POINTER *)next__MU4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NU4G)[ 0]=next__MU4G;
+              ((__POINTER *)next__IYAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JYAH)[ 0]=next__IYAH;
             } else {
-              ((__POINTER *)result__OU4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MU4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__OU4G=next__MU4G;
-            };
-          };
-          ptr__FU4G=result__OU4G;
-        } else {
-          t__KU4G=((__UINTEGER_32 )typ_id__GU4G);
-          a__LU4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__VU4G=(__UINTEGER_32)((__UINTEGER_32)(sz__HU4G + a__LU4G) & (__UINTEGER_32)(~ a__LU4G));
-          ptr_table__SU4G=((__POINTER )(&(table_type[(t__KU4G)])));
-          lab_type__UU4G=(__UINTEGER_32)(t__KU4G |  1);
-          next__RU4G=((__POINTER )(NULL));
-          result__TU4G=((__POINTER *)ptr_table__SU4G)[ 0];
-          if ((result__TU4G == (void *)NULL)) {
-            result__TU4G=new_lab__2QJ(lab_type__UU4G);
-            next__RU4G=(void *)((unsigned long)result__TU4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VU4G)));
-            ((__POINTER *)next__RU4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SU4G)[ 0]=next__RU4G;
-          } else {
-            next__RU4G=((__POINTER *)result__TU4G)[ 0];
-            if ((next__RU4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TU4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VU4G <<  1)) <=  4096)) {
-                next__RU4G=(void *)((unsigned long)result__TU4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VU4G)));
+              ((__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)));
               } else {
-                next__RU4G=new_lab__2QJ(lab_type__UU4G);
+                next__NYAH=new_lab__ARJ(lab_type__QYAH);
               };
-              ((__POINTER *)next__RU4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SU4G)[ 0]=next__RU4G;
+              ((__POINTER *)next__NYAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OYAH)[ 0]=next__NYAH;
             } else {
-              ((__POINTER *)result__TU4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RU4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TU4G=next__RU4G;
-            };
-          };
-          ptr__FU4G=result__TU4G;
-        };
-        result__EU4G=((__FILE_UNIX *)ptr__FU4G);
-        *(result__EU4G) = *(FILE_UNIX__);
-      };
-      result__4BF=result__EU4G;
-    } else {
-      result__WU4G=NULL;
-      ptr__XU4G=((__POINTER )(NULL));
-      typ_id__YU4G= 0;
-      sz__ZU4G=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
-      if ((sz__ZU4G ==  0)) {
-        result__WU4G=DIRECTORY_UNIX__;
-      } else {
-        typ_id__YU4G=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__ZU4G);
-        if ((typ_id__YU4G == (__INTEGER)(-  1))) {
-          a__0U4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__1U4G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZU4G + a__0U4G) & (__UINTEGER_32)(~ a__0U4G));
-          ptr_table__5U4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1U4G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__4U4G=((__POINTER )(NULL));
-          result__AV4G=((__POINTER *)ptr_table__5U4G)[ 0];
-          if ((result__AV4G == (void *)NULL)) {
-            result__AV4G=new_lab__2QJ(new_size__1U4G);
-            next__4U4G=(void *)((unsigned long)result__AV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1U4G)));
-            ((__POINTER *)next__4U4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5U4G)[ 0]=next__4U4G;
-          } else {
-            next__4U4G=((__POINTER *)result__AV4G)[ 0];
-            if ((next__4U4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AV4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1U4G <<  1)) <=  4096)) {
-                next__4U4G=(void *)((unsigned long)result__AV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1U4G)));
+              ((__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)));
               } else {
-                next__4U4G=new_lab__2QJ(new_size__1U4G);
+                next__0YAH=new_lab__ARJ(new_size__XYAH);
               };
-              ((__POINTER *)next__4U4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5U4G)[ 0]=next__4U4G;
+              ((__POINTER *)next__0YAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1YAH)[ 0]=next__0YAH;
             } else {
-              ((__POINTER *)result__AV4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4U4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AV4G=next__4U4G;
-            };
-          };
-          ptr__XU4G=result__AV4G;
-        } else {
-          t__2U4G=((__UINTEGER_32 )typ_id__YU4G);
-          a__3U4G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__HV4G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZU4G + a__3U4G) & (__UINTEGER_32)(~ a__3U4G));
-          ptr_table__EV4G=((__POINTER )(&(table_type[(t__2U4G)])));
-          lab_type__GV4G=(__UINTEGER_32)(t__2U4G |  1);
-          next__DV4G=((__POINTER )(NULL));
-          result__FV4G=((__POINTER *)ptr_table__EV4G)[ 0];
-          if ((result__FV4G == (void *)NULL)) {
-            result__FV4G=new_lab__2QJ(lab_type__GV4G);
-            next__DV4G=(void *)((unsigned long)result__FV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HV4G)));
-            ((__POINTER *)next__DV4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EV4G)[ 0]=next__DV4G;
-          } else {
-            next__DV4G=((__POINTER *)result__FV4G)[ 0];
-            if ((next__DV4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FV4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__HV4G <<  1)) <=  4096)) {
-                next__DV4G=(void *)((unsigned long)result__FV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HV4G)));
+              ((__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)));
               } else {
-                next__DV4G=new_lab__2QJ(lab_type__GV4G);
+                next__5YAH=new_lab__ARJ(lab_type__CZAH);
               };
-              ((__POINTER *)next__DV4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EV4G)[ 0]=next__DV4G;
+              ((__POINTER *)next__5YAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AZAH)[ 0]=next__5YAH;
             } else {
-              ((__POINTER *)result__FV4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__DV4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__FV4G=next__DV4G;
+              ((__POINTER *)result__BZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5YAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__BZAH=next__5YAH;
             };
           };
-          ptr__XU4G=result__FV4G;
+          ptr__TYAH=result__BZAH;
         };
-        result__WU4G=((__DIRECTORY_UNIX *)ptr__XU4G);
-        *(result__WU4G) = *(DIRECTORY_UNIX__);
+        result__SYAH=((__DIRECTORY_UNIX *)ptr__TYAH);
+        *(result__SYAH) = *(DIRECTORY_UNIX__);
       };
-      result__4BF=result__WU4G;
+      result__CCF=result__SYAH;
     };
-    if (((struct ___OBJ *)result__4BF)->__id==__DIRECTORY_UNIX__) {
-      set_path__4MT(result__4BF,new_path__1BF);
+    if (((struct ___OBJ *)result__CCF)->__id==__DIRECTORY_UNIX__) {
+      set_path__CNT(result__CCF,new_path__5BF);
     } else {
-      set_path__ZNT(result__4BF,new_path__1BF);
+      set_path__3NT(result__CCF,new_path__5BF);
     };
-    if (((struct ___OBJ *)result__4BF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__XCF=((__DIRECTORY_UNIX *)result__4BF)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+    if (((struct ___OBJ *)result__CCF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__1CF=((__DIRECTORY_UNIX *)result__CCF)->parent_entry_unix__NED.parent_entry__MED.path__BD;
     } else {
-      __tmp__XCF=((__FILE_UNIX *)result__4BF)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
+      __tmp__1CF=((__FILE_UNIX *)result__CCF)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
     };
-    put__to__B0S(alias__UED,result__4BF,__tmp__XCF);
+    put__to__F0S(alias__YED,result__CCF,__tmp__1CF);
   };
   };
-  return(result__4BF);
+  return(result__CCF);
 }
 
-static void put__to__B0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__C0S,void *v__D0S,void *k__E0S)
+static void put__to__F0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__G0S,void *v__H0S,void *k__I0S)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__JP3G,*Self__OP3G;
-  __INTEGER result__IP3G,__tmp__KP3G,Self__LP3G,idx__M0S,idx__WNOB;
-  __INTEGER new_capacity__XNOB,i__YNOB,result__NP3G,__tmp__PP3G;
-  __INTEGER Self__QP3G,typ_id__GQOB;
-  __POINTER ptr__BQOB,ptr_table__JV4G,next__IV4G,result__KV4G;
-  __POINTER ptr_table__OV4G,next__NV4G,result__PV4G;
-  __UINTEGER_32 sz__DQOB,a__MU1G,new_size__NU1G,t__RU1G,a__QU1G;
-  __UINTEGER_32 new_size__RV4G,lab_type__QV4G;
-  void *node__O0S,*node1__0NOB,*node2__1NOB,*__tmp__D2S;
-  void **old_buckets__ZNOB;
-  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__AQOB;
-  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__WXDC;
-  Self__JP3G=((__STRING_CONSTANT *)k__E0S);
-  result__IP3G= 0;
-  __tmp__KP3G=Self__JP3G->count__DD;
-  Self__LP3G= 1;
-  while ((Self__LP3G <= __tmp__KP3G)) {
-    result__IP3G=(__INTEGER)((__INTEGER)( 5 * result__IP3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JP3G->storage__FQO)[(__INTEGER)(Self__LP3G -  1)])));
-    Self__LP3G=(__INTEGER)(Self__LP3G +  1);
-  };
-  if ((result__IP3G <  0)) {
-    result__IP3G=(__INTEGER)(~ result__IP3G);
-  };
-  idx__M0S=(__INTEGER)(result__IP3G % Self__C0S->capacity__Q0S);
-  node__O0S=((void **)Self__C0S->buckets__V0S)[idx__M0S];
-  while ((! (((void *)node__O0S == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O0S)->key__B1S,k__E0S)))) {
-    node__O0S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O0S)->next__N1S;
-  };
-  if (((void *)node__O0S == (void *)NULL)) {
-    if ((Self__C0S->capacity__Q0S == Self__C0S->count__W1S)) {
-      idx__WNOB= 0;
-      node1__0NOB=NULL;
-      node2__1NOB=NULL;
-      old_buckets__ZNOB=Self__C0S->buckets__V0S;
-      new_capacity__XNOB=prime_number_ceiling__H41((__INTEGER)(Self__C0S->capacity__Q0S +  1));
-      Self__C0S->buckets__V0S=create__HB4(new_capacity__XNOB);
-      i__YNOB=(__INTEGER)(Self__C0S->capacity__Q0S -  1);
-      Self__C0S->capacity__Q0S=new_capacity__XNOB;
-      while ((i__YNOB >=  0)) {
-        node1__0NOB=((void **)old_buckets__ZNOB)[i__YNOB];
-        while (((void *)node1__0NOB != (void *)NULL)) {
-          node2__1NOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__0NOB)->next__N1S;
-          Self__OP3G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__0NOB)->key__B1S);
-          result__NP3G= 0;
-          __tmp__PP3G=Self__OP3G->count__DD;
-          Self__QP3G= 1;
-          while ((Self__QP3G <= __tmp__PP3G)) {
-            result__NP3G=(__INTEGER)((__INTEGER)( 5 * result__NP3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OP3G->storage__FQO)[(__INTEGER)(Self__QP3G -  1)])));
-            Self__QP3G=(__INTEGER)(Self__QP3G +  1);
-          };
-          if ((result__NP3G <  0)) {
-            result__NP3G=(__INTEGER)(~ result__NP3G);
-          };
-          idx__WNOB=(__INTEGER)(result__NP3G % Self__C0S->capacity__Q0S);
-          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__0NOB)->next__N1S=((void **)Self__C0S->buckets__V0S)[idx__WNOB];
-          ((void **)Self__C0S->buckets__V0S)[idx__WNOB]=node1__0NOB;
-          node1__0NOB=node2__1NOB;
-        };
-        i__YNOB=(__INTEGER)(i__YNOB -  1);
-      };
-      idx__M0S=(__INTEGER)(result__IP3G % new_capacity__XNOB);
-    };
-    __tmp__D2S=((void **)Self__C0S->buckets__V0S)[idx__M0S];
-    result__AQOB=NULL;
-    ptr__BQOB=((__POINTER )(NULL));
-    typ_id__GQOB= 0;
-    sz__DQOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
-    if ((sz__DQOB ==  0)) {
-      result__AQOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
-    } else {
-      typ_id__GQOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__DQOB);
-      if ((typ_id__GQOB == (__INTEGER)(-  1))) {
-        a__MU1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NU1G=(__UINTEGER_32)((__UINTEGER_32)(sz__DQOB + a__MU1G) & (__UINTEGER_32)(~ a__MU1G));
-        ptr_table__JV4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NU1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__IV4G=((__POINTER )(NULL));
-        result__KV4G=((__POINTER *)ptr_table__JV4G)[ 0];
-        if ((result__KV4G == (void *)NULL)) {
-          result__KV4G=new_lab__2QJ(new_size__NU1G);
-          next__IV4G=(void *)((unsigned long)result__KV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NU1G)));
-          ((__POINTER *)next__IV4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JV4G)[ 0]=next__IV4G;
-        } else {
-          next__IV4G=((__POINTER *)result__KV4G)[ 0];
-          if ((next__IV4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KV4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NU1G <<  1)) <=  4096)) {
-              next__IV4G=(void *)((unsigned long)result__KV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NU1G)));
+  __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)));
             } else {
-              next__IV4G=new_lab__2QJ(new_size__NU1G);
-            };
-            ((__POINTER *)next__IV4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JV4G)[ 0]=next__IV4G;
-          } else {
-            ((__POINTER *)result__KV4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__IV4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KV4G=next__IV4G;
-          };
-        };
-        ptr__BQOB=result__KV4G;
-      } else {
-        t__RU1G=((__UINTEGER_32 )typ_id__GQOB);
-        a__QU1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__RV4G=(__UINTEGER_32)((__UINTEGER_32)(sz__DQOB + a__QU1G) & (__UINTEGER_32)(~ a__QU1G));
-        ptr_table__OV4G=((__POINTER )(&(table_type[(t__RU1G)])));
-        lab_type__QV4G=(__UINTEGER_32)(t__RU1G |  1);
-        next__NV4G=((__POINTER )(NULL));
-        result__PV4G=((__POINTER *)ptr_table__OV4G)[ 0];
-        if ((result__PV4G == (void *)NULL)) {
-          result__PV4G=new_lab__2QJ(lab_type__QV4G);
-          next__NV4G=(void *)((unsigned long)result__PV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RV4G)));
-          ((__POINTER *)next__NV4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OV4G)[ 0]=next__NV4G;
-        } else {
-          next__NV4G=((__POINTER *)result__PV4G)[ 0];
-          if ((next__NV4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PV4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__RV4G <<  1)) <=  4096)) {
-              next__NV4G=(void *)((unsigned long)result__PV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RV4G)));
+              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)));
             } else {
-              next__NV4G=new_lab__2QJ(lab_type__QV4G);
+              next__JZAH=new_lab__ARJ(lab_type__MZAH);
             };
-            ((__POINTER *)next__NV4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OV4G)[ 0]=next__NV4G;
+            ((__POINTER *)next__JZAH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KZAH)[ 0]=next__JZAH;
           } else {
-            ((__POINTER *)result__PV4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NV4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PV4G=next__NV4G;
+            ((__POINTER *)result__LZAH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JZAH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LZAH=next__JZAH;
           };
         };
-        ptr__BQOB=result__PV4G;
+        ptr__FQOB=result__LZAH;
       };
-      result__AQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__BQOB);
-      *(result__AQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+      result__EQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__FQOB);
+      *(result__EQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
     };
-    Self__WXDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__AQOB);
-    Self__WXDC->item__KSOB=v__D0S;
-    Self__WXDC->key__B1S=k__E0S;
-    Self__WXDC->next__N1S=__tmp__D2S;
-    node__O0S=result__AQOB;
-    ((void **)Self__C0S->buckets__V0S)[idx__M0S]=result__AQOB;
-    Self__C0S->count__W1S=(__INTEGER)(Self__C0S->count__W1S +  1);
+    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);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__O0S)->item__KSOB=v__D0S;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__S0S)->item__OSOB=v__H0S;
   };
 }
 
-static void reduce_path__A3HC(void *st__C3HC)
+static void reduce_path__E3HC(void *st__G3HC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER stat__E3HC,__tmp__UP3G,Self__WP3G,i__D3HC,Self__R0NE;
-  __INTEGER n__WU1G,len__2P3G,__tmp__3P3G,__tmp__5P3G,Self__AQ3G;
-  __INTEGER len__FQ3G,__tmp__GQ3G,__tmp__IQ3G,Self__JQ3G,result__NQ3G;
-  __INTEGER n__YU1G,len__SQ3G,__tmp__TQ3G,__tmp__VQ3G,Self__WQ3G;
-  __INTEGER end__ZQ3G,len__1Q3G,__tmp__2Q3G,__tmp__4Q3G,Self__5Q3G;
-  __INTEGER Self__UIDF,n__0U1G,len__ER3G,__tmp__FR3G,__tmp__HR3G;
-  __INTEGER Self__IR3G,result__MR3G,end__PR3G,len__RR3G,__tmp__SR3G;
-  __INTEGER __tmp__UR3G,Self__VR3G;
-  __STRING *Self__SP3G,*Self__VU1G,*Self__HQ3G,*Self__OQ3G,*Self__XU1G;
-  __STRING *Self__3Q3G,*Self__ZU1G,*Self__1U1G,*Self__3U1G,*Self__NR3G;
-  __STRING *Self__TR3G;
-  __CHARACTER car__F3HC,Self__TV4G;
-  __CHARACTER *__tmp__TP3G,*Self__VP3G;
-  __BOOLEAN __tmp__M5HC,__tmp__RAIC,result__YWGE,result__SV4G;
-  __BOOLEAN __tmp__UV4G,__tmp__SBIC;
-  stat__E3HC= 0;
-  car__F3HC='\0';
-  Self__SP3G=((__STRING *)st__C3HC);
-  __tmp__TP3G=Self__SP3G->storage__RBS;
-  __tmp__UP3G=(__INTEGER)(Self__SP3G->count__GFC -  1);
-  Self__VP3G=((__CHARACTER *)__tmp__TP3G);
-  Self__WP3G=__tmp__UP3G;
-  while ((Self__WP3G >=  0)) {
-    if (('\\' == Self__VP3G[Self__WP3G])) {
-      Self__VP3G[Self__WP3G]='/';
-    };
-    Self__WP3G=(__INTEGER)(Self__WP3G -  1);
-  };
-  i__D3HC= 1;
-  while ((i__D3HC <= ((__STRING *)st__C3HC)->count__GFC)) {
-    car__F3HC=((__CHARACTER *)((__STRING *)st__C3HC)->storage__RBS)[(__INTEGER)(i__D3HC -  1)];
-    if ((car__F3HC == '/')) {
-      Self__R0NE=stat__E3HC;
-      if ((stat__E3HC ==  0)) {
-        stat__E3HC= 1;
-      };
-      if ((Self__R0NE ==  1)) {
-        Self__VU1G=((__STRING *)st__C3HC);
-        n__WU1G=(__INTEGER)(i__D3HC -  1);
-        if ((n__WU1G > Self__VU1G->count__GFC)) {
-          Self__VU1G->count__GFC= 0;
-        } else {
-          if ((n__WU1G >  0)) {
-            len__2P3G=(__INTEGER)((__INTEGER)(n__WU1G -  1) +  1);
-            if ((len__2P3G >  0)) {
-              __tmp__3P3G=(__INTEGER)(n__WU1G +  1);
-              __tmp__5P3G=Self__VU1G->count__GFC;
-              Self__AQ3G=__tmp__3P3G;
-              while ((Self__AQ3G <= __tmp__5P3G)) {
-                ((__CHARACTER *)Self__VU1G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__AQ3G - len__2P3G) -  1)]=((__CHARACTER *)Self__VU1G->storage__RBS)[(__INTEGER)(Self__AQ3G -  1)];
-                Self__AQ3G=(__INTEGER)(Self__AQ3G +  1);
+  __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);
               };
-              Self__VU1G->count__GFC=(__INTEGER)(Self__VU1G->count__GFC - len__2P3G);
-            };
-          };
-        };
-        i__D3HC= 1;
-      };
-      if ((Self__R0NE ==  2)) {
-        Self__HQ3G=((__STRING *)st__C3HC);
-        len__FQ3G=(__INTEGER)((__INTEGER)(i__D3HC - (__INTEGER)(i__D3HC -  1)) +  1);
-        if ((len__FQ3G >  0)) {
-          __tmp__GQ3G=(__INTEGER)(i__D3HC +  1);
-          __tmp__IQ3G=Self__HQ3G->count__GFC;
-          Self__JQ3G=__tmp__GQ3G;
-          while ((Self__JQ3G <= __tmp__IQ3G)) {
-            ((__CHARACTER *)Self__HQ3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__JQ3G - len__FQ3G) -  1)]=((__CHARACTER *)Self__HQ3G->storage__RBS)[(__INTEGER)(Self__JQ3G -  1)];
-            Self__JQ3G=(__INTEGER)(Self__JQ3G +  1);
-          };
-          Self__HQ3G->count__GFC=(__INTEGER)(Self__HQ3G->count__GFC - len__FQ3G);
-        };
-        i__D3HC=(__INTEGER)(i__D3HC -  2);
-        stat__E3HC= 1;
-      };
-      if ((Self__R0NE ==  3)) {
-        Self__OQ3G=((__STRING *)st__C3HC);
-        result__NQ3G=(__INTEGER)(i__D3HC -  4);
-        while ((! ((result__NQ3G <  1) || ('/' == ((__CHARACTER *)Self__OQ3G->storage__RBS)[(__INTEGER)(result__NQ3G -  1)])))) {
-          result__NQ3G=(__INTEGER)(result__NQ3G -  1);
-        };
-        if ((result__NQ3G ==  0)) {
-          Self__XU1G=((__STRING *)st__C3HC);
-          n__YU1G=(__INTEGER)(i__D3HC -  1);
-          if ((n__YU1G > Self__XU1G->count__GFC)) {
-            Self__XU1G->count__GFC= 0;
-          } else {
-            if ((n__YU1G >  0)) {
-              len__SQ3G=(__INTEGER)((__INTEGER)(n__YU1G -  1) +  1);
-              if ((len__SQ3G >  0)) {
-                __tmp__TQ3G=(__INTEGER)(n__YU1G +  1);
-                __tmp__VQ3G=Self__XU1G->count__GFC;
-                Self__WQ3G=__tmp__TQ3G;
-                while ((Self__WQ3G <= __tmp__VQ3G)) {
-                  ((__CHARACTER *)Self__XU1G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__WQ3G - len__SQ3G) -  1)]=((__CHARACTER *)Self__XU1G->storage__RBS)[(__INTEGER)(Self__WQ3G -  1)];
-                  Self__WQ3G=(__INTEGER)(Self__WQ3G +  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__XU1G->count__GFC=(__INTEGER)(Self__XU1G->count__GFC - len__SQ3G);
+                Self__LV3G->count__KFC=(__INTEGER)(Self__LV3G->count__KFC - len__ST5G);
               };
             };
           };
-          i__D3HC= 1;
+          i__H3HC= 1;
         } else {
-          Self__3Q3G=((__STRING *)st__C3HC);
-          end__ZQ3G=(__INTEGER)(i__D3HC -  1);
-          len__1Q3G=(__INTEGER)((__INTEGER)(end__ZQ3G - result__NQ3G) +  1);
-          if ((len__1Q3G >  0)) {
-            __tmp__2Q3G=(__INTEGER)(end__ZQ3G +  1);
-            __tmp__4Q3G=Self__3Q3G->count__GFC;
-            Self__5Q3G=__tmp__2Q3G;
-            while ((Self__5Q3G <= __tmp__4Q3G)) {
-              ((__CHARACTER *)Self__3Q3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__5Q3G - len__1Q3G) -  1)]=((__CHARACTER *)Self__3Q3G->storage__RBS)[(__INTEGER)(Self__5Q3G -  1)];
-              Self__5Q3G=(__INTEGER)(Self__5Q3G +  1);
+          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__3Q3G->count__GFC=(__INTEGER)(Self__3Q3G->count__GFC - len__1Q3G);
+            Self__3T5G->count__KFC=(__INTEGER)(Self__3T5G->count__KFC - len__1T5G);
           };
-          i__D3HC=result__NQ3G;
+          i__H3HC=result__NT5G;
         };
-        stat__E3HC= 1;
+        stat__I3HC= 1;
       };
-      __tmp__M5HC=TRUE__;
+      __tmp__Q5HC=TRUE__;
     } else {
-      __tmp__M5HC=FALSE__;
+      __tmp__Q5HC=FALSE__;
     };
-    if (__tmp__M5HC) {
-      __tmp__RAIC=TRUE__;
+    if (__tmp__Q5HC) {
+      __tmp__VAIC=TRUE__;
     } else {
-      result__YWGE=(car__F3HC == '.');
-      if (result__YWGE) {
-        Self__UIDF=stat__E3HC;
-        if ((stat__E3HC ==  1)) {
-          stat__E3HC= 2;
+      result__AZGE=(car__J3HC == '.');
+      if (result__AZGE) {
+        Self__QODF=stat__I3HC;
+        if ((stat__I3HC ==  1)) {
+          stat__I3HC= 2;
         };
-        if ((Self__UIDF ==  2)) {
-          stat__E3HC= 3;
+        if ((Self__QODF ==  2)) {
+          stat__I3HC= 3;
         };
-        if ((Self__UIDF ==  3)) {
-          stat__E3HC= 0;
+        if ((Self__QODF ==  3)) {
+          stat__I3HC= 0;
         };
       };
-      __tmp__RAIC=result__YWGE;
+      __tmp__VAIC=result__AZGE;
     };
-    if ((! __tmp__RAIC)) {
-      if (((car__F3HC == ':') && (i__D3HC >  2))) {
-        Self__TV4G=((__CHARACTER *)((__STRING *)st__C3HC)->storage__RBS)[(__INTEGER)((__INTEGER)(i__D3HC -  1) -  1)];
-        result__SV4G=FALSE__;
-        if ((((__INTEGER_8 )Self__TV4G) >= ((__INTEGER_8 )'a'))) {
-          result__SV4G=(((__INTEGER_8 )Self__TV4G) <= ((__INTEGER_8 )'z'));
-          __tmp__UV4G=TRUE__;
+    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__;
         } else {
-          __tmp__UV4G=FALSE__;
+          __tmp__QZAH=FALSE__;
         };
-        if ((! __tmp__UV4G)) {
-          if ((((__INTEGER_8 )Self__TV4G) >= ((__INTEGER_8 )'A'))) {
-            result__SV4G=(((__INTEGER_8 )Self__TV4G) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__QZAH)) {
+          if ((((__INTEGER_8 )Self__PZAH) >= ((__INTEGER_8 )'A'))) {
+            result__OZAH=(((__INTEGER_8 )Self__PZAH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__SBIC=result__SV4G;
+        __tmp__WBIC=result__OZAH;
       } else {
-        __tmp__SBIC=FALSE__;
+        __tmp__WBIC=FALSE__;
       };
-      if ((__tmp__SBIC && (((__CHARACTER *)((__STRING *)st__C3HC)->storage__RBS)[(__INTEGER)((__INTEGER)(i__D3HC -  2) -  1)] == '/'))) {
-        Self__ZU1G=((__STRING *)st__C3HC);
-        n__0U1G=(__INTEGER)(i__D3HC -  2);
-        if ((n__0U1G > Self__ZU1G->count__GFC)) {
-          Self__ZU1G->count__GFC= 0;
+      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;
         } else {
-          if ((n__0U1G >  0)) {
-            len__ER3G=(__INTEGER)((__INTEGER)(n__0U1G -  1) +  1);
-            if ((len__ER3G >  0)) {
-              __tmp__FR3G=(__INTEGER)(n__0U1G +  1);
-              __tmp__HR3G=Self__ZU1G->count__GFC;
-              Self__IR3G=__tmp__FR3G;
-              while ((Self__IR3G <= __tmp__HR3G)) {
-                ((__CHARACTER *)Self__ZU1G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__IR3G - len__ER3G) -  1)]=((__CHARACTER *)Self__ZU1G->storage__RBS)[(__INTEGER)(Self__IR3G -  1)];
-                Self__IR3G=(__INTEGER)(Self__IR3G +  1);
+          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);
               };
-              Self__ZU1G->count__GFC=(__INTEGER)(Self__ZU1G->count__GFC - len__ER3G);
+              Self__NV3G->count__KFC=(__INTEGER)(Self__NV3G->count__KFC - len__EU5G);
             };
           };
         };
-        i__D3HC= 1;
+        i__H3HC= 1;
       } else {
-        stat__E3HC= 0;
+        stat__I3HC= 0;
       };
     };
-    i__D3HC=(__INTEGER)(i__D3HC +  1);
+    i__H3HC=(__INTEGER)(i__H3HC +  1);
   };
-  if ((stat__E3HC ==  1)) {
-    Self__1U1G=((__STRING *)st__C3HC);
-    if (( 1 > Self__1U1G->count__GFC)) {
-      Self__1U1G->count__GFC= 0;
+  if ((stat__I3HC ==  1)) {
+    Self__PV3G=((__STRING *)st__G3HC);
+    if (( 1 > Self__PV3G->count__KFC)) {
+      Self__PV3G->count__KFC= 0;
     } else {
-      Self__1U1G->count__GFC=(__INTEGER)(Self__1U1G->count__GFC -  1);
+      Self__PV3G->count__KFC=(__INTEGER)(Self__PV3G->count__KFC -  1);
     };
   };
-  if ((stat__E3HC ==  2)) {
-    Self__3U1G=((__STRING *)st__C3HC);
-    if (( 2 > Self__3U1G->count__GFC)) {
-      Self__3U1G->count__GFC= 0;
+  if ((stat__I3HC ==  2)) {
+    Self__RV3G=((__STRING *)st__G3HC);
+    if (( 2 > Self__RV3G->count__KFC)) {
+      Self__RV3G->count__KFC= 0;
     } else {
-      Self__3U1G->count__GFC=(__INTEGER)(Self__3U1G->count__GFC -  2);
+      Self__RV3G->count__KFC=(__INTEGER)(Self__RV3G->count__KFC -  2);
     };
   };
-  if ((stat__E3HC ==  3)) {
-    Self__NR3G=((__STRING *)st__C3HC);
-    result__MR3G=(__INTEGER)(i__D3HC -  4);
-    while ((! ((result__MR3G <  1) || ('/' == ((__CHARACTER *)Self__NR3G->storage__RBS)[(__INTEGER)(result__MR3G -  1)])))) {
-      result__MR3G=(__INTEGER)(result__MR3G -  1);
+  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 ((result__MR3G ==  0)) {
-      ((__STRING *)st__C3HC)->count__GFC= 0;
+    if ((result__MU5G ==  0)) {
+      ((__STRING *)st__G3HC)->count__KFC= 0;
     } else {
-      Self__TR3G=((__STRING *)st__C3HC);
-      end__PR3G=(__INTEGER)(i__D3HC -  1);
-      len__RR3G=(__INTEGER)((__INTEGER)(end__PR3G - result__MR3G) +  1);
-      if ((len__RR3G >  0)) {
-        __tmp__SR3G=(__INTEGER)(end__PR3G +  1);
-        __tmp__UR3G=Self__TR3G->count__GFC;
-        Self__VR3G=__tmp__SR3G;
-        while ((Self__VR3G <= __tmp__UR3G)) {
-          ((__CHARACTER *)Self__TR3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__VR3G - len__RR3G) -  1)]=((__CHARACTER *)Self__TR3G->storage__RBS)[(__INTEGER)(Self__VR3G -  1)];
-          Self__VR3G=(__INTEGER)(Self__VR3G +  1);
+      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__TR3G->count__GFC=(__INTEGER)(Self__TR3G->count__GFC - len__RR3G);
+        Self__TU5G->count__KFC=(__INTEGER)(Self__TU5G->count__KFC - len__RU5G);
       };
     };
   };
-  if ((((__STRING *)st__C3HC)->count__GFC ==  0)) {
-    add_last__JLT(st__C3HC,'/');
+  if ((((__STRING *)st__G3HC)->count__KFC ==  0)) {
+    add_last__NLT(st__G3HC,'/');
   };
 }
 
-static void* reference_at__UT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__VT0C,void *k__WT0C)
+static void* reference_at__YT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__ZT0C,void *k__0T0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__AU0C;
-  __STRING *Self__ZR3G;
-  __INTEGER result__YR3G,__tmp__0R3G,Self__1R3G;
-  void *node__5T0C;
-  result__AU0C=NULL;
-  Self__ZR3G=((__STRING *)k__WT0C);
-  result__YR3G= 0;
-  __tmp__0R3G=Self__ZR3G->count__GFC;
-  Self__1R3G= 1;
-  while ((Self__1R3G <= __tmp__0R3G)) {
-    result__YR3G=(__INTEGER)((__INTEGER)( 5 * result__YR3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZR3G->storage__RBS)[(__INTEGER)(Self__1R3G -  1)])));
-    Self__1R3G=(__INTEGER)(Self__1R3G +  1);
-  };
-  if ((result__YR3G <  0)) {
-    result__YR3G=(__INTEGER)(~ result__YR3G);
-  };
-  node__5T0C=((void **)Self__VT0C->buckets__V0S)[(__INTEGER)(result__YR3G % Self__VT0C->capacity__Q0S)];
-  while ((! (((void *)node__5T0C == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__5T0C)->key__B1S,k__WT0C)))) {
-    node__5T0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__5T0C)->next__N1S;
-  };
-  if (((void *)node__5T0C != (void *)NULL)) {
-    result__AU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__5T0C)->item__KSOB;
-  };
-  return(result__AU0C);
+  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);
 }
 
-static void* physical_get_entry__IW0C(void *new_path__KW0C)
+static void* physical_get_entry__MW0C(void *new_path__OW0C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__NW0C;
-  __STRING *Self__BV1G;
-  __FILE_UNIX *result__OXI;
-  __POINTER ptr__PXI,ptr_table__WV4G,next__VV4G,result__XV4G;
-  __POINTER ptr_table__1V4G,next__0V4G,result__2V4G,ptr__AZI;
-  __POINTER ptr_table__AW4G,next__5V4G,result__BW4G,ptr_table__FW4G;
-  __POINTER next__EW4G,result__GW4G;
-  __INTEGER typ_id__UXI,typ_id__FZI;
-  __UINTEGER_32 sz__RXI,a__KD2G,new_size__LD2G,t__PD2G,a__OD2G;
-  __UINTEGER_32 new_size__4V4G,lab_type__3V4G,sz__CZI,a__SD2G;
-  __UINTEGER_32 new_size__TD2G,t__XD2G,a__WD2G,new_size__IW4G;
-  __UINTEGER_32 lab_type__HW4G;
-  __DIRECTORY_UNIX *result__5YI;
-  void *__tmp__EX0C;
-  __CHARACTER *pe__MW0C;
-  result__NW0C=NULL;
-  Self__BV1G=((__STRING *)new_path__KW0C);
-  if ((Self__BV1G->capacity__IBS > Self__BV1G->count__GFC)) {
-    ((__CHARACTER *)Self__BV1G->storage__RBS)[Self__BV1G->count__GFC]='\0';
+  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';
   } else {
-    add_last__JLT(Self__BV1G,'\0');
-    Self__BV1G->count__GFC=(__INTEGER)(Self__BV1G->count__GFC -  1);
+    add_last__NLT(Self__VV3G,'\0');
+    Self__VV3G->count__KFC=(__INTEGER)(Self__VV3G->count__KFC -  1);
   };
-  pe__MW0C=Self__BV1G->storage__RBS;
+  pe__QW0C=Self__VV3G->storage__VBS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__MW0C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__QW0C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      result__OXI=NULL;
-      ptr__PXI=((__POINTER )(NULL));
-      typ_id__UXI= 0;
-      sz__RXI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
-      if ((sz__RXI ==  0)) {
-        result__OXI=FILE_UNIX__;
-      } else {
-        typ_id__UXI=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__RXI);
-        if ((typ_id__UXI == (__INTEGER)(-  1))) {
-          a__KD2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__LD2G=(__UINTEGER_32)((__UINTEGER_32)(sz__RXI + a__KD2G) & (__UINTEGER_32)(~ a__KD2G));
-          ptr_table__WV4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LD2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__VV4G=((__POINTER )(NULL));
-          result__XV4G=((__POINTER *)ptr_table__WV4G)[ 0];
-          if ((result__XV4G == (void *)NULL)) {
-            result__XV4G=new_lab__2QJ(new_size__LD2G);
-            next__VV4G=(void *)((unsigned long)result__XV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LD2G)));
-            ((__POINTER *)next__VV4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WV4G)[ 0]=next__VV4G;
-          } else {
-            next__VV4G=((__POINTER *)result__XV4G)[ 0];
-            if ((next__VV4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XV4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__LD2G <<  1)) <=  4096)) {
-                next__VV4G=(void *)((unsigned long)result__XV4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LD2G)));
+      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)));
               } else {
-                next__VV4G=new_lab__2QJ(new_size__LD2G);
+                next__RZAH=new_lab__ARJ(new_size__DG4G);
               };
-              ((__POINTER *)next__VV4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WV4G)[ 0]=next__VV4G;
+              ((__POINTER *)next__RZAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SZAH)[ 0]=next__RZAH;
             } else {
-              ((__POINTER *)result__XV4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VV4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__XV4G=next__VV4G;
-            };
-          };
-          ptr__PXI=result__XV4G;
-        } else {
-          t__PD2G=((__UINTEGER_32 )typ_id__UXI);
-          a__OD2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__4V4G=(__UINTEGER_32)((__UINTEGER_32)(sz__RXI + a__OD2G) & (__UINTEGER_32)(~ a__OD2G));
-          ptr_table__1V4G=((__POINTER )(&(table_type[(t__PD2G)])));
-          lab_type__3V4G=(__UINTEGER_32)(t__PD2G |  1);
-          next__0V4G=((__POINTER )(NULL));
-          result__2V4G=((__POINTER *)ptr_table__1V4G)[ 0];
-          if ((result__2V4G == (void *)NULL)) {
-            result__2V4G=new_lab__2QJ(lab_type__3V4G);
-            next__0V4G=(void *)((unsigned long)result__2V4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4V4G)));
-            ((__POINTER *)next__0V4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1V4G)[ 0]=next__0V4G;
-          } else {
-            next__0V4G=((__POINTER *)result__2V4G)[ 0];
-            if ((next__0V4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2V4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4V4G <<  1)) <=  4096)) {
-                next__0V4G=(void *)((unsigned long)result__2V4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4V4G)));
+              ((__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)));
               } else {
-                next__0V4G=new_lab__2QJ(lab_type__3V4G);
+                next__WZAH=new_lab__ARJ(lab_type__ZZAH);
               };
-              ((__POINTER *)next__0V4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1V4G)[ 0]=next__0V4G;
+              ((__POINTER *)next__WZAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XZAH)[ 0]=next__WZAH;
             } else {
-              ((__POINTER *)result__2V4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0V4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__2V4G=next__0V4G;
-            };
-          };
-          ptr__PXI=result__2V4G;
-        };
-        result__OXI=((__FILE_UNIX *)ptr__PXI);
-        *(result__OXI) = *(FILE_UNIX__);
-      };
-      result__NW0C=result__OXI;
-    } else {
-      result__5YI=NULL;
-      ptr__AZI=((__POINTER )(NULL));
-      typ_id__FZI= 0;
-      sz__CZI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
-      if ((sz__CZI ==  0)) {
-        result__5YI=DIRECTORY_UNIX__;
-      } else {
-        typ_id__FZI=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__CZI);
-        if ((typ_id__FZI == (__INTEGER)(-  1))) {
-          a__SD2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__TD2G=(__UINTEGER_32)((__UINTEGER_32)(sz__CZI + a__SD2G) & (__UINTEGER_32)(~ a__SD2G));
-          ptr_table__AW4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TD2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__5V4G=((__POINTER )(NULL));
-          result__BW4G=((__POINTER *)ptr_table__AW4G)[ 0];
-          if ((result__BW4G == (void *)NULL)) {
-            result__BW4G=new_lab__2QJ(new_size__TD2G);
-            next__5V4G=(void *)((unsigned long)result__BW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TD2G)));
-            ((__POINTER *)next__5V4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AW4G)[ 0]=next__5V4G;
-          } else {
-            next__5V4G=((__POINTER *)result__BW4G)[ 0];
-            if ((next__5V4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BW4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TD2G <<  1)) <=  4096)) {
-                next__5V4G=(void *)((unsigned long)result__BW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TD2G)));
+              ((__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)));
               } else {
-                next__5V4G=new_lab__2QJ(new_size__TD2G);
+                next__1ZAH=new_lab__ARJ(new_size__LG4G);
               };
-              ((__POINTER *)next__5V4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AW4G)[ 0]=next__5V4G;
+              ((__POINTER *)next__1ZAH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2ZAH)[ 0]=next__1ZAH;
             } else {
-              ((__POINTER *)result__BW4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__5V4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BW4G=next__5V4G;
-            };
-          };
-          ptr__AZI=result__BW4G;
-        } else {
-          t__XD2G=((__UINTEGER_32 )typ_id__FZI);
-          a__WD2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__IW4G=(__UINTEGER_32)((__UINTEGER_32)(sz__CZI + a__WD2G) & (__UINTEGER_32)(~ a__WD2G));
-          ptr_table__FW4G=((__POINTER )(&(table_type[(t__XD2G)])));
-          lab_type__HW4G=(__UINTEGER_32)(t__XD2G |  1);
-          next__EW4G=((__POINTER )(NULL));
-          result__GW4G=((__POINTER *)ptr_table__FW4G)[ 0];
-          if ((result__GW4G == (void *)NULL)) {
-            result__GW4G=new_lab__2QJ(lab_type__HW4G);
-            next__EW4G=(void *)((unsigned long)result__GW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IW4G)));
-            ((__POINTER *)next__EW4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FW4G)[ 0]=next__EW4G;
-          } else {
-            next__EW4G=((__POINTER *)result__GW4G)[ 0];
-            if ((next__EW4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GW4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IW4G <<  1)) <=  4096)) {
-                next__EW4G=(void *)((unsigned long)result__GW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IW4G)));
+              ((__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)));
               } else {
-                next__EW4G=new_lab__2QJ(lab_type__HW4G);
+                next__A0AH=new_lab__ARJ(lab_type__D0AH);
               };
-              ((__POINTER *)next__EW4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FW4G)[ 0]=next__EW4G;
+              ((__POINTER *)next__A0AH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B0AH)[ 0]=next__A0AH;
             } else {
-              ((__POINTER *)result__GW4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__EW4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GW4G=next__EW4G;
+              ((__POINTER *)result__C0AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A0AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__C0AH=next__A0AH;
             };
           };
-          ptr__AZI=result__GW4G;
+          ptr__EZI=result__C0AH;
         };
-        result__5YI=((__DIRECTORY_UNIX *)ptr__AZI);
-        *(result__5YI) = *(DIRECTORY_UNIX__);
+        result__DZI=((__DIRECTORY_UNIX *)ptr__EZI);
+        *(result__DZI) = *(DIRECTORY_UNIX__);
       };
-      result__NW0C=result__5YI;
+      result__RW0C=result__DZI;
     };
-    if (((struct ___OBJ *)result__NW0C)->__id==__DIRECTORY_UNIX__) {
-      set_path__4MT(result__NW0C,new_path__KW0C);
+    if (((struct ___OBJ *)result__RW0C)->__id==__DIRECTORY_UNIX__) {
+      set_path__CNT(result__RW0C,new_path__OW0C);
     } else {
-      set_path__ZNT(result__NW0C,new_path__KW0C);
+      set_path__3NT(result__RW0C,new_path__OW0C);
     };
-    if (FILE_SYSTEM__->parent_directory__5ED==0) {
+    if (FILE_SYSTEM__->parent_directory__DFD==0) {
     } else {
-      parent_directory__4DD();
+      parent_directory__CED();
     };
-    if (((struct ___OBJ *)result__NW0C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__EX0C=((__DIRECTORY_UNIX *)result__NW0C)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+    if (((struct ___OBJ *)result__RW0C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__IX0C=((__DIRECTORY_UNIX *)result__RW0C)->parent_entry_unix__NED.parent_entry__MED.path__BD;
     } else {
-      __tmp__EX0C=((__FILE_UNIX *)result__NW0C)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
+      __tmp__IX0C=((__FILE_UNIX *)result__RW0C)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
     };
-    put__to__B0S(alias__UED,result__NW0C,__tmp__EX0C);
+    put__to__F0S(alias__YED,result__RW0C,__tmp__IX0C);
   };
   };
-  return(result__NW0C);
+  return(result__RW0C);
 }
 
-static void** create__FY1C(__INTEGER nb_elements__HY1C)
+static void** create__JY1C(__INTEGER nb_elements__LY1C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__XYZG,a__2YZG,new_size__YYZG,new_size2__ZYZG,a__GV1G;
-  __UINTEGER_32 new_size__HV1G;
-  __POINTER result__WYZG,ptr_table__KW4G,next__JW4G,result__LW4G;
-  void *result__OW4G;
-  __INTEGER Self__T2WD;
-  void **Result__CVCD;
-  sz__XYZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__HY1C * ((__INTEGER )(sizeof(void *)))));
-  result__WYZG=((__POINTER )(NULL));
-  a__2YZG=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__YYZG=(__UINTEGER_32)((__UINTEGER_32)(sz__XYZG + a__2YZG) & (__UINTEGER_32)(~ a__2YZG));
-  new_size2__ZYZG=(__UINTEGER_32)(new_size__YYZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__ZYZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__GV1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__HV1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZYZG + a__GV1G) & (__UINTEGER_32)(~ a__GV1G));
-    ptr_table__KW4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HV1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__JW4G=((__POINTER )(NULL));
-    result__LW4G=((__POINTER *)ptr_table__KW4G)[ 0];
-    if ((result__LW4G == (void *)NULL)) {
-      result__LW4G=new_lab__2QJ(new_size__HV1G);
-      next__JW4G=(void *)((unsigned long)result__LW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HV1G)));
-      ((__POINTER *)next__JW4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__KW4G)[ 0]=next__JW4G;
-    } else {
-      next__JW4G=((__POINTER *)result__LW4G)[ 0];
-      if ((next__JW4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LW4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__HV1G <<  1)) <=  4096)) {
-          next__JW4G=(void *)((unsigned long)result__LW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HV1G)));
-        } else {
-          next__JW4G=new_lab__2QJ(new_size__HV1G);
-        };
-        ((__POINTER *)next__JW4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KW4G)[ 0]=next__JW4G;
-      } else {
-        ((__POINTER *)result__LW4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JW4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__LW4G=next__JW4G;
-      };
-    };
-    ((__POINTER *)result__LW4G)[ 0]=((__POINTER ) 3);
-    result__WYZG=(void *)((unsigned long)result__LW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__OW4G=first_free__HDVB;
-    while ((((void *)result__OW4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OW4G)->map_size_and_id__YSB &  4294967292LU) < new_size__YYZG))) {
-      result__OW4G=((__MEMORY *)result__OW4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__OW4G == (void *)NULL)) {
-      result__OW4G=new_page__454();
+    if (((void *)result__K0AH == (void *)NULL)) {
+      result__K0AH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__OW4G,new_size__YYZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OW4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__WYZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OW4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__CVCD=((void **)result__WYZG);
-  Self__T2WD=(__INTEGER)(nb_elements__HY1C -  1);
-  while ((Self__T2WD >=  0)) {
-    Result__CVCD[Self__T2WD]=NULL;
-    Self__T2WD=(__INTEGER)(Self__T2WD -  1);
+  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);
   };
-  return(Result__CVCD);
+  return(Result__GVCD);
 }
 
-static void** create__NQSC(__INTEGER nb_elements__PQSC)
+static void** create__RQSC(__INTEGER nb_elements__TQSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__5YZG,a__EZZG,new_size__AZZG,new_size2__BZZG,a__NV1G;
-  __UINTEGER_32 new_size__OV1G;
-  __POINTER result__4YZG,ptr_table__SW4G,next__RW4G,result__TW4G;
-  void *result__WW4G;
-  __INTEGER Self__ZNWD;
-  void **Result__G11C;
-  sz__5YZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__PQSC * ((__INTEGER )(sizeof(void *)))));
-  result__4YZG=((__POINTER )(NULL));
-  a__EZZG=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__AZZG=(__UINTEGER_32)((__UINTEGER_32)(sz__5YZG + a__EZZG) & (__UINTEGER_32)(~ a__EZZG));
-  new_size2__BZZG=(__UINTEGER_32)(new_size__AZZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__BZZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__NV1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__OV1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__BZZG + a__NV1G) & (__UINTEGER_32)(~ a__NV1G));
-    ptr_table__SW4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OV1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__RW4G=((__POINTER )(NULL));
-    result__TW4G=((__POINTER *)ptr_table__SW4G)[ 0];
-    if ((result__TW4G == (void *)NULL)) {
-      result__TW4G=new_lab__2QJ(new_size__OV1G);
-      next__RW4G=(void *)((unsigned long)result__TW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OV1G)));
-      ((__POINTER *)next__RW4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__SW4G)[ 0]=next__RW4G;
-    } else {
-      next__RW4G=((__POINTER *)result__TW4G)[ 0];
-      if ((next__RW4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TW4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OV1G <<  1)) <=  4096)) {
-          next__RW4G=(void *)((unsigned long)result__TW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OV1G)));
-        } else {
-          next__RW4G=new_lab__2QJ(new_size__OV1G);
-        };
-        ((__POINTER *)next__RW4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SW4G)[ 0]=next__RW4G;
-      } else {
-        ((__POINTER *)result__TW4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RW4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__TW4G=next__RW4G;
-      };
-    };
-    ((__POINTER *)result__TW4G)[ 0]=((__POINTER ) 3);
-    result__4YZG=(void *)((unsigned long)result__TW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__WW4G=first_free__HDVB;
-    while ((((void *)result__WW4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WW4G)->map_size_and_id__YSB &  4294967292LU) < new_size__AZZG))) {
-      result__WW4G=((__MEMORY *)result__WW4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__WW4G == (void *)NULL)) {
-      result__WW4G=new_page__454();
+    if (((void *)result__S0AH == (void *)NULL)) {
+      result__S0AH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__WW4G,new_size__AZZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WW4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__4YZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WW4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__G11C=((void **)result__4YZG);
-  Self__ZNWD=(__INTEGER)(nb_elements__PQSC -  1);
-  while ((Self__ZNWD >=  0)) {
-    Result__G11C[Self__ZNWD]=NULL;
-    Self__ZNWD=(__INTEGER)(Self__ZNWD -  1);
+  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);
   };
-  return(Result__G11C);
+  return(Result__K11C);
 }
 
-static void short__token__to__1AD(void *key__3AD,__INTEGER beg__4AD,__INTEGER end__5AD)
+static void short__token__to__5AD(void *key__BBD,__INTEGER beg__CBD,__INTEGER end__DBD)
 // ({NULLxSTRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER pos__ABD,result__BS3G,__tmp__DS3G,Self__ES3G,__tmp__1BD;
-  __INTEGER Self__SK4,__tmp__JS3G,__tmp__LS3G,Self__MS3G,__tmp__RCD;
-  __INTEGER Self__DM4,__tmp__HDD,__tmp__KDD;
-  void *add_text__BBD;
-  __STRING_CONSTANT *Self__CS3G;
-  __STRING *Self__KS3G;
-  void *fmt__CBD;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3R3G;
-  void *node__5R3G;
-  pos__ABD= 0;
-  add_text__BBD=NULL;
-  fmt__CBD=NULL;
-  if (is_shorter__TY) {
-    if (is_active_short__OBC) {
-      Self__3R3G=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      Self__CS3G=((__STRING_CONSTANT *)key__3AD);
-      result__BS3G= 0;
-      __tmp__DS3G=Self__CS3G->count__DD;
-      Self__ES3G= 1;
-      while ((Self__ES3G <= __tmp__DS3G)) {
-        result__BS3G=(__INTEGER)((__INTEGER)( 5 * result__BS3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CS3G->storage__FQO)[(__INTEGER)(Self__ES3G -  1)])));
-        Self__ES3G=(__INTEGER)(Self__ES3G +  1);
-      };
-      if ((result__BS3G <  0)) {
-        result__BS3G=(__INTEGER)(~ result__BS3G);
-      };
-      node__5R3G=((void **)Self__3R3G->buckets__PCT)[(__INTEGER)(result__BS3G % Self__3R3G->capacity__KCT)];
-      while ((! (((void *)node__5R3G == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5R3G)->key__1CT == (void *)key__3AD)))) {
-        node__5R3G=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5R3G)->next__GDT;
-      };
-      if (((void *)node__5R3G != (void *)NULL)) {
-        ((__STRING *)token__WBD)->count__GFC= 0;
-        pos__ABD=(__INTEGER)(beg__4AD + short_derive__RBC);
-        __tmp__1BD=(__INTEGER)(end__5AD -  1);
-        Self__SK4=beg__4AD;
-        while ((Self__SK4 <= __tmp__1BD)) {
-          add_last__JLT(token__WBD,((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(Self__SK4 -  1)]);
-          Self__KS3G=((__STRING *)output_code__SI);
-          __tmp__JS3G=(__INTEGER)(pos__ABD +  1);
-          __tmp__LS3G=Self__KS3G->count__GFC;
-          Self__MS3G=__tmp__JS3G;
-          while ((Self__MS3G <= __tmp__LS3G)) {
-            ((__CHARACTER *)Self__KS3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__MS3G -  1) -  1)]=((__CHARACTER *)Self__KS3G->storage__RBS)[(__INTEGER)(Self__MS3G -  1)];
-            Self__MS3G=(__INTEGER)(Self__MS3G +  1);
-          };
-          Self__KS3G->count__GFC=(__INTEGER)(Self__KS3G->count__GFC -  1);
-          Self__SK4=(__INTEGER)(Self__SK4 +  1);
-        };
-        short_derive__RBC=(__INTEGER)(short_derive__RBC - ((__STRING *)token__WBD)->count__GFC);
-        fmt__CBD=at__AL4(short_dico__QD,key__3AD);
-        __tmp__RCD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__CBD)->parent_linked_collection__LD.upper__PCD;
-        Self__DM4= 1;
-        while ((Self__DM4 <= __tmp__RCD)) {
-          if (((void *)item__I0ND(fmt__CBD,Self__DM4) == (void *)NULL)) {
-            add_text__BBD=token__WBD;
-          } else {
-            add_text__BBD=item__I0ND(fmt__CBD,Self__DM4);
-          };
-          insert_string__to__KXU(output_code__SI,add_text__BBD,pos__ABD);
-          if (((struct ___OBJ *)add_text__BBD)->__id==__STRING_CONSTANT__) {
-            __tmp__HDD=((__STRING_CONSTANT *)add_text__BBD)->count__DD;
-          } else {
-            __tmp__HDD=((__STRING *)add_text__BBD)->count__GFC;
-          };
-          pos__ABD=(__INTEGER)(pos__ABD + __tmp__HDD);
-          if (((struct ___OBJ *)add_text__BBD)->__id==__STRING_CONSTANT__) {
-            __tmp__KDD=((__STRING_CONSTANT *)add_text__BBD)->count__DD;
-          } else {
-            __tmp__KDD=((__STRING *)add_text__BBD)->count__GFC;
-          };
-          short_derive__RBC=(__INTEGER)(short_derive__RBC + __tmp__KDD);
-          Self__DM4=(__INTEGER)(Self__DM4 +  1);
+  __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);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__UFYE(__STRING *Self__VFYE)
+static __INTEGER first_substring_index__OIYE(__STRING *Self__PIYE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __INTEGER i__C52E,result__E52E,s__D52E;
-  i__C52E= 0;
-  result__E52E= 0;
-  s__D52E= 1;
-  while ((! ((result__E52E !=  0) || ((__INTEGER)((__INTEGER)(s__D52E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__VFYE->count__GFC)))) {
-    i__C52E= 1;
-    while ((! ((i__C52E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__VFYE->storage__RBS)[(__INTEGER)((__INTEGER)((__INTEGER)(s__D52E + i__C52E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__FQO)[(__INTEGER)(i__C52E -  1)])))) {
-      i__C52E=(__INTEGER)(i__C52E +  1);
+  __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);
     };
-    if ((i__C52E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__E52E=s__D52E;
+    if ((i__4E3E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
+      result__AF3E=s__5E3E;
     } else {
-      s__D52E=(__INTEGER)(s__D52E +  1);
+      s__5E3E=(__INTEGER)(s__5E3E +  1);
     };
   };
-  return(result__E52E);
+  return(result__AF3E);
 }
 
-static void append_in__4HH(__UINTEGER_32 Self__5HH,void *buffer__AIH)
+static void append_in__CIH(__UINTEGER_32 Self__DIH,void *buffer__EIH)
 // ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __UINTEGER_32 val__BIH;
-  __INTEGER i__EIH,j__FIH;
-  __STRING *Self__QXFB;
-  __CHARACTER tmp__TXFB;
-  val__BIH= 0;
-  i__EIH= 0;
-  j__FIH= 0;
-  if ((Self__5HH ==  0)) {
-    add_last__JLT(((__STRING *)buffer__AIH),'0');
+  __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__EIH=(__INTEGER)(((__STRING *)buffer__AIH)->count__GFC +  1);
-    val__BIH=Self__5HH;
-    while ((val__BIH !=  0)) {
-      add_last__JLT(((__STRING *)buffer__AIH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__BIH %  10)) + ((__INTEGER_8 )'0'))))));
-      val__BIH=(__UINTEGER_32)(val__BIH /  10);
-    };
-    j__FIH=((__STRING *)buffer__AIH)->count__GFC;
-    while ((i__EIH < j__FIH)) {
-      Self__QXFB=((__STRING *)buffer__AIH);
-      tmp__TXFB=((__CHARACTER *)Self__QXFB->storage__RBS)[(__INTEGER)(i__EIH -  1)];
-      ((__CHARACTER *)Self__QXFB->storage__RBS)[(__INTEGER)(i__EIH -  1)]=((__CHARACTER *)Self__QXFB->storage__RBS)[(__INTEGER)(j__FIH -  1)];
-      ((__CHARACTER *)Self__QXFB->storage__RBS)[(__INTEGER)(j__FIH -  1)]=tmp__TXFB;
-      j__FIH=(__INTEGER)(j__FIH -  1);
-      i__EIH=(__INTEGER)(i__EIH +  1);
+    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);
     };
   };
 }
 
-static __BOOLEAN read_string__1EQ()
+static __BOOLEAN read_string__5EQ()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER old_pos__5EQ;
-  __POSITION pos__3COG;
-  __BOOLEAN result__4EQ,__tmp__JFQ,__tmp__IGQ,__tmp__JGQ;
-  __CHARACTER result__2WVG,result__CXVG,result__DXVG,result__EXVG;
-  __CHARACTER result__FXVG,result__GXVG,result__HXVG;
-  result__4EQ=FALSE__;
-  old_pos__5EQ= 0;
-  if (read_space__NRD()) {
-    result__2WVG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__2WVG=((__CHARACTER )(( 0)));
-    } else {
-      result__2WVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-    };
-    __tmp__JFQ=(result__2WVG == '\"');
+  __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 == '\"');
   } else {
-    __tmp__JFQ=FALSE__;
+    __tmp__NFQ=FALSE__;
   };
-  if (__tmp__JFQ) {
-    old_pos__5EQ=position__CBC;
-    position__CBC=(__INTEGER)(position__CBC +  1);
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    until_do__OJRC:
+  if (__tmp__NFQ) {
+    old_pos__DFQ=position__GBC;
+    position__GBC=(__INTEGER)(position__GBC +  1);
+    ((__STRING *)string_tmp__VH)->count__KFC= 0;
+    until_do__SJRC:
     {
-      result__CXVG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__CXVG=((__CHARACTER )(( 0)));
+      result__EVXG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__EVXG=((__CHARACTER )(( 0)));
       } else {
-        result__CXVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__EVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__CXVG == ((__CHARACTER )(( 0))))) {
-        __tmp__IGQ=TRUE__;
+      if ((result__EVXG == ((__CHARACTER )(( 0))))) {
+        __tmp__MGQ=TRUE__;
       } else {
-        result__DXVG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__DXVG=((__CHARACTER )(( 0)));
+        result__FVXG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__FVXG=((__CHARACTER )(( 0)));
         } else {
-          result__DXVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__FVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__IGQ=(result__DXVG == '\n');
+        __tmp__MGQ=(result__FVXG == '\n');
       };
-      if (__tmp__IGQ) {
-        __tmp__JGQ=TRUE__;
+      if (__tmp__MGQ) {
+        __tmp__NGQ=TRUE__;
       } else {
-        result__EXVG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__EXVG=((__CHARACTER )(( 0)));
+        result__GVXG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__GVXG=((__CHARACTER )(( 0)));
         } else {
-          result__EXVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__GVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__JGQ=(result__EXVG == '\"');
+        __tmp__NGQ=(result__GVXG == '\"');
       };
-      if ((! __tmp__JGQ)) {
-        result__FXVG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__FXVG=((__CHARACTER )(( 0)));
+      if ((! __tmp__NGQ)) {
+        result__HVXG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__HVXG=((__CHARACTER )(( 0)));
         } else {
-          result__FXVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__HVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        add_last__JLT(string_tmp__VH,result__FXVG);
-        result__GXVG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__GXVG=((__CHARACTER )(( 0)));
+        add_last__NLT(string_tmp__VH,result__HVXG);
+        result__IVXG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__IVXG=((__CHARACTER )(( 0)));
         } else {
-          result__GXVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__IVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__GXVG == '\\')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          read_escape_character__ZYIF();
+        if ((result__IVXG == '\\')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          read_escape_character__PIJF();
         } else {
-          position__CBC=(__INTEGER)(position__CBC +  1);
+          position__GBC=(__INTEGER)(position__GBC +  1);
         };
-        goto until_do__OJRC;
+        goto until_do__SJRC;
       };
     };
-    result__HXVG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__HXVG=((__CHARACTER )(( 0)));
+    result__JVXG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__JVXG=((__CHARACTER )(( 0)));
     } else {
-      result__HXVG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__JVXG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__HXVG == '\"')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      last_string__YZC=get__YVB(string_tmp__VH);
-      result__4EQ=TRUE__;
-      short__token__to__1AD((&__string_123),old_pos__5EQ,position__CBC);
+    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);
     } else {
-      position__CBC=begin_position__1AE;
-      pos__3COG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_233));
-      put_position__EOG(pos__3COG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+      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)) {
         exit(( 1));
       };
     };
   };
-  return(result__4EQ);
+  return(result__CFQ);
 }
 
-static void reduce_path__QC2E(void *st__SC2E)
+static void reduce_path__MI2E(void *st__OI2E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER stat__UC2E,__tmp__RS3G,Self__TS3G,i__TC2E,Self__5UXF;
-  __INTEGER n__OW1G,len__ZS3G,__tmp__0S3G,__tmp__2S3G,Self__3S3G;
-  __INTEGER len__CT3G,__tmp__DT3G,__tmp__FT3G,Self__GT3G,result__KT3G;
-  __INTEGER n__QW1G,len__PT3G,__tmp__QT3G,__tmp__ST3G,Self__TT3G;
-  __INTEGER end__WT3G,len__YT3G,__tmp__ZT3G,__tmp__1T3G,Self__2T3G;
-  __INTEGER Self__ZY4F,n__SW1G,len__BU3G,__tmp__CU3G,__tmp__EU3G;
-  __INTEGER Self__FU3G,result__GLGD,end__IU3G,len__KU3G,__tmp__LU3G;
-  __INTEGER __tmp__NU3G,Self__OU3G;
-  __STRING *Self__PS3G,*Self__NW1G,*Self__ET3G,*Self__LT3G,*Self__PW1G;
-  __STRING *Self__0T3G,*Self__RW1G,*Self__TW1G,*Self__VW1G,*Self__CLGD;
-  __STRING *Self__MU3G;
-  __CHARACTER car__VC2E,Self__KL1E;
-  __CHARACTER *__tmp__QS3G,*Self__SS3G;
-  __BOOLEAN __tmp__2E2E,__tmp__BG2E,result__5IUF,result__ML1E;
-  __BOOLEAN __tmp__WL1E,__tmp__CH2E;
-  stat__UC2E= 0;
-  car__VC2E='\0';
-  Self__PS3G=((__STRING *)st__SC2E);
-  __tmp__QS3G=Self__PS3G->storage__RBS;
-  __tmp__RS3G=(__INTEGER)(Self__PS3G->count__GFC -  1);
-  Self__SS3G=((__CHARACTER *)__tmp__QS3G);
-  Self__TS3G=__tmp__RS3G;
-  while ((Self__TS3G >=  0)) {
-    if (('\\' == Self__SS3G[Self__TS3G])) {
-      Self__SS3G[Self__TS3G]='/';
-    };
-    Self__TS3G=(__INTEGER)(Self__TS3G -  1);
-  };
-  i__TC2E= 1;
-  while ((i__TC2E <= ((__STRING *)st__SC2E)->count__GFC)) {
-    car__VC2E=((__CHARACTER *)((__STRING *)st__SC2E)->storage__RBS)[(__INTEGER)(i__TC2E -  1)];
-    if ((car__VC2E == '/')) {
-      Self__5UXF=stat__UC2E;
-      if ((stat__UC2E ==  0)) {
-        stat__UC2E= 1;
-      };
-      if ((Self__5UXF ==  1)) {
-        Self__NW1G=((__STRING *)st__SC2E);
-        n__OW1G=(__INTEGER)(i__TC2E -  1);
-        if ((n__OW1G > Self__NW1G->count__GFC)) {
-          Self__NW1G->count__GFC= 0;
-        } else {
-          if ((n__OW1G >  0)) {
-            len__ZS3G=(__INTEGER)((__INTEGER)(n__OW1G -  1) +  1);
-            if ((len__ZS3G >  0)) {
-              __tmp__0S3G=(__INTEGER)(n__OW1G +  1);
-              __tmp__2S3G=Self__NW1G->count__GFC;
-              Self__3S3G=__tmp__0S3G;
-              while ((Self__3S3G <= __tmp__2S3G)) {
-                ((__CHARACTER *)Self__NW1G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__3S3G - len__ZS3G) -  1)]=((__CHARACTER *)Self__NW1G->storage__RBS)[(__INTEGER)(Self__3S3G -  1)];
-                Self__3S3G=(__INTEGER)(Self__3S3G +  1);
+  __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);
               };
-              Self__NW1G->count__GFC=(__INTEGER)(Self__NW1G->count__GFC - len__ZS3G);
-            };
-          };
-        };
-        i__TC2E= 1;
-      };
-      if ((Self__5UXF ==  2)) {
-        Self__ET3G=((__STRING *)st__SC2E);
-        len__CT3G=(__INTEGER)((__INTEGER)(i__TC2E - (__INTEGER)(i__TC2E -  1)) +  1);
-        if ((len__CT3G >  0)) {
-          __tmp__DT3G=(__INTEGER)(i__TC2E +  1);
-          __tmp__FT3G=Self__ET3G->count__GFC;
-          Self__GT3G=__tmp__DT3G;
-          while ((Self__GT3G <= __tmp__FT3G)) {
-            ((__CHARACTER *)Self__ET3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__GT3G - len__CT3G) -  1)]=((__CHARACTER *)Self__ET3G->storage__RBS)[(__INTEGER)(Self__GT3G -  1)];
-            Self__GT3G=(__INTEGER)(Self__GT3G +  1);
-          };
-          Self__ET3G->count__GFC=(__INTEGER)(Self__ET3G->count__GFC - len__CT3G);
-        };
-        i__TC2E=(__INTEGER)(i__TC2E -  2);
-        stat__UC2E= 1;
-      };
-      if ((Self__5UXF ==  3)) {
-        Self__LT3G=((__STRING *)st__SC2E);
-        result__KT3G=(__INTEGER)(i__TC2E -  4);
-        while ((! ((result__KT3G <  1) || ('/' == ((__CHARACTER *)Self__LT3G->storage__RBS)[(__INTEGER)(result__KT3G -  1)])))) {
-          result__KT3G=(__INTEGER)(result__KT3G -  1);
-        };
-        if ((result__KT3G ==  0)) {
-          Self__PW1G=((__STRING *)st__SC2E);
-          n__QW1G=(__INTEGER)(i__TC2E -  1);
-          if ((n__QW1G > Self__PW1G->count__GFC)) {
-            Self__PW1G->count__GFC= 0;
-          } else {
-            if ((n__QW1G >  0)) {
-              len__PT3G=(__INTEGER)((__INTEGER)(n__QW1G -  1) +  1);
-              if ((len__PT3G >  0)) {
-                __tmp__QT3G=(__INTEGER)(n__QW1G +  1);
-                __tmp__ST3G=Self__PW1G->count__GFC;
-                Self__TT3G=__tmp__QT3G;
-                while ((Self__TT3G <= __tmp__ST3G)) {
-                  ((__CHARACTER *)Self__PW1G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__TT3G - len__PT3G) -  1)]=((__CHARACTER *)Self__PW1G->storage__RBS)[(__INTEGER)(Self__TT3G -  1)];
-                  Self__TT3G=(__INTEGER)(Self__TT3G +  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__PW1G->count__GFC=(__INTEGER)(Self__PW1G->count__GFC - len__PT3G);
+                Self__DX3G->count__KFC=(__INTEGER)(Self__DX3G->count__KFC - len__PW5G);
               };
             };
           };
-          i__TC2E= 1;
+          i__PI2E= 1;
         } else {
-          Self__0T3G=((__STRING *)st__SC2E);
-          end__WT3G=(__INTEGER)(i__TC2E -  1);
-          len__YT3G=(__INTEGER)((__INTEGER)(end__WT3G - result__KT3G) +  1);
-          if ((len__YT3G >  0)) {
-            __tmp__ZT3G=(__INTEGER)(end__WT3G +  1);
-            __tmp__1T3G=Self__0T3G->count__GFC;
-            Self__2T3G=__tmp__ZT3G;
-            while ((Self__2T3G <= __tmp__1T3G)) {
-              ((__CHARACTER *)Self__0T3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__2T3G - len__YT3G) -  1)]=((__CHARACTER *)Self__0T3G->storage__RBS)[(__INTEGER)(Self__2T3G -  1)];
-              Self__2T3G=(__INTEGER)(Self__2T3G +  1);
+          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__0T3G->count__GFC=(__INTEGER)(Self__0T3G->count__GFC - len__YT3G);
+            Self__0W5G->count__KFC=(__INTEGER)(Self__0W5G->count__KFC - len__YW5G);
           };
-          i__TC2E=result__KT3G;
+          i__PI2E=result__KW5G;
         };
-        stat__UC2E= 1;
+        stat__QI2E= 1;
       };
-      __tmp__2E2E=TRUE__;
+      __tmp__YK2E=TRUE__;
     } else {
-      __tmp__2E2E=FALSE__;
+      __tmp__YK2E=FALSE__;
     };
-    if (__tmp__2E2E) {
-      __tmp__BG2E=TRUE__;
+    if (__tmp__YK2E) {
+      __tmp__3L2E=TRUE__;
     } else {
-      result__5IUF=(car__VC2E == '.');
-      if (result__5IUF) {
-        Self__ZY4F=stat__UC2E;
-        if ((stat__UC2E ==  1)) {
-          stat__UC2E= 2;
+      result__O5VF=(car__RI2E == '.');
+      if (result__O5VF) {
+        Self__VTAG=stat__QI2E;
+        if ((stat__QI2E ==  1)) {
+          stat__QI2E= 2;
         };
-        if ((Self__ZY4F ==  2)) {
-          stat__UC2E= 3;
+        if ((Self__VTAG ==  2)) {
+          stat__QI2E= 3;
         };
-        if ((Self__ZY4F ==  3)) {
-          stat__UC2E= 0;
+        if ((Self__VTAG ==  3)) {
+          stat__QI2E= 0;
         };
       };
-      __tmp__BG2E=result__5IUF;
+      __tmp__3L2E=result__O5VF;
     };
-    if ((! __tmp__BG2E)) {
-      if (((car__VC2E == ':') && (i__TC2E >  2))) {
-        Self__KL1E=((__CHARACTER *)((__STRING *)st__SC2E)->storage__RBS)[(__INTEGER)((__INTEGER)(i__TC2E -  1) -  1)];
-        result__ML1E=FALSE__;
-        if ((((__INTEGER_8 )Self__KL1E) >= ((__INTEGER_8 )'a'))) {
-          result__ML1E=(((__INTEGER_8 )Self__KL1E) <= ((__INTEGER_8 )'z'));
-          __tmp__WL1E=TRUE__;
+    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__;
         } else {
-          __tmp__WL1E=FALSE__;
+          __tmp__QO1E=FALSE__;
         };
-        if ((! __tmp__WL1E)) {
-          if ((((__INTEGER_8 )Self__KL1E) >= ((__INTEGER_8 )'A'))) {
-            result__ML1E=(((__INTEGER_8 )Self__KL1E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__QO1E)) {
+          if ((((__INTEGER_8 )Self__EO1E) >= ((__INTEGER_8 )'A'))) {
+            result__GO1E=(((__INTEGER_8 )Self__EO1E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__CH2E=result__ML1E;
+        __tmp__4M2E=result__GO1E;
       } else {
-        __tmp__CH2E=FALSE__;
+        __tmp__4M2E=FALSE__;
       };
-      if ((__tmp__CH2E && (((__CHARACTER *)((__STRING *)st__SC2E)->storage__RBS)[(__INTEGER)((__INTEGER)(i__TC2E -  2) -  1)] == '/'))) {
-        Self__RW1G=((__STRING *)st__SC2E);
-        n__SW1G=(__INTEGER)(i__TC2E -  2);
-        if ((n__SW1G > Self__RW1G->count__GFC)) {
-          Self__RW1G->count__GFC= 0;
+      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;
         } else {
-          if ((n__SW1G >  0)) {
-            len__BU3G=(__INTEGER)((__INTEGER)(n__SW1G -  1) +  1);
-            if ((len__BU3G >  0)) {
-              __tmp__CU3G=(__INTEGER)(n__SW1G +  1);
-              __tmp__EU3G=Self__RW1G->count__GFC;
-              Self__FU3G=__tmp__CU3G;
-              while ((Self__FU3G <= __tmp__EU3G)) {
-                ((__CHARACTER *)Self__RW1G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__FU3G - len__BU3G) -  1)]=((__CHARACTER *)Self__RW1G->storage__RBS)[(__INTEGER)(Self__FU3G -  1)];
-                Self__FU3G=(__INTEGER)(Self__FU3G +  1);
+          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);
               };
-              Self__RW1G->count__GFC=(__INTEGER)(Self__RW1G->count__GFC - len__BU3G);
+              Self__FX3G->count__KFC=(__INTEGER)(Self__FX3G->count__KFC - len__BX5G);
             };
           };
         };
-        i__TC2E= 1;
+        i__PI2E= 1;
       } else {
-        stat__UC2E= 0;
+        stat__QI2E= 0;
       };
     };
-    i__TC2E=(__INTEGER)(i__TC2E +  1);
+    i__PI2E=(__INTEGER)(i__PI2E +  1);
   };
-  if ((stat__UC2E ==  1)) {
-    Self__TW1G=((__STRING *)st__SC2E);
-    if (( 1 > Self__TW1G->count__GFC)) {
-      Self__TW1G->count__GFC= 0;
+  if ((stat__QI2E ==  1)) {
+    Self__HX3G=((__STRING *)st__OI2E);
+    if (( 1 > Self__HX3G->count__KFC)) {
+      Self__HX3G->count__KFC= 0;
     } else {
-      Self__TW1G->count__GFC=(__INTEGER)(Self__TW1G->count__GFC -  1);
+      Self__HX3G->count__KFC=(__INTEGER)(Self__HX3G->count__KFC -  1);
     };
   };
-  if ((stat__UC2E ==  2)) {
-    Self__VW1G=((__STRING *)st__SC2E);
-    if (( 2 > Self__VW1G->count__GFC)) {
-      Self__VW1G->count__GFC= 0;
+  if ((stat__QI2E ==  2)) {
+    Self__JX3G=((__STRING *)st__OI2E);
+    if (( 2 > Self__JX3G->count__KFC)) {
+      Self__JX3G->count__KFC= 0;
     } else {
-      Self__VW1G->count__GFC=(__INTEGER)(Self__VW1G->count__GFC -  2);
+      Self__JX3G->count__KFC=(__INTEGER)(Self__JX3G->count__KFC -  2);
     };
   };
-  if ((stat__UC2E ==  3)) {
-    Self__CLGD=((__STRING *)st__SC2E);
-    result__GLGD=(__INTEGER)(i__TC2E -  4);
-    while ((! ((result__GLGD <  1) || ('/' == ((__CHARACTER *)Self__CLGD->storage__RBS)[(__INTEGER)(result__GLGD -  1)])))) {
-      result__GLGD=(__INTEGER)(result__GLGD -  1);
+  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 ((result__GLGD ==  0)) {
-      ((__STRING *)st__SC2E)->count__GFC= 0;
+    if ((result__KLGD ==  0)) {
+      ((__STRING *)st__OI2E)->count__KFC= 0;
     } else {
-      Self__MU3G=((__STRING *)st__SC2E);
-      end__IU3G=(__INTEGER)(i__TC2E -  1);
-      len__KU3G=(__INTEGER)((__INTEGER)(end__IU3G - result__GLGD) +  1);
-      if ((len__KU3G >  0)) {
-        __tmp__LU3G=(__INTEGER)(end__IU3G +  1);
-        __tmp__NU3G=Self__MU3G->count__GFC;
-        Self__OU3G=__tmp__LU3G;
-        while ((Self__OU3G <= __tmp__NU3G)) {
-          ((__CHARACTER *)Self__MU3G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__OU3G - len__KU3G) -  1)]=((__CHARACTER *)Self__MU3G->storage__RBS)[(__INTEGER)(Self__OU3G -  1)];
-          Self__OU3G=(__INTEGER)(Self__OU3G +  1);
+      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__MU3G->count__GFC=(__INTEGER)(Self__MU3G->count__GFC - len__KU3G);
+        Self__MX5G->count__KFC=(__INTEGER)(Self__MX5G->count__KFC - len__KX5G);
       };
     };
   };
-  if ((((__STRING *)st__SC2E)->count__GFC ==  0)) {
-    add_last__JLT(st__SC2E,'/');
+  if ((((__STRING *)st__OI2E)->count__KFC ==  0)) {
+    add_last__NLT(st__OI2E,'/');
   };
 }
 
-static void* item__FCPE(__DIRECTORY_UNIX *Self__GCPE,__INTEGER i__HCPE)
+static void* item__VEPE(__DIRECTORY_UNIX *Self__WEPE,__INTEGER i__XEPE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __LINKED_LISToENTRYo *Self__GWVE;
-  Self__GWVE=((__LINKED_LISToENTRYo *)Self__GCPE->parent_directory__KED.list__YERD);
-  if ((i__HCPE != Self__GWVE->mem_idx__NFVE)) {
-    if ((Self__GWVE->mem_idx__NFVE > i__HCPE)) {
-      Self__GWVE->mem_idx__NFVE= 1;
-      Self__GWVE->mem_lnk__OFVE=Self__GWVE->first_link__GFVE;
+  __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;
     };
-    while ((i__HCPE != Self__GWVE->mem_idx__NFVE)) {
-      Self__GWVE->mem_lnk__OFVE=((__LINKED_LIST_NODEoENTRYo *)Self__GWVE->mem_lnk__OFVE)->next__W0DF;
-      Self__GWVE->mem_idx__NFVE=(__INTEGER)(Self__GWVE->mem_idx__NFVE +  1);
+    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);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__GWVE->mem_lnk__OFVE)->item__ZWVE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__AZVE->mem_lnk__AIVE)->item__TZVE);
 }
 
-static void* item__I0ND(__LINKED_LISToSTRING_CONSTANTo *Self__J0ND,__INTEGER i__K0ND)
+static void* item__M0ND(__LINKED_LISToSTRING_CONSTANTo *Self__N0ND,__INTEGER i__O0ND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  if ((i__K0ND != Self__J0ND->mem_idx__4TEC)) {
-    if ((Self__J0ND->mem_idx__4TEC > i__K0ND)) {
-      Self__J0ND->mem_idx__4TEC= 1;
-      Self__J0ND->mem_lnk__AUEC=Self__J0ND->first_link__UTEC;
+  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;
     };
-    while ((i__K0ND != Self__J0ND->mem_idx__4TEC)) {
-      Self__J0ND->mem_lnk__AUEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__J0ND->mem_lnk__AUEC)->next__2NOD;
-      Self__J0ND->mem_idx__4TEC=(__INTEGER)(Self__J0ND->mem_idx__4TEC +  1);
+    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);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__J0ND->mem_lnk__AUEC)->item__KVHD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__N0ND->mem_lnk__EUEC)->item__OVHD);
 }
 
-static void** create__D23(__INTEGER nb_elements__F23)
+static void** create__H23(__INTEGER nb_elements__J23)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__P2ZG,a__U2ZG,new_size__Q2ZG,new_size2__R2ZG,a__BX1G;
-  __UINTEGER_32 new_size__CX1G;
-  __POINTER result__O2ZG,ptr_table__0W4G,next__ZW4G,result__1W4G;
-  void *result__4W4G;
-  __INTEGER Self__SZJC;
-  void **Result__PUEB;
-  sz__P2ZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__F23 * ((__INTEGER )(sizeof(void *)))));
-  result__O2ZG=((__POINTER )(NULL));
-  a__U2ZG=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__Q2ZG=(__UINTEGER_32)((__UINTEGER_32)(sz__P2ZG + a__U2ZG) & (__UINTEGER_32)(~ a__U2ZG));
-  new_size2__R2ZG=(__UINTEGER_32)(new_size__Q2ZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__R2ZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BX1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CX1G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__R2ZG + a__BX1G) & (__UINTEGER_32)(~ a__BX1G));
-    ptr_table__0W4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CX1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__ZW4G=((__POINTER )(NULL));
-    result__1W4G=((__POINTER *)ptr_table__0W4G)[ 0];
-    if ((result__1W4G == (void *)NULL)) {
-      result__1W4G=new_lab__2QJ(new_size__CX1G);
-      next__ZW4G=(void *)((unsigned long)result__1W4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CX1G)));
-      ((__POINTER *)next__ZW4G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__0W4G)[ 0]=next__ZW4G;
-    } else {
-      next__ZW4G=((__POINTER *)result__1W4G)[ 0];
-      if ((next__ZW4G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1W4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CX1G <<  1)) <=  4096)) {
-          next__ZW4G=(void *)((unsigned long)result__1W4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CX1G)));
-        } else {
-          next__ZW4G=new_lab__2QJ(new_size__CX1G);
-        };
-        ((__POINTER *)next__ZW4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0W4G)[ 0]=next__ZW4G;
-      } else {
-        ((__POINTER *)result__1W4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZW4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__1W4G=next__ZW4G;
-      };
-    };
-    ((__POINTER *)result__1W4G)[ 0]=((__POINTER ) 3);
-    result__O2ZG=(void *)((unsigned long)result__1W4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__4W4G=first_free__HDVB;
-    while ((((void *)result__4W4G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4W4G)->map_size_and_id__YSB &  4294967292LU) < new_size__Q2ZG))) {
-      result__4W4G=((__MEMORY *)result__4W4G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__4W4G == (void *)NULL)) {
-      result__4W4G=new_page__454();
+    if (((void *)result__00AH == (void *)NULL)) {
+      result__00AH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__4W4G,new_size__Q2ZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4W4G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__O2ZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4W4G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__PUEB=((void **)result__O2ZG);
-  Self__SZJC=(__INTEGER)(nb_elements__F23 -  1);
-  while ((Self__SZJC >=  0)) {
-    Result__PUEB[Self__SZJC]=NULL;
-    Self__SZJC=(__INTEGER)(Self__SZJC -  1);
+  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);
   };
-  return(Result__PUEB);
+  return(Result__TUEB);
 }
 
-static __BOOLEAN read_word__APF(void *st__CPF)
+static __BOOLEAN read_word__EPF(void *st__GPF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__EPF,idx__FPF;
-  __BOOLEAN result__GPF,__tmp__EQF;
-  __CHARACTER result__UWWG;
-  posold__EPF= 0;
-  idx__FPF= 0;
-  result__GPF=FALSE__;
-  if ((! read_space__NRD())) {
-    result__GPF=FALSE__;
+  __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__;
   } else {
-    posold__EPF=position__CBC;
-    idx__FPF= 1;
-    until_do__Z53:
+    posold__IPF=position__GBC;
+    idx__JPF= 1;
+    until_do__353:
     {
-      if ((idx__FPF > ((__STRING_CONSTANT *)st__CPF)->count__DD)) {
-        __tmp__EQF=TRUE__;
+      if ((idx__JPF > ((__STRING_CONSTANT *)st__GPF)->count__DD)) {
+        __tmp__IQF=TRUE__;
       } else {
-        result__UWWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__UWWG=((__CHARACTER )(( 0)));
+        result__0VYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__0VYG=((__CHARACTER )(( 0)));
         } else {
-          result__UWWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__0VYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__EQF=(result__UWWG != ((__CHARACTER *)((__STRING_CONSTANT *)st__CPF)->storage__FQO)[(__INTEGER)(idx__FPF -  1)]);
+        __tmp__IQF=(result__0VYG != ((__CHARACTER *)((__STRING_CONSTANT *)st__GPF)->storage__JQO)[(__INTEGER)(idx__JPF -  1)]);
       };
-      if ((! __tmp__EQF)) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        idx__FPF=(__INTEGER)(idx__FPF +  1);
-        goto until_do__Z53;
+      if ((! __tmp__IQF)) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        idx__JPF=(__INTEGER)(idx__JPF +  1);
+        goto until_do__353;
       };
     };
-    if ((idx__FPF > ((__STRING_CONSTANT *)st__CPF)->count__DD)) {
-      last_string__YZC=st__CPF;
-      result__GPF=TRUE__;
+    if ((idx__JPF > ((__STRING_CONSTANT *)st__GPF)->count__DD)) {
+      last_string__2ZC=st__GPF;
+      result__KPF=TRUE__;
     } else {
-      position__CBC=posold__EPF;
+      position__GBC=posold__IPF;
     };
   };
-  return(result__GPF);
+  return(result__KPF);
 }
 
-static __BOOLEAN read_slot_header__CDE(__BOOLEAN first__EDE)
+static __BOOLEAN read_slot_header__GDE(__BOOLEAN first__IDE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *v__IDE;
-  void *instr__QDE;
-  __POSITION pos__3KOG,pos__5KOG,pos__BLOG,pos__DLOG,pos__FLOG;
-  __POSITION pos__HLOG,pos__JLOG,pos__EQSG,pos__LLOG,pos__NLOG;
-  __POSITION pos__PLOG,pos__RLOG,pos__GQSG,pos__TLOG,pos__VLOG;
-  __POSITION pos__XLOG,pos__ZLOG,pos__1LOG,pos__3LOG,pos__5LOG;
-  __POSITION pos__BMOG,pos__DMOG,pos__FMOG,pos__HMOG,pos__IQSG;
-  __POSITION pos__JMOG,pos__LMOG,pos__SIM,pos__NMOG,pos__PMOG,pos__RMOG;
-  __POSITION pos__TMOG,__tmp__FCQD,__tmp__KCQD,__tmp__KQSG,pos__VMOG;
-  __POSITION pos__XMOG,pos__ZMOG,pos__1MOG,pos__3MOG,pos__5MOG;
-  void *res__MIE,*__tmp__OKE;
-  __INTEGER __tmp__FKE,__tmp__HKE,__tmp__JKE,typ_id__TU3G,typ_id__3U3G;
-  void *n__GX1G,*n__QPGB;
-  void *result__HX1G,*result__YPGB;
-  __ITM_TYPE_PARAMETER *result__RU3G,*Self__ZU3G,*result__1U3G;
-  __ITM_TYPE_PARAMETER *Self__DV3G;
-  __POINTER ptr__SU3G,ptr_table__MX4G,next__LX4G,result__NX4G;
-  __POINTER ptr_table__RX4G,next__QX4G,result__SX4G,ptr__2U3G;
-  __POINTER ptr_table__2X4G,next__1X4G,result__3X4G,ptr_table__BY4G;
-  __POINTER next__AY4G,result__CY4G;
-  __UINTEGER_32 sz__UU3G,a__VU3G,new_size__WU3G,t__XU3G,a__YU3G;
-  __UINTEGER_32 new_size__UX4G,lab_type__TX4G,sz__4U3G,a__5U3G;
-  __UINTEGER_32 new_size__AV3G,t__BV3G,a__CV3G,new_size__EY4G;
-  __UINTEGER_32 lab_type__DY4G;
-  __BOOLEAN result__GDE,result__CX4G,__tmp__WGE,result__EX4G;
-  __BOOLEAN result__FX4G,__tmp__OIE,result__IX4G,__tmp__4IE,__tmp__MJE;
-  __BOOLEAN result__FSL,__tmp__0JE,result__VX4G,result__YX4G;
-  __BOOLEAN result__FY4G,__tmp__ZOE,__tmp__5QE,__tmp__LPE,__tmp__VSE;
-  __BOOLEAN result__Q4G,__tmp__RUE,result__C5G,__tmp__NWE,result__U5G;
-  __BOOLEAN __tmp__0XE,result__GAH,__tmp__A0E,result__YAH,result__IY4G;
-  __BOOLEAN result__LY4G,result__OY4G,result__RY4G;
-  __CHARACTER style__KDE,result__GX4G,result__JX4G,result__WX4G;
-  __CHARACTER result__ZX4G,result__GY4G,result__JY4G,result__MY4G;
-  __CHARACTER result__PY4G,result__SY4G;
-  result__GDE=FALSE__;
-  v__IDE=NULL;
-  instr__QDE=NULL;
-  style__KDE=read_style__HRF();
-  if ((style__KDE != ' ')) {
-    result__GDE=TRUE__;
-    if (((! first__EDE) && (style__KDE == '+'))) {
-      pos__3KOG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_234));
-      put_position__EOG(pos__3KOG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
-    if (first__EDE) {
-      if (read_word__APF((&__string_62))) {
-        if ((style__KDE == '-')) {
-          append__RNS(output_decl__NFE,(&__string_235));
-        };
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        ((__PROTOTYPE *)object__ZAC)->parent_named__5.parent_itm_object__4.position__3CJ=current_position__ZWF();
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__5KOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__5KOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+    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)) {
             exit(( 1));
           };
         };
-        result__CX4G=read_word__APF((&__string_9));
-        if (is_shorter__TY) {
-          if (result__CX4G) {
+        result__40AH=read_word__EPF((&__string_9));
+        if (is_shorter__WY) {
+          if (result__40AH) {
             if (((void *)(&__string_9) == (void *)(&__string_4))) {
-              short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+              short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
             } else {
-              short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+              short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
             };
           };
         };
-        if (result__CX4G) {
-          __tmp__WGE=TRUE__;
+        if (result__40AH) {
+          __tmp__0GE=TRUE__;
         } else {
-          result__EX4G=read_word__APF((&__string_10));
-          if (is_shorter__TY) {
-            if (result__EX4G) {
+          result__A1AH=read_word__EPF((&__string_10));
+          if (is_shorter__WY) {
+            if (result__A1AH) {
               if (((void *)(&__string_10) == (void *)(&__string_4))) {
-                short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+                short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
               } else {
-                short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+                short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
               };
             };
           };
-          __tmp__WGE=result__EX4G;
+          __tmp__0GE=result__A1AH;
         };
-        if (__tmp__WGE) {
-          ((__PROTOTYPE *)object__ZAC)->type_style__H2C=last_string__YZC;
+        if (__tmp__0GE) {
+          ((__PROTOTYPE *)object__3AC)->type_style__L2C=last_string__2ZC;
         };
-        if ((! read_cap_identifier__CZJ())) {
-          pos__BLOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_237));
-          put_position__EOG(pos__BLOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        short__token__to__1AD((&__string_125),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if (((void *)((__PROTOTYPE *)object__ZAC)->shortname__VHE != (void *)last_string__YZC)) {
-          pos__DLOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_238));
-          put_position__EOG(pos__DLOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        result__FX4G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__FX4G=FALSE__;
+        result__B1AH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__B1AH=FALSE__;
         } else {
-          result__GX4G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__GX4G=((__CHARACTER )(( 0)));
+          result__C1AH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__C1AH=((__CHARACTER )(( 0)));
           } else {
-            result__GX4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__C1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__GX4G == '(')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__FX4G=TRUE__;
+          if ((result__C1AH == '(')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__B1AH=TRUE__;
           };
         };
-        if (result__FX4G) {
-          if (((! is_shorter__TY) && (! is_shorter2__VI))) {
-            pos__FLOG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_239));
-            put_position__EOG(pos__FLOG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        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)) {
               exit(( 1));
             };
           };
-          res__MIE=NULL;
-          __tmp__OIE=read_identifier__15K();
-          if (__tmp__OIE) {
-            result__IX4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__IX4G=FALSE__;
+          res__QIE=NULL;
+          __tmp__SIE=read_identifier__55K();
+          if (__tmp__SIE) {
+            result__E1AH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__E1AH=FALSE__;
             } else {
-              result__JX4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__JX4G=((__CHARACTER )(( 0)));
+              result__F1AH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__F1AH=((__CHARACTER )(( 0)));
               } else {
-                result__JX4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__F1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__JX4G == ':')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__IX4G=TRUE__;
+              if ((result__F1AH == ':')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__E1AH=TRUE__;
               };
             };
-            if ((! result__IX4G)) {
-              pos__HLOG=current_position__ZWF();
-              put_error__text__0MG( 2,(&__string_240));
-              put_position__EOG(pos__HLOG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+            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)) {
                 exit(( 1));
               };
             };
-            __tmp__4IE=((void *)read_type__TBM(PARSER__,TRUE__) == (void *)NULL);
-            if (__tmp__4IE) {
-              pos__JLOG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_241));
-              put_position__EOG(pos__JLOG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+            __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)) {
                 exit(( 1));
               };
             };
-            pos__EQSG=current_position__ZWF();
-            put_error__text__0MG( 1,(&__string_242));
-            put_position__EOG(pos__EQSG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+            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)) {
               exit(( 1));
             };
-            __tmp__MJE=TRUE__;
+            __tmp__QJE=TRUE__;
           } else {
-            __tmp__MJE=FALSE__;
+            __tmp__QJE=FALSE__;
           };
-          if ((! __tmp__MJE)) {
-            result__FSL=read_cap_identifier__CZJ();
-            if (result__FSL) {
-              __tmp__0JE=is_parameter_type__YJE;
-              if ((! __tmp__0JE)) {
-                pos__LLOG=current_position__ZWF();
-                put_error__text__0MG( 0,(&__string_243));
-                put_position__EOG(pos__LLOG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+          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)) {
                   exit(( 1));
                 };
               };
-              __tmp__FKE=position__CBC;
-              __tmp__HKE=((__STRING_CONSTANT *)last_string__YZC)->count__DD;
-              __tmp__JKE=(__INTEGER)(__tmp__FKE - __tmp__HKE);
-              short__token__to__1AD((&__string_126),__tmp__JKE,position__CBC);
-              n__GX1G=last_string__YZC;
-              result__HX1G=fast_reference_at__I1T(dico__CTI,n__GX1G);
-              if (((void *)result__HX1G == (void *)NULL)) {
-                result__RU3G=NULL;
-                ptr__SU3G=((__POINTER )(NULL));
-                typ_id__TU3G= 0;
-                sz__UU3G=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-                if ((sz__UU3G ==  0)) {
-                  result__RU3G=ITM_TYPE_PARAMETER__;
+              __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__;
                 } else {
-                  typ_id__TU3G=-1;
-                  clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__UU3G);
-                  if ((typ_id__TU3G == (__INTEGER)(-  1))) {
-                    a__VU3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__WU3G=(__UINTEGER_32)((__UINTEGER_32)(sz__UU3G + a__VU3G) & (__UINTEGER_32)(~ a__VU3G));
-                    ptr_table__MX4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WU3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__LX4G=((__POINTER )(NULL));
-                    result__NX4G=((__POINTER *)ptr_table__MX4G)[ 0];
-                    if ((result__NX4G == (void *)NULL)) {
-                      result__NX4G=new_lab__2QJ(new_size__WU3G);
-                      next__LX4G=(void *)((unsigned long)result__NX4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WU3G)));
-                      ((__POINTER *)next__LX4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__MX4G)[ 0]=next__LX4G;
+                  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;
                     } else {
-                      next__LX4G=((__POINTER *)result__NX4G)[ 0];
-                      if ((next__LX4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NX4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WU3G <<  1)) <=  4096)) {
-                          next__LX4G=(void *)((unsigned long)result__NX4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WU3G)));
+                      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)));
                         } else {
-                          next__LX4G=new_lab__2QJ(new_size__WU3G);
+                          next__H1AH=new_lab__ARJ(new_size__WX5G);
                         };
-                        ((__POINTER *)next__LX4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__MX4G)[ 0]=next__LX4G;
+                        ((__POINTER *)next__H1AH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__I1AH)[ 0]=next__H1AH;
                       } else {
-                        ((__POINTER *)result__NX4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LX4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__NX4G=next__LX4G;
+                        ((__POINTER *)result__J1AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__J1AH=next__H1AH;
                       };
                     };
-                    ptr__SU3G=result__NX4G;
+                    ptr__SX5G=result__J1AH;
                   } else {
-                    t__XU3G=((__UINTEGER_32 )typ_id__TU3G);
-                    a__YU3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__UX4G=(__UINTEGER_32)((__UINTEGER_32)(sz__UU3G + a__YU3G) & (__UINTEGER_32)(~ a__YU3G));
-                    ptr_table__RX4G=((__POINTER )(&(table_type[(t__XU3G)])));
-                    lab_type__TX4G=(__UINTEGER_32)(t__XU3G |  1);
-                    next__QX4G=((__POINTER )(NULL));
-                    result__SX4G=((__POINTER *)ptr_table__RX4G)[ 0];
-                    if ((result__SX4G == (void *)NULL)) {
-                      result__SX4G=new_lab__2QJ(lab_type__TX4G);
-                      next__QX4G=(void *)((unsigned long)result__SX4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UX4G)));
-                      ((__POINTER *)next__QX4G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__RX4G)[ 0]=next__QX4G;
+                    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;
                     } else {
-                      next__QX4G=((__POINTER *)result__SX4G)[ 0];
-                      if ((next__QX4G == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SX4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__UX4G <<  1)) <=  4096)) {
-                          next__QX4G=(void *)((unsigned long)result__SX4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UX4G)));
+                      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)));
                         } else {
-                          next__QX4G=new_lab__2QJ(lab_type__TX4G);
+                          next__M1AH=new_lab__ARJ(lab_type__P1AH);
                         };
-                        ((__POINTER *)next__QX4G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__RX4G)[ 0]=next__QX4G;
+                        ((__POINTER *)next__M1AH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__N1AH)[ 0]=next__M1AH;
                       } else {
-                        ((__POINTER *)result__SX4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QX4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__SX4G=next__QX4G;
+                        ((__POINTER *)result__O1AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__O1AH=next__M1AH;
                       };
                     };
-                    ptr__SU3G=result__SX4G;
+                    ptr__SX5G=result__O1AH;
                   };
-                  result__RU3G=((__ITM_TYPE_PARAMETER *)ptr__SU3G);
-                  *(result__RU3G) = *(ITM_TYPE_PARAMETER__);
+                  result__RX5G=((__ITM_TYPE_PARAMETER *)ptr__SX5G);
+                  *(result__RX5G) = *(ITM_TYPE_PARAMETER__);
                 };
-                Self__ZU3G=((__ITM_TYPE_PARAMETER *)result__RU3G);
-                Self__ZU3G->parent_itm_type__NDE.name__0XP=n__GX1G;
-                fast_put__to__DOZ(dico__CTI,Self__ZU3G,n__GX1G);
-                result__HX1G=result__RU3G;
+                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;
               };
-              if (result__HX1G==NULL) {
-                __tmp__OKE=NULL;
+              if (result__1X3G==NULL) {
+                __tmp__SKE=NULL;
               } else {
-                switch (((struct ___OBJ *)result__HX1G)->__id) {
+                switch (((struct ___OBJ *)result__1X3G)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__OKE=((void *)result__HX1G);
+                  __tmp__SKE=((void *)result__1X3G);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__OKE=NULL;
+                  __tmp__SKE=NULL;
                 } break;
                 }
               };
-              res__MIE=__tmp__OKE;
+              res__QIE=__tmp__SKE;
             };
           };
-          if (((void *)res__MIE == (void *)NULL)) {
-            pos__NLOG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_243));
-            put_position__EOG(pos__NLOG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          add_last__CBBC(((__PROTOTYPE *)object__ZAC)->idf_generic_list__EME,res__MIE);
-          while_do__KWK:
+          add_last__GBBC(((__PROTOTYPE *)object__3AC)->idf_generic_list__IME,res__QIE);
+          while_do__OWK:
           {
-            result__VX4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__VX4G=FALSE__;
+            result__R1AH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__R1AH=FALSE__;
             } else {
-              result__WX4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__WX4G=((__CHARACTER )(( 0)));
+              result__S1AH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__S1AH=((__CHARACTER )(( 0)));
               } else {
-                result__WX4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__S1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__WX4G == ',')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__VX4G=TRUE__;
+              if ((result__S1AH == ',')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__R1AH=TRUE__;
               };
             };
-            if (result__VX4G) {
-              res__MIE=NULL;
-              __tmp__OIE=read_identifier__15K();
-              if (__tmp__OIE) {
-                result__YX4G=FALSE__;
-                if ((! read_space__NRD())) {
-                  result__YX4G=FALSE__;
+            if (result__R1AH) {
+              res__QIE=NULL;
+              __tmp__SIE=read_identifier__55K();
+              if (__tmp__SIE) {
+                result__U1AH=FALSE__;
+                if ((! read_space__RRD())) {
+                  result__U1AH=FALSE__;
                 } else {
-                  result__ZX4G='\0';
-                  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                    result__ZX4G=((__CHARACTER )(( 0)));
+                  result__V1AH='\0';
+                  if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                    result__V1AH=((__CHARACTER )(( 0)));
                   } else {
-                    result__ZX4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                    result__V1AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                   };
-                  if ((result__ZX4G == ':')) {
-                    position__CBC=(__INTEGER)(position__CBC +  1);
-                    result__YX4G=TRUE__;
+                  if ((result__V1AH == ':')) {
+                    position__GBC=(__INTEGER)(position__GBC +  1);
+                    result__U1AH=TRUE__;
                   };
                 };
-                if ((! result__YX4G)) {
-                  pos__PLOG=current_position__ZWF();
-                  put_error__text__0MG( 2,(&__string_240));
-                  put_position__EOG(pos__PLOG);
-                  put_string__E1F(msg_err__5MG);
-                  if ((type_error__4MG !=  2)) {
+                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)) {
                     exit(( 1));
                   };
                 };
-                __tmp__4IE=((void *)read_type__TBM(PARSER__,TRUE__) == (void *)NULL);
-                if (__tmp__4IE) {
-                  pos__RLOG=current_position__ZWF();
-                  put_error__text__0MG( 0,(&__string_241));
-                  put_position__EOG(pos__RLOG);
-                  put_string__E1F(msg_err__5MG);
-                  if ((type_error__4MG !=  2)) {
+                __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)) {
                     exit(( 1));
                   };
                 };
-                pos__GQSG=current_position__ZWF();
-                put_error__text__0MG( 1,(&__string_242));
-                put_position__EOG(pos__GQSG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+                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)) {
                   exit(( 1));
                 };
-                __tmp__MJE=TRUE__;
+                __tmp__QJE=TRUE__;
               } else {
-                __tmp__MJE=FALSE__;
+                __tmp__QJE=FALSE__;
               };
-              if ((! __tmp__MJE)) {
-                result__FSL=read_cap_identifier__CZJ();
-                if (result__FSL) {
-                  __tmp__0JE=is_parameter_type__YJE;
-                  if ((! __tmp__0JE)) {
-                    pos__TLOG=current_position__ZWF();
-                    put_error__text__0MG( 0,(&__string_243));
-                    put_position__EOG(pos__TLOG);
-                    put_string__E1F(msg_err__5MG);
-                    if ((type_error__4MG !=  2)) {
+              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)) {
                       exit(( 1));
                     };
                   };
-                  __tmp__FKE=position__CBC;
-                  __tmp__HKE=((__STRING_CONSTANT *)last_string__YZC)->count__DD;
-                  __tmp__JKE=(__INTEGER)(__tmp__FKE - __tmp__HKE);
-                  short__token__to__1AD((&__string_126),__tmp__JKE,position__CBC);
-                  n__QPGB=last_string__YZC;
-                  result__YPGB=fast_reference_at__I1T(dico__CTI,n__QPGB);
-                  if (((void *)result__YPGB == (void *)NULL)) {
-                    result__1U3G=NULL;
-                    ptr__2U3G=((__POINTER )(NULL));
-                    typ_id__3U3G= 0;
-                    sz__4U3G=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-                    if ((sz__4U3G ==  0)) {
-                      result__1U3G=ITM_TYPE_PARAMETER__;
+                  __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__;
                     } else {
-                      typ_id__3U3G=-1;
-                      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4U3G);
-                      if ((typ_id__3U3G == (__INTEGER)(-  1))) {
-                        a__5U3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                        new_size__AV3G=(__UINTEGER_32)((__UINTEGER_32)(sz__4U3G + a__5U3G) & (__UINTEGER_32)(~ a__5U3G));
-                        ptr_table__2X4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AV3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                        next__1X4G=((__POINTER )(NULL));
-                        result__3X4G=((__POINTER *)ptr_table__2X4G)[ 0];
-                        if ((result__3X4G == (void *)NULL)) {
-                          result__3X4G=new_lab__2QJ(new_size__AV3G);
-                          next__1X4G=(void *)((unsigned long)result__3X4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AV3G)));
-                          ((__POINTER *)next__1X4G)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__2X4G)[ 0]=next__1X4G;
+                      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;
                         } else {
-                          next__1X4G=((__POINTER *)result__3X4G)[ 0];
-                          if ((next__1X4G == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3X4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AV3G <<  1)) <=  4096)) {
-                              next__1X4G=(void *)((unsigned long)result__3X4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AV3G)));
+                          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)));
                             } else {
-                              next__1X4G=new_lab__2QJ(new_size__AV3G);
+                              next__X1AH=new_lab__ARJ(new_size__AY5G);
                             };
-                            ((__POINTER *)next__1X4G)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__2X4G)[ 0]=next__1X4G;
+                            ((__POINTER *)next__X1AH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__Y1AH)[ 0]=next__X1AH;
                           } else {
-                            ((__POINTER *)result__3X4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1X4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__3X4G=next__1X4G;
+                            ((__POINTER *)result__Z1AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X1AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__Z1AH=next__X1AH;
                           };
                         };
-                        ptr__2U3G=result__3X4G;
+                        ptr__2X5G=result__Z1AH;
                       } else {
-                        t__BV3G=((__UINTEGER_32 )typ_id__3U3G);
-                        a__CV3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                        new_size__EY4G=(__UINTEGER_32)((__UINTEGER_32)(sz__4U3G + a__CV3G) & (__UINTEGER_32)(~ a__CV3G));
-                        ptr_table__BY4G=((__POINTER )(&(table_type[(t__BV3G)])));
-                        lab_type__DY4G=(__UINTEGER_32)(t__BV3G |  1);
-                        next__AY4G=((__POINTER )(NULL));
-                        result__CY4G=((__POINTER *)ptr_table__BY4G)[ 0];
-                        if ((result__CY4G == (void *)NULL)) {
-                          result__CY4G=new_lab__2QJ(lab_type__DY4G);
-                          next__AY4G=(void *)((unsigned long)result__CY4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EY4G)));
-                          ((__POINTER *)next__AY4G)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__BY4G)[ 0]=next__AY4G;
+                        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;
                         } else {
-                          next__AY4G=((__POINTER *)result__CY4G)[ 0];
-                          if ((next__AY4G == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CY4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EY4G <<  1)) <=  4096)) {
-                              next__AY4G=(void *)((unsigned long)result__CY4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EY4G)));
+                          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)));
                             } else {
-                              next__AY4G=new_lab__2QJ(lab_type__DY4G);
+                              next__21AH=new_lab__ARJ(lab_type__51AH);
                             };
-                            ((__POINTER *)next__AY4G)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__BY4G)[ 0]=next__AY4G;
+                            ((__POINTER *)next__21AH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__31AH)[ 0]=next__21AH;
                           } else {
-                            ((__POINTER *)result__CY4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__AY4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__CY4G=next__AY4G;
+                            ((__POINTER *)result__41AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__41AH=next__21AH;
                           };
                         };
-                        ptr__2U3G=result__CY4G;
+                        ptr__2X5G=result__41AH;
                       };
-                      result__1U3G=((__ITM_TYPE_PARAMETER *)ptr__2U3G);
-                      *(result__1U3G) = *(ITM_TYPE_PARAMETER__);
+                      result__1X5G=((__ITM_TYPE_PARAMETER *)ptr__2X5G);
+                      *(result__1X5G) = *(ITM_TYPE_PARAMETER__);
                     };
-                    Self__DV3G=((__ITM_TYPE_PARAMETER *)result__1U3G);
-                    Self__DV3G->parent_itm_type__NDE.name__0XP=n__QPGB;
-                    fast_put__to__DOZ(dico__CTI,Self__DV3G,n__QPGB);
-                    result__YPGB=result__1U3G;
+                    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;
                   };
-                  if (result__YPGB==NULL) {
-                    __tmp__OKE=NULL;
+                  if (result__2PGB==NULL) {
+                    __tmp__SKE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__YPGB)->__id) {
+                    switch (((struct ___OBJ *)result__2PGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__OKE=((void *)result__YPGB);
+                      __tmp__SKE=((void *)result__2PGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__OKE=NULL;
+                      __tmp__SKE=NULL;
                     } break;
                     }
                   };
-                  res__MIE=__tmp__OKE;
+                  res__QIE=__tmp__SKE;
                 };
               };
-              if (((void *)res__MIE == (void *)NULL)) {
-                pos__VLOG=current_position__ZWF();
-                put_error__text__0MG( 0,(&__string_243));
-                put_position__EOG(pos__VLOG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+              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)) {
                   exit(( 1));
                 };
               };
-              add_last__CBBC(((__PROTOTYPE *)object__ZAC)->idf_generic_list__EME,res__MIE);
-              goto while_do__KWK;
+              add_last__GBBC(((__PROTOTYPE *)object__3AC)->idf_generic_list__IME,res__QIE);
+              goto while_do__OWK;
             };
           };
-          result__FY4G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__FY4G=FALSE__;
+          result__B2AH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__B2AH=FALSE__;
           } else {
-            result__GY4G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__GY4G=((__CHARACTER )(( 0)));
+            result__C2AH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__C2AH=((__CHARACTER )(( 0)));
             } else {
-              result__GY4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__C2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__GY4G == ')')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__FY4G=TRUE__;
+            if ((result__C2AH == ')')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__B2AH=TRUE__;
             };
           };
-          if ((! result__FY4G)) {
-            pos__XLOG=current_position__ZWF();
-            put_error__text__0MG( 2,(&__string_244));
-            put_position__EOG(pos__XLOG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          if (((! is_shorter__TY) && (! is_shorter2__VI))) {
-            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__ZAC)->idf_generic_list__EME)->parent_arrayed_collection__DME.upper__GBBC +  1) !=  0)) {
-              pos__ZLOG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_245));
-              put_position__EOG(pos__ZLOG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+          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)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        pos__1LOG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_246));
-        put_position__EOG(pos__1LOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+        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)) {
           exit(( 1));
         };
       };
-      __tmp__ZOE=TRUE__;
+      __tmp__3OE=TRUE__;
     } else {
-      __tmp__ZOE=FALSE__;
+      __tmp__3OE=FALSE__;
     };
-    if (__tmp__ZOE) {
-      __tmp__5QE=TRUE__;
+    if (__tmp__3OE) {
+      __tmp__DRE=TRUE__;
     } else {
-      __tmp__LPE=(read_word__APF((&__string_63)) || read_word__APF((&__string_64)));
-      if (__tmp__LPE) {
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__3LOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__3LOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      __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)) {
             exit(( 1));
           };
         };
-        if (((void *)read_type_list__YLO(PARSER__,FALSE__) == (void *)NULL)) {
-          pos__5LOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_247));
-          put_position__EOG(pos__5LOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
       };
-      __tmp__5QE=__tmp__LPE;
+      __tmp__DRE=__tmp__PPE;
     };
-    if (__tmp__5QE) {
-      __tmp__VSE=TRUE__;
+    if (__tmp__DRE) {
+      __tmp__ZSE=TRUE__;
     } else {
-      result__Q4G=read_word__APF((&__string_65));
-      if (result__Q4G) {
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__BMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__BMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        if ((! read_external__QSO())) {
-          pos__DMOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_248));
-          put_position__EOG(pos__DMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        append__RNS(output_decl__NFE,(&__string_249));
-        append__RNS(output_decl__NFE,((__PROTOTYPE *)object__ZAC)->parent_named__5.name__LI);
-        add_last__JLT(output_decl__NFE,'\n');
-        append__RNS(output_decl__NFE,last_string__YZC);
-        add_last__JLT(output_decl__NFE,'\n');
+        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');
       };
-      __tmp__VSE=result__Q4G;
+      __tmp__ZSE=result__U4G;
     };
-    if (__tmp__VSE) {
-      __tmp__RUE=TRUE__;
+    if (__tmp__ZSE) {
+      __tmp__VUE=TRUE__;
     } else {
-      result__C5G=read_word__APF((&__string_66));
-      if (result__C5G) {
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__FMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__FMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        v__IDE=read_expr_primary__Y3M(PARSER__);
-        if (((void *)v__IDE == (void *)NULL)) {
-          pos__HMOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_250));
-          put_position__EOG(pos__HMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        if (((void *)((__PROTOTYPE *)object__ZAC)->default_value__DUE != (void *)NULL)) {
-          pos__IQSG=current_position__ZWF();
-          put_error__text__0MG( 1,(&__string_251));
-          put_position__EOG(pos__IQSG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZAC)->default_value__DUE=v__IDE;
+        ((__PROTOTYPE *)object__3AC)->default_value__HUE=v__MDE;
       };
-      __tmp__RUE=result__C5G;
+      __tmp__VUE=result__G5G;
     };
-    if (__tmp__RUE) {
-      __tmp__NWE=TRUE__;
+    if (__tmp__VUE) {
+      __tmp__RWE=TRUE__;
     } else {
-      result__U5G=read_word__APF((&__string_67));
-      if (result__U5G) {
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__JMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__JMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        if ((! read_external__QSO())) {
-          pos__LMOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_248));
-          put_position__EOG(pos__LMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        if (((void *)((__PROTOTYPE *)object__ZAC)->type_c__4VE != (void *)NULL)) {
-          pos__SIM=current_position__ZWF();
-          put_error__text__0MG( 1,(&__string_252));
-          put_position__EOG(pos__SIM);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZAC)->type_c__4VE=last_string__YZC;
+        ((__PROTOTYPE *)object__3AC)->type_c__CWE=last_string__2ZC;
       };
-      __tmp__NWE=result__U5G;
+      __tmp__RWE=result__Y5G;
     };
-    if (__tmp__NWE) {
-      __tmp__0XE=TRUE__;
+    if (__tmp__RWE) {
+      __tmp__4XE=TRUE__;
     } else {
-      result__GAH=read_word__APF((&__string_68));
-      if (result__GAH) {
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__NMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__NMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        if ((! read_integer__Q1P())) {
-          pos__PMOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_253));
-          put_position__EOG(pos__PMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
       };
-      __tmp__0XE=result__GAH;
+      __tmp__4XE=result__KAH;
     };
-    if (__tmp__0XE) {
-      __tmp__A0E=TRUE__;
+    if (__tmp__4XE) {
+      __tmp__E0E=TRUE__;
     } else {
-      result__YAH=read_word__APF((&__string_88));
-      if (result__YAH) {
-        if ((! read_symbol__TWJ((&__string_14)))) {
-          pos__RMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_254));
-          put_position__EOG(pos__RMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        result__IY4G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__IY4G=FALSE__;
+        result__E2AH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__E2AH=FALSE__;
         } else {
-          result__JY4G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__JY4G=((__CHARACTER )(( 0)));
+          result__F2AH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__F2AH=((__CHARACTER )(( 0)));
           } else {
-            result__JY4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__F2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__JY4G == '(')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__IY4G=TRUE__;
+          if ((result__F2AH == '(')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__E2AH=TRUE__;
           };
         };
-        if ((! result__IY4G)) {
-          pos__TMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_255));
-          put_position__EOG(pos__TMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        while_do__2FFB:
+        while_do__AGFB:
         {
-          instr__QDE=readlip_expr__ZSPB();
-          if (((void *)instr__QDE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__QDE)->__id) {
+          instr__UDE=readlip_expr__3SPB();
+          if (((void *)instr__UDE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__UDE)->__id) {
             case __LIP_AFFECT__: {
-              run__AGFC(instr__QDE);
+              run__EGFC(instr__UDE);
             } break;
             case __LIP_BINARY__: {
-              __tmp__FCQD=((__LIP_BINARY *)instr__QDE)->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ;
-              put_error__text__0MG( 2,(&__string_256));
-              put_position__EOG(__tmp__FCQD);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+              __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)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __tmp__KCQD=((__LIP_UNARY *)instr__QDE)->parent_lip_code__104B.parent_itm_object__PDE.position__3CJ;
-              put_error__text__0MG( 2,(&__string_256));
-              put_position__EOG(__tmp__KCQD);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+              __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)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__TKTE(instr__QDE);
+              run__FNTE(instr__UDE);
             } break;
             case __LIP_IF__: {
-              run__MCQD(instr__QDE);
+              run__QCQD(instr__UDE);
             } break;
             case __LIP_PRINT__: {
-              run__HPTE(instr__QDE);
+              run__ZRTE(instr__UDE);
             } break;
             case __LIP_VALUE__: {
-              __tmp__KQSG=((__LIP_VALUE *)instr__QDE)->parent_lip_code__JUEE.parent_itm_object__PDE.position__3CJ;
-              put_error__text__0MG( 2,(&__string_256));
-              put_position__EOG(__tmp__KQSG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+              __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)) {
                 exit(( 1));
               };
             } break;
             };
-            result__LY4G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__LY4G=FALSE__;
+            result__H2AH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__H2AH=FALSE__;
             } else {
-              result__MY4G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__MY4G=((__CHARACTER )(( 0)));
+              result__I2AH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__I2AH=((__CHARACTER )(( 0)));
               } else {
-                result__MY4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__I2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__MY4G == ';')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__LY4G=TRUE__;
+              if ((result__I2AH == ';')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__H2AH=TRUE__;
               };
             };
-            if ((! result__LY4G)) {
-              pos__VMOG=current_position__ZWF();
-              put_error__text__0MG( 2,(&__string_159));
-              put_position__EOG(pos__VMOG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+            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)) {
                 exit(( 1));
               };
             };
-            goto while_do__2FFB;
+            goto while_do__AGFB;
           };
         };
-        result__OY4G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__OY4G=FALSE__;
+        result__K2AH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__K2AH=FALSE__;
         } else {
-          result__PY4G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__PY4G=((__CHARACTER )(( 0)));
+          result__L2AH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__L2AH=((__CHARACTER )(( 0)));
           } else {
-            result__PY4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__L2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__PY4G == ')')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__OY4G=TRUE__;
+          if ((result__L2AH == ')')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__K2AH=TRUE__;
           };
         };
-        if ((! result__OY4G)) {
-          pos__XMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_223));
-          put_position__EOG(pos__XMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
       };
-      __tmp__A0E=result__YAH;
+      __tmp__E0E=result__2AH;
     };
-    if ((! __tmp__A0E)) {
-      if (((((((read_word__APF((&__string_69)) || read_word__APF((&__string_70))) || read_word__APF((&__string_71))) || read_word__APF((&__string_72))) || read_word__APF((&__string_73))) || read_word__APF((&__string_74))) || read_word__APF((&__string_75)))) {
-        short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        if ((! read_symbol__TWJ((&__string_12)))) {
-          pos__ZMOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_236));
-          put_position__EOG(pos__ZMOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+    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)) {
             exit(( 1));
           };
         };
-        if ((! read_string__1EQ())) {
-          pos__1MOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_257));
-          put_position__EOG(pos__1MOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
       } else {
-        pos__3MOG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_258));
-        put_position__EOG(pos__3MOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+        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)) {
           exit(( 1));
         };
       };
     };
-    result__RY4G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__RY4G=FALSE__;
+    result__N2AH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__N2AH=FALSE__;
     } else {
-      result__SY4G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__SY4G=((__CHARACTER )(( 0)));
+      result__O2AH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__O2AH=((__CHARACTER )(( 0)));
       } else {
-        result__SY4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__O2AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__SY4G == ';')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__RY4G=TRUE__;
+      if ((result__O2AH == ';')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__N2AH=TRUE__;
       };
     };
-    if ((! result__RY4G)) {
-      pos__5MOG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_227));
-      put_position__EOG(pos__5MOG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
   };
-  return(result__GDE);
+  return(result__KDE);
 }
 
-static void* get_name__KUOB(void *n__MUOB)
+static void* get_name__OUOB(void *n__QUOB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__LOEC,*result__OUOB;
-  __STRING_CONSTANT *Self__GV3G,*Self__LV3G,*Self__QV3G;
-  __INTEGER result__FV3G,__tmp__HV3G,Self__IV3G,typ_id__L4YB;
-  __INTEGER result__KV3G,__tmp__MV3G,Self__NV3G,idx__NXFC,idx__G2HD;
-  __INTEGER new_capacity__H2HD,i__I2HD,result__PV3G,__tmp__RV3G;
-  __INTEGER Self__SV3G,typ_id__V4HD;
-  __SECTION_ *result__F4YB;
-  __POINTER ptr__G4YB,ptr_table__VY4G,next__UY4G,result__WY4G;
-  __POINTER ptr_table__0Y4G,next__ZY4G,result__1Y4G,ptr__Q4HD;
-  __POINTER ptr_table__5Y4G,next__4Y4G,result__AZ4G,ptr_table__EZ4G;
-  __POINTER next__DZ4G,result__FZ4G;
-  __UINTEGER_32 sz__I4YB,a__GZ1G,new_size__HZ1G,t__LZ1G,a__KZ1G;
-  __UINTEGER_32 new_size__3Y4G,lab_type__2Y4G,sz__S4HD,a__2X1G;
-  __UINTEGER_32 new_size__3X1G,t__BY1G,a__AY1G,new_size__HZ4G;
-  __UINTEGER_32 lab_type__GZ4G;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__5NEC,*Self__DXFC;
-  void *node__KOEC,*node__OXFC,*node1__K2HD,*node2__L2HD,*__tmp__2YFC;
-  void **old_buckets__J2HD;
-  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__P4HD;
-  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__0CTD;
-  Self__5NEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__TUOB);
-  result__LOEC=NULL;
-  Self__GV3G=((__STRING_CONSTANT *)n__MUOB);
-  result__FV3G= 0;
-  __tmp__HV3G=Self__GV3G->count__DD;
-  Self__IV3G= 1;
-  while ((Self__IV3G <= __tmp__HV3G)) {
-    result__FV3G=(__INTEGER)((__INTEGER)( 5 * result__FV3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GV3G->storage__FQO)[(__INTEGER)(Self__IV3G -  1)])));
-    Self__IV3G=(__INTEGER)(Self__IV3G +  1);
-  };
-  if ((result__FV3G <  0)) {
-    result__FV3G=(__INTEGER)(~ result__FV3G);
-  };
-  node__KOEC=((void **)Self__5NEC->buckets__SOEC)[(__INTEGER)(result__FV3G % Self__5NEC->capacity__NOEC)];
-  while ((! (((void *)node__KOEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__KOEC)->key__4OEC == (void *)n__MUOB)))) {
-    node__KOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__KOEC)->next__JPEC;
-  };
-  if (((void *)node__KOEC != (void *)NULL)) {
-    result__LOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__KOEC)->item__RPEC;
-  };
-  result__OUOB=result__LOEC;
-  if (((void *)result__LOEC == (void *)NULL)) {
-    result__F4YB=NULL;
-    ptr__G4YB=((__POINTER )(NULL));
-    typ_id__L4YB= 0;
-    sz__I4YB=((__UINTEGER_32 )sizeof(__SECTION_));
-    if ((sz__I4YB ==  0)) {
-      result__F4YB=SECTION___;
-    } else {
-      typ_id__L4YB=__SECTION___;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__I4YB);
-      if ((typ_id__L4YB == (__INTEGER)(-  1))) {
-        a__GZ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__HZ1G=(__UINTEGER_32)((__UINTEGER_32)(sz__I4YB + a__GZ1G) & (__UINTEGER_32)(~ a__GZ1G));
-        ptr_table__VY4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HZ1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__UY4G=((__POINTER )(NULL));
-        result__WY4G=((__POINTER *)ptr_table__VY4G)[ 0];
-        if ((result__WY4G == (void *)NULL)) {
-          result__WY4G=new_lab__2QJ(new_size__HZ1G);
-          next__UY4G=(void *)((unsigned long)result__WY4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZ1G)));
-          ((__POINTER *)next__UY4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VY4G)[ 0]=next__UY4G;
-        } else {
-          next__UY4G=((__POINTER *)result__WY4G)[ 0];
-          if ((next__UY4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WY4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__HZ1G <<  1)) <=  4096)) {
-              next__UY4G=(void *)((unsigned long)result__WY4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZ1G)));
+  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)));
             } else {
-              next__UY4G=new_lab__2QJ(new_size__HZ1G);
-            };
-            ((__POINTER *)next__UY4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VY4G)[ 0]=next__UY4G;
-          } else {
-            ((__POINTER *)result__WY4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__UY4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WY4G=next__UY4G;
-          };
-        };
-        ptr__G4YB=result__WY4G;
-      } else {
-        t__LZ1G=((__UINTEGER_32 )typ_id__L4YB);
-        a__KZ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__3Y4G=(__UINTEGER_32)((__UINTEGER_32)(sz__I4YB + a__KZ1G) & (__UINTEGER_32)(~ a__KZ1G));
-        ptr_table__0Y4G=((__POINTER )(&(table_type[(t__LZ1G)])));
-        lab_type__2Y4G=(__UINTEGER_32)(t__LZ1G |  1);
-        next__ZY4G=((__POINTER )(NULL));
-        result__1Y4G=((__POINTER *)ptr_table__0Y4G)[ 0];
-        if ((result__1Y4G == (void *)NULL)) {
-          result__1Y4G=new_lab__2QJ(lab_type__2Y4G);
-          next__ZY4G=(void *)((unsigned long)result__1Y4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3Y4G)));
-          ((__POINTER *)next__ZY4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0Y4G)[ 0]=next__ZY4G;
-        } else {
-          next__ZY4G=((__POINTER *)result__1Y4G)[ 0];
-          if ((next__ZY4G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1Y4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3Y4G <<  1)) <=  4096)) {
-              next__ZY4G=(void *)((unsigned long)result__1Y4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3Y4G)));
+              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)));
             } else {
-              next__ZY4G=new_lab__2QJ(lab_type__2Y4G);
-            };
-            ((__POINTER *)next__ZY4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0Y4G)[ 0]=next__ZY4G;
-          } else {
-            ((__POINTER *)result__1Y4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZY4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1Y4G=next__ZY4G;
-          };
-        };
-        ptr__G4YB=result__1Y4G;
-      };
-      result__F4YB=((__SECTION_ *)ptr__G4YB);
-      *(result__F4YB) = *(SECTION___);
-    };
-    result__OUOB=result__F4YB;
-    ((__SECTION_ *)result__F4YB)->name__SYDC=n__MUOB;
-    Self__DXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__TUOB);
-    Self__LV3G=((__STRING_CONSTANT *)n__MUOB);
-    result__KV3G= 0;
-    __tmp__MV3G=Self__LV3G->count__DD;
-    Self__NV3G= 1;
-    while ((Self__NV3G <= __tmp__MV3G)) {
-      result__KV3G=(__INTEGER)((__INTEGER)( 5 * result__KV3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LV3G->storage__FQO)[(__INTEGER)(Self__NV3G -  1)])));
-      Self__NV3G=(__INTEGER)(Self__NV3G +  1);
-    };
-    if ((result__KV3G <  0)) {
-      result__KV3G=(__INTEGER)(~ result__KV3G);
-    };
-    idx__NXFC=(__INTEGER)(result__KV3G % Self__DXFC->capacity__NOEC);
-    node__OXFC=((void **)Self__DXFC->buckets__SOEC)[idx__NXFC];
-    while ((! (((void *)node__OXFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__OXFC)->key__4OEC == (void *)n__MUOB)))) {
-      node__OXFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__OXFC)->next__JPEC;
-    };
-    if (((void *)node__OXFC == (void *)NULL)) {
-      if ((Self__DXFC->capacity__NOEC == Self__DXFC->count__PYFC)) {
-        idx__G2HD= 0;
-        node1__K2HD=NULL;
-        node2__L2HD=NULL;
-        old_buckets__J2HD=Self__DXFC->buckets__SOEC;
-        new_capacity__H2HD=prime_number_ceiling__H41((__INTEGER)(Self__DXFC->capacity__NOEC +  1));
-        Self__DXFC->buckets__SOEC=create__N1XC(new_capacity__H2HD);
-        i__I2HD=(__INTEGER)(Self__DXFC->capacity__NOEC -  1);
-        Self__DXFC->capacity__NOEC=new_capacity__H2HD;
-        while ((i__I2HD >=  0)) {
-          node1__K2HD=((void **)old_buckets__J2HD)[i__I2HD];
-          while (((void *)node1__K2HD != (void *)NULL)) {
-            node2__L2HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__K2HD)->next__JPEC;
-            Self__QV3G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__K2HD)->key__4OEC);
-            result__PV3G= 0;
-            __tmp__RV3G=Self__QV3G->count__DD;
-            Self__SV3G= 1;
-            while ((Self__SV3G <= __tmp__RV3G)) {
-              result__PV3G=(__INTEGER)((__INTEGER)( 5 * result__PV3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QV3G->storage__FQO)[(__INTEGER)(Self__SV3G -  1)])));
-              Self__SV3G=(__INTEGER)(Self__SV3G +  1);
-            };
-            if ((result__PV3G <  0)) {
-              result__PV3G=(__INTEGER)(~ result__PV3G);
-            };
-            idx__G2HD=(__INTEGER)(result__PV3G % Self__DXFC->capacity__NOEC);
-            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__K2HD)->next__JPEC=((void **)Self__DXFC->buckets__SOEC)[idx__G2HD];
-            ((void **)Self__DXFC->buckets__SOEC)[idx__G2HD]=node1__K2HD;
-            node1__K2HD=node2__L2HD;
-          };
-          i__I2HD=(__INTEGER)(i__I2HD -  1);
-        };
-        idx__NXFC=(__INTEGER)(result__KV3G % new_capacity__H2HD);
-      };
-      __tmp__2YFC=((void **)Self__DXFC->buckets__SOEC)[idx__NXFC];
-      result__P4HD=NULL;
-      ptr__Q4HD=((__POINTER )(NULL));
-      typ_id__V4HD= 0;
-      sz__S4HD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
-      if ((sz__S4HD ==  0)) {
-        result__P4HD=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
-      } else {
-        typ_id__V4HD=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__S4HD);
-        if ((typ_id__V4HD == (__INTEGER)(-  1))) {
-          a__2X1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__3X1G=(__UINTEGER_32)((__UINTEGER_32)(sz__S4HD + a__2X1G) & (__UINTEGER_32)(~ a__2X1G));
-          ptr_table__5Y4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3X1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__4Y4G=((__POINTER )(NULL));
-          result__AZ4G=((__POINTER *)ptr_table__5Y4G)[ 0];
-          if ((result__AZ4G == (void *)NULL)) {
-            result__AZ4G=new_lab__2QJ(new_size__3X1G);
-            next__4Y4G=(void *)((unsigned long)result__AZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3X1G)));
-            ((__POINTER *)next__4Y4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5Y4G)[ 0]=next__4Y4G;
-          } else {
-            next__4Y4G=((__POINTER *)result__AZ4G)[ 0];
-            if ((next__4Y4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AZ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3X1G <<  1)) <=  4096)) {
-                next__4Y4G=(void *)((unsigned long)result__AZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3X1G)));
+              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)));
               } else {
-                next__4Y4G=new_lab__2QJ(new_size__3X1G);
+                next__02AH=new_lab__ARJ(new_size__RY3G);
               };
-              ((__POINTER *)next__4Y4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5Y4G)[ 0]=next__4Y4G;
+              ((__POINTER *)next__02AH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__12AH)[ 0]=next__02AH;
             } else {
-              ((__POINTER *)result__AZ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4Y4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AZ4G=next__4Y4G;
-            };
-          };
-          ptr__Q4HD=result__AZ4G;
-        } else {
-          t__BY1G=((__UINTEGER_32 )typ_id__V4HD);
-          a__AY1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__HZ4G=(__UINTEGER_32)((__UINTEGER_32)(sz__S4HD + a__AY1G) & (__UINTEGER_32)(~ a__AY1G));
-          ptr_table__EZ4G=((__POINTER )(&(table_type[(t__BY1G)])));
-          lab_type__GZ4G=(__UINTEGER_32)(t__BY1G |  1);
-          next__DZ4G=((__POINTER )(NULL));
-          result__FZ4G=((__POINTER *)ptr_table__EZ4G)[ 0];
-          if ((result__FZ4G == (void *)NULL)) {
-            result__FZ4G=new_lab__2QJ(lab_type__GZ4G);
-            next__DZ4G=(void *)((unsigned long)result__FZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZ4G)));
-            ((__POINTER *)next__DZ4G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EZ4G)[ 0]=next__DZ4G;
-          } else {
-            next__DZ4G=((__POINTER *)result__FZ4G)[ 0];
-            if ((next__DZ4G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FZ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__HZ4G <<  1)) <=  4096)) {
-                next__DZ4G=(void *)((unsigned long)result__FZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HZ4G)));
+              ((__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)));
               } else {
-                next__DZ4G=new_lab__2QJ(lab_type__GZ4G);
+                next__52AH=new_lab__ARJ(lab_type__C3AH);
               };
-              ((__POINTER *)next__DZ4G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EZ4G)[ 0]=next__DZ4G;
+              ((__POINTER *)next__52AH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__A3AH)[ 0]=next__52AH;
             } else {
-              ((__POINTER *)result__FZ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__DZ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__FZ4G=next__DZ4G;
+              ((__POINTER *)result__B3AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__52AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__B3AH=next__52AH;
             };
           };
-          ptr__Q4HD=result__FZ4G;
+          ptr__U4HD=result__B3AH;
         };
-        result__P4HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__Q4HD);
-        *(result__P4HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__T4HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__U4HD);
+        *(result__T4HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      Self__0CTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__P4HD);
-      Self__0CTD->item__RPEC=result__F4YB;
-      Self__0CTD->key__4OEC=n__MUOB;
-      Self__0CTD->next__JPEC=__tmp__2YFC;
-      node__OXFC=result__P4HD;
-      ((void **)Self__DXFC->buckets__SOEC)[idx__NXFC]=result__P4HD;
-      Self__DXFC->count__PYFC=(__INTEGER)(Self__DXFC->count__PYFC +  1);
+      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);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__OXFC)->item__RPEC=result__F4YB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__SXFC)->item__VPEC=result__J4YB;
     };
   };
-  return(result__OUOB);
+  return(result__SUOB);
 }
 
-static void* read_type_list__YLO(__PARSER *Self__ZLO,__BOOLEAN is_section__0LO)
+static void* read_type_list__2LO(__PARSER *Self__3LO,__BOOLEAN is_section__4LO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *ts__4LO,*__tmp__LMO,*__tmp__VNO;
-  void *t__3LO;
-  __POSITION pos__LPOG,pos__NPOG,pos__PPOG;
-  void *lst__2LO,*result__UV3G;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__VV3G,*Self__WV3G;
-  __BOOLEAN result__IZ4G;
-  __CHARACTER result__JZ4G;
-  lst__2LO=NULL;
-  ts__4LO=NULL;
-  t__3LO=read_type__TBM(Self__ZLO,FALSE__);
-  if (((void *)t__3LO != (void *)NULL)) {
-    if (is_section__0LO) {
-      if (t__3LO==NULL) {
-        __tmp__LMO=NULL;
-      } else {
-        switch (((struct ___OBJ *)t__3LO)->__id) {
+  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) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__LMO=((void *)t__3LO);
+          __tmp__PMO=((void *)t__BMO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__LMO=((void *)t__3LO);
+          __tmp__PMO=((void *)t__BMO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__LMO=NULL;
+          __tmp__PMO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__LMO=((void *)t__3LO);
+          __tmp__PMO=((void *)t__BMO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__LMO=((void *)t__3LO);
+          __tmp__PMO=((void *)t__BMO);
         } break;
         }
       };
-      ts__4LO=__tmp__LMO;
-      if (((void *)__tmp__LMO == (void *)NULL)) {
-        pos__LPOG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_259));
-        put_position__EOG(pos__LPOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
     };
-    result__UV3G=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP)->parent_arrayed_collection__ZTP.upper__VUV <  0)) {
-      result__UV3G=create_with_capacity__YER( 16);
+    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);
     } else {
-      Self__VV3G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-      result__UV3G=((void **)Self__VV3G->parent_arrayed_collection__ZTP.storage__LZV)[Self__VV3G->parent_arrayed_collection__ZTP.upper__VUV];
-      Self__WV3G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-      Self__WV3G->parent_arrayed_collection__ZTP.upper__VUV=(__INTEGER)(Self__WV3G->parent_arrayed_collection__ZTP.upper__VUV -  1);
+      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);
     };
-    lst__2LO=result__UV3G;
-    add_last__KNV(result__UV3G,t__3LO);
-    while_do__MUP:
+    lst__AMO=result__UY5G;
+    add_last__ONV(result__UY5G,t__BMO);
+    while_do__QUP:
     {
-      result__IZ4G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__IZ4G=FALSE__;
+      result__E3AH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__E3AH=FALSE__;
       } else {
-        result__JZ4G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__JZ4G=((__CHARACTER )(( 0)));
+        result__F3AH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__F3AH=((__CHARACTER )(( 0)));
         } else {
-          result__JZ4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__F3AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__JZ4G == ',')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__IZ4G=TRUE__;
+        if ((result__F3AH == ',')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__E3AH=TRUE__;
         };
       };
-      if (result__IZ4G) {
-        t__3LO=read_type__TBM(Self__ZLO,FALSE__);
-        if (((void *)t__3LO == (void *)NULL)) {
-          pos__NPOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_247));
-          put_position__EOG(pos__NPOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        if (is_section__0LO) {
-          if (t__3LO==NULL) {
-            __tmp__VNO=NULL;
+        if (is_section__4LO) {
+          if (t__BMO==NULL) {
+            __tmp__ZNO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__3LO)->__id) {
+            switch (((struct ___OBJ *)t__BMO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__VNO=((void *)t__3LO);
+              __tmp__ZNO=((void *)t__BMO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__VNO=((void *)t__3LO);
+              __tmp__ZNO=((void *)t__BMO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__VNO=NULL;
+              __tmp__ZNO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__VNO=((void *)t__3LO);
+              __tmp__ZNO=((void *)t__BMO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__VNO=((void *)t__3LO);
+              __tmp__ZNO=((void *)t__BMO);
             } break;
             }
           };
-          ts__4LO=__tmp__VNO;
-          if (((void *)__tmp__VNO == (void *)NULL)) {
-            pos__PPOG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_259));
-            put_position__EOG(pos__PPOG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
         };
-        add_last__KNV(lst__2LO,t__3LO);
-        goto while_do__MUP;
+        add_last__ONV(lst__AMO,t__BMO);
+        goto while_do__QUP;
       };
     };
-    lst__2LO=alias__WUP(result__UV3G);
+    lst__AMO=alias__0UP(result__UY5G);
   };
-  return(lst__2LO);
+  return(lst__AMO);
 }
 
-static __INTEGER hash_code__540(__FAST_ARRAYoITM_TYPE_MONOo *Self__A50)
+static __INTEGER hash_code__D50(__FAST_ARRAYoITM_TYPE_MONOo *Self__E50)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__C50,result__XV3G,__tmp__ZV3G,Self__0V3G,__tmp__R50;
-  __INTEGER result__2V3G,__tmp__4V3G,Self__5V3G,result__BW3G;
-  __INTEGER __tmp__DW3G,Self__EW3G,result__GW3G,__tmp__IW3G,Self__JW3G;
-  __INTEGER result__LW3G,__tmp__NW3G,Self__OW3G,__tmp__AA1,result__QW3G;
-  __INTEGER __tmp__SW3G,Self__TW3G,result__VW3G,__tmp__XW3G,Self__YW3G;
-  __INTEGER result__0W3G,__tmp__2W3G,Self__3W3G;
-  void *__tmp__Q50,*__tmp__550;
-  __STRING_CONSTANT *Self__YV3G,*Self__3V3G,*Self__CW3G,*Self__HW3G;
-  __STRING_CONSTANT *Self__MW3G,*Self__RW3G,*Self__WW3G,*Self__1W3G;
-  __BOOLEAN __tmp__T50;
-  result__C50= 0;
-  if ((! (Self__A50->parent_arrayed_collection__JXC.upper__0HV <  0))) {
-    if (((void *)((void **)Self__A50->parent_arrayed_collection__JXC.storage__BMV)[Self__A50->parent_arrayed_collection__JXC.upper__0HV] != (void *)NULL)) {
-      __tmp__Q50=((void **)Self__A50->parent_arrayed_collection__JXC.storage__BMV)[Self__A50->parent_arrayed_collection__JXC.upper__0HV];
-      switch (((struct ___OBJ *)__tmp__Q50)->__id) {
+  __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) {
       case __ITM_TYPE_PARAMETER__: {
-        Self__YV3G=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__Q50)->parent_itm_type__NDE.name__0XP);
-        result__XV3G= 0;
-        __tmp__ZV3G=Self__YV3G->count__DD;
-        Self__0V3G= 1;
-        while ((Self__0V3G <= __tmp__ZV3G)) {
-          result__XV3G=(__INTEGER)((__INTEGER)( 5 * result__XV3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YV3G->storage__FQO)[(__INTEGER)(Self__0V3G -  1)])));
-          Self__0V3G=(__INTEGER)(Self__0V3G +  1);
-        };
-        if ((result__XV3G <  0)) {
-          result__XV3G=(__INTEGER)(~ result__XV3G);
-        };
-        __tmp__R50=result__XV3G;
+        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;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        Self__3V3G=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__Q50)->name__0XP);
-        result__2V3G= 0;
-        __tmp__4V3G=Self__3V3G->count__DD;
-        Self__5V3G= 1;
-        while ((Self__5V3G <= __tmp__4V3G)) {
-          result__2V3G=(__INTEGER)((__INTEGER)( 5 * result__2V3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3V3G->storage__FQO)[(__INTEGER)(Self__5V3G -  1)])));
-          Self__5V3G=(__INTEGER)(Self__5V3G +  1);
-        };
-        if ((result__2V3G <  0)) {
-          result__2V3G=(__INTEGER)(~ result__2V3G);
-        };
-        __tmp__R50=result__2V3G;
+        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;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        print__GHD((&__string_260));
+        print__KHD((&__string_264));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__R50= 0;
+        __tmp__V50= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        Self__CW3G=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__Q50)->parent_itm_type_style__SRN.parent_itm_type_simple__RRN.name__0XP);
-        result__BW3G= 0;
-        __tmp__DW3G=Self__CW3G->count__DD;
-        Self__EW3G= 1;
-        while ((Self__EW3G <= __tmp__DW3G)) {
-          result__BW3G=(__INTEGER)((__INTEGER)( 5 * result__BW3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CW3G->storage__FQO)[(__INTEGER)(Self__EW3G -  1)])));
-          Self__EW3G=(__INTEGER)(Self__EW3G +  1);
-        };
-        if ((result__BW3G <  0)) {
-          result__BW3G=(__INTEGER)(~ result__BW3G);
-        };
-        __tmp__R50=result__BW3G;
+        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;
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__HW3G=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__Q50)->parent_itm_type_simple__RRN.name__0XP);
-        result__GW3G= 0;
-        __tmp__IW3G=Self__HW3G->count__DD;
-        Self__JW3G= 1;
-        while ((Self__JW3G <= __tmp__IW3G)) {
-          result__GW3G=(__INTEGER)((__INTEGER)( 5 * result__GW3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HW3G->storage__FQO)[(__INTEGER)(Self__JW3G -  1)])));
-          Self__JW3G=(__INTEGER)(Self__JW3G +  1);
-        };
-        if ((result__GW3G <  0)) {
-          result__GW3G=(__INTEGER)(~ result__GW3G);
-        };
-        __tmp__R50=result__GW3G;
+        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;
       } break;
       };
-      result__C50=__tmp__R50;
-      __tmp__T50=TRUE__;
+      result__G50=__tmp__V50;
+      __tmp__X50=TRUE__;
     } else {
-      __tmp__T50=FALSE__;
+      __tmp__X50=FALSE__;
     };
-    if ((! __tmp__T50)) {
-      if (((void *)((void **)Self__A50->parent_arrayed_collection__JXC.storage__BMV)[ 0] != (void *)NULL)) {
-        __tmp__550=((void **)Self__A50->parent_arrayed_collection__JXC.storage__BMV)[ 0];
-        switch (((struct ___OBJ *)__tmp__550)->__id) {
+    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) {
         case __ITM_TYPE_PARAMETER__: {
-          Self__MW3G=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__550)->parent_itm_type__NDE.name__0XP);
-          result__LW3G= 0;
-          __tmp__NW3G=Self__MW3G->count__DD;
-          Self__OW3G= 1;
-          while ((Self__OW3G <= __tmp__NW3G)) {
-            result__LW3G=(__INTEGER)((__INTEGER)( 5 * result__LW3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MW3G->storage__FQO)[(__INTEGER)(Self__OW3G -  1)])));
-            Self__OW3G=(__INTEGER)(Self__OW3G +  1);
-          };
-          if ((result__LW3G <  0)) {
-            result__LW3G=(__INTEGER)(~ result__LW3G);
-          };
-          __tmp__AA1=result__LW3G;
+          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;
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          Self__RW3G=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__550)->name__0XP);
-          result__QW3G= 0;
-          __tmp__SW3G=Self__RW3G->count__DD;
-          Self__TW3G= 1;
-          while ((Self__TW3G <= __tmp__SW3G)) {
-            result__QW3G=(__INTEGER)((__INTEGER)( 5 * result__QW3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RW3G->storage__FQO)[(__INTEGER)(Self__TW3G -  1)])));
-            Self__TW3G=(__INTEGER)(Self__TW3G +  1);
-          };
-          if ((result__QW3G <  0)) {
-            result__QW3G=(__INTEGER)(~ result__QW3G);
-          };
-          __tmp__AA1=result__QW3G;
+          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;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          print__GHD((&__string_260));
+          print__KHD((&__string_264));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__AA1= 0;
+          __tmp__EA1= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          Self__WW3G=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__550)->parent_itm_type_style__SRN.parent_itm_type_simple__RRN.name__0XP);
-          result__VW3G= 0;
-          __tmp__XW3G=Self__WW3G->count__DD;
-          Self__YW3G= 1;
-          while ((Self__YW3G <= __tmp__XW3G)) {
-            result__VW3G=(__INTEGER)((__INTEGER)( 5 * result__VW3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WW3G->storage__FQO)[(__INTEGER)(Self__YW3G -  1)])));
-            Self__YW3G=(__INTEGER)(Self__YW3G +  1);
-          };
-          if ((result__VW3G <  0)) {
-            result__VW3G=(__INTEGER)(~ result__VW3G);
-          };
-          __tmp__AA1=result__VW3G;
+          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;
         } break;
         case __ITM_TYPE_STYLE__: {
-          Self__1W3G=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__550)->parent_itm_type_simple__RRN.name__0XP);
-          result__0W3G= 0;
-          __tmp__2W3G=Self__1W3G->count__DD;
-          Self__3W3G= 1;
-          while ((Self__3W3G <= __tmp__2W3G)) {
-            result__0W3G=(__INTEGER)((__INTEGER)( 5 * result__0W3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1W3G->storage__FQO)[(__INTEGER)(Self__3W3G -  1)])));
-            Self__3W3G=(__INTEGER)(Self__3W3G +  1);
-          };
-          if ((result__0W3G <  0)) {
-            result__0W3G=(__INTEGER)(~ result__0W3G);
-          };
-          __tmp__AA1=result__0W3G;
+          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;
         } break;
         };
-        result__C50=__tmp__AA1;
+        result__G50=__tmp__EA1;
       };
     };
   };
-  return(result__C50);
+  return(result__G50);
 }
 
-static __CHARACTER read_style__HRF()
+static __CHARACTER read_style__LRF()
 // () With resultNo recursive, No inlinable.
 {
-  __CHARACTER result__KRF,result__MZ4G,result__PZ4G;
-  __BOOLEAN result__LZ4G,__tmp__XRF,result__OZ4G;
-  result__KRF='\0';
-  result__LZ4G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__LZ4G=FALSE__;
+  __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__;
   } else {
-    result__MZ4G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__MZ4G=((__CHARACTER )(( 0)));
+    result__I3AH='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__I3AH=((__CHARACTER )(( 0)));
     } else {
-      result__MZ4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__I3AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__MZ4G == '-')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__LZ4G=TRUE__;
+    if ((result__I3AH == '-')) {
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      result__H3AH=TRUE__;
     };
   };
-  if (result__LZ4G) {
-    result__KRF='-';
-    short__token__to__1AD((&__string_132),(__INTEGER)(position__CBC -  1),position__CBC);
-    __tmp__XRF=TRUE__;
+  if (result__H3AH) {
+    result__ORF='-';
+    short__token__to__5AD((&__string_132),(__INTEGER)(position__GBC -  1),position__GBC);
+    __tmp__1RF=TRUE__;
   } else {
-    __tmp__XRF=FALSE__;
+    __tmp__1RF=FALSE__;
   };
-  if ((! __tmp__XRF)) {
-    result__OZ4G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__OZ4G=FALSE__;
+  if ((! __tmp__1RF)) {
+    result__K3AH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__K3AH=FALSE__;
     } else {
-      result__PZ4G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__PZ4G=((__CHARACTER )(( 0)));
+      result__L3AH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__L3AH=((__CHARACTER )(( 0)));
       } else {
-        result__PZ4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__L3AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__PZ4G == '+')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__OZ4G=TRUE__;
+      if ((result__L3AH == '+')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__K3AH=TRUE__;
       };
     };
-    if (result__OZ4G) {
-      result__KRF='+';
-      short__token__to__1AD((&__string_132),(__INTEGER)(position__CBC -  1),position__CBC);
+    if (result__K3AH) {
+      result__ORF='+';
+      short__token__to__5AD((&__string_132),(__INTEGER)(position__GBC -  1),position__GBC);
     } else {
-      result__KRF=' ';
+      result__ORF=' ';
     };
   };
-  return(result__KRF);
+  return(result__ORF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__BL5B(__INTEGER new_count__DL5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__FL5B(__INTEGER new_count__HL5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__G25B,ptr_table__SZ4G,next__RZ4G,result__TZ4G;
-  __POINTER ptr_table__XZ4G,next__WZ4G,result__YZ4G;
-  __INTEGER typ_id__L25B;
-  __UINTEGER_32 sz__I25B,a__OZ1G,new_size__PZ1G,t__TZ1G,a__SZ1G;
-  __UINTEGER_32 new_size__0Z4G,lab_type__ZZ4G;
-  __FAST_ARRAYoITM_ARGUMENTo *result__F25B,*Self__QSHC;
-  result__F25B=NULL;
-  ptr__G25B=((__POINTER )(NULL));
-  typ_id__L25B= 0;
-  sz__I25B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
-  if ((sz__I25B ==  0)) {
-    result__F25B=FAST_ARRAYoITM_ARGUMENTo__;
+  __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__;
   } else {
-    typ_id__L25B=__FAST_ARRAYoITM_ARGUMENTo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__I25B);
-    if ((typ_id__L25B == (__INTEGER)(-  1))) {
-      a__OZ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__PZ1G=(__UINTEGER_32)((__UINTEGER_32)(sz__I25B + a__OZ1G) & (__UINTEGER_32)(~ a__OZ1G));
-      ptr_table__SZ4G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PZ1G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RZ4G=((__POINTER )(NULL));
-      result__TZ4G=((__POINTER *)ptr_table__SZ4G)[ 0];
-      if ((result__TZ4G == (void *)NULL)) {
-        result__TZ4G=new_lab__2QJ(new_size__PZ1G);
-        next__RZ4G=(void *)((unsigned long)result__TZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZ1G)));
-        ((__POINTER *)next__RZ4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SZ4G)[ 0]=next__RZ4G;
-      } else {
-        next__RZ4G=((__POINTER *)result__TZ4G)[ 0];
-        if ((next__RZ4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TZ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PZ1G <<  1)) <=  4096)) {
-            next__RZ4G=(void *)((unsigned long)result__TZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PZ1G)));
-          } else {
-            next__RZ4G=new_lab__2QJ(new_size__PZ1G);
-          };
-          ((__POINTER *)next__RZ4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SZ4G)[ 0]=next__RZ4G;
-        } else {
-          ((__POINTER *)result__TZ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RZ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TZ4G=next__RZ4G;
-        };
-      };
-      ptr__G25B=result__TZ4G;
-    } else {
-      t__TZ1G=((__UINTEGER_32 )typ_id__L25B);
-      a__SZ1G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0Z4G=(__UINTEGER_32)((__UINTEGER_32)(sz__I25B + a__SZ1G) & (__UINTEGER_32)(~ a__SZ1G));
-      ptr_table__XZ4G=((__POINTER )(&(table_type[(t__TZ1G)])));
-      lab_type__ZZ4G=(__UINTEGER_32)(t__TZ1G |  1);
-      next__WZ4G=((__POINTER )(NULL));
-      result__YZ4G=((__POINTER *)ptr_table__XZ4G)[ 0];
-      if ((result__YZ4G == (void *)NULL)) {
-        result__YZ4G=new_lab__2QJ(lab_type__ZZ4G);
-        next__WZ4G=(void *)((unsigned long)result__YZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0Z4G)));
-        ((__POINTER *)next__WZ4G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XZ4G)[ 0]=next__WZ4G;
-      } else {
-        next__WZ4G=((__POINTER *)result__YZ4G)[ 0];
-        if ((next__WZ4G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YZ4G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0Z4G <<  1)) <=  4096)) {
-            next__WZ4G=(void *)((unsigned long)result__YZ4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0Z4G)));
-          } else {
-            next__WZ4G=new_lab__2QJ(lab_type__ZZ4G);
-          };
-          ((__POINTER *)next__WZ4G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XZ4G)[ 0]=next__WZ4G;
-        } else {
-          ((__POINTER *)result__YZ4G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WZ4G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YZ4G=next__WZ4G;
-        };
-      };
-      ptr__G25B=result__YZ4G;
-    };
-    result__F25B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__G25B);
-    *(result__F25B) = *(FAST_ARRAYoITM_ARGUMENTo__);
-  };
-  Self__QSHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__F25B);
-  if ((Self__QSHC->parent_arrayed_collection__VBZB.capacity__Q5GC < new_count__DL5B)) {
-    Self__QSHC->parent_arrayed_collection__VBZB.storage__MAHC=create__GPBD(new_count__DL5B);
-    Self__QSHC->parent_arrayed_collection__VBZB.capacity__Q5GC=new_count__DL5B;
-  };
-  Self__QSHC->parent_arrayed_collection__VBZB.upper__O5GC=(__INTEGER)(-  1);
-  return(result__F25B);
+    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);
 }
 
-static void* read_loc_arg__with_self__YDHB(__PARSER *Self__ZDHB,__BOOLEAN mute__0DHB,__BOOLEAN self_first__1DHB)
+static void* read_loc_arg__with_self__2DHB(__PARSER *Self__3DHB,__BOOLEAN mute__4DHB,__BOOLEAN self_first__5DHB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *result__3DHB,*result__OJEE;
-  void *t__4DHB,*t__IJEE,*__tmp__HOEE;
-  __POSITION pos__5DHB,pos__1QOG,pos__3QOG,pos__5QOG,pos__BROG;
-  __POSITION pos__DROG,pos__QROG,pos__SROG,p__2Y5B,p__M3JF,pos__2TOG;
-  __POSITION pos__4TOG;
-  void *n__CEHB;
-  void *tb__DEHB,*__tmp__XGHB,*tb__PJEE,*__tmp__IOEE;
-  __ITM_ARG *result__A04G,*result__2DAC;
-  __POINTER ptr__B04G,ptr_table__K04G,next__J04G,result__L04G;
-  __POINTER ptr_table__P04G,next__O04G,result__Q04G,ptr__3DAC;
-  __POINTER ptr_table__504G,next__404G,result__A14G,ptr_table__E14G;
-  __POINTER next__D14G,result__F14G,ptr__GPXF,ptr_table__N14G;
-  __POINTER next__M14G,result__O14G,ptr_table__S14G,next__R14G;
-  __POINTER result__T14G,ptr__IMKF,ptr_table__X14G,next__W14G;
-  __POINTER result__Y14G,ptr_table__214G,next__114G,result__314G;
-  __INTEGER typ_id__C04G,beg__MJEE,Self__Y5PF,limit_up__Z5PF;
-  __INTEGER typ_id__CEAC,__tmp__2ZBG,i__AVFG,h__KPNF,idx__LPNF;
-  __INTEGER idx__UMYF,new_capacity__VMYF,i__TMYF,typ_id__LPXF;
-  __INTEGER typ_id__NMKF,__tmp__3PEE,Self__V3JF;
-  __UINTEGER_32 sz__D04G,a__E04G,new_size__F04G,t__G04G,a__H04G;
-  __UINTEGER_32 new_size__S04G,lab_type__R04G,sz__5DAC,a__N21G;
-  __UINTEGER_32 new_size__O21G,t__S21G,a__R21G,new_size__H14G;
-  __UINTEGER_32 lab_type__G14G,sz__IPXF,a__P11G,new_size__Q11G,t__U11G;
-  __UINTEGER_32 a__T11G,new_size__V14G,lab_type__U14G,sz__KMKF,a__011G;
-  __UINTEGER_32 new_size__111G,t__511G,a__411G,new_size__514G;
-  __UINTEGER_32 lab_type__414G;
-  __ITM_ARGS *result__HMKF,*Self__PFNF;
-  __BOOLEAN result__2Z4G,__tmp__OEHB,result__3Z4G,__tmp__RFHB;
-  __BOOLEAN __tmp__0GHB,__tmp__4GHB,__tmp__DIHB,result__T04G,mute__NJEE;
-  __BOOLEAN result__X04G,__tmp__0JEE,result__Y04G,__tmp__XLEE;
-  __BOOLEAN result__104G,__tmp__OOEE,__tmp__LOEE,__tmp__ROEE;
-  __BOOLEAN __tmp__OMNF,result__0YBG,result__A24G;
-  __CHARACTER result__4Z4G,result__EDWG,result__U04G,result__Z04G;
-  __CHARACTER result__FDWG,result__204G,result__B24G;
-  void *type__KJEE,*result__UTP;
-  void *name__LJEE,*result__5W3G,*result__K2JF,*e__DLNF,*result__WLNF;
-  void *e__DPNF,*e__J14G,*e__TVOF;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__AX3G,*Self__BX3G;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__RCBB,*Self__HDBB;
-  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__CLNF,*Self__CPNF;
-  void *node__VLNF,*node__K14G,*node__2VOF,*node__MPNF,*node1__XMYF;
-  void *node2__YMYF,*__tmp__2QNF;
-  __FAST_ARRAYoSTRING_CONSTANTo *Self__XYBG,*o__1YBG,*__tmp__HZBG;
-  void **__tmp__XZBG,**__tmp__ZZBG,**Self__MUFG;
-  void **old_buckets__WMYF;
-  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__FPXF;
-  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__LV0F;
-  result__3DHB=NULL;
-  t__4DHB=NULL;
-  pos__5DHB=((__POSITION ) 0);
-  n__CEHB=NULL;
-  tb__DEHB=NULL;
-  if (self_first__1DHB) {
-    result__2Z4G=read_word__APF((&__string_58));
-    if (is_shorter__TY) {
-      if (result__2Z4G) {
+  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) {
         if (((void *)(&__string_58) == (void *)(&__string_4))) {
-          short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         } else {
-          short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         };
       };
     };
-    __tmp__OEHB=result__2Z4G;
+    __tmp__SEHB=result__Y3AH;
   } else {
-    __tmp__OEHB=FALSE__;
+    __tmp__SEHB=FALSE__;
   };
-  if ((__tmp__OEHB || ((! self_first__1DHB) && read_identifier__15K()))) {
-    pos__5DHB=current_position__ZWF();
-    n__CEHB=last_string__YZC;
-    result__3Z4G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__3Z4G=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__;
     } else {
-      result__4Z4G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__4Z4G=((__CHARACTER )(( 0)));
+      result__03AH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__03AH=((__CHARACTER )(( 0)));
       } else {
-        result__4Z4G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__03AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__4Z4G == ':')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__3Z4G=TRUE__;
+      if ((result__03AH == ':')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__Z3AH=TRUE__;
       };
     };
-    if (result__3Z4G) {
-      result__EDWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__EDWG=((__CHARACTER )(( 0)));
+    if (result__Z3AH) {
+      result__GBYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__GBYG=((__CHARACTER )(( 0)));
       } else {
-        result__EDWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__GBYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      __tmp__RFHB=(result__EDWG != '=');
+      __tmp__VFHB=(result__GBYG != '=');
     } else {
-      __tmp__RFHB=FALSE__;
+      __tmp__VFHB=FALSE__;
     };
-    if (__tmp__RFHB) {
-      t__4DHB=read_type__TBM(Self__ZDHB,TRUE__);
-      if (((void *)t__4DHB == (void *)NULL)) {
-        pos__1QOG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_261));
-        put_position__EOG(pos__1QOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+    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)) {
           exit(( 1));
         };
       };
-      if ((self_first__1DHB && ((void *)t__4DHB != (void *)type_self__XTN))) {
-        if (((void *)((__PROTOTYPE *)object__ZAC)->parent_named__5.name__LI != (void *)(&__string_40))) {
-          __tmp__0GHB=TRUE__;
+      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__;
         } else {
-          if (t__4DHB==NULL) {
-            __tmp__XGHB=NULL;
+          if (t__CEHB==NULL) {
+            __tmp__1GHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__4DHB)->__id) {
+            switch (((struct ___OBJ *)t__CEHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__XGHB=NULL;
+              __tmp__1GHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__XGHB=NULL;
+              __tmp__1GHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__XGHB=((void *)t__4DHB);
+              __tmp__1GHB=((void *)t__CEHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__XGHB=NULL;
+              __tmp__1GHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__XGHB=NULL;
+              __tmp__1GHB=NULL;
             } break;
             }
           };
-          tb__DEHB=__tmp__XGHB;
-          __tmp__0GHB=((void *)__tmp__XGHB == (void *)NULL);
+          tb__HEHB=__tmp__1GHB;
+          __tmp__4GHB=((void *)__tmp__1GHB == (void *)NULL);
         };
-        __tmp__4GHB=__tmp__0GHB;
+        __tmp__CHHB=__tmp__4GHB;
       } else {
-        __tmp__4GHB=FALSE__;
+        __tmp__CHHB=FALSE__;
       };
-      if (__tmp__4GHB) {
-        pos__3QOG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_262));
-        put_position__EOG(pos__3QOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      result__A04G=NULL;
-      ptr__B04G=((__POINTER )(NULL));
-      typ_id__C04G= 0;
-      sz__D04G=((__UINTEGER_32 )sizeof(__ITM_ARG));
-      if ((sz__D04G ==  0)) {
-        result__A04G=ITM_ARG__;
-      } else {
-        typ_id__C04G=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__D04G);
-        if ((typ_id__C04G == (__INTEGER)(-  1))) {
-          a__E04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__F04G=(__UINTEGER_32)((__UINTEGER_32)(sz__D04G + a__E04G) & (__UINTEGER_32)(~ a__E04G));
-          ptr_table__K04G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F04G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__J04G=((__POINTER )(NULL));
-          result__L04G=((__POINTER *)ptr_table__K04G)[ 0];
-          if ((result__L04G == (void *)NULL)) {
-            result__L04G=new_lab__2QJ(new_size__F04G);
-            next__J04G=(void *)((unsigned long)result__L04G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F04G)));
-            ((__POINTER *)next__J04G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__K04G)[ 0]=next__J04G;
-          } else {
-            next__J04G=((__POINTER *)result__L04G)[ 0];
-            if ((next__J04G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L04G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__F04G <<  1)) <=  4096)) {
-                next__J04G=(void *)((unsigned long)result__L04G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F04G)));
+      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)));
               } else {
-                next__J04G=new_lab__2QJ(new_size__F04G);
+                next__I4AH=new_lab__ARJ(new_size__B4AH);
               };
-              ((__POINTER *)next__J04G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__K04G)[ 0]=next__J04G;
+              ((__POINTER *)next__I4AH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__J4AH)[ 0]=next__I4AH;
             } else {
-              ((__POINTER *)result__L04G)[ 0]=(void *)((unsigned long)((__POINTER *)next__J04G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__L04G=next__J04G;
-            };
-          };
-          ptr__B04G=result__L04G;
-        } else {
-          t__G04G=((__UINTEGER_32 )typ_id__C04G);
-          a__H04G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__S04G=(__UINTEGER_32)((__UINTEGER_32)(sz__D04G + a__H04G) & (__UINTEGER_32)(~ a__H04G));
-          ptr_table__P04G=((__POINTER )(&(table_type[(t__G04G)])));
-          lab_type__R04G=(__UINTEGER_32)(t__G04G |  1);
-          next__O04G=((__POINTER )(NULL));
-          result__Q04G=((__POINTER *)ptr_table__P04G)[ 0];
-          if ((result__Q04G == (void *)NULL)) {
-            result__Q04G=new_lab__2QJ(lab_type__R04G);
-            next__O04G=(void *)((unsigned long)result__Q04G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S04G)));
-            ((__POINTER *)next__O04G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__P04G)[ 0]=next__O04G;
-          } else {
-            next__O04G=((__POINTER *)result__Q04G)[ 0];
-            if ((next__O04G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q04G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__S04G <<  1)) <=  4096)) {
-                next__O04G=(void *)((unsigned long)result__Q04G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S04G)));
+              ((__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)));
               } else {
-                next__O04G=new_lab__2QJ(lab_type__R04G);
+                next__N4AH=new_lab__ARJ(lab_type__Q4AH);
               };
-              ((__POINTER *)next__O04G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__P04G)[ 0]=next__O04G;
+              ((__POINTER *)next__N4AH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__O4AH)[ 0]=next__N4AH;
             } else {
-              ((__POINTER *)result__Q04G)[ 0]=(void *)((unsigned long)((__POINTER *)next__O04G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__Q04G=next__O04G;
+              ((__POINTER *)result__P4AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N4AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__P4AH=next__N4AH;
             };
           };
-          ptr__B04G=result__Q04G;
+          ptr__33AH=result__P4AH;
         };
-        result__A04G=((__ITM_ARG *)ptr__B04G);
-        *(result__A04G) = *(ITM_ARG__);
+        result__23AH=((__ITM_ARG *)ptr__33AH);
+        *(result__23AH) = *(ITM_ARG__);
       };
-      ((__ITM_ARG *)result__A04G)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ=pos__5DHB;
-      result__3DHB=result__A04G;
-      if (is_shorter__TY) {
-        add__SLHB(short_local__ZBC,n__CEHB);
+      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);
       };
     } else {
-      if ((! mute__0DHB)) {
-        pos__5QOG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_263));
-        put_position__EOG(pos__5QOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
     };
-    __tmp__DIHB=TRUE__;
+    __tmp__HIHB=TRUE__;
   } else {
-    __tmp__DIHB=FALSE__;
-  };
-  if ((! __tmp__DIHB)) {
-    result__T04G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__T04G=FALSE__;
-    } else {
-      result__U04G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__U04G=((__CHARACTER )(( 0)));
-      } else {
-        result__U04G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-      };
-      if ((result__U04G == '(')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__T04G=TRUE__;
-      };
-    };
-    if (result__T04G) {
-      t__IJEE=NULL;
-      type__KJEE=NULL;
-      name__LJEE=NULL;
-      beg__MJEE= 0;
-      result__OJEE=NULL;
-      tb__PJEE=NULL;
-      mute__NJEE=mute__0DHB;
-      if (self_first__1DHB) {
-        result__X04G=read_word__APF((&__string_58));
-        if (is_shorter__TY) {
-          if (result__X04G) {
+    __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) {
             if (((void *)(&__string_58) == (void *)(&__string_4))) {
-              short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+              short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
             } else {
-              short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+              short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
             };
           };
         };
-        __tmp__0JEE=result__X04G;
+        __tmp__CMEE=result__W4AH;
       } else {
-        __tmp__0JEE=FALSE__;
+        __tmp__CMEE=FALSE__;
       };
-      if ((__tmp__0JEE || read_identifier__15K())) {
-        result__5W3G=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K)->parent_arrayed_collection__Z4K.upper__KSU <  0)) {
-          result__5W3G=create_with_capacity__RGRC( 16);
+      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);
         } else {
-          Self__AX3G=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K);
-          result__5W3G=((void **)Self__AX3G->parent_arrayed_collection__Z4K.storage__0UU)[Self__AX3G->parent_arrayed_collection__Z4K.upper__KSU];
-          Self__BX3G=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K);
-          Self__BX3G->parent_arrayed_collection__Z4K.upper__KSU=(__INTEGER)(Self__BX3G->parent_arrayed_collection__Z4K.upper__KSU -  1);
+          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);
         };
-        name__LJEE=result__5W3G;
-        result__UTP=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP)->parent_arrayed_collection__ZTP.upper__VUV <  0)) {
-          result__UTP=create_with_capacity__YER( 16);
+        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);
         } else {
-          Self__RCBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-          result__UTP=((void **)Self__RCBB->parent_arrayed_collection__ZTP.storage__LZV)[Self__RCBB->parent_arrayed_collection__ZTP.upper__VUV];
-          Self__HDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-          Self__HDBB->parent_arrayed_collection__ZTP.upper__VUV=(__INTEGER)(Self__HDBB->parent_arrayed_collection__ZTP.upper__VUV -  1);
+          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);
         };
-        type__KJEE=result__UTP;
-        beg__MJEE= 0;
+        type__SLEE=result__YTP;
+        beg__ULEE= 0;
         do {
-          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__LJEE)->parent_arrayed_collection__X4I.upper__L5OD +  1) !=  0) && (! read_identifier__15K())) && (! mute__NJEE))) {
-            pos__BROG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_264));
-            put_position__EOG(pos__BROG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          add_last__BBPD(name__LJEE,last_string__YZC);
-          result__Y04G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__Y04G=FALSE__;
+          add_last__FBPD(name__TLEE,last_string__2ZC);
+          result__X4AH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__X4AH=FALSE__;
           } else {
-            result__Z04G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__Z04G=((__CHARACTER )(( 0)));
+            result__Y4AH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__Y4AH=((__CHARACTER )(( 0)));
             } else {
-              result__Z04G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__Y4AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__Z04G == ':')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__Y04G=TRUE__;
+            if ((result__Y4AH == ':')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__X4AH=TRUE__;
             };
           };
-          if (result__Y04G) {
-            result__FDWG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__FDWG=((__CHARACTER )(( 0)));
+          if (result__X4AH) {
+            result__HBYG='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__HBYG=((__CHARACTER )(( 0)));
             } else {
-              result__FDWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__HBYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            __tmp__XLEE=(result__FDWG != '=');
+            __tmp__5NEE=(result__HBYG != '=');
           } else {
-            __tmp__XLEE=FALSE__;
+            __tmp__5NEE=FALSE__;
           };
-          if (__tmp__XLEE) {
-            mute__NJEE=FALSE__;
-            t__IJEE=read_type__TBM(Self__ZDHB,TRUE__);
-            if (((void *)t__IJEE == (void *)NULL)) {
-              pos__DROG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_265));
-              put_position__EOG(pos__DROG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+          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)) {
                 exit(( 1));
               };
             };
-            Self__Y5PF=beg__MJEE;
-            limit_up__Z5PF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__LJEE)->parent_arrayed_collection__X4I.upper__L5OD;
-            while ((Self__Y5PF <= limit_up__Z5PF)) {
-              add_last__KNV(type__KJEE,t__IJEE);
-              Self__Y5PF=(__INTEGER)(Self__Y5PF +  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);
             };
-            beg__MJEE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__LJEE)->parent_arrayed_collection__X4I.upper__L5OD +  1);
+            beg__ULEE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__TLEE)->parent_arrayed_collection__14I.upper__P5OD +  1);
           };
-          result__104G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__104G=FALSE__;
+          result__04AH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__04AH=FALSE__;
           } else {
-            result__204G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__204G=((__CHARACTER )(( 0)));
+            result__14AH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__14AH=((__CHARACTER )(( 0)));
             } else {
-              result__204G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__14AH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__204G == ',')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__104G=TRUE__;
+            if ((result__14AH == ',')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__04AH=TRUE__;
             };
           };
-        } while (result__104G);
-        if ((beg__MJEE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__5W3G)->parent_arrayed_collection__X4I.upper__L5OD +  1))) {
-          if ((! mute__NJEE)) {
-            pos__QROG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_265));
-            put_position__EOG(pos__QROG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        } 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)) {
               exit(( 1));
             };
           };
-          free__KS5(result__5W3G);
-          free__MMQ(result__UTP);
+          free__OS5(result__5Z5G);
+          free__QMQ(result__YTP);
         } else {
-          if (self_first__1DHB) {
-            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__UTP)->parent_arrayed_collection__JXC.storage__BMV)[ 0] != (void *)type_self__XTN)) {
-              __tmp__OOEE=TRUE__;
+          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__;
             } else {
-              if (((void *)((__PROTOTYPE *)object__ZAC)->parent_named__5.name__LI == (void *)(&__string_40))) {
-                __tmp__HOEE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__UTP)->parent_arrayed_collection__JXC.storage__BMV)[ 0];
-                if (__tmp__HOEE==NULL) {
-                  __tmp__IOEE=NULL;
+              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;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__HOEE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__PQEE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__IOEE=NULL;
+                    __tmp__QQEE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__IOEE=NULL;
+                    __tmp__QQEE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__IOEE=((void *)__tmp__HOEE);
+                    __tmp__QQEE=((void *)__tmp__PQEE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__IOEE=NULL;
+                    __tmp__QQEE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__IOEE=NULL;
+                    __tmp__QQEE=NULL;
                   } break;
                   }
                 };
-                tb__PJEE=__tmp__IOEE;
-                __tmp__LOEE=((void *)__tmp__IOEE == (void *)NULL);
+                tb__XLEE=__tmp__QQEE;
+                __tmp__TQEE=((void *)__tmp__QQEE == (void *)NULL);
               } else {
-                __tmp__LOEE=FALSE__;
+                __tmp__TQEE=FALSE__;
               };
-              __tmp__OOEE=__tmp__LOEE;
+              __tmp__WQEE=__tmp__TQEE;
             };
-            __tmp__ROEE=__tmp__OOEE;
+            __tmp__ZQEE=__tmp__WQEE;
           } else {
-            __tmp__ROEE=FALSE__;
+            __tmp__ZQEE=FALSE__;
           };
-          if (__tmp__ROEE) {
-            pos__SROG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_262));
-            put_position__EOG(pos__SROG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__5W3G)->parent_arrayed_collection__X4I.upper__L5OD +  1) ==  1)) {
-            p__2Y5B=current_position__ZWF();
-            result__2DAC=NULL;
-            ptr__3DAC=((__POINTER )(NULL));
-            typ_id__CEAC= 0;
-            sz__5DAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
-            if ((sz__5DAC ==  0)) {
-              result__2DAC=ITM_ARG__;
+          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__;
             } else {
-              typ_id__CEAC=-1;
-              clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__5DAC);
-              if ((typ_id__CEAC == (__INTEGER)(-  1))) {
-                a__N21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__O21G=(__UINTEGER_32)((__UINTEGER_32)(sz__5DAC + a__N21G) & (__UINTEGER_32)(~ a__N21G));
-                ptr_table__504G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O21G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__404G=((__POINTER )(NULL));
-                result__A14G=((__POINTER *)ptr_table__504G)[ 0];
-                if ((result__A14G == (void *)NULL)) {
-                  result__A14G=new_lab__2QJ(new_size__O21G);
-                  next__404G=(void *)((unsigned long)result__A14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O21G)));
-                  ((__POINTER *)next__404G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__504G)[ 0]=next__404G;
+              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;
                 } else {
-                  next__404G=((__POINTER *)result__A14G)[ 0];
-                  if ((next__404G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A14G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O21G <<  1)) <=  4096)) {
-                      next__404G=(void *)((unsigned long)result__A14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O21G)));
+                  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)));
                     } else {
-                      next__404G=new_lab__2QJ(new_size__O21G);
+                      next__34AH=new_lab__ARJ(new_size__L33G);
                     };
-                    ((__POINTER *)next__404G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__504G)[ 0]=next__404G;
+                    ((__POINTER *)next__34AH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__44AH)[ 0]=next__34AH;
                   } else {
-                    ((__POINTER *)result__A14G)[ 0]=(void *)((unsigned long)((__POINTER *)next__404G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__A14G=next__404G;
+                    ((__POINTER *)result__54AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__54AH=next__34AH;
                   };
                 };
-                ptr__3DAC=result__A14G;
+                ptr__BEAC=result__54AH;
               } else {
-                t__S21G=((__UINTEGER_32 )typ_id__CEAC);
-                a__R21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__H14G=(__UINTEGER_32)((__UINTEGER_32)(sz__5DAC + a__R21G) & (__UINTEGER_32)(~ a__R21G));
-                ptr_table__E14G=((__POINTER )(&(table_type[(t__S21G)])));
-                lab_type__G14G=(__UINTEGER_32)(t__S21G |  1);
-                next__D14G=((__POINTER )(NULL));
-                result__F14G=((__POINTER *)ptr_table__E14G)[ 0];
-                if ((result__F14G == (void *)NULL)) {
-                  result__F14G=new_lab__2QJ(lab_type__G14G);
-                  next__D14G=(void *)((unsigned long)result__F14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H14G)));
-                  ((__POINTER *)next__D14G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__E14G)[ 0]=next__D14G;
+                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;
                 } else {
-                  next__D14G=((__POINTER *)result__F14G)[ 0];
-                  if ((next__D14G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F14G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__H14G <<  1)) <=  4096)) {
-                      next__D14G=(void *)((unsigned long)result__F14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H14G)));
+                  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)));
                     } else {
-                      next__D14G=new_lab__2QJ(lab_type__G14G);
+                      next__C5AH=new_lab__ARJ(lab_type__F5AH);
                     };
-                    ((__POINTER *)next__D14G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__E14G)[ 0]=next__D14G;
+                    ((__POINTER *)next__C5AH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__D5AH)[ 0]=next__C5AH;
                   } else {
-                    ((__POINTER *)result__F14G)[ 0]=(void *)((unsigned long)((__POINTER *)next__D14G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__F14G=next__D14G;
+                    ((__POINTER *)result__E5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__E5AH=next__C5AH;
                   };
                 };
-                ptr__3DAC=result__F14G;
+                ptr__BEAC=result__E5AH;
               };
-              result__2DAC=((__ITM_ARG *)ptr__3DAC);
-              *(result__2DAC) = *(ITM_ARG__);
-            };
-            ((__ITM_ARG *)result__2DAC)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ=p__2Y5B;
-            result__OJEE=result__2DAC;
-            free__KS5(result__5W3G);
-            free__MMQ(result__UTP);
-          } else {
-            result__K2JF=NULL;
-            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__5W3G)->parent_arrayed_collection__X4I.upper__L5OD <  0)) {
-              result__K2JF=empty_list__R2JF;
+              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;
             } else {
-              Self__CLNF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__12JF);
-              e__DLNF=result__5W3G;
-              result__WLNF=NULL;
-              node__VLNF=((void **)Self__CLNF->buckets__3LNF)[(__INTEGER)(hash_code__XMOF(result__5W3G) % Self__CLNF->capacity__YLNF)];
-              until_do__5NOF:
+              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:
               {
-                if (((void *)node__VLNF == (void *)NULL)) {
-                  __tmp__OMNF=TRUE__;
+                if (((void *)node__X5OF == (void *)NULL)) {
+                  __tmp__QAPF=TRUE__;
                 } else {
-                  Self__XYBG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__VLNF)->item__JMNF);
-                  result__0YBG=FALSE__;
-                  o__1YBG=NULL;
-                  if (((void *)Self__XYBG == (void *)e__DLNF)) {
-                    result__0YBG=TRUE__;
+                  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__;
                   } else {
-                    if (e__DLNF==NULL) {
-                      __tmp__HZBG=NULL;
+                    if (e__F5OF==NULL) {
+                      __tmp__FUDG=NULL;
                     } else {
-                      __tmp__HZBG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__DLNF);
+                      __tmp__FUDG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__F5OF);
                     };
-                    o__1YBG=__tmp__HZBG;
-                    if ((((void *)__tmp__HZBG != (void *)NULL) && (Self__XYBG->parent_arrayed_collection__X4I.upper__L5OD == __tmp__HZBG->parent_arrayed_collection__X4I.upper__L5OD))) {
-                      __tmp__XZBG=Self__XYBG->parent_arrayed_collection__X4I.storage__BCPD;
-                      __tmp__ZZBG=__tmp__HZBG->parent_arrayed_collection__X4I.storage__BCPD;
-                      __tmp__2ZBG=(__INTEGER)(Self__XYBG->parent_arrayed_collection__X4I.upper__L5OD +  1);
-                      Self__MUFG=((void **)__tmp__XZBG);
-                      i__AVFG=(__INTEGER)(__tmp__2ZBG -  1);
-                      while (((i__AVFG >=  0) && ((void *)Self__MUFG[i__AVFG] == (void *)((void **)__tmp__ZZBG)[i__AVFG]))) {
-                        i__AVFG=(__INTEGER)(i__AVFG -  1);
+                    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);
                       };
-                      result__0YBG=(i__AVFG <  0);
+                      result__YTDG=(i__4PHG <  0);
                     };
                   };
-                  __tmp__OMNF=result__0YBG;
+                  __tmp__QAPF=result__YTDG;
                 };
-                if ((! __tmp__OMNF)) {
-                  node__VLNF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__VLNF)->next__VMNF;
-                  goto until_do__5NOF;
+                if ((! __tmp__QAPF)) {
+                  node__X5OF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__X5OF)->next__XAPF;
+                  goto until_do__4DQF;
                 };
               };
-              if (((void *)node__VLNF != (void *)NULL)) {
-                result__WLNF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__VLNF)->item__JMNF;
+              if (((void *)node__X5OF != (void *)NULL)) {
+                result__Y5OF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__X5OF)->item__LAPF;
               };
-              result__K2JF=result__WLNF;
-              if (((void *)result__WLNF == (void *)NULL)) {
-                result__K2JF=create_with_capacity__RGRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__5W3G)->parent_arrayed_collection__X4I.upper__L5OD +  1));
-                copy__M2RD(result__K2JF,result__5W3G);
-                Self__CPNF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__12JF);
-                e__DPNF=result__K2JF;
-                e__J14G=result__K2JF;
-                node__K14G=((void **)Self__CPNF->buckets__3LNF)[(__INTEGER)(hash_code__XMOF(result__K2JF) % Self__CPNF->capacity__YLNF)];
-                while ((! (((void *)node__K14G == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__K14G)->item__JMNF == (void *)e__J14G)))) {
-                  node__K14G=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__K14G)->next__VMNF;
+              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;
                 };
-                e__TVOF=result__K2JF;
-                node__2VOF=((void **)Self__CPNF->buckets__3LNF)[(__INTEGER)(hash_code__XMOF(result__K2JF) % Self__CPNF->capacity__YLNF)];
-                while ((! (((void *)node__2VOF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__2VOF)->item__JMNF == (void *)e__TVOF)))) {
-                  node__2VOF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__2VOF)->next__VMNF;
+                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;
                 };
-                h__KPNF=hash_code__XMOF(result__K2JF);
-                idx__LPNF=(__INTEGER)(h__KPNF % Self__CPNF->capacity__YLNF);
-                node__MPNF=((void **)Self__CPNF->buckets__3LNF)[idx__LPNF];
-                while ((! (((void *)node__MPNF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__MPNF)->item__JMNF == (void *)e__DPNF)))) {
-                  node__MPNF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__MPNF)->next__VMNF;
+                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;
                 };
-                if (((void *)node__MPNF == (void *)NULL)) {
-                  if ((Self__CPNF->capacity__YLNF == Self__CPNF->count__PQNF)) {
-                    idx__UMYF= 0;
-                    node1__XMYF=NULL;
-                    node2__YMYF=NULL;
-                    new_capacity__VMYF=prime_number_ceiling__H41((__INTEGER)(Self__CPNF->capacity__YLNF +  1));
-                    old_buckets__WMYF=Self__CPNF->buckets__3LNF;
-                    Self__CPNF->buckets__3LNF=create__UYQF(new_capacity__VMYF);
-                    i__TMYF=(__INTEGER)(Self__CPNF->capacity__YLNF -  1);
-                    Self__CPNF->capacity__YLNF=new_capacity__VMYF;
-                    while ((i__TMYF >=  0)) {
-                      node1__XMYF=((void **)old_buckets__WMYF)[i__TMYF];
-                      while (((void *)node1__XMYF != (void *)NULL)) {
-                        node2__YMYF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__XMYF)->next__VMNF;
-                        idx__UMYF=(__INTEGER)(hash_code__XMOF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__XMYF)->item__JMNF) % Self__CPNF->capacity__YLNF);
-                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__XMYF)->next__VMNF=((void **)Self__CPNF->buckets__3LNF)[idx__UMYF];
-                        ((void **)Self__CPNF->buckets__3LNF)[idx__UMYF]=node1__XMYF;
-                        node1__XMYF=node2__YMYF;
+                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;
                       };
-                      i__TMYF=(__INTEGER)(i__TMYF -  1);
+                      i__DG0F=(__INTEGER)(i__DG0F -  1);
                     };
-                    idx__LPNF=(__INTEGER)(h__KPNF % Self__CPNF->capacity__YLNF);
+                    idx__NDPF=(__INTEGER)(h__MDPF % Self__EDPF->capacity__05OF);
                   };
-                  __tmp__2QNF=((void **)Self__CPNF->buckets__3LNF)[idx__LPNF];
-                  result__FPXF=NULL;
-                  ptr__GPXF=((__POINTER )(NULL));
-                  typ_id__LPXF= 0;
-                  sz__IPXF=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
-                  if ((sz__IPXF ==  0)) {
-                    result__FPXF=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                  __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__;
                   } else {
-                    typ_id__LPXF=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
-                    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__IPXF);
-                    if ((typ_id__LPXF == (__INTEGER)(-  1))) {
-                      a__P11G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                      new_size__Q11G=(__UINTEGER_32)((__UINTEGER_32)(sz__IPXF + a__P11G) & (__UINTEGER_32)(~ a__P11G));
-                      ptr_table__N14G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q11G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                      next__M14G=((__POINTER )(NULL));
-                      result__O14G=((__POINTER *)ptr_table__N14G)[ 0];
-                      if ((result__O14G == (void *)NULL)) {
-                        result__O14G=new_lab__2QJ(new_size__Q11G);
-                        next__M14G=(void *)((unsigned long)result__O14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q11G)));
-                        ((__POINTER *)next__M14G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__N14G)[ 0]=next__M14G;
+                    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;
                       } else {
-                        next__M14G=((__POINTER *)result__O14G)[ 0];
-                        if ((next__M14G == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O14G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Q11G <<  1)) <=  4096)) {
-                            next__M14G=(void *)((unsigned long)result__O14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q11G)));
+                        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)));
                           } else {
-                            next__M14G=new_lab__2QJ(new_size__Q11G);
+                            next__L5AH=new_lab__ARJ(new_size__K23G);
                           };
-                          ((__POINTER *)next__M14G)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__N14G)[ 0]=next__M14G;
+                          ((__POINTER *)next__L5AH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__M5AH)[ 0]=next__L5AH;
                         } else {
-                          ((__POINTER *)result__O14G)[ 0]=(void *)((unsigned long)((__POINTER *)next__M14G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__O14G=next__M14G;
+                          ((__POINTER *)result__N5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__N5AH=next__L5AH;
                         };
                       };
-                      ptr__GPXF=result__O14G;
+                      ptr__WHZF=result__N5AH;
                     } else {
-                      t__U11G=((__UINTEGER_32 )typ_id__LPXF);
-                      a__T11G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                      new_size__V14G=(__UINTEGER_32)((__UINTEGER_32)(sz__IPXF + a__T11G) & (__UINTEGER_32)(~ a__T11G));
-                      ptr_table__S14G=((__POINTER )(&(table_type[(t__U11G)])));
-                      lab_type__U14G=(__UINTEGER_32)(t__U11G |  1);
-                      next__R14G=((__POINTER )(NULL));
-                      result__T14G=((__POINTER *)ptr_table__S14G)[ 0];
-                      if ((result__T14G == (void *)NULL)) {
-                        result__T14G=new_lab__2QJ(lab_type__U14G);
-                        next__R14G=(void *)((unsigned long)result__T14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V14G)));
-                        ((__POINTER *)next__R14G)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__S14G)[ 0]=next__R14G;
+                      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;
                       } else {
-                        next__R14G=((__POINTER *)result__T14G)[ 0];
-                        if ((next__R14G == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T14G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__V14G <<  1)) <=  4096)) {
-                            next__R14G=(void *)((unsigned long)result__T14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V14G)));
+                        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)));
                           } else {
-                            next__R14G=new_lab__2QJ(lab_type__U14G);
+                            next__Q5AH=new_lab__ARJ(lab_type__T5AH);
                           };
-                          ((__POINTER *)next__R14G)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__S14G)[ 0]=next__R14G;
+                          ((__POINTER *)next__Q5AH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__R5AH)[ 0]=next__Q5AH;
                         } else {
-                          ((__POINTER *)result__T14G)[ 0]=(void *)((unsigned long)((__POINTER *)next__R14G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__T14G=next__R14G;
+                          ((__POINTER *)result__S5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__S5AH=next__Q5AH;
                         };
                       };
-                      ptr__GPXF=result__T14G;
+                      ptr__WHZF=result__S5AH;
                     };
-                    result__FPXF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__GPXF);
-                    *(result__FPXF) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__VHZF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__WHZF);
+                    *(result__VHZF) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  Self__LV0F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__FPXF);
-                  Self__LV0F->item__JMNF=result__K2JF;
-                  Self__LV0F->next__VMNF=__tmp__2QNF;
-                  node__MPNF=result__FPXF;
-                  ((void **)Self__CPNF->buckets__3LNF)[idx__LPNF]=result__FPXF;
-                  Self__CPNF->count__PQNF=(__INTEGER)(Self__CPNF->count__PQNF +  1);
+                  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);
                 };
               };
             };
-            free__KS5(result__5W3G);
-            name__LJEE=result__K2JF;
-            type__KJEE=alias__WUP(result__UTP);
-            get__SIP(type__KJEE);
-            p__M3JF=current_position__ZWF();
-            result__HMKF=NULL;
-            ptr__IMKF=((__POINTER )(NULL));
-            typ_id__NMKF= 0;
-            sz__KMKF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
-            if ((sz__KMKF ==  0)) {
-              result__HMKF=ITM_ARGS__;
+            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__;
             } else {
-              typ_id__NMKF=-1;
-              clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__KMKF);
-              if ((typ_id__NMKF == (__INTEGER)(-  1))) {
-                a__011G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__111G=(__UINTEGER_32)((__UINTEGER_32)(sz__KMKF + a__011G) & (__UINTEGER_32)(~ a__011G));
-                ptr_table__X14G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__111G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__W14G=((__POINTER )(NULL));
-                result__Y14G=((__POINTER *)ptr_table__X14G)[ 0];
-                if ((result__Y14G == (void *)NULL)) {
-                  result__Y14G=new_lab__2QJ(new_size__111G);
-                  next__W14G=(void *)((unsigned long)result__Y14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__111G)));
-                  ((__POINTER *)next__W14G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__X14G)[ 0]=next__W14G;
+              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;
                 } else {
-                  next__W14G=((__POINTER *)result__Y14G)[ 0];
-                  if ((next__W14G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y14G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__111G <<  1)) <=  4096)) {
-                      next__W14G=(void *)((unsigned long)result__Y14G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__111G)));
+                  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)));
                     } else {
-                      next__W14G=new_lab__2QJ(new_size__111G);
+                      next__V5AH=new_lab__ARJ(new_size__V23G);
                     };
-                    ((__POINTER *)next__W14G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__X14G)[ 0]=next__W14G;
+                    ((__POINTER *)next__V5AH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__W5AH)[ 0]=next__V5AH;
                   } else {
-                    ((__POINTER *)result__Y14G)[ 0]=(void *)((unsigned long)((__POINTER *)next__W14G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__Y14G=next__W14G;
+                    ((__POINTER *)result__X5AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__X5AH=next__V5AH;
                   };
                 };
-                ptr__IMKF=result__Y14G;
+                ptr__FLLF=result__X5AH;
               } else {
-                t__511G=((__UINTEGER_32 )typ_id__NMKF);
-                a__411G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__514G=(__UINTEGER_32)((__UINTEGER_32)(sz__KMKF + a__411G) & (__UINTEGER_32)(~ a__411G));
-                ptr_table__214G=((__POINTER )(&(table_type[(t__511G)])));
-                lab_type__414G=(__UINTEGER_32)(t__511G |  1);
-                next__114G=((__POINTER )(NULL));
-                result__314G=((__POINTER *)ptr_table__214G)[ 0];
-                if ((result__314G == (void *)NULL)) {
-                  result__314G=new_lab__2QJ(lab_type__414G);
-                  next__114G=(void *)((unsigned long)result__314G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__514G)));
-                  ((__POINTER *)next__114G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__214G)[ 0]=next__114G;
+                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;
                 } else {
-                  next__114G=((__POINTER *)result__314G)[ 0];
-                  if ((next__114G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__314G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__514G <<  1)) <=  4096)) {
-                      next__114G=(void *)((unsigned long)result__314G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__514G)));
+                  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)));
                     } else {
-                      next__114G=new_lab__2QJ(lab_type__414G);
+                      next__05AH=new_lab__ARJ(lab_type__35AH);
                     };
-                    ((__POINTER *)next__114G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__214G)[ 0]=next__114G;
+                    ((__POINTER *)next__05AH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__15AH)[ 0]=next__05AH;
                   } else {
-                    ((__POINTER *)result__314G)[ 0]=(void *)((unsigned long)((__POINTER *)next__114G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__314G=next__114G;
+                    ((__POINTER *)result__25AH)[ 0]=(void *)((unsigned long)((__POINTER *)next__05AH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__25AH=next__05AH;
                   };
                 };
-                ptr__IMKF=result__314G;
+                ptr__FLLF=result__25AH;
               };
-              result__HMKF=((__ITM_ARGS *)ptr__IMKF);
-              *(result__HMKF) = *(ITM_ARGS__);
+              result__ELLF=((__ITM_ARGS *)ptr__FLLF);
+              *(result__ELLF) = *(ITM_ARGS__);
             };
-            Self__PFNF=((__ITM_ARGS *)result__HMKF);
-            Self__PFNF->parent_itm_argument__QPEE.parent_itm_code__C4M.position__3CJ=p__M3JF;
-            Self__PFNF->name__TFNF=result__K2JF;
-            result__OJEE=result__HMKF;
+            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;
           };
-          if (is_shorter__TY) {
-            __tmp__3PEE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__LJEE)->parent_arrayed_collection__X4I.upper__L5OD;
-            Self__V3JF= 0;
-            while ((Self__V3JF <= __tmp__3PEE)) {
-              add__SLHB(short_local__ZBC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__LJEE)->parent_arrayed_collection__X4I.storage__BCPD)[Self__V3JF]);
-              Self__V3JF=(__INTEGER)(Self__V3JF +  1);
+          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);
             };
           };
         };
       };
-      result__3DHB=result__OJEE;
-      if (((void *)result__OJEE == (void *)NULL)) {
-        if ((! mute__0DHB)) {
-          pos__2TOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_266));
-          put_position__EOG(pos__2TOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
       } else {
-        result__A24G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__A24G=FALSE__;
+        result__55AH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__55AH=FALSE__;
         } else {
-          result__B24G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__B24G=((__CHARACTER )(( 0)));
+          result__AABH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__AABH=((__CHARACTER )(( 0)));
           } else {
-            result__B24G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__AABH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__B24G == ')')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__A24G=TRUE__;
+          if ((result__AABH == ')')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__55AH=TRUE__;
           };
         };
-        if ((! result__A24G)) {
-          pos__4TOG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_244));
-          put_position__EOG(pos__4TOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__3DHB);
+  return(result__BEHB);
 }
 
-static void* read_slot_operator__VT5B(void *list_arg__XT5B)
+static void* read_slot_operator__ZT5B(void *list_arg__1T5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  void *associativity__1T5B,*name__ZT5B,*pretty_name__0T5B;
-  void *arg__3T5B;
-  __POSITION pos__AUOG,pos__CUOG,pos__EUOG,pos__JUOG,pos__LUOG;
-  __POSITION pos__NUOG,__tmp__XY5B;
-  void *__tmp__YY5B;
-  __ITM_SLOT_OPERATOR *result__GLAC,*Self__Q1HC;
-  __POINTER ptr__HLAC,ptr_table__L24G,next__K24G,result__M24G;
-  __POINTER ptr_table__Q24G,next__P24G,result__R24G;
-  __INTEGER typ_id__MLAC;
-  __UINTEGER_32 sz__JLAC,a__F21G,new_size__G21G,t__K21G,a__J21G;
-  __UINTEGER_32 new_size__T24G,lab_type__S24G;
-  __BOOLEAN result__D24G,result__H24G,__tmp__2V5B,result__J24G;
-  __CHARACTER result__E24G;
-  associativity__1T5B=NULL;
-  arg__3T5B=NULL;
-  if ((! read_operator__XMM())) {
-    pos__AUOG=current_position__ZWF();
-    put_error__text__0MG( 0,(&__string_267));
-    put_position__EOG(pos__AUOG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  if ((((void *)last_string__YZC == (void *)(&__string_16)) || ((void *)last_string__YZC == (void *)(&__string_17)))) {
-    pos__CUOG=current_position__ZWF();
-    put_error__text__0MG( 0,(&__string_268));
-    put_position__EOG(pos__CUOG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  name__ZT5B=last_string__YZC;
-  pretty_name__0T5B=name__ZT5B;
-  result__D24G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__D24G=FALSE__;
+  name__3T5B=last_string__2ZC;
+  pretty_name__4T5B=name__3T5B;
+  result__CABH=FALSE__;
+  if ((! read_space__RRD())) {
+    result__CABH=FALSE__;
   } else {
-    result__E24G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__E24G=((__CHARACTER )(( 0)));
+    result__DABH='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__DABH=((__CHARACTER )(( 0)));
     } else {
-      result__E24G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__DABH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__E24G == '\'')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__D24G=TRUE__;
+    if ((result__DABH == '\'')) {
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      result__CABH=TRUE__;
     };
   };
-  if ((! result__D24G)) {
-    pos__EUOG=current_position__ZWF();
-    put_error__text__0MG( 2,(&__string_269));
-    put_position__EOG(pos__EUOG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  result__H24G=read_word__APF((&__string_6));
-  if (is_shorter__TY) {
-    if (result__H24G) {
+  result__GABH=read_word__EPF((&__string_6));
+  if (is_shorter__WY) {
+    if (result__GABH) {
       if (((void *)(&__string_6) == (void *)(&__string_4))) {
-        short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
       } else {
-        short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
       };
     };
   };
-  if (result__H24G) {
-    __tmp__2V5B=TRUE__;
+  if (result__GABH) {
+    __tmp__AW5B=TRUE__;
   } else {
-    result__J24G=read_word__APF((&__string_5));
-    if (is_shorter__TY) {
-      if (result__J24G) {
+    result__IABH=read_word__EPF((&__string_5));
+    if (is_shorter__WY) {
+      if (result__IABH) {
         if (((void *)(&__string_5) == (void *)(&__string_4))) {
-          short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         } else {
-          short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         };
       };
     };
-    __tmp__2V5B=result__J24G;
+    __tmp__AW5B=result__IABH;
   };
-  if (__tmp__2V5B) {
-    associativity__1T5B=last_string__YZC;
-    read_integer__Q1P();
+  if (__tmp__AW5B) {
+    associativity__5T5B=last_string__2ZC;
+    read_integer__U1P();
   };
-  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__XT5B)->parent_arrayed_collection__VBZB.upper__O5GC <  0)) {
-    arg__3T5B=read_loc_arg__with_self__YDHB(PARSER__,FALSE__,TRUE__);
-    if (((void *)arg__3T5B == (void *)NULL)) {
-      pos__JUOG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_270));
-      put_position__EOG(pos__JUOG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
-    add_last__K5GC(list_arg__XT5B,arg__3T5B);
-    name__ZT5B=operator__name__NDO((&__string_83),name__ZT5B);
-    if (((void *)associativity__1T5B != (void *)NULL)) {
-      pos__LUOG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_271));
-      put_position__EOG(pos__LUOG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
   } else {
-    arg__3T5B=read_loc_arg__with_self__YDHB(PARSER__,FALSE__,FALSE__);
-    if (((void *)arg__3T5B != (void *)NULL)) {
-      add_last__K5GC(list_arg__XT5B,arg__3T5B);
-      name__ZT5B=operator__name__NDO((&__string_81),name__ZT5B);
-      if (((void *)associativity__1T5B == (void *)NULL)) {
-        associativity__1T5B=(&__string_6);
-      };
-    } else {
-      name__ZT5B=operator__name__NDO((&__string_82),name__ZT5B);
-      if (((void *)associativity__1T5B != (void *)NULL)) {
-        pos__NUOG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_272));
-        put_position__EOG(pos__NUOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+    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)) {
           exit(( 1));
         };
       };
     };
   };
-  __tmp__XY5B=current_position__ZWF();
-  __tmp__YY5B=last_section__H0C;
-  result__GLAC=NULL;
-  ptr__HLAC=((__POINTER )(NULL));
-  typ_id__MLAC= 0;
-  sz__JLAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
-  if ((sz__JLAC ==  0)) {
-    result__GLAC=ITM_SLOT_OPERATOR__;
+  __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__;
   } else {
-    typ_id__MLAC=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__JLAC);
-    if ((typ_id__MLAC == (__INTEGER)(-  1))) {
-      a__F21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__G21G=(__UINTEGER_32)((__UINTEGER_32)(sz__JLAC + a__F21G) & (__UINTEGER_32)(~ a__F21G));
-      ptr_table__L24G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G21G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__K24G=((__POINTER )(NULL));
-      result__M24G=((__POINTER *)ptr_table__L24G)[ 0];
-      if ((result__M24G == (void *)NULL)) {
-        result__M24G=new_lab__2QJ(new_size__G21G);
-        next__K24G=(void *)((unsigned long)result__M24G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G21G)));
-        ((__POINTER *)next__K24G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__L24G)[ 0]=next__K24G;
-      } else {
-        next__K24G=((__POINTER *)result__M24G)[ 0];
-        if ((next__K24G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M24G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G21G <<  1)) <=  4096)) {
-            next__K24G=(void *)((unsigned long)result__M24G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G21G)));
-          } else {
-            next__K24G=new_lab__2QJ(new_size__G21G);
-          };
-          ((__POINTER *)next__K24G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__L24G)[ 0]=next__K24G;
-        } else {
-          ((__POINTER *)result__M24G)[ 0]=(void *)((unsigned long)((__POINTER *)next__K24G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__M24G=next__K24G;
-        };
-      };
-      ptr__HLAC=result__M24G;
-    } else {
-      t__K21G=((__UINTEGER_32 )typ_id__MLAC);
-      a__J21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__T24G=(__UINTEGER_32)((__UINTEGER_32)(sz__JLAC + a__J21G) & (__UINTEGER_32)(~ a__J21G));
-      ptr_table__Q24G=((__POINTER )(&(table_type[(t__K21G)])));
-      lab_type__S24G=(__UINTEGER_32)(t__K21G |  1);
-      next__P24G=((__POINTER )(NULL));
-      result__R24G=((__POINTER *)ptr_table__Q24G)[ 0];
-      if ((result__R24G == (void *)NULL)) {
-        result__R24G=new_lab__2QJ(lab_type__S24G);
-        next__P24G=(void *)((unsigned long)result__R24G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T24G)));
-        ((__POINTER *)next__P24G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Q24G)[ 0]=next__P24G;
-      } else {
-        next__P24G=((__POINTER *)result__R24G)[ 0];
-        if ((next__P24G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R24G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__T24G <<  1)) <=  4096)) {
-            next__P24G=(void *)((unsigned long)result__R24G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T24G)));
-          } else {
-            next__P24G=new_lab__2QJ(lab_type__S24G);
-          };
-          ((__POINTER *)next__P24G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Q24G)[ 0]=next__P24G;
-        } else {
-          ((__POINTER *)result__R24G)[ 0]=(void *)((unsigned long)((__POINTER *)next__P24G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__R24G=next__P24G;
-        };
-      };
-      ptr__HLAC=result__R24G;
-    };
-    result__GLAC=((__ITM_SLOT_OPERATOR *)ptr__HLAC);
-    *(result__GLAC) = *(ITM_SLOT_OPERATOR__);
-  };
-  Self__Q1HC=((__ITM_SLOT_OPERATOR *)result__GLAC);
-  Self__Q1HC->parent_itm_slot__4T5B.parent_named__D5.name__LI=name__ZT5B;
-  Self__Q1HC->parent_itm_slot__4T5B.parent_named__D5.parent_itm_object__4.position__3CJ=__tmp__XY5B;
-  Self__Q1HC->parent_itm_slot__4T5B.id_section__I1C=__tmp__YY5B;
-  ((__ITM_SLOT_OPERATOR *)result__GLAC)->pretty_name__F0HC=pretty_name__0T5B;
-  return(result__GLAC);
+    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);
 }
 
-static void add_last__K5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__L5GC,void *element__M5GC)
+static void add_last__O5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__P5GC,void *element__Q5GC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__N5GC,__tmp__WAHC,__tmp__4GTD,Self__1YWE;
-  __BOOLEAN __tmp__35GC;
-  void **__tmp__VAHC,**new__KGTD;
-  new_capacity__N5GC= 0;
-  if (((__INTEGER)(Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC +  1) <= (__INTEGER)(Self__L5GC->parent_arrayed_collection__VBZB.capacity__Q5GC -  1))) {
-    Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC=(__INTEGER)(Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC +  1);
-    __tmp__35GC=TRUE__;
+  __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__;
   } else {
-    __tmp__35GC=FALSE__;
-  };
-  if ((! __tmp__35GC)) {
-    if ((Self__L5GC->parent_arrayed_collection__VBZB.capacity__Q5GC ==  0)) {
-      Self__L5GC->parent_arrayed_collection__VBZB.storage__MAHC=create__GPBD( 2);
-      Self__L5GC->parent_arrayed_collection__VBZB.capacity__Q5GC= 2;
-      Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC= 0;
-    } else {
-      new_capacity__N5GC=(__INTEGER)(Self__L5GC->parent_arrayed_collection__VBZB.capacity__Q5GC <<  1);
-      __tmp__VAHC=Self__L5GC->parent_arrayed_collection__VBZB.storage__MAHC;
-      __tmp__WAHC=Self__L5GC->parent_arrayed_collection__VBZB.capacity__Q5GC;
-      new__KGTD=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__VAHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__WAHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__N5GC * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__4GTD=(__INTEGER)(new_capacity__N5GC -  1);
-      Self__1YWE=__tmp__WAHC;
-      while ((Self__1YWE <= __tmp__4GTD)) {
-        new__KGTD[Self__1YWE]=NULL;
-        Self__1YWE=(__INTEGER)(Self__1YWE +  1);
-      };
-      Self__L5GC->parent_arrayed_collection__VBZB.storage__MAHC=new__KGTD;
-      Self__L5GC->parent_arrayed_collection__VBZB.capacity__Q5GC=new_capacity__N5GC;
-      Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC=(__INTEGER)(Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC +  1);
-    };
-  };
-  ((void **)Self__L5GC->parent_arrayed_collection__VBZB.storage__MAHC)[Self__L5GC->parent_arrayed_collection__VBZB.upper__O5GC]=element__M5GC;
+    __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;
 }
 
-static void* read_slot_keyword__CZ5B(void *list_arg__EZ5B)
+static void* read_slot_keyword__GZ5B(void *list_arg__IZ5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  void *n__GZ5B,*result__QNP;
-  void *arg__HZ5B;
-  void *result__IZ5B;
-  __POSITION pos__JWOG,pos__LWOG,p__424G;
-  void *result__AQP;
-  void *sec__524G;
-  __ITM_SLOT *result__U24G,*Self__224G;
-  __POINTER ptr__V24G,ptr_table__B34G,next__A34G,result__C34G;
-  __POINTER ptr_table__G34G,next__F34G,result__H34G;
-  __INTEGER typ_id__W24G;
-  __UINTEGER_32 sz__X24G,a__Y24G,new_size__Z24G,t__024G,a__124G;
-  __UINTEGER_32 new_size__J34G,lab_type__I34G;
-  __FAST_ARRAYoSTRINGo *Self__S2AB,*Self__I3AB;
-  n__GZ5B=NULL;
-  arg__HZ5B=NULL;
-  result__IZ5B=NULL;
-  if (read_identifier__15K()) {
-    short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-    result__QNP=NULL;
-    if ((((__FAST_ARRAYoSTRINGo *)free__RNP)->parent_arrayed_collection__TJC.upper__WJC <  0)) {
-      result__QNP=create__BBB( 128);
-    } else {
-      Self__S2AB=((__FAST_ARRAYoSTRINGo *)free__RNP);
-      result__QNP=((void **)Self__S2AB->parent_arrayed_collection__TJC.storage__HGT)[Self__S2AB->parent_arrayed_collection__TJC.upper__WJC];
-      Self__I3AB=((__FAST_ARRAYoSTRINGo *)free__RNP);
-      Self__I3AB->parent_arrayed_collection__TJC.upper__WJC=(__INTEGER)(Self__I3AB->parent_arrayed_collection__TJC.upper__WJC -  1);
-    };
-    n__GZ5B=result__QNP;
-    copy__JCS(result__QNP,last_string__YZC);
-    arg__HZ5B=read_loc_arg__with_self__YDHB(PARSER__,FALSE__,FALSE__);
-    if (((void *)arg__HZ5B != (void *)NULL)) {
-      add_last__K5GC(list_arg__EZ5B,arg__HZ5B);
-      if (read_identifier__15K()) {
-        if (((void *)((__SECTION_ *)last_section__H0C)->name__SYDC == (void *)(&__string_30))) {
-          pos__JWOG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_273));
-          put_position__EOG(pos__JWOG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+  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)) {
             exit(( 1));
           };
         };
         do {
-          short__token__to__1AD((&__string_130),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-          append__RNS(n__GZ5B,(&__string_112));
-          append__RNS(n__GZ5B,last_string__YZC);
-          arg__HZ5B=read_loc_arg__with_self__YDHB(PARSER__,FALSE__,FALSE__);
-          if (((void *)arg__HZ5B == (void *)NULL)) {
-            pos__LWOG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_160));
-            put_position__EOG(pos__LWOG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          add_last__K5GC(list_arg__EZ5B,arg__HZ5B);
-        } while (read_identifier__15K());
-      };
-    };
-    result__AQP=get__YVB(result__QNP);
-    add_last__QRV(free__RNP,result__QNP);
-    ((__STRING *)result__QNP)->count__GFC= 0;
-    p__424G=current_position__ZWF();
-    sec__524G=last_section__H0C;
-    result__U24G=NULL;
-    ptr__V24G=((__POINTER )(NULL));
-    typ_id__W24G= 0;
-    sz__X24G=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-    if ((sz__X24G ==  0)) {
-      result__U24G=ITM_SLOT__;
-    } else {
-      typ_id__W24G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__X24G);
-      if ((typ_id__W24G == (__INTEGER)(-  1))) {
-        a__Y24G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__Z24G=(__UINTEGER_32)((__UINTEGER_32)(sz__X24G + a__Y24G) & (__UINTEGER_32)(~ a__Y24G));
-        ptr_table__B34G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z24G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__A34G=((__POINTER )(NULL));
-        result__C34G=((__POINTER *)ptr_table__B34G)[ 0];
-        if ((result__C34G == (void *)NULL)) {
-          result__C34G=new_lab__2QJ(new_size__Z24G);
-          next__A34G=(void *)((unsigned long)result__C34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z24G)));
-          ((__POINTER *)next__A34G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__B34G)[ 0]=next__A34G;
-        } else {
-          next__A34G=((__POINTER *)result__C34G)[ 0];
-          if ((next__A34G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C34G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Z24G <<  1)) <=  4096)) {
-              next__A34G=(void *)((unsigned long)result__C34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z24G)));
+          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)));
             } else {
-              next__A34G=new_lab__2QJ(new_size__Z24G);
-            };
-            ((__POINTER *)next__A34G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__B34G)[ 0]=next__A34G;
-          } else {
-            ((__POINTER *)result__C34G)[ 0]=(void *)((unsigned long)((__POINTER *)next__A34G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__C34G=next__A34G;
-          };
-        };
-        ptr__V24G=result__C34G;
-      } else {
-        t__024G=((__UINTEGER_32 )typ_id__W24G);
-        a__124G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__J34G=(__UINTEGER_32)((__UINTEGER_32)(sz__X24G + a__124G) & (__UINTEGER_32)(~ a__124G));
-        ptr_table__G34G=((__POINTER )(&(table_type[(t__024G)])));
-        lab_type__I34G=(__UINTEGER_32)(t__024G |  1);
-        next__F34G=((__POINTER )(NULL));
-        result__H34G=((__POINTER *)ptr_table__G34G)[ 0];
-        if ((result__H34G == (void *)NULL)) {
-          result__H34G=new_lab__2QJ(lab_type__I34G);
-          next__F34G=(void *)((unsigned long)result__H34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J34G)));
-          ((__POINTER *)next__F34G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__G34G)[ 0]=next__F34G;
-        } else {
-          next__F34G=((__POINTER *)result__H34G)[ 0];
-          if ((next__F34G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H34G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__J34G <<  1)) <=  4096)) {
-              next__F34G=(void *)((unsigned long)result__H34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J34G)));
+              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)));
             } else {
-              next__F34G=new_lab__2QJ(lab_type__I34G);
+              next__EBBH=new_lab__ARJ(lab_type__HBBH);
             };
-            ((__POINTER *)next__F34G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__G34G)[ 0]=next__F34G;
+            ((__POINTER *)next__EBBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FBBH)[ 0]=next__EBBH;
           } else {
-            ((__POINTER *)result__H34G)[ 0]=(void *)((unsigned long)((__POINTER *)next__F34G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__H34G=next__F34G;
+            ((__POINTER *)result__GBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EBBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GBBH=next__EBBH;
           };
         };
-        ptr__V24G=result__H34G;
+        ptr__UABH=result__GBBH;
       };
-      result__U24G=((__ITM_SLOT *)ptr__V24G);
-      *(result__U24G) = *(ITM_SLOT__);
+      result__TABH=((__ITM_SLOT *)ptr__UABH);
+      *(result__TABH) = *(ITM_SLOT__);
     };
-    Self__224G=((__ITM_SLOT *)result__U24G);
-    Self__224G->parent_named__D5.name__LI=result__AQP;
-    Self__224G->parent_named__D5.parent_itm_object__4.position__3CJ=p__424G;
-    Self__224G->id_section__I1C=sec__524G;
-    result__IZ5B=result__U24G;
+    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;
   };
-  return(result__IZ5B);
+  return(result__MZ5B);
 }
 
-static void** create__GPBD(__INTEGER nb_elements__IPBD)
+static void** create__KPBD(__INTEGER nb_elements__MPBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__B3ZG,a__G3ZG,new_size__C3ZG,new_size2__D3ZG,a__V21G;
-  __UINTEGER_32 new_size__W21G;
-  __POINTER result__A3ZG,ptr_table__L34G,next__K34G,result__M34G;
-  void *result__P34G;
-  __INTEGER Self__LEXD;
-  void **Result__CDGD;
-  sz__B3ZG=((__UINTEGER_32 )(__INTEGER)(nb_elements__IPBD * ((__INTEGER )(sizeof(void *)))));
-  result__A3ZG=((__POINTER )(NULL));
-  a__G3ZG=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__C3ZG=(__UINTEGER_32)((__UINTEGER_32)(sz__B3ZG + a__G3ZG) & (__UINTEGER_32)(~ a__G3ZG));
-  new_size2__D3ZG=(__UINTEGER_32)(new_size__C3ZG + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__D3ZG <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__V21G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__W21G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__D3ZG + a__V21G) & (__UINTEGER_32)(~ a__V21G));
-    ptr_table__L34G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W21G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__K34G=((__POINTER )(NULL));
-    result__M34G=((__POINTER *)ptr_table__L34G)[ 0];
-    if ((result__M34G == (void *)NULL)) {
-      result__M34G=new_lab__2QJ(new_size__W21G);
-      next__K34G=(void *)((unsigned long)result__M34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W21G)));
-      ((__POINTER *)next__K34G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__L34G)[ 0]=next__K34G;
-    } else {
-      next__K34G=((__POINTER *)result__M34G)[ 0];
-      if ((next__K34G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M34G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W21G <<  1)) <=  4096)) {
-          next__K34G=(void *)((unsigned long)result__M34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W21G)));
-        } else {
-          next__K34G=new_lab__2QJ(new_size__W21G);
-        };
-        ((__POINTER *)next__K34G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__L34G)[ 0]=next__K34G;
-      } else {
-        ((__POINTER *)result__M34G)[ 0]=(void *)((unsigned long)((__POINTER *)next__K34G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__M34G=next__K34G;
-      };
-    };
-    ((__POINTER *)result__M34G)[ 0]=((__POINTER ) 3);
-    result__A3ZG=(void *)((unsigned long)result__M34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__P34G=first_free__HDVB;
-    while ((((void *)result__P34G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__P34G)->map_size_and_id__YSB &  4294967292LU) < new_size__C3ZG))) {
-      result__P34G=((__MEMORY *)result__P34G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__P34G == (void *)NULL)) {
-      result__P34G=new_page__454();
+    if (((void *)result__OBBH == (void *)NULL)) {
+      result__OBBH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__P34G,new_size__C3ZG,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__P34G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__A3ZG=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__P34G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__CDGD=((void **)result__A3ZG);
-  Self__LEXD=(__INTEGER)(nb_elements__IPBD -  1);
-  while ((Self__LEXD >=  0)) {
-    Result__CDGD[Self__LEXD]=NULL;
-    Self__LEXD=(__INTEGER)(Self__LEXD -  1);
+  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);
   };
-  return(Result__CDGD);
+  return(Result__GDGD);
 }
 
-static void set_argument_list__FCHC(__ITM_SLOT *Self__GCHC,void *p__HCHC)
+static void set_argument_list__JCHC(__ITM_SLOT *Self__KCHC,void *p__LCHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__PCHC,*__tmp__BDHC,*__tmp__ODHC;
-  __INTEGER __tmp__QCHC;
-  __POSITION __tmp__CDHC,__tmp__PDHC;
-  __SECTION_ *Self__3QSG;
-  __BOOLEAN __tmp__UCHC;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__121G,*Self__FWID;
-  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__HCHC)->parent_arrayed_collection__VBZB.upper__O5GC +  1) >  1)) {
-    __tmp__UCHC=TRUE__;
+  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__;
   } else {
-    __tmp__PCHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__HCHC)->parent_arrayed_collection__VBZB.storage__MAHC)[ 0];
-    if (((struct ___OBJ *)__tmp__PCHC)->__id==__ITM_ARG__) {
-      __tmp__QCHC= 1;
+    __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;
     } else {
-      __tmp__QCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__PCHC)->name__TFNF)->parent_arrayed_collection__X4I.upper__L5OD +  1);
+      __tmp__UCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__TCHC)->name__QPOF)->parent_arrayed_collection__14I.upper__P5OD +  1);
     };
-    __tmp__UCHC=(__tmp__QCHC >  1);
+    __tmp__YCHC=(__tmp__UCHC >  1);
   };
-  if (__tmp__UCHC) {
-    if (((void *)((__SECTION_ *)Self__GCHC->id_section__I1C)->name__SYDC == (void *)(&__string_25))) {
-      Self__121G=((__FAST_ARRAYoITM_ARGUMENTo *)p__HCHC);
-      __tmp__BDHC=((void **)Self__121G->parent_arrayed_collection__VBZB.storage__MAHC)[Self__121G->parent_arrayed_collection__VBZB.upper__O5GC];
-      if (((struct ___OBJ *)__tmp__BDHC)->__id==__ITM_ARG__) {
-        __tmp__CDHC=((__ITM_ARG *)__tmp__BDHC)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ;
+  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;
       } else {
-        __tmp__CDHC=((__ITM_ARGS *)__tmp__BDHC)->parent_itm_argument__QPEE.parent_itm_code__C4M.position__3CJ;
+        __tmp__GDHC=((__ITM_ARGS *)__tmp__FDHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
       };
-      put_error__text__0MG( 1,(&__string_219));
-      put_position__EOG(__tmp__CDHC);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+      put_error__text__4MG( 1,(&__string_221));
+      put_position__IOG(__tmp__GDHC);
+      put_string__I1F(msg_err__DNG);
+      if ((type_error__CNG !=  2)) {
         exit(( 1));
       };
     };
-    Self__3QSG=((__SECTION_ *)Self__GCHC->id_section__I1C);
-    if ((((void *)Self__3QSG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__3QSG->name__SYDC == (void *)(&__string_24)))) {
-      Self__FWID=((__FAST_ARRAYoITM_ARGUMENTo *)p__HCHC);
-      __tmp__ODHC=((void **)Self__FWID->parent_arrayed_collection__VBZB.storage__MAHC)[Self__FWID->parent_arrayed_collection__VBZB.upper__O5GC];
-      if (((struct ___OBJ *)__tmp__ODHC)->__id==__ITM_ARG__) {
-        __tmp__PDHC=((__ITM_ARG *)__tmp__ODHC)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ;
+    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;
       } else {
-        __tmp__PDHC=((__ITM_ARGS *)__tmp__ODHC)->parent_itm_argument__QPEE.parent_itm_code__C4M.position__3CJ;
+        __tmp__TDHC=((__ITM_ARGS *)__tmp__SDHC)->parent_itm_argument__YREE.parent_itm_code__G4M.position__BDJ;
       };
-      put_error__text__0MG( 1,(&__string_220));
-      put_position__EOG(__tmp__PDHC);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+      put_error__text__4MG( 1,(&__string_222));
+      put_position__IOG(__tmp__TDHC);
+      put_string__I1F(msg_err__DNG);
+      if ((type_error__CNG !=  2)) {
         exit(( 1));
       };
     };
   };
+  Self__KCHC->argument_list__0DHC=p__LCHC;
 }
 
-static __ITM_TYPE_MULTI* get__SIP(void *lt__UIP)
+static __ITM_TYPE_MULTI* get__WIP(void *lt__YIP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __ITM_TYPE_MULTI *result__WIP,*__tmp__IKP,*result__H2HB;
-  __INTEGER idx__XIP,typ_id__N2HB,new_capacity__FZAB,__tmp__J0AB;
-  __INTEGER __tmp__ANFC,Self__0WVD;
-  void *__tmp__HKP;
-  __POINTER ptr__I2HB,ptr_table__T34G,next__S34G,result__U34G;
-  __POINTER ptr_table__Y34G,next__X34G,result__Z34G;
-  __UINTEGER_32 sz__K2HB,a__F31G,new_size__G31G,t__K31G,a__J31G;
-  __UINTEGER_32 new_size__134G,lab_type__034G;
-  __FAST_ARRAYoITM_TYPE_MULTIo *Self__DZAB;
-  __BOOLEAN __tmp__TZAB;
-  void **__tmp__I0AB,**new__MMFC;
-  result__WIP=NULL;
-  idx__XIP= 0;
-  while (((idx__XIP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3IP)->parent_arrayed_collection__2IP.upper__GJP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3IP)->parent_arrayed_collection__2IP.storage__Y1V)[idx__XIP])->list_type__QJP != (void *)lt__UIP))) {
-    idx__XIP=(__INTEGER)(idx__XIP +  1);
-  };
-  if ((idx__XIP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3IP)->parent_arrayed_collection__2IP.upper__GJP)) {
-    __tmp__HKP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3IP)->parent_arrayed_collection__2IP.storage__Y1V)[idx__XIP];
-    if (__tmp__HKP==NULL) {
-      __tmp__IKP=NULL;
-    } else {
-      __tmp__IKP=((__ITM_TYPE_MULTI *)__tmp__HKP);
-    };
-    result__WIP=__tmp__IKP;
+  __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;
   } else {
-    result__H2HB=NULL;
-    ptr__I2HB=((__POINTER )(NULL));
-    typ_id__N2HB= 0;
-    sz__K2HB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
-    if ((sz__K2HB ==  0)) {
-      result__H2HB=ITM_TYPE_MULTI__;
-    } else {
-      typ_id__N2HB=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__K2HB);
-      if ((typ_id__N2HB == (__INTEGER)(-  1))) {
-        a__F31G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__G31G=(__UINTEGER_32)((__UINTEGER_32)(sz__K2HB + a__F31G) & (__UINTEGER_32)(~ a__F31G));
-        ptr_table__T34G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G31G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__S34G=((__POINTER )(NULL));
-        result__U34G=((__POINTER *)ptr_table__T34G)[ 0];
-        if ((result__U34G == (void *)NULL)) {
-          result__U34G=new_lab__2QJ(new_size__G31G);
-          next__S34G=(void *)((unsigned long)result__U34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G31G)));
-          ((__POINTER *)next__S34G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__T34G)[ 0]=next__S34G;
-        } else {
-          next__S34G=((__POINTER *)result__U34G)[ 0];
-          if ((next__S34G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U34G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G31G <<  1)) <=  4096)) {
-              next__S34G=(void *)((unsigned long)result__U34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G31G)));
+    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)));
             } else {
-              next__S34G=new_lab__2QJ(new_size__G31G);
-            };
-            ((__POINTER *)next__S34G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__T34G)[ 0]=next__S34G;
-          } else {
-            ((__POINTER *)result__U34G)[ 0]=(void *)((unsigned long)((__POINTER *)next__S34G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__U34G=next__S34G;
-          };
-        };
-        ptr__I2HB=result__U34G;
-      } else {
-        t__K31G=((__UINTEGER_32 )typ_id__N2HB);
-        a__J31G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__134G=(__UINTEGER_32)((__UINTEGER_32)(sz__K2HB + a__J31G) & (__UINTEGER_32)(~ a__J31G));
-        ptr_table__Y34G=((__POINTER )(&(table_type[(t__K31G)])));
-        lab_type__034G=(__UINTEGER_32)(t__K31G |  1);
-        next__X34G=((__POINTER )(NULL));
-        result__Z34G=((__POINTER *)ptr_table__Y34G)[ 0];
-        if ((result__Z34G == (void *)NULL)) {
-          result__Z34G=new_lab__2QJ(lab_type__034G);
-          next__X34G=(void *)((unsigned long)result__Z34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__134G)));
-          ((__POINTER *)next__X34G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Y34G)[ 0]=next__X34G;
-        } else {
-          next__X34G=((__POINTER *)result__Z34G)[ 0];
-          if ((next__X34G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z34G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__134G <<  1)) <=  4096)) {
-              next__X34G=(void *)((unsigned long)result__Z34G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__134G)));
+              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)));
             } else {
-              next__X34G=new_lab__2QJ(lab_type__034G);
+              next__WBBH=new_lab__ARJ(lab_type__ZBBH);
             };
-            ((__POINTER *)next__X34G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__Y34G)[ 0]=next__X34G;
+            ((__POINTER *)next__WBBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XBBH)[ 0]=next__WBBH;
           } else {
-            ((__POINTER *)result__Z34G)[ 0]=(void *)((unsigned long)((__POINTER *)next__X34G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__Z34G=next__X34G;
+            ((__POINTER *)result__YBBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YBBH=next__WBBH;
           };
         };
-        ptr__I2HB=result__Z34G;
+        ptr__M2HB=result__YBBH;
       };
-      result__H2HB=((__ITM_TYPE_MULTI *)ptr__I2HB);
-      *(result__H2HB) = *(ITM_TYPE_MULTI__);
+      result__L2HB=((__ITM_TYPE_MULTI *)ptr__M2HB);
+      *(result__L2HB) = *(ITM_TYPE_MULTI__);
     };
-    ((__ITM_TYPE_MULTI *)result__H2HB)->list_type__QJP=lt__UIP;
-    result__WIP=result__H2HB;
-    Self__DZAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__3IP);
-    new_capacity__FZAB= 0;
-    if (((__INTEGER)(Self__DZAB->parent_arrayed_collection__2IP.upper__GJP +  1) <= (__INTEGER)(Self__DZAB->parent_arrayed_collection__2IP.capacity__N1V -  1))) {
-      Self__DZAB->parent_arrayed_collection__2IP.upper__GJP=(__INTEGER)(Self__DZAB->parent_arrayed_collection__2IP.upper__GJP +  1);
-      __tmp__TZAB=TRUE__;
+    ((__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__;
     } else {
-      __tmp__TZAB=FALSE__;
+      __tmp__XZAB=FALSE__;
     };
-    if ((! __tmp__TZAB)) {
-      if ((Self__DZAB->parent_arrayed_collection__2IP.capacity__N1V ==  0)) {
-        Self__DZAB->parent_arrayed_collection__2IP.storage__Y1V=create__FLXB( 2);
-        Self__DZAB->parent_arrayed_collection__2IP.capacity__N1V= 2;
-        Self__DZAB->parent_arrayed_collection__2IP.upper__GJP= 0;
+    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;
       } else {
-        new_capacity__FZAB=(__INTEGER)(Self__DZAB->parent_arrayed_collection__2IP.capacity__N1V <<  1);
-        __tmp__I0AB=Self__DZAB->parent_arrayed_collection__2IP.storage__Y1V;
-        __tmp__J0AB=Self__DZAB->parent_arrayed_collection__2IP.capacity__N1V;
-        new__MMFC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__I0AB)),((__UINTEGER_32 )(__INTEGER)(__tmp__J0AB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FZAB * ((__INTEGER )(sizeof(void *)))))));
-        __tmp__ANFC=(__INTEGER)(new_capacity__FZAB -  1);
-        Self__0WVD=__tmp__J0AB;
-        while ((Self__0WVD <= __tmp__ANFC)) {
-          new__MMFC[Self__0WVD]=NULL;
-          Self__0WVD=(__INTEGER)(Self__0WVD +  1);
+        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);
         };
-        Self__DZAB->parent_arrayed_collection__2IP.storage__Y1V=new__MMFC;
-        Self__DZAB->parent_arrayed_collection__2IP.capacity__N1V=new_capacity__FZAB;
-        Self__DZAB->parent_arrayed_collection__2IP.upper__GJP=(__INTEGER)(Self__DZAB->parent_arrayed_collection__2IP.upper__GJP +  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);
       };
     };
-    ((void **)Self__DZAB->parent_arrayed_collection__2IP.storage__Y1V)[Self__DZAB->parent_arrayed_collection__2IP.upper__GJP]=result__H2HB;
+    ((void **)Self__HZAB->parent_arrayed_collection__AJP.storage__21V)[Self__HZAB->parent_arrayed_collection__AJP.upper__KJP]=result__L2HB;
   };
-  return(result__WIP);
+  return(result__0IP);
 }
 
-static void* read_type__TBM(__PARSER *Self__UBM,__BOOLEAN is_local__VBM)
+static void* read_type__XBM(__PARSER *Self__YBM,__BOOLEAN is_local__ZBM)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  void *style__XBM;
-  void *result__YBM;
-  void *typ_arg__0BM,*typ_res__1BM,*typ_arg__FLN,*typ_res__GLN;
-  __POSITION pos__0ZOG,pos__2ZOG,pos__4ZOG,__tmp__4EM,pos__C0OG;
-  __POSITION pos__B2OG,pos__D2OG;
-  __ITM_TYPE_STYLE *Self__G41G;
-  void *result__ILN;
-  __INTEGER idx__JLN,typ_id__10GB,new_capacity__JMAB,__tmp__NNAB;
-  __INTEGER __tmp__SKFC,Self__1UVD;
-  __ITM_TYPE_BLOCK *result__V0GB,*Self__RYCC;
-  __POINTER ptr__W0GB,ptr_table__P44G,next__O44G,result__Q44G;
-  __POINTER ptr_table__U44G,next__T44G,result__V44G;
-  __UINTEGER_32 sz__Y0GB,a__P41G,new_size__Q41G,t__U41G,a__T41G;
-  __UINTEGER_32 new_size__X44G,lab_type__W44G;
-  void *lst__ZBM;
-  __BOOLEAN result__234G,result__534G,result__C44G,result__F44G;
-  __BOOLEAN result__I44G,result__L44G,__tmp__XMAB,result__Z44G;
-  __BOOLEAN __tmp__3GM,result__144G;
-  __CHARACTER result__334G,result__A44G,result__D44G,result__G44G;
-  __CHARACTER result__J44G,result__M44G;
-  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__HMAB;
-  void **__tmp__MNAB,**new__4JFC;
-  style__XBM=NULL;
-  result__YBM=NULL;
-  lst__ZBM=NULL;
-  typ_arg__0BM=NULL;
-  typ_res__1BM=NULL;
-  result__234G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__234G=FALSE__;
+  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__;
   } else {
-    result__334G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__334G=((__CHARACTER )(( 0)));
+    result__2BBH='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__2BBH=((__CHARACTER )(( 0)));
     } else {
-      result__334G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__2BBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__334G == '{')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__234G=TRUE__;
+    if ((result__2BBH == '{')) {
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      result__1BBH=TRUE__;
     };
   };
-  if (result__234G) {
-    result__534G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__534G=FALSE__;
+  if (result__1BBH) {
+    result__4BBH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__4BBH=FALSE__;
     } else {
-      result__A44G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__A44G=((__CHARACTER )(( 0)));
+      result__5BBH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__5BBH=((__CHARACTER )(( 0)));
       } else {
-        result__A44G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__5BBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__A44G == '(')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__534G=TRUE__;
+      if ((result__5BBH == '(')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__4BBH=TRUE__;
       };
     };
-    if (result__534G) {
-      lst__ZBM=read_type_list__YLO(Self__UBM,FALSE__);
-      if (((void *)lst__ZBM == (void *)NULL)) {
-        pos__0ZOG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_247));
-        put_position__EOG(pos__0ZOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+    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)) {
           exit(( 1));
         };
       };
-      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__ZBM)->parent_arrayed_collection__JXC.upper__0HV +  1) ==  1)) {
-        typ_arg__0BM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__ZBM)->parent_arrayed_collection__JXC.storage__BMV)[ 0];
+      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];
       } else {
-        typ_arg__0BM=get__SIP(lst__ZBM);
+        typ_arg__4BM=get__WIP(lst__3BM);
       };
-      result__C44G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__C44G=FALSE__;
+      result__BCBH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__BCBH=FALSE__;
       } else {
-        result__D44G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__D44G=((__CHARACTER )(( 0)));
+        result__CCBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__CCBH=((__CHARACTER )(( 0)));
         } else {
-          result__D44G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__CCBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__D44G == ')')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__C44G=TRUE__;
+        if ((result__CCBH == ')')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__BCBH=TRUE__;
         };
       };
-      if ((! result__C44G)) {
-        pos__2ZOG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_244));
-        put_position__EOG(pos__2ZOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      result__F44G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__F44G=FALSE__;
+      result__ECBH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__ECBH=FALSE__;
       } else {
-        result__G44G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__G44G=((__CHARACTER )(( 0)));
+        result__FCBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__FCBH=((__CHARACTER )(( 0)));
         } else {
-          result__G44G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__FCBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__G44G == ';')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__F44G=TRUE__;
+        if ((result__FCBH == ';')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__ECBH=TRUE__;
         };
       };
-      if ((! result__F44G)) {
-        pos__4ZOG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_227));
-        put_position__EOG(pos__4ZOG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      lst__ZBM=read_type_list__YLO(Self__UBM,FALSE__);
+      lst__3BM=read_type_list__2LO(Self__YBM,FALSE__);
     } else {
-      lst__ZBM=read_type_list__YLO(Self__UBM,FALSE__);
-      if (((void *)lst__ZBM != (void *)NULL)) {
-        result__I44G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__I44G=FALSE__;
+      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__;
         } else {
-          result__J44G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__J44G=((__CHARACTER )(( 0)));
+          result__ICBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__ICBH=((__CHARACTER )(( 0)));
           } else {
-            result__J44G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__ICBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__J44G == ';')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__I44G=TRUE__;
+          if ((result__ICBH == ';')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__HCBH=TRUE__;
           };
         };
-        if (result__I44G) {
-          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__ZBM)->parent_arrayed_collection__JXC.upper__0HV +  1) ==  1)) {
-            typ_arg__0BM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__ZBM)->parent_arrayed_collection__JXC.storage__BMV)[ 0];
+        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];
           } else {
-            typ_arg__0BM=get__SIP(lst__ZBM);
-            copy__JCS(string_tmp__VH,(&__string_274));
-            switch (((struct ___OBJ *)typ_arg__0BM)->__id) {
+            typ_arg__4BM=get__WIP(lst__3BM);
+            copy__NCS(string_tmp__VH,(&__string_278));
+            switch (((struct ___OBJ *)typ_arg__4BM)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__RNS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__0BM)->parent_itm_type__NDE.name__0XP);
+              append__VNS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__4BM)->parent_itm_type__RDE.name__4XP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__RNS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__0BM)->name__0XP);
+              append__VNS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__4BM)->name__4XP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__CIBC(typ_arg__0BM,string_tmp__VH);
+              append_in__GIBC(typ_arg__4BM,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__4FPD(typ_arg__0BM,string_tmp__VH);
+              append_in__CGPD(typ_arg__4BM,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__CHPD(typ_arg__0BM,string_tmp__VH);
+              append_in__GHPD(typ_arg__4BM,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              Self__G41G=((__ITM_TYPE_STYLE *)typ_arg__0BM);
-              if (((void *)Self__G41G->style__DYP != (void *)NULL)) {
-                append__RNS(string_tmp__VH,Self__G41G->style__DYP);
-                add_last__JLT(string_tmp__VH,' ');
+              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,' ');
               };
-              append__RNS(string_tmp__VH,Self__G41G->parent_itm_type_simple__RRN.name__0XP);
+              append__VNS(string_tmp__VH,Self__D53G->parent_itm_type_simple__VRN.name__4XP);
             } break;
             };
-            append__RNS(string_tmp__VH,(&__string_275));
-            __tmp__4EM=current_position__ZWF();
-            put_error__text__0MG( 2,string_tmp__VH);
-            put_position__EOG(__tmp__4EM);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+            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)) {
               exit(( 1));
             };
           };
-          lst__ZBM=read_type_list__YLO(Self__UBM,FALSE__);
+          lst__3BM=read_type_list__2LO(Self__YBM,FALSE__);
         };
       };
     };
-    if (((void *)lst__ZBM != (void *)NULL)) {
-      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__ZBM)->parent_arrayed_collection__JXC.upper__0HV +  1) ==  1)) {
-        typ_res__1BM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__ZBM)->parent_arrayed_collection__JXC.storage__BMV)[ 0];
+    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];
       } else {
-        typ_res__1BM=get__SIP(lst__ZBM);
+        typ_res__5BM=get__WIP(lst__3BM);
       };
     };
-    result__L44G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__L44G=FALSE__;
+    result__KCBH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__KCBH=FALSE__;
     } else {
-      result__M44G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__M44G=((__CHARACTER )(( 0)));
+      result__LCBH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__LCBH=((__CHARACTER )(( 0)));
       } else {
-        result__M44G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__LCBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__M44G == '}')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__L44G=TRUE__;
+      if ((result__LCBH == '}')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__KCBH=TRUE__;
       };
     };
-    if ((! result__L44G)) {
-      pos__C0OG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_276));
-      put_position__EOG(pos__C0OG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
-    typ_arg__FLN=typ_arg__0BM;
-    typ_res__GLN=typ_res__1BM;
-    result__ILN=NULL;
-    idx__JLN= 0;
-    while (((idx__JLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PLN)->parent_arrayed_collection__OLN.upper__YLN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PLN)->parent_arrayed_collection__OLN.storage__BKV)[idx__JLN])->type_argument__GMN != (void *)typ_arg__FLN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PLN)->parent_arrayed_collection__OLN.storage__BKV)[idx__JLN])->type_result__QMN != (void *)typ_res__GLN)))) {
-      idx__JLN=(__INTEGER)(idx__JLN +  1);
-    };
-    if ((idx__JLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PLN)->parent_arrayed_collection__OLN.upper__YLN)) {
-      result__ILN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PLN)->parent_arrayed_collection__OLN.storage__BKV)[idx__JLN];
-    } else {
-      result__V0GB=NULL;
-      ptr__W0GB=((__POINTER )(NULL));
-      typ_id__10GB= 0;
-      sz__Y0GB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
-      if ((sz__Y0GB ==  0)) {
-        result__V0GB=ITM_TYPE_BLOCK__;
-      } else {
-        typ_id__10GB=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__Y0GB);
-        if ((typ_id__10GB == (__INTEGER)(-  1))) {
-          a__P41G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__Q41G=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0GB + a__P41G) & (__UINTEGER_32)(~ a__P41G));
-          ptr_table__P44G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q41G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__O44G=((__POINTER )(NULL));
-          result__Q44G=((__POINTER *)ptr_table__P44G)[ 0];
-          if ((result__Q44G == (void *)NULL)) {
-            result__Q44G=new_lab__2QJ(new_size__Q41G);
-            next__O44G=(void *)((unsigned long)result__Q44G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q41G)));
-            ((__POINTER *)next__O44G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__P44G)[ 0]=next__O44G;
-          } else {
-            next__O44G=((__POINTER *)result__Q44G)[ 0];
-            if ((next__O44G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q44G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Q41G <<  1)) <=  4096)) {
-                next__O44G=(void *)((unsigned long)result__Q44G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q41G)));
+    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)));
               } else {
-                next__O44G=new_lab__2QJ(new_size__Q41G);
+                next__NCBH=new_lab__ARJ(new_size__N53G);
               };
-              ((__POINTER *)next__O44G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__P44G)[ 0]=next__O44G;
+              ((__POINTER *)next__NCBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OCBH)[ 0]=next__NCBH;
             } else {
-              ((__POINTER *)result__Q44G)[ 0]=(void *)((unsigned long)((__POINTER *)next__O44G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__Q44G=next__O44G;
-            };
-          };
-          ptr__W0GB=result__Q44G;
-        } else {
-          t__U41G=((__UINTEGER_32 )typ_id__10GB);
-          a__T41G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__X44G=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0GB + a__T41G) & (__UINTEGER_32)(~ a__T41G));
-          ptr_table__U44G=((__POINTER )(&(table_type[(t__U41G)])));
-          lab_type__W44G=(__UINTEGER_32)(t__U41G |  1);
-          next__T44G=((__POINTER )(NULL));
-          result__V44G=((__POINTER *)ptr_table__U44G)[ 0];
-          if ((result__V44G == (void *)NULL)) {
-            result__V44G=new_lab__2QJ(lab_type__W44G);
-            next__T44G=(void *)((unsigned long)result__V44G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X44G)));
-            ((__POINTER *)next__T44G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__U44G)[ 0]=next__T44G;
-          } else {
-            next__T44G=((__POINTER *)result__V44G)[ 0];
-            if ((next__T44G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V44G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__X44G <<  1)) <=  4096)) {
-                next__T44G=(void *)((unsigned long)result__V44G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X44G)));
+              ((__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)));
               } else {
-                next__T44G=new_lab__2QJ(lab_type__W44G);
+                next__SCBH=new_lab__ARJ(lab_type__VCBH);
               };
-              ((__POINTER *)next__T44G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__U44G)[ 0]=next__T44G;
+              ((__POINTER *)next__SCBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TCBH)[ 0]=next__SCBH;
             } else {
-              ((__POINTER *)result__V44G)[ 0]=(void *)((unsigned long)((__POINTER *)next__T44G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__V44G=next__T44G;
+              ((__POINTER *)result__UCBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SCBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__UCBH=next__SCBH;
             };
           };
-          ptr__W0GB=result__V44G;
+          ptr__00GB=result__UCBH;
         };
-        result__V0GB=((__ITM_TYPE_BLOCK *)ptr__W0GB);
-        *(result__V0GB) = *(ITM_TYPE_BLOCK__);
+        result__Z0GB=((__ITM_TYPE_BLOCK *)ptr__00GB);
+        *(result__Z0GB) = *(ITM_TYPE_BLOCK__);
       };
-      Self__RYCC=((__ITM_TYPE_BLOCK *)result__V0GB);
-      Self__RYCC->type_argument__GMN=typ_arg__0BM;
-      Self__RYCC->type_result__QMN=typ_res__1BM;
-      result__ILN=result__V0GB;
-      Self__HMAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__PLN);
-      new_capacity__JMAB= 0;
-      if (((__INTEGER)(Self__HMAB->parent_arrayed_collection__OLN.upper__YLN +  1) <= (__INTEGER)(Self__HMAB->parent_arrayed_collection__OLN.capacity__WJV -  1))) {
-        Self__HMAB->parent_arrayed_collection__OLN.upper__YLN=(__INTEGER)(Self__HMAB->parent_arrayed_collection__OLN.upper__YLN +  1);
-        __tmp__XMAB=TRUE__;
+      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__;
       } else {
-        __tmp__XMAB=FALSE__;
+        __tmp__1MAB=FALSE__;
       };
-      if ((! __tmp__XMAB)) {
-        if ((Self__HMAB->parent_arrayed_collection__OLN.capacity__WJV ==  0)) {
-          Self__HMAB->parent_arrayed_collection__OLN.storage__BKV=create__AUWB( 2);
-          Self__HMAB->parent_arrayed_collection__OLN.capacity__WJV= 2;
-          Self__HMAB->parent_arrayed_collection__OLN.upper__YLN= 0;
+      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;
         } else {
-          new_capacity__JMAB=(__INTEGER)(Self__HMAB->parent_arrayed_collection__OLN.capacity__WJV <<  1);
-          __tmp__MNAB=Self__HMAB->parent_arrayed_collection__OLN.storage__BKV;
-          __tmp__NNAB=Self__HMAB->parent_arrayed_collection__OLN.capacity__WJV;
-          new__4JFC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__MNAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__NNAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__JMAB * ((__INTEGER )(sizeof(void *)))))));
-          __tmp__SKFC=(__INTEGER)(new_capacity__JMAB -  1);
-          Self__1UVD=__tmp__NNAB;
-          while ((Self__1UVD <= __tmp__SKFC)) {
-            new__4JFC[Self__1UVD]=NULL;
-            Self__1UVD=(__INTEGER)(Self__1UVD +  1);
+          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);
           };
-          Self__HMAB->parent_arrayed_collection__OLN.storage__BKV=new__4JFC;
-          Self__HMAB->parent_arrayed_collection__OLN.capacity__WJV=new_capacity__JMAB;
-          Self__HMAB->parent_arrayed_collection__OLN.upper__YLN=(__INTEGER)(Self__HMAB->parent_arrayed_collection__OLN.upper__YLN +  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);
         };
       };
-      ((void **)Self__HMAB->parent_arrayed_collection__OLN.storage__BKV)[Self__HMAB->parent_arrayed_collection__OLN.upper__YLN]=result__V0GB;
+      ((void **)Self__LMAB->parent_arrayed_collection__SLN.storage__FKV)[Self__LMAB->parent_arrayed_collection__SLN.upper__2LN]=result__Z0GB;
     };
-    result__YBM=result__ILN;
+    result__2BM=result__MLN;
   } else {
-    result__Z44G=read_word__APF((&__string_9));
-    if (is_shorter__TY) {
-      if (result__Z44G) {
+    result__YCBH=read_word__EPF((&__string_9));
+    if (is_shorter__WY) {
+      if (result__YCBH) {
         if (((void *)(&__string_9) == (void *)(&__string_4))) {
-          short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         } else {
-          short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         };
       };
     };
-    if (result__Z44G) {
-      __tmp__3GM=TRUE__;
+    if (result__YCBH) {
+      __tmp__BHM=TRUE__;
     } else {
-      result__144G=read_word__APF((&__string_10));
-      if (is_shorter__TY) {
-        if (result__144G) {
+      result__0CBH=read_word__EPF((&__string_10));
+      if (is_shorter__WY) {
+        if (result__0CBH) {
           if (((void *)(&__string_10) == (void *)(&__string_4))) {
-            short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+            short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
           } else {
-            short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+            short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
           };
         };
       };
-      __tmp__3GM=result__144G;
+      __tmp__BHM=result__0CBH;
     };
-    if (__tmp__3GM) {
-      style__XBM=last_string__YZC;
-      if ((is_local__VBM && ((void *)last_string__YZC == (void *)(&__string_9)))) {
-        pos__B2OG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_277));
-        put_position__EOG(pos__B2OG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+    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)) {
           exit(( 1));
         };
       };
     };
-    result__YBM=read_prototype__XNN(Self__UBM,style__XBM);
-    if (((void *)read_contract__XSF(Self__UBM) != (void *)NULL)) {
-      pos__D2OG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_242));
-      put_position__EOG(pos__D2OG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
   };
-  return(result__YBM);
+  return(result__2BM);
 }
 
-static void set_result_type__A3FC(__ITM_SLOT *Self__B3FC,void *t__C3FC)
+static void set_result_type__E3FC(__ITM_SLOT *Self__F3FC,void *t__G3FC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  void *tm__D3FC,*__tmp__M3FC;
-  __SECTION_ *Self__DRSG;
-  __POSITION pos__TYID;
-  tm__D3FC=NULL;
-  Self__DRSG=((__SECTION_ *)Self__B3FC->id_section__I1C);
-  if ((((void *)Self__DRSG->name__SYDC == (void *)(&__string_23)) || ((void *)Self__DRSG->name__SYDC == (void *)(&__string_24)))) {
-    if (t__C3FC==NULL) {
-      __tmp__M3FC=NULL;
-    } else {
-      switch (((struct ___OBJ *)t__C3FC)->__id) {
+  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) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__M3FC=((void *)t__C3FC);
+        __tmp__Q3FC=((void *)t__G3FC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__M3FC=((void *)t__C3FC);
+        __tmp__Q3FC=((void *)t__G3FC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__M3FC=NULL;
+        __tmp__Q3FC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__M3FC=((void *)t__C3FC);
+        __tmp__Q3FC=((void *)t__G3FC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__M3FC=((void *)t__C3FC);
+        __tmp__Q3FC=((void *)t__G3FC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__M3FC=((void *)t__C3FC);
+        __tmp__Q3FC=((void *)t__G3FC);
       } break;
       }
     };
-    tm__D3FC=__tmp__M3FC;
-    if (((((void *)__tmp__M3FC == (void *)NULL) || ((void *)__tmp__M3FC == (void *)type_self__XTN)) || ((void *)__tmp__M3FC == (void *)type_void__OVF))) {
-      pos__TYID=Self__B3FC->parent_named__D5.parent_itm_object__4.position__3CJ;
-      put_error__text__0MG( 1,(&__string_224));
-      put_position__EOG(pos__TYID);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
   };
-  Self__B3FC->result_type__K4FC=t__C3FC;
+  Self__F3FC->result_type__O4FC=t__G3FC;
 }
 
-static void* read_contract__XSF(__PARSER *Self__YSF)
+static void* read_contract__1SF(__PARSER *Self__2SF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *e__1SF;
-  void *result__2SF;
-  __POSITION p__H54G,p__XWL,pos__L2OG,pos__N2OG,p__KA5G;
-  __ITM_LIST *result__544G;
-  __POINTER ptr__A54G,ptr_table__J54G,next__I54G,result__K54G;
-  __POINTER ptr_table__O54G,next__N54G,result__P54G,ptr__B3L;
-  __POINTER ptr_table__T54G,next__S54G,result__U54G,ptr_table__Y54G;
-  __POINTER next__X54G,result__Z54G,ptr__DA5G,ptr_table__MA5G;
-  __POINTER next__LA5G,result__NA5G,ptr_table__RA5G,next__QA5G;
-  __POINTER result__SA5G;
-  __INTEGER typ_id__B54G,typ_id__G3L,typ_id__EA5G;
-  __UINTEGER_32 sz__C54G,a__D54G,new_size__E54G,t__F54G,a__G54G;
-  __UINTEGER_32 new_size__R54G,lab_type__Q54G,sz__D3L,a__341G;
-  __UINTEGER_32 new_size__441G,t__C51G,a__B51G,new_size__154G;
-  __UINTEGER_32 lab_type__054G,sz__FA5G,a__GA5G,new_size__HA5G,t__IA5G;
-  __UINTEGER_32 a__JA5G,new_size__UA5G,lab_type__TA5G;
-  __ITM_LDOTS *result__A3L;
-  __ITM_PROTOTYPE *result__CA5G;
-  __BOOLEAN continue__0SF,result__244G,result__254G,result__554G;
-  void *lst__CTF,*result__CX3G;
-  __CHARACTER result__344G,result__354G,result__AA5G;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__DX3G,*Self__EX3G;
-  continue__0SF=FALSE__;
-  e__1SF=NULL;
-  result__2SF=NULL;
-  lst__CTF=NULL;
-  result__244G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__244G=FALSE__;
+  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__;
   } else {
-    result__344G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__344G=((__CHARACTER )(( 0)));
-    } else {
-      result__344G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-    };
-    if ((result__344G == '[')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__244G=TRUE__;
-    };
-  };
-  if (result__244G) {
-    p__H54G=current_position__ZWF();
-    result__544G=NULL;
-    ptr__A54G=((__POINTER )(NULL));
-    typ_id__B54G= 0;
-    sz__C54G=((__UINTEGER_32 )sizeof(__ITM_LIST));
-    if ((sz__C54G ==  0)) {
-      result__544G=ITM_LIST__;
-    } else {
-      typ_id__B54G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__C54G);
-      if ((typ_id__B54G == (__INTEGER)(-  1))) {
-        a__D54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__E54G=(__UINTEGER_32)((__UINTEGER_32)(sz__C54G + a__D54G) & (__UINTEGER_32)(~ a__D54G));
-        ptr_table__J54G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E54G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__I54G=((__POINTER )(NULL));
-        result__K54G=((__POINTER *)ptr_table__J54G)[ 0];
-        if ((result__K54G == (void *)NULL)) {
-          result__K54G=new_lab__2QJ(new_size__E54G);
-          next__I54G=(void *)((unsigned long)result__K54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E54G)));
-          ((__POINTER *)next__I54G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__J54G)[ 0]=next__I54G;
-        } else {
-          next__I54G=((__POINTER *)result__K54G)[ 0];
-          if ((next__I54G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K54G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__E54G <<  1)) <=  4096)) {
-              next__I54G=(void *)((unsigned long)result__K54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E54G)));
+    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)));
             } else {
-              next__I54G=new_lab__2QJ(new_size__E54G);
-            };
-            ((__POINTER *)next__I54G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__J54G)[ 0]=next__I54G;
-          } else {
-            ((__POINTER *)result__K54G)[ 0]=(void *)((unsigned long)((__POINTER *)next__I54G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__K54G=next__I54G;
-          };
-        };
-        ptr__A54G=result__K54G;
-      } else {
-        t__F54G=((__UINTEGER_32 )typ_id__B54G);
-        a__G54G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__R54G=(__UINTEGER_32)((__UINTEGER_32)(sz__C54G + a__G54G) & (__UINTEGER_32)(~ a__G54G));
-        ptr_table__O54G=((__POINTER )(&(table_type[(t__F54G)])));
-        lab_type__Q54G=(__UINTEGER_32)(t__F54G |  1);
-        next__N54G=((__POINTER )(NULL));
-        result__P54G=((__POINTER *)ptr_table__O54G)[ 0];
-        if ((result__P54G == (void *)NULL)) {
-          result__P54G=new_lab__2QJ(lab_type__Q54G);
-          next__N54G=(void *)((unsigned long)result__P54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R54G)));
-          ((__POINTER *)next__N54G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__O54G)[ 0]=next__N54G;
-        } else {
-          next__N54G=((__POINTER *)result__P54G)[ 0];
-          if ((next__N54G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P54G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__R54G <<  1)) <=  4096)) {
-              next__N54G=(void *)((unsigned long)result__P54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R54G)));
+              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)));
             } else {
-              next__N54G=new_lab__2QJ(lab_type__Q54G);
+              next__MDBH=new_lab__ARJ(lab_type__PDBH);
             };
-            ((__POINTER *)next__N54G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__O54G)[ 0]=next__N54G;
+            ((__POINTER *)next__MDBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NDBH)[ 0]=next__MDBH;
           } else {
-            ((__POINTER *)result__P54G)[ 0]=(void *)((unsigned long)((__POINTER *)next__N54G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__P54G=next__N54G;
+            ((__POINTER *)result__ODBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ODBH=next__MDBH;
           };
         };
-        ptr__A54G=result__P54G;
+        ptr__5CBH=result__ODBH;
       };
-      result__544G=((__ITM_LIST *)ptr__A54G);
-      *(result__544G) = *(ITM_LIST__);
+      result__4CBH=((__ITM_LIST *)ptr__5CBH);
+      *(result__4CBH) = *(ITM_LIST__);
     };
-    ((__ITM_LIST *)result__544G)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ=p__H54G;
-    last_group__LTF=result__544G;
-    result__2SF=result__544G;
-    read_def_local__N0H(Self__YSF);
-    result__CX3G=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H)->parent_arrayed_collection__Q3H.upper__YVT <  0)) {
-      result__CX3G=create_with_capacity__CVI( 16);
+    ((__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);
     } else {
-      Self__DX3G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-      result__CX3G=((void **)Self__DX3G->parent_arrayed_collection__Q3H.storage__GAU)[Self__DX3G->parent_arrayed_collection__Q3H.upper__YVT];
-      Self__EX3G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-      Self__EX3G->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(Self__EX3G->parent_arrayed_collection__Q3H.upper__YVT -  1);
+      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);
     };
-    lst__CTF=result__CX3G;
+    lst__GTF=result__C05G;
     do {
-      e__1SF=read_expr__O4I(Self__YSF);
-      if (((void *)e__1SF == (void *)NULL)) {
-        continue__0SF=read_word__APF((&__string_7));
-        if (continue__0SF) {
-          p__XWL=current_position__ZWF();
-          result__A3L=NULL;
-          ptr__B3L=((__POINTER )(NULL));
-          typ_id__G3L= 0;
-          sz__D3L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
-          if ((sz__D3L ==  0)) {
-            result__A3L=ITM_LDOTS__;
-          } else {
-            typ_id__G3L=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__D3L);
-            if ((typ_id__G3L == (__INTEGER)(-  1))) {
-              a__341G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__441G=(__UINTEGER_32)((__UINTEGER_32)(sz__D3L + a__341G) & (__UINTEGER_32)(~ a__341G));
-              ptr_table__T54G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__441G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__S54G=((__POINTER )(NULL));
-              result__U54G=((__POINTER *)ptr_table__T54G)[ 0];
-              if ((result__U54G == (void *)NULL)) {
-                result__U54G=new_lab__2QJ(new_size__441G);
-                next__S54G=(void *)((unsigned long)result__U54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__441G)));
-                ((__POINTER *)next__S54G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__T54G)[ 0]=next__S54G;
+      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;
               } else {
-                next__S54G=((__POINTER *)result__U54G)[ 0];
-                if ((next__S54G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U54G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__441G <<  1)) <=  4096)) {
-                    next__S54G=(void *)((unsigned long)result__U54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__441G)));
+                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)));
                   } else {
-                    next__S54G=new_lab__2QJ(new_size__441G);
+                    next__RDBH=new_lab__ARJ(new_size__153G);
                   };
-                  ((__POINTER *)next__S54G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__T54G)[ 0]=next__S54G;
+                  ((__POINTER *)next__RDBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SDBH)[ 0]=next__RDBH;
                 } else {
-                  ((__POINTER *)result__U54G)[ 0]=(void *)((unsigned long)((__POINTER *)next__S54G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__U54G=next__S54G;
+                  ((__POINTER *)result__TDBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__TDBH=next__RDBH;
                 };
               };
-              ptr__B3L=result__U54G;
+              ptr__F3L=result__TDBH;
             } else {
-              t__C51G=((__UINTEGER_32 )typ_id__G3L);
-              a__B51G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__154G=(__UINTEGER_32)((__UINTEGER_32)(sz__D3L + a__B51G) & (__UINTEGER_32)(~ a__B51G));
-              ptr_table__Y54G=((__POINTER )(&(table_type[(t__C51G)])));
-              lab_type__054G=(__UINTEGER_32)(t__C51G |  1);
-              next__X54G=((__POINTER )(NULL));
-              result__Z54G=((__POINTER *)ptr_table__Y54G)[ 0];
-              if ((result__Z54G == (void *)NULL)) {
-                result__Z54G=new_lab__2QJ(lab_type__054G);
-                next__X54G=(void *)((unsigned long)result__Z54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__154G)));
-                ((__POINTER *)next__X54G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__Y54G)[ 0]=next__X54G;
+              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;
               } else {
-                next__X54G=((__POINTER *)result__Z54G)[ 0];
-                if ((next__X54G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z54G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__154G <<  1)) <=  4096)) {
-                    next__X54G=(void *)((unsigned long)result__Z54G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__154G)));
+                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)));
                   } else {
-                    next__X54G=new_lab__2QJ(lab_type__054G);
+                    next__WDBH=new_lab__ARJ(lab_type__ZDBH);
                   };
-                  ((__POINTER *)next__X54G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__Y54G)[ 0]=next__X54G;
+                  ((__POINTER *)next__WDBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XDBH)[ 0]=next__WDBH;
                 } else {
-                  ((__POINTER *)result__Z54G)[ 0]=(void *)((unsigned long)((__POINTER *)next__X54G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__Z54G=next__X54G;
+                  ((__POINTER *)result__YDBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WDBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__YDBH=next__WDBH;
                 };
               };
-              ptr__B3L=result__Z54G;
+              ptr__F3L=result__YDBH;
             };
-            result__A3L=((__ITM_LDOTS *)ptr__B3L);
-            *(result__A3L) = *(ITM_LDOTS__);
+            result__E3L=((__ITM_LDOTS *)ptr__F3L);
+            *(result__E3L) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__A3L)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ=p__XWL;
-          add_last__E5U(lst__CTF,result__A3L);
+          ((__ITM_LDOTS *)result__E3L)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ=p__1WL;
+          add_last__I5U(lst__GTF,result__E3L);
         };
       } else {
-        add_last__E5U(lst__CTF,e__1SF);
-        result__254G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__254G=FALSE__;
+        add_last__I5U(lst__GTF,e__5SF);
+        result__1DBH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__1DBH=FALSE__;
         } else {
-          result__354G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__354G=((__CHARACTER )(( 0)));
+          result__2DBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__2DBH=((__CHARACTER )(( 0)));
           } else {
-            result__354G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__2DBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__354G == ';')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__254G=TRUE__;
+          if ((result__2DBH == ';')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__1DBH=TRUE__;
           };
         };
-        if ((! result__254G)) {
-          pos__L2OG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_227));
-          put_position__EOG(pos__L2OG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        continue__0SF=TRUE__;
+        continue__4SF=TRUE__;
       };
-    } while (continue__0SF);
-    result__554G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__554G=FALSE__;
+    } while (continue__4SF);
+    result__4DBH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__4DBH=FALSE__;
     } else {
-      result__AA5G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__AA5G=((__CHARACTER )(( 0)));
+      result__5DBH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__5DBH=((__CHARACTER )(( 0)));
       } else {
-        result__AA5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__5DBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__AA5G == ']')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__554G=TRUE__;
+      if ((result__5DBH == ']')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__4DBH=TRUE__;
       };
     };
-    if ((! result__554G)) {
-      pos__N2OG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_278));
-      put_position__EOG(pos__N2OG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
-    p__KA5G=current_position__ZWF();
-    result__CA5G=NULL;
-    ptr__DA5G=((__POINTER )(NULL));
-    typ_id__EA5G= 0;
-    sz__FA5G=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-    if ((sz__FA5G ==  0)) {
-      result__CA5G=ITM_PROTOTYPE__;
-    } else {
-      typ_id__EA5G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__FA5G);
-      if ((typ_id__EA5G == (__INTEGER)(-  1))) {
-        a__GA5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__HA5G=(__UINTEGER_32)((__UINTEGER_32)(sz__FA5G + a__GA5G) & (__UINTEGER_32)(~ a__GA5G));
-        ptr_table__MA5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HA5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__LA5G=((__POINTER )(NULL));
-        result__NA5G=((__POINTER *)ptr_table__MA5G)[ 0];
-        if ((result__NA5G == (void *)NULL)) {
-          result__NA5G=new_lab__2QJ(new_size__HA5G);
-          next__LA5G=(void *)((unsigned long)result__NA5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HA5G)));
-          ((__POINTER *)next__LA5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MA5G)[ 0]=next__LA5G;
-        } else {
-          next__LA5G=((__POINTER *)result__NA5G)[ 0];
-          if ((next__LA5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NA5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__HA5G <<  1)) <=  4096)) {
-              next__LA5G=(void *)((unsigned long)result__NA5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HA5G)));
+    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)));
             } else {
-              next__LA5G=new_lab__2QJ(new_size__HA5G);
-            };
-            ((__POINTER *)next__LA5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MA5G)[ 0]=next__LA5G;
-          } else {
-            ((__POINTER *)result__NA5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LA5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NA5G=next__LA5G;
-          };
-        };
-        ptr__DA5G=result__NA5G;
-      } else {
-        t__IA5G=((__UINTEGER_32 )typ_id__EA5G);
-        a__JA5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__UA5G=(__UINTEGER_32)((__UINTEGER_32)(sz__FA5G + a__JA5G) & (__UINTEGER_32)(~ a__JA5G));
-        ptr_table__RA5G=((__POINTER )(&(table_type[(t__IA5G)])));
-        lab_type__TA5G=(__UINTEGER_32)(t__IA5G |  1);
-        next__QA5G=((__POINTER )(NULL));
-        result__SA5G=((__POINTER *)ptr_table__RA5G)[ 0];
-        if ((result__SA5G == (void *)NULL)) {
-          result__SA5G=new_lab__2QJ(lab_type__TA5G);
-          next__QA5G=(void *)((unsigned long)result__SA5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UA5G)));
-          ((__POINTER *)next__QA5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RA5G)[ 0]=next__QA5G;
-        } else {
-          next__QA5G=((__POINTER *)result__SA5G)[ 0];
-          if ((next__QA5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SA5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__UA5G <<  1)) <=  4096)) {
-              next__QA5G=(void *)((unsigned long)result__SA5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UA5G)));
+              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)));
             } else {
-              next__QA5G=new_lab__2QJ(lab_type__TA5G);
+              next__PEBH=new_lab__ARJ(lab_type__SEBH);
             };
-            ((__POINTER *)next__QA5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RA5G)[ 0]=next__QA5G;
+            ((__POINTER *)next__PEBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QEBH)[ 0]=next__PEBH;
           } else {
-            ((__POINTER *)result__SA5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QA5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SA5G=next__QA5G;
+            ((__POINTER *)result__REBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PEBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__REBH=next__PEBH;
           };
         };
-        ptr__DA5G=result__SA5G;
+        ptr__CEBH=result__REBH;
       };
-      result__CA5G=((__ITM_PROTOTYPE *)ptr__DA5G);
-      *(result__CA5G) = *(ITM_PROTOTYPE__);
+      result__BEBH=((__ITM_PROTOTYPE *)ptr__CEBH);
+      *(result__BEBH) = *(ITM_PROTOTYPE__);
     };
-    ((__ITM_PROTOTYPE *)result__CA5G)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=p__KA5G;
-    e__1SF=result__CA5G;
-    add_last__E5U(result__CX3G,result__CA5G);
-    copy__A5H(result__CX3G);
+    ((__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);
   };
-  return(result__2SF);
+  return(result__ATF);
 }
 
-static void* read_expr__O4I(__PARSER *Self__P4I)
+static void* read_expr__S4I(__PARSER *Self__T4I)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *result__R4I,*value__S4I,*result__REL,*expr__SEL,*__tmp__YHL;
-  void *__tmp__5IL,*__tmp__FKL;
-  __INTEGER p__Z4I,typ_id__K40C,typ_id__KB5G,typ_id__3B5G,typ_id__QC5G;
-  __INTEGER typ_id__NMJD,typ_id__L0JD,typ_id__AOJD,last_msg__WEL;
-  __INTEGER first_msg__XEL,typ_id__BE5G,typ_id__JSP,typ_id__AF5G;
-  __INTEGER index__VF5G,__tmp__TF5G,i__WF5G,typ_id__0F5G,__tmp__BE1C;
-  __INTEGER i__THCD,typ_id__3WO,typ_id__QYO;
-  void *name__04I,*n__JE5G,*n__AHP;
-  __POSITION p__GERC,pos__W2OG,p__QB5G,pos__Y2OG,pos__02OG,__tmp__UDJ;
-  __POSITION p__WC5G,pos__42OG,__tmp__VGJ,__tmp__5GJ,__tmp__IHJ,p__IE5G;
-  __POSITION pos__J3OG,p__5GP,__tmp__2HL,__tmp__CJL,__tmp__JKL;
-  __ITM_LIST_IDF *result__E40C;
-  __POINTER ptr__F40C,ptr_table__5A5G,next__4A5G,result__AB5G;
-  __POINTER ptr_table__EB5G,next__DB5G,result__FB5G,ptr__JB5G;
-  __POINTER ptr_table__SB5G,next__RB5G,result__TB5G,ptr_table__XB5G;
-  __POINTER next__WB5G,result__YB5G,ptr__2B5G,ptr_table__FC5G;
-  __POINTER next__EC5G,result__GC5G,ptr_table__KC5G,next__JC5G;
-  __POINTER result__LC5G,ptr__PC5G,ptr_table__YC5G,next__XC5G;
-  __POINTER result__ZC5G,ptr_table__3C5G,next__2C5G,result__4C5G;
-  __POINTER ptr__IMJD,ptr_table__CD5G,next__BD5G,result__DD5G;
-  __POINTER ptr_table__HD5G,next__GD5G,result__ID5G,ptr__G0JD;
-  __POINTER ptr_table__MD5G,next__LD5G,result__ND5G,ptr_table__RD5G;
-  __POINTER next__QD5G,result__SD5G,ptr__1NJD,ptr_table__WD5G;
-  __POINTER next__VD5G,result__XD5G,ptr_table__1D5G,next__0D5G;
-  __POINTER result__2D5G,ptr__AE5G,ptr_table__LE5G,next__KE5G;
-  __POINTER result__ME5G,ptr_table__QE5G,next__PE5G,result__RE5G;
-  __POINTER ptr__ESP,ptr_table__VE5G,next__UE5G,result__WE5G;
-  __POINTER ptr_table__0E5G,next__ZE5G,result__1E5G,ptr__5E5G;
-  __POINTER ptr_table__IF5G,next__HF5G,result__JF5G,ptr_table__NF5G;
-  __POINTER next__MF5G,result__OF5G,ptr__ZF5G,ptr_table__CG5G;
-  __POINTER next__BG5G,result__DG5G,ptr_table__HG5G,next__GG5G;
-  __POINTER result__IG5G,ptr__YWO,ptr_table__MG5G,next__LG5G;
-  __POINTER result__NG5G,ptr_table__RG5G,next__QG5G,result__SG5G;
-  __POINTER ptr__LYO,ptr_table__WG5G,next__VG5G,result__XG5G;
-  __POINTER ptr_table__1G5G,next__0G5G,result__2G5G;
-  __UINTEGER_32 sz__H40C,a__F51G,new_size__G51G,t__K51G,a__J51G;
-  __UINTEGER_32 new_size__HB5G,lab_type__GB5G,sz__LB5G,a__MB5G;
-  __UINTEGER_32 new_size__NB5G,t__OB5G,a__PB5G,new_size__0B5G;
-  __UINTEGER_32 lab_type__ZB5G,sz__4B5G,a__5B5G,new_size__AC5G,t__BC5G;
-  __UINTEGER_32 a__CC5G,new_size__NC5G,lab_type__MC5G,sz__RC5G,a__SC5G;
-  __UINTEGER_32 new_size__TC5G,t__UC5G,a__VC5G,new_size__AD5G;
-  __UINTEGER_32 lab_type__5C5G,sz__KMJD,a__UM2G,new_size__VM2G,t__ZM2G;
-  __UINTEGER_32 a__YM2G,new_size__KD5G,lab_type__JD5G,sz__I0JD,a__N51G;
-  __UINTEGER_32 new_size__O51G,t__S51G,a__R51G,new_size__UD5G;
-  __UINTEGER_32 lab_type__TD5G,sz__3NJD,a__2M2G,new_size__3M2G,t__BN2G;
-  __UINTEGER_32 a__AN2G,new_size__4D5G,lab_type__3D5G,sz__CE5G,a__DE5G;
-  __UINTEGER_32 new_size__EE5G,t__FE5G,a__GE5G,new_size__TE5G;
-  __UINTEGER_32 lab_type__SE5G,sz__GSP,a__MN2G,new_size__NN2G,t__RN2G;
-  __UINTEGER_32 a__QN2G,new_size__3E5G,lab_type__2E5G,sz__BF5G,a__CF5G;
-  __UINTEGER_32 new_size__DF5G,t__EF5G,a__FF5G,new_size__QF5G;
-  __UINTEGER_32 lab_type__PF5G,sz__1F5G,a__2F5G,new_size__3F5G,t__4F5G;
-  __UINTEGER_32 a__5F5G,new_size__KG5G,lab_type__JG5G,sz__0WO,a__CO2G;
-  __UINTEGER_32 new_size__DO2G,t__HO2G,a__GO2G,new_size__UG5G;
-  __UINTEGER_32 lab_type__TG5G,sz__NYO,a__NB2G,new_size__OB2G,t__SB2G;
-  __UINTEGER_32 a__RB2G,new_size__4G5G,lab_type__3G5G;
-  __ITM_WRITE_VALUE *result__IB5G,*result__HMJD;
-  __ITM_WRITE_CAST *result__1B5G,*result__0NJD;
-  __ITM_READ *result__OC5G;
-  __ITM_WRITE_CODE *result__F0JD;
-  void *itm_op__VEL,*__tmp__ZHL,*__tmp__AJL,*__tmp__GKL;
-  __ITM_OPERATOR *result__5D5G,*Self__HE5G,*result__DSP,*Self__HNV;
-  __ITM_READ_ARG1 *result__4E5G,*result__YF5G;
-  __ITM_READ_ARG2 *result__XWO;
-  __ITM_EXPRESSION *result__KYO;
-  __CHARACTER affect__T4I,result__WA5G,result__ZA5G,result__2A5G;
-  __BOOLEAN again__U4I,result__VA5G,result__YA5G,result__1A5G;
-  __BOOLEAN __tmp__4BJ,__tmp__AEJ,__tmp__YJL;
-  void *l_assignment__Y4I,*result__U4K,*result__AERC;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__OV5,*Self__EW5;
-  void *result__L3H,*l_expr__TEL;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__LN4,*Self__BO4;
-  __FAST_ARRAYoITM_CODEo *Self__RF5G,*Self__XD1C;
-  void **__tmp__SF5G,**Self__UF5G,**__tmp__AE1C,**Self__CHCD;
-  result__R4I=NULL;
-  value__S4I=NULL;
-  affect__T4I='\0';
-  again__U4I=FALSE__;
-  l_assignment__Y4I=NULL;
-  p__Z4I= 0;
-  name__04I=NULL;
-  old_position__TQI=position__CBC;
-  old_pos_cur__VQI=pos_cur__FBC;
-  old_pos_line__XQI=pos_line__GBC;
-  old_pos_col__ZQI=pos_col__HBC;
-  old_short_derive__1QI=short_derive__RBC;
-  result__VA5G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__VA5G=FALSE__;
+  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__;
   } else {
-    result__WA5G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__WA5G=((__CHARACTER )(( 0)));
+    result__VEBH='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__VEBH=((__CHARACTER )(( 0)));
     } else {
-      result__WA5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__VEBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__WA5G == '(')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__VA5G=TRUE__;
+    if ((result__VEBH == '(')) {
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      result__UEBH=TRUE__;
     };
   };
-  if (result__VA5G) {
-    result__U4K=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K)->parent_arrayed_collection__Z4K.upper__KSU <  0)) {
-      result__U4K=create_with_capacity__RGRC( 16);
+  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);
     } else {
-      Self__OV5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K);
-      result__U4K=((void **)Self__OV5->parent_arrayed_collection__Z4K.storage__0UU)[Self__OV5->parent_arrayed_collection__Z4K.upper__KSU];
-      Self__EW5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K);
-      Self__EW5->parent_arrayed_collection__Z4K.upper__KSU=(__INTEGER)(Self__EW5->parent_arrayed_collection__Z4K.upper__KSU -  1);
+      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);
     };
-    l_assignment__Y4I=result__U4K;
+    l_assignment__24I=result__Y4K;
     do {
-      again__U4I=FALSE__;
-      if (read_identifier__15K()) {
-        p__Z4I=(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD);
-        copy__JCS(string_tmp2__R5I,last_string__YZC);
-        while (read_identifier__15K()) {
-          append__RNS(string_tmp2__R5I,(&__string_112));
-          append__RNS(string_tmp2__R5I,last_string__YZC);
-        };
-        name__04I=get__YVB(string_tmp2__R5I);
-        add_last__BBPD(l_assignment__Y4I,name__04I);
-        if (is_shorter__TY) {
-          if ((! fast_has__NDV(short_local__ZBC,name__04I))) {
-            short__token__to__1AD((&__string_131),p__Z4I,position__CBC);
-          };
-        };
-        result__YA5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__YA5G=FALSE__;
-        } else {
-          result__ZA5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__ZA5G=((__CHARACTER )(( 0)));
-          } else {
-            result__ZA5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-          };
-          if ((result__ZA5G == ',')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__YA5G=TRUE__;
-          };
-        };
-        if (result__YA5G) {
-          again__U4I=TRUE__;
-        };
-      };
-    } while (again__U4I);
-    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__U4K)->parent_arrayed_collection__X4I.upper__L5OD <  0))) {
-      result__1A5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__1A5G=FALSE__;
-      } else {
-        result__2A5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__2A5G=((__CHARACTER )(( 0)));
-        } else {
-          result__2A5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-        };
-        if ((result__2A5G == ')')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__1A5G=TRUE__;
-        };
-      };
-      __tmp__4BJ=result__1A5G;
-    } else {
-      __tmp__4BJ=FALSE__;
-    };
-    if ((__tmp__4BJ && ((read_symbol__TWJ((&__string_12)) || read_symbol__TWJ((&__string_13))) || read_symbol__TWJ((&__string_14))))) {
-      result__AERC=create_with_capacity__RGRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__U4K)->parent_arrayed_collection__X4I.upper__L5OD +  1));
-      copy__M2RD(result__AERC,result__U4K);
-      free__KS5(result__U4K);
-      l_assignment__Y4I=result__AERC;
-      p__GERC=current_position__ZWF();
-      result__E40C=NULL;
-      ptr__F40C=((__POINTER )(NULL));
-      typ_id__K40C= 0;
-      sz__H40C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
-      if ((sz__H40C ==  0)) {
-        result__E40C=ITM_LIST_IDF__;
-      } else {
-        typ_id__K40C=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__H40C);
-        if ((typ_id__K40C == (__INTEGER)(-  1))) {
-          a__F51G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__G51G=(__UINTEGER_32)((__UINTEGER_32)(sz__H40C + a__F51G) & (__UINTEGER_32)(~ a__F51G));
-          ptr_table__5A5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G51G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__4A5G=((__POINTER )(NULL));
-          result__AB5G=((__POINTER *)ptr_table__5A5G)[ 0];
-          if ((result__AB5G == (void *)NULL)) {
-            result__AB5G=new_lab__2QJ(new_size__G51G);
-            next__4A5G=(void *)((unsigned long)result__AB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G51G)));
-            ((__POINTER *)next__4A5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5A5G)[ 0]=next__4A5G;
-          } else {
-            next__4A5G=((__POINTER *)result__AB5G)[ 0];
-            if ((next__4A5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AB5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G51G <<  1)) <=  4096)) {
-                next__4A5G=(void *)((unsigned long)result__AB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G51G)));
+      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)));
               } else {
-                next__4A5G=new_lab__2QJ(new_size__G51G);
+                next__3EBH=new_lab__ARJ(new_size__DA4G);
               };
-              ((__POINTER *)next__4A5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5A5G)[ 0]=next__4A5G;
+              ((__POINTER *)next__3EBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4EBH)[ 0]=next__3EBH;
             } else {
-              ((__POINTER *)result__AB5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4A5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AB5G=next__4A5G;
-            };
-          };
-          ptr__F40C=result__AB5G;
-        } else {
-          t__K51G=((__UINTEGER_32 )typ_id__K40C);
-          a__J51G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__HB5G=(__UINTEGER_32)((__UINTEGER_32)(sz__H40C + a__J51G) & (__UINTEGER_32)(~ a__J51G));
-          ptr_table__EB5G=((__POINTER )(&(table_type[(t__K51G)])));
-          lab_type__GB5G=(__UINTEGER_32)(t__K51G |  1);
-          next__DB5G=((__POINTER )(NULL));
-          result__FB5G=((__POINTER *)ptr_table__EB5G)[ 0];
-          if ((result__FB5G == (void *)NULL)) {
-            result__FB5G=new_lab__2QJ(lab_type__GB5G);
-            next__DB5G=(void *)((unsigned long)result__FB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HB5G)));
-            ((__POINTER *)next__DB5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EB5G)[ 0]=next__DB5G;
-          } else {
-            next__DB5G=((__POINTER *)result__FB5G)[ 0];
-            if ((next__DB5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FB5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__HB5G <<  1)) <=  4096)) {
-                next__DB5G=(void *)((unsigned long)result__FB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HB5G)));
+              ((__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)));
               } else {
-                next__DB5G=new_lab__2QJ(lab_type__GB5G);
+                next__CFBH=new_lab__ARJ(lab_type__FFBH);
               };
-              ((__POINTER *)next__DB5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EB5G)[ 0]=next__DB5G;
+              ((__POINTER *)next__CFBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DFBH)[ 0]=next__CFBH;
             } else {
-              ((__POINTER *)result__FB5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__DB5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__FB5G=next__DB5G;
+              ((__POINTER *)result__EFBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EFBH=next__CFBH;
             };
           };
-          ptr__F40C=result__FB5G;
+          ptr__J40C=result__EFBH;
         };
-        result__E40C=((__ITM_LIST_IDF *)ptr__F40C);
-        *(result__E40C) = *(ITM_LIST_IDF__);
+        result__I40C=((__ITM_LIST_IDF *)ptr__J40C);
+        *(result__I40C) = *(ITM_LIST_IDF__);
       };
-      ((__ITM_LIST_IDF *)result__E40C)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ=p__GERC;
-      result__R4I=result__E40C;
-      affect__T4I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[ 0];
-      value__S4I=read_expr__O4I(Self__P4I);
-      if (((void *)value__S4I == (void *)NULL)) {
-        pos__W2OG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_225));
-        put_position__EOG(pos__W2OG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      ((__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)) {
           exit(( 1));
         };
       };
-      if ((affect__T4I == ':')) {
-        p__QB5G=result__E40C->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
-        result__IB5G=NULL;
-        ptr__JB5G=((__POINTER )(NULL));
-        typ_id__KB5G= 0;
-        sz__LB5G=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
-        if ((sz__LB5G ==  0)) {
-          result__IB5G=ITM_WRITE_VALUE__;
-        } else {
-          typ_id__KB5G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__LB5G);
-          if ((typ_id__KB5G == (__INTEGER)(-  1))) {
-            a__MB5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__NB5G=(__UINTEGER_32)((__UINTEGER_32)(sz__LB5G + a__MB5G) & (__UINTEGER_32)(~ a__MB5G));
-            ptr_table__SB5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NB5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__RB5G=((__POINTER )(NULL));
-            result__TB5G=((__POINTER *)ptr_table__SB5G)[ 0];
-            if ((result__TB5G == (void *)NULL)) {
-              result__TB5G=new_lab__2QJ(new_size__NB5G);
-              next__RB5G=(void *)((unsigned long)result__TB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NB5G)));
-              ((__POINTER *)next__RB5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SB5G)[ 0]=next__RB5G;
+      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;
             } else {
-              next__RB5G=((__POINTER *)result__TB5G)[ 0];
-              if ((next__RB5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TB5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NB5G <<  1)) <=  4096)) {
-                  next__RB5G=(void *)((unsigned long)result__TB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NB5G)));
+              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)));
                 } else {
-                  next__RB5G=new_lab__2QJ(new_size__NB5G);
+                  next__QFBH=new_lab__ARJ(new_size__MFBH);
                 };
-                ((__POINTER *)next__RB5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SB5G)[ 0]=next__RB5G;
+                ((__POINTER *)next__QFBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RFBH)[ 0]=next__QFBH;
               } else {
-                ((__POINTER *)result__TB5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RB5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__TB5G=next__RB5G;
+                ((__POINTER *)result__SFBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QFBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SFBH=next__QFBH;
               };
             };
-            ptr__JB5G=result__TB5G;
-          } else {
-            t__OB5G=((__UINTEGER_32 )typ_id__KB5G);
-            a__PB5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__0B5G=(__UINTEGER_32)((__UINTEGER_32)(sz__LB5G + a__PB5G) & (__UINTEGER_32)(~ a__PB5G));
-            ptr_table__XB5G=((__POINTER )(&(table_type[(t__OB5G)])));
-            lab_type__ZB5G=(__UINTEGER_32)(t__OB5G |  1);
-            next__WB5G=((__POINTER )(NULL));
-            result__YB5G=((__POINTER *)ptr_table__XB5G)[ 0];
-            if ((result__YB5G == (void *)NULL)) {
-              result__YB5G=new_lab__2QJ(lab_type__ZB5G);
-              next__WB5G=(void *)((unsigned long)result__YB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0B5G)));
-              ((__POINTER *)next__WB5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XB5G)[ 0]=next__WB5G;
+            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;
             } else {
-              next__WB5G=((__POINTER *)result__YB5G)[ 0];
-              if ((next__WB5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YB5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0B5G <<  1)) <=  4096)) {
-                  next__WB5G=(void *)((unsigned long)result__YB5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0B5G)));
+              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)));
                 } else {
-                  next__WB5G=new_lab__2QJ(lab_type__ZB5G);
+                  next__VFBH=new_lab__ARJ(lab_type__YFBH);
                 };
-                ((__POINTER *)next__WB5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XB5G)[ 0]=next__WB5G;
+                ((__POINTER *)next__VFBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WFBH)[ 0]=next__VFBH;
               } else {
-                ((__POINTER *)result__YB5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WB5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__YB5G=next__WB5G;
+                ((__POINTER *)result__XFBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VFBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XFBH=next__VFBH;
               };
             };
-            ptr__JB5G=result__YB5G;
+            ptr__IFBH=result__XFBH;
           };
-          result__IB5G=((__ITM_WRITE_VALUE *)ptr__JB5G);
-          *(result__IB5G) = *(ITM_WRITE_VALUE__);
+          result__HFBH=((__ITM_WRITE_VALUE *)ptr__IFBH);
+          *(result__HFBH) = *(ITM_WRITE_VALUE__);
         };
-        ((__ITM_WRITE_VALUE *)result__IB5G)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ=p__QB5G;
-        result__R4I=result__IB5G;
+        ((__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;
       };
-      if ((affect__T4I == '<')) {
-        pos__Y2OG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_279));
-        put_position__EOG(pos__Y2OG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      if ((affect__T4I == '?')) {
-        pos__02OG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_280));
-        put_position__EOG(pos__02OG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__R4I)->__id) {
+        switch (((struct ___OBJ *)result__V4I)->__id) {
         case __ITM_LIST__: {
-          __tmp__UDJ=((__ITM_LIST *)result__R4I)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_LIST *)result__V4I)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__UDJ=((__ITM_LDOTS *)result__R4I)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_LDOTS *)result__V4I)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__UDJ=((__ITM_PROTOTYPE *)result__R4I)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_PROTOTYPE *)result__V4I)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__UDJ=((__ITM_LIST_IDF *)result__R4I)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_LIST_IDF *)result__V4I)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__UDJ=((__ITM_WRITE_VALUE *)result__R4I)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_WRITE_VALUE *)result__V4I)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__UDJ=((__ITM_WRITE_CAST *)result__R4I)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_WRITE_CAST *)result__V4I)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_READ__: {
-          __tmp__UDJ=((__ITM_READ *)result__R4I)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_READ *)result__V4I)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__UDJ=((__ITM_WRITE_CODE *)result__R4I)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_WRITE_CODE *)result__V4I)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__UDJ=((__ITM_OPERATOR *)result__R4I)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_OPERATOR *)result__V4I)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__UDJ=((__ITM_READ_ARG1 *)result__R4I)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_READ_ARG1 *)result__V4I)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__UDJ=((__ITM_READ_ARG2 *)result__R4I)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_READ_ARG2 *)result__V4I)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__UDJ=position__VC5B(result__R4I);
+          __tmp__YDJ=position__ZC5B(result__V4I);
         } break;
         case __ITM_OLD__: {
-          __tmp__UDJ=((__ITM_OLD *)result__R4I)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_OLD *)result__V4I)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__UDJ=((__ITM_EXTERNAL_TYPE *)result__R4I)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_EXTERNAL_TYPE *)result__V4I)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__UDJ=((__ITM_LIST *)((__ITM_BLOCK *)result__R4I)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_LIST *)((__ITM_BLOCK *)result__V4I)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__UDJ=((__ITM_EXTERNAL *)result__R4I)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_EXTERNAL *)result__V4I)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__UDJ=((__ITM_READ_ARGS *)result__R4I)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_READ_ARGS *)result__V4I)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__UDJ=((__ITM_REAL *)result__R4I)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_REAL *)result__V4I)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__UDJ=((__ITM_NUMBER *)result__R4I)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_NUMBER *)result__V4I)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__UDJ=((__ITM_CHARACTER *)result__R4I)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_CHARACTER *)result__V4I)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__UDJ=((__ITM_STRING *)result__R4I)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+          __tmp__YDJ=((__ITM_STRING *)result__V4I)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__UDJ=position__VIHC(result__R4I);
+          __tmp__YDJ=position__ZIHC(result__V4I);
         } break;
         };
-        result__1B5G=NULL;
-        ptr__2B5G=((__POINTER )(NULL));
-        typ_id__3B5G= 0;
-        sz__4B5G=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
-        if ((sz__4B5G ==  0)) {
-          result__1B5G=ITM_WRITE_CAST__;
-        } else {
-          typ_id__3B5G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4B5G);
-          if ((typ_id__3B5G == (__INTEGER)(-  1))) {
-            a__5B5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__AC5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4B5G + a__5B5G) & (__UINTEGER_32)(~ a__5B5G));
-            ptr_table__FC5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AC5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__EC5G=((__POINTER )(NULL));
-            result__GC5G=((__POINTER *)ptr_table__FC5G)[ 0];
-            if ((result__GC5G == (void *)NULL)) {
-              result__GC5G=new_lab__2QJ(new_size__AC5G);
-              next__EC5G=(void *)((unsigned long)result__GC5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AC5G)));
-              ((__POINTER *)next__EC5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FC5G)[ 0]=next__EC5G;
+        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;
             } else {
-              next__EC5G=((__POINTER *)result__GC5G)[ 0];
-              if ((next__EC5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GC5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AC5G <<  1)) <=  4096)) {
-                  next__EC5G=(void *)((unsigned long)result__GC5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AC5G)));
+              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)));
                 } else {
-                  next__EC5G=new_lab__2QJ(new_size__AC5G);
+                  next__DGBH=new_lab__ARJ(new_size__5FBH);
                 };
-                ((__POINTER *)next__EC5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__FC5G)[ 0]=next__EC5G;
+                ((__POINTER *)next__DGBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EGBH)[ 0]=next__DGBH;
               } else {
-                ((__POINTER *)result__GC5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__EC5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__GC5G=next__EC5G;
+                ((__POINTER *)result__FGBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__FGBH=next__DGBH;
               };
             };
-            ptr__2B5G=result__GC5G;
-          } else {
-            t__BC5G=((__UINTEGER_32 )typ_id__3B5G);
-            a__CC5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__NC5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4B5G + a__CC5G) & (__UINTEGER_32)(~ a__CC5G));
-            ptr_table__KC5G=((__POINTER )(&(table_type[(t__BC5G)])));
-            lab_type__MC5G=(__UINTEGER_32)(t__BC5G |  1);
-            next__JC5G=((__POINTER )(NULL));
-            result__LC5G=((__POINTER *)ptr_table__KC5G)[ 0];
-            if ((result__LC5G == (void *)NULL)) {
-              result__LC5G=new_lab__2QJ(lab_type__MC5G);
-              next__JC5G=(void *)((unsigned long)result__LC5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NC5G)));
-              ((__POINTER *)next__JC5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KC5G)[ 0]=next__JC5G;
+            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;
             } else {
-              next__JC5G=((__POINTER *)result__LC5G)[ 0];
-              if ((next__JC5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LC5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NC5G <<  1)) <=  4096)) {
-                  next__JC5G=(void *)((unsigned long)result__LC5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NC5G)));
+              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)));
                 } else {
-                  next__JC5G=new_lab__2QJ(lab_type__MC5G);
+                  next__IGBH=new_lab__ARJ(lab_type__LGBH);
                 };
-                ((__POINTER *)next__JC5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KC5G)[ 0]=next__JC5G;
+                ((__POINTER *)next__IGBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JGBH)[ 0]=next__IGBH;
               } else {
-                ((__POINTER *)result__LC5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JC5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__LC5G=next__JC5G;
+                ((__POINTER *)result__KGBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KGBH=next__IGBH;
               };
             };
-            ptr__2B5G=result__LC5G;
+            ptr__1FBH=result__KGBH;
           };
-          result__1B5G=((__ITM_WRITE_CAST *)ptr__2B5G);
-          *(result__1B5G) = *(ITM_WRITE_CAST__);
+          result__0FBH=((__ITM_WRITE_CAST *)ptr__1FBH);
+          *(result__0FBH) = *(ITM_WRITE_CAST__);
         };
-        ((__ITM_WRITE_CAST *)result__1B5G)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ=__tmp__UDJ;
-        result__R4I=result__1B5G;
+        ((__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;
       };
     } else {
-      free__KS5(l_assignment__Y4I);
+      free__OS5(l_assignment__24I);
     };
-    __tmp__AEJ=TRUE__;
+    __tmp__EEJ=TRUE__;
   } else {
-    __tmp__AEJ=FALSE__;
-  };
-  if ((! __tmp__AEJ)) {
-    if (read_identifier__15K()) {
-      p__Z4I=(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD);
-      copy__JCS(string_tmp2__R5I,last_string__YZC);
-      while (read_identifier__15K()) {
-        append__RNS(string_tmp2__R5I,(&__string_112));
-        append__RNS(string_tmp2__R5I,last_string__YZC);
-      };
-      name__04I=get__YVB(string_tmp2__R5I);
-      if (is_shorter__TY) {
-        if ((! fast_has__NDV(short_local__ZBC,name__04I))) {
-          short__token__to__1AD((&__string_131),p__Z4I,position__CBC);
-        };
-      };
-      if (((read_symbol__TWJ((&__string_12)) || read_symbol__TWJ((&__string_13))) || read_symbol__TWJ((&__string_14)))) {
-        p__WC5G=current_position__ZWF();
-        result__OC5G=NULL;
-        ptr__PC5G=((__POINTER )(NULL));
-        typ_id__QC5G= 0;
-        sz__RC5G=((__UINTEGER_32 )sizeof(__ITM_READ));
-        if ((sz__RC5G ==  0)) {
-          result__OC5G=ITM_READ__;
-        } else {
-          typ_id__QC5G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__RC5G);
-          if ((typ_id__QC5G == (__INTEGER)(-  1))) {
-            a__SC5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__TC5G=(__UINTEGER_32)((__UINTEGER_32)(sz__RC5G + a__SC5G) & (__UINTEGER_32)(~ a__SC5G));
-            ptr_table__YC5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TC5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__XC5G=((__POINTER )(NULL));
-            result__ZC5G=((__POINTER *)ptr_table__YC5G)[ 0];
-            if ((result__ZC5G == (void *)NULL)) {
-              result__ZC5G=new_lab__2QJ(new_size__TC5G);
-              next__XC5G=(void *)((unsigned long)result__ZC5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TC5G)));
-              ((__POINTER *)next__XC5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YC5G)[ 0]=next__XC5G;
+    __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;
             } else {
-              next__XC5G=((__POINTER *)result__ZC5G)[ 0];
-              if ((next__XC5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZC5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TC5G <<  1)) <=  4096)) {
-                  next__XC5G=(void *)((unsigned long)result__ZC5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TC5G)));
+              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)));
                 } else {
-                  next__XC5G=new_lab__2QJ(new_size__TC5G);
+                  next__WGBH=new_lab__ARJ(new_size__SGBH);
                 };
-                ((__POINTER *)next__XC5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YC5G)[ 0]=next__XC5G;
+                ((__POINTER *)next__WGBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XGBH)[ 0]=next__WGBH;
               } else {
-                ((__POINTER *)result__ZC5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__XC5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ZC5G=next__XC5G;
+                ((__POINTER *)result__YGBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WGBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__YGBH=next__WGBH;
               };
             };
-            ptr__PC5G=result__ZC5G;
-          } else {
-            t__UC5G=((__UINTEGER_32 )typ_id__QC5G);
-            a__VC5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__AD5G=(__UINTEGER_32)((__UINTEGER_32)(sz__RC5G + a__VC5G) & (__UINTEGER_32)(~ a__VC5G));
-            ptr_table__3C5G=((__POINTER )(&(table_type[(t__UC5G)])));
-            lab_type__5C5G=(__UINTEGER_32)(t__UC5G |  1);
-            next__2C5G=((__POINTER )(NULL));
-            result__4C5G=((__POINTER *)ptr_table__3C5G)[ 0];
-            if ((result__4C5G == (void *)NULL)) {
-              result__4C5G=new_lab__2QJ(lab_type__5C5G);
-              next__2C5G=(void *)((unsigned long)result__4C5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AD5G)));
-              ((__POINTER *)next__2C5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3C5G)[ 0]=next__2C5G;
+            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;
             } else {
-              next__2C5G=((__POINTER *)result__4C5G)[ 0];
-              if ((next__2C5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4C5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AD5G <<  1)) <=  4096)) {
-                  next__2C5G=(void *)((unsigned long)result__4C5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AD5G)));
+              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)));
                 } else {
-                  next__2C5G=new_lab__2QJ(lab_type__5C5G);
+                  next__1GBH=new_lab__ARJ(lab_type__4GBH);
                 };
-                ((__POINTER *)next__2C5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3C5G)[ 0]=next__2C5G;
+                ((__POINTER *)next__1GBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2GBH)[ 0]=next__1GBH;
               } else {
-                ((__POINTER *)result__4C5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2C5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4C5G=next__2C5G;
+                ((__POINTER *)result__3GBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1GBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__3GBH=next__1GBH;
               };
             };
-            ptr__PC5G=result__4C5G;
-          };
-          result__OC5G=((__ITM_READ *)ptr__PC5G);
-          *(result__OC5G) = *(ITM_READ__);
-        };
-        ((__ITM_READ *)result__OC5G)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__WC5G;
-        result__R4I=result__OC5G;
-        affect__T4I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__YZC)->storage__FQO)[ 0];
-        value__S4I=read_expr__O4I(Self__P4I);
-        if (((void *)value__S4I == (void *)NULL)) {
-          pos__42OG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_225));
-          put_position__EOG(pos__42OG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+            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)) {
             exit(( 1));
           };
         };
-        if ((affect__T4I == ':')) {
-          __tmp__VGJ=result__OC5G->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
-          result__HMJD=NULL;
-          ptr__IMJD=((__POINTER )(NULL));
-          typ_id__NMJD= 0;
-          sz__KMJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
-          if ((sz__KMJD ==  0)) {
-            result__HMJD=ITM_WRITE_VALUE__;
-          } else {
-            typ_id__NMJD=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__KMJD);
-            if ((typ_id__NMJD == (__INTEGER)(-  1))) {
-              a__UM2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__VM2G=(__UINTEGER_32)((__UINTEGER_32)(sz__KMJD + a__UM2G) & (__UINTEGER_32)(~ a__UM2G));
-              ptr_table__CD5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VM2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__BD5G=((__POINTER )(NULL));
-              result__DD5G=((__POINTER *)ptr_table__CD5G)[ 0];
-              if ((result__DD5G == (void *)NULL)) {
-                result__DD5G=new_lab__2QJ(new_size__VM2G);
-                next__BD5G=(void *)((unsigned long)result__DD5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VM2G)));
-                ((__POINTER *)next__BD5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CD5G)[ 0]=next__BD5G;
+        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;
               } else {
-                next__BD5G=((__POINTER *)result__DD5G)[ 0];
-                if ((next__BD5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DD5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VM2G <<  1)) <=  4096)) {
-                    next__BD5G=(void *)((unsigned long)result__DD5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VM2G)));
+                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)));
                   } else {
-                    next__BD5G=new_lab__2QJ(new_size__VM2G);
+                    next__AHBH=new_lab__ARJ(new_size__UP4G);
                   };
-                  ((__POINTER *)next__BD5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__CD5G)[ 0]=next__BD5G;
+                  ((__POINTER *)next__AHBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BHBH)[ 0]=next__AHBH;
                 } else {
-                  ((__POINTER *)result__DD5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BD5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__DD5G=next__BD5G;
+                  ((__POINTER *)result__CHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CHBH=next__AHBH;
                 };
               };
-              ptr__IMJD=result__DD5G;
+              ptr__MMJD=result__CHBH;
             } else {
-              t__ZM2G=((__UINTEGER_32 )typ_id__NMJD);
-              a__YM2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__KD5G=(__UINTEGER_32)((__UINTEGER_32)(sz__KMJD + a__YM2G) & (__UINTEGER_32)(~ a__YM2G));
-              ptr_table__HD5G=((__POINTER )(&(table_type[(t__ZM2G)])));
-              lab_type__JD5G=(__UINTEGER_32)(t__ZM2G |  1);
-              next__GD5G=((__POINTER )(NULL));
-              result__ID5G=((__POINTER *)ptr_table__HD5G)[ 0];
-              if ((result__ID5G == (void *)NULL)) {
-                result__ID5G=new_lab__2QJ(lab_type__JD5G);
-                next__GD5G=(void *)((unsigned long)result__ID5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KD5G)));
-                ((__POINTER *)next__GD5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HD5G)[ 0]=next__GD5G;
+              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;
               } else {
-                next__GD5G=((__POINTER *)result__ID5G)[ 0];
-                if ((next__GD5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ID5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KD5G <<  1)) <=  4096)) {
-                    next__GD5G=(void *)((unsigned long)result__ID5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KD5G)));
+                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)));
                   } else {
-                    next__GD5G=new_lab__2QJ(lab_type__JD5G);
+                    next__FHBH=new_lab__ARJ(lab_type__IHBH);
                   };
-                  ((__POINTER *)next__GD5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HD5G)[ 0]=next__GD5G;
+                  ((__POINTER *)next__FHBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GHBH)[ 0]=next__FHBH;
                 } else {
-                  ((__POINTER *)result__ID5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GD5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ID5G=next__GD5G;
+                  ((__POINTER *)result__HHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HHBH=next__FHBH;
                 };
               };
-              ptr__IMJD=result__ID5G;
+              ptr__MMJD=result__HHBH;
             };
-            result__HMJD=((__ITM_WRITE_VALUE *)ptr__IMJD);
-            *(result__HMJD) = *(ITM_WRITE_VALUE__);
+            result__LMJD=((__ITM_WRITE_VALUE *)ptr__MMJD);
+            *(result__LMJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__ITM_WRITE_VALUE *)result__HMJD)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ=__tmp__VGJ;
-          result__R4I=result__HMJD;
+          ((__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;
         };
-        if ((affect__T4I == '<')) {
-          switch (((struct ___OBJ *)result__R4I)->__id) {
+        if ((affect__X4I == '<')) {
+          switch (((struct ___OBJ *)result__V4I)->__id) {
           case __ITM_LIST__: {
-            __tmp__5GJ=((__ITM_LIST *)result__R4I)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_LIST *)result__V4I)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__5GJ=((__ITM_LDOTS *)result__R4I)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_LDOTS *)result__V4I)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__5GJ=((__ITM_PROTOTYPE *)result__R4I)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_PROTOTYPE *)result__V4I)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__5GJ=((__ITM_LIST_IDF *)result__R4I)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_LIST_IDF *)result__V4I)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__5GJ=((__ITM_WRITE_VALUE *)result__R4I)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_WRITE_VALUE *)result__V4I)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__5GJ=((__ITM_WRITE_CAST *)result__R4I)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_WRITE_CAST *)result__V4I)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ__: {
-            __tmp__5GJ=((__ITM_READ *)result__R4I)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_READ *)result__V4I)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__5GJ=((__ITM_WRITE_CODE *)result__R4I)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_WRITE_CODE *)result__V4I)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__5GJ=((__ITM_OPERATOR *)result__R4I)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_OPERATOR *)result__V4I)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__5GJ=((__ITM_READ_ARG1 *)result__R4I)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_READ_ARG1 *)result__V4I)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__5GJ=((__ITM_READ_ARG2 *)result__R4I)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_READ_ARG2 *)result__V4I)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__5GJ=position__VC5B(result__R4I);
+            __tmp__DHJ=position__ZC5B(result__V4I);
           } break;
           case __ITM_OLD__: {
-            __tmp__5GJ=((__ITM_OLD *)result__R4I)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_OLD *)result__V4I)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__5GJ=((__ITM_EXTERNAL_TYPE *)result__R4I)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_EXTERNAL_TYPE *)result__V4I)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__5GJ=((__ITM_LIST *)((__ITM_BLOCK *)result__R4I)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__V4I)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__5GJ=((__ITM_EXTERNAL *)result__R4I)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_EXTERNAL *)result__V4I)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__5GJ=((__ITM_READ_ARGS *)result__R4I)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_READ_ARGS *)result__V4I)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__5GJ=((__ITM_REAL *)result__R4I)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_REAL *)result__V4I)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__5GJ=((__ITM_NUMBER *)result__R4I)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_NUMBER *)result__V4I)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__5GJ=((__ITM_CHARACTER *)result__R4I)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_CHARACTER *)result__V4I)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__5GJ=((__ITM_STRING *)result__R4I)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__DHJ=((__ITM_STRING *)result__V4I)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__5GJ=position__VIHC(result__R4I);
+            __tmp__DHJ=position__ZIHC(result__V4I);
           } break;
           };
-          result__F0JD=NULL;
-          ptr__G0JD=((__POINTER )(NULL));
-          typ_id__L0JD= 0;
-          sz__I0JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
-          if ((sz__I0JD ==  0)) {
-            result__F0JD=ITM_WRITE_CODE__;
-          } else {
-            typ_id__L0JD=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__I0JD);
-            if ((typ_id__L0JD == (__INTEGER)(-  1))) {
-              a__N51G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__O51G=(__UINTEGER_32)((__UINTEGER_32)(sz__I0JD + a__N51G) & (__UINTEGER_32)(~ a__N51G));
-              ptr_table__MD5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O51G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__LD5G=((__POINTER )(NULL));
-              result__ND5G=((__POINTER *)ptr_table__MD5G)[ 0];
-              if ((result__ND5G == (void *)NULL)) {
-                result__ND5G=new_lab__2QJ(new_size__O51G);
-                next__LD5G=(void *)((unsigned long)result__ND5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O51G)));
-                ((__POINTER *)next__LD5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MD5G)[ 0]=next__LD5G;
+          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;
               } else {
-                next__LD5G=((__POINTER *)result__ND5G)[ 0];
-                if ((next__LD5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ND5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O51G <<  1)) <=  4096)) {
-                    next__LD5G=(void *)((unsigned long)result__ND5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O51G)));
+                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)));
                   } else {
-                    next__LD5G=new_lab__2QJ(new_size__O51G);
+                    next__KHBH=new_lab__ARJ(new_size__LA4G);
                   };
-                  ((__POINTER *)next__LD5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MD5G)[ 0]=next__LD5G;
+                  ((__POINTER *)next__KHBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LHBH)[ 0]=next__KHBH;
                 } else {
-                  ((__POINTER *)result__ND5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LD5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ND5G=next__LD5G;
+                  ((__POINTER *)result__MHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MHBH=next__KHBH;
                 };
               };
-              ptr__G0JD=result__ND5G;
+              ptr__K0JD=result__MHBH;
             } else {
-              t__S51G=((__UINTEGER_32 )typ_id__L0JD);
-              a__R51G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__UD5G=(__UINTEGER_32)((__UINTEGER_32)(sz__I0JD + a__R51G) & (__UINTEGER_32)(~ a__R51G));
-              ptr_table__RD5G=((__POINTER )(&(table_type[(t__S51G)])));
-              lab_type__TD5G=(__UINTEGER_32)(t__S51G |  1);
-              next__QD5G=((__POINTER )(NULL));
-              result__SD5G=((__POINTER *)ptr_table__RD5G)[ 0];
-              if ((result__SD5G == (void *)NULL)) {
-                result__SD5G=new_lab__2QJ(lab_type__TD5G);
-                next__QD5G=(void *)((unsigned long)result__SD5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UD5G)));
-                ((__POINTER *)next__QD5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RD5G)[ 0]=next__QD5G;
+              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;
               } else {
-                next__QD5G=((__POINTER *)result__SD5G)[ 0];
-                if ((next__QD5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SD5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__UD5G <<  1)) <=  4096)) {
-                    next__QD5G=(void *)((unsigned long)result__SD5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UD5G)));
+                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)));
                   } else {
-                    next__QD5G=new_lab__2QJ(lab_type__TD5G);
+                    next__PHBH=new_lab__ARJ(lab_type__SHBH);
                   };
-                  ((__POINTER *)next__QD5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__RD5G)[ 0]=next__QD5G;
+                  ((__POINTER *)next__PHBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QHBH)[ 0]=next__PHBH;
                 } else {
-                  ((__POINTER *)result__SD5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QD5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__SD5G=next__QD5G;
+                  ((__POINTER *)result__RHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__RHBH=next__PHBH;
                 };
               };
-              ptr__G0JD=result__SD5G;
+              ptr__K0JD=result__RHBH;
             };
-            result__F0JD=((__ITM_WRITE_CODE *)ptr__G0JD);
-            *(result__F0JD) = *(ITM_WRITE_CODE__);
+            result__J0JD=((__ITM_WRITE_CODE *)ptr__K0JD);
+            *(result__J0JD) = *(ITM_WRITE_CODE__);
           };
-          ((__ITM_WRITE_CODE *)result__F0JD)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ=__tmp__5GJ;
-          result__R4I=result__F0JD;
+          ((__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;
         };
-        if ((affect__T4I == '?')) {
-          switch (((struct ___OBJ *)result__R4I)->__id) {
+        if ((affect__X4I == '?')) {
+          switch (((struct ___OBJ *)result__V4I)->__id) {
           case __ITM_LIST__: {
-            __tmp__IHJ=((__ITM_LIST *)result__R4I)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_LIST *)result__V4I)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__IHJ=((__ITM_LDOTS *)result__R4I)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_LDOTS *)result__V4I)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__IHJ=((__ITM_PROTOTYPE *)result__R4I)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_PROTOTYPE *)result__V4I)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__IHJ=((__ITM_LIST_IDF *)result__R4I)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_LIST_IDF *)result__V4I)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__IHJ=((__ITM_WRITE_VALUE *)result__R4I)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_WRITE_VALUE *)result__V4I)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__IHJ=((__ITM_WRITE_CAST *)result__R4I)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_WRITE_CAST *)result__V4I)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ__: {
-            __tmp__IHJ=((__ITM_READ *)result__R4I)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_READ *)result__V4I)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__IHJ=((__ITM_WRITE_CODE *)result__R4I)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_WRITE_CODE *)result__V4I)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__IHJ=((__ITM_OPERATOR *)result__R4I)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_OPERATOR *)result__V4I)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__IHJ=((__ITM_READ_ARG1 *)result__R4I)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_READ_ARG1 *)result__V4I)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__IHJ=((__ITM_READ_ARG2 *)result__R4I)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_READ_ARG2 *)result__V4I)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__IHJ=position__VC5B(result__R4I);
+            __tmp__MHJ=position__ZC5B(result__V4I);
           } break;
           case __ITM_OLD__: {
-            __tmp__IHJ=((__ITM_OLD *)result__R4I)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_OLD *)result__V4I)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__IHJ=((__ITM_EXTERNAL_TYPE *)result__R4I)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_EXTERNAL_TYPE *)result__V4I)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__IHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__R4I)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__V4I)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__IHJ=((__ITM_EXTERNAL *)result__R4I)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_EXTERNAL *)result__V4I)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__IHJ=((__ITM_READ_ARGS *)result__R4I)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_READ_ARGS *)result__V4I)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__IHJ=((__ITM_REAL *)result__R4I)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_REAL *)result__V4I)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__IHJ=((__ITM_NUMBER *)result__R4I)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_NUMBER *)result__V4I)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__IHJ=((__ITM_CHARACTER *)result__R4I)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_CHARACTER *)result__V4I)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__IHJ=((__ITM_STRING *)result__R4I)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+            __tmp__MHJ=((__ITM_STRING *)result__V4I)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__IHJ=position__VIHC(result__R4I);
+            __tmp__MHJ=position__ZIHC(result__V4I);
           } break;
           };
-          result__0NJD=NULL;
-          ptr__1NJD=((__POINTER )(NULL));
-          typ_id__AOJD= 0;
-          sz__3NJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
-          if ((sz__3NJD ==  0)) {
-            result__0NJD=ITM_WRITE_CAST__;
-          } else {
-            typ_id__AOJD=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__3NJD);
-            if ((typ_id__AOJD == (__INTEGER)(-  1))) {
-              a__2M2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__3M2G=(__UINTEGER_32)((__UINTEGER_32)(sz__3NJD + a__2M2G) & (__UINTEGER_32)(~ a__2M2G));
-              ptr_table__WD5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3M2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__VD5G=((__POINTER )(NULL));
-              result__XD5G=((__POINTER *)ptr_table__WD5G)[ 0];
-              if ((result__XD5G == (void *)NULL)) {
-                result__XD5G=new_lab__2QJ(new_size__3M2G);
-                next__VD5G=(void *)((unsigned long)result__XD5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3M2G)));
-                ((__POINTER *)next__VD5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WD5G)[ 0]=next__VD5G;
+          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;
               } else {
-                next__VD5G=((__POINTER *)result__XD5G)[ 0];
-                if ((next__VD5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XD5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3M2G <<  1)) <=  4096)) {
-                    next__VD5G=(void *)((unsigned long)result__XD5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3M2G)));
+                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)));
                   } else {
-                    next__VD5G=new_lab__2QJ(new_size__3M2G);
+                    next__UHBH=new_lab__ARJ(new_size__2P4G);
                   };
-                  ((__POINTER *)next__VD5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WD5G)[ 0]=next__VD5G;
+                  ((__POINTER *)next__UHBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VHBH)[ 0]=next__UHBH;
                 } else {
-                  ((__POINTER *)result__XD5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VD5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XD5G=next__VD5G;
+                  ((__POINTER *)result__WHBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WHBH=next__UHBH;
                 };
               };
-              ptr__1NJD=result__XD5G;
+              ptr__5NJD=result__WHBH;
             } else {
-              t__BN2G=((__UINTEGER_32 )typ_id__AOJD);
-              a__AN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__4D5G=(__UINTEGER_32)((__UINTEGER_32)(sz__3NJD + a__AN2G) & (__UINTEGER_32)(~ a__AN2G));
-              ptr_table__1D5G=((__POINTER )(&(table_type[(t__BN2G)])));
-              lab_type__3D5G=(__UINTEGER_32)(t__BN2G |  1);
-              next__0D5G=((__POINTER )(NULL));
-              result__2D5G=((__POINTER *)ptr_table__1D5G)[ 0];
-              if ((result__2D5G == (void *)NULL)) {
-                result__2D5G=new_lab__2QJ(lab_type__3D5G);
-                next__0D5G=(void *)((unsigned long)result__2D5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4D5G)));
-                ((__POINTER *)next__0D5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1D5G)[ 0]=next__0D5G;
+              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;
               } else {
-                next__0D5G=((__POINTER *)result__2D5G)[ 0];
-                if ((next__0D5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2D5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4D5G <<  1)) <=  4096)) {
-                    next__0D5G=(void *)((unsigned long)result__2D5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4D5G)));
+                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)));
                   } else {
-                    next__0D5G=new_lab__2QJ(lab_type__3D5G);
+                    next__ZHBH=new_lab__ARJ(lab_type__2HBH);
                   };
-                  ((__POINTER *)next__0D5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1D5G)[ 0]=next__0D5G;
+                  ((__POINTER *)next__ZHBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0HBH)[ 0]=next__ZHBH;
                 } else {
-                  ((__POINTER *)result__2D5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0D5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2D5G=next__0D5G;
+                  ((__POINTER *)result__1HBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1HBH=next__ZHBH;
                 };
               };
-              ptr__1NJD=result__2D5G;
-            };
-            result__0NJD=((__ITM_WRITE_CAST *)ptr__1NJD);
-            *(result__0NJD) = *(ITM_WRITE_CAST__);
-          };
-          ((__ITM_WRITE_CAST *)result__0NJD)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ=__tmp__IHJ;
-          result__R4I=result__0NJD;
-        };
-      };
-    };
-  };
-  if (((void *)result__R4I == (void *)NULL)) {
-    restore_context__DDL();
-    result__REL=NULL;
-    expr__SEL=NULL;
-    itm_op__VEL=NULL;
-    last_msg__WEL= 0;
-    first_msg__XEL= 0;
-    result__L3H=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H)->parent_arrayed_collection__Q3H.upper__YVT <  0)) {
-      result__L3H=create_with_capacity__CVI( 16);
-    } else {
-      Self__LN4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-      result__L3H=((void **)Self__LN4->parent_arrayed_collection__Q3H.storage__GAU)[Self__LN4->parent_arrayed_collection__Q3H.upper__YVT];
-      Self__BO4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-      Self__BO4->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(Self__BO4->parent_arrayed_collection__Q3H.upper__YVT -  1);
-    };
-    l_expr__TEL=result__L3H;
-    while (read_operator__XMM()) {
-      p__IE5G=current_position__ZWF();
-      n__JE5G=last_string__YZC;
-      result__5D5G=NULL;
-      ptr__AE5G=((__POINTER )(NULL));
-      typ_id__BE5G= 0;
-      sz__CE5G=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
-      if ((sz__CE5G ==  0)) {
-        result__5D5G=ITM_OPERATOR__;
-      } else {
-        typ_id__BE5G=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__CE5G);
-        if ((typ_id__BE5G == (__INTEGER)(-  1))) {
-          a__DE5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__EE5G=(__UINTEGER_32)((__UINTEGER_32)(sz__CE5G + a__DE5G) & (__UINTEGER_32)(~ a__DE5G));
-          ptr_table__LE5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EE5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__KE5G=((__POINTER )(NULL));
-          result__ME5G=((__POINTER *)ptr_table__LE5G)[ 0];
-          if ((result__ME5G == (void *)NULL)) {
-            result__ME5G=new_lab__2QJ(new_size__EE5G);
-            next__KE5G=(void *)((unsigned long)result__ME5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EE5G)));
-            ((__POINTER *)next__KE5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LE5G)[ 0]=next__KE5G;
-          } else {
-            next__KE5G=((__POINTER *)result__ME5G)[ 0];
-            if ((next__KE5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ME5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EE5G <<  1)) <=  4096)) {
-                next__KE5G=(void *)((unsigned long)result__ME5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EE5G)));
+              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)));
               } else {
-                next__KE5G=new_lab__2QJ(new_size__EE5G);
+                next__JIBH=new_lab__ARJ(new_size__DIBH);
               };
-              ((__POINTER *)next__KE5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LE5G)[ 0]=next__KE5G;
+              ((__POINTER *)next__JIBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KIBH)[ 0]=next__JIBH;
             } else {
-              ((__POINTER *)result__ME5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__KE5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ME5G=next__KE5G;
-            };
-          };
-          ptr__AE5G=result__ME5G;
-        } else {
-          t__FE5G=((__UINTEGER_32 )typ_id__BE5G);
-          a__GE5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__TE5G=(__UINTEGER_32)((__UINTEGER_32)(sz__CE5G + a__GE5G) & (__UINTEGER_32)(~ a__GE5G));
-          ptr_table__QE5G=((__POINTER )(&(table_type[(t__FE5G)])));
-          lab_type__SE5G=(__UINTEGER_32)(t__FE5G |  1);
-          next__PE5G=((__POINTER )(NULL));
-          result__RE5G=((__POINTER *)ptr_table__QE5G)[ 0];
-          if ((result__RE5G == (void *)NULL)) {
-            result__RE5G=new_lab__2QJ(lab_type__SE5G);
-            next__PE5G=(void *)((unsigned long)result__RE5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TE5G)));
-            ((__POINTER *)next__PE5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QE5G)[ 0]=next__PE5G;
-          } else {
-            next__PE5G=((__POINTER *)result__RE5G)[ 0];
-            if ((next__PE5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RE5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TE5G <<  1)) <=  4096)) {
-                next__PE5G=(void *)((unsigned long)result__RE5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TE5G)));
+              ((__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)));
               } else {
-                next__PE5G=new_lab__2QJ(lab_type__SE5G);
+                next__OIBH=new_lab__ARJ(lab_type__RIBH);
               };
-              ((__POINTER *)next__PE5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QE5G)[ 0]=next__PE5G;
+              ((__POINTER *)next__OIBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PIBH)[ 0]=next__OIBH;
             } else {
-              ((__POINTER *)result__RE5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__PE5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__RE5G=next__PE5G;
+              ((__POINTER *)result__QIBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QIBH=next__OIBH;
             };
           };
-          ptr__AE5G=result__RE5G;
+          ptr__5HBH=result__QIBH;
         };
-        result__5D5G=((__ITM_OPERATOR *)ptr__AE5G);
-        *(result__5D5G) = *(ITM_OPERATOR__);
+        result__4HBH=((__ITM_OPERATOR *)ptr__5HBH);
+        *(result__4HBH) = *(ITM_OPERATOR__);
       };
-      Self__HE5G=((__ITM_OPERATOR *)result__5D5G);
-      Self__HE5G->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ=p__IE5G;
-      Self__HE5G->name__5HL=n__JE5G;
-      expr__SEL=result__5D5G;
-      add_last__E5U(l_expr__TEL,result__5D5G);
+      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);
     };
-    expr__SEL=read_expr_message__KVL(Self__P4I);
-    if (((void *)expr__SEL == (void *)NULL)) {
-      if ((! (((__FAST_ARRAYoITM_CODEo *)result__L3H)->parent_arrayed_collection__BTF.upper__MHL <  0))) {
-        pos__J3OG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_225));
-        put_position__EOG(pos__J3OG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+    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)) {
           exit(( 1));
         };
       };
-      free__IVI(result__L3H);
+      free__MVI(result__P3H);
     } else {
-      first_msg__XEL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__L3H)->parent_arrayed_collection__BTF.upper__MHL +  1);
+      first_msg__1EL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__P3H)->parent_arrayed_collection__FTF.upper__QHL +  1);
       do {
-        last_msg__WEL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__TEL)->parent_arrayed_collection__BTF.upper__MHL +  1);
-        add_last__E5U(l_expr__TEL,expr__SEL);
-        if (read_operator__XMM()) {
+        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()) {
           do {
-            p__5GP=current_position__ZWF();
-            n__AHP=last_string__YZC;
-            result__DSP=NULL;
-            ptr__ESP=((__POINTER )(NULL));
-            typ_id__JSP= 0;
-            sz__GSP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
-            if ((sz__GSP ==  0)) {
-              result__DSP=ITM_OPERATOR__;
+            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__;
             } else {
-              typ_id__JSP=-1;
-              clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__GSP);
-              if ((typ_id__JSP == (__INTEGER)(-  1))) {
-                a__MN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__NN2G=(__UINTEGER_32)((__UINTEGER_32)(sz__GSP + a__MN2G) & (__UINTEGER_32)(~ a__MN2G));
-                ptr_table__VE5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NN2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__UE5G=((__POINTER )(NULL));
-                result__WE5G=((__POINTER *)ptr_table__VE5G)[ 0];
-                if ((result__WE5G == (void *)NULL)) {
-                  result__WE5G=new_lab__2QJ(new_size__NN2G);
-                  next__UE5G=(void *)((unsigned long)result__WE5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NN2G)));
-                  ((__POINTER *)next__UE5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__VE5G)[ 0]=next__UE5G;
+              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;
                 } else {
-                  next__UE5G=((__POINTER *)result__WE5G)[ 0];
-                  if ((next__UE5G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WE5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NN2G <<  1)) <=  4096)) {
-                      next__UE5G=(void *)((unsigned long)result__WE5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NN2G)));
+                  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)));
                     } else {
-                      next__UE5G=new_lab__2QJ(new_size__NN2G);
+                      next__TIBH=new_lab__ARJ(new_size__MQ4G);
                     };
-                    ((__POINTER *)next__UE5G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__VE5G)[ 0]=next__UE5G;
+                    ((__POINTER *)next__TIBH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__UIBH)[ 0]=next__TIBH;
                   } else {
-                    ((__POINTER *)result__WE5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__UE5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__WE5G=next__UE5G;
+                    ((__POINTER *)result__VIBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__VIBH=next__TIBH;
                   };
                 };
-                ptr__ESP=result__WE5G;
+                ptr__ISP=result__VIBH;
               } else {
-                t__RN2G=((__UINTEGER_32 )typ_id__JSP);
-                a__QN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__3E5G=(__UINTEGER_32)((__UINTEGER_32)(sz__GSP + a__QN2G) & (__UINTEGER_32)(~ a__QN2G));
-                ptr_table__0E5G=((__POINTER )(&(table_type[(t__RN2G)])));
-                lab_type__2E5G=(__UINTEGER_32)(t__RN2G |  1);
-                next__ZE5G=((__POINTER )(NULL));
-                result__1E5G=((__POINTER *)ptr_table__0E5G)[ 0];
-                if ((result__1E5G == (void *)NULL)) {
-                  result__1E5G=new_lab__2QJ(lab_type__2E5G);
-                  next__ZE5G=(void *)((unsigned long)result__1E5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3E5G)));
-                  ((__POINTER *)next__ZE5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__0E5G)[ 0]=next__ZE5G;
+                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;
                 } else {
-                  next__ZE5G=((__POINTER *)result__1E5G)[ 0];
-                  if ((next__ZE5G == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1E5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3E5G <<  1)) <=  4096)) {
-                      next__ZE5G=(void *)((unsigned long)result__1E5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3E5G)));
+                  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)));
                     } else {
-                      next__ZE5G=new_lab__2QJ(lab_type__2E5G);
+                      next__YIBH=new_lab__ARJ(lab_type__1IBH);
                     };
-                    ((__POINTER *)next__ZE5G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__0E5G)[ 0]=next__ZE5G;
+                    ((__POINTER *)next__YIBH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__ZIBH)[ 0]=next__YIBH;
                   } else {
-                    ((__POINTER *)result__1E5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZE5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__1E5G=next__ZE5G;
+                    ((__POINTER *)result__0IBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YIBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__0IBH=next__YIBH;
                   };
                 };
-                ptr__ESP=result__1E5G;
+                ptr__ISP=result__0IBH;
               };
-              result__DSP=((__ITM_OPERATOR *)ptr__ESP);
-              *(result__DSP) = *(ITM_OPERATOR__);
-            };
-            Self__HNV=((__ITM_OPERATOR *)result__DSP);
-            Self__HNV->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ=p__5GP;
-            Self__HNV->name__5HL=n__AHP;
-            expr__SEL=result__DSP;
-            add_last__E5U(l_expr__TEL,result__DSP);
-          } while (read_operator__XMM());
-          expr__SEL=read_expr_message__KVL(Self__P4I);
-        } else {
-          expr__SEL=NULL;
-        };
-      } while (((void *)expr__SEL != (void *)NULL));
-      while ((last_msg__WEL < ((__FAST_ARRAYoITM_CODEo *)l_expr__TEL)->parent_arrayed_collection__BTF.upper__MHL)) {
-        __tmp__YHL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TEL)->parent_arrayed_collection__BTF.storage__VXT)[(__INTEGER)(last_msg__WEL +  1)];
-        if (__tmp__YHL==NULL) {
-          __tmp__ZHL=NULL;
-        } else {
-          switch (((struct ___OBJ *)__tmp__YHL)->__id) {
+              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) {
           case __ITM_LIST__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__ZHL=((void *)__tmp__YHL);
+            __tmp__3HL=((void *)__tmp__2HL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__ZHL=NULL;
+            __tmp__3HL=NULL;
           } break;
           }
         };
-        itm_op__VEL=__tmp__ZHL;
-        __tmp__2HL=((__ITM_OPERATOR *)__tmp__ZHL)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
-        operator__name__NDO((&__string_82),((__ITM_OPERATOR *)__tmp__ZHL)->name__5HL);
-        result__4E5G=NULL;
-        ptr__5E5G=((__POINTER )(NULL));
-        typ_id__AF5G= 0;
-        sz__BF5G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-        if ((sz__BF5G ==  0)) {
-          result__4E5G=ITM_READ_ARG1__;
-        } else {
-          typ_id__AF5G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__BF5G);
-          if ((typ_id__AF5G == (__INTEGER)(-  1))) {
-            a__CF5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__DF5G=(__UINTEGER_32)((__UINTEGER_32)(sz__BF5G + a__CF5G) & (__UINTEGER_32)(~ a__CF5G));
-            ptr_table__IF5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DF5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__HF5G=((__POINTER )(NULL));
-            result__JF5G=((__POINTER *)ptr_table__IF5G)[ 0];
-            if ((result__JF5G == (void *)NULL)) {
-              result__JF5G=new_lab__2QJ(new_size__DF5G);
-              next__HF5G=(void *)((unsigned long)result__JF5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DF5G)));
-              ((__POINTER *)next__HF5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IF5G)[ 0]=next__HF5G;
+        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;
             } else {
-              next__HF5G=((__POINTER *)result__JF5G)[ 0];
-              if ((next__HF5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JF5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DF5G <<  1)) <=  4096)) {
-                  next__HF5G=(void *)((unsigned long)result__JF5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DF5G)));
+              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)));
                 } else {
-                  next__HF5G=new_lab__2QJ(new_size__DF5G);
+                  next__GJBH=new_lab__ARJ(new_size__CJBH);
                 };
-                ((__POINTER *)next__HF5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IF5G)[ 0]=next__HF5G;
+                ((__POINTER *)next__GJBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HJBH)[ 0]=next__GJBH;
               } else {
-                ((__POINTER *)result__JF5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__HF5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__JF5G=next__HF5G;
+                ((__POINTER *)result__IJBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GJBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__IJBH=next__GJBH;
               };
             };
-            ptr__5E5G=result__JF5G;
-          } else {
-            t__EF5G=((__UINTEGER_32 )typ_id__AF5G);
-            a__FF5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__QF5G=(__UINTEGER_32)((__UINTEGER_32)(sz__BF5G + a__FF5G) & (__UINTEGER_32)(~ a__FF5G));
-            ptr_table__NF5G=((__POINTER )(&(table_type[(t__EF5G)])));
-            lab_type__PF5G=(__UINTEGER_32)(t__EF5G |  1);
-            next__MF5G=((__POINTER )(NULL));
-            result__OF5G=((__POINTER *)ptr_table__NF5G)[ 0];
-            if ((result__OF5G == (void *)NULL)) {
-              result__OF5G=new_lab__2QJ(lab_type__PF5G);
-              next__MF5G=(void *)((unsigned long)result__OF5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QF5G)));
-              ((__POINTER *)next__MF5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NF5G)[ 0]=next__MF5G;
+            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;
             } else {
-              next__MF5G=((__POINTER *)result__OF5G)[ 0];
-              if ((next__MF5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OF5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QF5G <<  1)) <=  4096)) {
-                  next__MF5G=(void *)((unsigned long)result__OF5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QF5G)));
+              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)));
                 } else {
-                  next__MF5G=new_lab__2QJ(lab_type__PF5G);
+                  next__LJBH=new_lab__ARJ(lab_type__OJBH);
                 };
-                ((__POINTER *)next__MF5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NF5G)[ 0]=next__MF5G;
+                ((__POINTER *)next__LJBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MJBH)[ 0]=next__LJBH;
               } else {
-                ((__POINTER *)result__OF5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MF5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__OF5G=next__MF5G;
+                ((__POINTER *)result__NJBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NJBH=next__LJBH;
               };
             };
-            ptr__5E5G=result__OF5G;
-          };
-          result__4E5G=((__ITM_READ_ARG1 *)ptr__5E5G);
-          *(result__4E5G) = *(ITM_READ_ARG1__);
-        };
-        ((__ITM_READ_ARG1 *)result__4E5G)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=__tmp__2HL;
-        expr__SEL=result__4E5G;
-        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TEL)->parent_arrayed_collection__BTF.storage__VXT)[last_msg__WEL]=result__4E5G;
-        Self__RF5G=((__FAST_ARRAYoITM_CODEo *)l_expr__TEL);
-        index__VF5G=(__INTEGER)(last_msg__WEL +  1);
-        __tmp__SF5G=Self__RF5G->parent_arrayed_collection__BTF.storage__VXT;
-        __tmp__TF5G=Self__RF5G->parent_arrayed_collection__BTF.upper__MHL;
-        Self__UF5G=((void **)__tmp__SF5G);
-        i__WF5G=index__VF5G;
-        while ((i__WF5G != __tmp__TF5G)) {
-          Self__UF5G[i__WF5G]=Self__UF5G[(__INTEGER)(i__WF5G +  1)];
-          i__WF5G=(__INTEGER)(i__WF5G +  1);
-        };
-        Self__RF5G->parent_arrayed_collection__BTF.upper__MHL=(__INTEGER)(Self__RF5G->parent_arrayed_collection__BTF.upper__MHL -  1);
-      };
-      if (((__INTEGER)(last_msg__WEL - first_msg__XEL) <  3)) {
-        while ((first_msg__XEL !=  0)) {
-          __tmp__5IL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TEL)->parent_arrayed_collection__BTF.storage__VXT)[(__INTEGER)(first_msg__XEL -  1)];
-          if (__tmp__5IL==NULL) {
-            __tmp__AJL=NULL;
-          } else {
-            switch (((struct ___OBJ *)__tmp__5IL)->__id) {
+            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) {
             case __ITM_LIST__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__AJL=((void *)__tmp__5IL);
+              __tmp__EJL=((void *)__tmp__DJL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__AJL=NULL;
+              __tmp__EJL=NULL;
             } break;
             }
           };
-          itm_op__VEL=__tmp__AJL;
-          __tmp__CJL=((__ITM_OPERATOR *)__tmp__AJL)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
-          operator__name__NDO((&__string_83),((__ITM_OPERATOR *)__tmp__AJL)->name__5HL);
-          result__YF5G=NULL;
-          ptr__ZF5G=((__POINTER )(NULL));
-          typ_id__0F5G= 0;
-          sz__1F5G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-          if ((sz__1F5G ==  0)) {
-            result__YF5G=ITM_READ_ARG1__;
-          } else {
-            typ_id__0F5G=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__1F5G);
-            if ((typ_id__0F5G == (__INTEGER)(-  1))) {
-              a__2F5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__3F5G=(__UINTEGER_32)((__UINTEGER_32)(sz__1F5G + a__2F5G) & (__UINTEGER_32)(~ a__2F5G));
-              ptr_table__CG5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3F5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__BG5G=((__POINTER )(NULL));
-              result__DG5G=((__POINTER *)ptr_table__CG5G)[ 0];
-              if ((result__DG5G == (void *)NULL)) {
-                result__DG5G=new_lab__2QJ(new_size__3F5G);
-                next__BG5G=(void *)((unsigned long)result__DG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3F5G)));
-                ((__POINTER *)next__BG5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CG5G)[ 0]=next__BG5G;
+          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;
               } else {
-                next__BG5G=((__POINTER *)result__DG5G)[ 0];
-                if ((next__BG5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DG5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3F5G <<  1)) <=  4096)) {
-                    next__BG5G=(void *)((unsigned long)result__DG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3F5G)));
+                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)));
                   } else {
-                    next__BG5G=new_lab__2QJ(new_size__3F5G);
+                    next__AKBH=new_lab__ARJ(new_size__2JBH);
                   };
-                  ((__POINTER *)next__BG5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__CG5G)[ 0]=next__BG5G;
+                  ((__POINTER *)next__AKBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BKBH)[ 0]=next__AKBH;
                 } else {
-                  ((__POINTER *)result__DG5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BG5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__DG5G=next__BG5G;
+                  ((__POINTER *)result__CKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CKBH=next__AKBH;
                 };
               };
-              ptr__ZF5G=result__DG5G;
+              ptr__YJBH=result__CKBH;
             } else {
-              t__4F5G=((__UINTEGER_32 )typ_id__0F5G);
-              a__5F5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__KG5G=(__UINTEGER_32)((__UINTEGER_32)(sz__1F5G + a__5F5G) & (__UINTEGER_32)(~ a__5F5G));
-              ptr_table__HG5G=((__POINTER )(&(table_type[(t__4F5G)])));
-              lab_type__JG5G=(__UINTEGER_32)(t__4F5G |  1);
-              next__GG5G=((__POINTER )(NULL));
-              result__IG5G=((__POINTER *)ptr_table__HG5G)[ 0];
-              if ((result__IG5G == (void *)NULL)) {
-                result__IG5G=new_lab__2QJ(lab_type__JG5G);
-                next__GG5G=(void *)((unsigned long)result__IG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KG5G)));
-                ((__POINTER *)next__GG5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HG5G)[ 0]=next__GG5G;
+              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;
               } else {
-                next__GG5G=((__POINTER *)result__IG5G)[ 0];
-                if ((next__GG5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IG5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KG5G <<  1)) <=  4096)) {
-                    next__GG5G=(void *)((unsigned long)result__IG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KG5G)));
+                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)));
                   } else {
-                    next__GG5G=new_lab__2QJ(lab_type__JG5G);
+                    next__FKBH=new_lab__ARJ(lab_type__IKBH);
                   };
-                  ((__POINTER *)next__GG5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HG5G)[ 0]=next__GG5G;
+                  ((__POINTER *)next__FKBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GKBH)[ 0]=next__FKBH;
                 } else {
-                  ((__POINTER *)result__IG5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GG5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IG5G=next__GG5G;
+                  ((__POINTER *)result__HKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HKBH=next__FKBH;
                 };
               };
-              ptr__ZF5G=result__IG5G;
+              ptr__YJBH=result__HKBH;
             };
-            result__YF5G=((__ITM_READ_ARG1 *)ptr__ZF5G);
-            *(result__YF5G) = *(ITM_READ_ARG1__);
+            result__XJBH=((__ITM_READ_ARG1 *)ptr__YJBH);
+            *(result__XJBH) = *(ITM_READ_ARG1__);
           };
-          ((__ITM_READ_ARG1 *)result__YF5G)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=__tmp__CJL;
-          expr__SEL=result__YF5G;
-          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TEL)->parent_arrayed_collection__BTF.storage__VXT)[first_msg__XEL]=result__YF5G;
-          first_msg__XEL=(__INTEGER)(first_msg__XEL -  1);
-          Self__XD1C=((__FAST_ARRAYoITM_CODEo *)l_expr__TEL);
-          __tmp__AE1C=Self__XD1C->parent_arrayed_collection__BTF.storage__VXT;
-          __tmp__BE1C=Self__XD1C->parent_arrayed_collection__BTF.upper__MHL;
-          Self__CHCD=((void **)__tmp__AE1C);
-          i__THCD=first_msg__XEL;
-          while ((i__THCD != __tmp__BE1C)) {
-            Self__CHCD[i__THCD]=Self__CHCD[(__INTEGER)(i__THCD +  1)];
-            i__THCD=(__INTEGER)(i__THCD +  1);
+          ((__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);
           };
-          Self__XD1C->parent_arrayed_collection__BTF.upper__MHL=(__INTEGER)(Self__XD1C->parent_arrayed_collection__BTF.upper__MHL -  1);
+          Self__1D1C->parent_arrayed_collection__FTF.upper__QHL=(__INTEGER)(Self__1D1C->parent_arrayed_collection__FTF.upper__QHL -  1);
         };
       };
-      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__L3H)->parent_arrayed_collection__BTF.upper__MHL +  1) ==  1)) {
-        result__REL=((void **)((__FAST_ARRAYoITM_CODEo *)result__L3H)->parent_arrayed_collection__BTF.storage__VXT)[ 0];
-        free__IVI(result__L3H);
-        __tmp__YJL=TRUE__;
+      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__;
       } else {
-        __tmp__YJL=FALSE__;
+        __tmp__2JL=FALSE__;
       };
-      if ((! __tmp__YJL)) {
-        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__L3H)->parent_arrayed_collection__BTF.upper__MHL +  1) ==  3)) {
-          __tmp__FKL=((void **)((__FAST_ARRAYoITM_CODEo *)result__L3H)->parent_arrayed_collection__BTF.storage__VXT)[ 1];
-          if (__tmp__FKL==NULL) {
-            __tmp__GKL=NULL;
+      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;
           } else {
-            switch (((struct ___OBJ *)__tmp__FKL)->__id) {
+            switch (((struct ___OBJ *)__tmp__JKL)->__id) {
             case __ITM_LIST__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__GKL=((void *)__tmp__FKL);
+              __tmp__KKL=((void *)__tmp__JKL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__GKL=NULL;
+              __tmp__KKL=NULL;
             } break;
             }
           };
-          itm_op__VEL=__tmp__GKL;
-          __tmp__JKL=((__ITM_OPERATOR *)__tmp__GKL)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
-          operator__name__NDO((&__string_81),((__ITM_OPERATOR *)__tmp__GKL)->name__5HL);
-          result__XWO=NULL;
-          ptr__YWO=((__POINTER )(NULL));
-          typ_id__3WO= 0;
-          sz__0WO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
-          if ((sz__0WO ==  0)) {
-            result__XWO=ITM_READ_ARG2__;
-          } else {
-            typ_id__3WO=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__0WO);
-            if ((typ_id__3WO == (__INTEGER)(-  1))) {
-              a__CO2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__DO2G=(__UINTEGER_32)((__UINTEGER_32)(sz__0WO + a__CO2G) & (__UINTEGER_32)(~ a__CO2G));
-              ptr_table__MG5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DO2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__LG5G=((__POINTER )(NULL));
-              result__NG5G=((__POINTER *)ptr_table__MG5G)[ 0];
-              if ((result__NG5G == (void *)NULL)) {
-                result__NG5G=new_lab__2QJ(new_size__DO2G);
-                next__LG5G=(void *)((unsigned long)result__NG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DO2G)));
-                ((__POINTER *)next__LG5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MG5G)[ 0]=next__LG5G;
+          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;
               } else {
-                next__LG5G=((__POINTER *)result__NG5G)[ 0];
-                if ((next__LG5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NG5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DO2G <<  1)) <=  4096)) {
-                    next__LG5G=(void *)((unsigned long)result__NG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DO2G)));
+                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)));
                   } else {
-                    next__LG5G=new_lab__2QJ(new_size__DO2G);
+                    next__KKBH=new_lab__ARJ(new_size__CR4G);
                   };
-                  ((__POINTER *)next__LG5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MG5G)[ 0]=next__LG5G;
+                  ((__POINTER *)next__KKBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LKBH)[ 0]=next__KKBH;
                 } else {
-                  ((__POINTER *)result__NG5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LG5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__NG5G=next__LG5G;
+                  ((__POINTER *)result__MKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MKBH=next__KKBH;
                 };
               };
-              ptr__YWO=result__NG5G;
+              ptr__2WO=result__MKBH;
             } else {
-              t__HO2G=((__UINTEGER_32 )typ_id__3WO);
-              a__GO2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__UG5G=(__UINTEGER_32)((__UINTEGER_32)(sz__0WO + a__GO2G) & (__UINTEGER_32)(~ a__GO2G));
-              ptr_table__RG5G=((__POINTER )(&(table_type[(t__HO2G)])));
-              lab_type__TG5G=(__UINTEGER_32)(t__HO2G |  1);
-              next__QG5G=((__POINTER )(NULL));
-              result__SG5G=((__POINTER *)ptr_table__RG5G)[ 0];
-              if ((result__SG5G == (void *)NULL)) {
-                result__SG5G=new_lab__2QJ(lab_type__TG5G);
-                next__QG5G=(void *)((unsigned long)result__SG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UG5G)));
-                ((__POINTER *)next__QG5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RG5G)[ 0]=next__QG5G;
+              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;
               } else {
-                next__QG5G=((__POINTER *)result__SG5G)[ 0];
-                if ((next__QG5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SG5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__UG5G <<  1)) <=  4096)) {
-                    next__QG5G=(void *)((unsigned long)result__SG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UG5G)));
+                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)));
                   } else {
-                    next__QG5G=new_lab__2QJ(lab_type__TG5G);
+                    next__PKBH=new_lab__ARJ(lab_type__SKBH);
                   };
-                  ((__POINTER *)next__QG5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__RG5G)[ 0]=next__QG5G;
+                  ((__POINTER *)next__PKBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QKBH)[ 0]=next__PKBH;
                 } else {
-                  ((__POINTER *)result__SG5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QG5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__SG5G=next__QG5G;
+                  ((__POINTER *)result__RKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__RKBH=next__PKBH;
                 };
               };
-              ptr__YWO=result__SG5G;
-            };
-            result__XWO=((__ITM_READ_ARG2 *)ptr__YWO);
-            *(result__XWO) = *(ITM_READ_ARG2__);
-          };
-          ((__ITM_READ_ARG2 *)result__XWO)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=__tmp__JKL;
-          result__REL=result__XWO;
-          free__IVI(result__L3H);
-        } else {
-          l_expr__TEL=copy__A5H(result__L3H);
-          result__KYO=NULL;
-          ptr__LYO=((__POINTER )(NULL));
-          typ_id__QYO= 0;
-          sz__NYO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
-          if ((sz__NYO ==  0)) {
-            result__KYO=ITM_EXPRESSION__;
-          } else {
-            typ_id__QYO=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__NYO);
-            if ((typ_id__QYO == (__INTEGER)(-  1))) {
-              a__NB2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__OB2G=(__UINTEGER_32)((__UINTEGER_32)(sz__NYO + a__NB2G) & (__UINTEGER_32)(~ a__NB2G));
-              ptr_table__WG5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OB2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__VG5G=((__POINTER )(NULL));
-              result__XG5G=((__POINTER *)ptr_table__WG5G)[ 0];
-              if ((result__XG5G == (void *)NULL)) {
-                result__XG5G=new_lab__2QJ(new_size__OB2G);
-                next__VG5G=(void *)((unsigned long)result__XG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OB2G)));
-                ((__POINTER *)next__VG5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WG5G)[ 0]=next__VG5G;
+              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;
               } else {
-                next__VG5G=((__POINTER *)result__XG5G)[ 0];
-                if ((next__VG5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XG5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OB2G <<  1)) <=  4096)) {
-                    next__VG5G=(void *)((unsigned long)result__XG5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OB2G)));
+                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)));
                   } else {
-                    next__VG5G=new_lab__2QJ(new_size__OB2G);
+                    next__UKBH=new_lab__ARJ(new_size__LC4G);
                   };
-                  ((__POINTER *)next__VG5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WG5G)[ 0]=next__VG5G;
+                  ((__POINTER *)next__UKBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VKBH)[ 0]=next__UKBH;
                 } else {
-                  ((__POINTER *)result__XG5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VG5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XG5G=next__VG5G;
+                  ((__POINTER *)result__WKBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__WKBH=next__UKBH;
                 };
               };
-              ptr__LYO=result__XG5G;
+              ptr__PYO=result__WKBH;
             } else {
-              t__SB2G=((__UINTEGER_32 )typ_id__QYO);
-              a__RB2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__4G5G=(__UINTEGER_32)((__UINTEGER_32)(sz__NYO + a__RB2G) & (__UINTEGER_32)(~ a__RB2G));
-              ptr_table__1G5G=((__POINTER )(&(table_type[(t__SB2G)])));
-              lab_type__3G5G=(__UINTEGER_32)(t__SB2G |  1);
-              next__0G5G=((__POINTER )(NULL));
-              result__2G5G=((__POINTER *)ptr_table__1G5G)[ 0];
-              if ((result__2G5G == (void *)NULL)) {
-                result__2G5G=new_lab__2QJ(lab_type__3G5G);
-                next__0G5G=(void *)((unsigned long)result__2G5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4G5G)));
-                ((__POINTER *)next__0G5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1G5G)[ 0]=next__0G5G;
+              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;
               } else {
-                next__0G5G=((__POINTER *)result__2G5G)[ 0];
-                if ((next__0G5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2G5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4G5G <<  1)) <=  4096)) {
-                    next__0G5G=(void *)((unsigned long)result__2G5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4G5G)));
+                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)));
                   } else {
-                    next__0G5G=new_lab__2QJ(lab_type__3G5G);
+                    next__ZKBH=new_lab__ARJ(lab_type__2KBH);
                   };
-                  ((__POINTER *)next__0G5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1G5G)[ 0]=next__0G5G;
+                  ((__POINTER *)next__ZKBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__0KBH)[ 0]=next__ZKBH;
                 } else {
-                  ((__POINTER *)result__2G5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0G5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2G5G=next__0G5G;
+                  ((__POINTER *)result__1KBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZKBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__1KBH=next__ZKBH;
                 };
               };
-              ptr__LYO=result__2G5G;
+              ptr__PYO=result__1KBH;
             };
-            result__KYO=((__ITM_EXPRESSION *)ptr__LYO);
-            *(result__KYO) = *(ITM_EXPRESSION__);
+            result__OYO=((__ITM_EXPRESSION *)ptr__PYO);
+            *(result__OYO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__KYO)->value_list__LJV=l_expr__TEL;
-          result__REL=result__KYO;
+          ((__ITM_EXPRESSION *)result__OYO)->value_list__PJV=l_expr__XEL;
+          result__VEL=result__OYO;
         };
       };
     };
-    result__R4I=result__REL;
+    result__V4I=result__VEL;
   };
-  return(result__R4I);
+  return(result__V4I);
 }
 
-static void set_value__type__JFHC(__ITM_SLOT *Self__KFHC,void *e__LFHC,void *p__MFHC)
+static void set_value__type__NFHC(__ITM_SLOT *Self__OFHC,void *e__PFHC,void *p__QFHC)
 // ({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__NBBD;
-  void *sec__OBBD;
-  __POSITION __tmp__0BBD,__tmp__CCBD,__tmp__WCBD,__tmp__5CBD;
-  __ITM_ARG *result__JX3G;
-  __POINTER ptr__KX3G,ptr_table__AH5G,next__5G5G,result__BH5G;
-  __POINTER ptr_table__FH5G,next__EH5G,result__GH5G,ptr__2RAC;
-  __POINTER ptr_table__KH5G,next__JH5G,result__LH5G,ptr_table__PH5G;
-  __POINTER next__OH5G,result__QH5G,ptr__ZTI,ptr_table__UH5G,next__TH5G;
-  __POINTER result__VH5G,ptr_table__ZH5G,next__YH5G,result__0H5G;
-  __POINTER ptr__4ECD,ptr_table__4H5G,next__3H5G,result__5H5G;
-  __POINTER ptr_table__DI5G,next__CI5G,result__EI5G;
-  __INTEGER typ_id__LX3G,typ_id__BSAC,typ_id__4TI,typ_id__DFCD;
-  __UINTEGER_32 sz__MX3G,a__NX3G,new_size__OX3G,t__PX3G,a__QX3G;
-  __UINTEGER_32 new_size__IH5G,lab_type__HH5G,sz__4RAC,a__YB2G;
-  __UINTEGER_32 new_size__ZB2G,t__3B2G,a__2B2G,new_size__SH5G;
-  __UINTEGER_32 lab_type__RH5G,sz__1TI,a__UC2G,new_size__VC2G,t__ZC2G;
-  __UINTEGER_32 a__YC2G,new_size__2H5G,lab_type__1H5G,sz__AFCD,a__2C2G;
-  __UINTEGER_32 new_size__3C2G,t__BD2G,a__AD2G,new_size__GI5G;
-  __UINTEGER_32 lab_type__FI5G;
-  __ITM_SLOT *result__1RAC,*Self__Z1HC;
-  __ITM_PROTOTYPE *result__YTI;
-  __ITM_READ_ARG1 *result__3ECD;
-  void *larg__PBBD;
-  if ((Self__KFHC->affect__Z5FC != '<')) {
-    copy__JCS(string_tmp__VH,(&__string_226));
-    append__RNS(string_tmp__VH,Self__KFHC->parent_named__D5.name__LI);
-    n__NBBD=get__YVB(string_tmp__VH);
-    sec__OBBD=get_name__KUOB((&__string_27));
-    larg__PBBD=create_with_capacity__BL5B( 1);
-    switch (((struct ___OBJ *)e__LFHC)->__id) {
+  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) {
     case __ITM_LIST__: {
-      __tmp__0BBD=((__ITM_LIST *)e__LFHC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__0BBD=((__ITM_LDOTS *)e__LFHC)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__0BBD=((__ITM_PROTOTYPE *)e__LFHC)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__0BBD=((__ITM_LIST_IDF *)e__LFHC)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__0BBD=((__ITM_WRITE_VALUE *)e__LFHC)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__0BBD=((__ITM_WRITE_CAST *)e__LFHC)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__0BBD=((__ITM_READ *)e__LFHC)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__0BBD=((__ITM_WRITE_CODE *)e__LFHC)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__0BBD=((__ITM_OPERATOR *)e__LFHC)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__0BBD=((__ITM_READ_ARG1 *)e__LFHC)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__0BBD=((__ITM_READ_ARG2 *)e__LFHC)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__0BBD=position__VC5B(e__LFHC);
+      __tmp__4BBD=position__ZC5B(e__PFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__0BBD=((__ITM_OLD *)e__LFHC)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__0BBD=((__ITM_EXTERNAL_TYPE *)e__LFHC)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__0BBD=((__ITM_LIST *)((__ITM_BLOCK *)e__LFHC)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__0BBD=((__ITM_EXTERNAL *)e__LFHC)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__0BBD=((__ITM_READ_ARGS *)e__LFHC)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__0BBD=((__ITM_REAL *)e__LFHC)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__0BBD=((__ITM_NUMBER *)e__LFHC)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__0BBD=((__ITM_CHARACTER *)e__LFHC)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__0BBD=((__ITM_STRING *)e__LFHC)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__4BBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__0BBD=position__VIHC(e__LFHC);
+      __tmp__4BBD=position__ZIHC(e__PFHC);
     } break;
     };
-    result__JX3G=NULL;
-    ptr__KX3G=((__POINTER )(NULL));
-    typ_id__LX3G= 0;
-    sz__MX3G=((__UINTEGER_32 )sizeof(__ITM_ARG));
-    if ((sz__MX3G ==  0)) {
-      result__JX3G=ITM_ARG__;
-    } else {
-      typ_id__LX3G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__MX3G);
-      if ((typ_id__LX3G == (__INTEGER)(-  1))) {
-        a__NX3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OX3G=(__UINTEGER_32)((__UINTEGER_32)(sz__MX3G + a__NX3G) & (__UINTEGER_32)(~ a__NX3G));
-        ptr_table__AH5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OX3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__5G5G=((__POINTER )(NULL));
-        result__BH5G=((__POINTER *)ptr_table__AH5G)[ 0];
-        if ((result__BH5G == (void *)NULL)) {
-          result__BH5G=new_lab__2QJ(new_size__OX3G);
-          next__5G5G=(void *)((unsigned long)result__BH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OX3G)));
-          ((__POINTER *)next__5G5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AH5G)[ 0]=next__5G5G;
-        } else {
-          next__5G5G=((__POINTER *)result__BH5G)[ 0];
-          if ((next__5G5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BH5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OX3G <<  1)) <=  4096)) {
-              next__5G5G=(void *)((unsigned long)result__BH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OX3G)));
+    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)));
             } else {
-              next__5G5G=new_lab__2QJ(new_size__OX3G);
-            };
-            ((__POINTER *)next__5G5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AH5G)[ 0]=next__5G5G;
-          } else {
-            ((__POINTER *)result__BH5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__5G5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BH5G=next__5G5G;
-          };
-        };
-        ptr__KX3G=result__BH5G;
-      } else {
-        t__PX3G=((__UINTEGER_32 )typ_id__LX3G);
-        a__QX3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__IH5G=(__UINTEGER_32)((__UINTEGER_32)(sz__MX3G + a__QX3G) & (__UINTEGER_32)(~ a__QX3G));
-        ptr_table__FH5G=((__POINTER )(&(table_type[(t__PX3G)])));
-        lab_type__HH5G=(__UINTEGER_32)(t__PX3G |  1);
-        next__EH5G=((__POINTER )(NULL));
-        result__GH5G=((__POINTER *)ptr_table__FH5G)[ 0];
-        if ((result__GH5G == (void *)NULL)) {
-          result__GH5G=new_lab__2QJ(lab_type__HH5G);
-          next__EH5G=(void *)((unsigned long)result__GH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IH5G)));
-          ((__POINTER *)next__EH5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FH5G)[ 0]=next__EH5G;
-        } else {
-          next__EH5G=((__POINTER *)result__GH5G)[ 0];
-          if ((next__EH5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GH5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__IH5G <<  1)) <=  4096)) {
-              next__EH5G=(void *)((unsigned long)result__GH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IH5G)));
+              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)));
             } else {
-              next__EH5G=new_lab__2QJ(lab_type__HH5G);
+              next__DLBH=new_lab__ARJ(lab_type__GLBH);
             };
-            ((__POINTER *)next__EH5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FH5G)[ 0]=next__EH5G;
+            ((__POINTER *)next__DLBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ELBH)[ 0]=next__DLBH;
           } else {
-            ((__POINTER *)result__GH5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__EH5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GH5G=next__EH5G;
+            ((__POINTER *)result__FLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FLBH=next__DLBH;
           };
         };
-        ptr__KX3G=result__GH5G;
+        ptr__K05G=result__FLBH;
       };
-      result__JX3G=((__ITM_ARG *)ptr__KX3G);
-      *(result__JX3G) = *(ITM_ARG__);
+      result__J05G=((__ITM_ARG *)ptr__K05G);
+      *(result__J05G) = *(ITM_ARG__);
     };
-    ((__ITM_ARG *)result__JX3G)->parent_itm_argument__JHHB.parent_itm_code__C4M.position__3CJ=__tmp__0BBD;
-    add_last__K5GC(larg__PBBD,result__JX3G);
-    switch (((struct ___OBJ *)e__LFHC)->__id) {
+    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) {
     case __ITM_LIST__: {
-      __tmp__CCBD=((__ITM_LIST *)e__LFHC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__CCBD=((__ITM_LDOTS *)e__LFHC)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__CCBD=((__ITM_PROTOTYPE *)e__LFHC)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__CCBD=((__ITM_LIST_IDF *)e__LFHC)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__CCBD=((__ITM_WRITE_VALUE *)e__LFHC)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__CCBD=((__ITM_WRITE_CAST *)e__LFHC)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__CCBD=((__ITM_READ *)e__LFHC)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__CCBD=((__ITM_WRITE_CODE *)e__LFHC)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__CCBD=((__ITM_OPERATOR *)e__LFHC)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__CCBD=((__ITM_READ_ARG1 *)e__LFHC)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__CCBD=((__ITM_READ_ARG2 *)e__LFHC)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__CCBD=position__VC5B(e__LFHC);
+      __tmp__GCBD=position__ZC5B(e__PFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__CCBD=((__ITM_OLD *)e__LFHC)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__CCBD=((__ITM_EXTERNAL_TYPE *)e__LFHC)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__CCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__LFHC)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__CCBD=((__ITM_EXTERNAL *)e__LFHC)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__CCBD=((__ITM_READ_ARGS *)e__LFHC)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__CCBD=((__ITM_REAL *)e__LFHC)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__CCBD=((__ITM_NUMBER *)e__LFHC)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__CCBD=((__ITM_CHARACTER *)e__LFHC)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__CCBD=((__ITM_STRING *)e__LFHC)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__GCBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__CCBD=position__VIHC(e__LFHC);
+      __tmp__GCBD=position__ZIHC(e__PFHC);
     } break;
     };
-    result__1RAC=NULL;
-    ptr__2RAC=((__POINTER )(NULL));
-    typ_id__BSAC= 0;
-    sz__4RAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-    if ((sz__4RAC ==  0)) {
-      result__1RAC=ITM_SLOT__;
-    } else {
-      typ_id__BSAC=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4RAC);
-      if ((typ_id__BSAC == (__INTEGER)(-  1))) {
-        a__YB2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__ZB2G=(__UINTEGER_32)((__UINTEGER_32)(sz__4RAC + a__YB2G) & (__UINTEGER_32)(~ a__YB2G));
-        ptr_table__KH5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZB2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__JH5G=((__POINTER )(NULL));
-        result__LH5G=((__POINTER *)ptr_table__KH5G)[ 0];
-        if ((result__LH5G == (void *)NULL)) {
-          result__LH5G=new_lab__2QJ(new_size__ZB2G);
-          next__JH5G=(void *)((unsigned long)result__LH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZB2G)));
-          ((__POINTER *)next__JH5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KH5G)[ 0]=next__JH5G;
-        } else {
-          next__JH5G=((__POINTER *)result__LH5G)[ 0];
-          if ((next__JH5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LH5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZB2G <<  1)) <=  4096)) {
-              next__JH5G=(void *)((unsigned long)result__LH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZB2G)));
+    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)));
             } else {
-              next__JH5G=new_lab__2QJ(new_size__ZB2G);
-            };
-            ((__POINTER *)next__JH5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KH5G)[ 0]=next__JH5G;
-          } else {
-            ((__POINTER *)result__LH5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JH5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LH5G=next__JH5G;
-          };
-        };
-        ptr__2RAC=result__LH5G;
-      } else {
-        t__3B2G=((__UINTEGER_32 )typ_id__BSAC);
-        a__2B2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__SH5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4RAC + a__2B2G) & (__UINTEGER_32)(~ a__2B2G));
-        ptr_table__PH5G=((__POINTER )(&(table_type[(t__3B2G)])));
-        lab_type__RH5G=(__UINTEGER_32)(t__3B2G |  1);
-        next__OH5G=((__POINTER )(NULL));
-        result__QH5G=((__POINTER *)ptr_table__PH5G)[ 0];
-        if ((result__QH5G == (void *)NULL)) {
-          result__QH5G=new_lab__2QJ(lab_type__RH5G);
-          next__OH5G=(void *)((unsigned long)result__QH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SH5G)));
-          ((__POINTER *)next__OH5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PH5G)[ 0]=next__OH5G;
-        } else {
-          next__OH5G=((__POINTER *)result__QH5G)[ 0];
-          if ((next__OH5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QH5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SH5G <<  1)) <=  4096)) {
-              next__OH5G=(void *)((unsigned long)result__QH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SH5G)));
+              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)));
             } else {
-              next__OH5G=new_lab__2QJ(lab_type__RH5G);
+              next__NLBH=new_lab__ARJ(lab_type__QLBH);
             };
-            ((__POINTER *)next__OH5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PH5G)[ 0]=next__OH5G;
+            ((__POINTER *)next__NLBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OLBH)[ 0]=next__NLBH;
           } else {
-            ((__POINTER *)result__QH5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__OH5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QH5G=next__OH5G;
+            ((__POINTER *)result__PLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PLBH=next__NLBH;
           };
         };
-        ptr__2RAC=result__QH5G;
+        ptr__ASAC=result__PLBH;
       };
-      result__1RAC=((__ITM_SLOT *)ptr__2RAC);
-      *(result__1RAC) = *(ITM_SLOT__);
+      result__5RAC=((__ITM_SLOT *)ptr__ASAC);
+      *(result__5RAC) = *(ITM_SLOT__);
     };
-    Self__Z1HC=((__ITM_SLOT *)result__1RAC);
-    Self__Z1HC->parent_named__D5.name__LI=n__NBBD;
-    Self__Z1HC->parent_named__D5.parent_itm_object__4.position__3CJ=__tmp__CCBD;
-    Self__Z1HC->id_section__I1C=sec__OBBD;
-    ((__ITM_SLOT *)result__1RAC)->affect__Z5FC='<';
-    set_value__type__JFHC(result__1RAC,e__LFHC,p__MFHC);
-    set_argument_list__FCHC(result__1RAC,larg__PBBD);
-    set_result_type__A3FC(result__1RAC,Self__KFHC->result_type__K4FC);
-    fast_put__to__RNGC(((__PROTOTYPE *)p__MFHC)->slot_list__MUS,result__1RAC,result__1RAC->parent_named__D5.name__LI);
-    switch (((struct ___OBJ *)e__LFHC)->__id) {
+    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) {
     case __ITM_LIST__: {
-      __tmp__WCBD=((__ITM_LIST *)e__LFHC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__WCBD=((__ITM_LDOTS *)e__LFHC)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__WCBD=((__ITM_PROTOTYPE *)e__LFHC)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__WCBD=((__ITM_LIST_IDF *)e__LFHC)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__WCBD=((__ITM_WRITE_VALUE *)e__LFHC)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__WCBD=((__ITM_WRITE_CAST *)e__LFHC)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__WCBD=((__ITM_READ *)e__LFHC)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__WCBD=((__ITM_WRITE_CODE *)e__LFHC)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__WCBD=((__ITM_OPERATOR *)e__LFHC)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__WCBD=((__ITM_READ_ARG1 *)e__LFHC)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__WCBD=((__ITM_READ_ARG2 *)e__LFHC)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__WCBD=position__VC5B(e__LFHC);
+      __tmp__0CBD=position__ZC5B(e__PFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__WCBD=((__ITM_OLD *)e__LFHC)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__WCBD=((__ITM_EXTERNAL_TYPE *)e__LFHC)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__WCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__LFHC)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__WCBD=((__ITM_EXTERNAL *)e__LFHC)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__WCBD=((__ITM_READ_ARGS *)e__LFHC)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__WCBD=((__ITM_REAL *)e__LFHC)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__WCBD=((__ITM_NUMBER *)e__LFHC)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__WCBD=((__ITM_CHARACTER *)e__LFHC)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__WCBD=((__ITM_STRING *)e__LFHC)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__0CBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__WCBD=position__VIHC(e__LFHC);
+      __tmp__0CBD=position__ZIHC(e__PFHC);
     } break;
     };
-    get__TSI(((__PROTOTYPE *)p__MFHC)->parent_named__5.name__LI);
-    result__YTI=NULL;
-    ptr__ZTI=((__POINTER )(NULL));
-    typ_id__4TI= 0;
-    sz__1TI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-    if ((sz__1TI ==  0)) {
-      result__YTI=ITM_PROTOTYPE__;
-    } else {
-      typ_id__4TI=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__1TI);
-      if ((typ_id__4TI == (__INTEGER)(-  1))) {
-        a__UC2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VC2G=(__UINTEGER_32)((__UINTEGER_32)(sz__1TI + a__UC2G) & (__UINTEGER_32)(~ a__UC2G));
-        ptr_table__UH5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VC2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__TH5G=((__POINTER )(NULL));
-        result__VH5G=((__POINTER *)ptr_table__UH5G)[ 0];
-        if ((result__VH5G == (void *)NULL)) {
-          result__VH5G=new_lab__2QJ(new_size__VC2G);
-          next__TH5G=(void *)((unsigned long)result__VH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VC2G)));
-          ((__POINTER *)next__TH5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UH5G)[ 0]=next__TH5G;
-        } else {
-          next__TH5G=((__POINTER *)result__VH5G)[ 0];
-          if ((next__TH5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VH5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VC2G <<  1)) <=  4096)) {
-              next__TH5G=(void *)((unsigned long)result__VH5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VC2G)));
+    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)));
             } else {
-              next__TH5G=new_lab__2QJ(new_size__VC2G);
-            };
-            ((__POINTER *)next__TH5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UH5G)[ 0]=next__TH5G;
-          } else {
-            ((__POINTER *)result__VH5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__TH5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VH5G=next__TH5G;
-          };
-        };
-        ptr__ZTI=result__VH5G;
-      } else {
-        t__ZC2G=((__UINTEGER_32 )typ_id__4TI);
-        a__YC2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__2H5G=(__UINTEGER_32)((__UINTEGER_32)(sz__1TI + a__YC2G) & (__UINTEGER_32)(~ a__YC2G));
-        ptr_table__ZH5G=((__POINTER )(&(table_type[(t__ZC2G)])));
-        lab_type__1H5G=(__UINTEGER_32)(t__ZC2G |  1);
-        next__YH5G=((__POINTER )(NULL));
-        result__0H5G=((__POINTER *)ptr_table__ZH5G)[ 0];
-        if ((result__0H5G == (void *)NULL)) {
-          result__0H5G=new_lab__2QJ(lab_type__1H5G);
-          next__YH5G=(void *)((unsigned long)result__0H5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2H5G)));
-          ((__POINTER *)next__YH5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZH5G)[ 0]=next__YH5G;
-        } else {
-          next__YH5G=((__POINTER *)result__0H5G)[ 0];
-          if ((next__YH5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0H5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__2H5G <<  1)) <=  4096)) {
-              next__YH5G=(void *)((unsigned long)result__0H5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2H5G)));
+              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)));
             } else {
-              next__YH5G=new_lab__2QJ(lab_type__1H5G);
+              next__XLBH=new_lab__ARJ(lab_type__0LBH);
             };
-            ((__POINTER *)next__YH5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZH5G)[ 0]=next__YH5G;
+            ((__POINTER *)next__XLBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YLBH)[ 0]=next__XLBH;
           } else {
-            ((__POINTER *)result__0H5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__YH5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0H5G=next__YH5G;
+            ((__POINTER *)result__ZLBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XLBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZLBH=next__XLBH;
           };
         };
-        ptr__ZTI=result__0H5G;
+        ptr__3TI=result__ZLBH;
       };
-      result__YTI=((__ITM_PROTOTYPE *)ptr__ZTI);
-      *(result__YTI) = *(ITM_PROTOTYPE__);
+      result__2TI=((__ITM_PROTOTYPE *)ptr__3TI);
+      *(result__2TI) = *(ITM_PROTOTYPE__);
     };
-    ((__ITM_PROTOTYPE *)result__YTI)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=__tmp__WCBD;
-    switch (((struct ___OBJ *)e__LFHC)->__id) {
+    ((__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) {
     case __ITM_LIST__: {
-      __tmp__5CBD=((__ITM_LIST *)e__LFHC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_LIST *)e__PFHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__5CBD=((__ITM_LDOTS *)e__LFHC)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_LDOTS *)e__PFHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__5CBD=((__ITM_PROTOTYPE *)e__LFHC)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_PROTOTYPE *)e__PFHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__5CBD=((__ITM_LIST_IDF *)e__LFHC)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_LIST_IDF *)e__PFHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__5CBD=((__ITM_WRITE_VALUE *)e__LFHC)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_WRITE_VALUE *)e__PFHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__5CBD=((__ITM_WRITE_CAST *)e__LFHC)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_WRITE_CAST *)e__PFHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__5CBD=((__ITM_READ *)e__LFHC)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_READ *)e__PFHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__5CBD=((__ITM_WRITE_CODE *)e__LFHC)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_WRITE_CODE *)e__PFHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__5CBD=((__ITM_OPERATOR *)e__LFHC)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_OPERATOR *)e__PFHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__5CBD=((__ITM_READ_ARG1 *)e__LFHC)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_READ_ARG1 *)e__PFHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__5CBD=((__ITM_READ_ARG2 *)e__LFHC)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_READ_ARG2 *)e__PFHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__5CBD=position__VC5B(e__LFHC);
+      __tmp__DDBD=position__ZC5B(e__PFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__5CBD=((__ITM_OLD *)e__LFHC)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_OLD *)e__PFHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__5CBD=((__ITM_EXTERNAL_TYPE *)e__LFHC)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_EXTERNAL_TYPE *)e__PFHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__5CBD=((__ITM_LIST *)((__ITM_BLOCK *)e__LFHC)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__PFHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__5CBD=((__ITM_EXTERNAL *)e__LFHC)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_EXTERNAL *)e__PFHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__5CBD=((__ITM_READ_ARGS *)e__LFHC)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_READ_ARGS *)e__PFHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__5CBD=((__ITM_REAL *)e__LFHC)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_REAL *)e__PFHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__5CBD=((__ITM_NUMBER *)e__LFHC)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_NUMBER *)e__PFHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__5CBD=((__ITM_CHARACTER *)e__LFHC)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_CHARACTER *)e__PFHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__5CBD=((__ITM_STRING *)e__LFHC)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+      __tmp__DDBD=((__ITM_STRING *)e__PFHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__5CBD=position__VIHC(e__LFHC);
+      __tmp__DDBD=position__ZIHC(e__PFHC);
     } break;
     };
-    result__3ECD=NULL;
-    ptr__4ECD=((__POINTER )(NULL));
-    typ_id__DFCD= 0;
-    sz__AFCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-    if ((sz__AFCD ==  0)) {
-      result__3ECD=ITM_READ_ARG1__;
-    } else {
-      typ_id__DFCD=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__AFCD);
-      if ((typ_id__DFCD == (__INTEGER)(-  1))) {
-        a__2C2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__3C2G=(__UINTEGER_32)((__UINTEGER_32)(sz__AFCD + a__2C2G) & (__UINTEGER_32)(~ a__2C2G));
-        ptr_table__4H5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3C2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__3H5G=((__POINTER )(NULL));
-        result__5H5G=((__POINTER *)ptr_table__4H5G)[ 0];
-        if ((result__5H5G == (void *)NULL)) {
-          result__5H5G=new_lab__2QJ(new_size__3C2G);
-          next__3H5G=(void *)((unsigned long)result__5H5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3C2G)));
-          ((__POINTER *)next__3H5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4H5G)[ 0]=next__3H5G;
-        } else {
-          next__3H5G=((__POINTER *)result__5H5G)[ 0];
-          if ((next__3H5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5H5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3C2G <<  1)) <=  4096)) {
-              next__3H5G=(void *)((unsigned long)result__5H5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3C2G)));
+    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)));
             } else {
-              next__3H5G=new_lab__2QJ(new_size__3C2G);
-            };
-            ((__POINTER *)next__3H5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4H5G)[ 0]=next__3H5G;
-          } else {
-            ((__POINTER *)result__5H5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__3H5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__5H5G=next__3H5G;
-          };
-        };
-        ptr__4ECD=result__5H5G;
-      } else {
-        t__BD2G=((__UINTEGER_32 )typ_id__DFCD);
-        a__AD2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__GI5G=(__UINTEGER_32)((__UINTEGER_32)(sz__AFCD + a__AD2G) & (__UINTEGER_32)(~ a__AD2G));
-        ptr_table__DI5G=((__POINTER )(&(table_type[(t__BD2G)])));
-        lab_type__FI5G=(__UINTEGER_32)(t__BD2G |  1);
-        next__CI5G=((__POINTER )(NULL));
-        result__EI5G=((__POINTER *)ptr_table__DI5G)[ 0];
-        if ((result__EI5G == (void *)NULL)) {
-          result__EI5G=new_lab__2QJ(lab_type__FI5G);
-          next__CI5G=(void *)((unsigned long)result__EI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GI5G)));
-          ((__POINTER *)next__CI5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DI5G)[ 0]=next__CI5G;
-        } else {
-          next__CI5G=((__POINTER *)result__EI5G)[ 0];
-          if ((next__CI5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EI5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GI5G <<  1)) <=  4096)) {
-              next__CI5G=(void *)((unsigned long)result__EI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GI5G)));
+              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)));
             } else {
-              next__CI5G=new_lab__2QJ(lab_type__FI5G);
+              next__BMBH=new_lab__ARJ(lab_type__EMBH);
             };
-            ((__POINTER *)next__CI5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DI5G)[ 0]=next__CI5G;
+            ((__POINTER *)next__BMBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CMBH)[ 0]=next__BMBH;
           } else {
-            ((__POINTER *)result__EI5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__CI5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__EI5G=next__CI5G;
+            ((__POINTER *)result__DMBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DMBH=next__BMBH;
           };
         };
-        ptr__4ECD=result__EI5G;
+        ptr__CFCD=result__DMBH;
       };
-      result__3ECD=((__ITM_READ_ARG1 *)ptr__4ECD);
-      *(result__3ECD) = *(ITM_READ_ARG1__);
+      result__BFCD=((__ITM_READ_ARG1 *)ptr__CFCD);
+      *(result__BFCD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__3ECD)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=__tmp__5CBD;
+    ((__ITM_READ_ARG1 *)result__BFCD)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=__tmp__DDBD;
   };
 }
 
-static __POSITION position__VC5B(__ITM_EXPRESSION *Self__WC5B)
+static __POSITION position__ZC5B(__ITM_EXPRESSION *Self__0C5B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  void *__tmp__ZC5B;
-  __POSITION __tmp__0C5B;
-  __tmp__ZC5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__WC5B->value_list__LJV)->parent_arrayed_collection__BTF.storage__VXT)[ 0];
-  switch (((struct ___OBJ *)__tmp__ZC5B)->__id) {
+  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) {
   case __ITM_LIST__: {
-    __tmp__0C5B=((__ITM_LIST *)__tmp__ZC5B)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_LIST *)__tmp__3C5B)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__0C5B=((__ITM_LDOTS *)__tmp__ZC5B)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_LDOTS *)__tmp__3C5B)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__0C5B=((__ITM_PROTOTYPE *)__tmp__ZC5B)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_PROTOTYPE *)__tmp__3C5B)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__0C5B=((__ITM_LIST_IDF *)__tmp__ZC5B)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_LIST_IDF *)__tmp__3C5B)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__0C5B=((__ITM_WRITE_VALUE *)__tmp__ZC5B)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_WRITE_VALUE *)__tmp__3C5B)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__0C5B=((__ITM_WRITE_CAST *)__tmp__ZC5B)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_WRITE_CAST *)__tmp__3C5B)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ__: {
-    __tmp__0C5B=((__ITM_READ *)__tmp__ZC5B)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_READ *)__tmp__3C5B)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__0C5B=((__ITM_WRITE_CODE *)__tmp__ZC5B)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_WRITE_CODE *)__tmp__3C5B)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__0C5B=((__ITM_OPERATOR *)__tmp__ZC5B)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_OPERATOR *)__tmp__3C5B)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__0C5B=((__ITM_READ_ARG1 *)__tmp__ZC5B)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_READ_ARG1 *)__tmp__3C5B)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__0C5B=((__ITM_READ_ARG2 *)__tmp__ZC5B)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_READ_ARG2 *)__tmp__3C5B)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__0C5B=position__VC5B(__tmp__ZC5B);
+    __tmp__4C5B=position__ZC5B(__tmp__3C5B);
   } break;
   case __ITM_OLD__: {
-    __tmp__0C5B=((__ITM_OLD *)__tmp__ZC5B)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_OLD *)__tmp__3C5B)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__0C5B=((__ITM_EXTERNAL_TYPE *)__tmp__ZC5B)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_EXTERNAL_TYPE *)__tmp__3C5B)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__0C5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__ZC5B)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__3C5B)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__0C5B=((__ITM_EXTERNAL *)__tmp__ZC5B)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_EXTERNAL *)__tmp__3C5B)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__0C5B=((__ITM_READ_ARGS *)__tmp__ZC5B)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_READ_ARGS *)__tmp__3C5B)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__0C5B=((__ITM_REAL *)__tmp__ZC5B)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_REAL *)__tmp__3C5B)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__0C5B=((__ITM_NUMBER *)__tmp__ZC5B)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_NUMBER *)__tmp__3C5B)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__0C5B=((__ITM_CHARACTER *)__tmp__ZC5B)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_CHARACTER *)__tmp__3C5B)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__0C5B=((__ITM_STRING *)__tmp__ZC5B)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__4C5B=((__ITM_STRING *)__tmp__3C5B)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__0C5B=position__VIHC(__tmp__ZC5B);
+    __tmp__4C5B=position__ZIHC(__tmp__3C5B);
   } break;
   };
-  return(__tmp__0C5B);
+  return(__tmp__4C5B);
 }
 
-static __POSITION position__VIHC(__ITM_RESULT *Self__WIHC)
+static __POSITION position__ZIHC(__ITM_RESULT *Self__0IHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__YIHC;
-  __POSITION __tmp__ZIHC;
-  __tmp__YIHC=Self__WIHC->value__2KFC;
-  switch (((struct ___OBJ *)__tmp__YIHC)->__id) {
+  void *__tmp__2IHC;
+  __POSITION __tmp__3IHC;
+  __tmp__2IHC=Self__0IHC->value__ALFC;
+  switch (((struct ___OBJ *)__tmp__2IHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__ZIHC=((__ITM_LIST *)__tmp__YIHC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_LIST *)__tmp__2IHC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__ZIHC=((__ITM_LDOTS *)__tmp__YIHC)->parent_itm_constant__AUF.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_LDOTS *)__tmp__2IHC)->parent_itm_constant__EUF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__ZIHC=((__ITM_PROTOTYPE *)__tmp__YIHC)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_PROTOTYPE *)__tmp__2IHC)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__ZIHC=((__ITM_LIST_IDF *)__tmp__YIHC)->parent_itm_code__GCJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_LIST_IDF *)__tmp__2IHC)->parent_itm_code__KCJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__ZIHC=((__ITM_WRITE_VALUE *)__tmp__YIHC)->parent_itm_write__2CJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_WRITE_VALUE *)__tmp__2IHC)->parent_itm_write__ADJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__ZIHC=((__ITM_WRITE_CAST *)__tmp__YIHC)->parent_itm_write__TDJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_WRITE_CAST *)__tmp__2IHC)->parent_itm_write__XDJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ__: {
-    __tmp__ZIHC=((__ITM_READ *)__tmp__YIHC)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_READ *)__tmp__2IHC)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__ZIHC=((__ITM_WRITE_CODE *)__tmp__YIHC)->parent_itm_write__4GJ.parent_itm_code__1CJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_WRITE_CODE *)__tmp__2IHC)->parent_itm_write__CHJ.parent_itm_code__5CJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__ZIHC=((__ITM_OPERATOR *)__tmp__YIHC)->parent_itm_code__UEL.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_OPERATOR *)__tmp__2IHC)->parent_itm_code__YEL.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__ZIHC=((__ITM_READ_ARG1 *)__tmp__YIHC)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_READ_ARG1 *)__tmp__2IHC)->parent_itm_read__4HL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__ZIHC=((__ITM_READ_ARG2 *)__tmp__YIHC)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_READ_ARG2 *)__tmp__2IHC)->parent_itm_read__LKL.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__ZIHC=position__VC5B(__tmp__YIHC);
+    __tmp__3IHC=position__ZC5B(__tmp__2IHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__ZIHC=((__ITM_OLD *)__tmp__YIHC)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_OLD *)__tmp__2IHC)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__ZIHC=((__ITM_EXTERNAL_TYPE *)__tmp__YIHC)->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_EXTERNAL_TYPE *)__tmp__2IHC)->parent_itm_extern__D4M.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__ZIHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__YIHC)->list__QMDC)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__2IHC)->list__UMDC)->parent_itm_code__44E.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__ZIHC=((__ITM_EXTERNAL *)__tmp__YIHC)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_EXTERNAL *)__tmp__2IHC)->parent_itm_extern__IFN.parent_itm_code__C4M.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__ZIHC=((__ITM_READ_ARGS *)__tmp__YIHC)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_READ_ARGS *)__tmp__2IHC)->parent_itm_read__4CO.parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__ZIHC=((__ITM_REAL *)__tmp__YIHC)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_REAL *)__tmp__2IHC)->parent_itm_constant__ZQO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__ZIHC=((__ITM_NUMBER *)__tmp__YIHC)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_NUMBER *)__tmp__2IHC)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__ZIHC=((__ITM_CHARACTER *)__tmp__YIHC)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_CHARACTER *)__tmp__2IHC)->parent_itm_constant__3RO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__ZIHC=((__ITM_STRING *)__tmp__YIHC)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ;
+    __tmp__3IHC=((__ITM_STRING *)__tmp__2IHC)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__ZIHC=position__VIHC(__tmp__YIHC);
+    __tmp__3IHC=position__ZIHC(__tmp__2IHC);
   } break;
   };
-  return(__tmp__ZIHC);
+  return(__tmp__3IHC);
 }
 
-static void fast_put__to__RNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__SNGC,void *v__TNGC,void *k__UNGC)
+static void fast_put__to__VNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__WNGC,void *v__XNGC,void *k__YNGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__TX3G,*Self__YX3G;
-  __INTEGER result__SX3G,__tmp__UX3G,Self__VX3G,idx__2NGC,idx__JMID;
-  __INTEGER new_capacity__KMID,i__LMID,result__XX3G,__tmp__ZX3G;
-  __INTEGER Self__0X3G,typ_id__YOID;
-  __POINTER ptr__TOID,ptr_table__II5G,next__HI5G,result__JI5G;
-  __POINTER ptr_table__NI5G,next__MI5G,result__OI5G;
-  __UINTEGER_32 sz__VOID,a__MC2G,new_size__NC2G,t__RC2G,a__QC2G;
-  __UINTEGER_32 new_size__QI5G,lab_type__PI5G;
-  void *node__3NGC,*node1__NMID,*node2__OMID,*__tmp__LPGC;
-  void **old_buckets__MMID;
-  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__SOID;
-  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__UETD;
-  Self__TX3G=((__STRING_CONSTANT *)k__UNGC);
-  result__SX3G= 0;
-  __tmp__UX3G=Self__TX3G->count__DD;
-  Self__VX3G= 1;
-  while ((Self__VX3G <= __tmp__UX3G)) {
-    result__SX3G=(__INTEGER)((__INTEGER)( 5 * result__SX3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__TX3G->storage__FQO)[(__INTEGER)(Self__VX3G -  1)])));
-    Self__VX3G=(__INTEGER)(Self__VX3G +  1);
-  };
-  if ((result__SX3G <  0)) {
-    result__SX3G=(__INTEGER)(~ result__SX3G);
-  };
-  idx__2NGC=(__INTEGER)(result__SX3G % Self__SNGC->capacity__M4BC);
-  node__3NGC=((void **)Self__SNGC->buckets__TAGC)[idx__2NGC];
-  while ((! (((void *)node__3NGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__3NGC)->key__5AGC == (void *)k__UNGC)))) {
-    node__3NGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__3NGC)->next__KBGC;
-  };
-  if (((void *)node__3NGC == (void *)NULL)) {
-    if ((Self__SNGC->capacity__M4BC == Self__SNGC->count__4OGC)) {
-      idx__JMID= 0;
-      node1__NMID=NULL;
-      node2__OMID=NULL;
-      old_buckets__MMID=Self__SNGC->buckets__TAGC;
-      new_capacity__KMID=prime_number_ceiling__H41((__INTEGER)(Self__SNGC->capacity__M4BC +  1));
-      Self__SNGC->buckets__TAGC=create__NQSC(new_capacity__KMID);
-      i__LMID=(__INTEGER)(Self__SNGC->capacity__M4BC -  1);
-      Self__SNGC->capacity__M4BC=new_capacity__KMID;
-      while ((i__LMID >=  0)) {
-        node1__NMID=((void **)old_buckets__MMID)[i__LMID];
-        while (((void *)node1__NMID != (void *)NULL)) {
-          node2__OMID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__NMID)->next__KBGC;
-          Self__YX3G=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__NMID)->key__5AGC);
-          result__XX3G= 0;
-          __tmp__ZX3G=Self__YX3G->count__DD;
-          Self__0X3G= 1;
-          while ((Self__0X3G <= __tmp__ZX3G)) {
-            result__XX3G=(__INTEGER)((__INTEGER)( 5 * result__XX3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YX3G->storage__FQO)[(__INTEGER)(Self__0X3G -  1)])));
-            Self__0X3G=(__INTEGER)(Self__0X3G +  1);
-          };
-          if ((result__XX3G <  0)) {
-            result__XX3G=(__INTEGER)(~ result__XX3G);
-          };
-          idx__JMID=(__INTEGER)(result__XX3G % Self__SNGC->capacity__M4BC);
-          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__NMID)->next__KBGC=((void **)Self__SNGC->buckets__TAGC)[idx__JMID];
-          ((void **)Self__SNGC->buckets__TAGC)[idx__JMID]=node1__NMID;
-          node1__NMID=node2__OMID;
-        };
-        i__LMID=(__INTEGER)(i__LMID -  1);
-      };
-      idx__2NGC=(__INTEGER)(result__SX3G % new_capacity__KMID);
-    };
-    __tmp__LPGC=((void **)Self__SNGC->buckets__TAGC)[idx__2NGC];
-    result__SOID=NULL;
-    ptr__TOID=((__POINTER )(NULL));
-    typ_id__YOID= 0;
-    sz__VOID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
-    if ((sz__VOID ==  0)) {
-      result__SOID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
-    } else {
-      typ_id__YOID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__VOID);
-      if ((typ_id__YOID == (__INTEGER)(-  1))) {
-        a__MC2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NC2G=(__UINTEGER_32)((__UINTEGER_32)(sz__VOID + a__MC2G) & (__UINTEGER_32)(~ a__MC2G));
-        ptr_table__II5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NC2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__HI5G=((__POINTER )(NULL));
-        result__JI5G=((__POINTER *)ptr_table__II5G)[ 0];
-        if ((result__JI5G == (void *)NULL)) {
-          result__JI5G=new_lab__2QJ(new_size__NC2G);
-          next__HI5G=(void *)((unsigned long)result__JI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NC2G)));
-          ((__POINTER *)next__HI5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__II5G)[ 0]=next__HI5G;
-        } else {
-          next__HI5G=((__POINTER *)result__JI5G)[ 0];
-          if ((next__HI5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JI5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NC2G <<  1)) <=  4096)) {
-              next__HI5G=(void *)((unsigned long)result__JI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NC2G)));
+  __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)));
             } else {
-              next__HI5G=new_lab__2QJ(new_size__NC2G);
-            };
-            ((__POINTER *)next__HI5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__II5G)[ 0]=next__HI5G;
-          } else {
-            ((__POINTER *)result__JI5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__HI5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__JI5G=next__HI5G;
-          };
-        };
-        ptr__TOID=result__JI5G;
-      } else {
-        t__RC2G=((__UINTEGER_32 )typ_id__YOID);
-        a__QC2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__QI5G=(__UINTEGER_32)((__UINTEGER_32)(sz__VOID + a__QC2G) & (__UINTEGER_32)(~ a__QC2G));
-        ptr_table__NI5G=((__POINTER )(&(table_type[(t__RC2G)])));
-        lab_type__PI5G=(__UINTEGER_32)(t__RC2G |  1);
-        next__MI5G=((__POINTER )(NULL));
-        result__OI5G=((__POINTER *)ptr_table__NI5G)[ 0];
-        if ((result__OI5G == (void *)NULL)) {
-          result__OI5G=new_lab__2QJ(lab_type__PI5G);
-          next__MI5G=(void *)((unsigned long)result__OI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QI5G)));
-          ((__POINTER *)next__MI5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NI5G)[ 0]=next__MI5G;
-        } else {
-          next__MI5G=((__POINTER *)result__OI5G)[ 0];
-          if ((next__MI5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OI5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QI5G <<  1)) <=  4096)) {
-              next__MI5G=(void *)((unsigned long)result__OI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QI5G)));
+              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)));
             } else {
-              next__MI5G=new_lab__2QJ(lab_type__PI5G);
+              next__LMBH=new_lab__ARJ(lab_type__OMBH);
             };
-            ((__POINTER *)next__MI5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NI5G)[ 0]=next__MI5G;
+            ((__POINTER *)next__LMBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MMBH)[ 0]=next__LMBH;
           } else {
-            ((__POINTER *)result__OI5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__MI5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__OI5G=next__MI5G;
+            ((__POINTER *)result__NMBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LMBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NMBH=next__LMBH;
           };
         };
-        ptr__TOID=result__OI5G;
+        ptr__XOID=result__NMBH;
       };
-      result__SOID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__TOID);
-      *(result__SOID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+      result__WOID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__XOID);
+      *(result__WOID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
     };
-    Self__UETD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__SOID);
-    Self__UETD->item__SBGC=v__TNGC;
-    Self__UETD->key__5AGC=k__UNGC;
-    Self__UETD->next__KBGC=__tmp__LPGC;
-    node__3NGC=result__SOID;
-    ((void **)Self__SNGC->buckets__TAGC)[idx__2NGC]=result__SOID;
-    Self__SNGC->count__4OGC=(__INTEGER)(Self__SNGC->count__4OGC +  1);
+    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);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__3NGC)->item__SBGC=v__TNGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__BOGC)->item__WBGC=v__XNGC;
   };
 }
 
-static void* fast_reference_at__AAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__BAGC,void *k__CAGC)
+static void* fast_reference_at__EAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__FAGC,void *k__GAGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__NAGC;
-  __STRING_CONSTANT *Self__3X3G;
-  __INTEGER result__2X3G,__tmp__4X3G,Self__5X3G;
-  void *node__MAGC;
-  result__NAGC=NULL;
-  Self__3X3G=((__STRING_CONSTANT *)k__CAGC);
-  result__2X3G= 0;
-  __tmp__4X3G=Self__3X3G->count__DD;
-  Self__5X3G= 1;
-  while ((Self__5X3G <= __tmp__4X3G)) {
-    result__2X3G=(__INTEGER)((__INTEGER)( 5 * result__2X3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3X3G->storage__FQO)[(__INTEGER)(Self__5X3G -  1)])));
-    Self__5X3G=(__INTEGER)(Self__5X3G +  1);
-  };
-  if ((result__2X3G <  0)) {
-    result__2X3G=(__INTEGER)(~ result__2X3G);
-  };
-  node__MAGC=((void **)Self__BAGC->buckets__TAGC)[(__INTEGER)(result__2X3G % Self__BAGC->capacity__M4BC)];
-  while ((! (((void *)node__MAGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__MAGC)->key__5AGC == (void *)k__CAGC)))) {
-    node__MAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__MAGC)->next__KBGC;
-  };
-  if (((void *)node__MAGC != (void *)NULL)) {
-    result__NAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__MAGC)->item__SBGC;
-  };
-  return(result__NAGC);
+  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);
+}
+
+static void* fast_reference_at__TR4D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UR4D,void *k__VR4D)
+// ({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);
+}
+
+static void put__to__like__QJIF(void *tok__SJIF,void *buf__TJIF,void *key__UJIF)
+// ({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);
+      } else {
+        append__VNS(buf__TJIF,item__M0ND(lst__VJIF,Self__EPLF));
+      };
+      Self__EPLF=(__INTEGER)(Self__EPLF +  1);
+    };
+  };
+}
+
+static void shorter_in__CIIF(__ITM_ARG *Self__DIIF,void *buf__EIIF)
+// ({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));
+  } else {
+    put__to__like__2MLF(Self__DIIF->name__P0HC,buf__EIIF,(&__string_134));
+  };
+  add_last__NLT(buf__EIIF,':');
+  __tmp__YIIF=Self__DIIF->type__Q0HC;
+  switch (((struct ___OBJ *)__tmp__YIIF)->__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));
+    } else {
+      put__to__like__L3LF(Self__G31G->parent_itm_type__RDE.name__4XP,buf__EIIF,(&__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));
+    } else {
+      put__to__like__C5LF(Self__I31G->name__4XP,buf__EIIF,(&__string_125));
+    };
+  } break;
+  case __ITM_TYPE_BLOCK__: {
+    shorter_in__FXJF(__tmp__YIIF,buf__EIIF);
+  } break;
+  case __ITM_TYPE_GENERIC__: {
+    shorter_in__NYJF(__tmp__YIIF,buf__EIIF);
+  } 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,' ');
+    };
+    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));
+    } else {
+      put__to__like__HBMF(Self__QMBH->parent_itm_type_simple__VRN.name__4XP,buf__EIIF,(&__string_125));
+    };
+  } break;
+  };
+}
+
+static void shorter_in__NPOF(__ITM_ARGS *Self__OPOF,void *buf__PPOF)
+// ({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) {
+    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));
+      } else {
+        put__to__like__L3LF(Self__K31G->parent_itm_type__RDE.name__4XP,buf__PPOF,(&__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));
+      } else {
+        put__to__like__C5LF(Self__M31G->name__4XP,buf__PPOF,(&__string_125));
+      };
+    } break;
+    case __ITM_TYPE_BLOCK__: {
+      shorter_in__FXJF(__tmp__XQOF,buf__PPOF);
+    } break;
+    case __ITM_TYPE_GENERIC__: {
+      shorter_in__NYJF(__tmp__XQOF,buf__PPOF);
+    } 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,' ');
+      };
+      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));
+      } else {
+        put__to__like__HBMF(Self__SMBH->parent_itm_type_simple__VRN.name__4XP,buf__PPOF,(&__string_125));
+      };
+    } break;
+    };
+    add_last__NLT(buf__PPOF,',');
+    Self__ERPF=(__INTEGER)(Self__ERPF +  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) {
+  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));
+    } else {
+      put__to__like__L3LF(Self__GVJF->parent_itm_type__RDE.name__4XP,buf__PPOF,(&__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));
+    } else {
+      put__to__like__C5LF(Self__GWJF->name__4XP,buf__PPOF,(&__string_125));
+    };
+  } break;
+  case __ITM_TYPE_BLOCK__: {
+    shorter_in__FXJF(__tmp__5QOF,buf__PPOF);
+  } break;
+  case __ITM_TYPE_GENERIC__: {
+    shorter_in__NYJF(__tmp__5QOF,buf__PPOF);
+  } 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,' ');
+    };
+    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));
+    } else {
+      put__to__like__HBMF(Self__UMBH->parent_itm_type_simple__VRN.name__4XP,buf__PPOF,(&__string_125));
+    };
+  } break;
+  };
+  add_last__NLT(buf__PPOF,')');
+}
+
+static void put__to__like__L3LF(void *tok__N3LF,void *buf__O3LF,void *key__P3LF)
+// ({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);
+      } else {
+        append__VNS(buf__O3LF,item__M0ND(lst__Q3LF,Self__M4MF));
+      };
+      Self__M4MF=(__INTEGER)(Self__M4MF +  1);
+    };
+  };
 }
 
-static void set_path__4MT(__DIRECTORY_UNIX *Self__5MT,void *n__ANT)
+static void put__to__like__C5LF(void *tok__E5LF,void *buf__F5LF,void *key__G5LF)
+// ({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);
+      } else {
+        append__VNS(buf__F5LF,item__M0ND(lst__H5LF,Self__34MF));
+      };
+      Self__34MF=(__INTEGER)(Self__34MF +  1);
+    };
+  };
+}
+
+static void shorter_raw_in__Z1KF(__ITM_TYPE_MULTI *Self__01KF,void *buf__11KF)
+// ({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) {
+    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));
+      } else {
+        put__to__like__L3LF(Self__0LYG->parent_itm_type__RDE.name__4XP,buf__11KF,(&__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));
+      } else {
+        put__to__like__C5LF(Self__2LYG->name__4XP,buf__11KF,(&__string_125));
+      };
+    } break;
+    case __ITM_TYPE_BLOCK__: {
+      shorter_in__FXJF(__tmp__J2KF,buf__11KF);
+    } break;
+    case __ITM_TYPE_GENERIC__: {
+      shorter_in__NYJF(__tmp__J2KF,buf__11KF);
+    } 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,' ');
+      };
+      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));
+      } else {
+        put__to__like__HBMF(Self__WMBH->parent_itm_type_simple__VRN.name__4XP,buf__11KF,(&__string_125));
+      };
+    } break;
+    };
+    add_last__NLT(buf__11KF,',');
+    Self__VPLF=(__INTEGER)(Self__VPLF +  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) {
+  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));
+    } else {
+      put__to__like__L3LF(Self__4LYG->parent_itm_type__RDE.name__4XP,buf__11KF,(&__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));
+    } else {
+      put__to__like__C5LF(Self__AMYG->name__4XP,buf__11KF,(&__string_125));
+    };
+  } break;
+  case __ITM_TYPE_BLOCK__: {
+    shorter_in__FXJF(__tmp__M2KF,buf__11KF);
+  } break;
+  case __ITM_TYPE_GENERIC__: {
+    shorter_in__NYJF(__tmp__M2KF,buf__11KF);
+  } 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,' ');
+    };
+    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));
+    } else {
+      put__to__like__HBMF(Self__YMBH->parent_itm_type_simple__VRN.name__4XP,buf__11KF,(&__string_125));
+    };
+  } break;
+  };
+}
+
+static void shorter_in__FXJF(__ITM_TYPE_BLOCK *Self__GXJF,void *buf__HXJF)
+// ({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) {
+    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));
+      } else {
+        put__to__like__L3LF(Self__CMYG->parent_itm_type__RDE.name__4XP,buf__HXJF,(&__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));
+      } else {
+        put__to__like__C5LF(Self__EMYG->name__4XP,buf__HXJF,(&__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,')');
+    } break;
+    case __ITM_TYPE_BLOCK__: {
+      shorter_in__FXJF(__tmp__RXJF,buf__HXJF);
+    } break;
+    case __ITM_TYPE_GENERIC__: {
+      shorter_in__NYJF(__tmp__RXJF,buf__HXJF);
+    } 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,' ');
+      };
+      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));
+      } else {
+        put__to__like__HBMF(Self__0MBH->parent_itm_type_simple__VRN.name__4XP,buf__HXJF,(&__string_125));
+      };
+    } break;
+    };
+    add_last__NLT(buf__HXJF,';');
+    add_last__NLT(buf__HXJF,' ');
+  };
+  if (((void *)Self__GXJF->type_result__UMN != (void *)NULL)) {
+    __tmp__1XJF=Self__GXJF->type_result__UMN;
+    if (__tmp__1XJF==NULL) {
+      __tmp__2XJF=NULL;
+    } else {
+      switch (((struct ___OBJ *)__tmp__1XJF)->__id) {
+      case __ITM_TYPE_PARAMETER__: {
+        __tmp__2XJF=NULL;
+      } break;
+      case __ITM_TYPE_SIMPLE__: {
+        __tmp__2XJF=NULL;
+      } break;
+      case __ITM_TYPE_MULTI__: {
+        __tmp__2XJF=((void *)__tmp__1XJF);
+      } break;
+      case __ITM_TYPE_BLOCK__: {
+        __tmp__2XJF=NULL;
+      } break;
+      case __ITM_TYPE_GENERIC__: {
+        __tmp__2XJF=NULL;
+      } break;
+      case __ITM_TYPE_STYLE__: {
+        __tmp__2XJF=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) {
+      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));
+        } else {
+          put__to__like__L3LF(Self__GMYG->parent_itm_type__RDE.name__4XP,buf__HXJF,(&__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));
+        } else {
+          put__to__like__C5LF(Self__IMYG->name__4XP,buf__HXJF,(&__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,')');
+      } break;
+      case __ITM_TYPE_BLOCK__: {
+        shorter_in__FXJF(__tmp__CYJF,buf__HXJF);
+      } break;
+      case __ITM_TYPE_GENERIC__: {
+        shorter_in__NYJF(__tmp__CYJF,buf__HXJF);
+      } 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,' ');
+        };
+        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));
+        } else {
+          put__to__like__HBMF(Self__2MBH->parent_itm_type_simple__VRN.name__4XP,buf__HXJF,(&__string_125));
+        };
+      } break;
+      };
+    } else {
+      shorter_raw_in__Z1KF(__tmp__2XJF,buf__HXJF);
+    };
+  };
+  put__to__like__3WKF((&__string_286),buf__HXJF);
+}
+
+static void shorter_in__NYJF(__ITM_TYPE_GENERIC *Self__OYJF,void *buf__PYJF)
+// ({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) {
+    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));
+      } else {
+        put__to__like__L3LF(Self__KMYG->parent_itm_type__RDE.name__4XP,buf__PYJF,(&__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));
+      } else {
+        put__to__like__C5LF(Self__MMYG->name__4XP,buf__PYJF,(&__string_125));
+      };
+    } break;
+    case __ITM_TYPE_BLOCK__: {
+      shorter_in__FXJF(__tmp__LZJF,buf__PYJF);
+    } break;
+    case __ITM_TYPE_GENERIC__: {
+      shorter_in__NYJF(__tmp__LZJF,buf__PYJF);
+    } 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,' ');
+      };
+      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));
+      } else {
+        put__to__like__HBMF(Self__4MBH->parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_125));
+      };
+    } break;
+    };
+    add_last__NLT(buf__PYJF,',');
+    Self__U0KF=(__INTEGER)(Self__U0KF +  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) {
+  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));
+    } else {
+      put__to__like__L3LF(Self__OMYG->parent_itm_type__RDE.name__4XP,buf__PYJF,(&__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));
+    } else {
+      put__to__like__C5LF(Self__QMYG->name__4XP,buf__PYJF,(&__string_125));
+    };
+  } break;
+  case __ITM_TYPE_BLOCK__: {
+    shorter_in__FXJF(__tmp__OZJF,buf__PYJF);
+  } break;
+  case __ITM_TYPE_GENERIC__: {
+    shorter_in__NYJF(__tmp__OZJF,buf__PYJF);
+  } 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,' ');
+    };
+    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));
+    } else {
+      put__to__like__HBMF(Self__QZJF->parent_itm_type_simple__VRN.name__4XP,buf__PYJF,(&__string_125));
+    };
+  } break;
+  };
+  add_last__NLT(buf__PYJF,')');
+}
+
+static void put__to__like__HBMF(void *tok__JBMF,void *buf__KBMF,void *key__LBMF)
+// ({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);
+      } else {
+        append__VNS(buf__KBMF,item__M0ND(lst__MBMF,Self__O5MF));
+      };
+      Self__O5MF=(__INTEGER)(Self__O5MF +  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.
+{
+  __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);
+      } else {
+        append__VNS(buf__E1JF,item__M0ND(lst__G1JF,Self__QDMF));
+      };
+      Self__QDMF=(__INTEGER)(Self__QDMF +  1);
+    };
+  };
+}
+
+static void set_path__CNT(__DIRECTORY_UNIX *Self__DNT,void *n__ENT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *result__BY3G,*Self__43ZG,*Self__B4ZG,*result__JY3G;
-  __STRING_CONSTANT *Self__YTJG;
-  __POINTER ptr__CY3G,ptr_table__SI5G,next__RI5G,result__TI5G;
-  __POINTER ptr_table__XI5G,next__WI5G,result__YI5G,ptr__KY3G;
-  __POINTER ptr_table__2I5G,next__1I5G,result__3I5G,ptr_table__BJ5G;
-  __POINTER next__AJ5G,result__CJ5G,ptr__0QWG;
-  __INTEGER typ_id__DY3G,c__A4ZG,Self__ZD2G,idx__TH3G,idx__BNT;
-  __INTEGER typ_id__LY3G,__tmp__XNT;
-  __UINTEGER_32 sz__EY3G,a__FY3G,new_size__GY3G,t__HY3G,a__IY3G;
-  __UINTEGER_32 new_size__0I5G,lab_type__ZI5G,sz__MY3G,a__NY3G;
-  __UINTEGER_32 new_size__OY3G,t__PY3G,a__QY3G,new_size__EJ5G;
-  __UINTEGER_32 lab_type__DJ5G;
-  void *__tmp__PNT;
-  __CHARACTER *Self__0D2G,*model__1D2G,*Self__VH3G,*__tmp__TNT;
-  result__BY3G=NULL;
-  ptr__CY3G=((__POINTER )(NULL));
-  typ_id__DY3G= 0;
-  sz__EY3G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-  if ((sz__EY3G ==  0)) {
-    result__BY3G=STRING_CONSTANT__;
+  __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__;
   } else {
-    typ_id__DY3G=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__EY3G);
-    if ((typ_id__DY3G == (__INTEGER)(-  1))) {
-      a__FY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GY3G=(__UINTEGER_32)((__UINTEGER_32)(sz__EY3G + a__FY3G) & (__UINTEGER_32)(~ a__FY3G));
-      ptr_table__SI5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GY3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RI5G=((__POINTER )(NULL));
-      result__TI5G=((__POINTER *)ptr_table__SI5G)[ 0];
-      if ((result__TI5G == (void *)NULL)) {
-        result__TI5G=new_lab__2QJ(new_size__GY3G);
-        next__RI5G=(void *)((unsigned long)result__TI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GY3G)));
-        ((__POINTER *)next__RI5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SI5G)[ 0]=next__RI5G;
-      } else {
-        next__RI5G=((__POINTER *)result__TI5G)[ 0];
-        if ((next__RI5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TI5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GY3G <<  1)) <=  4096)) {
-            next__RI5G=(void *)((unsigned long)result__TI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GY3G)));
-          } else {
-            next__RI5G=new_lab__2QJ(new_size__GY3G);
-          };
-          ((__POINTER *)next__RI5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SI5G)[ 0]=next__RI5G;
-        } else {
-          ((__POINTER *)result__TI5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__RI5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TI5G=next__RI5G;
-        };
-      };
-      ptr__CY3G=result__TI5G;
-    } else {
-      t__HY3G=((__UINTEGER_32 )typ_id__DY3G);
-      a__IY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0I5G=(__UINTEGER_32)((__UINTEGER_32)(sz__EY3G + a__IY3G) & (__UINTEGER_32)(~ a__IY3G));
-      ptr_table__XI5G=((__POINTER )(&(table_type[(t__HY3G)])));
-      lab_type__ZI5G=(__UINTEGER_32)(t__HY3G |  1);
-      next__WI5G=((__POINTER )(NULL));
-      result__YI5G=((__POINTER *)ptr_table__XI5G)[ 0];
-      if ((result__YI5G == (void *)NULL)) {
-        result__YI5G=new_lab__2QJ(lab_type__ZI5G);
-        next__WI5G=(void *)((unsigned long)result__YI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0I5G)));
-        ((__POINTER *)next__WI5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XI5G)[ 0]=next__WI5G;
-      } else {
-        next__WI5G=((__POINTER *)result__YI5G)[ 0];
-        if ((next__WI5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YI5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0I5G <<  1)) <=  4096)) {
-            next__WI5G=(void *)((unsigned long)result__YI5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0I5G)));
-          } else {
-            next__WI5G=new_lab__2QJ(lab_type__ZI5G);
-          };
-          ((__POINTER *)next__WI5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XI5G)[ 0]=next__WI5G;
-        } else {
-          ((__POINTER *)result__YI5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WI5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YI5G=next__WI5G;
-        };
-      };
-      ptr__CY3G=result__YI5G;
-    };
-    result__BY3G=((__STRING_CONSTANT *)ptr__CY3G);
-    *(result__BY3G) = *(STRING_CONSTANT__);
-  };
-  Self__43ZG=((__STRING_CONSTANT *)result__BY3G);
-  c__A4ZG=((__STRING *)n__ANT)->count__GFC;
-  if ((c__A4ZG !=  0)) {
-    Self__43ZG->storage__FQO=create__RLEB((__INTEGER)(c__A4ZG +  1));
-    Self__0D2G=((__CHARACTER *)Self__43ZG->storage__FQO);
-    model__1D2G=((__STRING *)n__ANT)->storage__RBS;
-    Self__ZD2G=(__INTEGER)(c__A4ZG -  1);
-    while ((Self__ZD2G >=  0)) {
-      Self__0D2G[Self__ZD2G]=((__CHARACTER *)model__1D2G)[Self__ZD2G];
-      Self__ZD2G=(__INTEGER)(Self__ZD2G -  1);
-    };
-    ((__CHARACTER *)Self__43ZG->storage__FQO)[c__A4ZG]='\0';
-    Self__43ZG->count__DD=c__A4ZG;
-  };
-  Self__5MT->parent_entry_unix__JED.parent_entry__IED.path__BD=result__BY3G;
-  Self__B4ZG=((__STRING_CONSTANT *)Self__5MT->parent_entry_unix__JED.parent_entry__IED.path__BD);
-  Self__VH3G=((__CHARACTER *)Self__B4ZG->storage__FQO);
-  idx__TH3G=(__INTEGER)(Self__B4ZG->count__DD -  1);
-  while ((! ((idx__TH3G <  0) || ('/' == Self__VH3G[idx__TH3G])))) {
-    idx__TH3G=(__INTEGER)(idx__TH3G -  1);
-  };
-  idx__BNT=(__INTEGER)( 1 + idx__TH3G);
-  if (((void *)Self__5MT->parent_entry_unix__JED.parent_entry__IED.name__FNT == (void *)NULL)) {
-    result__JY3G=NULL;
-    ptr__KY3G=((__POINTER )(NULL));
-    typ_id__LY3G= 0;
-    sz__MY3G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__MY3G ==  0)) {
-      result__JY3G=STRING_CONSTANT__;
-    } else {
-      typ_id__LY3G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__MY3G);
-      if ((typ_id__LY3G == (__INTEGER)(-  1))) {
-        a__NY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OY3G=(__UINTEGER_32)((__UINTEGER_32)(sz__MY3G + a__NY3G) & (__UINTEGER_32)(~ a__NY3G));
-        ptr_table__2I5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OY3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__1I5G=((__POINTER )(NULL));
-        result__3I5G=((__POINTER *)ptr_table__2I5G)[ 0];
-        if ((result__3I5G == (void *)NULL)) {
-          result__3I5G=new_lab__2QJ(new_size__OY3G);
-          next__1I5G=(void *)((unsigned long)result__3I5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OY3G)));
-          ((__POINTER *)next__1I5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2I5G)[ 0]=next__1I5G;
-        } else {
-          next__1I5G=((__POINTER *)result__3I5G)[ 0];
-          if ((next__1I5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3I5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OY3G <<  1)) <=  4096)) {
-              next__1I5G=(void *)((unsigned long)result__3I5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OY3G)));
+    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)));
             } else {
-              next__1I5G=new_lab__2QJ(new_size__OY3G);
-            };
-            ((__POINTER *)next__1I5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2I5G)[ 0]=next__1I5G;
-          } else {
-            ((__POINTER *)result__3I5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1I5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3I5G=next__1I5G;
-          };
-        };
-        ptr__KY3G=result__3I5G;
-      } else {
-        t__PY3G=((__UINTEGER_32 )typ_id__LY3G);
-        a__QY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__EJ5G=(__UINTEGER_32)((__UINTEGER_32)(sz__MY3G + a__QY3G) & (__UINTEGER_32)(~ a__QY3G));
-        ptr_table__BJ5G=((__POINTER )(&(table_type[(t__PY3G)])));
-        lab_type__DJ5G=(__UINTEGER_32)(t__PY3G |  1);
-        next__AJ5G=((__POINTER )(NULL));
-        result__CJ5G=((__POINTER *)ptr_table__BJ5G)[ 0];
-        if ((result__CJ5G == (void *)NULL)) {
-          result__CJ5G=new_lab__2QJ(lab_type__DJ5G);
-          next__AJ5G=(void *)((unsigned long)result__CJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJ5G)));
-          ((__POINTER *)next__AJ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BJ5G)[ 0]=next__AJ5G;
-        } else {
-          next__AJ5G=((__POINTER *)result__CJ5G)[ 0];
-          if ((next__AJ5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CJ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__EJ5G <<  1)) <=  4096)) {
-              next__AJ5G=(void *)((unsigned long)result__CJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EJ5G)));
+              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)));
             } else {
-              next__AJ5G=new_lab__2QJ(lab_type__DJ5G);
+              next__PNBH=new_lab__ARJ(lab_type__SNBH);
             };
-            ((__POINTER *)next__AJ5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BJ5G)[ 0]=next__AJ5G;
+            ((__POINTER *)next__PNBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QNBH)[ 0]=next__PNBH;
           } else {
-            ((__POINTER *)result__CJ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CJ5G=next__AJ5G;
+            ((__POINTER *)result__RNBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PNBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RNBH=next__PNBH;
           };
         };
-        ptr__KY3G=result__CJ5G;
+        ptr__S15G=result__RNBH;
       };
-      result__JY3G=((__STRING_CONSTANT *)ptr__KY3G);
-      *(result__JY3G) = *(STRING_CONSTANT__);
+      result__R15G=((__STRING_CONSTANT *)ptr__S15G);
+      *(result__R15G) = *(STRING_CONSTANT__);
     };
-    Self__5MT->parent_entry_unix__JED.parent_entry__IED.name__FNT=result__JY3G;
+    Self__DNT->parent_entry_unix__NED.parent_entry__MED.name__JNT=result__R15G;
   };
-  __tmp__PNT=Self__5MT->parent_entry_unix__JED.parent_entry__IED.name__FNT;
-  ptr__0QWG=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__5MT->parent_entry_unix__JED.parent_entry__IED.path__BD)->storage__FQO));
-  ptr__0QWG=(void *)((unsigned long)ptr__0QWG - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__BNT)));
-  __tmp__TNT=((__CHARACTER *)ptr__0QWG);
-  __tmp__XNT=(__INTEGER)(((__STRING_CONSTANT *)Self__5MT->parent_entry_unix__JED.parent_entry__IED.path__BD)->count__DD - idx__BNT);
-  Self__YTJG=((__STRING_CONSTANT *)__tmp__PNT);
-  Self__YTJG->storage__FQO=__tmp__TNT;
-  Self__YTJG->count__DD=__tmp__XNT;
+  __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;
 }
 
-static void set_path__ZNT(__FILE_UNIX *Self__0NT,void *n__1NT)
+static void set_path__3NT(__FILE_UNIX *Self__4NT,void *n__5NT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *result__RY3G,*Self__G4ZG,*Self__J4ZG,*result__ZY3G;
-  __STRING_CONSTANT *Self__3TJG;
-  __POINTER ptr__SY3G,ptr_table__GJ5G,next__FJ5G,result__HJ5G;
-  __POINTER ptr_table__LJ5G,next__KJ5G,result__MJ5G,ptr__0Y3G;
-  __POINTER ptr_table__QJ5G,next__PJ5G,result__RJ5G,ptr_table__VJ5G;
-  __POINTER next__UJ5G,result__WJ5G,ptr__3NY;
-  __INTEGER typ_id__TY3G,c__I4ZG,Self__EE2G,idx__YH3G,idx__2NT;
-  __INTEGER typ_id__1Y3G,__tmp__ROT;
-  __UINTEGER_32 sz__UY3G,a__VY3G,new_size__WY3G,t__XY3G,a__YY3G;
-  __UINTEGER_32 new_size__OJ5G,lab_type__NJ5G,sz__2Y3G,a__3Y3G;
-  __UINTEGER_32 new_size__4Y3G,t__5Y3G,a__AZ3G,new_size__YJ5G;
-  __UINTEGER_32 lab_type__XJ5G;
-  void *__tmp__JOT;
-  __CHARACTER *Self__FE2G,*model__GE2G,*Self__0H3G,*__tmp__NOT;
-  result__RY3G=NULL;
-  ptr__SY3G=((__POINTER )(NULL));
-  typ_id__TY3G= 0;
-  sz__UY3G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-  if ((sz__UY3G ==  0)) {
-    result__RY3G=STRING_CONSTANT__;
+  __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__;
   } else {
-    typ_id__TY3G=-1;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__UY3G);
-    if ((typ_id__TY3G == (__INTEGER)(-  1))) {
-      a__VY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__WY3G=(__UINTEGER_32)((__UINTEGER_32)(sz__UY3G + a__VY3G) & (__UINTEGER_32)(~ a__VY3G));
-      ptr_table__GJ5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WY3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FJ5G=((__POINTER )(NULL));
-      result__HJ5G=((__POINTER *)ptr_table__GJ5G)[ 0];
-      if ((result__HJ5G == (void *)NULL)) {
-        result__HJ5G=new_lab__2QJ(new_size__WY3G);
-        next__FJ5G=(void *)((unsigned long)result__HJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WY3G)));
-        ((__POINTER *)next__FJ5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GJ5G)[ 0]=next__FJ5G;
-      } else {
-        next__FJ5G=((__POINTER *)result__HJ5G)[ 0];
-        if ((next__FJ5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HJ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WY3G <<  1)) <=  4096)) {
-            next__FJ5G=(void *)((unsigned long)result__HJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WY3G)));
-          } else {
-            next__FJ5G=new_lab__2QJ(new_size__WY3G);
-          };
-          ((__POINTER *)next__FJ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GJ5G)[ 0]=next__FJ5G;
-        } else {
-          ((__POINTER *)result__HJ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__FJ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HJ5G=next__FJ5G;
-        };
-      };
-      ptr__SY3G=result__HJ5G;
-    } else {
-      t__XY3G=((__UINTEGER_32 )typ_id__TY3G);
-      a__YY3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OJ5G=(__UINTEGER_32)((__UINTEGER_32)(sz__UY3G + a__YY3G) & (__UINTEGER_32)(~ a__YY3G));
-      ptr_table__LJ5G=((__POINTER )(&(table_type[(t__XY3G)])));
-      lab_type__NJ5G=(__UINTEGER_32)(t__XY3G |  1);
-      next__KJ5G=((__POINTER )(NULL));
-      result__MJ5G=((__POINTER *)ptr_table__LJ5G)[ 0];
-      if ((result__MJ5G == (void *)NULL)) {
-        result__MJ5G=new_lab__2QJ(lab_type__NJ5G);
-        next__KJ5G=(void *)((unsigned long)result__MJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJ5G)));
-        ((__POINTER *)next__KJ5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LJ5G)[ 0]=next__KJ5G;
-      } else {
-        next__KJ5G=((__POINTER *)result__MJ5G)[ 0];
-        if ((next__KJ5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MJ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OJ5G <<  1)) <=  4096)) {
-            next__KJ5G=(void *)((unsigned long)result__MJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJ5G)));
-          } else {
-            next__KJ5G=new_lab__2QJ(lab_type__NJ5G);
-          };
-          ((__POINTER *)next__KJ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LJ5G)[ 0]=next__KJ5G;
-        } else {
-          ((__POINTER *)result__MJ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__KJ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MJ5G=next__KJ5G;
-        };
-      };
-      ptr__SY3G=result__MJ5G;
-    };
-    result__RY3G=((__STRING_CONSTANT *)ptr__SY3G);
-    *(result__RY3G) = *(STRING_CONSTANT__);
-  };
-  Self__G4ZG=((__STRING_CONSTANT *)result__RY3G);
-  c__I4ZG=((__STRING *)n__1NT)->count__GFC;
-  if ((c__I4ZG !=  0)) {
-    Self__G4ZG->storage__FQO=create__RLEB((__INTEGER)(c__I4ZG +  1));
-    Self__FE2G=((__CHARACTER *)Self__G4ZG->storage__FQO);
-    model__GE2G=((__STRING *)n__1NT)->storage__RBS;
-    Self__EE2G=(__INTEGER)(c__I4ZG -  1);
-    while ((Self__EE2G >=  0)) {
-      Self__FE2G[Self__EE2G]=((__CHARACTER *)model__GE2G)[Self__EE2G];
-      Self__EE2G=(__INTEGER)(Self__EE2G -  1);
-    };
-    ((__CHARACTER *)Self__G4ZG->storage__FQO)[c__I4ZG]='\0';
-    Self__G4ZG->count__DD=c__I4ZG;
-  };
-  Self__0NT->parent_entry_unix__MCF.parent_entry__IED.path__BD=result__RY3G;
-  Self__J4ZG=((__STRING_CONSTANT *)Self__0NT->parent_entry_unix__MCF.parent_entry__IED.path__BD);
-  Self__0H3G=((__CHARACTER *)Self__J4ZG->storage__FQO);
-  idx__YH3G=(__INTEGER)(Self__J4ZG->count__DD -  1);
-  while ((! ((idx__YH3G <  0) || ('/' == Self__0H3G[idx__YH3G])))) {
-    idx__YH3G=(__INTEGER)(idx__YH3G -  1);
-  };
-  idx__2NT=(__INTEGER)( 1 + idx__YH3G);
-  if (((void *)Self__0NT->parent_entry_unix__MCF.parent_entry__IED.name__FNT == (void *)NULL)) {
-    result__ZY3G=NULL;
-    ptr__0Y3G=((__POINTER )(NULL));
-    typ_id__1Y3G= 0;
-    sz__2Y3G=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__2Y3G ==  0)) {
-      result__ZY3G=STRING_CONSTANT__;
-    } else {
-      typ_id__1Y3G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__2Y3G);
-      if ((typ_id__1Y3G == (__INTEGER)(-  1))) {
-        a__3Y3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__4Y3G=(__UINTEGER_32)((__UINTEGER_32)(sz__2Y3G + a__3Y3G) & (__UINTEGER_32)(~ a__3Y3G));
-        ptr_table__QJ5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4Y3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__PJ5G=((__POINTER )(NULL));
-        result__RJ5G=((__POINTER *)ptr_table__QJ5G)[ 0];
-        if ((result__RJ5G == (void *)NULL)) {
-          result__RJ5G=new_lab__2QJ(new_size__4Y3G);
-          next__PJ5G=(void *)((unsigned long)result__RJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4Y3G)));
-          ((__POINTER *)next__PJ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QJ5G)[ 0]=next__PJ5G;
-        } else {
-          next__PJ5G=((__POINTER *)result__RJ5G)[ 0];
-          if ((next__PJ5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RJ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__4Y3G <<  1)) <=  4096)) {
-              next__PJ5G=(void *)((unsigned long)result__RJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4Y3G)));
+    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)));
             } else {
-              next__PJ5G=new_lab__2QJ(new_size__4Y3G);
-            };
-            ((__POINTER *)next__PJ5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QJ5G)[ 0]=next__PJ5G;
-          } else {
-            ((__POINTER *)result__RJ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__PJ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__RJ5G=next__PJ5G;
-          };
-        };
-        ptr__0Y3G=result__RJ5G;
-      } else {
-        t__5Y3G=((__UINTEGER_32 )typ_id__1Y3G);
-        a__AZ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YJ5G=(__UINTEGER_32)((__UINTEGER_32)(sz__2Y3G + a__AZ3G) & (__UINTEGER_32)(~ a__AZ3G));
-        ptr_table__VJ5G=((__POINTER )(&(table_type[(t__5Y3G)])));
-        lab_type__XJ5G=(__UINTEGER_32)(t__5Y3G |  1);
-        next__UJ5G=((__POINTER )(NULL));
-        result__WJ5G=((__POINTER *)ptr_table__VJ5G)[ 0];
-        if ((result__WJ5G == (void *)NULL)) {
-          result__WJ5G=new_lab__2QJ(lab_type__XJ5G);
-          next__UJ5G=(void *)((unsigned long)result__WJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YJ5G)));
-          ((__POINTER *)next__UJ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VJ5G)[ 0]=next__UJ5G;
-        } else {
-          next__UJ5G=((__POINTER *)result__WJ5G)[ 0];
-          if ((next__UJ5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WJ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YJ5G <<  1)) <=  4096)) {
-              next__UJ5G=(void *)((unsigned long)result__WJ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YJ5G)));
+              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)));
             } else {
-              next__UJ5G=new_lab__2QJ(lab_type__XJ5G);
+              next__DOBH=new_lab__ARJ(lab_type__GOBH);
             };
-            ((__POINTER *)next__UJ5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VJ5G)[ 0]=next__UJ5G;
+            ((__POINTER *)next__DOBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EOBH)[ 0]=next__DOBH;
           } else {
-            ((__POINTER *)result__WJ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__UJ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WJ5G=next__UJ5G;
+            ((__POINTER *)result__FOBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FOBH=next__DOBH;
           };
         };
-        ptr__0Y3G=result__WJ5G;
+        ptr__C25G=result__FOBH;
       };
-      result__ZY3G=((__STRING_CONSTANT *)ptr__0Y3G);
-      *(result__ZY3G) = *(STRING_CONSTANT__);
+      result__B25G=((__STRING_CONSTANT *)ptr__C25G);
+      *(result__B25G) = *(STRING_CONSTANT__);
     };
-    Self__0NT->parent_entry_unix__MCF.parent_entry__IED.name__FNT=result__ZY3G;
+    Self__4NT->parent_entry_unix__QCF.parent_entry__MED.name__JNT=result__B25G;
   };
-  __tmp__JOT=Self__0NT->parent_entry_unix__MCF.parent_entry__IED.name__FNT;
-  ptr__3NY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__0NT->parent_entry_unix__MCF.parent_entry__IED.path__BD)->storage__FQO));
-  ptr__3NY=(void *)((unsigned long)ptr__3NY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__2NT)));
-  __tmp__NOT=((__CHARACTER *)ptr__3NY);
-  __tmp__ROT=(__INTEGER)(((__STRING_CONSTANT *)Self__0NT->parent_entry_unix__MCF.parent_entry__IED.path__BD)->count__DD - idx__2NT);
-  Self__3TJG=((__STRING_CONSTANT *)__tmp__JOT);
-  Self__3TJG->storage__FQO=__tmp__NOT;
-  Self__3TJG->count__DD=__tmp__ROT;
+  __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;
 }
 
-static void insert_string__to__KXU(__STRING *Self__LXU,void *s__MXU,__INTEGER i__NXU)
+static void insert_string__to__OXU(__STRING *Self__PXU,void *s__QXU,__INTEGER i__RXU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__OXU,__tmp__BYU,dest__5H3G,src_capacity__DI3G,i2__4H3G;
-  __INTEGER i1__AI3G;
-  __CHARACTER *__tmp__RYU,*__tmp__SYU,*Self__BI3G,*src__CI3G;
-  j__OXU=Self__LXU->count__GFC;
-  if (((struct ___OBJ *)s__MXU)->__id==__STRING_CONSTANT__) {
-    __tmp__BYU=((__STRING_CONSTANT *)s__MXU)->count__DD;
+  __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;
   } else {
-    __tmp__BYU=((__STRING *)s__MXU)->count__GFC;
+    __tmp__FYU=((__STRING *)s__QXU)->count__KFC;
   };
-  resize__IXZ(Self__LXU,(__INTEGER)(j__OXU + __tmp__BYU));
-  if ((i__NXU <= j__OXU)) {
-    move__to__by__RVCC(Self__LXU->storage__RBS,(__INTEGER)(i__NXU -  1),(__INTEGER)(j__OXU -  1),__tmp__BYU);
+  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);
   };
-  __tmp__RYU=Self__LXU->storage__RBS;
-  if (((struct ___OBJ *)s__MXU)->__id==__STRING_CONSTANT__) {
-    __tmp__SYU=((__STRING_CONSTANT *)s__MXU)->storage__FQO;
+  __tmp__VYU=Self__PXU->storage__VBS;
+  if (((struct ___OBJ *)s__QXU)->__id==__STRING_CONSTANT__) {
+    __tmp__WYU=((__STRING_CONSTANT *)s__QXU)->storage__JQO;
   } else {
-    __tmp__SYU=((__STRING *)s__MXU)->storage__RBS;
-  };
-  Self__BI3G=((__CHARACTER *)__tmp__RYU);
-  src__CI3G=__tmp__SYU;
-  dest__5H3G=(__INTEGER)(i__NXU -  1);
-  src_capacity__DI3G=__tmp__BYU;
-  i2__4H3G= 0;
-  i1__AI3G=dest__5H3G;
-  while ((i2__4H3G != src_capacity__DI3G)) {
-    Self__BI3G[i1__AI3G]=((__CHARACTER *)src__CI3G)[i2__4H3G];
-    i2__4H3G=(__INTEGER)(i2__4H3G +  1);
-    i1__AI3G=(__INTEGER)(i1__AI3G +  1);
+    __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);
   };
 }
 
-static void read_escape_character__ZYIF()
+static void read_escape_character__PIJF()
 // () VoidNo recursive, No inlinable.
 {
-  __INTEGER val__2YIF;
-  __STRING *Self__OE2G;
-  __POSITION pos__4KPG,pos__LLPG,pos__1LPG,pos__3LPG;
-  __CHARACTER result__4UWG,result__5UWG,result__BVWG,result__CVWG;
-  __CHARACTER result__DVWG,result__EVWG,result__FVWG,result__GVWG;
-  __CHARACTER result__HVWG,result__IVWG,result__JVWG,result__KVWG;
-  __CHARACTER result__LVWG,result__MVWG,result__NVWG,result__OVWG;
-  __CHARACTER result__PVWG,result__QVWG,result__VVWG,result__WVWG;
-  __CHARACTER result__0VWG,result__1VWG;
-  __BOOLEAN __tmp__VZIF,__tmp__J0IF,__tmp__20IF,__tmp__R3IF,__tmp__S3IF;
-  __BOOLEAN __tmp__T3IF,__tmp__U3IF,__tmp__V3IF,__tmp__W3IF,__tmp__X3IF;
-  __BOOLEAN __tmp__Y3IF,__tmp__Z3IF,__tmp__03IF,__tmp__F4IF;
-  val__2YIF= 0;
-  result__4UWG='\0';
-  if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-    result__4UWG=((__CHARACTER )(( 0)));
+  __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)));
   } else {
-    result__4UWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+    result__EUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
   };
-  if ((((((((result__4UWG == ' ') || (result__4UWG == '\t')) || (result__4UWG == '\n')) || (result__4UWG == '\r')) || (result__4UWG == '\0')) || (result__4UWG == '\f')) || (result__4UWG == '\v'))) {
-    position__CBC=(__INTEGER)(position__CBC +  1);
-    until_do__MWKF:
+  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:
     {
-      result__5UWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__5UWG=((__CHARACTER )(( 0)));
+      result__FUYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__FUYG=((__CHARACTER )(( 0)));
       } else {
-        result__5UWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__FUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__5UWG == ((__CHARACTER )(( 0))))) {
-        __tmp__VZIF=TRUE__;
+      if ((result__FUYG == ((__CHARACTER )(( 0))))) {
+        __tmp__LJJF=TRUE__;
       } else {
-        result__BVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__BVWG=((__CHARACTER )(( 0)));
+        result__HUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__HUYG=((__CHARACTER )(( 0)));
         } else {
-          result__BVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__HUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__VZIF=(! (((((((result__BVWG == ' ') || (result__BVWG == '\t')) || (result__BVWG == '\n')) || (result__BVWG == '\r')) || (result__BVWG == '\0')) || (result__BVWG == '\f')) || (result__BVWG == '\v')));
+        __tmp__LJJF=(! (((((((result__HUYG == ' ') || (result__HUYG == '\t')) || (result__HUYG == '\n')) || (result__HUYG == '\r')) || (result__HUYG == '\0')) || (result__HUYG == '\f')) || (result__HUYG == '\v')));
       };
-      if ((! __tmp__VZIF)) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto until_do__MWKF;
+      if ((! __tmp__LJJF)) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        goto until_do__WYLF;
       };
     };
-    result__CVWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__CVWG=((__CHARACTER )(( 0)));
+    result__IUYG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__IUYG=((__CHARACTER )(( 0)));
     } else {
-      result__CVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__IUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__CVWG == '\\')) {
-      Self__OE2G=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__OE2G->count__GFC)) {
-        Self__OE2G->count__GFC= 0;
+    if ((result__IUYG == '\\')) {
+      Self__GH4G=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__GH4G->count__KFC)) {
+        Self__GH4G->count__KFC= 0;
       } else {
-        Self__OE2G->count__GFC=(__INTEGER)(Self__OE2G->count__GFC -  1);
+        Self__GH4G->count__KFC=(__INTEGER)(Self__GH4G->count__KFC -  1);
       };
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      __tmp__J0IF=TRUE__;
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      __tmp__5JJF=TRUE__;
     } else {
-      __tmp__J0IF=FALSE__;
+      __tmp__5JJF=FALSE__;
     };
-    if ((! __tmp__J0IF)) {
-      result__DVWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__DVWG=((__CHARACTER )(( 0)));
+    if ((! __tmp__5JJF)) {
+      result__JUYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__JUYG=((__CHARACTER )(( 0)));
       } else {
-        result__DVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__JUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__DVWG != ((__CHARACTER )(( 0))))) {
-        pos__4KPG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_281));
-        put_position__EOG(pos__4KPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
     };
-    __tmp__20IF=TRUE__;
+    __tmp__SKJF=TRUE__;
   } else {
-    __tmp__20IF=FALSE__;
+    __tmp__SKJF=FALSE__;
   };
-  if ((! __tmp__20IF)) {
-    result__EVWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__EVWG=((__CHARACTER )(( 0)));
+  if ((! __tmp__SKJF)) {
+    result__KUYG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__KUYG=((__CHARACTER )(( 0)));
     } else {
-      result__EVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__KUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__EVWG != ((__CHARACTER )(( 0))))) {
-      result__FVWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__FVWG=((__CHARACTER )(( 0)));
+    if ((result__KUYG != ((__CHARACTER )(( 0))))) {
+      result__LUYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__LUYG=((__CHARACTER )(( 0)));
       } else {
-        result__FVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__LUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__FVWG == 'a')) {
-        __tmp__R3IF=TRUE__;
+      if ((result__LUYG == 'a')) {
+        __tmp__HNJF=TRUE__;
       } else {
-        result__GVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__GVWG=((__CHARACTER )(( 0)));
+        result__MUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__MUYG=((__CHARACTER )(( 0)));
         } else {
-          result__GVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__MUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__R3IF=(result__GVWG == 'b');
+        __tmp__HNJF=(result__MUYG == 'b');
       };
-      if (__tmp__R3IF) {
-        __tmp__S3IF=TRUE__;
+      if (__tmp__HNJF) {
+        __tmp__INJF=TRUE__;
       } else {
-        result__HVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__HVWG=((__CHARACTER )(( 0)));
+        result__NUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__NUYG=((__CHARACTER )(( 0)));
         } else {
-          result__HVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__NUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__S3IF=(result__HVWG == 'f');
+        __tmp__INJF=(result__NUYG == 'f');
       };
-      if (__tmp__S3IF) {
-        __tmp__T3IF=TRUE__;
+      if (__tmp__INJF) {
+        __tmp__JNJF=TRUE__;
       } else {
-        result__IVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__IVWG=((__CHARACTER )(( 0)));
+        result__OUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__OUYG=((__CHARACTER )(( 0)));
         } else {
-          result__IVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__OUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__T3IF=(result__IVWG == 'n');
+        __tmp__JNJF=(result__OUYG == 'n');
       };
-      if (__tmp__T3IF) {
-        __tmp__U3IF=TRUE__;
+      if (__tmp__JNJF) {
+        __tmp__KNJF=TRUE__;
       } else {
-        result__JVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__JVWG=((__CHARACTER )(( 0)));
+        result__PUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__PUYG=((__CHARACTER )(( 0)));
         } else {
-          result__JVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__PUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__U3IF=(result__JVWG == 'r');
+        __tmp__KNJF=(result__PUYG == 'r');
       };
-      if (__tmp__U3IF) {
-        __tmp__V3IF=TRUE__;
+      if (__tmp__KNJF) {
+        __tmp__LNJF=TRUE__;
       } else {
-        result__KVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__KVWG=((__CHARACTER )(( 0)));
+        result__QUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__QUYG=((__CHARACTER )(( 0)));
         } else {
-          result__KVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__QUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__V3IF=(result__KVWG == 't');
+        __tmp__LNJF=(result__QUYG == 't');
       };
-      if (__tmp__V3IF) {
-        __tmp__W3IF=TRUE__;
+      if (__tmp__LNJF) {
+        __tmp__MNJF=TRUE__;
       } else {
-        result__LVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__LVWG=((__CHARACTER )(( 0)));
+        result__RUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__RUYG=((__CHARACTER )(( 0)));
         } else {
-          result__LVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__RUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__W3IF=(result__LVWG == 'v');
+        __tmp__MNJF=(result__RUYG == 'v');
       };
-      if (__tmp__W3IF) {
-        __tmp__X3IF=TRUE__;
+      if (__tmp__MNJF) {
+        __tmp__NNJF=TRUE__;
       } else {
-        result__MVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__MVWG=((__CHARACTER )(( 0)));
+        result__SUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__SUYG=((__CHARACTER )(( 0)));
         } else {
-          result__MVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__SUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__X3IF=(result__MVWG == '\\');
+        __tmp__NNJF=(result__SUYG == '\\');
       };
-      if (__tmp__X3IF) {
-        __tmp__Y3IF=TRUE__;
+      if (__tmp__NNJF) {
+        __tmp__ONJF=TRUE__;
       } else {
-        result__NVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__NVWG=((__CHARACTER )(( 0)));
+        result__TUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__TUYG=((__CHARACTER )(( 0)));
         } else {
-          result__NVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__TUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__Y3IF=(result__NVWG == '?');
+        __tmp__ONJF=(result__TUYG == '?');
       };
-      if (__tmp__Y3IF) {
-        __tmp__Z3IF=TRUE__;
+      if (__tmp__ONJF) {
+        __tmp__PNJF=TRUE__;
       } else {
-        result__OVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__OVWG=((__CHARACTER )(( 0)));
+        result__UUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__UUYG=((__CHARACTER )(( 0)));
         } else {
-          result__OVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__UUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__Z3IF=(result__OVWG == '\'');
+        __tmp__PNJF=(result__UUYG == '\'');
       };
-      if (__tmp__Z3IF) {
-        __tmp__03IF=TRUE__;
+      if (__tmp__PNJF) {
+        __tmp__QNJF=TRUE__;
       } else {
-        result__PVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__PVWG=((__CHARACTER )(( 0)));
+        result__VUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__VUYG=((__CHARACTER )(( 0)));
         } else {
-          result__PVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__VUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__03IF=(result__PVWG == '\"');
+        __tmp__QNJF=(result__VUYG == '\"');
       };
-      if (__tmp__03IF) {
-        result__QVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__QVWG=((__CHARACTER )(( 0)));
+      if (__tmp__QNJF) {
+        result__WUYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__WUYG=((__CHARACTER )(( 0)));
         } else {
-          result__QVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__WUYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        add_last__JLT(string_tmp__VH,result__QVWG);
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        __tmp__F4IF=TRUE__;
+        add_last__NLT(string_tmp__VH,result__WUYG);
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        __tmp__1NJF=TRUE__;
       } else {
-        __tmp__F4IF=FALSE__;
+        __tmp__1NJF=FALSE__;
       };
-      if ((! __tmp__F4IF)) {
-        result__VVWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__VVWG=((__CHARACTER )(( 0)));
+      if ((! __tmp__1NJF)) {
+        result__1UYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__1UYG=((__CHARACTER )(( 0)));
         } else {
-          result__VVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__1UYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if (((((__INTEGER_8 )result__VVWG) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__VVWG) <= ((__INTEGER_8 )'9')))) {
-          result__WVWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__WVWG=((__CHARACTER )(( 0)));
+        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)));
           } else {
-            result__WVWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__2UYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((((result__WVWG == '0') && (position__CBC < ((__STRING *)source__5AC)->count__GFC)) && (! is_hexadecimal_digit__H2IE(((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)((__INTEGER)(position__CBC +  1) -  1)])))) {
-            result__0VWG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__0VWG=((__CHARACTER )(( 0)));
+          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)));
             } else {
-              result__0VWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-            };
-            add_last__JLT(string_tmp__VH,result__0VWG);
-            position__CBC=(__INTEGER)(position__CBC +  1);
-          } else {
-            copy__JCS(string_tmp2__R5I,string_tmp__VH);
-            read_integer__Q1P();
-            copy__JCS(string_tmp__VH,string_tmp2__R5I);
-            if ((last_integer__JRO >  255)) {
-              pos__LLPG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_282));
-              put_position__EOG(pos__LLPG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+              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)) {
                 exit(( 1));
               };
             };
-            val__2YIF=((__INTEGER )last_integer__JRO);
-            add_last__JLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__2YIF >>  6)) + ((__INTEGER_8 )'0'))))));
-            add_last__JLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__2YIF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
-            add_last__JLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__2YIF &  7)) + ((__INTEGER_8 )'0'))))));
-            result__1VWG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__1VWG=((__CHARACTER )(( 0)));
+            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)));
             } else {
-              result__1VWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__BVYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__1VWG == '\\')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
+            if ((result__BVYG == '\\')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
             } else {
-              pos__1LPG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_283));
-              put_position__EOG(pos__1LPG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+              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)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          pos__3LPG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_281));
-          put_position__EOG(pos__3LPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+          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)) {
             exit(( 1));
           };
         };
@@ -24892,10132 +25836,10212 @@ static void read_escape_character__ZYIF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__CZJ()
+static __BOOLEAN read_cap_identifier__GZJ()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__FZJ,idx__GZJ;
-  __POSITION pos__QNPG;
-  __BOOLEAN result__HZJ,__tmp__VZJ,result__VWWG,__tmp__J1J,result__CXWG;
-  __BOOLEAN result__MD0G,__tmp__F1J,__tmp__G1J,result__ZD0G,__tmp__Z1J;
-  __CHARACTER result__0WWG,result__AXWG,result__BXWG,result__HXWG;
-  __CHARACTER result__IXWG,result__JXWG,result__KXWG;
-  posold__FZJ= 0;
-  idx__GZJ= 0;
-  result__HZJ=FALSE__;
-  if ((! read_space__NRD())) {
-    __tmp__VZJ=TRUE__;
+  __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__;
   } else {
-    result__0WWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__0WWG=((__CHARACTER )(( 0)));
+    result__AWYG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__AWYG=((__CHARACTER )(( 0)));
     } else {
-      result__0WWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__AWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    result__VWWG=FALSE__;
-    if ((((__INTEGER_8 )result__0WWG) >= ((__INTEGER_8 )'A'))) {
-      result__VWWG=(((__INTEGER_8 )result__0WWG) <= ((__INTEGER_8 )'Z'));
+    result__1VYG=FALSE__;
+    if ((((__INTEGER_8 )result__AWYG) >= ((__INTEGER_8 )'A'))) {
+      result__1VYG=(((__INTEGER_8 )result__AWYG) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__VZJ=(! result__VWWG);
+    __tmp__ZZJ=(! result__1VYG);
   };
-  if (__tmp__VZJ) {
-    result__HZJ=FALSE__;
+  if (__tmp__ZZJ) {
+    result__LZJ=FALSE__;
   } else {
-    posold__FZJ=position__CBC;
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    result__AXWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__AXWG=((__CHARACTER )(( 0)));
-    } else {
-      result__AXWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-    };
-    add_last__JLT(string_tmp__VH,result__AXWG);
-    position__CBC=(__INTEGER)(position__CBC +  1);
-    is_parameter_type__YJE=TRUE__;
-    until_do__GFYE:
+    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:
     {
-      result__BXWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__BXWG=((__CHARACTER )(( 0)));
+      result__HWYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__HWYG=((__CHARACTER )(( 0)));
       } else {
-        result__BXWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__HWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__BXWG == ((__CHARACTER )(( 0))))) {
-        __tmp__J1J=TRUE__;
+      if ((result__HWYG == ((__CHARACTER )(( 0))))) {
+        __tmp__N1J=TRUE__;
       } else {
-        result__HXWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__HXWG=((__CHARACTER )(( 0)));
+        result__NWYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__NWYG=((__CHARACTER )(( 0)));
         } else {
-          result__HXWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__NWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        result__CXWG=FALSE__;
-        if ((((__INTEGER_8 )result__HXWG) >= ((__INTEGER_8 )'A'))) {
-          result__CXWG=(((__INTEGER_8 )result__HXWG) <= ((__INTEGER_8 )'Z'));
+        result__IWYG=FALSE__;
+        if ((((__INTEGER_8 )result__NWYG) >= ((__INTEGER_8 )'A'))) {
+          result__IWYG=(((__INTEGER_8 )result__NWYG) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__CXWG)) {
-          result__IXWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__IXWG=((__CHARACTER )(( 0)));
+        if ((! result__IWYG)) {
+          result__OWYG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__OWYG=((__CHARACTER )(( 0)));
           } else {
-            result__IXWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__OWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          result__MD0G=FALSE__;
-          if ((((__INTEGER_8 )result__IXWG) >= ((__INTEGER_8 )'0'))) {
-            result__MD0G=(((__INTEGER_8 )result__IXWG) <= ((__INTEGER_8 )'9'));
+          result__JD2G=FALSE__;
+          if ((((__INTEGER_8 )result__OWYG) >= ((__INTEGER_8 )'0'))) {
+            result__JD2G=(((__INTEGER_8 )result__OWYG) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__F1J=(! result__MD0G);
+          __tmp__J1J=(! result__JD2G);
         } else {
-          __tmp__F1J=FALSE__;
+          __tmp__J1J=FALSE__;
         };
-        if (__tmp__F1J) {
-          result__JXWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__JXWG=((__CHARACTER )(( 0)));
+        if (__tmp__J1J) {
+          result__PWYG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__PWYG=((__CHARACTER )(( 0)));
           } else {
-            result__JXWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__PWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__G1J=(result__JXWG != '_');
+          __tmp__K1J=(result__PWYG != '_');
         } else {
-          __tmp__G1J=FALSE__;
+          __tmp__K1J=FALSE__;
         };
-        __tmp__J1J=__tmp__G1J;
+        __tmp__N1J=__tmp__K1J;
       };
-      if ((! __tmp__J1J)) {
-        result__KXWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__KXWG=((__CHARACTER )(( 0)));
+      if ((! __tmp__N1J)) {
+        result__QWYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__QWYG=((__CHARACTER )(( 0)));
         } else {
-          result__KXWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__QWYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if (is_parameter_type__YJE) {
-          result__ZD0G=FALSE__;
-          if ((((__INTEGER_8 )result__KXWG) >= ((__INTEGER_8 )'0'))) {
-            result__ZD0G=(((__INTEGER_8 )result__KXWG) <= ((__INTEGER_8 )'9'));
+        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'));
           };
-          __tmp__Z1J=result__ZD0G;
+          __tmp__31J=result__WD2G;
         } else {
-          __tmp__Z1J=FALSE__;
+          __tmp__31J=FALSE__;
         };
-        is_parameter_type__YJE=__tmp__Z1J;
-        add_last__JLT(string_tmp__VH,result__KXWG);
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto until_do__GFYE;
+        is_parameter_type__2JE=__tmp__31J;
+        add_last__NLT(string_tmp__VH,result__QWYG);
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        goto until_do__AIYE;
       };
     };
-    idx__GZJ=first_substring_index__UFYE(string_tmp__VH);
-    if ((idx__GZJ !=  0)) {
-      position__CBC=(__INTEGER)(posold__FZJ + idx__GZJ);
-      pos__QNPG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_192));
-      put_position__EOG(pos__QNPG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
-    last_string__YZC=get__YVB(string_tmp__VH);
-    result__HZJ=TRUE__;
+    last_string__2ZC=get__2VB(string_tmp__VH);
+    result__LZJ=TRUE__;
   };
-  return(result__HZJ);
+  return(result__LZJ);
 }
 
-static void add_last__CBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__DBBC,void *element__EBBC)
+static void add_last__GBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__HBBC,void *element__IBBC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__FBBC,__tmp__OCBC,__tmp__YZSD,Self__2WWE;
-  __BOOLEAN __tmp__VBBC;
-  void **__tmp__NCBC,**new__EZSD;
-  new_capacity__FBBC= 0;
-  if (((__INTEGER)(Self__DBBC->parent_arrayed_collection__DME.upper__GBBC +  1) <= (__INTEGER)(Self__DBBC->parent_arrayed_collection__DME.capacity__IBBC -  1))) {
-    Self__DBBC->parent_arrayed_collection__DME.upper__GBBC=(__INTEGER)(Self__DBBC->parent_arrayed_collection__DME.upper__GBBC +  1);
-    __tmp__VBBC=TRUE__;
+  __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__;
   } else {
-    __tmp__VBBC=FALSE__;
-  };
-  if ((! __tmp__VBBC)) {
-    if ((Self__DBBC->parent_arrayed_collection__DME.capacity__IBBC ==  0)) {
-      Self__DBBC->parent_arrayed_collection__DME.storage__ECBC=create__FY1C( 2);
-      Self__DBBC->parent_arrayed_collection__DME.capacity__IBBC= 2;
-      Self__DBBC->parent_arrayed_collection__DME.upper__GBBC= 0;
-    } else {
-      new_capacity__FBBC=(__INTEGER)(Self__DBBC->parent_arrayed_collection__DME.capacity__IBBC <<  1);
-      __tmp__NCBC=Self__DBBC->parent_arrayed_collection__DME.storage__ECBC;
-      __tmp__OCBC=Self__DBBC->parent_arrayed_collection__DME.capacity__IBBC;
-      new__EZSD=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__NCBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__OCBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FBBC * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__YZSD=(__INTEGER)(new_capacity__FBBC -  1);
-      Self__2WWE=__tmp__OCBC;
-      while ((Self__2WWE <= __tmp__YZSD)) {
-        new__EZSD[Self__2WWE]=NULL;
-        Self__2WWE=(__INTEGER)(Self__2WWE +  1);
-      };
-      Self__DBBC->parent_arrayed_collection__DME.storage__ECBC=new__EZSD;
-      Self__DBBC->parent_arrayed_collection__DME.capacity__IBBC=new_capacity__FBBC;
-      Self__DBBC->parent_arrayed_collection__DME.upper__GBBC=(__INTEGER)(Self__DBBC->parent_arrayed_collection__DME.upper__GBBC +  1);
-    };
-  };
-  ((void **)Self__DBBC->parent_arrayed_collection__DME.storage__ECBC)[Self__DBBC->parent_arrayed_collection__DME.upper__GBBC]=element__EBBC;
+    __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;
 }
 
-static __BOOLEAN read_external__QSO()
+static __BOOLEAN read_external__USO()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos_old__USO;
-  __BOOLEAN result__TSO,__tmp__5SO;
-  __CHARACTER result__1YWG,result__BZWG,result__CZWG,result__DZWG;
-  __CHARACTER result__EZWG,result__FZWG,result__GZWG,result__HZWG;
-  result__TSO=FALSE__;
-  pos_old__USO= 0;
-  if ((! read_space__NRD())) {
-    __tmp__5SO=TRUE__;
+  __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__;
   } else {
-    result__1YWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__1YWG=((__CHARACTER )(( 0)));
+    result__BYYG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__BYYG=((__CHARACTER )(( 0)));
     } else {
-      result__1YWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__BYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    __tmp__5SO=(result__1YWG != '`');
+    __tmp__DTO=(result__BYYG != '`');
   };
-  if (__tmp__5SO) {
-    result__TSO=FALSE__;
+  if (__tmp__DTO) {
+    result__XSO=FALSE__;
   } else {
-    pos_old__USO=position__CBC;
-    position__CBC=(__INTEGER)(position__CBC +  1);
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    until_do__KHRC:
+    pos_old__YSO=position__GBC;
+    position__GBC=(__INTEGER)(position__GBC +  1);
+    ((__STRING *)string_tmp__VH)->count__KFC= 0;
+    until_do__OHRC:
     {
-      result__BZWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__BZWG=((__CHARACTER )(( 0)));
+      result__HYYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__HYYG=((__CHARACTER )(( 0)));
       } else {
-        result__BZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__HYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      result__CZWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__CZWG=((__CHARACTER )(( 0)));
+      result__IYYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__IYYG=((__CHARACTER )(( 0)));
       } else {
-        result__CZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__IYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((! ((result__BZWG == ((__CHARACTER )(( 0)))) | (result__CZWG == '`')))) {
-        result__DZWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__DZWG=((__CHARACTER )(( 0)));
+      if ((! ((result__HYYG == ((__CHARACTER )(( 0)))) | (result__IYYG == '`')))) {
+        result__JYYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__JYYG=((__CHARACTER )(( 0)));
         } else {
-          result__DZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__JYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        add_last__JLT(string_tmp__VH,result__DZWG);
-        result__EZWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__EZWG=((__CHARACTER )(( 0)));
+        add_last__NLT(string_tmp__VH,result__JYYG);
+        result__KYYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__KYYG=((__CHARACTER )(( 0)));
         } else {
-          result__EZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__KYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__EZWG == '\\')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__FZWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__FZWG=((__CHARACTER )(( 0)));
+        if ((result__KYYG == '\\')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__LYYG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__LYYG=((__CHARACTER )(( 0)));
           } else {
-            result__FZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__LYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__FZWG);
-          result__GZWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__GZWG=((__CHARACTER )(( 0)));
+          add_last__NLT(string_tmp__VH,result__LYYG);
+          result__MYYG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__MYYG=((__CHARACTER )(( 0)));
           } else {
-            result__GZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__MYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__GZWG != ((__CHARACTER )(( 0))))) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
+          if ((result__MYYG != ((__CHARACTER )(( 0))))) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
           };
         } else {
-          position__CBC=(__INTEGER)(position__CBC +  1);
+          position__GBC=(__INTEGER)(position__GBC +  1);
         };
-        goto until_do__KHRC;
+        goto until_do__OHRC;
       };
     };
-    result__HZWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__HZWG=((__CHARACTER )(( 0)));
+    result__NYYG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__NYYG=((__CHARACTER )(( 0)));
     } else {
-      result__HZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__NYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__HZWG != ((__CHARACTER )(( 0))))) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      last_string__YZC=get__YVB(string_tmp__VH);
-      result__TSO=TRUE__;
-      short__token__to__1AD((&__string_65),pos_old__USO,position__CBC);
+    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);
     } else {
-      result__TSO=FALSE__;
+      result__XSO=FALSE__;
     };
   };
-  return(result__TSO);
+  return(result__XSO);
 }
 
-static void* read_expr_primary__Y3M(__PARSER *Self__Z3M)
+static void* read_expr_primary__23M(__PARSER *Self__33M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__13M;
-  void *type__23M;
-  void *group_sav__B4M,*lst__ZJHB;
-  __POSITION p__DK5G,pos__0PPG,p__NLAB,p__JZ3G,p__PL5G,pos__2PPG,p__J0H;
-  __POSITION pos__4PPG,pos__GQPG,__tmp__FFN,__tmp__NFN,pos__UQPG;
-  __POSITION pos__WQPG,pos__YQPG,pos__0QPG;
-  __ITM_READ *result__1J5G,*result__IYGB;
-  __POINTER ptr__2J5G,ptr_table__FK5G,next__EK5G,result__GK5G;
-  __POINTER ptr_table__KK5G,next__JK5G,result__LK5G,ptr__JYGB;
-  __POINTER ptr_table__RK5G,next__QK5G,result__SK5G,ptr_table__WK5G;
-  __POINTER next__VK5G,result__XK5G,ptr__CZ3G,ptr_table__1K5G;
-  __POINTER next__0K5G,result__2K5G,ptr_table__AL5G,next__5K5G;
-  __POINTER result__BL5G,ptr__IL5G,ptr_table__RL5G,next__QL5G;
-  __POINTER result__SL5G,ptr_table__WL5G,next__VL5G,result__XL5G;
-  __POINTER ptr__HPI,ptr_table__BM5G,next__AM5G,result__CM5G;
-  __POINTER ptr_table__GM5G,next__FM5G,result__HM5G,ptr__RHMB;
-  __POINTER ptr_table__OM5G,next__NM5G,result__PM5G,ptr_table__TM5G;
-  __POINTER next__SM5G,result__UM5G,ptr__KVTB,ptr_table__4M5G;
-  __POINTER next__3M5G,result__5M5G,ptr_table__DN5G,next__CN5G;
-  __POINTER result__EN5G,ptr__4WTB,ptr_table__LN5G,next__KN5G;
-  __POINTER result__MN5G,ptr_table__QN5G,next__PN5G,result__RN5G;
-  __INTEGER typ_id__3J5G,typ_id__OYGB,typ_id__DZ3G,typ_id__JL5G;
-  __INTEGER typ_id__MPI,typ_id__WHMB,typ_id__PVTB,typ_id__DXTB;
-  __UINTEGER_32 sz__4J5G,a__5J5G,new_size__AK5G,t__BK5G,a__CK5G;
-  __UINTEGER_32 new_size__NK5G,lab_type__MK5G,sz__LYGB,a__EN2G;
-  __UINTEGER_32 new_size__FN2G,t__JN2G,a__IN2G,new_size__ZK5G;
-  __UINTEGER_32 lab_type__YK5G,sz__EZ3G,a__FZ3G,new_size__GZ3G,t__HZ3G;
-  __UINTEGER_32 a__IZ3G,new_size__DL5G,lab_type__CL5G,sz__KL5G,a__LL5G;
-  __UINTEGER_32 new_size__ML5G,t__NL5G,a__OL5G,new_size__ZL5G;
-  __UINTEGER_32 lab_type__YL5G,sz__JPI,a__ML2G,new_size__NL2G,t__RL2G;
-  __UINTEGER_32 a__QL2G,new_size__JM5G,lab_type__IM5G,sz__THMB,a__YE2G;
-  __UINTEGER_32 new_size__ZE2G,t__3E2G,a__2E2G,new_size__WM5G;
-  __UINTEGER_32 lab_type__VM5G,sz__MVTB,a__AF2G,new_size__BF2G,t__FF2G;
-  __UINTEGER_32 a__EF2G,new_size__GN5G,lab_type__FN5G,sz__AXTB,a__IF2G;
-  __UINTEGER_32 new_size__JF2G,t__NF2G,a__MF2G,new_size__TN5G;
-  __UINTEGER_32 lab_type__SN5G;
-  __ITM_PROTOTYPE *result__BZ3G;
-  __ITM_LIST *result__HL5G,*result__GPI;
-  __ITM_BLOCK *result__QHMB;
-  __ITM_EXTERNAL *result__JVTB;
-  __ITM_EXTERNAL_TYPE *result__3WTB,*Self__PZEC;
-  __BOOLEAN result__0J5G,__tmp__R4M,__tmp__UAN,result__PK5G;
-  __BOOLEAN result__RF0G,__tmp__DBN,result__RZN,__tmp__RBN,__tmp__OCN;
-  __BOOLEAN result__EL5G,result__0L5G,__tmp__REN,result__3L5G;
-  __BOOLEAN result__KM5G,result__XM5G,result__0M5G,result__HN5G;
-  __BOOLEAN result__UN5G,result__XN5G,result__0N5G,__tmp__HHN;
-  __CHARACTER result__IZWG,result__JZWG,result__KZWG,result__FL5G;
-  __CHARACTER result__1L5G,result__4L5G,result__LM5G,result__YM5G;
-  __CHARACTER result__1M5G,result__IN5G,result__VN5G,result__YN5G;
-  __CHARACTER result__1N5G;
-  result__13M=NULL;
-  type__23M=NULL;
-  group_sav__B4M=NULL;
-  result__0J5G=read_word__APF((&__string_58));
-  if (is_shorter__TY) {
-    if (result__0J5G) {
+  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) {
       if (((void *)(&__string_58) == (void *)(&__string_4))) {
-        short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-      } else {
-        short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-      };
-    };
-  };
-  if (result__0J5G) {
-    p__DK5G=current_position__ZWF();
-    result__1J5G=NULL;
-    ptr__2J5G=((__POINTER )(NULL));
-    typ_id__3J5G= 0;
-    sz__4J5G=((__UINTEGER_32 )sizeof(__ITM_READ));
-    if ((sz__4J5G ==  0)) {
-      result__1J5G=ITM_READ__;
-    } else {
-      typ_id__3J5G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4J5G);
-      if ((typ_id__3J5G == (__INTEGER)(-  1))) {
-        a__5J5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__AK5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4J5G + a__5J5G) & (__UINTEGER_32)(~ a__5J5G));
-        ptr_table__FK5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AK5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__EK5G=((__POINTER )(NULL));
-        result__GK5G=((__POINTER *)ptr_table__FK5G)[ 0];
-        if ((result__GK5G == (void *)NULL)) {
-          result__GK5G=new_lab__2QJ(new_size__AK5G);
-          next__EK5G=(void *)((unsigned long)result__GK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AK5G)));
-          ((__POINTER *)next__EK5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FK5G)[ 0]=next__EK5G;
-        } else {
-          next__EK5G=((__POINTER *)result__GK5G)[ 0];
-          if ((next__EK5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GK5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AK5G <<  1)) <=  4096)) {
-              next__EK5G=(void *)((unsigned long)result__GK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AK5G)));
+        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)));
             } else {
-              next__EK5G=new_lab__2QJ(new_size__AK5G);
-            };
-            ((__POINTER *)next__EK5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FK5G)[ 0]=next__EK5G;
-          } else {
-            ((__POINTER *)result__GK5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__EK5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GK5G=next__EK5G;
-          };
-        };
-        ptr__2J5G=result__GK5G;
-      } else {
-        t__BK5G=((__UINTEGER_32 )typ_id__3J5G);
-        a__CK5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NK5G=(__UINTEGER_32)((__UINTEGER_32)(sz__4J5G + a__CK5G) & (__UINTEGER_32)(~ a__CK5G));
-        ptr_table__KK5G=((__POINTER )(&(table_type[(t__BK5G)])));
-        lab_type__MK5G=(__UINTEGER_32)(t__BK5G |  1);
-        next__JK5G=((__POINTER )(NULL));
-        result__LK5G=((__POINTER *)ptr_table__KK5G)[ 0];
-        if ((result__LK5G == (void *)NULL)) {
-          result__LK5G=new_lab__2QJ(lab_type__MK5G);
-          next__JK5G=(void *)((unsigned long)result__LK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NK5G)));
-          ((__POINTER *)next__JK5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KK5G)[ 0]=next__JK5G;
-        } else {
-          next__JK5G=((__POINTER *)result__LK5G)[ 0];
-          if ((next__JK5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LK5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NK5G <<  1)) <=  4096)) {
-              next__JK5G=(void *)((unsigned long)result__LK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NK5G)));
+              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)));
             } else {
-              next__JK5G=new_lab__2QJ(lab_type__MK5G);
+              next__YOBH=new_lab__ARJ(lab_type__1OBH);
             };
-            ((__POINTER *)next__JK5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KK5G)[ 0]=next__JK5G;
+            ((__POINTER *)next__YOBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZOBH)[ 0]=next__YOBH;
           } else {
-            ((__POINTER *)result__LK5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JK5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LK5G=next__JK5G;
+            ((__POINTER *)result__0OBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0OBH=next__YOBH;
           };
         };
-        ptr__2J5G=result__LK5G;
+        ptr__LOBH=result__0OBH;
       };
-      result__1J5G=((__ITM_READ *)ptr__2J5G);
-      *(result__1J5G) = *(ITM_READ__);
+      result__KOBH=((__ITM_READ *)ptr__LOBH);
+      *(result__KOBH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__1J5G)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__DK5G;
-    result__13M=result__1J5G;
-    __tmp__R4M=TRUE__;
+    ((__ITM_READ *)result__KOBH)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__SOBH;
+    result__53M=result__KOBH;
+    __tmp__V4M=TRUE__;
   } else {
-    __tmp__R4M=FALSE__;
+    __tmp__V4M=FALSE__;
   };
-  if (__tmp__R4M) {
-    __tmp__UAN=TRUE__;
+  if (__tmp__V4M) {
+    __tmp__YAN=TRUE__;
   } else {
-    result__PK5G=read_word__APF((&__string_11));
-    if (is_shorter__TY) {
-      if (result__PK5G) {
+    result__4OBH=read_word__EPF((&__string_11));
+    if (is_shorter__WY) {
+      if (result__4OBH) {
         if (((void *)(&__string_11) == (void *)(&__string_4))) {
-          short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         } else {
-          short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+          short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
         };
       };
     };
-    if (result__PK5G) {
-      result__IZWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__IZWG=((__CHARACTER )(( 0)));
+    if (result__4OBH) {
+      result__OYYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__OYYG=((__CHARACTER )(( 0)));
       } else {
-        result__IZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__OYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__IZWG == '_')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        copy__JCS(string_tmp__VH,(&__string_11));
-        add_last__JLT(string_tmp__VH,'_');
-        while_do__UVQB:
+      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:
         {
-          result__JZWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__JZWG=((__CHARACTER )(( 0)));
+          result__PYYG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__PYYG=((__CHARACTER )(( 0)));
           } else {
-            result__JZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__PYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          result__RF0G=FALSE__;
-          if ((((__INTEGER_8 )result__JZWG) >= ((__INTEGER_8 )'0'))) {
-            result__RF0G=(((__INTEGER_8 )result__JZWG) <= ((__INTEGER_8 )'9'));
+          result__OF2G=FALSE__;
+          if ((((__INTEGER_8 )result__PYYG) >= ((__INTEGER_8 )'0'))) {
+            result__OF2G=(((__INTEGER_8 )result__PYYG) <= ((__INTEGER_8 )'9'));
           };
-          if (result__RF0G) {
-            result__KZWG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__KZWG=((__CHARACTER )(( 0)));
+          if (result__OF2G) {
+            result__QYYG='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__QYYG=((__CHARACTER )(( 0)));
             } else {
-              result__KZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__QYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            add_last__JLT(string_tmp__VH,result__KZWG);
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            goto while_do__UVQB;
+            add_last__NLT(string_tmp__VH,result__QYYG);
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            goto while_do__YVQB;
           };
         };
-        if ((((__STRING *)string_tmp__VH)->count__GFC ==  0)) {
-          pos__0PPG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_284));
-          put_position__EOG(pos__0PPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        get__YVB(string_tmp__VH);
-      };
-      p__NLAB=current_position__ZWF();
-      result__IYGB=NULL;
-      ptr__JYGB=((__POINTER )(NULL));
-      typ_id__OYGB= 0;
-      sz__LYGB=((__UINTEGER_32 )sizeof(__ITM_READ));
-      if ((sz__LYGB ==  0)) {
-        result__IYGB=ITM_READ__;
-      } else {
-        typ_id__OYGB=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__LYGB);
-        if ((typ_id__OYGB == (__INTEGER)(-  1))) {
-          a__EN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__FN2G=(__UINTEGER_32)((__UINTEGER_32)(sz__LYGB + a__EN2G) & (__UINTEGER_32)(~ a__EN2G));
-          ptr_table__RK5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FN2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__QK5G=((__POINTER )(NULL));
-          result__SK5G=((__POINTER *)ptr_table__RK5G)[ 0];
-          if ((result__SK5G == (void *)NULL)) {
-            result__SK5G=new_lab__2QJ(new_size__FN2G);
-            next__QK5G=(void *)((unsigned long)result__SK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FN2G)));
-            ((__POINTER *)next__QK5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RK5G)[ 0]=next__QK5G;
-          } else {
-            next__QK5G=((__POINTER *)result__SK5G)[ 0];
-            if ((next__QK5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SK5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FN2G <<  1)) <=  4096)) {
-                next__QK5G=(void *)((unsigned long)result__SK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FN2G)));
+        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)));
               } else {
-                next__QK5G=new_lab__2QJ(new_size__FN2G);
+                next__5OBH=new_lab__ARJ(new_size__EQ4G);
               };
-              ((__POINTER *)next__QK5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RK5G)[ 0]=next__QK5G;
+              ((__POINTER *)next__5OBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__APBH)[ 0]=next__5OBH;
             } else {
-              ((__POINTER *)result__SK5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QK5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SK5G=next__QK5G;
-            };
-          };
-          ptr__JYGB=result__SK5G;
-        } else {
-          t__JN2G=((__UINTEGER_32 )typ_id__OYGB);
-          a__IN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ZK5G=(__UINTEGER_32)((__UINTEGER_32)(sz__LYGB + a__IN2G) & (__UINTEGER_32)(~ a__IN2G));
-          ptr_table__WK5G=((__POINTER )(&(table_type[(t__JN2G)])));
-          lab_type__YK5G=(__UINTEGER_32)(t__JN2G |  1);
-          next__VK5G=((__POINTER )(NULL));
-          result__XK5G=((__POINTER *)ptr_table__WK5G)[ 0];
-          if ((result__XK5G == (void *)NULL)) {
-            result__XK5G=new_lab__2QJ(lab_type__YK5G);
-            next__VK5G=(void *)((unsigned long)result__XK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZK5G)));
-            ((__POINTER *)next__VK5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WK5G)[ 0]=next__VK5G;
-          } else {
-            next__VK5G=((__POINTER *)result__XK5G)[ 0];
-            if ((next__VK5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XK5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZK5G <<  1)) <=  4096)) {
-                next__VK5G=(void *)((unsigned long)result__XK5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZK5G)));
+              ((__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)));
               } else {
-                next__VK5G=new_lab__2QJ(lab_type__YK5G);
+                next__EPBH=new_lab__ARJ(lab_type__HPBH);
               };
-              ((__POINTER *)next__VK5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WK5G)[ 0]=next__VK5G;
+              ((__POINTER *)next__EPBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FPBH)[ 0]=next__EPBH;
             } else {
-              ((__POINTER *)result__XK5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VK5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__XK5G=next__VK5G;
+              ((__POINTER *)result__GPBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EPBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GPBH=next__EPBH;
             };
           };
-          ptr__JYGB=result__XK5G;
+          ptr__NYGB=result__GPBH;
         };
-        result__IYGB=((__ITM_READ *)ptr__JYGB);
-        *(result__IYGB) = *(ITM_READ__);
+        result__MYGB=((__ITM_READ *)ptr__NYGB);
+        *(result__MYGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__IYGB)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__NLAB;
-      result__13M=result__IYGB;
+      ((__ITM_READ *)result__MYGB)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__RLAB;
+      result__53M=result__MYGB;
     };
-    __tmp__UAN=result__PK5G;
+    __tmp__YAN=result__4OBH;
   };
-  if (__tmp__UAN) {
-    __tmp__DBN=TRUE__;
+  if (__tmp__YAN) {
+    __tmp__HBN=TRUE__;
   } else {
-    type__23M=read_prototype__XNN(Self__Z3M,NULL);
-    result__RZN=((void *)type__23M != (void *)NULL);
-    if (result__RZN) {
-      p__JZ3G=current_position__ZWF();
-      result__BZ3G=NULL;
-      ptr__CZ3G=((__POINTER )(NULL));
-      typ_id__DZ3G= 0;
-      sz__EZ3G=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-      if ((sz__EZ3G ==  0)) {
-        result__BZ3G=ITM_PROTOTYPE__;
-      } else {
-        typ_id__DZ3G=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__EZ3G);
-        if ((typ_id__DZ3G == (__INTEGER)(-  1))) {
-          a__FZ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__GZ3G=(__UINTEGER_32)((__UINTEGER_32)(sz__EZ3G + a__FZ3G) & (__UINTEGER_32)(~ a__FZ3G));
-          ptr_table__1K5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GZ3G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__0K5G=((__POINTER )(NULL));
-          result__2K5G=((__POINTER *)ptr_table__1K5G)[ 0];
-          if ((result__2K5G == (void *)NULL)) {
-            result__2K5G=new_lab__2QJ(new_size__GZ3G);
-            next__0K5G=(void *)((unsigned long)result__2K5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZ3G)));
-            ((__POINTER *)next__0K5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1K5G)[ 0]=next__0K5G;
-          } else {
-            next__0K5G=((__POINTER *)result__2K5G)[ 0];
-            if ((next__0K5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2K5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GZ3G <<  1)) <=  4096)) {
-                next__0K5G=(void *)((unsigned long)result__2K5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZ3G)));
+    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)));
               } else {
-                next__0K5G=new_lab__2QJ(new_size__GZ3G);
+                next__JPBH=new_lab__ARJ(new_size__O25G);
               };
-              ((__POINTER *)next__0K5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1K5G)[ 0]=next__0K5G;
+              ((__POINTER *)next__JPBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KPBH)[ 0]=next__JPBH;
             } else {
-              ((__POINTER *)result__2K5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0K5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__2K5G=next__0K5G;
-            };
-          };
-          ptr__CZ3G=result__2K5G;
-        } else {
-          t__HZ3G=((__UINTEGER_32 )typ_id__DZ3G);
-          a__IZ3G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__DL5G=(__UINTEGER_32)((__UINTEGER_32)(sz__EZ3G + a__IZ3G) & (__UINTEGER_32)(~ a__IZ3G));
-          ptr_table__AL5G=((__POINTER )(&(table_type[(t__HZ3G)])));
-          lab_type__CL5G=(__UINTEGER_32)(t__HZ3G |  1);
-          next__5K5G=((__POINTER )(NULL));
-          result__BL5G=((__POINTER *)ptr_table__AL5G)[ 0];
-          if ((result__BL5G == (void *)NULL)) {
-            result__BL5G=new_lab__2QJ(lab_type__CL5G);
-            next__5K5G=(void *)((unsigned long)result__BL5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DL5G)));
-            ((__POINTER *)next__5K5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AL5G)[ 0]=next__5K5G;
-          } else {
-            next__5K5G=((__POINTER *)result__BL5G)[ 0];
-            if ((next__5K5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BL5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DL5G <<  1)) <=  4096)) {
-                next__5K5G=(void *)((unsigned long)result__BL5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DL5G)));
+              ((__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)));
               } else {
-                next__5K5G=new_lab__2QJ(lab_type__CL5G);
+                next__OPBH=new_lab__ARJ(lab_type__RPBH);
               };
-              ((__POINTER *)next__5K5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AL5G)[ 0]=next__5K5G;
+              ((__POINTER *)next__OPBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PPBH)[ 0]=next__OPBH;
             } else {
-              ((__POINTER *)result__BL5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__5K5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BL5G=next__5K5G;
+              ((__POINTER *)result__QPBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OPBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QPBH=next__OPBH;
             };
           };
-          ptr__CZ3G=result__BL5G;
+          ptr__K25G=result__QPBH;
         };
-        result__BZ3G=((__ITM_PROTOTYPE *)ptr__CZ3G);
-        *(result__BZ3G) = *(ITM_PROTOTYPE__);
+        result__J25G=((__ITM_PROTOTYPE *)ptr__K25G);
+        *(result__J25G) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__BZ3G)->parent_itm_constant__MVF.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=p__JZ3G;
-      result__13M=result__BZ3G;
+      ((__ITM_PROTOTYPE *)result__J25G)->parent_itm_constant__QVF.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=p__R25G;
+      result__53M=result__J25G;
     };
-    __tmp__DBN=result__RZN;
+    __tmp__HBN=result__VZN;
   };
-  if (__tmp__DBN) {
-    __tmp__RBN=TRUE__;
+  if (__tmp__HBN) {
+    __tmp__VBN=TRUE__;
   } else {
-    result__13M=read_constant__LQO();
-    __tmp__RBN=((void *)result__13M != (void *)NULL);
+    result__53M=read_constant__PQO();
+    __tmp__VBN=((void *)result__53M != (void *)NULL);
   };
-  if (__tmp__RBN) {
-    __tmp__OCN=TRUE__;
+  if (__tmp__VBN) {
+    __tmp__SCN=TRUE__;
   } else {
-    result__EL5G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__EL5G=FALSE__;
-    } else {
-      result__FL5G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__FL5G=((__CHARACTER )(( 0)));
-      } else {
-        result__FL5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-      };
-      if ((result__FL5G == '(')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__EL5G=TRUE__;
-      };
-    };
-    if (result__EL5G) {
-      group_sav__B4M=last_group__LTF;
-      p__PL5G=current_position__ZWF();
-      result__HL5G=NULL;
-      ptr__IL5G=((__POINTER )(NULL));
-      typ_id__JL5G= 0;
-      sz__KL5G=((__UINTEGER_32 )sizeof(__ITM_LIST));
-      if ((sz__KL5G ==  0)) {
-        result__HL5G=ITM_LIST__;
-      } else {
-        typ_id__JL5G=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__KL5G);
-        if ((typ_id__JL5G == (__INTEGER)(-  1))) {
-          a__LL5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ML5G=(__UINTEGER_32)((__UINTEGER_32)(sz__KL5G + a__LL5G) & (__UINTEGER_32)(~ a__LL5G));
-          ptr_table__RL5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ML5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__QL5G=((__POINTER )(NULL));
-          result__SL5G=((__POINTER *)ptr_table__RL5G)[ 0];
-          if ((result__SL5G == (void *)NULL)) {
-            result__SL5G=new_lab__2QJ(new_size__ML5G);
-            next__QL5G=(void *)((unsigned long)result__SL5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ML5G)));
-            ((__POINTER *)next__QL5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RL5G)[ 0]=next__QL5G;
-          } else {
-            next__QL5G=((__POINTER *)result__SL5G)[ 0];
-            if ((next__QL5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SL5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ML5G <<  1)) <=  4096)) {
-                next__QL5G=(void *)((unsigned long)result__SL5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ML5G)));
+    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)));
               } else {
-                next__QL5G=new_lab__2QJ(new_size__ML5G);
+                next__5PBH=new_lab__ARJ(new_size__1PBH);
               };
-              ((__POINTER *)next__QL5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RL5G)[ 0]=next__QL5G;
+              ((__POINTER *)next__5PBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AQBH)[ 0]=next__5PBH;
             } else {
-              ((__POINTER *)result__SL5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QL5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SL5G=next__QL5G;
-            };
-          };
-          ptr__IL5G=result__SL5G;
-        } else {
-          t__NL5G=((__UINTEGER_32 )typ_id__JL5G);
-          a__OL5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ZL5G=(__UINTEGER_32)((__UINTEGER_32)(sz__KL5G + a__OL5G) & (__UINTEGER_32)(~ a__OL5G));
-          ptr_table__WL5G=((__POINTER )(&(table_type[(t__NL5G)])));
-          lab_type__YL5G=(__UINTEGER_32)(t__NL5G |  1);
-          next__VL5G=((__POINTER )(NULL));
-          result__XL5G=((__POINTER *)ptr_table__WL5G)[ 0];
-          if ((result__XL5G == (void *)NULL)) {
-            result__XL5G=new_lab__2QJ(lab_type__YL5G);
-            next__VL5G=(void *)((unsigned long)result__XL5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZL5G)));
-            ((__POINTER *)next__VL5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WL5G)[ 0]=next__VL5G;
-          } else {
-            next__VL5G=((__POINTER *)result__XL5G)[ 0];
-            if ((next__VL5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XL5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZL5G <<  1)) <=  4096)) {
-                next__VL5G=(void *)((unsigned long)result__XL5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZL5G)));
+              ((__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)));
               } else {
-                next__VL5G=new_lab__2QJ(lab_type__YL5G);
+                next__EQBH=new_lab__ARJ(lab_type__HQBH);
               };
-              ((__POINTER *)next__VL5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WL5G)[ 0]=next__VL5G;
+              ((__POINTER *)next__EQBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FQBH)[ 0]=next__EQBH;
             } else {
-              ((__POINTER *)result__XL5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VL5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__XL5G=next__VL5G;
+              ((__POINTER *)result__GQBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EQBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GQBH=next__EQBH;
             };
           };
-          ptr__IL5G=result__XL5G;
+          ptr__XPBH=result__GQBH;
         };
-        result__HL5G=((__ITM_LIST *)ptr__IL5G);
-        *(result__HL5G) = *(ITM_LIST__);
+        result__WPBH=((__ITM_LIST *)ptr__XPBH);
+        *(result__WPBH) = *(ITM_LIST__);
       };
-      ((__ITM_LIST *)result__HL5G)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ=p__PL5G;
-      last_group__LTF=result__HL5G;
-      result__13M=result__HL5G;
-      read_group__ZAHB(Self__Z3M);
-      result__0L5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__0L5G=FALSE__;
+      ((__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__;
       } else {
-        result__1L5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__1L5G=((__CHARACTER )(( 0)));
+        result__KQBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__KQBH=((__CHARACTER )(( 0)));
         } else {
-          result__1L5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__KQBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__1L5G == ')')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__0L5G=TRUE__;
+        if ((result__KQBH == ')')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__JQBH=TRUE__;
         };
       };
-      if ((! result__0L5G)) {
-        pos__2PPG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_244));
-        put_position__EOG(pos__2PPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      last_group__LTF=group_sav__B4M;
+      last_group__PTF=group_sav__F4M;
     };
-    __tmp__OCN=result__EL5G;
+    __tmp__SCN=result__TPBH;
   };
-  if (__tmp__OCN) {
-    __tmp__REN=TRUE__;
+  if (__tmp__SCN) {
+    __tmp__VEN=TRUE__;
   } else {
-    result__3L5G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__3L5G=FALSE__;
-    } else {
-      result__4L5G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__4L5G=((__CHARACTER )(( 0)));
-      } else {
-        result__4L5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-      };
-      if ((result__4L5G == '{')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__3L5G=TRUE__;
-      };
-    };
-    if (result__3L5G) {
-      short__token__to__1AD((&__string_133),(__INTEGER)(position__CBC -  1),position__CBC);
-      group_sav__B4M=last_group__LTF;
-      p__J0H=current_position__ZWF();
-      result__GPI=NULL;
-      ptr__HPI=((__POINTER )(NULL));
-      typ_id__MPI= 0;
-      sz__JPI=((__UINTEGER_32 )sizeof(__ITM_LIST));
-      if ((sz__JPI ==  0)) {
-        result__GPI=ITM_LIST__;
-      } else {
-        typ_id__MPI=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__JPI);
-        if ((typ_id__MPI == (__INTEGER)(-  1))) {
-          a__ML2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__NL2G=(__UINTEGER_32)((__UINTEGER_32)(sz__JPI + a__ML2G) & (__UINTEGER_32)(~ a__ML2G));
-          ptr_table__BM5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NL2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__AM5G=((__POINTER )(NULL));
-          result__CM5G=((__POINTER *)ptr_table__BM5G)[ 0];
-          if ((result__CM5G == (void *)NULL)) {
-            result__CM5G=new_lab__2QJ(new_size__NL2G);
-            next__AM5G=(void *)((unsigned long)result__CM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NL2G)));
-            ((__POINTER *)next__AM5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BM5G)[ 0]=next__AM5G;
-          } else {
-            next__AM5G=((__POINTER *)result__CM5G)[ 0];
-            if ((next__AM5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CM5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__NL2G <<  1)) <=  4096)) {
-                next__AM5G=(void *)((unsigned long)result__CM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NL2G)));
+    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)));
               } else {
-                next__AM5G=new_lab__2QJ(new_size__NL2G);
+                next__PQBH=new_lab__ARJ(new_size__MO4G);
               };
-              ((__POINTER *)next__AM5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__BM5G)[ 0]=next__AM5G;
+              ((__POINTER *)next__PQBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QQBH)[ 0]=next__PQBH;
             } else {
-              ((__POINTER *)result__CM5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__AM5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__CM5G=next__AM5G;
-            };
-          };
-          ptr__HPI=result__CM5G;
-        } else {
-          t__RL2G=((__UINTEGER_32 )typ_id__MPI);
-          a__QL2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__JM5G=(__UINTEGER_32)((__UINTEGER_32)(sz__JPI + a__QL2G) & (__UINTEGER_32)(~ a__QL2G));
-          ptr_table__GM5G=((__POINTER )(&(table_type[(t__RL2G)])));
-          lab_type__IM5G=(__UINTEGER_32)(t__RL2G |  1);
-          next__FM5G=((__POINTER )(NULL));
-          result__HM5G=((__POINTER *)ptr_table__GM5G)[ 0];
-          if ((result__HM5G == (void *)NULL)) {
-            result__HM5G=new_lab__2QJ(lab_type__IM5G);
-            next__FM5G=(void *)((unsigned long)result__HM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JM5G)));
-            ((__POINTER *)next__FM5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GM5G)[ 0]=next__FM5G;
-          } else {
-            next__FM5G=((__POINTER *)result__HM5G)[ 0];
-            if ((next__FM5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HM5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__JM5G <<  1)) <=  4096)) {
-                next__FM5G=(void *)((unsigned long)result__HM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JM5G)));
+              ((__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)));
               } else {
-                next__FM5G=new_lab__2QJ(lab_type__IM5G);
+                next__UQBH=new_lab__ARJ(lab_type__XQBH);
               };
-              ((__POINTER *)next__FM5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GM5G)[ 0]=next__FM5G;
+              ((__POINTER *)next__UQBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VQBH)[ 0]=next__UQBH;
             } else {
-              ((__POINTER *)result__HM5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__FM5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__HM5G=next__FM5G;
+              ((__POINTER *)result__WQBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UQBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WQBH=next__UQBH;
             };
           };
-          ptr__HPI=result__HM5G;
+          ptr__LPI=result__WQBH;
         };
-        result__GPI=((__ITM_LIST *)ptr__HPI);
-        *(result__GPI) = *(ITM_LIST__);
+        result__KPI=((__ITM_LIST *)ptr__LPI);
+        *(result__KPI) = *(ITM_LIST__);
       };
-      ((__ITM_LIST *)result__GPI)->parent_itm_code__04E.parent_itm_object__HDE.position__3CJ=p__J0H;
-      last_group__LTF=result__GPI;
-      old_position__TQI=position__CBC;
-      old_pos_cur__VQI=pos_cur__FBC;
-      old_pos_line__XQI=pos_line__GBC;
-      old_pos_col__ZQI=pos_col__HBC;
-      old_short_derive__1QI=short_derive__RBC;
-      if (((void *)read_loc_arg__with_self__YDHB(Self__Z3M,TRUE__,FALSE__) != (void *)NULL)) {
-        result__KM5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__KM5G=FALSE__;
+      ((__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__;
         } else {
-          result__LM5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__LM5G=((__CHARACTER )(( 0)));
+          result__0QBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__0QBH=((__CHARACTER )(( 0)));
           } else {
-            result__LM5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__0QBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__LM5G == ';')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__KM5G=TRUE__;
+          if ((result__0QBH == ';')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__ZQBH=TRUE__;
           };
         };
-        if ((! result__KM5G)) {
-          pos__4PPG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_227));
-          put_position__EOG(pos__4PPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
       } else {
-        restore_context__DDL();
-      };
-      lst__ZJHB=last_group__LTF;
-      result__QHMB=NULL;
-      ptr__RHMB=((__POINTER )(NULL));
-      typ_id__WHMB= 0;
-      sz__THMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
-      if ((sz__THMB ==  0)) {
-        result__QHMB=ITM_BLOCK__;
-      } else {
-        typ_id__WHMB=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__THMB);
-        if ((typ_id__WHMB == (__INTEGER)(-  1))) {
-          a__YE2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ZE2G=(__UINTEGER_32)((__UINTEGER_32)(sz__THMB + a__YE2G) & (__UINTEGER_32)(~ a__YE2G));
-          ptr_table__OM5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZE2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__NM5G=((__POINTER )(NULL));
-          result__PM5G=((__POINTER *)ptr_table__OM5G)[ 0];
-          if ((result__PM5G == (void *)NULL)) {
-            result__PM5G=new_lab__2QJ(new_size__ZE2G);
-            next__NM5G=(void *)((unsigned long)result__PM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZE2G)));
-            ((__POINTER *)next__NM5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OM5G)[ 0]=next__NM5G;
-          } else {
-            next__NM5G=((__POINTER *)result__PM5G)[ 0];
-            if ((next__NM5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PM5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZE2G <<  1)) <=  4096)) {
-                next__NM5G=(void *)((unsigned long)result__PM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZE2G)));
+        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)));
               } else {
-                next__NM5G=new_lab__2QJ(new_size__ZE2G);
+                next__2QBH=new_lab__ARJ(new_size__RH4G);
               };
-              ((__POINTER *)next__NM5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__OM5G)[ 0]=next__NM5G;
+              ((__POINTER *)next__2QBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3QBH)[ 0]=next__2QBH;
             } else {
-              ((__POINTER *)result__PM5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NM5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__PM5G=next__NM5G;
-            };
-          };
-          ptr__RHMB=result__PM5G;
-        } else {
-          t__3E2G=((__UINTEGER_32 )typ_id__WHMB);
-          a__2E2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__WM5G=(__UINTEGER_32)((__UINTEGER_32)(sz__THMB + a__2E2G) & (__UINTEGER_32)(~ a__2E2G));
-          ptr_table__TM5G=((__POINTER )(&(table_type[(t__3E2G)])));
-          lab_type__VM5G=(__UINTEGER_32)(t__3E2G |  1);
-          next__SM5G=((__POINTER )(NULL));
-          result__UM5G=((__POINTER *)ptr_table__TM5G)[ 0];
-          if ((result__UM5G == (void *)NULL)) {
-            result__UM5G=new_lab__2QJ(lab_type__VM5G);
-            next__SM5G=(void *)((unsigned long)result__UM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WM5G)));
-            ((__POINTER *)next__SM5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TM5G)[ 0]=next__SM5G;
-          } else {
-            next__SM5G=((__POINTER *)result__UM5G)[ 0];
-            if ((next__SM5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UM5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WM5G <<  1)) <=  4096)) {
-                next__SM5G=(void *)((unsigned long)result__UM5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WM5G)));
+              ((__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)));
               } else {
-                next__SM5G=new_lab__2QJ(lab_type__VM5G);
+                next__BRBH=new_lab__ARJ(lab_type__ERBH);
               };
-              ((__POINTER *)next__SM5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__TM5G)[ 0]=next__SM5G;
+              ((__POINTER *)next__BRBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CRBH)[ 0]=next__BRBH;
             } else {
-              ((__POINTER *)result__UM5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SM5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__UM5G=next__SM5G;
+              ((__POINTER *)result__DRBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DRBH=next__BRBH;
             };
           };
-          ptr__RHMB=result__UM5G;
+          ptr__VHMB=result__DRBH;
         };
-        result__QHMB=((__ITM_BLOCK *)ptr__RHMB);
-        *(result__QHMB) = *(ITM_BLOCK__);
+        result__UHMB=((__ITM_BLOCK *)ptr__VHMB);
+        *(result__UHMB) = *(ITM_BLOCK__);
       };
-      ((__ITM_BLOCK *)result__QHMB)->list__QMDC=lst__ZJHB;
-      result__13M=result__QHMB;
-      read_group__ZAHB(Self__Z3M);
-      result__XM5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__XM5G=FALSE__;
+      ((__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__;
       } else {
-        result__YM5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__YM5G=((__CHARACTER )(( 0)));
+        result__HRBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__HRBH=((__CHARACTER )(( 0)));
         } else {
-          result__YM5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__HRBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__YM5G == '}')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__XM5G=TRUE__;
+        if ((result__HRBH == '}')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__GRBH=TRUE__;
         };
       };
-      if ((! result__XM5G)) {
-        pos__GQPG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_276));
-        put_position__EOG(pos__GQPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      short__token__to__1AD((&__string_133),(__INTEGER)(position__CBC -  1),position__CBC);
-      last_group__LTF=group_sav__B4M;
-    };
-    __tmp__REN=result__3L5G;
-  };
-  if ((! __tmp__REN)) {
-    if (read_external__QSO()) {
-      result__0M5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__0M5G=FALSE__;
-      } else {
-        result__1M5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__1M5G=((__CHARACTER )(( 0)));
-        } else {
-          result__1M5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-        };
-        if ((result__1M5G == ':')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__0M5G=TRUE__;
-        };
-      };
-      if ((! result__0M5G)) {
-        __tmp__FFN=current_position__ZWF();
-        result__JVTB=NULL;
-        ptr__KVTB=((__POINTER )(NULL));
-        typ_id__PVTB= 0;
-        sz__MVTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
-        if ((sz__MVTB ==  0)) {
-          result__JVTB=ITM_EXTERNAL__;
-        } else {
-          typ_id__PVTB=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__MVTB);
-          if ((typ_id__PVTB == (__INTEGER)(-  1))) {
-            a__AF2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__BF2G=(__UINTEGER_32)((__UINTEGER_32)(sz__MVTB + a__AF2G) & (__UINTEGER_32)(~ a__AF2G));
-            ptr_table__4M5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BF2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__3M5G=((__POINTER )(NULL));
-            result__5M5G=((__POINTER *)ptr_table__4M5G)[ 0];
-            if ((result__5M5G == (void *)NULL)) {
-              result__5M5G=new_lab__2QJ(new_size__BF2G);
-              next__3M5G=(void *)((unsigned long)result__5M5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BF2G)));
-              ((__POINTER *)next__3M5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4M5G)[ 0]=next__3M5G;
+      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;
             } else {
-              next__3M5G=((__POINTER *)result__5M5G)[ 0];
-              if ((next__3M5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5M5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__BF2G <<  1)) <=  4096)) {
-                  next__3M5G=(void *)((unsigned long)result__5M5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BF2G)));
+              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)));
                 } else {
-                  next__3M5G=new_lab__2QJ(new_size__BF2G);
+                  next__MRBH=new_lab__ARJ(new_size__ZH4G);
                 };
-                ((__POINTER *)next__3M5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4M5G)[ 0]=next__3M5G;
+                ((__POINTER *)next__MRBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NRBH)[ 0]=next__MRBH;
               } else {
-                ((__POINTER *)result__5M5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__3M5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__5M5G=next__3M5G;
+                ((__POINTER *)result__ORBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ORBH=next__MRBH;
               };
             };
-            ptr__KVTB=result__5M5G;
-          } else {
-            t__FF2G=((__UINTEGER_32 )typ_id__PVTB);
-            a__EF2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__GN5G=(__UINTEGER_32)((__UINTEGER_32)(sz__MVTB + a__EF2G) & (__UINTEGER_32)(~ a__EF2G));
-            ptr_table__DN5G=((__POINTER )(&(table_type[(t__FF2G)])));
-            lab_type__FN5G=(__UINTEGER_32)(t__FF2G |  1);
-            next__CN5G=((__POINTER )(NULL));
-            result__EN5G=((__POINTER *)ptr_table__DN5G)[ 0];
-            if ((result__EN5G == (void *)NULL)) {
-              result__EN5G=new_lab__2QJ(lab_type__FN5G);
-              next__CN5G=(void *)((unsigned long)result__EN5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GN5G)));
-              ((__POINTER *)next__CN5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DN5G)[ 0]=next__CN5G;
+            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;
             } else {
-              next__CN5G=((__POINTER *)result__EN5G)[ 0];
-              if ((next__CN5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EN5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GN5G <<  1)) <=  4096)) {
-                  next__CN5G=(void *)((unsigned long)result__EN5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GN5G)));
+              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)));
                 } else {
-                  next__CN5G=new_lab__2QJ(lab_type__FN5G);
+                  next__RRBH=new_lab__ARJ(lab_type__URBH);
                 };
-                ((__POINTER *)next__CN5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DN5G)[ 0]=next__CN5G;
+                ((__POINTER *)next__RRBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SRBH)[ 0]=next__RRBH;
               } else {
-                ((__POINTER *)result__EN5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__CN5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__EN5G=next__CN5G;
+                ((__POINTER *)result__TRBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TRBH=next__RRBH;
               };
             };
-            ptr__KVTB=result__EN5G;
-          };
-          result__JVTB=((__ITM_EXTERNAL *)ptr__KVTB);
-          *(result__JVTB) = *(ITM_EXTERNAL__);
-        };
-        ((__ITM_EXTERNAL *)result__JVTB)->parent_itm_extern__EFN.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ=__tmp__FFN;
-        result__13M=result__JVTB;
-      } else {
-        __tmp__NFN=current_position__ZWF();
-        result__HN5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__HN5G=FALSE__;
-        } else {
-          result__IN5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__IN5G=((__CHARACTER )(( 0)));
-          } else {
-            result__IN5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-          };
-          if ((result__IN5G == '(')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__HN5G=TRUE__;
-          };
-        };
-        result__3WTB=NULL;
-        ptr__4WTB=((__POINTER )(NULL));
-        typ_id__DXTB= 0;
-        sz__AXTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
-        if ((sz__AXTB ==  0)) {
-          result__3WTB=ITM_EXTERNAL_TYPE__;
-        } else {
-          typ_id__DXTB=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__AXTB);
-          if ((typ_id__DXTB == (__INTEGER)(-  1))) {
-            a__IF2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__JF2G=(__UINTEGER_32)((__UINTEGER_32)(sz__AXTB + a__IF2G) & (__UINTEGER_32)(~ a__IF2G));
-            ptr_table__LN5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JF2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__KN5G=((__POINTER )(NULL));
-            result__MN5G=((__POINTER *)ptr_table__LN5G)[ 0];
-            if ((result__MN5G == (void *)NULL)) {
-              result__MN5G=new_lab__2QJ(new_size__JF2G);
-              next__KN5G=(void *)((unsigned long)result__MN5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JF2G)));
-              ((__POINTER *)next__KN5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LN5G)[ 0]=next__KN5G;
+            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;
             } else {
-              next__KN5G=((__POINTER *)result__MN5G)[ 0];
-              if ((next__KN5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MN5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__JF2G <<  1)) <=  4096)) {
-                  next__KN5G=(void *)((unsigned long)result__MN5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JF2G)));
+              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)));
                 } else {
-                  next__KN5G=new_lab__2QJ(new_size__JF2G);
+                  next__ZRBH=new_lab__ARJ(new_size__BI4G);
                 };
-                ((__POINTER *)next__KN5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LN5G)[ 0]=next__KN5G;
+                ((__POINTER *)next__ZRBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0RBH)[ 0]=next__ZRBH;
               } else {
-                ((__POINTER *)result__MN5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__KN5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__MN5G=next__KN5G;
+                ((__POINTER *)result__1RBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZRBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__1RBH=next__ZRBH;
               };
             };
-            ptr__4WTB=result__MN5G;
-          } else {
-            t__NF2G=((__UINTEGER_32 )typ_id__DXTB);
-            a__MF2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__TN5G=(__UINTEGER_32)((__UINTEGER_32)(sz__AXTB + a__MF2G) & (__UINTEGER_32)(~ a__MF2G));
-            ptr_table__QN5G=((__POINTER )(&(table_type[(t__NF2G)])));
-            lab_type__SN5G=(__UINTEGER_32)(t__NF2G |  1);
-            next__PN5G=((__POINTER )(NULL));
-            result__RN5G=((__POINTER *)ptr_table__QN5G)[ 0];
-            if ((result__RN5G == (void *)NULL)) {
-              result__RN5G=new_lab__2QJ(lab_type__SN5G);
-              next__PN5G=(void *)((unsigned long)result__RN5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TN5G)));
-              ((__POINTER *)next__PN5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QN5G)[ 0]=next__PN5G;
+            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;
             } else {
-              next__PN5G=((__POINTER *)result__RN5G)[ 0];
-              if ((next__PN5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RN5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TN5G <<  1)) <=  4096)) {
-                  next__PN5G=(void *)((unsigned long)result__RN5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TN5G)));
+              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)));
                 } else {
-                  next__PN5G=new_lab__2QJ(lab_type__SN5G);
+                  next__4RBH=new_lab__ARJ(lab_type__BSBH);
                 };
-                ((__POINTER *)next__PN5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QN5G)[ 0]=next__PN5G;
+                ((__POINTER *)next__4RBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5RBH)[ 0]=next__4RBH;
               } else {
-                ((__POINTER *)result__RN5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__PN5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__RN5G=next__PN5G;
+                ((__POINTER *)result__ASBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ASBH=next__4RBH;
               };
             };
-            ptr__4WTB=result__RN5G;
-          };
-          result__3WTB=((__ITM_EXTERNAL_TYPE *)ptr__4WTB);
-          *(result__3WTB) = *(ITM_EXTERNAL_TYPE__);
-        };
-        Self__PZEC=((__ITM_EXTERNAL_TYPE *)result__3WTB);
-        Self__PZEC->parent_itm_extern__53M.parent_itm_code__43M.parent_itm_object__HDE.position__3CJ=__tmp__NFN;
-        Self__PZEC->is_persistant__2GN=result__HN5G;
-        type__23M=read_type__TBM(Self__Z3M,FALSE__);
-        if (((void *)type__23M == (void *)NULL)) {
-          pos__UQPG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_261));
-          put_position__EOG(pos__UQPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+            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)) {
             exit(( 1));
           };
         };
-        result__UN5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__UN5G=FALSE__;
+        result__DSBH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__DSBH=FALSE__;
         } else {
-          result__VN5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__VN5G=((__CHARACTER )(( 0)));
+          result__ESBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__ESBH=((__CHARACTER )(( 0)));
           } else {
-            result__VN5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__ESBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__VN5G == '{')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__UN5G=TRUE__;
+          if ((result__ESBH == '{')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__DSBH=TRUE__;
           };
         };
-        if (result__UN5G) {
-          if (((void *)read_type_list__YLO(Self__Z3M,FALSE__) == (void *)NULL)) {
-            pos__WQPG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_285));
-            put_position__EOG(pos__WQPG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        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)) {
               exit(( 1));
             };
           };
-          result__XN5G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__XN5G=FALSE__;
+          result__GSBH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__GSBH=FALSE__;
           } else {
-            result__YN5G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__YN5G=((__CHARACTER )(( 0)));
+            result__HSBH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__HSBH=((__CHARACTER )(( 0)));
             } else {
-              result__YN5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__HSBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__YN5G == '}')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__XN5G=TRUE__;
+            if ((result__HSBH == '}')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__GSBH=TRUE__;
             };
           };
-          if ((! result__XN5G)) {
-            pos__YQPG=current_position__ZWF();
-            put_error__text__0MG( 2,(&__string_276));
-            put_position__EOG(pos__YQPG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
         };
-        if (result__3WTB->is_persistant__2GN) {
-          result__0N5G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__0N5G=FALSE__;
+        if (result__BXTB->is_persistant__AHN) {
+          result__JSBH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__JSBH=FALSE__;
           } else {
-            result__1N5G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__1N5G=((__CHARACTER )(( 0)));
+            result__KSBH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__KSBH=((__CHARACTER )(( 0)));
             } else {
-              result__1N5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__KSBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__1N5G == ')')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__0N5G=TRUE__;
+            if ((result__KSBH == ')')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__JSBH=TRUE__;
             };
           };
-          __tmp__HHN=(! result__0N5G);
+          __tmp__LHN=(! result__JSBH);
         } else {
-          __tmp__HHN=FALSE__;
+          __tmp__LHN=FALSE__;
         };
-        if (__tmp__HHN) {
-          pos__0QPG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_244));
-          put_position__EOG(pos__0QPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        result__13M=result__3WTB;
+        result__53M=result__BXTB;
       };
     };
   };
-  return(result__13M);
+  return(result__53M);
 }
 
-static __BOOLEAN read_integer__Q1P()
+static __BOOLEAN read_integer__U1P()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER_64 result__J4IE,__tmp__14IE,result__T2OE,result__JNQE;
-  __INTEGER pos_old__U1P,__tmp__U4IE,Self__EUNE,result__PLRE,j__E1OE;
-  __INTEGER __tmp__42OE,Self__IVPE,i__TLQE,__tmp__UNQE,Self__LQRE;
-  __INTEGER state__WOQE,value__XOQE,i__VOQE,state__RWQE,result__UWQE;
-  __INTEGER i__QWQE;
-  __STRING *Self__H4IE,*Self__GH0G,*Self__OF2G,*Self__B1OE,*Self__R2OE;
-  __STRING *Self__RLQE,*Self__HNQE,*Self__TOQE,*Self__OWQE;
-  __POSITION pos__ISPG,pos__2SPG,pos__LTPG;
-  __BOOLEAN result__T1P,result__4F0G,__tmp__51P,__tmp__Z2P,__tmp__GMRE;
-  __BOOLEAN result__D1OE,__tmp__21OE,result__ZWSE,__tmp__B5P;
-  __BOOLEAN result__ULQE,negative__YOQE,result__ZOQE,__tmp__HQQE;
-  __BOOLEAN result__DFHG,__tmp__TQQE,result__QFHG,result__GQ0G;
-  __BOOLEAN __tmp__HRQE,__tmp__GSQE,result__4BEF,result__JQ0G;
-  __BOOLEAN __tmp__0UQE,result__QCEF,result__MQ0G,__tmp__HUQE;
-  __BOOLEAN negative__TWQE,__tmp__AYQE,result__SGHG,__tmp__TYQE;
-  __BOOLEAN __tmp__IZQE,result__4DEF,__tmp__P0QE,result__QEEF;
-  __BOOLEAN result__GI0G;
-  __CHARACTER result__LZWG,result__RZWG,result__SZWG,result__TZWG;
-  __CHARACTER result__UZWG,result__VZWG,result__WZWG,Self__NLRE;
-  __CHARACTER result__G0WG,Self__XWSE,result__W0WG,Self__OAEF;
-  __CHARACTER result__00WG,cc__0OQE,cc__SWQE;
-  result__T1P=FALSE__;
-  pos_old__U1P= 0;
-  if (read_space__NRD()) {
-    result__LZWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__LZWG=((__CHARACTER )(( 0)));
-    } else {
-      result__LZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-    };
-    result__4F0G=FALSE__;
-    if ((((__INTEGER_8 )result__LZWG) >= ((__INTEGER_8 )'0'))) {
-      result__4F0G=(((__INTEGER_8 )result__LZWG) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__51P=result__4F0G;
+  __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;
   } else {
-    __tmp__51P=FALSE__;
+    __tmp__D2P=FALSE__;
   };
-  if (__tmp__51P) {
-    result__T1P=TRUE__;
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    result__RZWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__RZWG=((__CHARACTER )(( 0)));
+  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)));
     } else {
-      result__RZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__XYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    add_last__JLT(string_tmp__VH,result__RZWG);
-    pos_old__U1P=position__CBC;
-    position__CBC=(__INTEGER)(position__CBC +  1);
-    while_do__DQZD:
+    add_last__NLT(string_tmp__VH,result__XYYG);
+    pos_old__Y1P=position__GBC;
+    position__GBC=(__INTEGER)(position__GBC +  1);
+    while_do__BSZD:
     {
-      result__SZWG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__SZWG=((__CHARACTER )(( 0)));
+      result__YYYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__YYYG=((__CHARACTER )(( 0)));
       } else {
-        result__SZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__YYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if (is_hexadecimal_digit__H2IE(result__SZWG)) {
-        __tmp__Z2P=TRUE__;
+      if (is_hexadecimal_digit__X4IE(result__YYYG)) {
+        __tmp__32P=TRUE__;
       } else {
-        result__TZWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__TZWG=((__CHARACTER )(( 0)));
+        result__ZYYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__ZYYG=((__CHARACTER )(( 0)));
         } else {
-          result__TZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__ZYYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__Z2P=(result__TZWG == '_');
+        __tmp__32P=(result__ZYYG == '_');
       };
-      if (__tmp__Z2P) {
-        result__UZWG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__UZWG=((__CHARACTER )(( 0)));
+      if (__tmp__32P) {
+        result__0YYG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__0YYG=((__CHARACTER )(( 0)));
         } else {
-          result__UZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__0YYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__UZWG != '_')) {
-          result__VZWG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__VZWG=((__CHARACTER )(( 0)));
+        if ((result__0YYG != '_')) {
+          result__1YYG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__1YYG=((__CHARACTER )(( 0)));
           } else {
-            result__VZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__1YYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__VZWG);
+          add_last__NLT(string_tmp__VH,result__1YYG);
         };
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto while_do__DQZD;
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        goto while_do__BSZD;
       };
     };
-    result__WZWG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__WZWG=((__CHARACTER )(( 0)));
+    result__2YYG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__2YYG=((__CHARACTER )(( 0)));
     } else {
-      result__WZWG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__2YYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__WZWG == 'h')) {
-      Self__H4IE=((__STRING *)string_tmp__VH);
-      result__J4IE= 0;
-      __tmp__U4IE=Self__H4IE->count__GFC;
-      Self__EUNE= 1;
-      while ((Self__EUNE <= __tmp__U4IE)) {
-        __tmp__14IE=(__INTEGER_64)(result__J4IE <<  4);
-        Self__NLRE=((__CHARACTER *)Self__H4IE->storage__RBS)[(__INTEGER)(Self__EUNE -  1)];
-        result__PLRE= 0;
-        if ((((__INTEGER_8 )Self__NLRE) < ((__INTEGER_8 )'A'))) {
-          result__PLRE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__NLRE) -  48));
-          __tmp__GMRE=TRUE__;
+    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__;
         } else {
-          __tmp__GMRE=FALSE__;
+          __tmp__YORE=FALSE__;
         };
-        if ((! __tmp__GMRE)) {
-          if ((((__INTEGER_8 )Self__NLRE) < ((__INTEGER_8 )'a'))) {
-            result__PLRE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__NLRE) -  55));
+        if ((! __tmp__YORE)) {
+          if ((((__INTEGER_8 )Self__5NRE) < ((__INTEGER_8 )'a'))) {
+            result__BORE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__5NRE) -  55));
           } else {
-            result__PLRE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__NLRE) -  87));
+            result__BORE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__5NRE) -  87));
           };
         };
-        result__J4IE=(__INTEGER_64)(__tmp__14IE | ((__INTEGER_64 )result__PLRE));
-        Self__EUNE=(__INTEGER)(Self__EUNE +  1);
+        result__ZAJE=(__INTEGER_64)(__tmp__LBJE | ((__INTEGER_64 )result__BORE));
+        Self__UWNE=(__INTEGER)(Self__UWNE +  1);
       };
-      last_integer__JRO=result__J4IE;
-      position__CBC=(__INTEGER)(position__CBC +  1);
+      last_integer__NRO=result__ZAJE;
+      position__GBC=(__INTEGER)(position__GBC +  1);
     } else {
-      Self__GH0G=((__STRING *)string_tmp__VH);
-      if ((((__INTEGER_8 )((__CHARACTER *)Self__GH0G->storage__RBS)[(__INTEGER)(Self__GH0G->count__GFC -  1)]) > ((__INTEGER_8 )'9'))) {
-        Self__OF2G=((__STRING *)string_tmp__VH);
-        if (( 1 > Self__OF2G->count__GFC)) {
-          Self__OF2G->count__GFC= 0;
+      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;
         } else {
-          Self__OF2G->count__GFC=(__INTEGER)(Self__OF2G->count__GFC -  1);
+          Self__GI4G->count__KFC=(__INTEGER)(Self__GI4G->count__KFC -  1);
         };
-        position__CBC=(__INTEGER)(position__CBC -  1);
+        position__GBC=(__INTEGER)(position__GBC -  1);
       };
-      result__G0WG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__G0WG=((__CHARACTER )(( 0)));
+      result__MZYG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__MZYG=((__CHARACTER )(( 0)));
       } else {
-        result__G0WG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__MZYG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__G0WG == 'o')) {
-        Self__B1OE=((__STRING *)string_tmp__VH);
-        result__D1OE=FALSE__;
-        j__E1OE= 0;
-        if ((Self__B1OE->count__GFC !=  0)) {
-          j__E1OE= 1;
-          until_do__0NRE:
+      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 ((j__E1OE > Self__B1OE->count__GFC)) {
-              __tmp__21OE=TRUE__;
+            if ((j__U3OE > Self__R3OE->count__KFC)) {
+              __tmp__M4OE=TRUE__;
             } else {
-              Self__XWSE=((__CHARACTER *)Self__B1OE->storage__RBS)[(__INTEGER)(j__E1OE -  1)];
-              result__ZWSE=FALSE__;
-              if ((((__INTEGER_8 )Self__XWSE) >= ((__INTEGER_8 )'0'))) {
-                result__ZWSE=(((__INTEGER_8 )Self__XWSE) <= ((__INTEGER_8 )'7'));
+              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'));
               };
-              __tmp__21OE=(! result__ZWSE);
+              __tmp__M4OE=(! result__LZSE);
             };
-            if ((! __tmp__21OE)) {
-              j__E1OE=(__INTEGER)(j__E1OE +  1);
-              goto until_do__0NRE;
+            if ((! __tmp__M4OE)) {
+              j__U3OE=(__INTEGER)(j__U3OE +  1);
+              goto until_do__MQRE;
             };
           };
-          result__D1OE=(j__E1OE > Self__B1OE->count__GFC);
+          result__T3OE=(j__U3OE > Self__R3OE->count__KFC);
         };
-        if ((! result__D1OE)) {
-          pos__ISPG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_286));
-          put_position__EOG(pos__ISPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        Self__R2OE=((__STRING *)string_tmp__VH);
-        result__T2OE= 0;
-        __tmp__42OE=Self__R2OE->count__GFC;
-        Self__IVPE= 1;
-        while ((Self__IVPE <= __tmp__42OE)) {
-          result__T2OE=(__INTEGER_64)((__INTEGER_64)(result__T2OE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__R2OE->storage__RBS)[(__INTEGER)(Self__IVPE -  1)]) -  48))));
-          Self__IVPE=(__INTEGER)(Self__IVPE +  1);
-        };
-        last_integer__JRO=result__T2OE;
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        __tmp__B5P=TRUE__;
-      } else {
-        __tmp__B5P=FALSE__;
-      };
-      if ((! __tmp__B5P)) {
-        result__W0WG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__W0WG=((__CHARACTER )(( 0)));
-        } else {
-          result__W0WG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-        };
-        if ((result__W0WG == 'b')) {
-          Self__RLQE=((__STRING *)string_tmp__VH);
-          i__TLQE=Self__RLQE->count__GFC;
-          result__ULQE=TRUE__;
-          while ((! ((! result__ULQE) || (i__TLQE ==  0)))) {
-            Self__OAEF=((__CHARACTER *)Self__RLQE->storage__RBS)[(__INTEGER)(i__TLQE -  1)];
-            result__ULQE=((Self__OAEF == '0') || (Self__OAEF == '1'));
-            i__TLQE=(__INTEGER)(i__TLQE -  1);
-          };
-          if ((! result__ULQE)) {
-            pos__2SPG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_287));
-            put_position__EOG(pos__2SPG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        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)) {
               exit(( 1));
             };
           };
-          Self__HNQE=((__STRING *)string_tmp__VH);
-          result__JNQE= 0;
-          __tmp__UNQE=Self__HNQE->count__GFC;
-          Self__LQRE= 1;
-          while ((Self__LQRE <= __tmp__UNQE)) {
-            result__JNQE=(__INTEGER_64)(result__JNQE <<  1);
-            if ((((__CHARACTER *)Self__HNQE->storage__RBS)[(__INTEGER)(Self__LQRE -  1)] == '1')) {
-              result__JNQE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__JNQE) &  -2));
-            };
-            Self__LQRE=(__INTEGER)(Self__LQRE +  1);
-          };
-          last_integer__JRO=result__JNQE;
-          position__CBC=(__INTEGER)(position__CBC +  1);
-        } else {
-          result__00WG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__00WG=((__CHARACTER )(( 0)));
-          } else {
-            result__00WG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-          };
-          if ((result__00WG == 'd')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-          };
-          Self__TOQE=((__STRING *)string_tmp__VH);
-          state__WOQE= 0;
-          value__XOQE= 0;
-          negative__YOQE=FALSE__;
-          result__ZOQE=FALSE__;
-          cc__0OQE='\0';
-          i__VOQE= 1;
-          while ((! ((state__WOQE ==  4) || (i__VOQE > Self__TOQE->count__GFC)))) {
-            cc__0OQE=((__CHARACTER *)Self__TOQE->storage__RBS)[(__INTEGER)(i__VOQE -  1)];
-            if ((state__WOQE ==  0)) {
-              if ((((((((cc__0OQE == ' ') || (cc__0OQE == '\t')) || (cc__0OQE == '\n')) || (cc__0OQE == '\r')) || (cc__0OQE == '\0')) || (cc__0OQE == '\f')) || (cc__0OQE == '\v'))) {
-                __tmp__HQQE=TRUE__;
+          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__;
               } else {
-                result__DFHG=(cc__0OQE == '+');
-                if (result__DFHG) {
-                  state__WOQE= 1;
+                result__BAJG=(cc__MRQE == '+');
+                if (result__BAJG) {
+                  state__IRQE= 1;
                 };
-                __tmp__HQQE=result__DFHG;
+                __tmp__ZSQE=result__BAJG;
               };
-              if (__tmp__HQQE) {
-                __tmp__TQQE=TRUE__;
+              if (__tmp__ZSQE) {
+                __tmp__FTQE=TRUE__;
               } else {
-                result__QFHG=(cc__0OQE == '-');
-                if (result__QFHG) {
-                  negative__YOQE=TRUE__;
-                  state__WOQE= 1;
+                result__OAJG=(cc__MRQE == '-');
+                if (result__OAJG) {
+                  negative__KRQE=TRUE__;
+                  state__IRQE= 1;
                 };
-                __tmp__TQQE=result__QFHG;
+                __tmp__FTQE=result__OAJG;
               };
-              if ((! __tmp__TQQE)) {
-                result__GQ0G=FALSE__;
-                if ((((__INTEGER_8 )cc__0OQE) >= ((__INTEGER_8 )'0'))) {
-                  result__GQ0G=(((__INTEGER_8 )cc__0OQE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__FTQE)) {
+                result__DQ2G=FALSE__;
+                if ((((__INTEGER_8 )cc__MRQE) >= ((__INTEGER_8 )'0'))) {
+                  result__DQ2G=(((__INTEGER_8 )cc__MRQE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__GQ0G) {
-                  value__XOQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0OQE)) -  48);
-                  state__WOQE= 2;
+                if (result__DQ2G) {
+                  value__JRQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48);
+                  state__IRQE= 2;
                 } else {
-                  state__WOQE= 4;
+                  state__IRQE= 4;
                 };
               };
-              __tmp__HRQE=TRUE__;
+              __tmp__ZTQE=TRUE__;
             } else {
-              __tmp__HRQE=FALSE__;
+              __tmp__ZTQE=FALSE__;
             };
-            if (__tmp__HRQE) {
-              __tmp__GSQE=TRUE__;
+            if (__tmp__ZTQE) {
+              __tmp__YUQE=TRUE__;
             } else {
-              result__4BEF=(state__WOQE ==  1);
-              if (result__4BEF) {
-                result__JQ0G=FALSE__;
-                if ((((__INTEGER_8 )cc__0OQE) >= ((__INTEGER_8 )'0'))) {
-                  result__JQ0G=(((__INTEGER_8 )cc__0OQE) <= ((__INTEGER_8 )'9'));
+              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'));
                 };
-                if (result__JQ0G) {
-                  value__XOQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0OQE)) -  48);
-                  if (negative__YOQE) {
-                    value__XOQE=(__INTEGER)(- value__XOQE);
+                if (result__GQ2G) {
+                  value__JRQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48);
+                  if (negative__KRQE) {
+                    value__JRQE=(__INTEGER)(- value__JRQE);
                   };
-                  state__WOQE= 2;
+                  state__IRQE= 2;
                 } else {
-                  state__WOQE= 4;
+                  state__IRQE= 4;
                 };
               };
-              __tmp__GSQE=result__4BEF;
+              __tmp__YUQE=result__ONEF;
             };
-            if (__tmp__GSQE) {
-              __tmp__0UQE=TRUE__;
+            if (__tmp__YUQE) {
+              __tmp__MXQE=TRUE__;
             } else {
-              result__QCEF=(state__WOQE ==  2);
-              if (result__QCEF) {
-                result__MQ0G=FALSE__;
-                if ((((__INTEGER_8 )cc__0OQE) >= ((__INTEGER_8 )'0'))) {
-                  result__MQ0G=(((__INTEGER_8 )cc__0OQE) <= ((__INTEGER_8 )'9'));
+              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'));
                 };
-                if (result__MQ0G) {
-                  if (negative__YOQE) {
-                    value__XOQE=(__INTEGER)((__INTEGER)( 10 * value__XOQE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0OQE)) -  48));
+                if (result__JQ2G) {
+                  if (negative__KRQE) {
+                    value__JRQE=(__INTEGER)((__INTEGER)( 10 * value__JRQE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48));
                   } else {
-                    value__XOQE=(__INTEGER)((__INTEGER)( 10 * value__XOQE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0OQE)) -  48));
+                    value__JRQE=(__INTEGER)((__INTEGER)( 10 * value__JRQE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__MRQE)) -  48));
                   };
-                  if (((negative__YOQE && (value__XOQE >  0)) || ((! negative__YOQE) && (value__XOQE <  0)))) {
-                    state__WOQE= 4;
+                  if (((negative__KRQE && (value__JRQE >  0)) || ((! negative__KRQE) && (value__JRQE <  0)))) {
+                    state__IRQE= 4;
                   };
-                  __tmp__HUQE=TRUE__;
+                  __tmp__ZWQE=TRUE__;
                 } else {
-                  __tmp__HUQE=FALSE__;
+                  __tmp__ZWQE=FALSE__;
                 };
-                if ((! __tmp__HUQE)) {
-                  if ((((((((cc__0OQE == ' ') || (cc__0OQE == '\t')) || (cc__0OQE == '\n')) || (cc__0OQE == '\r')) || (cc__0OQE == '\0')) || (cc__0OQE == '\f')) || (cc__0OQE == '\v'))) {
-                    state__WOQE= 3;
+                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;
                   } else {
-                    state__WOQE= 4;
+                    state__IRQE= 4;
                   };
                 };
               };
-              __tmp__0UQE=result__QCEF;
+              __tmp__MXQE=result__AOEF;
             };
-            if ((! __tmp__0UQE)) {
-              if ((state__WOQE ==  3)) {
-                if ((! (((((((cc__0OQE == ' ') || (cc__0OQE == '\t')) || (cc__0OQE == '\n')) || (cc__0OQE == '\r')) || (cc__0OQE == '\0')) || (cc__0OQE == '\f')) || (cc__0OQE == '\v')))) {
-                  state__WOQE= 4;
+            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;
                 };
               };
             };
-            i__VOQE=(__INTEGER)(i__VOQE +  1);
+            i__HRQE=(__INTEGER)(i__HRQE +  1);
           };
-          if (((state__WOQE !=  0) && (state__WOQE !=  4))) {
-            result__ZOQE=TRUE__;
+          if (((state__IRQE !=  0) && (state__IRQE !=  4))) {
+            result__LRQE=TRUE__;
           };
-          if ((! result__ZOQE)) {
-            pos__LTPG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_288));
-            put_position__EOG(pos__LTPG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          Self__OWQE=((__STRING *)string_tmp__VH);
-          state__RWQE= 0;
-          cc__SWQE='\0';
-          negative__TWQE=FALSE__;
-          result__UWQE= 0;
-          i__QWQE= 1;
-          while ((i__QWQE <= Self__OWQE->count__GFC)) {
-            cc__SWQE=((__CHARACTER *)Self__OWQE->storage__RBS)[(__INTEGER)(i__QWQE -  1)];
-            if ((state__RWQE ==  0)) {
-              if ((((((((cc__SWQE == ' ') || (cc__SWQE == '\t')) || (cc__SWQE == '\n')) || (cc__SWQE == '\r')) || (cc__SWQE == '\0')) || (cc__SWQE == '\f')) || (cc__SWQE == '\v'))) {
-                __tmp__AYQE=TRUE__;
+          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__;
               } else {
-                result__SGHG=(cc__SWQE == '+');
-                if (result__SGHG) {
-                  state__RWQE= 1;
+                result__QBJG=(cc__EZQE == '+');
+                if (result__QBJG) {
+                  state__DZQE= 1;
                 };
-                __tmp__AYQE=result__SGHG;
+                __tmp__S0QE=result__QBJG;
               };
-              if ((! __tmp__AYQE)) {
-                if ((cc__SWQE == '-')) {
-                  negative__TWQE=TRUE__;
-                  state__RWQE= 1;
+              if ((! __tmp__S0QE)) {
+                if ((cc__EZQE == '-')) {
+                  negative__FZQE=TRUE__;
+                  state__DZQE= 1;
                 } else {
-                  result__UWQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SWQE)) -  48);
-                  state__RWQE= 2;
+                  result__GZQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48);
+                  state__DZQE= 2;
                 };
               };
-              __tmp__TYQE=TRUE__;
+              __tmp__F1QE=TRUE__;
             } else {
-              __tmp__TYQE=FALSE__;
+              __tmp__F1QE=FALSE__;
             };
-            if (__tmp__TYQE) {
-              __tmp__IZQE=TRUE__;
+            if (__tmp__F1QE) {
+              __tmp__01QE=TRUE__;
             } else {
-              result__4DEF=(state__RWQE ==  1);
-              if (result__4DEF) {
-                result__UWQE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SWQE)) -  48);
-                if (negative__TWQE) {
-                  result__UWQE=(__INTEGER)(- result__UWQE);
+              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);
                 };
-                state__RWQE= 2;
+                state__DZQE= 2;
               };
-              __tmp__IZQE=result__4DEF;
+              __tmp__01QE=result__OPEF;
             };
-            if (__tmp__IZQE) {
-              __tmp__P0QE=TRUE__;
+            if (__tmp__01QE) {
+              __tmp__B3QE=TRUE__;
             } else {
-              result__QEEF=(state__RWQE ==  2);
-              if (result__QEEF) {
-                result__GI0G=FALSE__;
-                if ((((__INTEGER_8 )cc__SWQE) >= ((__INTEGER_8 )'0'))) {
-                  result__GI0G=(((__INTEGER_8 )cc__SWQE) <= ((__INTEGER_8 )'9'));
+              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'));
                 };
-                if (result__GI0G) {
-                  if (negative__TWQE) {
-                    result__UWQE=(__INTEGER)((__INTEGER)( 10 * result__UWQE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SWQE)) -  48));
+                if (result__DI2G) {
+                  if (negative__FZQE) {
+                    result__GZQE=(__INTEGER)((__INTEGER)( 10 * result__GZQE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48));
                   } else {
-                    result__UWQE=(__INTEGER)((__INTEGER)( 10 * result__UWQE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__SWQE)) -  48));
+                    result__GZQE=(__INTEGER)((__INTEGER)( 10 * result__GZQE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__EZQE)) -  48));
                   };
                 } else {
-                  state__RWQE= 3;
+                  state__DZQE= 3;
                 };
               };
-              __tmp__P0QE=result__QEEF;
+              __tmp__B3QE=result__AQEF;
             };
-            if ((! __tmp__P0QE)) {
-              if ((state__RWQE ==  3)) {
-                i__QWQE=Self__OWQE->count__GFC;
+            if ((! __tmp__B3QE)) {
+              if ((state__DZQE ==  3)) {
+                i__CZQE=Self__AZQE->count__KFC;
               };
             };
-            i__QWQE=(__INTEGER)(i__QWQE +  1);
+            i__CZQE=(__INTEGER)(i__CZQE +  1);
           };
-          last_integer__JRO=((__INTEGER_64 )result__UWQE);
+          last_integer__NRO=((__INTEGER_64 )result__GZQE);
         };
       };
     };
   };
-  if (result__T1P) {
-    short__token__to__1AD((&__string_121),pos_old__U1P,position__CBC);
+  if (result__X1P) {
+    short__token__to__5AD((&__string_121),pos_old__Y1P,position__GBC);
   };
-  return(result__T1P);
+  return(result__X1P);
 }
 
-static void* readlip_expr__ZSPB()
+static void* readlip_expr__3SPB()
 // () With resultRecursive, No inlinable.
 {
-  void *result__2SPB,*val__3SPB,*result__YKYC,*val__ALYC;
-  void *nam__4SPB;
-  __POSITION pos__WTPG,p__HN3B,pos__4TPG,pos__AUPG,pos__CUPG,pos__EUPG;
-  __POSITION pos__GUPG,pos__IUPG,p__KLID,p__CFHE,pos__WUPG;
-  __LIP_AFFECT *result__EY4B,*Self__ZHHC;
-  __POINTER ptr__FY4B,ptr_table__4N5G,next__3N5G,result__5N5G;
-  __POINTER ptr_table__DO5G,next__CO5G,result__EO5G,ptr__ARKD;
-  __POINTER ptr_table__3O5G,next__2O5G,result__4O5G,ptr_table__CP5G;
-  __POINTER next__BP5G,result__DP5G,ptr__3PME,ptr_table__HP5G;
-  __POINTER next__GP5G,result__IP5G,ptr_table__MP5G,next__LP5G;
-  __POINTER result__NP5G;
-  __INTEGER typ_id__KY4B,typ_id__FRKD,typ_id__CQME;
-  __UINTEGER_32 sz__HY4B,a__SF2G,new_size__TF2G,t__XF2G,a__WF2G;
-  __UINTEGER_32 new_size__GO5G,lab_type__FO5G,sz__CRKD,a__0F2G;
-  __UINTEGER_32 new_size__1F2G,t__5F2G,a__4F2G,new_size__FP5G;
-  __UINTEGER_32 lab_type__EP5G,sz__5PME,a__CG2G,new_size__DG2G,t__HG2G;
-  __UINTEGER_32 a__GG2G,new_size__PP5G,lab_type__OP5G;
-  __LIP_IF *result__5QKD,*Self__JPTD;
-  __LIP_PRINT *result__2PME,*Self__TKVE;
-  __BOOLEAN result__HO5G,__tmp__SUPB,result__KO5G,result__NO5G;
-  __BOOLEAN result__QO5G,result__TO5G,result__WO5G,result__ZO5G;
-  __BOOLEAN __tmp__SOYC;
-  __CHARACTER result__IO5G,result__LO5G,result__OO5G,result__RO5G;
-  __CHARACTER result__UO5G,result__XO5G,result__0O5G;
-  void *the__4KYC,*els__5KYC,*result__KZ3G,*result__QJID;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__LZ3G,*Self__MZ3G,*Self__PV4D;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__FW4D;
-  result__2SPB=NULL;
-  val__3SPB=NULL;
-  nam__4SPB=NULL;
-  old_position__TQI=position__CBC;
-  old_pos_cur__VQI=pos_cur__FBC;
-  old_pos_line__XQI=pos_line__GBC;
-  old_pos_col__ZQI=pos_col__HBC;
-  old_short_derive__1QI=short_derive__RBC;
-  if (read_identifier__15K()) {
-    nam__4SPB=last_string__YZC;
-    if (read_symbol__TWJ((&__string_12))) {
-      val__3SPB=readlip_expr_operator__2NZB(PARSER__);
-      if (((void *)val__3SPB == (void *)NULL)) {
-        pos__WTPG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_225));
-        put_position__EOG(pos__WTPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+  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)) {
           exit(( 1));
         };
       };
-      p__HN3B=current_position__ZWF();
-      result__EY4B=NULL;
-      ptr__FY4B=((__POINTER )(NULL));
-      typ_id__KY4B= 0;
-      sz__HY4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
-      if ((sz__HY4B ==  0)) {
-        result__EY4B=LIP_AFFECT__;
-      } else {
-        typ_id__KY4B=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__HY4B);
-        if ((typ_id__KY4B == (__INTEGER)(-  1))) {
-          a__SF2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__TF2G=(__UINTEGER_32)((__UINTEGER_32)(sz__HY4B + a__SF2G) & (__UINTEGER_32)(~ a__SF2G));
-          ptr_table__4N5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TF2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__3N5G=((__POINTER )(NULL));
-          result__5N5G=((__POINTER *)ptr_table__4N5G)[ 0];
-          if ((result__5N5G == (void *)NULL)) {
-            result__5N5G=new_lab__2QJ(new_size__TF2G);
-            next__3N5G=(void *)((unsigned long)result__5N5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TF2G)));
-            ((__POINTER *)next__3N5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4N5G)[ 0]=next__3N5G;
-          } else {
-            next__3N5G=((__POINTER *)result__5N5G)[ 0];
-            if ((next__3N5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5N5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TF2G <<  1)) <=  4096)) {
-                next__3N5G=(void *)((unsigned long)result__5N5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TF2G)));
+      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)));
               } else {
-                next__3N5G=new_lab__2QJ(new_size__TF2G);
+                next__MSBH=new_lab__ARJ(new_size__LI4G);
               };
-              ((__POINTER *)next__3N5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4N5G)[ 0]=next__3N5G;
+              ((__POINTER *)next__MSBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NSBH)[ 0]=next__MSBH;
             } else {
-              ((__POINTER *)result__5N5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__3N5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5N5G=next__3N5G;
-            };
-          };
-          ptr__FY4B=result__5N5G;
-        } else {
-          t__XF2G=((__UINTEGER_32 )typ_id__KY4B);
-          a__WF2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__GO5G=(__UINTEGER_32)((__UINTEGER_32)(sz__HY4B + a__WF2G) & (__UINTEGER_32)(~ a__WF2G));
-          ptr_table__DO5G=((__POINTER )(&(table_type[(t__XF2G)])));
-          lab_type__FO5G=(__UINTEGER_32)(t__XF2G |  1);
-          next__CO5G=((__POINTER )(NULL));
-          result__EO5G=((__POINTER *)ptr_table__DO5G)[ 0];
-          if ((result__EO5G == (void *)NULL)) {
-            result__EO5G=new_lab__2QJ(lab_type__FO5G);
-            next__CO5G=(void *)((unsigned long)result__EO5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GO5G)));
-            ((__POINTER *)next__CO5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DO5G)[ 0]=next__CO5G;
-          } else {
-            next__CO5G=((__POINTER *)result__EO5G)[ 0];
-            if ((next__CO5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EO5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__GO5G <<  1)) <=  4096)) {
-                next__CO5G=(void *)((unsigned long)result__EO5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GO5G)));
+              ((__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)));
               } else {
-                next__CO5G=new_lab__2QJ(lab_type__FO5G);
+                next__RSBH=new_lab__ARJ(lab_type__USBH);
               };
-              ((__POINTER *)next__CO5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DO5G)[ 0]=next__CO5G;
+              ((__POINTER *)next__RSBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SSBH)[ 0]=next__RSBH;
             } else {
-              ((__POINTER *)result__EO5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__CO5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__EO5G=next__CO5G;
+              ((__POINTER *)result__TSBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TSBH=next__RSBH;
             };
           };
-          ptr__FY4B=result__EO5G;
+          ptr__JY4B=result__TSBH;
         };
-        result__EY4B=((__LIP_AFFECT *)ptr__FY4B);
-        *(result__EY4B) = *(LIP_AFFECT__);
+        result__IY4B=((__LIP_AFFECT *)ptr__JY4B);
+        *(result__IY4B) = *(LIP_AFFECT__);
       };
-      Self__ZHHC=((__LIP_AFFECT *)result__EY4B);
-      Self__ZHHC->parent_lip_code__ZTPB.parent_itm_object__PDE.position__3CJ=p__HN3B;
-      Self__ZHHC->name__GGFC=nam__4SPB;
-      Self__ZHHC->value__YGFC=val__3SPB;
-      result__2SPB=result__EY4B;
+      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;
     } else {
-      restore_context__DDL();
+      restore_context__HDL();
     };
   };
-  if (((void *)result__2SPB == (void *)NULL)) {
-    result__2SPB=readlip_expr_operator__2NZB(PARSER__);
-    if (((void *)result__2SPB != (void *)NULL)) {
-      result__HO5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__HO5G=FALSE__;
+  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__;
       } else {
-        result__IO5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__IO5G=((__CHARACTER )(( 0)));
+        result__XSBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__XSBH=((__CHARACTER )(( 0)));
         } else {
-          result__IO5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__XSBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__IO5G == '.')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__HO5G=TRUE__;
+        if ((result__XSBH == '.')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__WSBH=TRUE__;
         };
       };
-      __tmp__SUPB=result__HO5G;
+      __tmp__WUPB=result__WSBH;
     } else {
-      __tmp__SUPB=FALSE__;
+      __tmp__WUPB=FALSE__;
     };
-    if (__tmp__SUPB) {
-      result__YKYC=NULL;
-      the__4KYC=NULL;
-      els__5KYC=NULL;
-      val__ALYC=NULL;
-      if (read_word__APF((&__string_89))) {
-        result__KZ3G=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID)->parent_arrayed_collection__VJID.upper__JNTD <  0)) {
-          result__KZ3G=create_with_capacity__MQKD( 16);
+    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);
         } else {
-          Self__LZ3G=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID);
-          result__KZ3G=((void **)Self__LZ3G->parent_arrayed_collection__VJID.storage__GAUD)[Self__LZ3G->parent_arrayed_collection__VJID.upper__JNTD];
-          Self__MZ3G=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID);
-          Self__MZ3G->parent_arrayed_collection__VJID.upper__JNTD=(__INTEGER)(Self__MZ3G->parent_arrayed_collection__VJID.upper__JNTD -  1);
+          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);
         };
-        the__4KYC=result__KZ3G;
-        result__KO5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__KO5G=FALSE__;
+        the__CLYC=result__S25G;
+        result__ZSBH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__ZSBH=FALSE__;
         } else {
-          result__LO5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__LO5G=((__CHARACTER )(( 0)));
+          result__0SBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__0SBH=((__CHARACTER )(( 0)));
           } else {
-            result__LO5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__0SBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__LO5G == '{')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__KO5G=TRUE__;
+          if ((result__0SBH == '{')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__ZSBH=TRUE__;
           };
         };
-        if ((! result__KO5G)) {
-          pos__4TPG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_255));
-          put_position__EOG(pos__4TPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        while_do__LKID:
+        while_do__PKID:
         {
-          val__ALYC=readlip_expr__ZSPB();
-          if (((void *)val__ALYC != (void *)NULL)) {
-            add_last__DIUD(the__4KYC,val__ALYC);
-            result__NO5G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__NO5G=FALSE__;
+          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__;
             } else {
-              result__OO5G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__OO5G=((__CHARACTER )(( 0)));
+              result__3SBH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__3SBH=((__CHARACTER )(( 0)));
               } else {
-                result__OO5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__3SBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__OO5G == ';')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__NO5G=TRUE__;
+              if ((result__3SBH == ';')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__2SBH=TRUE__;
               };
             };
-            if ((! result__NO5G)) {
-              pos__AUPG=current_position__ZWF();
-              put_error__text__0MG( 2,(&__string_159));
-              put_position__EOG(pos__AUPG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+            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)) {
                 exit(( 1));
               };
             };
-            goto while_do__LKID;
+            goto while_do__PKID;
           };
         };
-        result__QO5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__QO5G=FALSE__;
+        result__5SBH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__5SBH=FALSE__;
         } else {
-          result__RO5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__RO5G=((__CHARACTER )(( 0)));
+          result__ATBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__ATBH=((__CHARACTER )(( 0)));
           } else {
-            result__RO5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__ATBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__RO5G == '}')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__QO5G=TRUE__;
+          if ((result__ATBH == '}')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__5SBH=TRUE__;
           };
         };
-        if ((! result__QO5G)) {
-          pos__CUPG=current_position__ZWF();
-          put_error__text__0MG( 2,(&__string_255));
-          put_position__EOG(pos__CUPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        the__4KYC=copy__YKID(result__KZ3G);
-        if (read_word__APF((&__string_90))) {
-          result__QJID=NULL;
-          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID)->parent_arrayed_collection__VJID.upper__JNTD <  0)) {
-            result__QJID=create_with_capacity__MQKD( 16);
+        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);
           } else {
-            Self__PV4D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID);
-            result__QJID=((void **)Self__PV4D->parent_arrayed_collection__VJID.storage__GAUD)[Self__PV4D->parent_arrayed_collection__VJID.upper__JNTD];
-            Self__FW4D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID);
-            Self__FW4D->parent_arrayed_collection__VJID.upper__JNTD=(__INTEGER)(Self__FW4D->parent_arrayed_collection__VJID.upper__JNTD -  1);
+            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);
           };
-          els__5KYC=result__QJID;
-          result__TO5G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__TO5G=FALSE__;
+          els__DLYC=result__UJID;
+          result__CTBH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__CTBH=FALSE__;
           } else {
-            result__UO5G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__UO5G=((__CHARACTER )(( 0)));
+            result__DTBH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__DTBH=((__CHARACTER )(( 0)));
             } else {
-              result__UO5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__DTBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__UO5G == '{')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__TO5G=TRUE__;
+            if ((result__DTBH == '{')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__CTBH=TRUE__;
             };
           };
-          if ((! result__TO5G)) {
-            pos__EUPG=current_position__ZWF();
-            put_error__text__0MG( 2,(&__string_255));
-            put_position__EOG(pos__EUPG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          while_do__O2LD:
+          while_do__S2LD:
           {
-            val__ALYC=readlip_expr__ZSPB();
-            if (((void *)val__ALYC != (void *)NULL)) {
-              add_last__DIUD(els__5KYC,val__ALYC);
-              result__WO5G=FALSE__;
-              if ((! read_space__NRD())) {
-                result__WO5G=FALSE__;
+            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__;
               } else {
-                result__XO5G='\0';
-                if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                  result__XO5G=((__CHARACTER )(( 0)));
+                result__GTBH='\0';
+                if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                  result__GTBH=((__CHARACTER )(( 0)));
                 } else {
-                  result__XO5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                  result__GTBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
                 };
-                if ((result__XO5G == ';')) {
-                  position__CBC=(__INTEGER)(position__CBC +  1);
-                  result__WO5G=TRUE__;
+                if ((result__GTBH == ';')) {
+                  position__GBC=(__INTEGER)(position__GBC +  1);
+                  result__FTBH=TRUE__;
                 };
               };
-              if ((! result__WO5G)) {
-                pos__GUPG=current_position__ZWF();
-                put_error__text__0MG( 2,(&__string_159));
-                put_position__EOG(pos__GUPG);
-                put_string__E1F(msg_err__5MG);
-                if ((type_error__4MG !=  2)) {
+              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)) {
                   exit(( 1));
                 };
               };
-              goto while_do__O2LD;
+              goto while_do__S2LD;
             };
           };
-          result__ZO5G=FALSE__;
-          if ((! read_space__NRD())) {
-            result__ZO5G=FALSE__;
+          result__ITBH=FALSE__;
+          if ((! read_space__RRD())) {
+            result__ITBH=FALSE__;
           } else {
-            result__0O5G='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__0O5G=((__CHARACTER )(( 0)));
+            result__JTBH='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__JTBH=((__CHARACTER )(( 0)));
             } else {
-              result__0O5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__JTBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            if ((result__0O5G == '}')) {
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              result__ZO5G=TRUE__;
+            if ((result__JTBH == '}')) {
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              result__ITBH=TRUE__;
             };
           };
-          if ((! result__ZO5G)) {
-            pos__IUPG=current_position__ZWF();
-            put_error__text__0MG( 2,(&__string_255));
-            put_position__EOG(pos__IUPG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+          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)) {
               exit(( 1));
             };
           };
-          els__5KYC=copy__YKID(result__QJID);
-        };
-        p__KLID=current_position__ZWF();
-        result__5QKD=NULL;
-        ptr__ARKD=((__POINTER )(NULL));
-        typ_id__FRKD= 0;
-        sz__CRKD=((__UINTEGER_32 )sizeof(__LIP_IF));
-        if ((sz__CRKD ==  0)) {
-          result__5QKD=LIP_IF__;
-        } else {
-          typ_id__FRKD=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__CRKD);
-          if ((typ_id__FRKD == (__INTEGER)(-  1))) {
-            a__0F2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__1F2G=(__UINTEGER_32)((__UINTEGER_32)(sz__CRKD + a__0F2G) & (__UINTEGER_32)(~ a__0F2G));
-            ptr_table__3O5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1F2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__2O5G=((__POINTER )(NULL));
-            result__4O5G=((__POINTER *)ptr_table__3O5G)[ 0];
-            if ((result__4O5G == (void *)NULL)) {
-              result__4O5G=new_lab__2QJ(new_size__1F2G);
-              next__2O5G=(void *)((unsigned long)result__4O5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1F2G)));
-              ((__POINTER *)next__2O5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3O5G)[ 0]=next__2O5G;
+          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;
             } else {
-              next__2O5G=((__POINTER *)result__4O5G)[ 0];
-              if ((next__2O5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4O5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1F2G <<  1)) <=  4096)) {
-                  next__2O5G=(void *)((unsigned long)result__4O5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1F2G)));
+              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)));
                 } else {
-                  next__2O5G=new_lab__2QJ(new_size__1F2G);
+                  next__LTBH=new_lab__ARJ(new_size__TI4G);
                 };
-                ((__POINTER *)next__2O5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3O5G)[ 0]=next__2O5G;
+                ((__POINTER *)next__LTBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MTBH)[ 0]=next__LTBH;
               } else {
-                ((__POINTER *)result__4O5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2O5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4O5G=next__2O5G;
+                ((__POINTER *)result__NTBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LTBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NTBH=next__LTBH;
               };
             };
-            ptr__ARKD=result__4O5G;
-          } else {
-            t__5F2G=((__UINTEGER_32 )typ_id__FRKD);
-            a__4F2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__FP5G=(__UINTEGER_32)((__UINTEGER_32)(sz__CRKD + a__4F2G) & (__UINTEGER_32)(~ a__4F2G));
-            ptr_table__CP5G=((__POINTER )(&(table_type[(t__5F2G)])));
-            lab_type__EP5G=(__UINTEGER_32)(t__5F2G |  1);
-            next__BP5G=((__POINTER )(NULL));
-            result__DP5G=((__POINTER *)ptr_table__CP5G)[ 0];
-            if ((result__DP5G == (void *)NULL)) {
-              result__DP5G=new_lab__2QJ(lab_type__EP5G);
-              next__BP5G=(void *)((unsigned long)result__DP5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FP5G)));
-              ((__POINTER *)next__BP5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CP5G)[ 0]=next__BP5G;
+            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;
             } else {
-              next__BP5G=((__POINTER *)result__DP5G)[ 0];
-              if ((next__BP5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DP5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FP5G <<  1)) <=  4096)) {
-                  next__BP5G=(void *)((unsigned long)result__DP5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FP5G)));
+              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)));
                 } else {
-                  next__BP5G=new_lab__2QJ(lab_type__EP5G);
+                  next__QTBH=new_lab__ARJ(lab_type__TTBH);
                 };
-                ((__POINTER *)next__BP5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CP5G)[ 0]=next__BP5G;
+                ((__POINTER *)next__QTBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RTBH)[ 0]=next__QTBH;
               } else {
-                ((__POINTER *)result__DP5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BP5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DP5G=next__BP5G;
+                ((__POINTER *)result__STBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QTBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__STBH=next__QTBH;
               };
             };
-            ptr__ARKD=result__DP5G;
-          };
-          result__5QKD=((__LIP_IF *)ptr__ARKD);
-          *(result__5QKD) = *(LIP_IF__);
-        };
-        Self__JPTD=((__LIP_IF *)result__5QKD);
-        Self__JPTD->parent_lip_code__OOYC.parent_itm_object__PDE.position__3CJ=p__KLID;
-        Self__JPTD->condition__QCQD=result__2SPB;
-        Self__JPTD->then__GDQD=the__4KYC;
-        Self__JPTD->else__3DQD=els__5KYC;
-        result__YKYC=result__5QKD;
-        __tmp__SOYC=TRUE__;
-      } else {
-        __tmp__SOYC=FALSE__;
-      };
-      if ((! __tmp__SOYC)) {
-        if (read_word__APF((&__string_91))) {
-          p__CFHE=current_position__ZWF();
-          result__2PME=NULL;
-          ptr__3PME=((__POINTER )(NULL));
-          typ_id__CQME= 0;
-          sz__5PME=((__UINTEGER_32 )sizeof(__LIP_PRINT));
-          if ((sz__5PME ==  0)) {
-            result__2PME=LIP_PRINT__;
-          } else {
-            typ_id__CQME=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__5PME);
-            if ((typ_id__CQME == (__INTEGER)(-  1))) {
-              a__CG2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__DG2G=(__UINTEGER_32)((__UINTEGER_32)(sz__5PME + a__CG2G) & (__UINTEGER_32)(~ a__CG2G));
-              ptr_table__HP5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DG2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__GP5G=((__POINTER )(NULL));
-              result__IP5G=((__POINTER *)ptr_table__HP5G)[ 0];
-              if ((result__IP5G == (void *)NULL)) {
-                result__IP5G=new_lab__2QJ(new_size__DG2G);
-                next__GP5G=(void *)((unsigned long)result__IP5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DG2G)));
-                ((__POINTER *)next__GP5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HP5G)[ 0]=next__GP5G;
+            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;
               } else {
-                next__GP5G=((__POINTER *)result__IP5G)[ 0];
-                if ((next__GP5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IP5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DG2G <<  1)) <=  4096)) {
-                    next__GP5G=(void *)((unsigned long)result__IP5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DG2G)));
+                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)));
                   } else {
-                    next__GP5G=new_lab__2QJ(new_size__DG2G);
+                    next__VTBH=new_lab__ARJ(new_size__1I4G);
                   };
-                  ((__POINTER *)next__GP5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__HP5G)[ 0]=next__GP5G;
+                  ((__POINTER *)next__VTBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WTBH)[ 0]=next__VTBH;
                 } else {
-                  ((__POINTER *)result__IP5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GP5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__IP5G=next__GP5G;
+                  ((__POINTER *)result__XTBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VTBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XTBH=next__VTBH;
                 };
               };
-              ptr__3PME=result__IP5G;
+              ptr__NSME=result__XTBH;
             } else {
-              t__HG2G=((__UINTEGER_32 )typ_id__CQME);
-              a__GG2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__PP5G=(__UINTEGER_32)((__UINTEGER_32)(sz__5PME + a__GG2G) & (__UINTEGER_32)(~ a__GG2G));
-              ptr_table__MP5G=((__POINTER )(&(table_type[(t__HG2G)])));
-              lab_type__OP5G=(__UINTEGER_32)(t__HG2G |  1);
-              next__LP5G=((__POINTER )(NULL));
-              result__NP5G=((__POINTER *)ptr_table__MP5G)[ 0];
-              if ((result__NP5G == (void *)NULL)) {
-                result__NP5G=new_lab__2QJ(lab_type__OP5G);
-                next__LP5G=(void *)((unsigned long)result__NP5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PP5G)));
-                ((__POINTER *)next__LP5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MP5G)[ 0]=next__LP5G;
+              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;
               } else {
-                next__LP5G=((__POINTER *)result__NP5G)[ 0];
-                if ((next__LP5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NP5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PP5G <<  1)) <=  4096)) {
-                    next__LP5G=(void *)((unsigned long)result__NP5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PP5G)));
+                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)));
                   } else {
-                    next__LP5G=new_lab__2QJ(lab_type__OP5G);
+                    next__0TBH=new_lab__ARJ(lab_type__3TBH);
                   };
-                  ((__POINTER *)next__LP5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__MP5G)[ 0]=next__LP5G;
+                  ((__POINTER *)next__0TBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1TBH)[ 0]=next__0TBH;
                 } else {
-                  ((__POINTER *)result__NP5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LP5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__NP5G=next__LP5G;
+                  ((__POINTER *)result__2TBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0TBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2TBH=next__0TBH;
                 };
               };
-              ptr__3PME=result__NP5G;
+              ptr__NSME=result__2TBH;
             };
-            result__2PME=((__LIP_PRINT *)ptr__3PME);
-            *(result__2PME) = *(LIP_PRINT__);
+            result__MSME=((__LIP_PRINT *)ptr__NSME);
+            *(result__MSME) = *(LIP_PRINT__);
           };
-          Self__TKVE=((__LIP_PRINT *)result__2PME);
-          Self__TKVE->parent_lip_code__APYC.parent_itm_object__PDE.position__3CJ=p__CFHE;
-          Self__TKVE->message__KPTE=result__2SPB;
-          result__YKYC=result__2PME;
+          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;
         };
       };
-      result__2SPB=result__YKYC;
-      if (((void *)result__YKYC == (void *)NULL)) {
-        pos__WUPG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_258));
-        put_position__EOG(pos__WUPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__2SPB);
+  return(result__ATPB);
 }
 
-static void run__AGFC(__LIP_AFFECT *Self__BGFC)
+static void run__EGFC(__LIP_AFFECT *Self__FGFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __POSITION pos__1VSG,pos__DI5C;
-  void *__tmp__ZGFC;
-  void *__tmp__0GFC,*__tmp__RP5G,*__tmp__SP5G;
-  __LIP_INTEGER *Self__TP5G;
-  __LIP_STRING *Self__UP5G;
-  if (((void *)fast_reference_at__4TRD(list_data__4NNC,Self__BGFC->name__GGFC) == (void *)NULL)) {
-    copy__JCS(string_tmp__VH,(&__string_289));
-    append__RNS(string_tmp__VH,Self__BGFC->name__GGFC);
-    append__RNS(string_tmp__VH,(&__string_290));
-    pos__1VSG=Self__BGFC->parent_lip_code__ZTPB.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,string_tmp__VH);
-    put_position__EOG(pos__1VSG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  __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)) {
       exit(( 1));
     };
   };
-  __tmp__ZGFC=Self__BGFC->value__YGFC;
-  switch (((struct ___OBJ *)__tmp__ZGFC)->__id) {
+  __tmp__3GFC=Self__FGFC->value__2GFC;
+  switch (((struct ___OBJ *)__tmp__3GFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__0GFC=run_expr__WYQD(__tmp__ZGFC);
+    __tmp__4GFC=run_expr__0YQD(__tmp__3GFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__0GFC=run_expr__V1QD(__tmp__ZGFC);
+    __tmp__4GFC=run_expr__Z1QD(__tmp__3GFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__0GFC=run_expr__FRTE(__tmp__ZGFC);
+    __tmp__4GFC=run_expr__XTTE(__tmp__3GFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__RP5G=((__LIP_VALUE *)__tmp__ZGFC)->value__FVTE;
-    switch (((struct ___OBJ *)__tmp__RP5G)->__id) {
+    __tmp__AUBH=((__LIP_VALUE *)__tmp__3GFC)->value__XXTE;
+    switch (((struct ___OBJ *)__tmp__AUBH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__SP5G=((__LIP_BOOLEAN *)__tmp__RP5G);
+      __tmp__BUBH=((__LIP_BOOLEAN *)__tmp__AUBH);
     } break;
     case __LIP_INTEGER__: {
-      Self__TP5G=((__LIP_INTEGER *)__tmp__RP5G);
-      __tmp__SP5G=get__WTRE(Self__TP5G,Self__TP5G->value__ED0F);
+      Self__CUBH=((__LIP_INTEGER *)__tmp__AUBH);
+      __tmp__BUBH=get__IWRE(Self__CUBH,Self__CUBH->value__G31F);
     } break;
     case __LIP_STRING__: {
-      Self__UP5G=((__LIP_STRING *)__tmp__RP5G);
-      __tmp__SP5G=get__N2DF(Self__UP5G,Self__UP5G->value__TMTE);
+      Self__DUBH=((__LIP_STRING *)__tmp__AUBH);
+      __tmp__BUBH=get__3HEF(Self__DUBH,Self__DUBH->value__FPTE);
     } break;
     };
-    __tmp__0GFC=__tmp__SP5G;
+    __tmp__4GFC=__tmp__BUBH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  pos__DI5C=Self__BGFC->parent_lip_code__ZTPB.parent_itm_object__PDE.position__3CJ;
-  put_error__text__0MG( 1,(&__string_261));
-  put_position__EOG(pos__DI5C);
-  put_string__E1F(msg_err__5MG);
-  if ((type_error__4MG !=  2)) {
+  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)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__0GFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__4GFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__2XZF(__tmp__0GFC);
+    free__4R1F(__tmp__4GFC);
   } break;
   case __LIP_STRING__: {
-    free__HJBG(__tmp__0GFC);
+    free__DEDG(__tmp__4GFC);
   } break;
   };
 }
 
-static void run__TKTE(__LIP_CALL *Self__UKTE)
+static void run__FNTE(__LIP_CALL *Self__GNTE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  void *val__XKTE,*__tmp__DLTE,*__tmp__WP5G,*__tmp__XP5G;
-  void *str__YKTE,*__tmp__IMTE,*__tmp__QNTE;
-  void *path__ZKTE,*n__TUIF;
-  void *__tmp__CLTE;
-  __LIP_INTEGER *Self__YP5G;
-  __LIP_STRING *Self__ZP5G;
-  __POSITION pos__0TIF,pos__4VSG,pos__BWSG,pos__EWSG,pos__HWSG;
-  __STRING_CONSTANT *Self__IG2G;
-  __STRING *Self__JG2G,*Self__LG2G;
-  void *result__WUIF;
-  __INTEGER j__VUIF;
-  __BOOLEAN is_rec__0KTE,__tmp__0LTE,__tmp__CNTE,result__FJWE;
-  __BOOLEAN __tmp__TVIF;
-  val__XKTE=NULL;
-  str__YKTE=NULL;
-  path__ZKTE=NULL;
-  is_rec__0KTE=FALSE__;
-  if (((void *)Self__UKTE->argument__1KTE != (void *)NULL)) {
-    __tmp__CLTE=Self__UKTE->argument__1KTE;
-    switch (((struct ___OBJ *)__tmp__CLTE)->__id) {
+  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) {
     case __LIP_BINARY__: {
-      __tmp__DLTE=run_expr__WYQD(__tmp__CLTE);
+      __tmp__VNTE=run_expr__0YQD(__tmp__UNTE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__DLTE=run_expr__V1QD(__tmp__CLTE);
+      __tmp__VNTE=run_expr__Z1QD(__tmp__UNTE);
     } break;
     case __LIP_CALL__: {
-      __tmp__DLTE=run_expr__FRTE(__tmp__CLTE);
+      __tmp__VNTE=run_expr__XTTE(__tmp__UNTE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__WP5G=((__LIP_VALUE *)__tmp__CLTE)->value__FVTE;
-      switch (((struct ___OBJ *)__tmp__WP5G)->__id) {
+      __tmp__FUBH=((__LIP_VALUE *)__tmp__UNTE)->value__XXTE;
+      switch (((struct ___OBJ *)__tmp__FUBH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__XP5G=((__LIP_BOOLEAN *)__tmp__WP5G);
+        __tmp__GUBH=((__LIP_BOOLEAN *)__tmp__FUBH);
       } break;
       case __LIP_INTEGER__: {
-        Self__YP5G=((__LIP_INTEGER *)__tmp__WP5G);
-        __tmp__XP5G=get__WTRE(Self__YP5G,Self__YP5G->value__ED0F);
+        Self__HUBH=((__LIP_INTEGER *)__tmp__FUBH);
+        __tmp__GUBH=get__IWRE(Self__HUBH,Self__HUBH->value__G31F);
       } break;
       case __LIP_STRING__: {
-        Self__ZP5G=((__LIP_STRING *)__tmp__WP5G);
-        __tmp__XP5G=get__N2DF(Self__ZP5G,Self__ZP5G->value__TMTE);
+        Self__IUBH=((__LIP_STRING *)__tmp__FUBH);
+        __tmp__GUBH=get__3HEF(Self__IUBH,Self__IUBH->value__FPTE);
       } break;
       };
-      __tmp__DLTE=__tmp__XP5G;
+      __tmp__VNTE=__tmp__GUBH;
     } break;
     };
-    val__XKTE=__tmp__DLTE;
+    val__JNTE=__tmp__VNTE;
   };
-  if (((void *)Self__UKTE->name__GLTE == (void *)(&__string_92))) {
-    if (((void *)val__XKTE != (void *)NULL)) {
-      pos__0TIF=Self__UKTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-      put_error__text__0MG( 2,(&__string_291));
-      put_position__EOG(pos__0TIF);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__0LTE=TRUE__;
+    __tmp__MOTE=TRUE__;
   } else {
-    __tmp__0LTE=FALSE__;
+    __tmp__MOTE=FALSE__;
   };
-  if (__tmp__0LTE) {
-    __tmp__CNTE=TRUE__;
+  if (__tmp__MOTE) {
+    __tmp__UPTE=TRUE__;
   } else {
-    result__FJWE=((void *)Self__UKTE->name__GLTE == (void *)(&__string_94));
-    if (result__FJWE) {
-      if (val__XKTE==NULL) {
-        __tmp__IMTE=NULL;
+    result__5LWE=((void *)Self__GNTE->name__YNTE == (void *)(&__string_94));
+    if (result__5LWE) {
+      if (val__JNTE==NULL) {
+        __tmp__0OTE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__XKTE)->__id) {
+        switch (((struct ___OBJ *)val__JNTE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IMTE=NULL;
+          __tmp__0OTE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IMTE=NULL;
+          __tmp__0OTE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__IMTE=((void *)val__XKTE);
+          __tmp__0OTE=((void *)val__JNTE);
         } break;
         }
       };
-      str__YKTE=__tmp__IMTE;
-      if (((void *)__tmp__IMTE == (void *)NULL)) {
-        pos__4VSG=Self__UKTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-        put_error__text__0MG( 1,(&__string_292));
-        put_position__EOG(pos__4VSG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      path__ZKTE=((__LIP_STRING *)__tmp__IMTE)->value__TMTE;
-      Self__IG2G=((__STRING_CONSTANT *)path__ZKTE);
-      if ((((__CHARACTER *)Self__IG2G->storage__FQO)[(__INTEGER)(Self__IG2G->count__DD -  1)] == '*')) {
-        copy__JCS(string_tmp__VH,path__ZKTE);
-        Self__JG2G=((__STRING *)string_tmp__VH);
-        if (( 1 > Self__JG2G->count__GFC)) {
-          Self__JG2G->count__GFC= 0;
+      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;
         } else {
-          Self__JG2G->count__GFC=(__INTEGER)(Self__JG2G->count__GFC -  1);
+          Self__BJ4G->count__KFC=(__INTEGER)(Self__BJ4G->count__KFC -  1);
         };
-        path__ZKTE=get__YVB(string_tmp__VH);
-        is_rec__0KTE=TRUE__;
+        path__LNTE=get__2VB(string_tmp__VH);
+        is_rec__MNTE=TRUE__;
       };
-      load_directory__is_recursive__EPTF(Self__UKTE,path__ZKTE,is_rec__0KTE);
+      load_directory__is_recursive__TFVF(Self__GNTE,path__LNTE,is_rec__MNTE);
     };
-    __tmp__CNTE=result__FJWE;
+    __tmp__UPTE=result__5LWE;
   };
-  if ((! __tmp__CNTE)) {
-    if (((void *)Self__UKTE->name__GLTE == (void *)(&__string_93))) {
-      if (val__XKTE==NULL) {
-        __tmp__QNTE=NULL;
+  if ((! __tmp__UPTE)) {
+    if (((void *)Self__GNTE->name__YNTE == (void *)(&__string_93))) {
+      if (val__JNTE==NULL) {
+        __tmp__CQTE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__XKTE)->__id) {
+        switch (((struct ___OBJ *)val__JNTE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QNTE=NULL;
+          __tmp__CQTE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QNTE=NULL;
+          __tmp__CQTE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__QNTE=((void *)val__XKTE);
+          __tmp__CQTE=((void *)val__JNTE);
         } break;
         }
       };
-      str__YKTE=__tmp__QNTE;
-      if (((void *)__tmp__QNTE == (void *)NULL)) {
-        pos__BWSG=Self__UKTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-        put_error__text__0MG( 1,(&__string_292));
-        put_position__EOG(pos__BWSG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      ((__STRING *)string_tmp__VH)->count__GFC= 0;
-      append_in__NPBG(__tmp__QNTE,string_tmp__VH);
-      Self__LG2G=((__STRING *)string_tmp__VH);
-      if ((Self__LG2G->capacity__IBS > Self__LG2G->count__GFC)) {
-        ((__CHARACTER *)Self__LG2G->storage__RBS)[Self__LG2G->count__GFC]='\0';
+      ((__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';
       } else {
-        add_last__JLT(Self__LG2G,'\0');
-        Self__LG2G->count__GFC=(__INTEGER)(Self__LG2G->count__GFC -  1);
+        add_last__NLT(Self__DJ4G,'\0');
+        Self__DJ4G->count__KFC=(__INTEGER)(Self__DJ4G->count__KFC -  1);
       };
-      system(((char*)((Self__LG2G->storage__RBS))));
+      system(((char*)((Self__DJ4G->storage__VBS))));
     } else {
-      n__TUIF=Self__UKTE->name__GLTE;
-      result__WUIF=NULL;
-      j__VUIF= 0;
-      while_do__XVJF:
+      n__JEJF=Self__GNTE->name__YNTE;
+      result__MEJF=NULL;
+      j__LEJF= 0;
+      while_do__MNKF:
       {
-        if ((j__VUIF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__2UIF)->parent_arrayed_collection__1UIF.upper__FVIF)) {
+        if ((j__LEJF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__SEJF)->parent_arrayed_collection__REJF.upper__1EJF)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__TVIF=((void *)NULL != (void *)n__TUIF);
+          __tmp__JFJF=((void *)NULL != (void *)n__JEJF);
         } else {
-          __tmp__TVIF=FALSE__;
+          __tmp__JFJF=FALSE__;
         };
-        if (__tmp__TVIF) {
-          j__VUIF=(__INTEGER)(j__VUIF +  1);
-          goto while_do__XVJF;
+        if (__tmp__JFJF) {
+          j__LEJF=(__INTEGER)(j__LEJF +  1);
+          goto while_do__MNKF;
         };
       };
-      if ((j__VUIF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__2UIF)->parent_arrayed_collection__1UIF.upper__FVIF)) {
-        result__WUIF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__2UIF)->parent_arrayed_collection__1UIF.storage__PGNF)[j__VUIF];
+      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 (((void *)result__WUIF == (void *)NULL)) {
-        copy__JCS(string_tmp__VH,(&__string_289));
-        append__RNS(string_tmp__VH,Self__UKTE->name__GLTE);
-        append__RNS(string_tmp__VH,(&__string_290));
-        pos__EWSG=Self__UKTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-        put_error__text__0MG( 1,string_tmp__VH);
-        put_position__EOG(pos__EWSG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      pos__HWSG=Self__UKTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-      put_error__text__0MG( 1,(&__string_293));
-      put_position__EOG(pos__HWSG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+      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)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__XKTE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__XKTE)->__id) {
+  if (((void *)val__JNTE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__JNTE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__2XZF(val__XKTE);
+      free__4R1F(val__JNTE);
     } break;
     case __LIP_STRING__: {
-      free__HJBG(val__XKTE);
+      free__DEDG(val__JNTE);
     } break;
     };
   };
 }
 
-static void run__MCQD(__LIP_IF *Self__NCQD)
+static void run__QCQD(__LIP_IF *Self__RCQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  void *__tmp__RCQD,*__tmp__VDQD,*__tmp__REQD;
-  __POSITION __tmp__F1WG,pos__LWSG,pos__PWSG,pos__SWSG,__tmp__CVPG;
-  __POSITION __tmp__EVPG,__tmp__VWSG,__tmp__LVPG,__tmp__NVPG;
-  __POSITION __tmp__0PTE;
-  void *__tmp__SCQD,*__tmp__1P5G,*__tmp__2P5G;
-  __LIP_INTEGER *Self__3P5G;
-  __LIP_STRING *Self__4P5G;
-  void *__tmp__UCQD,*val__PCQD;
-  __INTEGER __tmp__ODQD,Self__F41F,__tmp__KEQD,Self__NICF;
-  __BOOLEAN __tmp__YDQD;
-  __tmp__RCQD=Self__NCQD->condition__QCQD;
-  switch (((struct ___OBJ *)__tmp__RCQD)->__id) {
+  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) {
   case __LIP_AFFECT__: {
-    __tmp__F1WG=((__LIP_AFFECT *)__tmp__RCQD)->parent_lip_code__ZTPB.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_294));
-    put_position__EOG(__tmp__F1WG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    __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)) {
       exit(( 1));
     };
-    __tmp__SCQD=NULL;
+    __tmp__WCQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__SCQD=run_expr__WYQD(__tmp__RCQD);
+    __tmp__WCQD=run_expr__0YQD(__tmp__VCQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__SCQD=run_expr__V1QD(__tmp__RCQD);
+    __tmp__WCQD=run_expr__Z1QD(__tmp__VCQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__SCQD=run_expr__FRTE(__tmp__RCQD);
+    __tmp__WCQD=run_expr__XTTE(__tmp__VCQD);
   } break;
   case __LIP_IF__: {
-    pos__LWSG=((__LIP_IF *)__tmp__RCQD)->parent_lip_code__OOYC.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_294));
-    put_position__EOG(pos__LWSG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    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)) {
       exit(( 1));
     };
-    __tmp__SCQD=NULL;
+    __tmp__WCQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    pos__PWSG=((__LIP_PRINT *)__tmp__RCQD)->parent_lip_code__APYC.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_294));
-    put_position__EOG(pos__PWSG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    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)) {
       exit(( 1));
     };
-    __tmp__SCQD=NULL;
+    __tmp__WCQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__1P5G=((__LIP_VALUE *)__tmp__RCQD)->value__FVTE;
-    switch (((struct ___OBJ *)__tmp__1P5G)->__id) {
+    __tmp__KUBH=((__LIP_VALUE *)__tmp__VCQD)->value__XXTE;
+    switch (((struct ___OBJ *)__tmp__KUBH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__2P5G=((__LIP_BOOLEAN *)__tmp__1P5G);
+      __tmp__LUBH=((__LIP_BOOLEAN *)__tmp__KUBH);
     } break;
     case __LIP_INTEGER__: {
-      Self__3P5G=((__LIP_INTEGER *)__tmp__1P5G);
-      __tmp__2P5G=get__WTRE(Self__3P5G,Self__3P5G->value__ED0F);
+      Self__MUBH=((__LIP_INTEGER *)__tmp__KUBH);
+      __tmp__LUBH=get__IWRE(Self__MUBH,Self__MUBH->value__G31F);
     } break;
     case __LIP_STRING__: {
-      Self__4P5G=((__LIP_STRING *)__tmp__1P5G);
-      __tmp__2P5G=get__N2DF(Self__4P5G,Self__4P5G->value__TMTE);
+      Self__NUBH=((__LIP_STRING *)__tmp__KUBH);
+      __tmp__LUBH=get__3HEF(Self__NUBH,Self__NUBH->value__FPTE);
     } break;
     };
-    __tmp__SCQD=__tmp__2P5G;
+    __tmp__WCQD=__tmp__LUBH;
   } break;
   };
-  if (__tmp__SCQD==NULL) {
-    __tmp__UCQD=NULL;
+  if (__tmp__WCQD==NULL) {
+    __tmp__YCQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__SCQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__WCQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__UCQD=((void *)__tmp__SCQD);
+      __tmp__YCQD=((void *)__tmp__WCQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__UCQD=NULL;
+      __tmp__YCQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__UCQD=NULL;
+      __tmp__YCQD=NULL;
     } break;
     }
   };
-  val__PCQD=__tmp__UCQD;
-  if (((void *)__tmp__UCQD == (void *)NULL)) {
-    pos__SWSG=Self__NCQD->parent_lip_code__OOYC.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_295));
-    put_position__EOG(pos__SWSG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  if (((__LIP_BOOLEAN *)__tmp__UCQD)->value__5CQD) {
-    __tmp__ODQD=((__FAST_ARRAYoLIP_CODEo *)Self__NCQD->then__GDQD)->parent_arrayed_collection__3KYC.upper__MDQD;
-    Self__F41F= 0;
-    while ((Self__F41F <= __tmp__ODQD)) {
-      __tmp__VDQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__NCQD->then__GDQD)->parent_arrayed_collection__3KYC.storage__APTD)[Self__F41F];
-      switch (((struct ___OBJ *)__tmp__VDQD)->__id) {
+  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) {
       case __LIP_AFFECT__: {
-        run__AGFC(__tmp__VDQD);
+        run__EGFC(__tmp__ZDQD);
       } break;
       case __LIP_BINARY__: {
-        __tmp__CVPG=((__LIP_BINARY *)__tmp__VDQD)->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ;
-        put_error__text__0MG( 2,(&__string_256));
-        put_position__EOG(__tmp__CVPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+        __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)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __tmp__EVPG=((__LIP_UNARY *)__tmp__VDQD)->parent_lip_code__104B.parent_itm_object__PDE.position__3CJ;
-        put_error__text__0MG( 2,(&__string_256));
-        put_position__EOG(__tmp__EVPG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+        __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)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__TKTE(__tmp__VDQD);
+        run__FNTE(__tmp__ZDQD);
       } break;
       case __LIP_IF__: {
-        run__MCQD(__tmp__VDQD);
+        run__QCQD(__tmp__ZDQD);
       } break;
       case __LIP_PRINT__: {
-        run__HPTE(__tmp__VDQD);
+        run__ZRTE(__tmp__ZDQD);
       } break;
       case __LIP_VALUE__: {
-        __tmp__VWSG=((__LIP_VALUE *)__tmp__VDQD)->parent_lip_code__JUEE.parent_itm_object__PDE.position__3CJ;
-        put_error__text__0MG( 2,(&__string_256));
-        put_position__EOG(__tmp__VWSG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+        __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)) {
           exit(( 1));
         };
       } break;
       };
-      Self__F41F=(__INTEGER)(Self__F41F +  1);
+      Self__VY3F=(__INTEGER)(Self__VY3F +  1);
     };
-    __tmp__YDQD=TRUE__;
+    __tmp__2DQD=TRUE__;
   } else {
-    __tmp__YDQD=FALSE__;
-  };
-  if ((! __tmp__YDQD)) {
-    if (((void *)Self__NCQD->else__3DQD != (void *)NULL)) {
-      __tmp__KEQD=((__FAST_ARRAYoLIP_CODEo *)Self__NCQD->else__3DQD)->parent_arrayed_collection__3KYC.upper__MDQD;
-      Self__NICF= 0;
-      while ((Self__NICF <= __tmp__KEQD)) {
-        __tmp__REQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__NCQD->else__3DQD)->parent_arrayed_collection__3KYC.storage__APTD)[Self__NICF];
-        switch (((struct ___OBJ *)__tmp__REQD)->__id) {
+    __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) {
         case __LIP_AFFECT__: {
-          run__AGFC(__tmp__REQD);
+          run__EGFC(__tmp__VEQD);
         } break;
         case __LIP_BINARY__: {
-          __tmp__LVPG=((__LIP_BINARY *)__tmp__REQD)->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ;
-          put_error__text__0MG( 2,(&__string_256));
-          put_position__EOG(__tmp__LVPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+          __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)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __tmp__NVPG=((__LIP_UNARY *)__tmp__REQD)->parent_lip_code__104B.parent_itm_object__PDE.position__3CJ;
-          put_error__text__0MG( 2,(&__string_256));
-          put_position__EOG(__tmp__NVPG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+          __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)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__TKTE(__tmp__REQD);
+          run__FNTE(__tmp__VEQD);
         } break;
         case __LIP_IF__: {
-          run__MCQD(__tmp__REQD);
+          run__QCQD(__tmp__VEQD);
         } break;
         case __LIP_PRINT__: {
-          run__HPTE(__tmp__REQD);
+          run__ZRTE(__tmp__VEQD);
         } break;
         case __LIP_VALUE__: {
-          __tmp__0PTE=((__LIP_VALUE *)__tmp__REQD)->parent_lip_code__JUEE.parent_itm_object__PDE.position__3CJ;
-          put_error__text__0MG( 2,(&__string_256));
-          put_position__EOG(__tmp__0PTE);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+          __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)) {
             exit(( 1));
           };
         } break;
         };
-        Self__NICF=(__INTEGER)(Self__NICF +  1);
+        Self__JOCF=(__INTEGER)(Self__JOCF +  1);
       };
     };
   };
 }
 
-static void run__HPTE(__LIP_PRINT *Self__IPTE)
+static void run__ZRTE(__LIP_PRINT *Self__0RTE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__LPTE;
-  __POSITION __tmp__TYUE,pos__BHDE,pos__XWSG,pos__NUWE;
-  void *__tmp__MPTE,*__tmp__AQ5G,*__tmp__BQ5G;
-  __LIP_INTEGER *Self__CQ5G;
-  __LIP_STRING *Self__DQ5G,*Self__EPBG;
-  __INTEGER Self__BG1F;
-  __BOOLEAN __tmp__IG1F;
-  __tmp__LPTE=Self__IPTE->message__KPTE;
-  switch (((struct ___OBJ *)__tmp__LPTE)->__id) {
+  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) {
   case __LIP_AFFECT__: {
-    __tmp__TYUE=((__LIP_AFFECT *)__tmp__LPTE)->parent_lip_code__ZTPB.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_294));
-    put_position__EOG(__tmp__TYUE);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    __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)) {
       exit(( 1));
     };
-    __tmp__MPTE=NULL;
+    __tmp__4RTE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__MPTE=run_expr__WYQD(__tmp__LPTE);
+    __tmp__4RTE=run_expr__0YQD(__tmp__3RTE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__MPTE=run_expr__V1QD(__tmp__LPTE);
+    __tmp__4RTE=run_expr__Z1QD(__tmp__3RTE);
   } break;
   case __LIP_CALL__: {
-    __tmp__MPTE=run_expr__FRTE(__tmp__LPTE);
+    __tmp__4RTE=run_expr__XTTE(__tmp__3RTE);
   } break;
   case __LIP_IF__: {
-    pos__BHDE=((__LIP_IF *)__tmp__LPTE)->parent_lip_code__OOYC.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_294));
-    put_position__EOG(pos__BHDE);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    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)) {
       exit(( 1));
     };
-    __tmp__MPTE=NULL;
+    __tmp__4RTE=NULL;
   } break;
   case __LIP_PRINT__: {
-    pos__XWSG=((__LIP_PRINT *)__tmp__LPTE)->parent_lip_code__APYC.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_294));
-    put_position__EOG(pos__XWSG);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    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)) {
       exit(( 1));
     };
-    __tmp__MPTE=NULL;
+    __tmp__4RTE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__AQ5G=((__LIP_VALUE *)__tmp__LPTE)->value__FVTE;
-    switch (((struct ___OBJ *)__tmp__AQ5G)->__id) {
+    __tmp__PUBH=((__LIP_VALUE *)__tmp__3RTE)->value__XXTE;
+    switch (((struct ___OBJ *)__tmp__PUBH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__BQ5G=((__LIP_BOOLEAN *)__tmp__AQ5G);
+      __tmp__QUBH=((__LIP_BOOLEAN *)__tmp__PUBH);
     } break;
     case __LIP_INTEGER__: {
-      Self__CQ5G=((__LIP_INTEGER *)__tmp__AQ5G);
-      __tmp__BQ5G=get__WTRE(Self__CQ5G,Self__CQ5G->value__ED0F);
+      Self__RUBH=((__LIP_INTEGER *)__tmp__PUBH);
+      __tmp__QUBH=get__IWRE(Self__RUBH,Self__RUBH->value__G31F);
     } break;
     case __LIP_STRING__: {
-      Self__DQ5G=((__LIP_STRING *)__tmp__AQ5G);
-      __tmp__BQ5G=get__N2DF(Self__DQ5G,Self__DQ5G->value__TMTE);
+      Self__SUBH=((__LIP_STRING *)__tmp__PUBH);
+      __tmp__QUBH=get__3HEF(Self__SUBH,Self__SUBH->value__FPTE);
     } break;
     };
-    __tmp__MPTE=__tmp__BQ5G;
+    __tmp__4RTE=__tmp__QUBH;
   } break;
   };
-  if (((void *)__tmp__MPTE == (void *)NULL)) {
-    pos__NUWE=Self__IPTE->parent_lip_code__APYC.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_261));
-    put_position__EOG(pos__NUWE);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__MPTE)->__id) {
+  switch (((struct ___OBJ *)__tmp__4RTE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__MPTE)->value__5CQD) {
-      print__GHD((&__string_42));
+    if (((__LIP_BOOLEAN *)__tmp__4RTE)->value__DDQD) {
+      print__KHD((&__string_42));
     } else {
-      print__GHD((&__string_43));
+      print__KHD((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__BG1F=((__LIP_INTEGER *)__tmp__MPTE)->value__ED0F;
-    if ((Self__BG1F ==  0)) {
+    Self__QA3F=((__LIP_INTEGER *)__tmp__4RTE)->value__G31F;
+    if ((Self__QA3F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__IG1F=TRUE__;
+      __tmp__XA3F=TRUE__;
     } else {
-      __tmp__IG1F=FALSE__;
+      __tmp__XA3F=FALSE__;
     };
-    if ((! __tmp__IG1F)) {
-      if ((Self__BG1F <  0)) {
+    if ((! __tmp__XA3F)) {
+      if ((Self__QA3F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__C3DG((__INTEGER)(- Self__BG1F));
+        print_positif__AYFG((__INTEGER)(- Self__QA3F));
       } else {
-        print_positif__C3DG(Self__BG1F);
+        print_positif__AYFG(Self__QA3F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    Self__EPBG=((__LIP_STRING *)__tmp__MPTE);
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    append_in__NPBG(Self__EPBG,string_tmp__VH);
-    put_string__IHF(((__STRING *)string_tmp__VH));
+    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));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__MPTE)->__id) {
+  switch (((struct ___OBJ *)__tmp__4RTE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__2XZF(__tmp__MPTE);
+    free__4R1F(__tmp__4RTE);
   } break;
   case __LIP_STRING__: {
-    free__HJBG(__tmp__MPTE);
+    free__DEDG(__tmp__4RTE);
   } break;
   };
 }
 
-static void add_last__KNV(__FAST_ARRAYoITM_TYPE_MONOo *Self__LNV,void *element__MNV)
+static void add_last__ONV(__FAST_ARRAYoITM_TYPE_MONOo *Self__PNV,void *element__QNV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__NNV,__tmp__SOV,__tmp__FGEC,Self__GIVD;
-  __BOOLEAN __tmp__2NV;
-  void **__tmp__ROV,**new__RFEC;
-  new_capacity__NNV= 0;
-  if (((__INTEGER)(Self__LNV->parent_arrayed_collection__JXC.upper__0HV +  1) <= (__INTEGER)(Self__LNV->parent_arrayed_collection__JXC.capacity__PNV -  1))) {
-    Self__LNV->parent_arrayed_collection__JXC.upper__0HV=(__INTEGER)(Self__LNV->parent_arrayed_collection__JXC.upper__0HV +  1);
-    __tmp__2NV=TRUE__;
+  __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__;
   } else {
-    __tmp__2NV=FALSE__;
-  };
-  if ((! __tmp__2NV)) {
-    if ((Self__LNV->parent_arrayed_collection__JXC.capacity__PNV ==  0)) {
-      Self__LNV->parent_arrayed_collection__JXC.storage__BMV=create__DBRB( 2);
-      Self__LNV->parent_arrayed_collection__JXC.capacity__PNV= 2;
-      Self__LNV->parent_arrayed_collection__JXC.upper__0HV= 0;
-    } else {
-      new_capacity__NNV=(__INTEGER)(Self__LNV->parent_arrayed_collection__JXC.capacity__PNV <<  1);
-      __tmp__ROV=Self__LNV->parent_arrayed_collection__JXC.storage__BMV;
-      __tmp__SOV=Self__LNV->parent_arrayed_collection__JXC.capacity__PNV;
-      new__RFEC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__ROV)),((__UINTEGER_32 )(__INTEGER)(__tmp__SOV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__NNV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__FGEC=(__INTEGER)(new_capacity__NNV -  1);
-      Self__GIVD=__tmp__SOV;
-      while ((Self__GIVD <= __tmp__FGEC)) {
-        new__RFEC[Self__GIVD]=NULL;
-        Self__GIVD=(__INTEGER)(Self__GIVD +  1);
-      };
-      Self__LNV->parent_arrayed_collection__JXC.storage__BMV=new__RFEC;
-      Self__LNV->parent_arrayed_collection__JXC.capacity__PNV=new_capacity__NNV;
-      Self__LNV->parent_arrayed_collection__JXC.upper__0HV=(__INTEGER)(Self__LNV->parent_arrayed_collection__JXC.upper__0HV +  1);
-    };
-  };
-  ((void **)Self__LNV->parent_arrayed_collection__JXC.storage__BMV)[Self__LNV->parent_arrayed_collection__JXC.upper__0HV]=element__MNV;
+    __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;
 }
 
-static void* alias__WUP(void *tmp__YUP)
+static void* alias__0UP(void *tmp__2UP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__E4PD,i__W20E,new_capacity__PFW,other_upper__OFW;
-  __INTEGER Self__1MKC,h__QGW,idx__RGW,idx__JURB,new_capacity__KURB;
-  __INTEGER i__IURB,typ_id__RLNB;
-  __POINTER ptr__MLNB,ptr_table__JQ5G,next__IQ5G,result__KQ5G;
-  __POINTER ptr_table__OQ5G,next__NQ5G,result__PQ5G;
-  __UINTEGER_32 sz__OLNB,a__CI2G,new_size__DI2G,t__HI2G,a__GI2G;
-  __UINTEGER_32 new_size__RQ5G,lab_type__QQ5G;
-  void *result__0UP,*result__54V,*e__JGW,*e__FQ5G,*e__KM1;
-  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__L4V,*Self__IGW;
-  void *node__44V,*node__GQ5G,*node__TM1,*node__SGW,*node1__MURB;
-  void *node2__NURB,*__tmp__CIW;
-  __BOOLEAN __tmp__X5V,result__C3PD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__52PD,*o__D3PD,*__tmp__P3PD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__MFW;
-  void **__tmp__53PD,**__tmp__B4PD,**Self__C20E,**__tmp__CGW,**__tmp__EGW;
-  void **Self__I3CC;
-  void **old_buckets__LURB;
-  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__LLNB,*Self__DSDC;
-  result__0UP=NULL;
-  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YUP)->parent_arrayed_collection__JXC.upper__0HV <  0)) {
-    result__0UP=empty_list__BVP;
+  __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;
   } else {
-    Self__L4V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__MVP);
-    result__54V=NULL;
-    node__44V=((void **)Self__L4V->buckets__G5V)[(__INTEGER)(hash_code__540(tmp__YUP) % Self__L4V->capacity__B5V)];
-    until_do__HA1:
+    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:
     {
-      if (((void *)node__44V == (void *)NULL)) {
-        __tmp__X5V=TRUE__;
-      } else {
-        Self__52PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__44V)->item__S5V);
-        result__C3PD=FALSE__;
-        o__D3PD=NULL;
-        if (((void *)Self__52PD == (void *)tmp__YUP)) {
-          result__C3PD=TRUE__;
-        } else {
-          if (tmp__YUP==NULL) {
-            __tmp__P3PD=NULL;
-          } else {
-            __tmp__P3PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YUP);
-          };
-          o__D3PD=__tmp__P3PD;
-          if ((((void *)__tmp__P3PD != (void *)NULL) && (Self__52PD->parent_arrayed_collection__JXC.upper__0HV == __tmp__P3PD->parent_arrayed_collection__JXC.upper__0HV))) {
-            __tmp__53PD=Self__52PD->parent_arrayed_collection__JXC.storage__BMV;
-            __tmp__B4PD=__tmp__P3PD->parent_arrayed_collection__JXC.storage__BMV;
-            __tmp__E4PD=(__INTEGER)(Self__52PD->parent_arrayed_collection__JXC.upper__0HV +  1);
-            Self__C20E=((void **)__tmp__53PD);
-            i__W20E=(__INTEGER)(__tmp__E4PD -  1);
-            while (((i__W20E >=  0) && ((void *)Self__C20E[i__W20E] == (void *)((void **)__tmp__B4PD)[i__W20E]))) {
-              i__W20E=(__INTEGER)(i__W20E -  1);
-            };
-            result__C3PD=(i__W20E <  0);
-          };
-        };
-        __tmp__X5V=result__C3PD;
-      };
-      if ((! __tmp__X5V)) {
-        node__44V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__44V)->next__45V;
-        goto until_do__HA1;
-      };
-    };
-    if (((void *)node__44V != (void *)NULL)) {
-      result__54V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__44V)->item__S5V;
-    };
-    result__0UP=result__54V;
-    if (((void *)result__54V == (void *)NULL)) {
-      result__0UP=create_with_capacity__YER((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YUP)->parent_arrayed_collection__JXC.upper__0HV +  1));
-      Self__MFW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__0UP);
-      new_capacity__PFW= 0;
-      other_upper__OFW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YUP)->parent_arrayed_collection__JXC.upper__0HV;
-      if ((other_upper__OFW >=  0)) {
-        new_capacity__PFW=(__INTEGER)(other_upper__OFW +  1);
-        if ((Self__MFW->parent_arrayed_collection__JXC.capacity__PNV < new_capacity__PFW)) {
-          Self__MFW->parent_arrayed_collection__JXC.storage__BMV=create__DBRB(new_capacity__PFW);
-          Self__MFW->parent_arrayed_collection__JXC.capacity__PNV=new_capacity__PFW;
-        };
-        __tmp__CGW=Self__MFW->parent_arrayed_collection__JXC.storage__BMV;
-        __tmp__EGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__YUP)->parent_arrayed_collection__JXC.storage__BMV;
-        Self__I3CC=((void **)__tmp__CGW);
-        Self__1MKC=other_upper__OFW;
-        while ((Self__1MKC >=  0)) {
-          Self__I3CC[Self__1MKC]=((void **)__tmp__EGW)[Self__1MKC];
-          Self__1MKC=(__INTEGER)(Self__1MKC -  1);
-        };
-      };
-      Self__MFW->parent_arrayed_collection__JXC.upper__0HV=other_upper__OFW;
-      Self__IGW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__MVP);
-      e__JGW=result__0UP;
-      e__FQ5G=result__0UP;
-      node__GQ5G=((void **)Self__IGW->buckets__G5V)[(__INTEGER)(hash_code__540(result__0UP) % Self__IGW->capacity__B5V)];
-      while ((! (((void *)node__GQ5G == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__GQ5G)->item__S5V == (void *)e__FQ5G)))) {
-        node__GQ5G=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__GQ5G)->next__45V;
-      };
-      e__KM1=result__0UP;
-      node__TM1=((void **)Self__IGW->buckets__G5V)[(__INTEGER)(hash_code__540(result__0UP) % Self__IGW->capacity__B5V)];
-      while ((! (((void *)node__TM1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__TM1)->item__S5V == (void *)e__KM1)))) {
-        node__TM1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__TM1)->next__45V;
-      };
-      h__QGW=hash_code__540(result__0UP);
-      idx__RGW=(__INTEGER)(h__QGW % Self__IGW->capacity__B5V);
-      node__SGW=((void **)Self__IGW->buckets__G5V)[idx__RGW];
-      while ((! (((void *)node__SGW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__SGW)->item__S5V == (void *)e__JGW)))) {
-        node__SGW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__SGW)->next__45V;
-      };
-      if (((void *)node__SGW == (void *)NULL)) {
-        if ((Self__IGW->capacity__B5V == Self__IGW->count__VHW)) {
-          idx__JURB= 0;
-          node1__MURB=NULL;
-          node2__NURB=NULL;
-          new_capacity__KURB=prime_number_ceiling__H41((__INTEGER)(Self__IGW->capacity__B5V +  1));
-          old_buckets__LURB=Self__IGW->buckets__G5V;
-          Self__IGW->buckets__G5V=create__LZBB(new_capacity__KURB);
-          i__IURB=(__INTEGER)(Self__IGW->capacity__B5V -  1);
-          Self__IGW->capacity__B5V=new_capacity__KURB;
-          while ((i__IURB >=  0)) {
-            node1__MURB=((void **)old_buckets__LURB)[i__IURB];
-            while (((void *)node1__MURB != (void *)NULL)) {
-              node2__NURB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__MURB)->next__45V;
-              idx__JURB=(__INTEGER)(hash_code__540(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__MURB)->item__S5V) % Self__IGW->capacity__B5V);
-              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__MURB)->next__45V=((void **)Self__IGW->buckets__G5V)[idx__JURB];
-              ((void **)Self__IGW->buckets__G5V)[idx__JURB]=node1__MURB;
-              node1__MURB=node2__NURB;
-            };
-            i__IURB=(__INTEGER)(i__IURB -  1);
-          };
-          idx__RGW=(__INTEGER)(h__QGW % Self__IGW->capacity__B5V);
-        };
-        __tmp__CIW=((void **)Self__IGW->buckets__G5V)[idx__RGW];
-        result__LLNB=NULL;
-        ptr__MLNB=((__POINTER )(NULL));
-        typ_id__RLNB= 0;
-        sz__OLNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
-        if ((sz__OLNB ==  0)) {
-          result__LLNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
-        } else {
-          typ_id__RLNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__OLNB);
-          if ((typ_id__RLNB == (__INTEGER)(-  1))) {
-            a__CI2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__DI2G=(__UINTEGER_32)((__UINTEGER_32)(sz__OLNB + a__CI2G) & (__UINTEGER_32)(~ a__CI2G));
-            ptr_table__JQ5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DI2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__IQ5G=((__POINTER )(NULL));
-            result__KQ5G=((__POINTER *)ptr_table__JQ5G)[ 0];
-            if ((result__KQ5G == (void *)NULL)) {
-              result__KQ5G=new_lab__2QJ(new_size__DI2G);
-              next__IQ5G=(void *)((unsigned long)result__KQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DI2G)));
-              ((__POINTER *)next__IQ5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JQ5G)[ 0]=next__IQ5G;
+      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;
             } else {
-              next__IQ5G=((__POINTER *)result__KQ5G)[ 0];
-              if ((next__IQ5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KQ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DI2G <<  1)) <=  4096)) {
-                  next__IQ5G=(void *)((unsigned long)result__KQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DI2G)));
+              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)));
                 } else {
-                  next__IQ5G=new_lab__2QJ(new_size__DI2G);
+                  next__XUBH=new_lab__ARJ(new_size__4K4G);
                 };
-                ((__POINTER *)next__IQ5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__JQ5G)[ 0]=next__IQ5G;
+                ((__POINTER *)next__XUBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YUBH)[ 0]=next__XUBH;
               } else {
-                ((__POINTER *)result__KQ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__IQ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__KQ5G=next__IQ5G;
+                ((__POINTER *)result__ZUBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZUBH=next__XUBH;
               };
             };
-            ptr__MLNB=result__KQ5G;
-          } else {
-            t__HI2G=((__UINTEGER_32 )typ_id__RLNB);
-            a__GI2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__RQ5G=(__UINTEGER_32)((__UINTEGER_32)(sz__OLNB + a__GI2G) & (__UINTEGER_32)(~ a__GI2G));
-            ptr_table__OQ5G=((__POINTER )(&(table_type[(t__HI2G)])));
-            lab_type__QQ5G=(__UINTEGER_32)(t__HI2G |  1);
-            next__NQ5G=((__POINTER )(NULL));
-            result__PQ5G=((__POINTER *)ptr_table__OQ5G)[ 0];
-            if ((result__PQ5G == (void *)NULL)) {
-              result__PQ5G=new_lab__2QJ(lab_type__QQ5G);
-              next__NQ5G=(void *)((unsigned long)result__PQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RQ5G)));
-              ((__POINTER *)next__NQ5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__OQ5G)[ 0]=next__NQ5G;
+            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;
             } else {
-              next__NQ5G=((__POINTER *)result__PQ5G)[ 0];
-              if ((next__NQ5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PQ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__RQ5G <<  1)) <=  4096)) {
-                  next__NQ5G=(void *)((unsigned long)result__PQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RQ5G)));
+              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)));
                 } else {
-                  next__NQ5G=new_lab__2QJ(lab_type__QQ5G);
+                  next__2UBH=new_lab__ARJ(lab_type__5UBH);
                 };
-                ((__POINTER *)next__NQ5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__OQ5G)[ 0]=next__NQ5G;
+                ((__POINTER *)next__2UBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3UBH)[ 0]=next__2UBH;
               } else {
-                ((__POINTER *)result__PQ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NQ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__PQ5G=next__NQ5G;
+                ((__POINTER *)result__4UBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2UBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4UBH=next__2UBH;
               };
             };
-            ptr__MLNB=result__PQ5G;
+            ptr__QLNB=result__4UBH;
           };
-          result__LLNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__MLNB);
-          *(result__LLNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__PLNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__QLNB);
+          *(result__PLNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        Self__DSDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__LLNB);
-        Self__DSDC->item__S5V=result__0UP;
-        Self__DSDC->next__45V=__tmp__CIW;
-        node__SGW=result__LLNB;
-        ((void **)Self__IGW->buckets__G5V)[idx__RGW]=result__LLNB;
-        Self__IGW->count__VHW=(__INTEGER)(Self__IGW->count__VHW +  1);
+        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);
       };
     };
   };
-  free__MMQ(tmp__YUP);
-  return(result__0UP);
+  free__QMQ(tmp__2UP);
+  return(result__4UP);
 }
 
-static void add__SLHB(__HASHED_SEToSTRING_CONSTANTo *Self__TLHB,void *e__ULHB)
+static void add__WLHB(__HASHED_SEToSTRING_CONSTANTo *Self__XLHB,void *e__YLHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__OZ3G,*Self__TZ3G;
-  __INTEGER result__NZ3G,__tmp__PZ3G,Self__QZ3G,idx__2LHB,idx__VP0B;
-  __INTEGER new_capacity__WP0B,i__UP0B,result__SZ3G,__tmp__UZ3G;
-  __INTEGER Self__VZ3G,typ_id__G3WB;
-  __POINTER ptr__B3WB,ptr_table__TQ5G,next__SQ5G,result__UQ5G;
-  __POINTER ptr_table__YQ5G,next__XQ5G,result__ZQ5G;
-  __UINTEGER_32 sz__D3WB,a__2I2G,new_size__3I2G,t__BJ2G,a__AJ2G;
-  __UINTEGER_32 new_size__1Q5G,lab_type__0Q5G;
-  void *node__3LHB,*node1__YP0B,*node2__ZP0B,*__tmp__MNHB;
-  void **old_buckets__XP0B;
-  __HASHED_SET_NODEoSTRING_CONSTANTo *result__A3WB,*Self__CLFC;
-  has__DLMB(Self__TLHB,e__ULHB);
-  has__DLMB(Self__TLHB,e__ULHB);
-  Self__OZ3G=((__STRING_CONSTANT *)e__ULHB);
-  result__NZ3G= 0;
-  __tmp__PZ3G=Self__OZ3G->count__DD;
-  Self__QZ3G= 1;
-  while ((Self__QZ3G <= __tmp__PZ3G)) {
-    result__NZ3G=(__INTEGER)((__INTEGER)( 5 * result__NZ3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OZ3G->storage__FQO)[(__INTEGER)(Self__QZ3G -  1)])));
-    Self__QZ3G=(__INTEGER)(Self__QZ3G +  1);
-  };
-  if ((result__NZ3G <  0)) {
-    result__NZ3G=(__INTEGER)(~ result__NZ3G);
-  };
-  idx__2LHB=(__INTEGER)(result__NZ3G % Self__TLHB->capacity__0HT);
-  node__3LHB=((void **)Self__TLHB->buckets__5DV)[idx__2LHB];
-  while ((! (((void *)node__3LHB == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__3LHB)->item__LEV,e__ULHB)))) {
-    node__3LHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__3LHB)->next__WEV;
-  };
-  if (((void *)node__3LHB == (void *)NULL)) {
-    if ((Self__TLHB->capacity__0HT == Self__TLHB->count__IHY)) {
-      idx__VP0B= 0;
-      node1__YP0B=NULL;
-      node2__ZP0B=NULL;
-      new_capacity__WP0B=prime_number_ceiling__H41((__INTEGER)(Self__TLHB->capacity__0HT +  1));
-      old_buckets__XP0B=Self__TLHB->buckets__5DV;
-      Self__TLHB->buckets__5DV=create__D23(new_capacity__WP0B);
-      i__UP0B=(__INTEGER)(Self__TLHB->capacity__0HT -  1);
-      Self__TLHB->capacity__0HT=new_capacity__WP0B;
-      while ((i__UP0B >=  0)) {
-        node1__YP0B=((void **)old_buckets__XP0B)[i__UP0B];
-        while (((void *)node1__YP0B != (void *)NULL)) {
-          node2__ZP0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__YP0B)->next__WEV;
-          Self__TZ3G=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__YP0B)->item__LEV);
-          result__SZ3G= 0;
-          __tmp__UZ3G=Self__TZ3G->count__DD;
-          Self__VZ3G= 1;
-          while ((Self__VZ3G <= __tmp__UZ3G)) {
-            result__SZ3G=(__INTEGER)((__INTEGER)( 5 * result__SZ3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__TZ3G->storage__FQO)[(__INTEGER)(Self__VZ3G -  1)])));
-            Self__VZ3G=(__INTEGER)(Self__VZ3G +  1);
-          };
-          if ((result__SZ3G <  0)) {
-            result__SZ3G=(__INTEGER)(~ result__SZ3G);
-          };
-          idx__VP0B=(__INTEGER)(result__SZ3G % Self__TLHB->capacity__0HT);
-          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__YP0B)->next__WEV=((void **)Self__TLHB->buckets__5DV)[idx__VP0B];
-          ((void **)Self__TLHB->buckets__5DV)[idx__VP0B]=node1__YP0B;
-          node1__YP0B=node2__ZP0B;
-        };
-        i__UP0B=(__INTEGER)(i__UP0B -  1);
-      };
-      idx__2LHB=(__INTEGER)(result__NZ3G % new_capacity__WP0B);
-    };
-    __tmp__MNHB=((void **)Self__TLHB->buckets__5DV)[idx__2LHB];
-    result__A3WB=NULL;
-    ptr__B3WB=((__POINTER )(NULL));
-    typ_id__G3WB= 0;
-    sz__D3WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
-    if ((sz__D3WB ==  0)) {
-      result__A3WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
-    } else {
-      typ_id__G3WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__D3WB);
-      if ((typ_id__G3WB == (__INTEGER)(-  1))) {
-        a__2I2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__3I2G=(__UINTEGER_32)((__UINTEGER_32)(sz__D3WB + a__2I2G) & (__UINTEGER_32)(~ a__2I2G));
-        ptr_table__TQ5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3I2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__SQ5G=((__POINTER )(NULL));
-        result__UQ5G=((__POINTER *)ptr_table__TQ5G)[ 0];
-        if ((result__UQ5G == (void *)NULL)) {
-          result__UQ5G=new_lab__2QJ(new_size__3I2G);
-          next__SQ5G=(void *)((unsigned long)result__UQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3I2G)));
-          ((__POINTER *)next__SQ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TQ5G)[ 0]=next__SQ5G;
-        } else {
-          next__SQ5G=((__POINTER *)result__UQ5G)[ 0];
-          if ((next__SQ5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UQ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__3I2G <<  1)) <=  4096)) {
-              next__SQ5G=(void *)((unsigned long)result__UQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3I2G)));
+  __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)));
             } else {
-              next__SQ5G=new_lab__2QJ(new_size__3I2G);
-            };
-            ((__POINTER *)next__SQ5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TQ5G)[ 0]=next__SQ5G;
-          } else {
-            ((__POINTER *)result__UQ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SQ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UQ5G=next__SQ5G;
-          };
-        };
-        ptr__B3WB=result__UQ5G;
-      } else {
-        t__BJ2G=((__UINTEGER_32 )typ_id__G3WB);
-        a__AJ2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__1Q5G=(__UINTEGER_32)((__UINTEGER_32)(sz__D3WB + a__AJ2G) & (__UINTEGER_32)(~ a__AJ2G));
-        ptr_table__YQ5G=((__POINTER )(&(table_type[(t__BJ2G)])));
-        lab_type__0Q5G=(__UINTEGER_32)(t__BJ2G |  1);
-        next__XQ5G=((__POINTER )(NULL));
-        result__ZQ5G=((__POINTER *)ptr_table__YQ5G)[ 0];
-        if ((result__ZQ5G == (void *)NULL)) {
-          result__ZQ5G=new_lab__2QJ(lab_type__0Q5G);
-          next__XQ5G=(void *)((unsigned long)result__ZQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1Q5G)));
-          ((__POINTER *)next__XQ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YQ5G)[ 0]=next__XQ5G;
-        } else {
-          next__XQ5G=((__POINTER *)result__ZQ5G)[ 0];
-          if ((next__XQ5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZQ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1Q5G <<  1)) <=  4096)) {
-              next__XQ5G=(void *)((unsigned long)result__ZQ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1Q5G)));
+              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)));
             } else {
-              next__XQ5G=new_lab__2QJ(lab_type__0Q5G);
+              next__GVBH=new_lab__ARJ(lab_type__JVBH);
             };
-            ((__POINTER *)next__XQ5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YQ5G)[ 0]=next__XQ5G;
+            ((__POINTER *)next__GVBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HVBH)[ 0]=next__GVBH;
           } else {
-            ((__POINTER *)result__ZQ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__XQ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZQ5G=next__XQ5G;
+            ((__POINTER *)result__IVBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IVBH=next__GVBH;
           };
         };
-        ptr__B3WB=result__ZQ5G;
+        ptr__F3WB=result__IVBH;
       };
-      result__A3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__B3WB);
-      *(result__A3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+      result__E3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__F3WB);
+      *(result__E3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
     };
-    Self__CLFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__A3WB);
-    Self__CLFC->item__LEV=e__ULHB;
-    Self__CLFC->next__WEV=__tmp__MNHB;
-    node__3LHB=result__A3WB;
-    ((void **)Self__TLHB->buckets__5DV)[idx__2LHB]=result__A3WB;
-    Self__TLHB->count__IHY=(__INTEGER)(Self__TLHB->count__IHY +  1);
+    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);
   };
 }
 
-static void add_last__BBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__CBPD,void *element__DBPD)
+static void add_last__FBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__GBPD,void *element__HBPD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__EBPD,__tmp__LCPD,__tmp__ROVE,Self__TYNF;
-  __BOOLEAN __tmp__TBPD;
-  void **__tmp__KCPD,**new__3NVE;
-  new_capacity__EBPD= 0;
-  if (((__INTEGER)(Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD +  1) <= (__INTEGER)(Self__CBPD->parent_arrayed_collection__X4I.capacity__GBPD -  1))) {
-    Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD=(__INTEGER)(Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD +  1);
-    __tmp__TBPD=TRUE__;
+  __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__;
   } else {
-    __tmp__TBPD=FALSE__;
-  };
-  if ((! __tmp__TBPD)) {
-    if ((Self__CBPD->parent_arrayed_collection__X4I.capacity__GBPD ==  0)) {
-      Self__CBPD->parent_arrayed_collection__X4I.storage__BCPD=create__4XGE( 2);
-      Self__CBPD->parent_arrayed_collection__X4I.capacity__GBPD= 2;
-      Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD= 0;
-    } else {
-      new_capacity__EBPD=(__INTEGER)(Self__CBPD->parent_arrayed_collection__X4I.capacity__GBPD <<  1);
-      __tmp__KCPD=Self__CBPD->parent_arrayed_collection__X4I.storage__BCPD;
-      __tmp__LCPD=Self__CBPD->parent_arrayed_collection__X4I.capacity__GBPD;
-      new__3NVE=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__KCPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__LCPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EBPD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ROVE=(__INTEGER)(new_capacity__EBPD -  1);
-      Self__TYNF=__tmp__LCPD;
-      while ((Self__TYNF <= __tmp__ROVE)) {
-        new__3NVE[Self__TYNF]=NULL;
-        Self__TYNF=(__INTEGER)(Self__TYNF +  1);
-      };
-      Self__CBPD->parent_arrayed_collection__X4I.storage__BCPD=new__3NVE;
-      Self__CBPD->parent_arrayed_collection__X4I.capacity__GBPD=new_capacity__EBPD;
-      Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD=(__INTEGER)(Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD +  1);
-    };
-  };
-  ((void **)Self__CBPD->parent_arrayed_collection__X4I.storage__BCPD)[Self__CBPD->parent_arrayed_collection__X4I.upper__L5OD]=element__DBPD;
+    __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;
 }
 
-static void free__KS5(void *tmp__MS5)
+static void free__OS5(void *tmp__QS5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__EGGB,__tmp__IHGB,__tmp__ZGGC,Self__P3VD;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__CGGB;
-  __BOOLEAN __tmp__SGGB;
-  void **__tmp__HHGB,**new__FGGC;
-  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__MS5)->parent_arrayed_collection__X4I.upper__L5OD=(__INTEGER)(-  1);
-  Self__CGGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__04K);
-  new_capacity__EGGB= 0;
-  if (((__INTEGER)(Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU +  1) <= (__INTEGER)(Self__CGGB->parent_arrayed_collection__Z4K.capacity__PUU -  1))) {
-    Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU=(__INTEGER)(Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU +  1);
-    __tmp__SGGB=TRUE__;
+  __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__;
   } else {
-    __tmp__SGGB=FALSE__;
-  };
-  if ((! __tmp__SGGB)) {
-    if ((Self__CGGB->parent_arrayed_collection__Z4K.capacity__PUU ==  0)) {
-      Self__CGGB->parent_arrayed_collection__Z4K.storage__0UU=create__P3ZB( 2);
-      Self__CGGB->parent_arrayed_collection__Z4K.capacity__PUU= 2;
-      Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU= 0;
-    } else {
-      new_capacity__EGGB=(__INTEGER)(Self__CGGB->parent_arrayed_collection__Z4K.capacity__PUU <<  1);
-      __tmp__HHGB=Self__CGGB->parent_arrayed_collection__Z4K.storage__0UU;
-      __tmp__IHGB=Self__CGGB->parent_arrayed_collection__Z4K.capacity__PUU;
-      new__FGGC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__HHGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__IHGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EGGB * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ZGGC=(__INTEGER)(new_capacity__EGGB -  1);
-      Self__P3VD=__tmp__IHGB;
-      while ((Self__P3VD <= __tmp__ZGGC)) {
-        new__FGGC[Self__P3VD]=NULL;
-        Self__P3VD=(__INTEGER)(Self__P3VD +  1);
-      };
-      Self__CGGB->parent_arrayed_collection__Z4K.storage__0UU=new__FGGC;
-      Self__CGGB->parent_arrayed_collection__Z4K.capacity__PUU=new_capacity__EGGB;
-      Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU=(__INTEGER)(Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU +  1);
-    };
-  };
-  ((void **)Self__CGGB->parent_arrayed_collection__Z4K.storage__0UU)[Self__CGGB->parent_arrayed_collection__Z4K.upper__KSU]=tmp__MS5;
+    __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;
 }
 
-static void free__MMQ(void *tmp__OMQ)
+static void free__QMQ(void *tmp__SMQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__OYV,__tmp__VZV,__tmp__VJEC,Self__EMVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__MYV;
-  __BOOLEAN __tmp__3YV;
-  void **__tmp__UZV,**new__BJEC;
-  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__OMQ)->parent_arrayed_collection__JXC.upper__0HV=(__INTEGER)(-  1);
-  Self__MYV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-  new_capacity__OYV= 0;
-  if (((__INTEGER)(Self__MYV->parent_arrayed_collection__ZTP.upper__VUV +  1) <= (__INTEGER)(Self__MYV->parent_arrayed_collection__ZTP.capacity__QYV -  1))) {
-    Self__MYV->parent_arrayed_collection__ZTP.upper__VUV=(__INTEGER)(Self__MYV->parent_arrayed_collection__ZTP.upper__VUV +  1);
-    __tmp__3YV=TRUE__;
+  __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__;
   } else {
-    __tmp__3YV=FALSE__;
-  };
-  if ((! __tmp__3YV)) {
-    if ((Self__MYV->parent_arrayed_collection__ZTP.capacity__QYV ==  0)) {
-      Self__MYV->parent_arrayed_collection__ZTP.storage__LZV=create__2IRB( 2);
-      Self__MYV->parent_arrayed_collection__ZTP.capacity__QYV= 2;
-      Self__MYV->parent_arrayed_collection__ZTP.upper__VUV= 0;
-    } else {
-      new_capacity__OYV=(__INTEGER)(Self__MYV->parent_arrayed_collection__ZTP.capacity__QYV <<  1);
-      __tmp__UZV=Self__MYV->parent_arrayed_collection__ZTP.storage__LZV;
-      __tmp__VZV=Self__MYV->parent_arrayed_collection__ZTP.capacity__QYV;
-      new__BJEC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__UZV)),((__UINTEGER_32 )(__INTEGER)(__tmp__VZV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OYV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__VJEC=(__INTEGER)(new_capacity__OYV -  1);
-      Self__EMVD=__tmp__VZV;
-      while ((Self__EMVD <= __tmp__VJEC)) {
-        new__BJEC[Self__EMVD]=NULL;
-        Self__EMVD=(__INTEGER)(Self__EMVD +  1);
-      };
-      Self__MYV->parent_arrayed_collection__ZTP.storage__LZV=new__BJEC;
-      Self__MYV->parent_arrayed_collection__ZTP.capacity__QYV=new_capacity__OYV;
-      Self__MYV->parent_arrayed_collection__ZTP.upper__VUV=(__INTEGER)(Self__MYV->parent_arrayed_collection__ZTP.upper__VUV +  1);
-    };
-  };
-  ((void **)Self__MYV->parent_arrayed_collection__ZTP.storage__LZV)[Self__MYV->parent_arrayed_collection__ZTP.upper__VUV]=tmp__OMQ;
+    __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;
 }
 
-static __INTEGER hash_code__XMOF(__FAST_ARRAYoSTRING_CONSTANTo *Self__YMOF)
+static __INTEGER hash_code__WCQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__XCQF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__0MOF,result__XZ3G,__tmp__ZZ3G,Self__0Z3G;
-  __INTEGER result__2Z3G,__tmp__4Z3G,Self__5Z3G;
-  __STRING_CONSTANT *Self__YZ3G,*Self__3Z3G;
-  __BOOLEAN __tmp__LNOF;
-  result__0MOF= 0;
-  if ((! (Self__YMOF->parent_arrayed_collection__X4I.upper__L5OD <  0))) {
-    if (((void *)((void **)Self__YMOF->parent_arrayed_collection__X4I.storage__BCPD)[Self__YMOF->parent_arrayed_collection__X4I.upper__L5OD] != (void *)NULL)) {
-      Self__YZ3G=((__STRING_CONSTANT *)((void **)Self__YMOF->parent_arrayed_collection__X4I.storage__BCPD)[Self__YMOF->parent_arrayed_collection__X4I.upper__L5OD]);
-      result__XZ3G= 0;
-      __tmp__ZZ3G=Self__YZ3G->count__DD;
-      Self__0Z3G= 1;
-      while ((Self__0Z3G <= __tmp__ZZ3G)) {
-        result__XZ3G=(__INTEGER)((__INTEGER)( 5 * result__XZ3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YZ3G->storage__FQO)[(__INTEGER)(Self__0Z3G -  1)])));
-        Self__0Z3G=(__INTEGER)(Self__0Z3G +  1);
-      };
-      if ((result__XZ3G <  0)) {
-        result__XZ3G=(__INTEGER)(~ result__XZ3G);
-      };
-      result__0MOF=result__XZ3G;
-      __tmp__LNOF=TRUE__;
-    } else {
-      __tmp__LNOF=FALSE__;
-    };
-    if ((! __tmp__LNOF)) {
-      if (((void *)((void **)Self__YMOF->parent_arrayed_collection__X4I.storage__BCPD)[ 0] != (void *)NULL)) {
-        Self__3Z3G=((__STRING_CONSTANT *)((void **)Self__YMOF->parent_arrayed_collection__X4I.storage__BCPD)[ 0]);
-        result__2Z3G= 0;
-        __tmp__4Z3G=Self__3Z3G->count__DD;
-        Self__5Z3G= 1;
-        while ((Self__5Z3G <= __tmp__4Z3G)) {
-          result__2Z3G=(__INTEGER)((__INTEGER)( 5 * result__2Z3G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3Z3G->storage__FQO)[(__INTEGER)(Self__5Z3G -  1)])));
-          Self__5Z3G=(__INTEGER)(Self__5Z3G +  1);
-        };
-        if ((result__2Z3G <  0)) {
-          result__2Z3G=(__INTEGER)(~ result__2Z3G);
-        };
-        result__0MOF=result__2Z3G;
-      };
-    };
-  };
-  return(result__0MOF);
+  __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);
 }
 
-static void copy__M2RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__N2RD,void *other__O2RD)
+static void copy__Q2RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__R2RD,void *other__S2RD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__Q2RD,other_upper__P2RD,Self__1AXE;
-  void **__tmp__D3RD,**__tmp__F3RD,**Self__LGVE;
-  new_capacity__Q2RD= 0;
-  other_upper__P2RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__O2RD)->parent_arrayed_collection__X4I.upper__L5OD;
-  if ((other_upper__P2RD >=  0)) {
-    new_capacity__Q2RD=(__INTEGER)(other_upper__P2RD +  1);
-    if ((Self__N2RD->parent_arrayed_collection__X4I.capacity__GBPD < new_capacity__Q2RD)) {
-      Self__N2RD->parent_arrayed_collection__X4I.storage__BCPD=create__4XGE(new_capacity__Q2RD);
-      Self__N2RD->parent_arrayed_collection__X4I.capacity__GBPD=new_capacity__Q2RD;
-    };
-    __tmp__D3RD=Self__N2RD->parent_arrayed_collection__X4I.storage__BCPD;
-    __tmp__F3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__O2RD)->parent_arrayed_collection__X4I.storage__BCPD;
-    Self__LGVE=((void **)__tmp__D3RD);
-    Self__1AXE=other_upper__P2RD;
-    while ((Self__1AXE >=  0)) {
-      Self__LGVE[Self__1AXE]=((void **)__tmp__F3RD)[Self__1AXE];
-      Self__1AXE=(__INTEGER)(Self__1AXE -  1);
-    };
-  };
-  Self__N2RD->parent_arrayed_collection__X4I.upper__L5OD=other_upper__P2RD;
+  __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;
 }
 
-static __BOOLEAN read_operator__XMM()
+static __BOOLEAN read_operator__1MM()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER old_pos__1MM,__tmp__JQO,i__D4O;
-  __POSITION pos__3BQG;
-  __BOOLEAN result__0MM,__tmp__WNM;
-  __CHARACTER result__GGXG,result__HGXG,ch__DQO,result__IGXG;
-  __CHARACTER *__tmp__GQO,*Self__X3O;
-  result__0MM=FALSE__;
-  read_space__NRD();
-  old_pos__1MM=position__CBC;
-  ((__STRING *)string_tmp__VH)->count__GFC= 0;
-  until_do__LYM:
+  __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:
   {
-    result__GGXG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__GGXG=((__CHARACTER )(( 0)));
+    result__MFZG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__MFZG=((__CHARACTER )(( 0)));
     } else {
-      result__GGXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__MFZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__GGXG == ((__CHARACTER )(( 0))))) {
-      __tmp__WNM=TRUE__;
+    if ((result__MFZG == ((__CHARACTER )(( 0))))) {
+      __tmp__0NM=TRUE__;
     } else {
-      result__HGXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__HGXG=((__CHARACTER )(( 0)));
+      result__NFZG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__NFZG=((__CHARACTER )(( 0)));
       } else {
-        result__HGXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__NFZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      ch__DQO=result__HGXG;
-      __tmp__GQO=((__STRING_CONSTANT *)(&__string_296))->storage__FQO;
-      __tmp__JQO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_296))->count__DD -  1);
-      Self__X3O=((__CHARACTER *)__tmp__GQO);
-      i__D4O=__tmp__JQO;
-      while ((! ((i__D4O <  0) || (ch__DQO == Self__X3O[i__D4O])))) {
-        i__D4O=(__INTEGER)(i__D4O -  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);
       };
-      __tmp__WNM=(i__D4O <  0);
+      __tmp__0NM=(i__H4O <  0);
     };
-    if ((! __tmp__WNM)) {
-      result__IGXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__IGXG=((__CHARACTER )(( 0)));
+    if ((! __tmp__0NM)) {
+      result__OFZG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__OFZG=((__CHARACTER )(( 0)));
       } else {
-        result__IGXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__OFZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      add_last__JLT(string_tmp__VH,result__IGXG);
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      goto until_do__LYM;
+      add_last__NLT(string_tmp__VH,result__OFZG);
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      goto until_do__PYM;
     };
   };
-  if ((((__STRING *)string_tmp__VH)->count__GFC !=  0)) {
-    last_string__YZC=get__YVB(string_tmp__VH);
-    if (((((void *)last_string__YZC == (void *)(&__string_12)) || ((void *)last_string__YZC == (void *)(&__string_14))) || ((void *)last_string__YZC == (void *)(&__string_13)))) {
-      pos__3BQG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_268));
-      put_position__EOG(pos__3BQG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
-    short__token__to__1AD((&__string_124),old_pos__1MM,position__CBC);
-    result__0MM=TRUE__;
+    short__token__to__5AD((&__string_124),old_pos__5MM,position__GBC);
+    result__4MM=TRUE__;
   };
-  return(result__0MM);
+  return(result__4MM);
 }
 
-static void* operator__name__NDO(void *typ__PDO,void *op__QDO)
+static void* operator__name__RDO(void *typ__TDO,void *op__UDO)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__XDO,Self__4VO;
-  __CHARACTER c__SDO;
-  __BOOLEAN __tmp__FEO,__tmp__SEO,result__TPHB,__tmp__5EO,result__FQHB;
-  __BOOLEAN __tmp__MFO,result__XQHB,__tmp__ZFO,result__JRHB,__tmp__GGO;
-  __BOOLEAN result__1RHB,__tmp__TGO,result__NSHB,__tmp__AHO;
-  __BOOLEAN result__5SHB,__tmp__NHO,result__RTHB,__tmp__0HO;
-  __BOOLEAN result__DUHB,__tmp__HIO,result__VUHB,__tmp__UIO;
-  __BOOLEAN result__HVHB,__tmp__BJO,result__ZVHB,__tmp__OJO;
-  __BOOLEAN result__LWHB,__tmp__1JO,result__3WHB,__tmp__IKO;
-  __BOOLEAN result__PXHB,__tmp__VKO,result__BYHB;
-  c__SDO='\0';
-  copy__JCS(string_tmp__VH,typ__PDO);
-  __tmp__XDO=((__STRING_CONSTANT *)op__QDO)->count__DD;
-  Self__4VO= 1;
-  while ((Self__4VO <= __tmp__XDO)) {
-    c__SDO=((__CHARACTER *)((__STRING_CONSTANT *)op__QDO)->storage__FQO)[(__INTEGER)(Self__4VO -  1)];
-    if ((c__SDO == '+')) {
-      append__RNS(string_tmp__VH,(&__string_173));
-      __tmp__FEO=TRUE__;
+  __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__;
     } else {
-      __tmp__FEO=FALSE__;
+      __tmp__JEO=FALSE__;
     };
-    if (__tmp__FEO) {
-      __tmp__SEO=TRUE__;
+    if (__tmp__JEO) {
+      __tmp__WEO=TRUE__;
     } else {
-      result__TPHB=(c__SDO == '-');
-      if (result__TPHB) {
-        append__RNS(string_tmp__VH,(&__string_174));
+      result__XPHB=(c__WDO == '-');
+      if (result__XPHB) {
+        append__VNS(string_tmp__VH,(&__string_176));
       };
-      __tmp__SEO=result__TPHB;
+      __tmp__WEO=result__XPHB;
     };
-    if (__tmp__SEO) {
-      __tmp__5EO=TRUE__;
+    if (__tmp__WEO) {
+      __tmp__DFO=TRUE__;
     } else {
-      result__FQHB=(c__SDO == '~');
-      if (result__FQHB) {
-        append__RNS(string_tmp__VH,(&__string_175));
+      result__JQHB=(c__WDO == '~');
+      if (result__JQHB) {
+        append__VNS(string_tmp__VH,(&__string_177));
       };
-      __tmp__5EO=result__FQHB;
+      __tmp__DFO=result__JQHB;
     };
-    if (__tmp__5EO) {
-      __tmp__MFO=TRUE__;
+    if (__tmp__DFO) {
+      __tmp__QFO=TRUE__;
     } else {
-      result__XQHB=(c__SDO == '!');
-      if (result__XQHB) {
-        append__RNS(string_tmp__VH,(&__string_176));
+      result__1QHB=(c__WDO == '!');
+      if (result__1QHB) {
+        append__VNS(string_tmp__VH,(&__string_178));
       };
-      __tmp__MFO=result__XQHB;
+      __tmp__QFO=result__1QHB;
     };
-    if (__tmp__MFO) {
-      __tmp__ZFO=TRUE__;
+    if (__tmp__QFO) {
+      __tmp__3FO=TRUE__;
     } else {
-      result__JRHB=(c__SDO == '/');
-      if (result__JRHB) {
-        append__RNS(string_tmp__VH,(&__string_177));
+      result__NRHB=(c__WDO == '/');
+      if (result__NRHB) {
+        append__VNS(string_tmp__VH,(&__string_179));
       };
-      __tmp__ZFO=result__JRHB;
+      __tmp__3FO=result__NRHB;
     };
-    if (__tmp__ZFO) {
-      __tmp__GGO=TRUE__;
+    if (__tmp__3FO) {
+      __tmp__KGO=TRUE__;
     } else {
-      result__1RHB=(c__SDO == '*');
-      if (result__1RHB) {
-        append__RNS(string_tmp__VH,(&__string_178));
+      result__5RHB=(c__WDO == '*');
+      if (result__5RHB) {
+        append__VNS(string_tmp__VH,(&__string_180));
       };
-      __tmp__GGO=result__1RHB;
+      __tmp__KGO=result__5RHB;
     };
-    if (__tmp__GGO) {
-      __tmp__TGO=TRUE__;
+    if (__tmp__KGO) {
+      __tmp__XGO=TRUE__;
     } else {
-      result__NSHB=(c__SDO == '^');
-      if (result__NSHB) {
-        append__RNS(string_tmp__VH,(&__string_179));
+      result__RSHB=(c__WDO == '^');
+      if (result__RSHB) {
+        append__VNS(string_tmp__VH,(&__string_181));
       };
-      __tmp__TGO=result__NSHB;
+      __tmp__XGO=result__RSHB;
     };
-    if (__tmp__TGO) {
-      __tmp__AHO=TRUE__;
+    if (__tmp__XGO) {
+      __tmp__EHO=TRUE__;
     } else {
-      result__5SHB=(c__SDO == '%');
-      if (result__5SHB) {
-        append__RNS(string_tmp__VH,(&__string_180));
+      result__DTHB=(c__WDO == '%');
+      if (result__DTHB) {
+        append__VNS(string_tmp__VH,(&__string_182));
       };
-      __tmp__AHO=result__5SHB;
+      __tmp__EHO=result__DTHB;
     };
-    if (__tmp__AHO) {
-      __tmp__NHO=TRUE__;
+    if (__tmp__EHO) {
+      __tmp__RHO=TRUE__;
     } else {
-      result__RTHB=(c__SDO == '>');
-      if (result__RTHB) {
-        append__RNS(string_tmp__VH,(&__string_181));
+      result__VTHB=(c__WDO == '>');
+      if (result__VTHB) {
+        append__VNS(string_tmp__VH,(&__string_183));
       };
-      __tmp__NHO=result__RTHB;
+      __tmp__RHO=result__VTHB;
     };
-    if (__tmp__NHO) {
-      __tmp__0HO=TRUE__;
+    if (__tmp__RHO) {
+      __tmp__4HO=TRUE__;
     } else {
-      result__DUHB=(c__SDO == '<');
-      if (result__DUHB) {
-        append__RNS(string_tmp__VH,(&__string_182));
+      result__HUHB=(c__WDO == '<');
+      if (result__HUHB) {
+        append__VNS(string_tmp__VH,(&__string_184));
       };
-      __tmp__0HO=result__DUHB;
+      __tmp__4HO=result__HUHB;
     };
-    if (__tmp__0HO) {
-      __tmp__HIO=TRUE__;
+    if (__tmp__4HO) {
+      __tmp__LIO=TRUE__;
     } else {
-      result__VUHB=(c__SDO == '=');
-      if (result__VUHB) {
-        append__RNS(string_tmp__VH,(&__string_183));
+      result__ZUHB=(c__WDO == '=');
+      if (result__ZUHB) {
+        append__VNS(string_tmp__VH,(&__string_185));
       };
-      __tmp__HIO=result__VUHB;
+      __tmp__LIO=result__ZUHB;
     };
-    if (__tmp__HIO) {
-      __tmp__UIO=TRUE__;
+    if (__tmp__LIO) {
+      __tmp__YIO=TRUE__;
     } else {
-      result__HVHB=(c__SDO == '\\');
-      if (result__HVHB) {
-        append__RNS(string_tmp__VH,(&__string_184));
+      result__LVHB=(c__WDO == '\\');
+      if (result__LVHB) {
+        append__VNS(string_tmp__VH,(&__string_186));
       };
-      __tmp__UIO=result__HVHB;
+      __tmp__YIO=result__LVHB;
     };
-    if (__tmp__UIO) {
-      __tmp__BJO=TRUE__;
+    if (__tmp__YIO) {
+      __tmp__FJO=TRUE__;
     } else {
-      result__ZVHB=(c__SDO == '|');
-      if (result__ZVHB) {
-        append__RNS(string_tmp__VH,(&__string_185));
+      result__3VHB=(c__WDO == '|');
+      if (result__3VHB) {
+        append__VNS(string_tmp__VH,(&__string_187));
       };
-      __tmp__BJO=result__ZVHB;
+      __tmp__FJO=result__3VHB;
     };
-    if (__tmp__BJO) {
-      __tmp__OJO=TRUE__;
+    if (__tmp__FJO) {
+      __tmp__SJO=TRUE__;
     } else {
-      result__LWHB=(c__SDO == '&');
-      if (result__LWHB) {
-        append__RNS(string_tmp__VH,(&__string_186));
+      result__PWHB=(c__WDO == '&');
+      if (result__PWHB) {
+        append__VNS(string_tmp__VH,(&__string_188));
       };
-      __tmp__OJO=result__LWHB;
+      __tmp__SJO=result__PWHB;
     };
-    if (__tmp__OJO) {
-      __tmp__1JO=TRUE__;
+    if (__tmp__SJO) {
+      __tmp__5JO=TRUE__;
     } else {
-      result__3WHB=(c__SDO == '$');
-      if (result__3WHB) {
-        append__RNS(string_tmp__VH,(&__string_187));
+      result__BXHB=(c__WDO == '$');
+      if (result__BXHB) {
+        append__VNS(string_tmp__VH,(&__string_189));
       };
-      __tmp__1JO=result__3WHB;
+      __tmp__5JO=result__BXHB;
     };
-    if (__tmp__1JO) {
-      __tmp__IKO=TRUE__;
+    if (__tmp__5JO) {
+      __tmp__MKO=TRUE__;
     } else {
-      result__PXHB=(c__SDO == '#');
-      if (result__PXHB) {
-        append__RNS(string_tmp__VH,(&__string_188));
+      result__TXHB=(c__WDO == '#');
+      if (result__TXHB) {
+        append__VNS(string_tmp__VH,(&__string_190));
       };
-      __tmp__IKO=result__PXHB;
+      __tmp__MKO=result__TXHB;
     };
-    if (__tmp__IKO) {
-      __tmp__VKO=TRUE__;
+    if (__tmp__MKO) {
+      __tmp__ZKO=TRUE__;
     } else {
-      result__BYHB=(c__SDO == '@');
-      if (result__BYHB) {
-        append__RNS(string_tmp__VH,(&__string_189));
+      result__FYHB=(c__WDO == '@');
+      if (result__FYHB) {
+        append__VNS(string_tmp__VH,(&__string_191));
       };
-      __tmp__VKO=result__BYHB;
+      __tmp__ZKO=result__FYHB;
     };
-    if ((! __tmp__VKO)) {
-      if ((c__SDO == '?')) {
-        append__RNS(string_tmp__VH,(&__string_190));
+    if ((! __tmp__ZKO)) {
+      if ((c__WDO == '?')) {
+        append__VNS(string_tmp__VH,(&__string_192));
       };
     };
-    Self__4VO=(__INTEGER)(Self__4VO +  1);
+    Self__CWO=(__INTEGER)(Self__CWO +  1);
   };
-  return(get__YVB(string_tmp__VH));
+  return(get__2VB(string_tmp__VH));
 }
 
-static void append_in__CIBC(__ITM_TYPE_MULTI *Self__DIBC,void *buffer__EIBC)
+static void append_in__GIBC(__ITM_TYPE_MULTI *Self__HIBC,void *buffer__IIBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__JLT(buffer__EIBC,'(');
-  display_row__DLIC(Self__DIBC,buffer__EIBC);
-  add_last__JLT(buffer__EIBC,')');
+  add_last__NLT(buffer__IIBC,'(');
+  display_raw__HLIC(Self__HIBC,buffer__IIBC);
+  add_last__NLT(buffer__IIBC,')');
 }
 
-static void append_in__4FPD(__ITM_TYPE_BLOCK *Self__5FPD,void *buffer__AGPD)
+static void append_in__CGPD(__ITM_TYPE_BLOCK *Self__DGPD,void *buffer__EGPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *typ_mul__BGPD,*__tmp__TGPD;
-  void *__tmp__IGPD,*__tmp__SGPD,*__tmp__ZGPD;
-  __ITM_TYPE_STYLE *Self__EK2G,*Self__GK2G;
-  typ_mul__BGPD=NULL;
-  add_last__JLT(buffer__AGPD,'{');
-  if (((void *)Self__5FPD->type_argument__GMN != (void *)NULL)) {
-    __tmp__IGPD=Self__5FPD->type_argument__GMN;
-    switch (((struct ___OBJ *)__tmp__IGPD)->__id) {
+  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) {
     case __ITM_TYPE_PARAMETER__: {
-      append__RNS(buffer__AGPD,((__ITM_TYPE_PARAMETER *)__tmp__IGPD)->parent_itm_type__NDE.name__0XP);
+      append__VNS(buffer__EGPD,((__ITM_TYPE_PARAMETER *)__tmp__MGPD)->parent_itm_type__RDE.name__4XP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__RNS(buffer__AGPD,((__ITM_TYPE_SIMPLE *)__tmp__IGPD)->name__0XP);
+      append__VNS(buffer__EGPD,((__ITM_TYPE_SIMPLE *)__tmp__MGPD)->name__4XP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__CIBC(__tmp__IGPD,buffer__AGPD);
+      append_in__GIBC(__tmp__MGPD,buffer__EGPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__4FPD(__tmp__IGPD,buffer__AGPD);
+      append_in__CGPD(__tmp__MGPD,buffer__EGPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__CHPD(__tmp__IGPD,buffer__AGPD);
+      append_in__GHPD(__tmp__MGPD,buffer__EGPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__EK2G=((__ITM_TYPE_STYLE *)__tmp__IGPD);
-      if (((void *)Self__EK2G->style__DYP != (void *)NULL)) {
-        append__RNS(buffer__AGPD,Self__EK2G->style__DYP);
-        add_last__JLT(buffer__AGPD,' ');
+      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,' ');
       };
-      append__RNS(buffer__AGPD,Self__EK2G->parent_itm_type_simple__RRN.name__0XP);
+      append__VNS(buffer__EGPD,Self__CN4G->parent_itm_type_simple__VRN.name__4XP);
     } break;
     };
-    add_last__JLT(buffer__AGPD,';');
-    add_last__JLT(buffer__AGPD,' ');
+    add_last__NLT(buffer__EGPD,';');
+    add_last__NLT(buffer__EGPD,' ');
   };
-  if (((void *)Self__5FPD->type_result__QMN != (void *)NULL)) {
-    __tmp__SGPD=Self__5FPD->type_result__QMN;
-    if (__tmp__SGPD==NULL) {
-      __tmp__TGPD=NULL;
+  if (((void *)Self__DGPD->type_result__UMN != (void *)NULL)) {
+    __tmp__WGPD=Self__DGPD->type_result__UMN;
+    if (__tmp__WGPD==NULL) {
+      __tmp__XGPD=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__SGPD)->__id) {
+      switch (((struct ___OBJ *)__tmp__WGPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__TGPD=NULL;
+        __tmp__XGPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__TGPD=NULL;
+        __tmp__XGPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__TGPD=((void *)__tmp__SGPD);
+        __tmp__XGPD=((void *)__tmp__WGPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__TGPD=NULL;
+        __tmp__XGPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__TGPD=NULL;
+        __tmp__XGPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__TGPD=NULL;
+        __tmp__XGPD=NULL;
       } break;
       }
     };
-    typ_mul__BGPD=__tmp__TGPD;
-    if (((void *)__tmp__TGPD == (void *)NULL)) {
-      __tmp__ZGPD=Self__5FPD->type_result__QMN;
-      switch (((struct ___OBJ *)__tmp__ZGPD)->__id) {
+    typ_mul__FGPD=__tmp__XGPD;
+    if (((void *)__tmp__XGPD == (void *)NULL)) {
+      __tmp__3GPD=Self__DGPD->type_result__UMN;
+      switch (((struct ___OBJ *)__tmp__3GPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__RNS(buffer__AGPD,((__ITM_TYPE_PARAMETER *)__tmp__ZGPD)->parent_itm_type__NDE.name__0XP);
+        append__VNS(buffer__EGPD,((__ITM_TYPE_PARAMETER *)__tmp__3GPD)->parent_itm_type__RDE.name__4XP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__RNS(buffer__AGPD,((__ITM_TYPE_SIMPLE *)__tmp__ZGPD)->name__0XP);
+        append__VNS(buffer__EGPD,((__ITM_TYPE_SIMPLE *)__tmp__3GPD)->name__4XP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__CIBC(__tmp__ZGPD,buffer__AGPD);
+        append_in__GIBC(__tmp__3GPD,buffer__EGPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__4FPD(__tmp__ZGPD,buffer__AGPD);
+        append_in__CGPD(__tmp__3GPD,buffer__EGPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__CHPD(__tmp__ZGPD,buffer__AGPD);
+        append_in__GHPD(__tmp__3GPD,buffer__EGPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__GK2G=((__ITM_TYPE_STYLE *)__tmp__ZGPD);
-        if (((void *)Self__GK2G->style__DYP != (void *)NULL)) {
-          append__RNS(buffer__AGPD,Self__GK2G->style__DYP);
-          add_last__JLT(buffer__AGPD,' ');
+        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,' ');
         };
-        append__RNS(buffer__AGPD,Self__GK2G->parent_itm_type_simple__RRN.name__0XP);
+        append__VNS(buffer__EGPD,Self__EN4G->parent_itm_type_simple__VRN.name__4XP);
       } break;
       };
     } else {
-      display_row__DLIC(__tmp__TGPD,buffer__AGPD);
+      display_raw__HLIC(__tmp__XGPD,buffer__EGPD);
     };
   };
-  add_last__JLT(buffer__AGPD,'}');
+  add_last__NLT(buffer__EGPD,'}');
 }
 
-static void append_in__CHPD(__ITM_TYPE_GENERIC *Self__DHPD,void *buffer__EHPD)
+static void append_in__GHPD(__ITM_TYPE_GENERIC *Self__HHPD,void *buffer__IHPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__VHPD,Self__WWUD;
-  void *__tmp__2HPD,*__tmp__5HPD;
-  __ITM_TYPE_STYLE *Self__NK2G,*Self__BIPD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__JK0G;
-  if (((void *)Self__DHPD->parent_itm_type_style__SRN.style__DYP != (void *)NULL)) {
-    append__RNS(buffer__EHPD,Self__DHPD->parent_itm_type_style__SRN.style__DYP);
-    add_last__JLT(buffer__EHPD,' ');
-  };
-  append__RNS(buffer__EHPD,Self__DHPD->parent_itm_type_style__SRN.parent_itm_type_simple__RRN.name__0XP);
-  add_last__JLT(buffer__EHPD,'(');
-  __tmp__VHPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__DHPD->list_type__NYP)->parent_arrayed_collection__JXC.upper__0HV -  1);
-  Self__WWUD= 0;
-  while ((Self__WWUD <= __tmp__VHPD)) {
-    __tmp__2HPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__DHPD->list_type__NYP)->parent_arrayed_collection__JXC.storage__BMV)[Self__WWUD];
-    switch (((struct ___OBJ *)__tmp__2HPD)->__id) {
+  __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) {
     case __ITM_TYPE_PARAMETER__: {
-      append__RNS(buffer__EHPD,((__ITM_TYPE_PARAMETER *)__tmp__2HPD)->parent_itm_type__NDE.name__0XP);
+      append__VNS(buffer__IHPD,((__ITM_TYPE_PARAMETER *)__tmp__AIPD)->parent_itm_type__RDE.name__4XP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__RNS(buffer__EHPD,((__ITM_TYPE_SIMPLE *)__tmp__2HPD)->name__0XP);
+      append__VNS(buffer__IHPD,((__ITM_TYPE_SIMPLE *)__tmp__AIPD)->name__4XP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__4FPD(__tmp__2HPD,buffer__EHPD);
+      append_in__CGPD(__tmp__AIPD,buffer__IHPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__CHPD(__tmp__2HPD,buffer__EHPD);
+      append_in__GHPD(__tmp__AIPD,buffer__IHPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__NK2G=((__ITM_TYPE_STYLE *)__tmp__2HPD);
-      if (((void *)Self__NK2G->style__DYP != (void *)NULL)) {
-        append__RNS(buffer__EHPD,Self__NK2G->style__DYP);
-        add_last__JLT(buffer__EHPD,' ');
+      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,' ');
       };
-      append__RNS(buffer__EHPD,Self__NK2G->parent_itm_type_simple__RRN.name__0XP);
+      append__VNS(buffer__IHPD,Self__MN4G->parent_itm_type_simple__VRN.name__4XP);
     } break;
     };
-    add_last__JLT(buffer__EHPD,',');
-    Self__WWUD=(__INTEGER)(Self__WWUD +  1);
+    add_last__NLT(buffer__IHPD,',');
+    Self__DXUD=(__INTEGER)(Self__DXUD +  1);
   };
-  Self__JK0G=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__DHPD->list_type__NYP);
-  __tmp__5HPD=((void **)Self__JK0G->parent_arrayed_collection__JXC.storage__BMV)[Self__JK0G->parent_arrayed_collection__JXC.upper__0HV];
-  switch (((struct ___OBJ *)__tmp__5HPD)->__id) {
+  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) {
   case __ITM_TYPE_PARAMETER__: {
-    append__RNS(buffer__EHPD,((__ITM_TYPE_PARAMETER *)__tmp__5HPD)->parent_itm_type__NDE.name__0XP);
+    append__VNS(buffer__IHPD,((__ITM_TYPE_PARAMETER *)__tmp__DIPD)->parent_itm_type__RDE.name__4XP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__RNS(buffer__EHPD,((__ITM_TYPE_SIMPLE *)__tmp__5HPD)->name__0XP);
+    append__VNS(buffer__IHPD,((__ITM_TYPE_SIMPLE *)__tmp__DIPD)->name__4XP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__4FPD(__tmp__5HPD,buffer__EHPD);
+    append_in__CGPD(__tmp__DIPD,buffer__IHPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__CHPD(__tmp__5HPD,buffer__EHPD);
+    append_in__GHPD(__tmp__DIPD,buffer__IHPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__BIPD=((__ITM_TYPE_STYLE *)__tmp__5HPD);
-    if (((void *)Self__BIPD->style__DYP != (void *)NULL)) {
-      append__RNS(buffer__EHPD,Self__BIPD->style__DYP);
-      add_last__JLT(buffer__EHPD,' ');
+    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,' ');
     };
-    append__RNS(buffer__EHPD,Self__BIPD->parent_itm_type_simple__RRN.name__0XP);
+    append__VNS(buffer__IHPD,Self__FIPD->parent_itm_type_simple__VRN.name__4XP);
   } break;
   };
-  add_last__JLT(buffer__EHPD,')');
+  add_last__NLT(buffer__IHPD,')');
 }
 
-static void* read_prototype__XNN(__PARSER *Self__YNN,void *styl__ZNN)
+static void* read_prototype__1NN(__PARSER *Self__2NN,void *styl__3NN)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *nam__1NN,*n__2WP,*n__MNR;
-  void *result__3NN,*result__4TQ;
-  __INTEGER old_pos__5NN,old_derive__AON,sav_derive__BON;
-  __INTEGER pos_before__CON,idx__BXP,typ_id__KOIB,new_capacity__XFBB;
-  __INTEGER __tmp__1GBB,__tmp__UOFC,Self__ZYVD,typ_id__D03G,idx__QNR;
-  __INTEGER typ_id__V5IB,new_capacity__4DCB,__tmp__CFCB,__tmp__QSFC;
-  __INTEGER Self__Y0VD;
-  __POSITION pos__DEQG,pos__FEQG,pos__HEQG,pos__JEQG,pos__IGQG;
-  __POSITION __tmp__SSN,__tmp__UTN;
-  __ITM_TYPE_GENERIC *result__AXP,*__tmp__JZP,*result__EOIB,*Self__T1CC;
-  void *__tmp__IZP;
-  __POINTER ptr__FOIB,ptr_table__GR5G,next__FR5G,result__HR5G;
-  __POINTER ptr_table__LR5G,next__KR5G,result__MR5G,ptr__C03G;
-  __POINTER ptr_table__TR5G,next__SR5G,result__UR5G,ptr_table__YR5G;
-  __POINTER next__XR5G,result__ZR5G,ptr__Q5IB,ptr_table__3R5G;
-  __POINTER next__2R5G,result__4R5G,ptr_table__CS5G,next__BS5G;
-  __POINTER result__DS5G;
-  __UINTEGER_32 sz__HOIB,a__QK2G,new_size__RK2G,t__VK2G,a__UK2G;
-  __UINTEGER_32 new_size__OR5G,lab_type__NR5G,sz__E03G,a__F03G;
-  __UINTEGER_32 new_size__G03G,t__H03G,a__I03G,new_size__1R5G;
-  __UINTEGER_32 lab_type__0R5G,sz__S5IB,a__4K2G,new_size__5K2G,t__DL2G;
-  __UINTEGER_32 a__CL2G,new_size__FS5G,lab_type__ES5G;
-  void *result__NK0G;
-  __ITM_TYPE_PARAMETER *result__B03G,*Self__J03G;
-  __ITM_TYPE_STYLE *result__PNR,*__tmp__LPR,*result__P5IB,*Self__F5CC;
-  void *__tmp__KPR;
-  void *genericity__2NN,*result__OI3G,*lt__4WP;
-  __BOOLEAN continue__DON,result__2Q5G,result__5Q5G,__tmp__QUQ;
-  __BOOLEAN result__CR5G,__tmp__FGBB,result__PR5G,__tmp__ZSN;
-  __BOOLEAN __tmp__MECB;
-  __CHARACTER result__3Q5G,result__AR5G,result__DR5G,result__QR5G;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__PI3G,*Self__QI3G;
-  __FAST_ARRAYoITM_TYPE_GENERICo *Self__VFBB;
-  void **__tmp__0GBB,**new__AOFC;
-  __FAST_ARRAYoITM_TYPE_STYLEo *Self__2DCB;
-  void **__tmp__BFCB,**new__2RFC;
-  nam__1NN=NULL;
-  genericity__2NN=NULL;
-  result__3NN=NULL;
-  old_pos__5NN= 0;
-  old_derive__AON= 0;
-  sav_derive__BON= 0;
-  pos_before__CON= 0;
-  continue__DON=FALSE__;
-  if (read_cap_identifier__CZJ()) {
-    old_pos__5NN=position__CBC;
-    old_derive__AON=short_derive__RBC;
-    copy__JCS(string_tmp2__R5I,last_string__YZC);
+  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);
     do {
-      continue__DON=read_word__APF((&__string_7));
-      if (continue__DON) {
-        if ((! read_cap_identifier__CZJ())) {
-          pos__DEQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_297));
-          put_position__EOG(pos__DEQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        append__RNS(string_tmp2__R5I,(&__string_7));
-        append__RNS(string_tmp2__R5I,last_string__YZC);
+        append__VNS(string_tmp2__V5I,(&__string_7));
+        append__VNS(string_tmp2__V5I,last_string__2ZC);
       } else {
-        pos_before__CON=position__CBC;
-        result__2Q5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__2Q5G=FALSE__;
+        pos_before__GON=position__GBC;
+        result__LVBH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__LVBH=FALSE__;
         } else {
-          result__3Q5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__3Q5G=((__CHARACTER )(( 0)));
+          result__MVBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__MVBH=((__CHARACTER )(( 0)));
           } else {
-            result__3Q5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__MVBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__3Q5G == '.')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__2Q5G=TRUE__;
+          if ((result__MVBH == '.')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__LVBH=TRUE__;
           };
         };
-        if ((result__2Q5G && read_cap_identifier__CZJ())) {
-          continue__DON=TRUE__;
-          add_last__JLT(string_tmp2__R5I,'.');
-          append__RNS(string_tmp2__R5I,last_string__YZC);
+        if ((result__LVBH && read_cap_identifier__GZJ())) {
+          continue__HON=TRUE__;
+          add_last__NLT(string_tmp2__V5I,'.');
+          append__VNS(string_tmp2__V5I,last_string__2ZC);
         } else {
-          position__CBC=pos_before__CON;
+          position__GBC=pos_before__GON;
         };
       };
-    } while (continue__DON);
-    nam__1NN=get__YVB(string_tmp2__R5I);
-    result__5Q5G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__5Q5G=FALSE__;
+    } while (continue__HON);
+    nam__5NN=get__2VB(string_tmp2__V5I);
+    result__OVBH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__OVBH=FALSE__;
     } else {
-      result__AR5G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__AR5G=((__CHARACTER )(( 0)));
+      result__PVBH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__PVBH=((__CHARACTER )(( 0)));
       } else {
-        result__AR5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__PVBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__AR5G == '(')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__5Q5G=TRUE__;
+      if ((result__PVBH == '(')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__OVBH=TRUE__;
       };
     };
-    if (result__5Q5G) {
-      result__OI3G=NULL;
-      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP)->parent_arrayed_collection__ZTP.upper__VUV <  0)) {
-        result__OI3G=create_with_capacity__YER( 16);
+    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);
       } else {
-        Self__PI3G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-        result__OI3G=((void **)Self__PI3G->parent_arrayed_collection__ZTP.storage__LZV)[Self__PI3G->parent_arrayed_collection__ZTP.upper__VUV];
-        Self__QI3G=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__0TP);
-        Self__QI3G->parent_arrayed_collection__ZTP.upper__VUV=(__INTEGER)(Self__QI3G->parent_arrayed_collection__ZTP.upper__VUV -  1);
+        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);
       };
-      genericity__2NN=result__OI3G;
+      genericity__AON=result__TL5G;
       do {
-        result__4TQ=read_type__TBM(Self__YNN,FALSE__);
-        if (((void *)result__4TQ == (void *)NULL)) {
-          if (((void *)read_constant__LQO() != (void *)NULL)) {
-            pos__FEQG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_298));
-            put_position__EOG(pos__FEQG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        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)) {
               exit(( 1));
             };
-            __tmp__QUQ=TRUE__;
+            __tmp__UUQ=TRUE__;
           } else {
-            __tmp__QUQ=FALSE__;
+            __tmp__UUQ=FALSE__;
           };
-          if ((! __tmp__QUQ)) {
-            if (read_identifier__15K()) {
-              pos__HEQG=current_position__ZWF();
-              put_error__text__0MG( 0,(&__string_299));
-              put_position__EOG(pos__HEQG);
-              put_string__E1F(msg_err__5MG);
-              if ((type_error__4MG !=  2)) {
+          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)) {
                 exit(( 1));
               };
             };
           };
         };
-        if (((void *)result__4TQ == (void *)NULL)) {
-          pos__JEQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_241));
-          put_position__EOG(pos__JEQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        add_last__KNV(genericity__2NN,result__4TQ);
-        result__CR5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__CR5G=FALSE__;
-        } else {
-          result__DR5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__DR5G=((__CHARACTER )(( 0)));
-          } else {
-            result__DR5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-          };
-          if ((result__DR5G == ',')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__CR5G=TRUE__;
-          };
-        };
-      } while (result__CR5G);
-      genericity__2NN=alias__WUP(result__OI3G);
-      n__2WP=nam__1NN;
-      lt__4WP=genericity__2NN;
-      result__AXP=NULL;
-      idx__BXP= 0;
-      while (((idx__BXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP)->parent_arrayed_collection__GXP.upper__QXP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP)->parent_arrayed_collection__GXP.storage__OBW)[idx__BXP])->parent_itm_type_style__SRN.parent_itm_type_simple__RRN.name__0XP != (void *)n__2WP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP)->parent_arrayed_collection__GXP.storage__OBW)[idx__BXP])->parent_itm_type_style__SRN.style__DYP != (void *)styl__ZNN)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP)->parent_arrayed_collection__GXP.storage__OBW)[idx__BXP])->list_type__NYP != (void *)lt__4WP)))) {
-        idx__BXP=(__INTEGER)(idx__BXP +  1);
-      };
-      if ((idx__BXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP)->parent_arrayed_collection__GXP.upper__QXP)) {
-        __tmp__IZP=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP)->parent_arrayed_collection__GXP.storage__OBW)[idx__BXP];
-        if (__tmp__IZP==NULL) {
-          __tmp__JZP=NULL;
-        } else {
-          __tmp__JZP=((__ITM_TYPE_GENERIC *)__tmp__IZP);
-        };
-        result__AXP=__tmp__JZP;
-      } else {
-        result__EOIB=NULL;
-        ptr__FOIB=((__POINTER )(NULL));
-        typ_id__KOIB= 0;
-        sz__HOIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
-        if ((sz__HOIB ==  0)) {
-          result__EOIB=ITM_TYPE_GENERIC__;
-        } else {
-          typ_id__KOIB=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__HOIB);
-          if ((typ_id__KOIB == (__INTEGER)(-  1))) {
-            a__QK2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__RK2G=(__UINTEGER_32)((__UINTEGER_32)(sz__HOIB + a__QK2G) & (__UINTEGER_32)(~ a__QK2G));
-            ptr_table__GR5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RK2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__FR5G=((__POINTER )(NULL));
-            result__HR5G=((__POINTER *)ptr_table__GR5G)[ 0];
-            if ((result__HR5G == (void *)NULL)) {
-              result__HR5G=new_lab__2QJ(new_size__RK2G);
-              next__FR5G=(void *)((unsigned long)result__HR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RK2G)));
-              ((__POINTER *)next__FR5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GR5G)[ 0]=next__FR5G;
+        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;
             } else {
-              next__FR5G=((__POINTER *)result__HR5G)[ 0];
-              if ((next__FR5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HR5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__RK2G <<  1)) <=  4096)) {
-                  next__FR5G=(void *)((unsigned long)result__HR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RK2G)));
+              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)));
                 } else {
-                  next__FR5G=new_lab__2QJ(new_size__RK2G);
+                  next__UVBH=new_lab__ARJ(new_size__QN4G);
                 };
-                ((__POINTER *)next__FR5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__GR5G)[ 0]=next__FR5G;
+                ((__POINTER *)next__UVBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VVBH)[ 0]=next__UVBH;
               } else {
-                ((__POINTER *)result__HR5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__FR5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__HR5G=next__FR5G;
+                ((__POINTER *)result__WVBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__WVBH=next__UVBH;
               };
             };
-            ptr__FOIB=result__HR5G;
-          } else {
-            t__VK2G=((__UINTEGER_32 )typ_id__KOIB);
-            a__UK2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__OR5G=(__UINTEGER_32)((__UINTEGER_32)(sz__HOIB + a__UK2G) & (__UINTEGER_32)(~ a__UK2G));
-            ptr_table__LR5G=((__POINTER )(&(table_type[(t__VK2G)])));
-            lab_type__NR5G=(__UINTEGER_32)(t__VK2G |  1);
-            next__KR5G=((__POINTER )(NULL));
-            result__MR5G=((__POINTER *)ptr_table__LR5G)[ 0];
-            if ((result__MR5G == (void *)NULL)) {
-              result__MR5G=new_lab__2QJ(lab_type__NR5G);
-              next__KR5G=(void *)((unsigned long)result__MR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OR5G)));
-              ((__POINTER *)next__KR5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LR5G)[ 0]=next__KR5G;
+            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;
             } else {
-              next__KR5G=((__POINTER *)result__MR5G)[ 0];
-              if ((next__KR5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MR5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OR5G <<  1)) <=  4096)) {
-                  next__KR5G=(void *)((unsigned long)result__MR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OR5G)));
+              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)));
                 } else {
-                  next__KR5G=new_lab__2QJ(lab_type__NR5G);
+                  next__ZVBH=new_lab__ARJ(lab_type__2VBH);
                 };
-                ((__POINTER *)next__KR5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LR5G)[ 0]=next__KR5G;
+                ((__POINTER *)next__ZVBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0VBH)[ 0]=next__ZVBH;
               } else {
-                ((__POINTER *)result__MR5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__KR5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__MR5G=next__KR5G;
+                ((__POINTER *)result__1VBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__1VBH=next__ZVBH;
               };
             };
-            ptr__FOIB=result__MR5G;
-          };
-          result__EOIB=((__ITM_TYPE_GENERIC *)ptr__FOIB);
-          *(result__EOIB) = *(ITM_TYPE_GENERIC__);
-        };
-        Self__T1CC=((__ITM_TYPE_GENERIC *)result__EOIB);
-        Self__T1CC->parent_itm_type_style__SRN.parent_itm_type_simple__RRN.name__0XP=nam__1NN;
-        Self__T1CC->parent_itm_type_style__SRN.style__DYP=styl__ZNN;
-        Self__T1CC->list_type__NYP=genericity__2NN;
-        result__AXP=result__EOIB;
-        Self__VFBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__HXP);
-        new_capacity__XFBB= 0;
-        if (((__INTEGER)(Self__VFBB->parent_arrayed_collection__GXP.upper__QXP +  1) <= (__INTEGER)(Self__VFBB->parent_arrayed_collection__GXP.capacity__DBW -  1))) {
-          Self__VFBB->parent_arrayed_collection__GXP.upper__QXP=(__INTEGER)(Self__VFBB->parent_arrayed_collection__GXP.upper__QXP +  1);
-          __tmp__FGBB=TRUE__;
-        } else {
-          __tmp__FGBB=FALSE__;
-        };
-        if ((! __tmp__FGBB)) {
-          if ((Self__VFBB->parent_arrayed_collection__GXP.capacity__DBW ==  0)) {
-            Self__VFBB->parent_arrayed_collection__GXP.storage__OBW=create__5RXB( 2);
-            Self__VFBB->parent_arrayed_collection__GXP.capacity__DBW= 2;
-            Self__VFBB->parent_arrayed_collection__GXP.upper__QXP= 0;
-          } else {
-            new_capacity__XFBB=(__INTEGER)(Self__VFBB->parent_arrayed_collection__GXP.capacity__DBW <<  1);
-            __tmp__0GBB=Self__VFBB->parent_arrayed_collection__GXP.storage__OBW;
-            __tmp__1GBB=Self__VFBB->parent_arrayed_collection__GXP.capacity__DBW;
-            new__AOFC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__0GBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__1GBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__XFBB * ((__INTEGER )(sizeof(void *)))))));
-            __tmp__UOFC=(__INTEGER)(new_capacity__XFBB -  1);
-            Self__ZYVD=__tmp__1GBB;
-            while ((Self__ZYVD <= __tmp__UOFC)) {
-              new__AOFC[Self__ZYVD]=NULL;
-              Self__ZYVD=(__INTEGER)(Self__ZYVD +  1);
-            };
-            Self__VFBB->parent_arrayed_collection__GXP.storage__OBW=new__AOFC;
-            Self__VFBB->parent_arrayed_collection__GXP.capacity__DBW=new_capacity__XFBB;
-            Self__VFBB->parent_arrayed_collection__GXP.upper__QXP=(__INTEGER)(Self__VFBB->parent_arrayed_collection__GXP.upper__QXP +  1);
-          };
-        };
-        ((void **)Self__VFBB->parent_arrayed_collection__GXP.storage__OBW)[Self__VFBB->parent_arrayed_collection__GXP.upper__QXP]=result__EOIB;
-      };
-      result__3NN=result__AXP;
-      result__PR5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__PR5G=FALSE__;
-      } else {
-        result__QR5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__QR5G=((__CHARACTER )(( 0)));
-        } else {
-          result__QR5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-        };
-        if ((result__QR5G == ')')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__PR5G=TRUE__;
-        };
-      };
-      if ((! result__PR5G)) {
-        pos__IGQG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_244));
-        put_position__EOG(pos__IGQG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+            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)) {
           exit(( 1));
         };
       };
     } else {
-      if (is_parameter_type__YJE) {
-        if (((void *)styl__ZNN != (void *)NULL)) {
-          copy__JCS(string_tmp__VH,(&__string_300));
-          append__RNS(string_tmp__VH,styl__ZNN);
-          append__RNS(string_tmp__VH,(&__string_301));
-          __tmp__SSN=current_position__ZWF();
-          put_error__text__0MG( 2,string_tmp__VH);
-          put_position__EOG(__tmp__SSN);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        result__NK0G=fast_reference_at__I1T(dico__CTI,nam__1NN);
-        if (((void *)result__NK0G == (void *)NULL)) {
-          result__B03G=NULL;
-          ptr__C03G=((__POINTER )(NULL));
-          typ_id__D03G= 0;
-          sz__E03G=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-          if ((sz__E03G ==  0)) {
-            result__B03G=ITM_TYPE_PARAMETER__;
-          } else {
-            typ_id__D03G=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__E03G);
-            if ((typ_id__D03G == (__INTEGER)(-  1))) {
-              a__F03G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__G03G=(__UINTEGER_32)((__UINTEGER_32)(sz__E03G + a__F03G) & (__UINTEGER_32)(~ a__F03G));
-              ptr_table__TR5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G03G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__SR5G=((__POINTER )(NULL));
-              result__UR5G=((__POINTER *)ptr_table__TR5G)[ 0];
-              if ((result__UR5G == (void *)NULL)) {
-                result__UR5G=new_lab__2QJ(new_size__G03G);
-                next__SR5G=(void *)((unsigned long)result__UR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G03G)));
-                ((__POINTER *)next__SR5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__TR5G)[ 0]=next__SR5G;
+        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;
               } else {
-                next__SR5G=((__POINTER *)result__UR5G)[ 0];
-                if ((next__SR5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UR5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G03G <<  1)) <=  4096)) {
-                    next__SR5G=(void *)((unsigned long)result__UR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G03G)));
+                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)));
                   } else {
-                    next__SR5G=new_lab__2QJ(new_size__G03G);
+                    next__BWBH=new_lab__ARJ(new_size__O35G);
                   };
-                  ((__POINTER *)next__SR5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__TR5G)[ 0]=next__SR5G;
+                  ((__POINTER *)next__BWBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__CWBH)[ 0]=next__BWBH;
                 } else {
-                  ((__POINTER *)result__UR5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SR5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__UR5G=next__SR5G;
+                  ((__POINTER *)result__DWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__DWBH=next__BWBH;
                 };
               };
-              ptr__C03G=result__UR5G;
+              ptr__K35G=result__DWBH;
             } else {
-              t__H03G=((__UINTEGER_32 )typ_id__D03G);
-              a__I03G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__1R5G=(__UINTEGER_32)((__UINTEGER_32)(sz__E03G + a__I03G) & (__UINTEGER_32)(~ a__I03G));
-              ptr_table__YR5G=((__POINTER )(&(table_type[(t__H03G)])));
-              lab_type__0R5G=(__UINTEGER_32)(t__H03G |  1);
-              next__XR5G=((__POINTER )(NULL));
-              result__ZR5G=((__POINTER *)ptr_table__YR5G)[ 0];
-              if ((result__ZR5G == (void *)NULL)) {
-                result__ZR5G=new_lab__2QJ(lab_type__0R5G);
-                next__XR5G=(void *)((unsigned long)result__ZR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1R5G)));
-                ((__POINTER *)next__XR5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YR5G)[ 0]=next__XR5G;
+              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;
               } else {
-                next__XR5G=((__POINTER *)result__ZR5G)[ 0];
-                if ((next__XR5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZR5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1R5G <<  1)) <=  4096)) {
-                    next__XR5G=(void *)((unsigned long)result__ZR5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1R5G)));
+                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)));
                   } else {
-                    next__XR5G=new_lab__2QJ(lab_type__0R5G);
+                    next__GWBH=new_lab__ARJ(lab_type__JWBH);
                   };
-                  ((__POINTER *)next__XR5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__YR5G)[ 0]=next__XR5G;
+                  ((__POINTER *)next__GWBH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HWBH)[ 0]=next__GWBH;
                 } else {
-                  ((__POINTER *)result__ZR5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__XR5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ZR5G=next__XR5G;
+                  ((__POINTER *)result__IWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IWBH=next__GWBH;
                 };
               };
-              ptr__C03G=result__ZR5G;
-            };
-            result__B03G=((__ITM_TYPE_PARAMETER *)ptr__C03G);
-            *(result__B03G) = *(ITM_TYPE_PARAMETER__);
-          };
-          Self__J03G=((__ITM_TYPE_PARAMETER *)result__B03G);
-          Self__J03G->parent_itm_type__NDE.name__0XP=nam__1NN;
-          fast_put__to__DOZ(dico__CTI,Self__J03G,nam__1NN);
-          result__NK0G=result__B03G;
-        };
-        result__3NN=result__NK0G;
-        __tmp__ZSN=TRUE__;
-      } else {
-        __tmp__ZSN=FALSE__;
-      };
-      if ((! __tmp__ZSN)) {
-        if (((void *)styl__ZNN == (void *)NULL)) {
-          result__3NN=get__TSI(nam__1NN);
-        } else {
-          if (((void *)nam__1NN == (void *)(&__string_1))) {
-            copy__JCS(string_tmp__VH,(&__string_300));
-            append__RNS(string_tmp__VH,styl__ZNN);
-            append__RNS(string_tmp__VH,(&__string_302));
-            __tmp__UTN=current_position__ZWF();
-            put_error__text__0MG( 2,string_tmp__VH);
-            put_position__EOG(__tmp__UTN);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+              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)) {
               exit(( 1));
             };
-            result__3NN=type_self__XTN;
+            result__BON=type_self__1TN;
           } else {
-            n__MNR=nam__1NN;
-            result__PNR=NULL;
-            idx__QNR= 0;
-            while (((idx__QNR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WNR)->parent_arrayed_collection__VNR.upper__5NR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WNR)->parent_arrayed_collection__VNR.storage__WLW)[idx__QNR])->parent_itm_type_simple__RRN.name__0XP != (void *)n__MNR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WNR)->parent_arrayed_collection__VNR.storage__WLW)[idx__QNR])->style__DYP != (void *)styl__ZNN)))) {
-              idx__QNR=(__INTEGER)(idx__QNR +  1);
+            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);
             };
-            if ((idx__QNR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WNR)->parent_arrayed_collection__VNR.upper__5NR)) {
-              __tmp__KPR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WNR)->parent_arrayed_collection__VNR.storage__WLW)[idx__QNR];
-              if (__tmp__KPR==NULL) {
-                __tmp__LPR=NULL;
+            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;
               } else {
-                __tmp__LPR=((__ITM_TYPE_STYLE *)__tmp__KPR);
+                __tmp__PPR=((__ITM_TYPE_STYLE *)__tmp__OPR);
               };
-              result__PNR=__tmp__LPR;
+              result__TNR=__tmp__PPR;
             } else {
-              result__P5IB=NULL;
-              ptr__Q5IB=((__POINTER )(NULL));
-              typ_id__V5IB= 0;
-              sz__S5IB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
-              if ((sz__S5IB ==  0)) {
-                result__P5IB=ITM_TYPE_STYLE__;
+              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__;
               } else {
-                typ_id__V5IB=-1;
-                clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__S5IB);
-                if ((typ_id__V5IB == (__INTEGER)(-  1))) {
-                  a__4K2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__5K2G=(__UINTEGER_32)((__UINTEGER_32)(sz__S5IB + a__4K2G) & (__UINTEGER_32)(~ a__4K2G));
-                  ptr_table__3R5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5K2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                  next__2R5G=((__POINTER )(NULL));
-                  result__4R5G=((__POINTER *)ptr_table__3R5G)[ 0];
-                  if ((result__4R5G == (void *)NULL)) {
-                    result__4R5G=new_lab__2QJ(new_size__5K2G);
-                    next__2R5G=(void *)((unsigned long)result__4R5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5K2G)));
-                    ((__POINTER *)next__2R5G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__3R5G)[ 0]=next__2R5G;
+                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;
                   } else {
-                    next__2R5G=((__POINTER *)result__4R5G)[ 0];
-                    if ((next__2R5G == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4R5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__5K2G <<  1)) <=  4096)) {
-                        next__2R5G=(void *)((unsigned long)result__4R5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5K2G)));
+                    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)));
                       } else {
-                        next__2R5G=new_lab__2QJ(new_size__5K2G);
+                        next__LWBH=new_lab__ARJ(new_size__4N4G);
                       };
-                      ((__POINTER *)next__2R5G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__3R5G)[ 0]=next__2R5G;
+                      ((__POINTER *)next__LWBH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__MWBH)[ 0]=next__LWBH;
                     } else {
-                      ((__POINTER *)result__4R5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2R5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__4R5G=next__2R5G;
+                      ((__POINTER *)result__NWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__NWBH=next__LWBH;
                     };
                   };
-                  ptr__Q5IB=result__4R5G;
+                  ptr__U5IB=result__NWBH;
                 } else {
-                  t__DL2G=((__UINTEGER_32 )typ_id__V5IB);
-                  a__CL2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__FS5G=(__UINTEGER_32)((__UINTEGER_32)(sz__S5IB + a__CL2G) & (__UINTEGER_32)(~ a__CL2G));
-                  ptr_table__CS5G=((__POINTER )(&(table_type[(t__DL2G)])));
-                  lab_type__ES5G=(__UINTEGER_32)(t__DL2G |  1);
-                  next__BS5G=((__POINTER )(NULL));
-                  result__DS5G=((__POINTER *)ptr_table__CS5G)[ 0];
-                  if ((result__DS5G == (void *)NULL)) {
-                    result__DS5G=new_lab__2QJ(lab_type__ES5G);
-                    next__BS5G=(void *)((unsigned long)result__DS5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FS5G)));
-                    ((__POINTER *)next__BS5G)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__CS5G)[ 0]=next__BS5G;
+                  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;
                   } else {
-                    next__BS5G=((__POINTER *)result__DS5G)[ 0];
-                    if ((next__BS5G == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DS5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FS5G <<  1)) <=  4096)) {
-                        next__BS5G=(void *)((unsigned long)result__DS5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FS5G)));
+                    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)));
                       } else {
-                        next__BS5G=new_lab__2QJ(lab_type__ES5G);
+                        next__QWBH=new_lab__ARJ(lab_type__TWBH);
                       };
-                      ((__POINTER *)next__BS5G)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__CS5G)[ 0]=next__BS5G;
+                      ((__POINTER *)next__QWBH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__RWBH)[ 0]=next__QWBH;
                     } else {
-                      ((__POINTER *)result__DS5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BS5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__DS5G=next__BS5G;
+                      ((__POINTER *)result__SWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__SWBH=next__QWBH;
                     };
                   };
-                  ptr__Q5IB=result__DS5G;
+                  ptr__U5IB=result__SWBH;
                 };
-                result__P5IB=((__ITM_TYPE_STYLE *)ptr__Q5IB);
-                *(result__P5IB) = *(ITM_TYPE_STYLE__);
+                result__T5IB=((__ITM_TYPE_STYLE *)ptr__U5IB);
+                *(result__T5IB) = *(ITM_TYPE_STYLE__);
               };
-              Self__F5CC=((__ITM_TYPE_STYLE *)result__P5IB);
-              Self__F5CC->parent_itm_type_simple__RRN.name__0XP=nam__1NN;
-              Self__F5CC->style__DYP=styl__ZNN;
-              result__PNR=result__P5IB;
-              Self__2DCB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__WNR);
-              new_capacity__4DCB= 0;
-              if (((__INTEGER)(Self__2DCB->parent_arrayed_collection__VNR.upper__5NR +  1) <= (__INTEGER)(Self__2DCB->parent_arrayed_collection__VNR.capacity__LLW -  1))) {
-                Self__2DCB->parent_arrayed_collection__VNR.upper__5NR=(__INTEGER)(Self__2DCB->parent_arrayed_collection__VNR.upper__5NR +  1);
-                __tmp__MECB=TRUE__;
+              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__;
               } else {
-                __tmp__MECB=FALSE__;
+                __tmp__QECB=FALSE__;
               };
-              if ((! __tmp__MECB)) {
-                if ((Self__2DCB->parent_arrayed_collection__VNR.capacity__LLW ==  0)) {
-                  Self__2DCB->parent_arrayed_collection__VNR.storage__WLW=create__LHYB( 2);
-                  Self__2DCB->parent_arrayed_collection__VNR.capacity__LLW= 2;
-                  Self__2DCB->parent_arrayed_collection__VNR.upper__5NR= 0;
+              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;
                 } else {
-                  new_capacity__4DCB=(__INTEGER)(Self__2DCB->parent_arrayed_collection__VNR.capacity__LLW <<  1);
-                  __tmp__BFCB=Self__2DCB->parent_arrayed_collection__VNR.storage__WLW;
-                  __tmp__CFCB=Self__2DCB->parent_arrayed_collection__VNR.capacity__LLW;
-                  new__2RFC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__BFCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__CFCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__4DCB * ((__INTEGER )(sizeof(void *)))))));
-                  __tmp__QSFC=(__INTEGER)(new_capacity__4DCB -  1);
-                  Self__Y0VD=__tmp__CFCB;
-                  while ((Self__Y0VD <= __tmp__QSFC)) {
-                    new__2RFC[Self__Y0VD]=NULL;
-                    Self__Y0VD=(__INTEGER)(Self__Y0VD +  1);
+                  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);
                   };
-                  Self__2DCB->parent_arrayed_collection__VNR.storage__WLW=new__2RFC;
-                  Self__2DCB->parent_arrayed_collection__VNR.capacity__LLW=new_capacity__4DCB;
-                  Self__2DCB->parent_arrayed_collection__VNR.upper__5NR=(__INTEGER)(Self__2DCB->parent_arrayed_collection__VNR.upper__5NR +  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);
                 };
               };
-              ((void **)Self__2DCB->parent_arrayed_collection__VNR.storage__WLW)[Self__2DCB->parent_arrayed_collection__VNR.upper__5NR]=result__P5IB;
+              ((void **)Self__AECB->parent_arrayed_collection__ZNR.storage__0LW)[Self__AECB->parent_arrayed_collection__ZNR.upper__DOR]=result__T5IB;
             };
-            result__3NN=result__PNR;
+            result__BON=result__TNR;
           };
         };
       };
     };
-    if (is_shorter__TY) {
-      sav_derive__BON=short_derive__RBC;
-      short_derive__RBC=old_derive__AON;
-      if ((((void *)result__3NN == (void *)type_self__XTN) || ((void *)result__3NN == (void *)type_null__PUN))) {
-        short__token__to__1AD((&__string_126),(__INTEGER)(old_pos__5NN - ((__STRING_CONSTANT *)nam__1NN)->count__DD),old_pos__5NN);
+    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);
       } else {
-        short__token__to__1AD((&__string_125),(__INTEGER)(old_pos__5NN - ((__STRING_CONSTANT *)nam__1NN)->count__DD),old_pos__5NN);
+        short__token__to__5AD((&__string_125),(__INTEGER)(old_pos__DON - ((__STRING_CONSTANT *)nam__5NN)->count__DD),old_pos__DON);
       };
-      short_derive__RBC=(__INTEGER)(sav_derive__BON + (__INTEGER)(short_derive__RBC - old_derive__AON));
+      short_derive__VBC=(__INTEGER)(sav_derive__FON + (__INTEGER)(short_derive__VBC - old_derive__EON));
     };
   };
-  return(result__3NN);
+  return(result__BON);
 }
 
-static void read_def_local__N0H(__PARSER *Self__O0H)
+static void read_def_local__R0H(__PARSER *Self__S0H)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER beg__CYK,typ_id__HWN,Self__KFAB,limit_up__LFAB,__tmp__G2K;
-  __INTEGER Self__X2N,__tmp__S03G,Self__T03G,__tmp__MAPD,Self__KPUD;
-  __POSITION pos__UIQG,__tmp__OZK,pos__2IQG,pos__JJQG,pos__QJQG;
-  void *__tmp__PZK;
-  __ITM_LOCAL *result__BWN,*Self__KDV;
-  __POINTER ptr__CWN,ptr_table__HS5G,next__GS5G,result__IS5G;
-  __POINTER ptr_table__MS5G,next__LS5G,result__NS5G;
-  __UINTEGER_32 sz__EWN,a__UL2G,new_size__VL2G,t__ZL2G,a__YL2G;
-  __UINTEGER_32 new_size__PS5G,lab_type__OS5G;
-  __CHARACTER styl__Y0H,result__RS5G,result__4JXG,result__US5G;
-  __CHARACTER result__XS5G;
-  void *result__L03G,*local_list__W0H,*result__O03G,*static_list__X0H;
-  void *result__BYK,*result__5QI;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__M03G,*Self__N03G;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__P03G,*Self__Q03G,*Self__UQ4;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__KR4;
-  __BOOLEAN mute__DYK,result__QS5G,__tmp__0ZK,result__TS5G,result__WS5G;
-  __FAST_ARRAYoITM_LOCALo *Self__U03G,*Self__BAPD;
-  void *other__R03G,*other__CAPD;
-  old_position__TQI=position__CBC;
-  old_pos_cur__VQI=pos_cur__FBC;
-  old_pos_line__XQI=pos_line__GBC;
-  old_pos_col__ZQI=pos_col__HBC;
-  old_short_derive__1QI=short_derive__RBC;
-  styl__Y0H=read_style__HRF();
-  result__L03G=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI)->parent_arrayed_collection__ERI.upper__Z0T <  0)) {
-    result__L03G=create_with_capacity__AJK( 16);
+  __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);
   } else {
-    Self__M03G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-    result__L03G=((void **)Self__M03G->parent_arrayed_collection__ERI.storage__XIU)[Self__M03G->parent_arrayed_collection__ERI.upper__Z0T];
-    Self__N03G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-    Self__N03G->parent_arrayed_collection__ERI.upper__Z0T=(__INTEGER)(Self__N03G->parent_arrayed_collection__ERI.upper__Z0T -  1);
-  };
-  local_list__W0H=result__L03G;
-  result__O03G=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI)->parent_arrayed_collection__ERI.upper__Z0T <  0)) {
-    result__O03G=create_with_capacity__AJK( 16);
+    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);
   } else {
-    Self__P03G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-    result__O03G=((void **)Self__P03G->parent_arrayed_collection__ERI.storage__XIU)[Self__P03G->parent_arrayed_collection__ERI.upper__Z0T];
-    Self__Q03G=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-    Self__Q03G->parent_arrayed_collection__ERI.upper__Z0T=(__INTEGER)(Self__Q03G->parent_arrayed_collection__ERI.upper__Z0T -  1);
-  };
-  static_list__X0H=result__O03G;
-  while ((styl__Y0H != ' ')) {
-    result__BYK=NULL;
-    beg__CYK= 0;
-    mute__DYK=TRUE__;
-    if (read_identifier__15K()) {
-      result__5QI=NULL;
-      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI)->parent_arrayed_collection__ERI.upper__Z0T <  0)) {
-        result__5QI=create_with_capacity__AJK( 16);
-      } else {
-        Self__UQ4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-        result__5QI=((void **)Self__UQ4->parent_arrayed_collection__ERI.storage__XIU)[Self__UQ4->parent_arrayed_collection__ERI.upper__Z0T];
-        Self__KR4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-        Self__KR4->parent_arrayed_collection__ERI.upper__Z0T=(__INTEGER)(Self__KR4->parent_arrayed_collection__ERI.upper__Z0T -  1);
-      };
-      result__BYK=result__5QI;
-      beg__CYK= 0;
+    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;
       do {
-        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.upper__L0K +  1) !=  0) && (! read_identifier__15K())) && (! mute__DYK))) {
-          pos__UIQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_303));
-          put_position__EOG(pos__UIQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        __tmp__OZK=current_position__ZWF();
-        __tmp__PZK=last_string__YZC;
-        result__BWN=NULL;
-        ptr__CWN=((__POINTER )(NULL));
-        typ_id__HWN= 0;
-        sz__EWN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
-        if ((sz__EWN ==  0)) {
-          result__BWN=ITM_LOCAL__;
-        } else {
-          typ_id__HWN=__ITM_LOCAL__;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__EWN);
-          if ((typ_id__HWN == (__INTEGER)(-  1))) {
-            a__UL2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__VL2G=(__UINTEGER_32)((__UINTEGER_32)(sz__EWN + a__UL2G) & (__UINTEGER_32)(~ a__UL2G));
-            ptr_table__HS5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VL2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__GS5G=((__POINTER )(NULL));
-            result__IS5G=((__POINTER *)ptr_table__HS5G)[ 0];
-            if ((result__IS5G == (void *)NULL)) {
-              result__IS5G=new_lab__2QJ(new_size__VL2G);
-              next__GS5G=(void *)((unsigned long)result__IS5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VL2G)));
-              ((__POINTER *)next__GS5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HS5G)[ 0]=next__GS5G;
+        __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;
             } else {
-              next__GS5G=((__POINTER *)result__IS5G)[ 0];
-              if ((next__GS5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IS5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VL2G <<  1)) <=  4096)) {
-                  next__GS5G=(void *)((unsigned long)result__IS5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VL2G)));
+              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)));
                 } else {
-                  next__GS5G=new_lab__2QJ(new_size__VL2G);
+                  next__VWBH=new_lab__ARJ(new_size__UO4G);
                 };
-                ((__POINTER *)next__GS5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HS5G)[ 0]=next__GS5G;
+                ((__POINTER *)next__VWBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WWBH)[ 0]=next__VWBH;
               } else {
-                ((__POINTER *)result__IS5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GS5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IS5G=next__GS5G;
+                ((__POINTER *)result__XWBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XWBH=next__VWBH;
               };
             };
-            ptr__CWN=result__IS5G;
-          } else {
-            t__ZL2G=((__UINTEGER_32 )typ_id__HWN);
-            a__YL2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__PS5G=(__UINTEGER_32)((__UINTEGER_32)(sz__EWN + a__YL2G) & (__UINTEGER_32)(~ a__YL2G));
-            ptr_table__MS5G=((__POINTER )(&(table_type[(t__ZL2G)])));
-            lab_type__OS5G=(__UINTEGER_32)(t__ZL2G |  1);
-            next__LS5G=((__POINTER )(NULL));
-            result__NS5G=((__POINTER *)ptr_table__MS5G)[ 0];
-            if ((result__NS5G == (void *)NULL)) {
-              result__NS5G=new_lab__2QJ(lab_type__OS5G);
-              next__LS5G=(void *)((unsigned long)result__NS5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PS5G)));
-              ((__POINTER *)next__LS5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MS5G)[ 0]=next__LS5G;
+            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;
             } else {
-              next__LS5G=((__POINTER *)result__NS5G)[ 0];
-              if ((next__LS5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NS5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PS5G <<  1)) <=  4096)) {
-                  next__LS5G=(void *)((unsigned long)result__NS5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PS5G)));
+              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)));
                 } else {
-                  next__LS5G=new_lab__2QJ(lab_type__OS5G);
+                  next__0WBH=new_lab__ARJ(lab_type__3WBH);
                 };
-                ((__POINTER *)next__LS5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MS5G)[ 0]=next__LS5G;
+                ((__POINTER *)next__0WBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1WBH)[ 0]=next__0WBH;
               } else {
-                ((__POINTER *)result__NS5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LS5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NS5G=next__LS5G;
+                ((__POINTER *)result__2WBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0WBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2WBH=next__0WBH;
               };
             };
-            ptr__CWN=result__NS5G;
+            ptr__GWN=result__2WBH;
           };
-          result__BWN=((__ITM_LOCAL *)ptr__CWN);
-          *(result__BWN) = *(ITM_LOCAL__);
+          result__FWN=((__ITM_LOCAL *)ptr__GWN);
+          *(result__FWN) = *(ITM_LOCAL__);
         };
-        Self__KDV=((__ITM_LOCAL *)result__BWN);
-        Self__KDV->name__O2K=__tmp__PZK;
-        Self__KDV->parent_itm_object__P0H.position__3CJ=__tmp__OZK;
-        add_last__V1U(result__BYK,result__BWN);
-        result__QS5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__QS5G=FALSE__;
+        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__;
         } else {
-          result__RS5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__RS5G=((__CHARACTER )(( 0)));
+          result__AXBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__AXBH=((__CHARACTER )(( 0)));
           } else {
-            result__RS5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__AXBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__RS5G == ':')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__QS5G=TRUE__;
+          if ((result__AXBH == ':')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__5WBH=TRUE__;
           };
         };
-        if (result__QS5G) {
-          result__4JXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__4JXG=((__CHARACTER )(( 0)));
+        if (result__5WBH) {
+          result__4IZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__4IZG=((__CHARACTER )(( 0)));
           } else {
-            result__4JXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__4IZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__0ZK=(result__4JXG != '=');
+          __tmp__4ZK=(result__4IZG != '=');
         } else {
-          __tmp__0ZK=FALSE__;
+          __tmp__4ZK=FALSE__;
         };
-        if (__tmp__0ZK) {
-          mute__DYK=FALSE__;
-          if (((void *)read_type__TBM(Self__O0H,TRUE__) == (void *)NULL)) {
-            pos__2IQG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_304));
-            put_position__EOG(pos__2IQG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+        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)) {
               exit(( 1));
             };
           };
-          Self__KFAB=beg__CYK;
-          limit_up__LFAB=((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.upper__L0K;
-          while ((Self__KFAB <= limit_up__LFAB)) {
-            Self__KFAB=(__INTEGER)(Self__KFAB +  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);
           };
-          beg__CYK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.upper__L0K +  1);
+          beg__GYK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__FYK)->parent_arrayed_collection__Y0H.upper__P0K +  1);
         };
-        result__TS5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__TS5G=FALSE__;
+        result__CXBH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__CXBH=FALSE__;
         } else {
-          result__US5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__US5G=((__CHARACTER )(( 0)));
+          result__DXBH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__DXBH=((__CHARACTER )(( 0)));
           } else {
-            result__US5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__DXBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__US5G == ',')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__TS5G=TRUE__;
+          if ((result__DXBH == ',')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__CXBH=TRUE__;
           };
         };
-      } while (result__TS5G);
-      if ((beg__CYK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__5QI)->parent_arrayed_collection__U0H.upper__L0K +  1))) {
-        if (mute__DYK) {
-          free__GJK(result__5QI);
-          result__BYK=NULL;
+      } 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;
         } else {
-          pos__JJQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_304));
-          put_position__EOG(pos__JJQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+          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)) {
             exit(( 1));
           };
         };
       } else {
-        result__BYK=copy__P3J(result__BYK);
-        if (is_shorter__TY) {
-          __tmp__G2K=((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.upper__L0K;
-          Self__X2N= 0;
-          while ((Self__X2N <= __tmp__G2K)) {
-            add__SLHB(short_local__ZBC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.storage__SKU)[Self__X2N])->name__O2K);
-            Self__X2N=(__INTEGER)(Self__X2N +  1);
+        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);
           };
         };
       };
     };
-    if (((void *)result__BYK != (void *)NULL)) {
-      if ((styl__Y0H == '+')) {
-        Self__U03G=((__FAST_ARRAYoITM_LOCALo *)local_list__W0H);
-        other__R03G=result__BYK;
-        __tmp__S03G=((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.upper__L0K;
-        Self__T03G= 0;
-        while ((Self__T03G <= __tmp__S03G)) {
-          add_last__V1U(Self__U03G,((void **)((__FAST_ARRAYoITM_LOCALo *)other__R03G)->parent_arrayed_collection__U0H.storage__SKU)[Self__T03G]);
-          Self__T03G=(__INTEGER)(Self__T03G +  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);
         };
       } else {
-        Self__BAPD=((__FAST_ARRAYoITM_LOCALo *)static_list__X0H);
-        other__CAPD=result__BYK;
-        __tmp__MAPD=((__FAST_ARRAYoITM_LOCALo *)result__BYK)->parent_arrayed_collection__U0H.upper__L0K;
-        Self__KPUD= 0;
-        while ((Self__KPUD <= __tmp__MAPD)) {
-          add_last__V1U(Self__BAPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__CAPD)->parent_arrayed_collection__U0H.storage__SKU)[Self__KPUD]);
-          Self__KPUD=(__INTEGER)(Self__KPUD +  1);
+        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);
         };
       };
-      result__WS5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__WS5G=FALSE__;
+      result__FXBH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__FXBH=FALSE__;
       } else {
-        result__XS5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__XS5G=((__CHARACTER )(( 0)));
+        result__GXBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__GXBH=((__CHARACTER )(( 0)));
         } else {
-          result__XS5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__GXBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__XS5G == ';')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__WS5G=TRUE__;
+        if ((result__GXBH == ';')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__FXBH=TRUE__;
         };
       };
-      if ((! result__WS5G)) {
-        pos__QJQG=current_position__ZWF();
-        put_error__text__0MG( 2,(&__string_227));
-        put_position__EOG(pos__QJQG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+      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)) {
           exit(( 1));
         };
       };
-      old_position__TQI=position__CBC;
-      old_pos_cur__VQI=pos_cur__FBC;
-      old_pos_line__XQI=pos_line__GBC;
-      old_pos_col__ZQI=pos_col__HBC;
-      old_short_derive__1QI=short_derive__RBC;
-      styl__Y0H=read_style__HRF();
+      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();
     } else {
-      restore_context__DDL();
-      styl__Y0H=' ';
+      restore_context__HDL();
+      styl__20H=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__L03G)->parent_arrayed_collection__U0H.upper__L0K <  0)) {
-    free__GJK(result__L03G);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__T35G)->parent_arrayed_collection__Y0H.upper__P0K <  0)) {
+    free__KJK(result__T35G);
   } else {
-    copy__P3J(result__L03G);
+    copy__T3J(result__T35G);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__O03G)->parent_arrayed_collection__U0H.upper__L0K <  0)) {
-    free__GJK(result__O03G);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__W35G)->parent_arrayed_collection__Y0H.upper__P0K <  0)) {
+    free__KJK(result__W35G);
   } else {
-    copy__P3J(result__O03G);
+    copy__T3J(result__W35G);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__CVI(__INTEGER new_count__EVI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__GVI(__INTEGER new_count__IVI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__AKJ,ptr_table__0S5G,next__ZS5G,result__1S5G;
-  __POINTER ptr_table__5S5G,next__4S5G,result__AT5G;
-  __INTEGER typ_id__FKJ;
-  __UINTEGER_32 sz__CKJ,a__1Q2G,new_size__2Q2G,t__AR2G,a__5Q2G;
-  __UINTEGER_32 new_size__CT5G,lab_type__BT5G;
-  __FAST_ARRAYoITM_CODEo *result__5JJ,*Self__P3T;
-  result__5JJ=NULL;
-  ptr__AKJ=((__POINTER )(NULL));
-  typ_id__FKJ= 0;
-  sz__CKJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
-  if ((sz__CKJ ==  0)) {
-    result__5JJ=FAST_ARRAYoITM_CODEo__;
+  __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__;
   } else {
-    typ_id__FKJ=__FAST_ARRAYoITM_CODEo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__CKJ);
-    if ((typ_id__FKJ == (__INTEGER)(-  1))) {
-      a__1Q2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2Q2G=(__UINTEGER_32)((__UINTEGER_32)(sz__CKJ + a__1Q2G) & (__UINTEGER_32)(~ a__1Q2G));
-      ptr_table__0S5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2Q2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ZS5G=((__POINTER )(NULL));
-      result__1S5G=((__POINTER *)ptr_table__0S5G)[ 0];
-      if ((result__1S5G == (void *)NULL)) {
-        result__1S5G=new_lab__2QJ(new_size__2Q2G);
-        next__ZS5G=(void *)((unsigned long)result__1S5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2Q2G)));
-        ((__POINTER *)next__ZS5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0S5G)[ 0]=next__ZS5G;
-      } else {
-        next__ZS5G=((__POINTER *)result__1S5G)[ 0];
-        if ((next__ZS5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1S5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__2Q2G <<  1)) <=  4096)) {
-            next__ZS5G=(void *)((unsigned long)result__1S5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2Q2G)));
-          } else {
-            next__ZS5G=new_lab__2QJ(new_size__2Q2G);
-          };
-          ((__POINTER *)next__ZS5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0S5G)[ 0]=next__ZS5G;
-        } else {
-          ((__POINTER *)result__1S5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZS5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1S5G=next__ZS5G;
-        };
-      };
-      ptr__AKJ=result__1S5G;
-    } else {
-      t__AR2G=((__UINTEGER_32 )typ_id__FKJ);
-      a__5Q2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__CT5G=(__UINTEGER_32)((__UINTEGER_32)(sz__CKJ + a__5Q2G) & (__UINTEGER_32)(~ a__5Q2G));
-      ptr_table__5S5G=((__POINTER )(&(table_type[(t__AR2G)])));
-      lab_type__BT5G=(__UINTEGER_32)(t__AR2G |  1);
-      next__4S5G=((__POINTER )(NULL));
-      result__AT5G=((__POINTER *)ptr_table__5S5G)[ 0];
-      if ((result__AT5G == (void *)NULL)) {
-        result__AT5G=new_lab__2QJ(lab_type__BT5G);
-        next__4S5G=(void *)((unsigned long)result__AT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CT5G)));
-        ((__POINTER *)next__4S5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5S5G)[ 0]=next__4S5G;
-      } else {
-        next__4S5G=((__POINTER *)result__AT5G)[ 0];
-        if ((next__4S5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AT5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CT5G <<  1)) <=  4096)) {
-            next__4S5G=(void *)((unsigned long)result__AT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CT5G)));
-          } else {
-            next__4S5G=new_lab__2QJ(lab_type__BT5G);
-          };
-          ((__POINTER *)next__4S5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5S5G)[ 0]=next__4S5G;
-        } else {
-          ((__POINTER *)result__AT5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4S5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__AT5G=next__4S5G;
-        };
-      };
-      ptr__AKJ=result__AT5G;
-    };
-    result__5JJ=((__FAST_ARRAYoITM_CODEo *)ptr__AKJ);
-    *(result__5JJ) = *(FAST_ARRAYoITM_CODEo__);
-  };
-  Self__P3T=((__FAST_ARRAYoITM_CODEo *)result__5JJ);
-  if ((Self__P3T->parent_arrayed_collection__BTF.capacity__KXT < new_count__EVI)) {
-    Self__P3T->parent_arrayed_collection__BTF.storage__VXT=create__XSQB(new_count__EVI);
-    Self__P3T->parent_arrayed_collection__BTF.capacity__KXT=new_count__EVI;
-  };
-  Self__P3T->parent_arrayed_collection__BTF.upper__MHL=(__INTEGER)(-  1);
-  return(result__5JJ);
+    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);
 }
 
-static void add_last__E5U(__FAST_ARRAYoITM_CODEo *Self__F5U,void *element__G5U)
+static void add_last__I5U(__FAST_ARRAYoITM_CODEo *Self__J5U,void *element__K5U)
 // ({FAST_ARRAYoITM_CODEo},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_OPERATORxITM_READ_ARG1xITM_READ_ARG2xITM_EXPRESSIONxITM_OLDxITM_EXTERNAL_TYPExITM_BLOCKxITM_EXTERNALxITM_READ_ARGSxITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_RESULT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__H5U,__tmp__LAV,__tmp__UDEC,Self__HGVD;
-  __BOOLEAN __tmp__V5U;
-  void **__tmp__KAV,**new__ADEC;
-  new_capacity__H5U= 0;
-  if (((__INTEGER)(Self__F5U->parent_arrayed_collection__BTF.upper__MHL +  1) <= (__INTEGER)(Self__F5U->parent_arrayed_collection__BTF.capacity__KXT -  1))) {
-    Self__F5U->parent_arrayed_collection__BTF.upper__MHL=(__INTEGER)(Self__F5U->parent_arrayed_collection__BTF.upper__MHL +  1);
-    __tmp__V5U=TRUE__;
+  __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__;
   } else {
-    __tmp__V5U=FALSE__;
-  };
-  if ((! __tmp__V5U)) {
-    if ((Self__F5U->parent_arrayed_collection__BTF.capacity__KXT ==  0)) {
-      Self__F5U->parent_arrayed_collection__BTF.storage__VXT=create__XSQB( 2);
-      Self__F5U->parent_arrayed_collection__BTF.capacity__KXT= 2;
-      Self__F5U->parent_arrayed_collection__BTF.upper__MHL= 0;
-    } else {
-      new_capacity__H5U=(__INTEGER)(Self__F5U->parent_arrayed_collection__BTF.capacity__KXT <<  1);
-      __tmp__KAV=Self__F5U->parent_arrayed_collection__BTF.storage__VXT;
-      __tmp__LAV=Self__F5U->parent_arrayed_collection__BTF.capacity__KXT;
-      new__ADEC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__KAV)),((__UINTEGER_32 )(__INTEGER)(__tmp__LAV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__H5U * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__UDEC=(__INTEGER)(new_capacity__H5U -  1);
-      Self__HGVD=__tmp__LAV;
-      while ((Self__HGVD <= __tmp__UDEC)) {
-        new__ADEC[Self__HGVD]=NULL;
-        Self__HGVD=(__INTEGER)(Self__HGVD +  1);
-      };
-      Self__F5U->parent_arrayed_collection__BTF.storage__VXT=new__ADEC;
-      Self__F5U->parent_arrayed_collection__BTF.capacity__KXT=new_capacity__H5U;
-      Self__F5U->parent_arrayed_collection__BTF.upper__MHL=(__INTEGER)(Self__F5U->parent_arrayed_collection__BTF.upper__MHL +  1);
-    };
-  };
-  ((void **)Self__F5U->parent_arrayed_collection__BTF.storage__VXT)[Self__F5U->parent_arrayed_collection__BTF.upper__MHL]=element__G5U;
+    __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;
 }
 
-static void* copy__A5H(void *tmp__C5H)
+static void* copy__E5H(void *tmp__G5H)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__BXT,other_upper__AXT,Self__H3JC;
-  void *result__E5H;
-  __FAST_ARRAYoITM_CODEo *Self__4WT;
-  void **__tmp__YXT,**__tmp__0XT,**Self__UQCC;
-  result__E5H=create_with_capacity__CVI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__C5H)->parent_arrayed_collection__BTF.upper__MHL +  1));
-  Self__4WT=((__FAST_ARRAYoITM_CODEo *)result__E5H);
-  new_capacity__BXT= 0;
-  other_upper__AXT=((__FAST_ARRAYoITM_CODEo *)tmp__C5H)->parent_arrayed_collection__BTF.upper__MHL;
-  if ((other_upper__AXT >=  0)) {
-    new_capacity__BXT=(__INTEGER)(other_upper__AXT +  1);
-    if ((Self__4WT->parent_arrayed_collection__BTF.capacity__KXT < new_capacity__BXT)) {
-      Self__4WT->parent_arrayed_collection__BTF.storage__VXT=create__XSQB(new_capacity__BXT);
-      Self__4WT->parent_arrayed_collection__BTF.capacity__KXT=new_capacity__BXT;
-    };
-    __tmp__YXT=Self__4WT->parent_arrayed_collection__BTF.storage__VXT;
-    __tmp__0XT=((__FAST_ARRAYoITM_CODEo *)tmp__C5H)->parent_arrayed_collection__BTF.storage__VXT;
-    Self__UQCC=((void **)__tmp__YXT);
-    Self__H3JC=other_upper__AXT;
-    while ((Self__H3JC >=  0)) {
-      Self__UQCC[Self__H3JC]=((void **)__tmp__0XT)[Self__H3JC];
-      Self__H3JC=(__INTEGER)(Self__H3JC -  1);
-    };
-  };
-  Self__4WT->parent_arrayed_collection__BTF.upper__MHL=other_upper__AXT;
-  free__IVI(tmp__C5H);
-  return(result__E5H);
+  __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);
 }
 
-static __BOOLEAN fast_has__NDV(__HASHED_SEToSTRING_CONSTANTo *Self__ODV,void *e__PDV)
+static __BOOLEAN fast_has__RDV(__HASHED_SEToSTRING_CONSTANTo *Self__SDV,void *e__TDV)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__X03G;
-  __INTEGER result__W03G,__tmp__Y03G,Self__Z03G;
-  void *node__ZDV;
-  Self__X03G=((__STRING_CONSTANT *)e__PDV);
-  result__W03G= 0;
-  __tmp__Y03G=Self__X03G->count__DD;
-  Self__Z03G= 1;
-  while ((Self__Z03G <= __tmp__Y03G)) {
-    result__W03G=(__INTEGER)((__INTEGER)( 5 * result__W03G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__X03G->storage__FQO)[(__INTEGER)(Self__Z03G -  1)])));
-    Self__Z03G=(__INTEGER)(Self__Z03G +  1);
-  };
-  if ((result__W03G <  0)) {
-    result__W03G=(__INTEGER)(~ result__W03G);
-  };
-  node__ZDV=((void **)Self__ODV->buckets__5DV)[(__INTEGER)(result__W03G % Self__ODV->capacity__0HT)];
-  while ((! (((void *)node__ZDV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__ZDV)->item__LEV == (void *)e__PDV)))) {
-    node__ZDV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__ZDV)->next__WEV;
-  };
-  return(((void *)node__ZDV != (void *)NULL));
+  __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));
 }
 
-static void restore_context__DDL()
+static void restore_context__HDL()
 // () VoidNo recursive, No inlinable.
 {
-  __INTEGER beg__FDL,end__103G,len__303G,__tmp__403G,__tmp__A13G;
-  __INTEGER Self__B13G,__tmp__XDL,__tmp__0DL,Self__JMM;
-  __STRING *Self__503G;
-  beg__FDL= 0;
-  if (is_shorter__TY) {
-    ((__STRING *)token__WBD)->count__GFC= 0;
-    beg__FDL=(__INTEGER)(old_position__TQI + old_short_derive__1QI);
-    Self__503G=((__STRING *)output_code__SI);
-    end__103G=(__INTEGER)((__INTEGER)(position__CBC + short_derive__RBC) -  1);
-    len__303G=(__INTEGER)((__INTEGER)(end__103G - beg__FDL) +  1);
-    if ((len__303G >  0)) {
-      __tmp__403G=(__INTEGER)(end__103G +  1);
-      __tmp__A13G=Self__503G->count__GFC;
-      Self__B13G=__tmp__403G;
-      while ((Self__B13G <= __tmp__A13G)) {
-        ((__CHARACTER *)Self__503G->storage__RBS)[(__INTEGER)((__INTEGER)(Self__B13G - len__303G) -  1)]=((__CHARACTER *)Self__503G->storage__RBS)[(__INTEGER)(Self__B13G -  1)];
-        Self__B13G=(__INTEGER)(Self__B13G +  1);
-      };
-      Self__503G->count__GFC=(__INTEGER)(Self__503G->count__GFC - len__303G);
-    };
-    __tmp__XDL=old_position__TQI;
-    __tmp__0DL=(__INTEGER)(position__CBC -  1);
-    Self__JMM=__tmp__XDL;
-    while ((Self__JMM <= __tmp__0DL)) {
-      add_last__JLT(token__WBD,((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(Self__JMM -  1)]);
-      Self__JMM=(__INTEGER)(Self__JMM +  1);
-    };
-    insert_string__to__KXU(output_code__SI,token__WBD,beg__FDL);
-    short_derive__RBC=old_short_derive__1QI;
-  };
-  position__CBC=old_position__TQI;
-  pos_cur__FBC=old_pos_cur__VQI;
-  pos_line__GBC=old_pos_line__XQI;
-  pos_col__HBC=old_pos_col__ZQI;
+  __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;
 }
 
-static void* read_expr_message__KVL(__PARSER *Self__LVL)
+static void* read_expr_message__OVL(__PARSER *Self__PVL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__I1L,*result__NVL;
-  __POSITION pos__ANQG,p__NAAB,pos__INQG;
-  __ITM_OLD *result__BTGB;
-  __POINTER ptr__CTGB,ptr_table__GT5G,next__FT5G,result__HT5G;
-  __POINTER ptr_table__LT5G,next__KT5G,result__MT5G;
-  __INTEGER typ_id__HTGB;
-  __UINTEGER_32 sz__ETGB,a__UN2G,new_size__VN2G,t__ZN2G,a__YN2G;
-  __UINTEGER_32 new_size__OT5G,lab_type__NT5G;
-  __BOOLEAN result__ET5G,result__PT5G;
-  __CHARACTER result__QT5G;
-  result__I1L=NULL;
-  result__ET5G=read_word__APF((&__string_8));
-  if (is_shorter__TY) {
-    if (result__ET5G) {
+  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) {
       if (((void *)(&__string_8) == (void *)(&__string_4))) {
-        short__token__to__1AD((&__string_120),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+        short__token__to__5AD((&__string_120),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
       } else {
-        short__token__to__1AD((&__string_119),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
+        short__token__to__5AD((&__string_119),(__INTEGER)(position__GBC - ((__STRING_CONSTANT *)last_string__2ZC)->count__DD),position__GBC);
       };
     };
   };
-  if (result__ET5G) {
-    if (((void *)read_expr__O4I(Self__LVL) == (void *)NULL)) {
-      pos__ANQG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_305));
-      put_position__EOG(pos__ANQG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
-    p__NAAB=current_position__ZWF();
-    result__BTGB=NULL;
-    ptr__CTGB=((__POINTER )(NULL));
-    typ_id__HTGB= 0;
-    sz__ETGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
-    if ((sz__ETGB ==  0)) {
-      result__BTGB=ITM_OLD__;
-    } else {
-      typ_id__HTGB=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__ETGB);
-      if ((typ_id__HTGB == (__INTEGER)(-  1))) {
-        a__UN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VN2G=(__UINTEGER_32)((__UINTEGER_32)(sz__ETGB + a__UN2G) & (__UINTEGER_32)(~ a__UN2G));
-        ptr_table__GT5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VN2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__FT5G=((__POINTER )(NULL));
-        result__HT5G=((__POINTER *)ptr_table__GT5G)[ 0];
-        if ((result__HT5G == (void *)NULL)) {
-          result__HT5G=new_lab__2QJ(new_size__VN2G);
-          next__FT5G=(void *)((unsigned long)result__HT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VN2G)));
-          ((__POINTER *)next__FT5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GT5G)[ 0]=next__FT5G;
-        } else {
-          next__FT5G=((__POINTER *)result__HT5G)[ 0];
-          if ((next__FT5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HT5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__VN2G <<  1)) <=  4096)) {
-              next__FT5G=(void *)((unsigned long)result__HT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VN2G)));
+    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)));
             } else {
-              next__FT5G=new_lab__2QJ(new_size__VN2G);
-            };
-            ((__POINTER *)next__FT5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GT5G)[ 0]=next__FT5G;
-          } else {
-            ((__POINTER *)result__HT5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__FT5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__HT5G=next__FT5G;
-          };
-        };
-        ptr__CTGB=result__HT5G;
-      } else {
-        t__ZN2G=((__UINTEGER_32 )typ_id__HTGB);
-        a__YN2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OT5G=(__UINTEGER_32)((__UINTEGER_32)(sz__ETGB + a__YN2G) & (__UINTEGER_32)(~ a__YN2G));
-        ptr_table__LT5G=((__POINTER )(&(table_type[(t__ZN2G)])));
-        lab_type__NT5G=(__UINTEGER_32)(t__ZN2G |  1);
-        next__KT5G=((__POINTER )(NULL));
-        result__MT5G=((__POINTER *)ptr_table__LT5G)[ 0];
-        if ((result__MT5G == (void *)NULL)) {
-          result__MT5G=new_lab__2QJ(lab_type__NT5G);
-          next__KT5G=(void *)((unsigned long)result__MT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OT5G)));
-          ((__POINTER *)next__KT5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LT5G)[ 0]=next__KT5G;
-        } else {
-          next__KT5G=((__POINTER *)result__MT5G)[ 0];
-          if ((next__KT5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MT5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OT5G <<  1)) <=  4096)) {
-              next__KT5G=(void *)((unsigned long)result__MT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OT5G)));
+              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)));
             } else {
-              next__KT5G=new_lab__2QJ(lab_type__NT5G);
+              next__ZXBH=new_lab__ARJ(lab_type__2XBH);
             };
-            ((__POINTER *)next__KT5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LT5G)[ 0]=next__KT5G;
+            ((__POINTER *)next__ZXBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0XBH)[ 0]=next__ZXBH;
           } else {
-            ((__POINTER *)result__MT5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__KT5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MT5G=next__KT5G;
+            ((__POINTER *)result__1XBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZXBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1XBH=next__ZXBH;
           };
         };
-        ptr__CTGB=result__MT5G;
+        ptr__GTGB=result__1XBH;
       };
-      result__BTGB=((__ITM_OLD *)ptr__CTGB);
-      *(result__BTGB) = *(ITM_OLD__);
+      result__FTGB=((__ITM_OLD *)ptr__GTGB);
+      *(result__FTGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__BTGB)->parent_itm_code__31L.parent_itm_object__HDE.position__3CJ=p__NAAB;
-    result__I1L=result__BTGB;
+    ((__ITM_OLD *)result__FTGB)->parent_itm_code__B2L.parent_itm_object__LDE.position__BDJ=p__RAAB;
+    result__M1L=result__FTGB;
   } else {
-    result__I1L=read_expr_primary__Y3M(Self__LVL);
-    if (((void *)result__I1L == (void *)NULL)) {
-      result__I1L=read_send_msg__23N(Self__LVL,NULL);
+    result__M1L=read_expr_primary__23M(Self__PVL);
+    if (((void *)result__M1L == (void *)NULL)) {
+      result__M1L=read_send_msg__A4N(Self__PVL,NULL);
     };
   };
-  result__NVL=result__I1L;
-  if (((void *)result__I1L != (void *)NULL)) {
-    while_do__YYM:
+  result__RVL=result__M1L;
+  if (((void *)result__M1L != (void *)NULL)) {
+    while_do__2YM:
     {
-      result__PT5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__PT5G=FALSE__;
+      result__4XBH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__4XBH=FALSE__;
       } else {
-        result__QT5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__QT5G=((__CHARACTER )(( 0)));
+        result__5XBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__5XBH=((__CHARACTER )(( 0)));
         } else {
-          result__QT5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__5XBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__QT5G == '.')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__PT5G=TRUE__;
+        if ((result__5XBH == '.')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__4XBH=TRUE__;
         };
       };
-      if (result__PT5G) {
-        result__NVL=read_send_msg__23N(Self__LVL,result__NVL);
-        if (((void *)result__NVL == (void *)NULL)) {
-          pos__INQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_306));
-          put_position__EOG(pos__INQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        goto while_do__YYM;
+        goto while_do__2YM;
       };
     };
   };
-  return(result__NVL);
+  return(result__RVL);
 }
 
-static void free__IVI(void *tmp__KVI)
+static void free__MVI(void *tmp__OVI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__I5T,__tmp__QAU,__tmp__U3DC,Self__KAVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__G5T;
-  __BOOLEAN __tmp__X5T;
-  void **__tmp__PAU,**new__A3DC;
-  ((__FAST_ARRAYoITM_CODEo *)tmp__KVI)->parent_arrayed_collection__BTF.upper__MHL=(__INTEGER)(-  1);
-  Self__G5T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-  new_capacity__I5T= 0;
-  if (((__INTEGER)(Self__G5T->parent_arrayed_collection__Q3H.upper__YVT +  1) <= (__INTEGER)(Self__G5T->parent_arrayed_collection__Q3H.capacity__K5T -  1))) {
-    Self__G5T->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(Self__G5T->parent_arrayed_collection__Q3H.upper__YVT +  1);
-    __tmp__X5T=TRUE__;
+  __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__;
   } else {
-    __tmp__X5T=FALSE__;
-  };
-  if ((! __tmp__X5T)) {
-    if ((Self__G5T->parent_arrayed_collection__Q3H.capacity__K5T ==  0)) {
-      Self__G5T->parent_arrayed_collection__Q3H.storage__GAU=create__E1PB( 2);
-      Self__G5T->parent_arrayed_collection__Q3H.capacity__K5T= 2;
-      Self__G5T->parent_arrayed_collection__Q3H.upper__YVT= 0;
-    } else {
-      new_capacity__I5T=(__INTEGER)(Self__G5T->parent_arrayed_collection__Q3H.capacity__K5T <<  1);
-      __tmp__PAU=Self__G5T->parent_arrayed_collection__Q3H.storage__GAU;
-      __tmp__QAU=Self__G5T->parent_arrayed_collection__Q3H.capacity__K5T;
-      new__A3DC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__PAU)),((__UINTEGER_32 )(__INTEGER)(__tmp__QAU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__I5T * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__U3DC=(__INTEGER)(new_capacity__I5T -  1);
-      Self__KAVD=__tmp__QAU;
-      while ((Self__KAVD <= __tmp__U3DC)) {
-        new__A3DC[Self__KAVD]=NULL;
-        Self__KAVD=(__INTEGER)(Self__KAVD +  1);
-      };
-      Self__G5T->parent_arrayed_collection__Q3H.storage__GAU=new__A3DC;
-      Self__G5T->parent_arrayed_collection__Q3H.capacity__K5T=new_capacity__I5T;
-      Self__G5T->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(Self__G5T->parent_arrayed_collection__Q3H.upper__YVT +  1);
-    };
-  };
-  ((void **)Self__G5T->parent_arrayed_collection__Q3H.storage__GAU)[Self__G5T->parent_arrayed_collection__Q3H.upper__YVT]=tmp__KVI;
+    __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;
+}
+
+static void put__to__like__2MLF(void *tok__4MLF,void *buf__5MLF,void *key__ANLF)
+// ({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);
+      } else {
+        append__VNS(buf__5MLF,item__M0ND(lst__BNLF,Self__4WMF));
+      };
+      Self__4WMF=(__INTEGER)(Self__4WMF +  1);
+    };
+  };
+}
+
+static void put__to__like__VRPF(void *tok__XRPF,void *buf__YRPF,void *key__ZRPF)
+// ({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);
+      } else {
+        append__VNS(buf__YRPF,item__M0ND(lst__0RPF,Self__2QYF));
+      };
+      Self__2QYF=(__INTEGER)(Self__2QYF +  1);
+    };
+  };
+}
+
+static void put__to__like__3WKF(void *tok__5WKF,void *buf__AXKF)
+// ({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);
+      } else {
+        append__VNS(buf__AXKF,item__M0ND(lst__CXKF,Self__5NMF));
+      };
+      Self__5NMF=(__INTEGER)(Self__5NMF +  1);
+    };
+  };
+}
+
+static void put__to__like__JZKF(void *tok__LZKF,void *buf__MZKF,void *key__NZKF)
+// ({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);
+      } else {
+        append__VNS(buf__MZKF,item__M0ND(lst__OZKF,Self__QOMF));
+      };
+      Self__QOMF=(__INTEGER)(Self__QOMF +  1);
+    };
+  };
 }
 
-static __BOOLEAN is_hexadecimal_digit__H2IE(__CHARACTER Self__I2IE)
+static __BOOLEAN is_hexadecimal_digit__X4IE(__CHARACTER Self__Y4IE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __BOOLEAN result__K2IE,result__AL0G,__tmp__S2IE,__tmp__B3IE;
-  __BOOLEAN result__URNE;
-  result__K2IE=FALSE__;
-  result__AL0G=FALSE__;
-  if ((((__INTEGER_8 )Self__I2IE) >= ((__INTEGER_8 )'0'))) {
-    result__AL0G=(((__INTEGER_8 )Self__I2IE) <= ((__INTEGER_8 )'9'));
-  };
-  if (result__AL0G) {
-    result__K2IE=TRUE__;
-    __tmp__S2IE=TRUE__;
+  __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__;
   } else {
-    __tmp__S2IE=FALSE__;
+    __tmp__C5IE=FALSE__;
   };
-  if (__tmp__S2IE) {
-    __tmp__B3IE=TRUE__;
+  if (__tmp__C5IE) {
+    __tmp__R5IE=TRUE__;
   } else {
-    result__URNE=(((__INTEGER_8 )Self__I2IE) >= ((__INTEGER_8 )'a'));
-    if (result__URNE) {
-      result__K2IE=(((__INTEGER_8 )Self__I2IE) <= ((__INTEGER_8 )'f'));
+    result__EUNE=(((__INTEGER_8 )Self__Y4IE) >= ((__INTEGER_8 )'a'));
+    if (result__EUNE) {
+      result__04IE=(((__INTEGER_8 )Self__Y4IE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__B3IE=result__URNE;
+    __tmp__R5IE=result__EUNE;
   };
-  if ((! __tmp__B3IE)) {
-    if ((((__INTEGER_8 )Self__I2IE) >= ((__INTEGER_8 )'A'))) {
-      result__K2IE=(((__INTEGER_8 )Self__I2IE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__R5IE)) {
+    if ((((__INTEGER_8 )Self__Y4IE) >= ((__INTEGER_8 )'A'))) {
+      result__04IE=(((__INTEGER_8 )Self__Y4IE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__K2IE);
+  return(result__04IE);
 }
 
-static void* read_constant__LQO()
+static void* read_constant__PQO()
 // () With resultNo recursive, No inlinable.
 {
-  void *result__OQO;
-  __INTEGER pos_old__54O,typ_id__OPQ,typ_id__GQMB,old_pos__QBQ;
-  __INTEGER count__RBQ,typ_id__0RMB,typ_id__OTMB;
-  __POSITION pos__FTQG,__tmp__WQO,__tmp__IRO,pos__FUQG,pos__HUQG;
-  __POSITION __tmp__0RO,__tmp__LSO;
-  __ITM_REAL *result__IPQ;
-  __POINTER ptr__JPQ,ptr_table__TT5G,next__ST5G,result__UT5G;
-  __POINTER ptr_table__YT5G,next__XT5G,result__ZT5G,ptr__BQMB;
-  __POINTER ptr_table__3T5G,next__2T5G,result__4T5G,ptr_table__CU5G;
-  __POINTER next__BU5G,result__DU5G,ptr__VRMB,ptr_table__HU5G;
-  __POINTER next__GU5G,result__IU5G,ptr_table__MU5G,next__LU5G;
-  __POINTER result__NU5G,ptr__JTMB,ptr_table__RU5G,next__QU5G;
-  __POINTER result__SU5G,ptr_table__WU5G,next__VU5G,result__XU5G;
-  __UINTEGER_32 sz__LPQ,a__KO2G,new_size__LO2G,t__PO2G,a__OO2G;
-  __UINTEGER_32 new_size__1T5G,lab_type__0T5G,sz__DQMB,a__SO2G;
-  __UINTEGER_32 new_size__TO2G,t__XO2G,a__WO2G,new_size__FU5G;
-  __UINTEGER_32 lab_type__EU5G,sz__XRMB,a__0O2G,new_size__1O2G,t__5O2G;
-  __UINTEGER_32 a__4O2G,new_size__PU5G,lab_type__OU5G,sz__LTMB,a__CP2G;
-  __UINTEGER_32 new_size__DP2G,t__HP2G,a__GP2G,new_size__ZU5G;
-  __UINTEGER_32 lab_type__YU5G;
-  __ITM_NUMBER *result__AQMB;
-  __ITM_CHARACTER *result__URMB;
-  __ITM_STRING *result__ITMB;
-  __BOOLEAN result__44O,result__KL0G,__tmp__K5O,result__XL0G,__tmp__EAP;
-  __BOOLEAN result__TM0G,result__AN0G,__tmp__RCP,result__BO0G;
-  __BOOLEAN result__OO0G,__tmp__1QO,__tmp__NRO,result__RFP,__tmp__4RO;
-  __BOOLEAN result__PBQ,__tmp__1BQ,__tmp__0CQ,__tmp__1CQ;
-  __CHARACTER result__TQXG,result__ZQXG,result__0QXG,result__1QXG;
-  __CHARACTER result__2QXG,result__3QXG,result__4QXG,result__5QXG;
-  __CHARACTER result__ARXG,result__BRXG,result__CRXG,result__DRXG;
-  __CHARACTER result__ERXG,result__FRXG,result__GRXG,result__HRXG;
-  __CHARACTER result__IRXG,result__JRXG,result__KRXG,result__LRXG;
-  __CHARACTER result__RRXG,result__SRXG,result__TRXG,result__URXG;
-  __CHARACTER result__VRXG,result__WRXG;
-  result__OQO=NULL;
-  result__44O=FALSE__;
-  pos_old__54O= 0;
-  if (read_space__NRD()) {
-    result__TQXG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__TQXG=((__CHARACTER )(( 0)));
-    } else {
-      result__TQXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-    };
-    result__KL0G=FALSE__;
-    if ((((__INTEGER_8 )result__TQXG) >= ((__INTEGER_8 )'0'))) {
-      result__KL0G=(((__INTEGER_8 )result__TQXG) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__K5O=result__KL0G;
+  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;
   } else {
-    __tmp__K5O=FALSE__;
+    __tmp__O5O=FALSE__;
   };
-  if (__tmp__K5O) {
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    result__ZQXG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__ZQXG=((__CHARACTER )(( 0)));
+  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)));
     } else {
-      result__ZQXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__FQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    add_last__JLT(string_tmp__VH,result__ZQXG);
-    pos_old__54O=position__CBC;
-    position__CBC=(__INTEGER)(position__CBC +  1);
-    while_do__APZD:
+    add_last__NLT(string_tmp__VH,result__FQZG);
+    pos_old__D5O=position__GBC;
+    position__GBC=(__INTEGER)(position__GBC +  1);
+    while_do__4QZD:
     {
-      result__0QXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__0QXG=((__CHARACTER )(( 0)));
+      result__GQZG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__GQZG=((__CHARACTER )(( 0)));
       } else {
-        result__0QXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__GQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      result__XL0G=FALSE__;
-      if ((((__INTEGER_8 )result__0QXG) >= ((__INTEGER_8 )'0'))) {
-        result__XL0G=(((__INTEGER_8 )result__0QXG) <= ((__INTEGER_8 )'9'));
+      result__UL2G=FALSE__;
+      if ((((__INTEGER_8 )result__GQZG) >= ((__INTEGER_8 )'0'))) {
+        result__UL2G=(((__INTEGER_8 )result__GQZG) <= ((__INTEGER_8 )'9'));
       };
-      if (result__XL0G) {
-        __tmp__EAP=TRUE__;
+      if (result__UL2G) {
+        __tmp__IAP=TRUE__;
       } else {
-        result__1QXG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__1QXG=((__CHARACTER )(( 0)));
+        result__HQZG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__HQZG=((__CHARACTER )(( 0)));
         } else {
-          result__1QXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__HQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        __tmp__EAP=(result__1QXG == '_');
+        __tmp__IAP=(result__HQZG == '_');
       };
-      if (__tmp__EAP) {
-        result__2QXG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__2QXG=((__CHARACTER )(( 0)));
+      if (__tmp__IAP) {
+        result__IQZG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__IQZG=((__CHARACTER )(( 0)));
         } else {
-          result__2QXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__IQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__2QXG != '_')) {
-          result__3QXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__3QXG=((__CHARACTER )(( 0)));
+        if ((result__IQZG != '_')) {
+          result__JQZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__JQZG=((__CHARACTER )(( 0)));
           } else {
-            result__3QXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__JQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__3QXG);
+          add_last__NLT(string_tmp__VH,result__JQZG);
         };
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        goto while_do__APZD;
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        goto while_do__4QZD;
       };
     };
-    result__4QXG='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__4QXG=((__CHARACTER )(( 0)));
+    result__KQZG='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__KQZG=((__CHARACTER )(( 0)));
     } else {
-      result__4QXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__KQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__4QXG == '.')) {
-      add_last__JLT(string_tmp__VH,'.');
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__5QXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__5QXG=((__CHARACTER )(( 0)));
+    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)));
       } else {
-        result__5QXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__LQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      result__TM0G=FALSE__;
-      if ((((__INTEGER_8 )result__5QXG) >= ((__INTEGER_8 )'0'))) {
-        result__TM0G=(((__INTEGER_8 )result__5QXG) <= ((__INTEGER_8 )'9'));
+      result__QM2G=FALSE__;
+      if ((((__INTEGER_8 )result__LQZG) >= ((__INTEGER_8 )'0'))) {
+        result__QM2G=(((__INTEGER_8 )result__LQZG) <= ((__INTEGER_8 )'9'));
       };
-      if (result__TM0G) {
-        result__44O=TRUE__;
-        result__ARXG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__ARXG=((__CHARACTER )(( 0)));
+      if (result__QM2G) {
+        result__C5O=TRUE__;
+        result__MQZG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__MQZG=((__CHARACTER )(( 0)));
         } else {
-          result__ARXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__MQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        add_last__JLT(string_tmp__VH,result__ARXG);
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        while_do__4XOE:
+        add_last__NLT(string_tmp__VH,result__MQZG);
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        while_do__O0OE:
         {
-          result__BRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__BRXG=((__CHARACTER )(( 0)));
+          result__NQZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__NQZG=((__CHARACTER )(( 0)));
           } else {
-            result__BRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__NQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          result__AN0G=FALSE__;
-          if ((((__INTEGER_8 )result__BRXG) >= ((__INTEGER_8 )'0'))) {
-            result__AN0G=(((__INTEGER_8 )result__BRXG) <= ((__INTEGER_8 )'9'));
+          result__3M2G=FALSE__;
+          if ((((__INTEGER_8 )result__NQZG) >= ((__INTEGER_8 )'0'))) {
+            result__3M2G=(((__INTEGER_8 )result__NQZG) <= ((__INTEGER_8 )'9'));
           };
-          if (result__AN0G) {
-            result__CRXG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__CRXG=((__CHARACTER )(( 0)));
+          if (result__3M2G) {
+            result__OQZG='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__OQZG=((__CHARACTER )(( 0)));
             } else {
-              result__CRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__OQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            add_last__JLT(string_tmp__VH,result__CRXG);
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            goto while_do__4XOE;
+            add_last__NLT(string_tmp__VH,result__OQZG);
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            goto while_do__O0OE;
           };
         };
       };
-      result__DRXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__DRXG=((__CHARACTER )(( 0)));
+      result__PQZG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__PQZG=((__CHARACTER )(( 0)));
       } else {
-        result__DRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__PQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__DRXG == 'E')) {
-        result__44O=TRUE__;
-        add_last__JLT(string_tmp__VH,'E');
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__ERXG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__ERXG=((__CHARACTER )(( 0)));
+      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)));
         } else {
-          result__ERXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__QQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__ERXG == '+')) {
-          __tmp__RCP=TRUE__;
+        if ((result__QQZG == '+')) {
+          __tmp__VCP=TRUE__;
         } else {
-          result__FRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__FRXG=((__CHARACTER )(( 0)));
+          result__RQZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__RQZG=((__CHARACTER )(( 0)));
           } else {
-            result__FRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__RQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__RCP=(result__FRXG == '-');
+          __tmp__VCP=(result__RQZG == '-');
         };
-        if (__tmp__RCP) {
-          result__GRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__GRXG=((__CHARACTER )(( 0)));
+        if (__tmp__VCP) {
+          result__SQZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__SQZG=((__CHARACTER )(( 0)));
           } else {
-            result__GRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__SQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__GRXG);
-          position__CBC=(__INTEGER)(position__CBC +  1);
+          add_last__NLT(string_tmp__VH,result__SQZG);
+          position__GBC=(__INTEGER)(position__GBC +  1);
         };
-        result__HRXG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__HRXG=((__CHARACTER )(( 0)));
+        result__TQZG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__TQZG=((__CHARACTER )(( 0)));
         } else {
-          result__HRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__TQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        result__BO0G=FALSE__;
-        if ((((__INTEGER_8 )result__HRXG) >= ((__INTEGER_8 )'0'))) {
-          result__BO0G=(((__INTEGER_8 )result__HRXG) <= ((__INTEGER_8 )'9'));
+        result__4N2G=FALSE__;
+        if ((((__INTEGER_8 )result__TQZG) >= ((__INTEGER_8 )'0'))) {
+          result__4N2G=(((__INTEGER_8 )result__TQZG) <= ((__INTEGER_8 )'9'));
         };
-        if (result__BO0G) {
-          result__IRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__IRXG=((__CHARACTER )(( 0)));
+        if (result__4N2G) {
+          result__UQZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__UQZG=((__CHARACTER )(( 0)));
           } else {
-            result__IRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__UQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__IRXG);
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          while_do__BKQE:
+          add_last__NLT(string_tmp__VH,result__UQZG);
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          while_do__TMQE:
           {
-            result__JRXG='\0';
-            if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-              result__JRXG=((__CHARACTER )(( 0)));
+            result__VQZG='\0';
+            if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+              result__VQZG=((__CHARACTER )(( 0)));
             } else {
-              result__JRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+              result__VQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
             };
-            result__OO0G=FALSE__;
-            if ((((__INTEGER_8 )result__JRXG) >= ((__INTEGER_8 )'0'))) {
-              result__OO0G=(((__INTEGER_8 )result__JRXG) <= ((__INTEGER_8 )'9'));
+            result__LO2G=FALSE__;
+            if ((((__INTEGER_8 )result__VQZG) >= ((__INTEGER_8 )'0'))) {
+              result__LO2G=(((__INTEGER_8 )result__VQZG) <= ((__INTEGER_8 )'9'));
             };
-            if (result__OO0G) {
-              result__KRXG='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__KRXG=((__CHARACTER )(( 0)));
+            if (result__LO2G) {
+              result__WQZG='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__WQZG=((__CHARACTER )(( 0)));
               } else {
-                result__KRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__WQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              add_last__JLT(string_tmp__VH,result__KRXG);
-              position__CBC=(__INTEGER)(position__CBC +  1);
-              goto while_do__BKQE;
+              add_last__NLT(string_tmp__VH,result__WQZG);
+              position__GBC=(__INTEGER)(position__GBC +  1);
+              goto while_do__TMQE;
             };
           };
         } else {
-          pos__FTQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_307));
-          put_position__EOG(pos__FTQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+          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)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__44O) {
-      get__YVB(string_tmp__VH);
+    if (result__C5O) {
+      get__2VB(string_tmp__VH);
     } else {
-      position__CBC=pos_old__54O;
+      position__GBC=pos_old__D5O;
     };
   };
-  if (result__44O) {
-    short__token__to__1AD((&__string_121),pos_old__54O,position__CBC);
+  if (result__C5O) {
+    short__token__to__5AD((&__string_121),pos_old__D5O,position__GBC);
   };
-  if (result__44O) {
-    __tmp__WQO=current_position__ZWF();
-    result__IPQ=NULL;
-    ptr__JPQ=((__POINTER )(NULL));
-    typ_id__OPQ= 0;
-    sz__LPQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
-    if ((sz__LPQ ==  0)) {
-      result__IPQ=ITM_REAL__;
+  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__;
     } else {
-      typ_id__OPQ=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__LPQ);
-      if ((typ_id__OPQ == (__INTEGER)(-  1))) {
-        a__KO2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__LO2G=(__UINTEGER_32)((__UINTEGER_32)(sz__LPQ + a__KO2G) & (__UINTEGER_32)(~ a__KO2G));
-        ptr_table__TT5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LO2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ST5G=((__POINTER )(NULL));
-        result__UT5G=((__POINTER *)ptr_table__TT5G)[ 0];
-        if ((result__UT5G == (void *)NULL)) {
-          result__UT5G=new_lab__2QJ(new_size__LO2G);
-          next__ST5G=(void *)((unsigned long)result__UT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LO2G)));
-          ((__POINTER *)next__ST5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TT5G)[ 0]=next__ST5G;
+      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;
         } else {
-          next__ST5G=((__POINTER *)result__UT5G)[ 0];
-          if ((next__ST5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UT5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__LO2G <<  1)) <=  4096)) {
-              next__ST5G=(void *)((unsigned long)result__UT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LO2G)));
+          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)));
             } else {
-              next__ST5G=new_lab__2QJ(new_size__LO2G);
-            };
-            ((__POINTER *)next__ST5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TT5G)[ 0]=next__ST5G;
-          } else {
-            ((__POINTER *)result__UT5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ST5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__UT5G=next__ST5G;
-          };
-        };
-        ptr__JPQ=result__UT5G;
-      } else {
-        t__PO2G=((__UINTEGER_32 )typ_id__OPQ);
-        a__OO2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__1T5G=(__UINTEGER_32)((__UINTEGER_32)(sz__LPQ + a__OO2G) & (__UINTEGER_32)(~ a__OO2G));
-        ptr_table__YT5G=((__POINTER )(&(table_type[(t__PO2G)])));
-        lab_type__0T5G=(__UINTEGER_32)(t__PO2G |  1);
-        next__XT5G=((__POINTER )(NULL));
-        result__ZT5G=((__POINTER *)ptr_table__YT5G)[ 0];
-        if ((result__ZT5G == (void *)NULL)) {
-          result__ZT5G=new_lab__2QJ(lab_type__0T5G);
-          next__XT5G=(void *)((unsigned long)result__ZT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1T5G)));
-          ((__POINTER *)next__XT5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YT5G)[ 0]=next__XT5G;
-        } else {
-          next__XT5G=((__POINTER *)result__ZT5G)[ 0];
-          if ((next__XT5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZT5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1T5G <<  1)) <=  4096)) {
-              next__XT5G=(void *)((unsigned long)result__ZT5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1T5G)));
+              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)));
             } else {
-              next__XT5G=new_lab__2QJ(lab_type__0T5G);
+              next__GYBH=new_lab__ARJ(lab_type__JYBH);
             };
-            ((__POINTER *)next__XT5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YT5G)[ 0]=next__XT5G;
+            ((__POINTER *)next__GYBH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HYBH)[ 0]=next__GYBH;
           } else {
-            ((__POINTER *)result__ZT5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__XT5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZT5G=next__XT5G;
+            ((__POINTER *)result__IYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IYBH=next__GYBH;
           };
         };
-        ptr__JPQ=result__ZT5G;
+        ptr__NPQ=result__IYBH;
       };
-      result__IPQ=((__ITM_REAL *)ptr__JPQ);
-      *(result__IPQ) = *(ITM_REAL__);
+      result__MPQ=((__ITM_REAL *)ptr__NPQ);
+      *(result__MPQ) = *(ITM_REAL__);
     };
-    ((__ITM_REAL *)result__IPQ)->parent_itm_constant__VQO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=__tmp__WQO;
-    result__OQO=result__IPQ;
-    __tmp__1QO=TRUE__;
+    ((__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__;
   } else {
-    __tmp__1QO=FALSE__;
+    __tmp__5QO=FALSE__;
   };
-  if (__tmp__1QO) {
-    __tmp__NRO=TRUE__;
+  if (__tmp__5QO) {
+    __tmp__RRO=TRUE__;
   } else {
-    result__RFP=read_integer__Q1P();
-    if (result__RFP) {
-      __tmp__IRO=current_position__ZWF();
-      result__AQMB=NULL;
-      ptr__BQMB=((__POINTER )(NULL));
-      typ_id__GQMB= 0;
-      sz__DQMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
-      if ((sz__DQMB ==  0)) {
-        result__AQMB=ITM_NUMBER__;
-      } else {
-        typ_id__GQMB=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__DQMB);
-        if ((typ_id__GQMB == (__INTEGER)(-  1))) {
-          a__SO2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__TO2G=(__UINTEGER_32)((__UINTEGER_32)(sz__DQMB + a__SO2G) & (__UINTEGER_32)(~ a__SO2G));
-          ptr_table__3T5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TO2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__2T5G=((__POINTER )(NULL));
-          result__4T5G=((__POINTER *)ptr_table__3T5G)[ 0];
-          if ((result__4T5G == (void *)NULL)) {
-            result__4T5G=new_lab__2QJ(new_size__TO2G);
-            next__2T5G=(void *)((unsigned long)result__4T5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TO2G)));
-            ((__POINTER *)next__2T5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3T5G)[ 0]=next__2T5G;
-          } else {
-            next__2T5G=((__POINTER *)result__4T5G)[ 0];
-            if ((next__2T5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4T5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__TO2G <<  1)) <=  4096)) {
-                next__2T5G=(void *)((unsigned long)result__4T5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TO2G)));
+    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)));
               } else {
-                next__2T5G=new_lab__2QJ(new_size__TO2G);
+                next__LYBH=new_lab__ARJ(new_size__SR4G);
               };
-              ((__POINTER *)next__2T5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3T5G)[ 0]=next__2T5G;
+              ((__POINTER *)next__LYBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MYBH)[ 0]=next__LYBH;
             } else {
-              ((__POINTER *)result__4T5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2T5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4T5G=next__2T5G;
-            };
-          };
-          ptr__BQMB=result__4T5G;
-        } else {
-          t__XO2G=((__UINTEGER_32 )typ_id__GQMB);
-          a__WO2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__FU5G=(__UINTEGER_32)((__UINTEGER_32)(sz__DQMB + a__WO2G) & (__UINTEGER_32)(~ a__WO2G));
-          ptr_table__CU5G=((__POINTER )(&(table_type[(t__XO2G)])));
-          lab_type__EU5G=(__UINTEGER_32)(t__XO2G |  1);
-          next__BU5G=((__POINTER )(NULL));
-          result__DU5G=((__POINTER *)ptr_table__CU5G)[ 0];
-          if ((result__DU5G == (void *)NULL)) {
-            result__DU5G=new_lab__2QJ(lab_type__EU5G);
-            next__BU5G=(void *)((unsigned long)result__DU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FU5G)));
-            ((__POINTER *)next__BU5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CU5G)[ 0]=next__BU5G;
-          } else {
-            next__BU5G=((__POINTER *)result__DU5G)[ 0];
-            if ((next__BU5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DU5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FU5G <<  1)) <=  4096)) {
-                next__BU5G=(void *)((unsigned long)result__DU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FU5G)));
+              ((__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)));
               } else {
-                next__BU5G=new_lab__2QJ(lab_type__EU5G);
+                next__QYBH=new_lab__ARJ(lab_type__TYBH);
               };
-              ((__POINTER *)next__BU5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CU5G)[ 0]=next__BU5G;
+              ((__POINTER *)next__QYBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RYBH)[ 0]=next__QYBH;
             } else {
-              ((__POINTER *)result__DU5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__BU5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__DU5G=next__BU5G;
+              ((__POINTER *)result__SYBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__SYBH=next__QYBH;
             };
           };
-          ptr__BQMB=result__DU5G;
+          ptr__FQMB=result__SYBH;
         };
-        result__AQMB=((__ITM_NUMBER *)ptr__BQMB);
-        *(result__AQMB) = *(ITM_NUMBER__);
+        result__EQMB=((__ITM_NUMBER *)ptr__FQMB);
+        *(result__EQMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__AQMB)->parent_itm_constant__HRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=__tmp__IRO;
-      result__OQO=result__AQMB;
+      ((__ITM_NUMBER *)result__EQMB)->parent_itm_constant__LRO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__MRO;
+      result__SQO=result__EQMB;
     };
-    __tmp__NRO=result__RFP;
+    __tmp__RRO=result__VFP;
   };
-  if (__tmp__NRO) {
-    __tmp__4RO=TRUE__;
+  if (__tmp__RRO) {
+    __tmp__CSO=TRUE__;
   } else {
-    result__PBQ=FALSE__;
-    old_pos__QBQ= 0;
-    count__RBQ= 0;
-    if (read_space__NRD()) {
-      result__LRXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__LRXG=((__CHARACTER )(( 0)));
+    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)));
       } else {
-        result__LRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__XQZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      __tmp__1BQ=(result__LRXG == '\'');
+      __tmp__5BQ=(result__XQZG == '\'');
     } else {
-      __tmp__1BQ=FALSE__;
+      __tmp__5BQ=FALSE__;
     };
-    if (__tmp__1BQ) {
-      old_pos__QBQ=position__CBC;
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      ((__STRING *)string_tmp__VH)->count__GFC= 0;
-      until_do__YIRC:
+    if (__tmp__5BQ) {
+      old_pos__UBQ=position__GBC;
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      ((__STRING *)string_tmp__VH)->count__KFC= 0;
+      until_do__2IRC:
       {
-        result__RRXG='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__RRXG=((__CHARACTER )(( 0)));
+        result__3QZG='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__3QZG=((__CHARACTER )(( 0)));
         } else {
-          result__RRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__3QZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__RRXG == ((__CHARACTER )(( 0))))) {
-          __tmp__0CQ=TRUE__;
+        if ((result__3QZG == ((__CHARACTER )(( 0))))) {
+          __tmp__4CQ=TRUE__;
         } else {
-          result__SRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__SRXG=((__CHARACTER )(( 0)));
+          result__4QZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__4QZG=((__CHARACTER )(( 0)));
           } else {
-            result__SRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__4QZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__0CQ=(result__SRXG == '\n');
+          __tmp__4CQ=(result__4QZG == '\n');
         };
-        if (__tmp__0CQ) {
-          __tmp__1CQ=TRUE__;
+        if (__tmp__4CQ) {
+          __tmp__5CQ=TRUE__;
         } else {
-          result__TRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__TRXG=((__CHARACTER )(( 0)));
+          result__5QZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__5QZG=((__CHARACTER )(( 0)));
           } else {
-            result__TRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__5QZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          __tmp__1CQ=(result__TRXG == '\'');
+          __tmp__5CQ=(result__5QZG == '\'');
         };
-        if ((! __tmp__1CQ)) {
-          result__URXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__URXG=((__CHARACTER )(( 0)));
+        if ((! __tmp__5CQ)) {
+          result__ARZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__ARZG=((__CHARACTER )(( 0)));
           } else {
-            result__URXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__ARZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          add_last__JLT(string_tmp__VH,result__URXG);
-          result__VRXG='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__VRXG=((__CHARACTER )(( 0)));
+          add_last__NLT(string_tmp__VH,result__ARZG);
+          result__BRZG='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__BRZG=((__CHARACTER )(( 0)));
           } else {
-            result__VRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__BRZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__VRXG == '\\')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            read_escape_character__ZYIF();
-            count__RBQ=(__INTEGER)(count__RBQ +  1);
+          if ((result__BRZG == '\\')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            read_escape_character__PIJF();
+            count__VBQ=(__INTEGER)(count__VBQ +  1);
           } else {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            count__RBQ=(__INTEGER)(count__RBQ +  1);
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            count__VBQ=(__INTEGER)(count__VBQ +  1);
           };
-          goto until_do__YIRC;
+          goto until_do__2IRC;
         };
       };
-      result__WRXG='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__WRXG=((__CHARACTER )(( 0)));
+      result__CRZG='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__CRZG=((__CHARACTER )(( 0)));
       } else {
-        result__WRXG=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__CRZG=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__WRXG == '\'')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        last_string__YZC=get__YVB(string_tmp__VH);
-        if ((count__RBQ !=  1)) {
-          position__CBC=begin_position__1AE;
-          pos__FUQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_308));
-          put_position__EOG(pos__FUQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        result__PBQ=TRUE__;
-        short__token__to__1AD((&__string_122),old_pos__QBQ,position__CBC);
+        result__TBQ=TRUE__;
+        short__token__to__5AD((&__string_122),old_pos__UBQ,position__GBC);
       } else {
-        position__CBC=begin_position__1AE;
-        pos__HUQG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_309));
-        put_position__EOG(pos__HUQG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+        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)) {
           exit(( 1));
         };
       };
     };
-    if (result__PBQ) {
-      __tmp__0RO=current_position__ZWF();
-      result__URMB=NULL;
-      ptr__VRMB=((__POINTER )(NULL));
-      typ_id__0RMB= 0;
-      sz__XRMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
-      if ((sz__XRMB ==  0)) {
-        result__URMB=ITM_CHARACTER__;
-      } else {
-        typ_id__0RMB=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__XRMB);
-        if ((typ_id__0RMB == (__INTEGER)(-  1))) {
-          a__0O2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__1O2G=(__UINTEGER_32)((__UINTEGER_32)(sz__XRMB + a__0O2G) & (__UINTEGER_32)(~ a__0O2G));
-          ptr_table__HU5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1O2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__GU5G=((__POINTER )(NULL));
-          result__IU5G=((__POINTER *)ptr_table__HU5G)[ 0];
-          if ((result__IU5G == (void *)NULL)) {
-            result__IU5G=new_lab__2QJ(new_size__1O2G);
-            next__GU5G=(void *)((unsigned long)result__IU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1O2G)));
-            ((__POINTER *)next__GU5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HU5G)[ 0]=next__GU5G;
-          } else {
-            next__GU5G=((__POINTER *)result__IU5G)[ 0];
-            if ((next__GU5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IU5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__1O2G <<  1)) <=  4096)) {
-                next__GU5G=(void *)((unsigned long)result__IU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1O2G)));
+    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)));
               } else {
-                next__GU5G=new_lab__2QJ(new_size__1O2G);
+                next__VYBH=new_lab__ARJ(new_size__0R4G);
               };
-              ((__POINTER *)next__GU5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HU5G)[ 0]=next__GU5G;
+              ((__POINTER *)next__VYBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WYBH)[ 0]=next__VYBH;
             } else {
-              ((__POINTER *)result__IU5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__GU5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__IU5G=next__GU5G;
-            };
-          };
-          ptr__VRMB=result__IU5G;
-        } else {
-          t__5O2G=((__UINTEGER_32 )typ_id__0RMB);
-          a__4O2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__PU5G=(__UINTEGER_32)((__UINTEGER_32)(sz__XRMB + a__4O2G) & (__UINTEGER_32)(~ a__4O2G));
-          ptr_table__MU5G=((__POINTER )(&(table_type[(t__5O2G)])));
-          lab_type__OU5G=(__UINTEGER_32)(t__5O2G |  1);
-          next__LU5G=((__POINTER )(NULL));
-          result__NU5G=((__POINTER *)ptr_table__MU5G)[ 0];
-          if ((result__NU5G == (void *)NULL)) {
-            result__NU5G=new_lab__2QJ(lab_type__OU5G);
-            next__LU5G=(void *)((unsigned long)result__NU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PU5G)));
-            ((__POINTER *)next__LU5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MU5G)[ 0]=next__LU5G;
-          } else {
-            next__LU5G=((__POINTER *)result__NU5G)[ 0];
-            if ((next__LU5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NU5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__PU5G <<  1)) <=  4096)) {
-                next__LU5G=(void *)((unsigned long)result__NU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PU5G)));
+              ((__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)));
               } else {
-                next__LU5G=new_lab__2QJ(lab_type__OU5G);
+                next__0YBH=new_lab__ARJ(lab_type__3YBH);
               };
-              ((__POINTER *)next__LU5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MU5G)[ 0]=next__LU5G;
+              ((__POINTER *)next__0YBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1YBH)[ 0]=next__0YBH;
             } else {
-              ((__POINTER *)result__NU5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__LU5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__NU5G=next__LU5G;
-            };
-          };
-          ptr__VRMB=result__NU5G;
-        };
-        result__URMB=((__ITM_CHARACTER *)ptr__VRMB);
-        *(result__URMB) = *(ITM_CHARACTER__);
-      };
-      ((__ITM_CHARACTER *)result__URMB)->parent_itm_constant__ZRO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=__tmp__0RO;
-      result__OQO=result__URMB;
-    };
-    __tmp__4RO=result__PBQ;
-  };
-  if ((! __tmp__4RO)) {
-    if (read_string__1EQ()) {
-      __tmp__LSO=current_position__ZWF();
-      result__ITMB=NULL;
-      ptr__JTMB=((__POINTER )(NULL));
-      typ_id__OTMB= 0;
-      sz__LTMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
-      if ((sz__LTMB ==  0)) {
-        result__ITMB=ITM_STRING__;
-      } else {
-        typ_id__OTMB=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__LTMB);
-        if ((typ_id__OTMB == (__INTEGER)(-  1))) {
-          a__CP2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__DP2G=(__UINTEGER_32)((__UINTEGER_32)(sz__LTMB + a__CP2G) & (__UINTEGER_32)(~ a__CP2G));
-          ptr_table__RU5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DP2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__QU5G=((__POINTER )(NULL));
-          result__SU5G=((__POINTER *)ptr_table__RU5G)[ 0];
-          if ((result__SU5G == (void *)NULL)) {
-            result__SU5G=new_lab__2QJ(new_size__DP2G);
-            next__QU5G=(void *)((unsigned long)result__SU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DP2G)));
-            ((__POINTER *)next__QU5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RU5G)[ 0]=next__QU5G;
-          } else {
-            next__QU5G=((__POINTER *)result__SU5G)[ 0];
-            if ((next__QU5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SU5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DP2G <<  1)) <=  4096)) {
-                next__QU5G=(void *)((unsigned long)result__SU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DP2G)));
+              ((__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)));
               } else {
-                next__QU5G=new_lab__2QJ(new_size__DP2G);
+                next__5YBH=new_lab__ARJ(new_size__CS4G);
               };
-              ((__POINTER *)next__QU5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RU5G)[ 0]=next__QU5G;
+              ((__POINTER *)next__5YBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AZBH)[ 0]=next__5YBH;
             } else {
-              ((__POINTER *)result__SU5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QU5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SU5G=next__QU5G;
-            };
-          };
-          ptr__JTMB=result__SU5G;
-        } else {
-          t__HP2G=((__UINTEGER_32 )typ_id__OTMB);
-          a__GP2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ZU5G=(__UINTEGER_32)((__UINTEGER_32)(sz__LTMB + a__GP2G) & (__UINTEGER_32)(~ a__GP2G));
-          ptr_table__WU5G=((__POINTER )(&(table_type[(t__HP2G)])));
-          lab_type__YU5G=(__UINTEGER_32)(t__HP2G |  1);
-          next__VU5G=((__POINTER )(NULL));
-          result__XU5G=((__POINTER *)ptr_table__WU5G)[ 0];
-          if ((result__XU5G == (void *)NULL)) {
-            result__XU5G=new_lab__2QJ(lab_type__YU5G);
-            next__VU5G=(void *)((unsigned long)result__XU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZU5G)));
-            ((__POINTER *)next__VU5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WU5G)[ 0]=next__VU5G;
-          } else {
-            next__VU5G=((__POINTER *)result__XU5G)[ 0];
-            if ((next__VU5G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XU5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZU5G <<  1)) <=  4096)) {
-                next__VU5G=(void *)((unsigned long)result__XU5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZU5G)));
+              ((__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)));
               } else {
-                next__VU5G=new_lab__2QJ(lab_type__YU5G);
+                next__EZBH=new_lab__ARJ(lab_type__HZBH);
               };
-              ((__POINTER *)next__VU5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WU5G)[ 0]=next__VU5G;
+              ((__POINTER *)next__EZBH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FZBH)[ 0]=next__EZBH;
             } else {
-              ((__POINTER *)result__XU5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VU5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__XU5G=next__VU5G;
+              ((__POINTER *)result__GZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EZBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GZBH=next__EZBH;
             };
           };
-          ptr__JTMB=result__XU5G;
+          ptr__NTMB=result__GZBH;
         };
-        result__ITMB=((__ITM_STRING *)ptr__JTMB);
-        *(result__ITMB) = *(ITM_STRING__);
+        result__MTMB=((__ITM_STRING *)ptr__NTMB);
+        *(result__MTMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__ITMB)->parent_itm_constant__KSO.parent_itm_code__LVF.parent_itm_object__HDE.position__3CJ=__tmp__LSO;
-      result__OQO=result__ITMB;
+      ((__ITM_STRING *)result__MTMB)->parent_itm_constant__OSO.parent_itm_code__PVF.parent_itm_object__LDE.position__BDJ=__tmp__PSO;
+      result__SQO=result__MTMB;
     };
   };
-  return(result__OQO);
+  return(result__SQO);
 }
 
-static void* read_group__ZAHB(__PARSER *Self__0AHB)
+static void* read_group__3AHB(__PARSER *Self__4AHB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *e__2AHB;
-  __ITM_RESULT *result__AV5G,*result__WXWB;
-  __POINTER ptr__BV5G,ptr_table__KV5G,next__JV5G,result__LV5G;
-  __POINTER ptr_table__PV5G,next__OV5G,result__QV5G,ptr__XXWB;
-  __POINTER ptr_table__0V5G,next__ZV5G,result__1V5G,ptr_table__5V5G;
-  __POINTER next__4V5G,result__AW5G;
-  __INTEGER typ_id__CV5G,typ_id__2XWB;
-  __UINTEGER_32 sz__DV5G,a__EV5G,new_size__FV5G,t__GV5G,a__HV5G;
-  __UINTEGER_32 new_size__SV5G,lab_type__RV5G,sz__ZXWB,a__RS2G;
-  __UINTEGER_32 new_size__SS2G,t__WS2G,a__VS2G,new_size__CW5G;
-  __UINTEGER_32 lab_type__BW5G;
-  __POSITION pos__VUQG;
-  void *result__HJ3G,*result__3AHB;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__IJ3G,*Self__JJ3G;
-  __BOOLEAN result__0U5G,__tmp__MBHB,result__3U5G,result__TV5G;
-  __BOOLEAN __tmp__TCHB,result__WV5G;
-  __CHARACTER result__1U5G,result__4U5G,result__UV5G,result__XV5G;
-  read_def_local__N0H(Self__0AHB);
-  result__HJ3G=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H)->parent_arrayed_collection__Q3H.upper__YVT <  0)) {
-    result__HJ3G=create_with_capacity__CVI( 16);
+  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);
   } else {
-    Self__IJ3G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-    result__HJ3G=((void **)Self__IJ3G->parent_arrayed_collection__Q3H.storage__GAU)[Self__IJ3G->parent_arrayed_collection__Q3H.upper__YVT];
-    Self__JJ3G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-    Self__JJ3G->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(Self__JJ3G->parent_arrayed_collection__Q3H.upper__YVT -  1);
-  };
-  result__3AHB=result__HJ3G;
-  e__2AHB=read_expr__O4I(Self__0AHB);
-  while_do__MGMB:
+    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:
   {
-    if (((void *)e__2AHB != (void *)NULL)) {
-      result__0U5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__0U5G=FALSE__;
+    if (((void *)e__ABHB != (void *)NULL)) {
+      result__JZBH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__JZBH=FALSE__;
       } else {
-        result__1U5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__1U5G=((__CHARACTER )(( 0)));
+        result__KZBH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__KZBH=((__CHARACTER )(( 0)));
         } else {
-          result__1U5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__KZBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__1U5G == ';')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__0U5G=TRUE__;
+        if ((result__KZBH == ';')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__JZBH=TRUE__;
         };
       };
-      __tmp__MBHB=result__0U5G;
+      __tmp__QBHB=result__JZBH;
     } else {
-      __tmp__MBHB=FALSE__;
+      __tmp__QBHB=FALSE__;
     };
-    if (__tmp__MBHB) {
-      add_last__E5U(result__3AHB,e__2AHB);
-      e__2AHB=read_expr__O4I(Self__0AHB);
-      goto while_do__MGMB;
+    if (__tmp__QBHB) {
+      add_last__I5U(result__BBHB,e__ABHB);
+      e__ABHB=read_expr__S4I(Self__4AHB);
+      goto while_do__QGMB;
     };
   };
-  if (((void *)e__2AHB != (void *)NULL)) {
-    result__3U5G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__3U5G=FALSE__;
+  if (((void *)e__ABHB != (void *)NULL)) {
+    result__MZBH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__MZBH=FALSE__;
     } else {
-      result__4U5G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__4U5G=((__CHARACTER )(( 0)));
+      result__NZBH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__NZBH=((__CHARACTER )(( 0)));
       } else {
-        result__4U5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__NZBH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__4U5G == ',')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__3U5G=TRUE__;
+      if ((result__NZBH == ',')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__MZBH=TRUE__;
       };
     };
-    if (result__3U5G) {
+    if (result__MZBH) {
       do {
-        result__AV5G=NULL;
-        ptr__BV5G=((__POINTER )(NULL));
-        typ_id__CV5G= 0;
-        sz__DV5G=((__UINTEGER_32 )sizeof(__ITM_RESULT));
-        if ((sz__DV5G ==  0)) {
-          result__AV5G=ITM_RESULT__;
-        } else {
-          typ_id__CV5G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__DV5G);
-          if ((typ_id__CV5G == (__INTEGER)(-  1))) {
-            a__EV5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__FV5G=(__UINTEGER_32)((__UINTEGER_32)(sz__DV5G + a__EV5G) & (__UINTEGER_32)(~ a__EV5G));
-            ptr_table__KV5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FV5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__JV5G=((__POINTER )(NULL));
-            result__LV5G=((__POINTER *)ptr_table__KV5G)[ 0];
-            if ((result__LV5G == (void *)NULL)) {
-              result__LV5G=new_lab__2QJ(new_size__FV5G);
-              next__JV5G=(void *)((unsigned long)result__LV5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FV5G)));
-              ((__POINTER *)next__JV5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KV5G)[ 0]=next__JV5G;
+        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;
             } else {
-              next__JV5G=((__POINTER *)result__LV5G)[ 0];
-              if ((next__JV5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LV5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FV5G <<  1)) <=  4096)) {
-                  next__JV5G=(void *)((unsigned long)result__LV5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FV5G)));
+              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)));
                 } else {
-                  next__JV5G=new_lab__2QJ(new_size__FV5G);
+                  next__YZBH=new_lab__ARJ(new_size__UZBH);
                 };
-                ((__POINTER *)next__JV5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KV5G)[ 0]=next__JV5G;
+                ((__POINTER *)next__YZBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZZBH)[ 0]=next__YZBH;
               } else {
-                ((__POINTER *)result__LV5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JV5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__LV5G=next__JV5G;
+                ((__POINTER *)result__0ZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YZBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0ZBH=next__YZBH;
               };
             };
-            ptr__BV5G=result__LV5G;
-          } else {
-            t__GV5G=((__UINTEGER_32 )typ_id__CV5G);
-            a__HV5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__SV5G=(__UINTEGER_32)((__UINTEGER_32)(sz__DV5G + a__HV5G) & (__UINTEGER_32)(~ a__HV5G));
-            ptr_table__PV5G=((__POINTER )(&(table_type[(t__GV5G)])));
-            lab_type__RV5G=(__UINTEGER_32)(t__GV5G |  1);
-            next__OV5G=((__POINTER )(NULL));
-            result__QV5G=((__POINTER *)ptr_table__PV5G)[ 0];
-            if ((result__QV5G == (void *)NULL)) {
-              result__QV5G=new_lab__2QJ(lab_type__RV5G);
-              next__OV5G=(void *)((unsigned long)result__QV5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SV5G)));
-              ((__POINTER *)next__OV5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PV5G)[ 0]=next__OV5G;
+            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;
             } else {
-              next__OV5G=((__POINTER *)result__QV5G)[ 0];
-              if ((next__OV5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QV5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SV5G <<  1)) <=  4096)) {
-                  next__OV5G=(void *)((unsigned long)result__QV5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SV5G)));
+              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)));
                 } else {
-                  next__OV5G=new_lab__2QJ(lab_type__RV5G);
+                  next__3ZBH=new_lab__ARJ(lab_type__A0BH);
                 };
-                ((__POINTER *)next__OV5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__PV5G)[ 0]=next__OV5G;
+                ((__POINTER *)next__3ZBH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4ZBH)[ 0]=next__3ZBH;
               } else {
-                ((__POINTER *)result__QV5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__OV5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__QV5G=next__OV5G;
+                ((__POINTER *)result__5ZBH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3ZBH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5ZBH=next__3ZBH;
               };
             };
-            ptr__BV5G=result__QV5G;
+            ptr__QZBH=result__5ZBH;
           };
-          result__AV5G=((__ITM_RESULT *)ptr__BV5G);
-          *(result__AV5G) = *(ITM_RESULT__);
+          result__PZBH=((__ITM_RESULT *)ptr__QZBH);
+          *(result__PZBH) = *(ITM_RESULT__);
         };
-        ((__ITM_RESULT *)result__AV5G)->value__2KFC=e__2AHB;
-        add_last__E5U(result__3AHB,result__AV5G);
-        e__2AHB=read_expr__O4I(Self__0AHB);
-        while_do__K03B:
+        ((__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:
         {
-          if (((void *)e__2AHB != (void *)NULL)) {
-            result__TV5G=FALSE__;
-            if ((! read_space__NRD())) {
-              result__TV5G=FALSE__;
+          if (((void *)e__ABHB != (void *)NULL)) {
+            result__C0BH=FALSE__;
+            if ((! read_space__RRD())) {
+              result__C0BH=FALSE__;
             } else {
-              result__UV5G='\0';
-              if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-                result__UV5G=((__CHARACTER )(( 0)));
+              result__D0BH='\0';
+              if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+                result__D0BH=((__CHARACTER )(( 0)));
               } else {
-                result__UV5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+                result__D0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
               };
-              if ((result__UV5G == ';')) {
-                position__CBC=(__INTEGER)(position__CBC +  1);
-                result__TV5G=TRUE__;
+              if ((result__D0BH == ';')) {
+                position__GBC=(__INTEGER)(position__GBC +  1);
+                result__C0BH=TRUE__;
               };
             };
-            __tmp__TCHB=result__TV5G;
+            __tmp__XCHB=result__C0BH;
           } else {
-            __tmp__TCHB=FALSE__;
+            __tmp__XCHB=FALSE__;
           };
-          if (__tmp__TCHB) {
-            add_last__E5U(result__3AHB,e__2AHB);
-            e__2AHB=read_expr__O4I(Self__0AHB);
-            goto while_do__K03B;
+          if (__tmp__XCHB) {
+            add_last__I5U(result__BBHB,e__ABHB);
+            e__ABHB=read_expr__S4I(Self__4AHB);
+            goto while_do__O03B;
           };
         };
-        if (((void *)e__2AHB == (void *)NULL)) {
-          pos__VUQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_310));
-          put_position__EOG(pos__VUQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+        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)) {
             exit(( 1));
           };
         };
-        result__WV5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__WV5G=FALSE__;
-        } else {
-          result__XV5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__XV5G=((__CHARACTER )(( 0)));
-          } else {
-            result__XV5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
-          };
-          if ((result__XV5G == ',')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__WV5G=TRUE__;
-          };
-        };
-      } while (result__WV5G);
-    };
-    result__WXWB=NULL;
-    ptr__XXWB=((__POINTER )(NULL));
-    typ_id__2XWB= 0;
-    sz__ZXWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
-    if ((sz__ZXWB ==  0)) {
-      result__WXWB=ITM_RESULT__;
-    } else {
-      typ_id__2XWB=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__ZXWB);
-      if ((typ_id__2XWB == (__INTEGER)(-  1))) {
-        a__RS2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__SS2G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZXWB + a__RS2G) & (__UINTEGER_32)(~ a__RS2G));
-        ptr_table__0V5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SS2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ZV5G=((__POINTER )(NULL));
-        result__1V5G=((__POINTER *)ptr_table__0V5G)[ 0];
-        if ((result__1V5G == (void *)NULL)) {
-          result__1V5G=new_lab__2QJ(new_size__SS2G);
-          next__ZV5G=(void *)((unsigned long)result__1V5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SS2G)));
-          ((__POINTER *)next__ZV5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0V5G)[ 0]=next__ZV5G;
-        } else {
-          next__ZV5G=((__POINTER *)result__1V5G)[ 0];
-          if ((next__ZV5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1V5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SS2G <<  1)) <=  4096)) {
-              next__ZV5G=(void *)((unsigned long)result__1V5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SS2G)));
+        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)));
             } else {
-              next__ZV5G=new_lab__2QJ(new_size__SS2G);
-            };
-            ((__POINTER *)next__ZV5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0V5G)[ 0]=next__ZV5G;
-          } else {
-            ((__POINTER *)result__1V5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZV5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1V5G=next__ZV5G;
-          };
-        };
-        ptr__XXWB=result__1V5G;
-      } else {
-        t__WS2G=((__UINTEGER_32 )typ_id__2XWB);
-        a__VS2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__CW5G=(__UINTEGER_32)((__UINTEGER_32)(sz__ZXWB + a__VS2G) & (__UINTEGER_32)(~ a__VS2G));
-        ptr_table__5V5G=((__POINTER )(&(table_type[(t__WS2G)])));
-        lab_type__BW5G=(__UINTEGER_32)(t__WS2G |  1);
-        next__4V5G=((__POINTER )(NULL));
-        result__AW5G=((__POINTER *)ptr_table__5V5G)[ 0];
-        if ((result__AW5G == (void *)NULL)) {
-          result__AW5G=new_lab__2QJ(lab_type__BW5G);
-          next__4V5G=(void *)((unsigned long)result__AW5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CW5G)));
-          ((__POINTER *)next__4V5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5V5G)[ 0]=next__4V5G;
-        } else {
-          next__4V5G=((__POINTER *)result__AW5G)[ 0];
-          if ((next__4V5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AW5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CW5G <<  1)) <=  4096)) {
-              next__4V5G=(void *)((unsigned long)result__AW5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CW5G)));
+              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)));
             } else {
-              next__4V5G=new_lab__2QJ(lab_type__BW5G);
+              next__N0BH=new_lab__ARJ(lab_type__Q0BH);
             };
-            ((__POINTER *)next__4V5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5V5G)[ 0]=next__4V5G;
+            ((__POINTER *)next__N0BH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__O0BH)[ 0]=next__N0BH;
           } else {
-            ((__POINTER *)result__AW5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__4V5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__AW5G=next__4V5G;
+            ((__POINTER *)result__P0BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__P0BH=next__N0BH;
           };
         };
-        ptr__XXWB=result__AW5G;
+        ptr__1XWB=result__P0BH;
       };
-      result__WXWB=((__ITM_RESULT *)ptr__XXWB);
-      *(result__WXWB) = *(ITM_RESULT__);
+      result__0XWB=((__ITM_RESULT *)ptr__1XWB);
+      *(result__0XWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__WXWB)->value__2KFC=e__2AHB;
-    e__2AHB=result__WXWB;
-    add_last__E5U(result__HJ3G,result__WXWB);
+    ((__ITM_RESULT *)result__0XWB)->value__ALFC=e__ABHB;
+    e__ABHB=result__0XWB;
+    add_last__I5U(result__MM5G,result__0XWB);
   };
-  return(copy__A5H(result__HJ3G));
+  return(copy__E5H(result__MM5G));
 }
 
-static void* readlip_expr_operator__2NZB(__PARSER *Self__3NZB)
+static void* readlip_expr_operator__AOZB(__PARSER *Self__BOZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *right__AOZB,*result__5NZB;
-  __POSITION pos__LVQG,p__SW5G,p__JX5G;
-  __LIP_BINARY *result__JW5G,*Self__RW5G,*result__AX5G,*Self__IX5G;
-  __POINTER ptr__KW5G,ptr_table__XW5G,next__WW5G,result__YW5G;
-  __POINTER ptr_table__2W5G,next__1W5G,result__3W5G,ptr__BX5G;
-  __POINTER ptr_table__OX5G,next__NX5G,result__PX5G,ptr_table__TX5G;
-  __POINTER next__SX5G,result__UX5G;
-  __INTEGER typ_id__LW5G,typ_id__CX5G;
-  __UINTEGER_32 sz__MW5G,a__NW5G,new_size__OW5G,t__PW5G,a__QW5G;
-  __UINTEGER_32 new_size__5W5G,lab_type__4W5G,sz__DX5G,a__EX5G;
-  __UINTEGER_32 new_size__FX5G,t__GX5G,a__HX5G,new_size__WX5G;
-  __UINTEGER_32 lab_type__VX5G;
-  __BOOLEAN result__DW5G,__tmp__VOZB,result__GW5G;
-  __CHARACTER result__EW5G,result__HW5G;
-  right__AOZB=NULL;
-  result__5NZB=readlip_expr_cmp__Q01B(Self__3NZB);
-  if (((void *)result__5NZB != (void *)NULL)) {
-    while_do__514B:
+  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:
     {
-      result__DW5G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__DW5G=FALSE__;
+      result__S0BH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__S0BH=FALSE__;
       } else {
-        result__EW5G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__EW5G=((__CHARACTER )(( 0)));
+        result__T0BH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__T0BH=((__CHARACTER )(( 0)));
         } else {
-          result__EW5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__T0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__EW5G == '|')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__DW5G=TRUE__;
+        if ((result__T0BH == '|')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__S0BH=TRUE__;
         };
       };
-      if (result__DW5G) {
-        __tmp__VOZB=TRUE__;
+      if (result__S0BH) {
+        __tmp__ZOZB=TRUE__;
       } else {
-        result__GW5G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__GW5G=FALSE__;
+        result__V0BH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__V0BH=FALSE__;
         } else {
-          result__HW5G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__HW5G=((__CHARACTER )(( 0)));
+          result__W0BH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__W0BH=((__CHARACTER )(( 0)));
           } else {
-            result__HW5G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__W0BH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__HW5G == '&')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__GW5G=TRUE__;
+          if ((result__W0BH == '&')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__V0BH=TRUE__;
           };
         };
-        __tmp__VOZB=result__GW5G;
+        __tmp__ZOZB=result__V0BH;
       };
-      if (__tmp__VOZB) {
-        right__AOZB=readlip_expr_cmp__Q01B(Self__3NZB);
-        if (((void *)right__AOZB == (void *)NULL)) {
-          pos__LVQG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_225));
-          put_position__EOG(pos__LVQG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        if (result__DW5G) {
-          p__SW5G=current_position__ZWF();
-          result__JW5G=NULL;
-          ptr__KW5G=((__POINTER )(NULL));
-          typ_id__LW5G= 0;
-          sz__MW5G=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__MW5G ==  0)) {
-            result__JW5G=LIP_BINARY__;
-          } else {
-            typ_id__LW5G=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__MW5G);
-            if ((typ_id__LW5G == (__INTEGER)(-  1))) {
-              a__NW5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__OW5G=(__UINTEGER_32)((__UINTEGER_32)(sz__MW5G + a__NW5G) & (__UINTEGER_32)(~ a__NW5G));
-              ptr_table__XW5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OW5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__WW5G=((__POINTER )(NULL));
-              result__YW5G=((__POINTER *)ptr_table__XW5G)[ 0];
-              if ((result__YW5G == (void *)NULL)) {
-                result__YW5G=new_lab__2QJ(new_size__OW5G);
-                next__WW5G=(void *)((unsigned long)result__YW5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OW5G)));
-                ((__POINTER *)next__WW5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XW5G)[ 0]=next__WW5G;
+        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;
               } else {
-                next__WW5G=((__POINTER *)result__YW5G)[ 0];
-                if ((next__WW5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YW5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__OW5G <<  1)) <=  4096)) {
-                    next__WW5G=(void *)((unsigned long)result__YW5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OW5G)));
+                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)));
                   } else {
-                    next__WW5G=new_lab__2QJ(new_size__OW5G);
+                    next__F1BH=new_lab__ARJ(new_size__30BH);
                   };
-                  ((__POINTER *)next__WW5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XW5G)[ 0]=next__WW5G;
+                  ((__POINTER *)next__F1BH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__G1BH)[ 0]=next__F1BH;
                 } else {
-                  ((__POINTER *)result__YW5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__WW5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__YW5G=next__WW5G;
+                  ((__POINTER *)result__H1BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__H1BH=next__F1BH;
                 };
               };
-              ptr__KW5G=result__YW5G;
+              ptr__Z0BH=result__H1BH;
             } else {
-              t__PW5G=((__UINTEGER_32 )typ_id__LW5G);
-              a__QW5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__5W5G=(__UINTEGER_32)((__UINTEGER_32)(sz__MW5G + a__QW5G) & (__UINTEGER_32)(~ a__QW5G));
-              ptr_table__2W5G=((__POINTER )(&(table_type[(t__PW5G)])));
-              lab_type__4W5G=(__UINTEGER_32)(t__PW5G |  1);
-              next__1W5G=((__POINTER )(NULL));
-              result__3W5G=((__POINTER *)ptr_table__2W5G)[ 0];
-              if ((result__3W5G == (void *)NULL)) {
-                result__3W5G=new_lab__2QJ(lab_type__4W5G);
-                next__1W5G=(void *)((unsigned long)result__3W5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5W5G)));
-                ((__POINTER *)next__1W5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__2W5G)[ 0]=next__1W5G;
+              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;
               } else {
-                next__1W5G=((__POINTER *)result__3W5G)[ 0];
-                if ((next__1W5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3W5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__5W5G <<  1)) <=  4096)) {
-                    next__1W5G=(void *)((unsigned long)result__3W5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5W5G)));
+                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)));
                   } else {
-                    next__1W5G=new_lab__2QJ(lab_type__4W5G);
+                    next__K1BH=new_lab__ARJ(lab_type__N1BH);
                   };
-                  ((__POINTER *)next__1W5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__2W5G)[ 0]=next__1W5G;
+                  ((__POINTER *)next__K1BH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__L1BH)[ 0]=next__K1BH;
                 } else {
-                  ((__POINTER *)result__3W5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1W5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__3W5G=next__1W5G;
+                  ((__POINTER *)result__M1BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K1BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__M1BH=next__K1BH;
                 };
               };
-              ptr__KW5G=result__3W5G;
-            };
-            result__JW5G=((__LIP_BINARY *)ptr__KW5G);
-            *(result__JW5G) = *(LIP_BINARY__);
-          };
-          Self__RW5G=((__LIP_BINARY *)result__JW5G);
-          Self__RW5G->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ=p__SW5G;
-          Self__RW5G->left__2YQD=result__5NZB;
-          Self__RW5G->right__5YQD=right__AOZB;
-          Self__RW5G->operator__CZQD='|';
-          result__5NZB=result__JW5G;
-        } else {
-          p__JX5G=current_position__ZWF();
-          result__AX5G=NULL;
-          ptr__BX5G=((__POINTER )(NULL));
-          typ_id__CX5G= 0;
-          sz__DX5G=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__DX5G ==  0)) {
-            result__AX5G=LIP_BINARY__;
-          } else {
-            typ_id__CX5G=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__DX5G);
-            if ((typ_id__CX5G == (__INTEGER)(-  1))) {
-              a__EX5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__FX5G=(__UINTEGER_32)((__UINTEGER_32)(sz__DX5G + a__EX5G) & (__UINTEGER_32)(~ a__EX5G));
-              ptr_table__OX5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FX5G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__NX5G=((__POINTER )(NULL));
-              result__PX5G=((__POINTER *)ptr_table__OX5G)[ 0];
-              if ((result__PX5G == (void *)NULL)) {
-                result__PX5G=new_lab__2QJ(new_size__FX5G);
-                next__NX5G=(void *)((unsigned long)result__PX5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FX5G)));
-                ((__POINTER *)next__NX5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__OX5G)[ 0]=next__NX5G;
+              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;
               } else {
-                next__NX5G=((__POINTER *)result__PX5G)[ 0];
-                if ((next__NX5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PX5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__FX5G <<  1)) <=  4096)) {
-                    next__NX5G=(void *)((unsigned long)result__PX5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FX5G)));
+                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)));
                   } else {
-                    next__NX5G=new_lab__2QJ(new_size__FX5G);
+                    next__21BH=new_lab__ARJ(new_size__U1BH);
                   };
-                  ((__POINTER *)next__NX5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__OX5G)[ 0]=next__NX5G;
+                  ((__POINTER *)next__21BH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__31BH)[ 0]=next__21BH;
                 } else {
-                  ((__POINTER *)result__PX5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__NX5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__PX5G=next__NX5G;
+                  ((__POINTER *)result__41BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__21BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__41BH=next__21BH;
                 };
               };
-              ptr__BX5G=result__PX5G;
+              ptr__Q1BH=result__41BH;
             } else {
-              t__GX5G=((__UINTEGER_32 )typ_id__CX5G);
-              a__HX5G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__WX5G=(__UINTEGER_32)((__UINTEGER_32)(sz__DX5G + a__HX5G) & (__UINTEGER_32)(~ a__HX5G));
-              ptr_table__TX5G=((__POINTER )(&(table_type[(t__GX5G)])));
-              lab_type__VX5G=(__UINTEGER_32)(t__GX5G |  1);
-              next__SX5G=((__POINTER )(NULL));
-              result__UX5G=((__POINTER *)ptr_table__TX5G)[ 0];
-              if ((result__UX5G == (void *)NULL)) {
-                result__UX5G=new_lab__2QJ(lab_type__VX5G);
-                next__SX5G=(void *)((unsigned long)result__UX5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WX5G)));
-                ((__POINTER *)next__SX5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__TX5G)[ 0]=next__SX5G;
+              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;
               } else {
-                next__SX5G=((__POINTER *)result__UX5G)[ 0];
-                if ((next__SX5G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UX5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__WX5G <<  1)) <=  4096)) {
-                    next__SX5G=(void *)((unsigned long)result__UX5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WX5G)));
+                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)));
                   } else {
-                    next__SX5G=new_lab__2QJ(lab_type__VX5G);
+                    next__B2BH=new_lab__ARJ(lab_type__E2BH);
                   };
-                  ((__POINTER *)next__SX5G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__TX5G)[ 0]=next__SX5G;
+                  ((__POINTER *)next__B2BH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__C2BH)[ 0]=next__B2BH;
                 } else {
-                  ((__POINTER *)result__UX5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__SX5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__UX5G=next__SX5G;
+                  ((__POINTER *)result__D2BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B2BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__D2BH=next__B2BH;
                 };
               };
-              ptr__BX5G=result__UX5G;
+              ptr__Q1BH=result__D2BH;
             };
-            result__AX5G=((__LIP_BINARY *)ptr__BX5G);
-            *(result__AX5G) = *(LIP_BINARY__);
+            result__P1BH=((__LIP_BINARY *)ptr__Q1BH);
+            *(result__P1BH) = *(LIP_BINARY__);
           };
-          Self__IX5G=((__LIP_BINARY *)result__AX5G);
-          Self__IX5G->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ=p__JX5G;
-          Self__IX5G->left__2YQD=result__5NZB;
-          Self__IX5G->right__5YQD=right__AOZB;
-          Self__IX5G->operator__CZQD='&';
-          result__5NZB=result__AX5G;
+          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;
         };
-        goto while_do__514B;
+        goto while_do__D24B;
       };
     };
   };
-  return(result__5NZB);
+  return(result__DOZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__MQKD(__INTEGER new_count__OQKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__QQKD(__INTEGER new_count__SQKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__C1LD,ptr_table__YX5G,next__XX5G,result__ZX5G;
-  __POINTER ptr_table__3X5G,next__2X5G,result__4X5G;
-  __INTEGER typ_id__H1LD;
-  __UINTEGER_32 sz__E1LD,a__BT2G,new_size__CT2G,t__GT2G,a__FT2G;
-  __UINTEGER_32 new_size__AY5G,lab_type__5X5G;
-  __FAST_ARRAYoLIP_CODEo *result__B1LD,*Self__P3TD;
-  result__B1LD=NULL;
-  ptr__C1LD=((__POINTER )(NULL));
-  typ_id__H1LD= 0;
-  sz__E1LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
-  if ((sz__E1LD ==  0)) {
-    result__B1LD=FAST_ARRAYoLIP_CODEo__;
+  __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__;
   } else {
-    typ_id__H1LD=__FAST_ARRAYoLIP_CODEo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__E1LD);
-    if ((typ_id__H1LD == (__INTEGER)(-  1))) {
-      a__BT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__CT2G=(__UINTEGER_32)((__UINTEGER_32)(sz__E1LD + a__BT2G) & (__UINTEGER_32)(~ a__BT2G));
-      ptr_table__YX5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CT2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__XX5G=((__POINTER )(NULL));
-      result__ZX5G=((__POINTER *)ptr_table__YX5G)[ 0];
-      if ((result__ZX5G == (void *)NULL)) {
-        result__ZX5G=new_lab__2QJ(new_size__CT2G);
-        next__XX5G=(void *)((unsigned long)result__ZX5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CT2G)));
-        ((__POINTER *)next__XX5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YX5G)[ 0]=next__XX5G;
-      } else {
-        next__XX5G=((__POINTER *)result__ZX5G)[ 0];
-        if ((next__XX5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZX5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__CT2G <<  1)) <=  4096)) {
-            next__XX5G=(void *)((unsigned long)result__ZX5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CT2G)));
-          } else {
-            next__XX5G=new_lab__2QJ(new_size__CT2G);
-          };
-          ((__POINTER *)next__XX5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YX5G)[ 0]=next__XX5G;
-        } else {
-          ((__POINTER *)result__ZX5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__XX5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZX5G=next__XX5G;
-        };
-      };
-      ptr__C1LD=result__ZX5G;
-    } else {
-      t__GT2G=((__UINTEGER_32 )typ_id__H1LD);
-      a__FT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__AY5G=(__UINTEGER_32)((__UINTEGER_32)(sz__E1LD + a__FT2G) & (__UINTEGER_32)(~ a__FT2G));
-      ptr_table__3X5G=((__POINTER )(&(table_type[(t__GT2G)])));
-      lab_type__5X5G=(__UINTEGER_32)(t__GT2G |  1);
-      next__2X5G=((__POINTER )(NULL));
-      result__4X5G=((__POINTER *)ptr_table__3X5G)[ 0];
-      if ((result__4X5G == (void *)NULL)) {
-        result__4X5G=new_lab__2QJ(lab_type__5X5G);
-        next__2X5G=(void *)((unsigned long)result__4X5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AY5G)));
-        ((__POINTER *)next__2X5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3X5G)[ 0]=next__2X5G;
-      } else {
-        next__2X5G=((__POINTER *)result__4X5G)[ 0];
-        if ((next__2X5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4X5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AY5G <<  1)) <=  4096)) {
-            next__2X5G=(void *)((unsigned long)result__4X5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AY5G)));
-          } else {
-            next__2X5G=new_lab__2QJ(lab_type__5X5G);
-          };
-          ((__POINTER *)next__2X5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3X5G)[ 0]=next__2X5G;
-        } else {
-          ((__POINTER *)result__4X5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__2X5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4X5G=next__2X5G;
-        };
-      };
-      ptr__C1LD=result__4X5G;
-    };
-    result__B1LD=((__FAST_ARRAYoLIP_CODEo *)ptr__C1LD);
-    *(result__B1LD) = *(FAST_ARRAYoLIP_CODEo__);
-  };
-  Self__P3TD=((__FAST_ARRAYoLIP_CODEo *)result__B1LD);
-  if ((Self__P3TD->parent_arrayed_collection__3KYC.capacity__VOTD < new_count__OQKD)) {
-    Self__P3TD->parent_arrayed_collection__3KYC.storage__APTD=create__1CIE(new_count__OQKD);
-    Self__P3TD->parent_arrayed_collection__3KYC.capacity__VOTD=new_count__OQKD;
-  };
-  Self__P3TD->parent_arrayed_collection__3KYC.upper__MDQD=(__INTEGER)(-  1);
-  return(result__B1LD);
+    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);
 }
 
-static void add_last__DIUD(__FAST_ARRAYoLIP_CODEo *Self__EIUD,void *element__FIUD)
+static void add_last__QIUD(__FAST_ARRAYoLIP_CODEo *Self__RIUD,void *element__SIUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__GIUD,__tmp__KJUD,__tmp__OSVE,Self__R2NF;
-  __BOOLEAN __tmp__UIUD;
-  void **__tmp__JJUD,**new__0RVE;
-  new_capacity__GIUD= 0;
-  if (((__INTEGER)(Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD +  1) <= (__INTEGER)(Self__EIUD->parent_arrayed_collection__3KYC.capacity__VOTD -  1))) {
-    Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD=(__INTEGER)(Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD +  1);
-    __tmp__UIUD=TRUE__;
+  __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__;
   } else {
-    __tmp__UIUD=FALSE__;
-  };
-  if ((! __tmp__UIUD)) {
-    if ((Self__EIUD->parent_arrayed_collection__3KYC.capacity__VOTD ==  0)) {
-      Self__EIUD->parent_arrayed_collection__3KYC.storage__APTD=create__1CIE( 2);
-      Self__EIUD->parent_arrayed_collection__3KYC.capacity__VOTD= 2;
-      Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD= 0;
-    } else {
-      new_capacity__GIUD=(__INTEGER)(Self__EIUD->parent_arrayed_collection__3KYC.capacity__VOTD <<  1);
-      __tmp__JJUD=Self__EIUD->parent_arrayed_collection__3KYC.storage__APTD;
-      __tmp__KJUD=Self__EIUD->parent_arrayed_collection__3KYC.capacity__VOTD;
-      new__0RVE=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__JJUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__KJUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__GIUD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__OSVE=(__INTEGER)(new_capacity__GIUD -  1);
-      Self__R2NF=__tmp__KJUD;
-      while ((Self__R2NF <= __tmp__OSVE)) {
-        new__0RVE[Self__R2NF]=NULL;
-        Self__R2NF=(__INTEGER)(Self__R2NF +  1);
-      };
-      Self__EIUD->parent_arrayed_collection__3KYC.storage__APTD=new__0RVE;
-      Self__EIUD->parent_arrayed_collection__3KYC.capacity__VOTD=new_capacity__GIUD;
-      Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD=(__INTEGER)(Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD +  1);
-    };
-  };
-  ((void **)Self__EIUD->parent_arrayed_collection__3KYC.storage__APTD)[Self__EIUD->parent_arrayed_collection__3KYC.upper__MDQD]=element__FIUD;
+    __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;
 }
 
-static void* copy__YKID(void *tmp__0KID)
+static void* copy__2KID(void *tmp__4KID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__MOTD,other_upper__LOTD,Self__JDXE;
-  __INTEGER new_capacity__I5TD,__tmp__QAUD,__tmp__0QVE,Self__S0NF;
-  void *result__2KID;
-  __FAST_ARRAYoLIP_CODEo *Self__JOTD;
-  void **__tmp__DPTD,**__tmp__FPTD,**Self__ZHVE;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__G5TD;
-  __BOOLEAN __tmp__X5TD;
-  void **__tmp__PAUD,**new__GQVE;
-  result__2KID=create_with_capacity__MQKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__0KID)->parent_arrayed_collection__3KYC.upper__MDQD +  1));
-  Self__JOTD=((__FAST_ARRAYoLIP_CODEo *)result__2KID);
-  new_capacity__MOTD= 0;
-  other_upper__LOTD=((__FAST_ARRAYoLIP_CODEo *)tmp__0KID)->parent_arrayed_collection__3KYC.upper__MDQD;
-  if ((other_upper__LOTD >=  0)) {
-    new_capacity__MOTD=(__INTEGER)(other_upper__LOTD +  1);
-    if ((Self__JOTD->parent_arrayed_collection__3KYC.capacity__VOTD < new_capacity__MOTD)) {
-      Self__JOTD->parent_arrayed_collection__3KYC.storage__APTD=create__1CIE(new_capacity__MOTD);
-      Self__JOTD->parent_arrayed_collection__3KYC.capacity__VOTD=new_capacity__MOTD;
-    };
-    __tmp__DPTD=Self__JOTD->parent_arrayed_collection__3KYC.storage__APTD;
-    __tmp__FPTD=((__FAST_ARRAYoLIP_CODEo *)tmp__0KID)->parent_arrayed_collection__3KYC.storage__APTD;
-    Self__ZHVE=((void **)__tmp__DPTD);
-    Self__JDXE=other_upper__LOTD;
-    while ((Self__JDXE >=  0)) {
-      Self__ZHVE[Self__JDXE]=((void **)__tmp__FPTD)[Self__JDXE];
-      Self__JDXE=(__INTEGER)(Self__JDXE -  1);
-    };
-  };
-  Self__JOTD->parent_arrayed_collection__3KYC.upper__MDQD=other_upper__LOTD;
-  ((__FAST_ARRAYoLIP_CODEo *)tmp__0KID)->parent_arrayed_collection__3KYC.upper__MDQD=(__INTEGER)(-  1);
-  Self__G5TD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__WJID);
-  new_capacity__I5TD= 0;
-  if (((__INTEGER)(Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD +  1) <= (__INTEGER)(Self__G5TD->parent_arrayed_collection__VJID.capacity__K5TD -  1))) {
-    Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD=(__INTEGER)(Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD +  1);
-    __tmp__X5TD=TRUE__;
+  __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__;
   } else {
-    __tmp__X5TD=FALSE__;
-  };
-  if ((! __tmp__X5TD)) {
-    if ((Self__G5TD->parent_arrayed_collection__VJID.capacity__K5TD ==  0)) {
-      Self__G5TD->parent_arrayed_collection__VJID.storage__GAUD=create__PIIE( 2);
-      Self__G5TD->parent_arrayed_collection__VJID.capacity__K5TD= 2;
-      Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD= 0;
-    } else {
-      new_capacity__I5TD=(__INTEGER)(Self__G5TD->parent_arrayed_collection__VJID.capacity__K5TD <<  1);
-      __tmp__PAUD=Self__G5TD->parent_arrayed_collection__VJID.storage__GAUD;
-      __tmp__QAUD=Self__G5TD->parent_arrayed_collection__VJID.capacity__K5TD;
-      new__GQVE=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__PAUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__QAUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__I5TD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__0QVE=(__INTEGER)(new_capacity__I5TD -  1);
-      Self__S0NF=__tmp__QAUD;
-      while ((Self__S0NF <= __tmp__0QVE)) {
-        new__GQVE[Self__S0NF]=NULL;
-        Self__S0NF=(__INTEGER)(Self__S0NF +  1);
-      };
-      Self__G5TD->parent_arrayed_collection__VJID.storage__GAUD=new__GQVE;
-      Self__G5TD->parent_arrayed_collection__VJID.capacity__K5TD=new_capacity__I5TD;
-      Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD=(__INTEGER)(Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD +  1);
-    };
-  };
-  ((void **)Self__G5TD->parent_arrayed_collection__VJID.storage__GAUD)[Self__G5TD->parent_arrayed_collection__VJID.upper__JNTD]=tmp__0KID;
-  return(result__2KID);
+    __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);
 }
 
-static void* fast_reference_at__4TRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__5TRD,void *k__AURD)
+static void* fast_reference_at__CURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__DURD,void *k__EURD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__F13G;
-  __INTEGER result__E13G,__tmp__G13G,Self__H13G;
-  void *node__KURD;
-  __BOOLEAN __tmp__CVRD;
-  Self__F13G=((__STRING_CONSTANT *)k__AURD);
-  result__E13G= 0;
-  __tmp__G13G=Self__F13G->count__DD;
-  Self__H13G= 1;
-  while ((Self__H13G <= __tmp__G13G)) {
-    result__E13G=(__INTEGER)((__INTEGER)( 5 * result__E13G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__F13G->storage__FQO)[(__INTEGER)(Self__H13G -  1)])));
-    Self__H13G=(__INTEGER)(Self__H13G +  1);
-  };
-  if ((result__E13G <  0)) {
-    result__E13G=(__INTEGER)(~ result__E13G);
-  };
-  node__KURD=((void **)Self__5TRD->buckets__SURD)[(__INTEGER)(result__E13G % Self__5TRD->capacity__NURD)];
-  until_do__ZEWD:
+  __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:
   {
-    if (((void *)node__KURD == (void *)NULL)) {
-      __tmp__CVRD=TRUE__;
+    if (((void *)node__OURD == (void *)NULL)) {
+      __tmp__GVRD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__CVRD=((void *)NULL == (void *)k__AURD);
+      __tmp__GVRD=((void *)NULL == (void *)k__EURD);
     };
-    if ((! __tmp__CVRD)) {
+    if ((! __tmp__GVRD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__KURD=NULL;
-      goto until_do__ZEWD;
+      node__OURD=NULL;
+      goto until_do__GFWD;
     };
   };
-  if (((void *)node__KURD != (void *)NULL)) {
+  if (((void *)node__OURD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__WYQD(__LIP_BINARY *Self__XYQD)
+static void* run_expr__0YQD(__LIP_BINARY *Self__1YQD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  void *result__ZYQD,*__tmp__4YQD,*__tmp__CY5G,*__tmp__DY5G,*__tmp__BZQD;
-  void *__tmp__HY5G,*__tmp__IY5G,*result__PYZF,*__tmp__JZQD;
-  void *result__5YZF,*result__RZZF,*__tmp__QZQD,*result__B0ZF;
-  void *result__T0ZF,*__tmp__XZQD,*result__D1ZF,*result__TKBG;
-  void *result__V1ZF,*__tmp__4ZQD,*result__F2ZF,*result__ELBG;
-  void *__tmp__F0QD,*result__H3ZF,*__tmp__M0QD,*result__J4ZF;
-  void *__tmp__T0QD,*result__L5ZF,*__tmp__00QD,*result__NA0F;
-  void *__tmp__B1QD,*result__PB0F,*result__ZNBG,*__tmp__I1QD;
-  void *result__RC0F;
-  void *__tmp__3YQD,*__tmp__AZQD;
-  __LIP_INTEGER *Self__EY5G,*Self__JY5G,*Self__2YZF,*__tmp__CZZF;
-  __LIP_INTEGER *s__AZZF,*Self__4ZZF,*__tmp__E0ZF,*s__C0ZF,*Self__A1ZF;
-  __LIP_INTEGER *__tmp__G1ZF,*s__E1ZF,*Self__C2ZF,*__tmp__I2ZF,*s__G2ZF;
-  __LIP_INTEGER *Self__E3ZF,*__tmp__K3ZF,*s__I3ZF,*Self__G4ZF;
-  __LIP_INTEGER *__tmp__M4ZF,*s__K4ZF,*Self__I5ZF,*__tmp__O5ZF,*s__M5ZF;
-  __LIP_INTEGER *Self__KA0F,*__tmp__QA0F,*s__OA0F,*Self__MB0F;
-  __LIP_INTEGER *__tmp__SB0F,*s__QB0F,*Self__OC0F,*__tmp__UC0F,*s__SC0F;
-  __LIP_STRING *Self__FY5G,*Self__KY5G,*__tmp__UJBG,*s__SJBG;
-  __LIP_STRING *__tmp__FKBG,*s__DKBG,*Self__QKBG,*__tmp__WKBG,*s__UKBG;
-  __LIP_STRING *Self__BLBG,*__tmp__HLBG,*s__FLBG,*__tmp__YLBG,*s__WLBG;
-  __LIP_STRING *__tmp__JMBG,*s__HMBG,*__tmp__0MBG,*s__YMBG,*__tmp__LNBG;
-  __LIP_STRING *s__JNBG,*Self__WNBG,*__tmp__2NBG,*s__0NBG,*__tmp__NOBG;
-  __LIP_STRING *s__LOBG;
-  __LIP_BOOLEAN *Self__MYZF,*__tmp__SYZF,*s__QYZF,*Self__OZZF;
-  __LIP_BOOLEAN *__tmp__UZZF,*s__SZZF,*Self__Q0ZF,*__tmp__W0ZF,*s__U0ZF;
-  __LIP_BOOLEAN *Self__S1ZF,*__tmp__Y1ZF,*s__W1ZF,*__tmp__02ZF,*s__Y2ZF;
-  __LIP_BOOLEAN *__tmp__23ZF,*s__03ZF,*__tmp__44ZF,*s__24ZF,*__tmp__AA0F;
-  __LIP_BOOLEAN *s__45ZF,*__tmp__CB0F,*s__AB0F,*__tmp__EC0F,*s__CC0F;
-  void *result__VQ0G,*result__XQ0G,*result__ZQ0G,*result__1Q0G;
-  void *result__3Q0G,*result__5Q0G,*result__BR0G,*result__DR0G;
-  void *result__FR0G,*result__HR0G,*result__JR0G,*result__LR0G;
-  __POSITION __tmp__R1QD;
-  __CHARACTER Self__EQVD;
-  __BOOLEAN b__WQ0G,b__YQ0G,b__0Q0G,b__2Q0G,b__4Q0G,b__AR0G,b__CR0G;
-  __BOOLEAN b__ER0G,b__GR0G,b__IR0G,b__KR0G,b__MR0G;
-  result__ZYQD=NULL;
-  __tmp__3YQD=Self__XYQD->left__2YQD;
-  switch (((struct ___OBJ *)__tmp__3YQD)->__id) {
+  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) {
   case __LIP_BINARY__: {
-    __tmp__4YQD=run_expr__WYQD(__tmp__3YQD);
+    __tmp__CZQD=run_expr__0YQD(__tmp__BZQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__4YQD=run_expr__V1QD(__tmp__3YQD);
+    __tmp__CZQD=run_expr__Z1QD(__tmp__BZQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__4YQD=run_expr__FRTE(__tmp__3YQD);
+    __tmp__CZQD=run_expr__XTTE(__tmp__BZQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__CY5G=((__LIP_VALUE *)__tmp__3YQD)->value__FVTE;
-    switch (((struct ___OBJ *)__tmp__CY5G)->__id) {
+    __tmp__R2BH=((__LIP_VALUE *)__tmp__BZQD)->value__XXTE;
+    switch (((struct ___OBJ *)__tmp__R2BH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__DY5G=((__LIP_BOOLEAN *)__tmp__CY5G);
+      __tmp__S2BH=((__LIP_BOOLEAN *)__tmp__R2BH);
     } break;
     case __LIP_INTEGER__: {
-      Self__EY5G=((__LIP_INTEGER *)__tmp__CY5G);
-      __tmp__DY5G=get__WTRE(Self__EY5G,Self__EY5G->value__ED0F);
+      Self__T2BH=((__LIP_INTEGER *)__tmp__R2BH);
+      __tmp__S2BH=get__IWRE(Self__T2BH,Self__T2BH->value__G31F);
     } break;
     case __LIP_STRING__: {
-      Self__FY5G=((__LIP_STRING *)__tmp__CY5G);
-      __tmp__DY5G=get__N2DF(Self__FY5G,Self__FY5G->value__TMTE);
+      Self__U2BH=((__LIP_STRING *)__tmp__R2BH);
+      __tmp__S2BH=get__3HEF(Self__U2BH,Self__U2BH->value__FPTE);
     } break;
     };
-    __tmp__4YQD=__tmp__DY5G;
+    __tmp__CZQD=__tmp__S2BH;
   } break;
   };
-  __tmp__AZQD=Self__XYQD->right__5YQD;
-  switch (((struct ___OBJ *)__tmp__AZQD)->__id) {
+  __tmp__EZQD=Self__1YQD->right__DZQD;
+  switch (((struct ___OBJ *)__tmp__EZQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__BZQD=run_expr__WYQD(__tmp__AZQD);
+    __tmp__FZQD=run_expr__0YQD(__tmp__EZQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__BZQD=run_expr__V1QD(__tmp__AZQD);
+    __tmp__FZQD=run_expr__Z1QD(__tmp__EZQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__BZQD=run_expr__FRTE(__tmp__AZQD);
+    __tmp__FZQD=run_expr__XTTE(__tmp__EZQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__HY5G=((__LIP_VALUE *)__tmp__AZQD)->value__FVTE;
-    switch (((struct ___OBJ *)__tmp__HY5G)->__id) {
+    __tmp__W2BH=((__LIP_VALUE *)__tmp__EZQD)->value__XXTE;
+    switch (((struct ___OBJ *)__tmp__W2BH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__IY5G=((__LIP_BOOLEAN *)__tmp__HY5G);
+      __tmp__X2BH=((__LIP_BOOLEAN *)__tmp__W2BH);
     } break;
     case __LIP_INTEGER__: {
-      Self__JY5G=((__LIP_INTEGER *)__tmp__HY5G);
-      __tmp__IY5G=get__WTRE(Self__JY5G,Self__JY5G->value__ED0F);
+      Self__Y2BH=((__LIP_INTEGER *)__tmp__W2BH);
+      __tmp__X2BH=get__IWRE(Self__Y2BH,Self__Y2BH->value__G31F);
     } break;
     case __LIP_STRING__: {
-      Self__KY5G=((__LIP_STRING *)__tmp__HY5G);
-      __tmp__IY5G=get__N2DF(Self__KY5G,Self__KY5G->value__TMTE);
+      Self__Z2BH=((__LIP_STRING *)__tmp__W2BH);
+      __tmp__X2BH=get__3HEF(Self__Z2BH,Self__Z2BH->value__FPTE);
     } break;
     };
-    __tmp__BZQD=__tmp__IY5G;
+    __tmp__FZQD=__tmp__X2BH;
   } break;
   };
-  Self__EQVD=Self__XYQD->operator__CZQD;
-  if ((Self__EQVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  Self__RQVD=Self__1YQD->operator__GZQD;
+  if ((Self__RQVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__MYZF=((__LIP_BOOLEAN *)__tmp__4YQD);
-      result__PYZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__SYZF=NULL;
+      Self__OS1F=((__LIP_BOOLEAN *)__tmp__CZQD);
+      result__RS1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__US1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__SYZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__US1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__SYZF=NULL;
+          __tmp__US1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__SYZF=NULL;
+          __tmp__US1F=NULL;
         } break;
         }
       };
-      s__QYZF=__tmp__SYZF;
-      if (((void *)__tmp__SYZF != (void *)NULL)) {
-        b__WQ0G=(Self__MYZF->value__5CQD | __tmp__SYZF->value__5CQD);
-        result__VQ0G=NULL;
-        if (b__WQ0G) {
-          result__VQ0G=true__AMJF;
+      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;
         } else {
-          result__VQ0G=LIP_BOOLEAN__;
+          result__SQ2G=LIP_BOOLEAN__;
         };
-        result__PYZF=result__VQ0G;
+        result__RS1F=result__SQ2G;
       };
-      __tmp__JZQD=result__PYZF;
+      __tmp__NZQD=result__RS1F;
     } break;
     case __LIP_INTEGER__: {
-      Self__2YZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__5YZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__CZZF=NULL;
+      Self__4S1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__BT1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__ET1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CZZF=NULL;
+          __tmp__ET1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CZZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__ET1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__CZZF=NULL;
+          __tmp__ET1F=NULL;
         } break;
         }
       };
-      s__AZZF=__tmp__CZZF;
-      if (((void *)__tmp__CZZF != (void *)NULL)) {
-        Self__2YZF->value__ED0F=(__INTEGER)(Self__2YZF->value__ED0F | __tmp__CZZF->value__ED0F);
-        free__2XZF(__tmp__CZZF);
-        result__5YZF=Self__2YZF;
+      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;
       };
-      __tmp__JZQD=result__5YZF;
+      __tmp__NZQD=result__BT1F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__UJBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__QEDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__UJBG=NULL;
+          __tmp__QEDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__UJBG=NULL;
+          __tmp__QEDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__UJBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__QEDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__SJBG=__tmp__UJBG;
-      __tmp__JZQD=NULL;
+      s__OEDG=__tmp__QEDG;
+      __tmp__NZQD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__JZQD;
+    result__3YQD=__tmp__NZQD;
   };
-  if ((Self__EQVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__OZZF=((__LIP_BOOLEAN *)__tmp__4YQD);
-      result__RZZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__UZZF=NULL;
+      Self__QT1F=((__LIP_BOOLEAN *)__tmp__CZQD);
+      result__TT1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__WT1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__UZZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__WT1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__UZZF=NULL;
+          __tmp__WT1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__UZZF=NULL;
+          __tmp__WT1F=NULL;
         } break;
         }
       };
-      s__SZZF=__tmp__UZZF;
-      if (((void *)__tmp__UZZF != (void *)NULL)) {
-        b__YQ0G=(Self__OZZF->value__5CQD & __tmp__UZZF->value__5CQD);
-        result__XQ0G=NULL;
-        if (b__YQ0G) {
-          result__XQ0G=true__AMJF;
+      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;
         } else {
-          result__XQ0G=LIP_BOOLEAN__;
+          result__UQ2G=LIP_BOOLEAN__;
         };
-        result__RZZF=result__XQ0G;
+        result__TT1F=result__UQ2G;
       };
-      __tmp__QZQD=result__RZZF;
+      __tmp__UZQD=result__TT1F;
     } break;
     case __LIP_INTEGER__: {
-      Self__4ZZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__B0ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__E0ZF=NULL;
+      Self__AU1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__DU1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__GU1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__E0ZF=NULL;
+          __tmp__GU1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__E0ZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__GU1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__E0ZF=NULL;
+          __tmp__GU1F=NULL;
         } break;
         }
       };
-      s__C0ZF=__tmp__E0ZF;
-      if (((void *)__tmp__E0ZF != (void *)NULL)) {
-        Self__4ZZF->value__ED0F=(__INTEGER)(Self__4ZZF->value__ED0F & __tmp__E0ZF->value__ED0F);
-        free__2XZF(__tmp__E0ZF);
-        result__B0ZF=Self__4ZZF;
+      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;
       };
-      __tmp__QZQD=result__B0ZF;
+      __tmp__UZQD=result__DU1F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__FKBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__BFDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__FKBG=NULL;
+          __tmp__BFDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__FKBG=NULL;
+          __tmp__BFDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__FKBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__BFDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__DKBG=__tmp__FKBG;
-      __tmp__QZQD=NULL;
+      s__5EDG=__tmp__BFDG;
+      __tmp__UZQD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__QZQD;
+    result__3YQD=__tmp__UZQD;
   };
-  if ((Self__EQVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__Q0ZF=((__LIP_BOOLEAN *)__tmp__4YQD);
-      result__T0ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__W0ZF=NULL;
+      Self__SU1F=((__LIP_BOOLEAN *)__tmp__CZQD);
+      result__VU1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__YU1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__W0ZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__YU1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__W0ZF=NULL;
+          __tmp__YU1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__W0ZF=NULL;
+          __tmp__YU1F=NULL;
         } break;
         }
       };
-      s__U0ZF=__tmp__W0ZF;
-      if (((void *)__tmp__W0ZF != (void *)NULL)) {
-        b__0Q0G=(Self__Q0ZF->value__5CQD == __tmp__W0ZF->value__5CQD);
-        result__ZQ0G=NULL;
-        if (b__0Q0G) {
-          result__ZQ0G=true__AMJF;
+      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;
         } else {
-          result__ZQ0G=LIP_BOOLEAN__;
+          result__WQ2G=LIP_BOOLEAN__;
         };
-        result__T0ZF=result__ZQ0G;
+        result__VU1F=result__WQ2G;
       };
-      __tmp__XZQD=result__T0ZF;
+      __tmp__1ZQD=result__VU1F;
     } break;
     case __LIP_INTEGER__: {
-      Self__A1ZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__D1ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__G1ZF=NULL;
+      Self__CV1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__FV1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__IV1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__G1ZF=NULL;
+          __tmp__IV1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__G1ZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__IV1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__G1ZF=NULL;
+          __tmp__IV1F=NULL;
         } break;
         }
       };
-      s__E1ZF=__tmp__G1ZF;
-      if (((void *)__tmp__G1ZF != (void *)NULL)) {
-        free__2XZF(__tmp__G1ZF);
-        free__2XZF(Self__A1ZF);
-        b__2Q0G=(Self__A1ZF->value__ED0F == __tmp__G1ZF->value__ED0F);
-        result__1Q0G=NULL;
-        if (b__2Q0G) {
-          result__1Q0G=true__AMJF;
+      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;
         } else {
-          result__1Q0G=LIP_BOOLEAN__;
+          result__YQ2G=LIP_BOOLEAN__;
         };
-        result__D1ZF=result__1Q0G;
+        result__FV1F=result__YQ2G;
       };
-      __tmp__XZQD=result__D1ZF;
+      __tmp__1ZQD=result__FV1F;
     } break;
     case __LIP_STRING__: {
-      Self__QKBG=((__LIP_STRING *)__tmp__4YQD);
-      result__TKBG=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__WKBG=NULL;
+      Self__MFDG=((__LIP_STRING *)__tmp__CZQD);
+      result__PFDG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__SFDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__WKBG=NULL;
+          __tmp__SFDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__WKBG=NULL;
+          __tmp__SFDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__WKBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__SFDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__UKBG=__tmp__WKBG;
-      if (((void *)__tmp__WKBG != (void *)NULL)) {
-        free__HJBG(__tmp__WKBG);
-        free__HJBG(Self__QKBG);
-        b__4Q0G=((void *)Self__QKBG->value__TMTE == (void *)__tmp__WKBG->value__TMTE);
-        result__3Q0G=NULL;
-        if (b__4Q0G) {
-          result__3Q0G=true__AMJF;
+      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;
         } else {
-          result__3Q0G=LIP_BOOLEAN__;
+          result__0Q2G=LIP_BOOLEAN__;
         };
-        result__TKBG=result__3Q0G;
+        result__PFDG=result__0Q2G;
       };
-      __tmp__XZQD=result__TKBG;
+      __tmp__1ZQD=result__PFDG;
     } break;
     };
-    result__ZYQD=__tmp__XZQD;
+    result__3YQD=__tmp__1ZQD;
   };
-  if ((Self__EQVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__S1ZF=((__LIP_BOOLEAN *)__tmp__4YQD);
-      result__V1ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__Y1ZF=NULL;
+      Self__UV1F=((__LIP_BOOLEAN *)__tmp__CZQD);
+      result__XV1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__0V1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__Y1ZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__0V1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__Y1ZF=NULL;
+          __tmp__0V1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__Y1ZF=NULL;
+          __tmp__0V1F=NULL;
         } break;
         }
       };
-      s__W1ZF=__tmp__Y1ZF;
-      if (((void *)__tmp__Y1ZF != (void *)NULL)) {
-        b__AR0G=(Self__S1ZF->value__5CQD != __tmp__Y1ZF->value__5CQD);
-        result__5Q0G=NULL;
-        if (b__AR0G) {
-          result__5Q0G=true__AMJF;
+      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;
         } else {
-          result__5Q0G=LIP_BOOLEAN__;
+          result__2Q2G=LIP_BOOLEAN__;
         };
-        result__V1ZF=result__5Q0G;
+        result__XV1F=result__2Q2G;
       };
-      __tmp__4ZQD=result__V1ZF;
+      __tmp__C0QD=result__XV1F;
     } break;
     case __LIP_INTEGER__: {
-      Self__C2ZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__F2ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__I2ZF=NULL;
+      Self__EW1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__HW1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__KW1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__I2ZF=NULL;
+          __tmp__KW1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__I2ZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__KW1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__I2ZF=NULL;
+          __tmp__KW1F=NULL;
         } break;
         }
       };
-      s__G2ZF=__tmp__I2ZF;
-      if (((void *)__tmp__I2ZF != (void *)NULL)) {
-        free__2XZF(__tmp__I2ZF);
-        free__2XZF(Self__C2ZF);
-        b__CR0G=(Self__C2ZF->value__ED0F != __tmp__I2ZF->value__ED0F);
-        result__BR0G=NULL;
-        if (b__CR0G) {
-          result__BR0G=true__AMJF;
+      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;
         } else {
-          result__BR0G=LIP_BOOLEAN__;
+          result__4Q2G=LIP_BOOLEAN__;
         };
-        result__F2ZF=result__BR0G;
+        result__HW1F=result__4Q2G;
       };
-      __tmp__4ZQD=result__F2ZF;
+      __tmp__C0QD=result__HW1F;
     } break;
     case __LIP_STRING__: {
-      Self__BLBG=((__LIP_STRING *)__tmp__4YQD);
-      result__ELBG=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__HLBG=NULL;
+      Self__3FDG=((__LIP_STRING *)__tmp__CZQD);
+      result__AGDG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__DGDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__HLBG=NULL;
+          __tmp__DGDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__HLBG=NULL;
+          __tmp__DGDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__HLBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__DGDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__FLBG=__tmp__HLBG;
-      if (((void *)__tmp__HLBG != (void *)NULL)) {
-        free__HJBG(__tmp__HLBG);
-        free__HJBG(Self__BLBG);
-        b__ER0G=((void *)Self__BLBG->value__TMTE != (void *)__tmp__HLBG->value__TMTE);
-        result__DR0G=NULL;
-        if (b__ER0G) {
-          result__DR0G=true__AMJF;
+      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;
         } else {
-          result__DR0G=LIP_BOOLEAN__;
+          result__AR2G=LIP_BOOLEAN__;
         };
-        result__ELBG=result__DR0G;
+        result__AGDG=result__AR2G;
       };
-      __tmp__4ZQD=result__ELBG;
+      __tmp__C0QD=result__AGDG;
     } break;
     };
-    result__ZYQD=__tmp__4ZQD;
+    result__3YQD=__tmp__C0QD;
   };
-  if ((Self__EQVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__02ZF=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__2W1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__02ZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__2W1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__02ZF=NULL;
+          __tmp__2W1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__02ZF=NULL;
+          __tmp__2W1F=NULL;
         } break;
         }
       };
-      s__Y2ZF=__tmp__02ZF;
-      __tmp__F0QD=NULL;
+      s__0W1F=__tmp__2W1F;
+      __tmp__J0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__E3ZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__H3ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__K3ZF=NULL;
+      Self__GX1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__JX1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__MX1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__K3ZF=NULL;
+          __tmp__MX1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__K3ZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__MX1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__K3ZF=NULL;
+          __tmp__MX1F=NULL;
         } break;
         }
       };
-      s__I3ZF=__tmp__K3ZF;
-      if (((void *)__tmp__K3ZF != (void *)NULL)) {
-        free__2XZF(__tmp__K3ZF);
-        free__2XZF(Self__E3ZF);
-        b__GR0G=(Self__E3ZF->value__ED0F > __tmp__K3ZF->value__ED0F);
-        result__FR0G=NULL;
-        if (b__GR0G) {
-          result__FR0G=true__AMJF;
+      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;
         } else {
-          result__FR0G=LIP_BOOLEAN__;
+          result__CR2G=LIP_BOOLEAN__;
         };
-        result__H3ZF=result__FR0G;
+        result__JX1F=result__CR2G;
       };
-      __tmp__F0QD=result__H3ZF;
+      __tmp__J0QD=result__JX1F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__YLBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__UGDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__YLBG=NULL;
+          __tmp__UGDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__YLBG=NULL;
+          __tmp__UGDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__YLBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__UGDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__WLBG=__tmp__YLBG;
-      __tmp__F0QD=NULL;
+      s__SGDG=__tmp__UGDG;
+      __tmp__J0QD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__F0QD;
+    result__3YQD=__tmp__J0QD;
   };
-  if ((Self__EQVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__23ZF=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__4X1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__23ZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__4X1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__23ZF=NULL;
+          __tmp__4X1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__23ZF=NULL;
+          __tmp__4X1F=NULL;
         } break;
         }
       };
-      s__03ZF=__tmp__23ZF;
-      __tmp__M0QD=NULL;
+      s__2X1F=__tmp__4X1F;
+      __tmp__Q0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__G4ZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__J4ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__M4ZF=NULL;
+      Self__IY1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__LY1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__OY1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__M4ZF=NULL;
+          __tmp__OY1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__M4ZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__OY1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__M4ZF=NULL;
+          __tmp__OY1F=NULL;
         } break;
         }
       };
-      s__K4ZF=__tmp__M4ZF;
-      if (((void *)__tmp__M4ZF != (void *)NULL)) {
-        free__2XZF(__tmp__M4ZF);
-        free__2XZF(Self__G4ZF);
-        b__IR0G=(Self__G4ZF->value__ED0F < __tmp__M4ZF->value__ED0F);
-        result__HR0G=NULL;
-        if (b__IR0G) {
-          result__HR0G=true__AMJF;
+      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;
         } else {
-          result__HR0G=LIP_BOOLEAN__;
+          result__ER2G=LIP_BOOLEAN__;
         };
-        result__J4ZF=result__HR0G;
+        result__LY1F=result__ER2G;
       };
-      __tmp__M0QD=result__J4ZF;
+      __tmp__Q0QD=result__LY1F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__JMBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__FHDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__JMBG=NULL;
+          __tmp__FHDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__JMBG=NULL;
+          __tmp__FHDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__JMBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__FHDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__HMBG=__tmp__JMBG;
-      __tmp__M0QD=NULL;
+      s__DHDG=__tmp__FHDG;
+      __tmp__Q0QD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__M0QD;
+    result__3YQD=__tmp__Q0QD;
   };
-  if ((Self__EQVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__44ZF=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__AZ1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__44ZF=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__AZ1F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__44ZF=NULL;
+          __tmp__AZ1F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__44ZF=NULL;
+          __tmp__AZ1F=NULL;
         } break;
         }
       };
-      s__24ZF=__tmp__44ZF;
-      __tmp__T0QD=NULL;
+      s__4Y1F=__tmp__AZ1F;
+      __tmp__X0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__I5ZF=((__LIP_INTEGER *)__tmp__4YQD);
-      result__L5ZF=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__O5ZF=NULL;
+      Self__KZ1F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__NZ1F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__QZ1F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__O5ZF=NULL;
+          __tmp__QZ1F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__O5ZF=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__QZ1F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__O5ZF=NULL;
+          __tmp__QZ1F=NULL;
         } break;
         }
       };
-      s__M5ZF=__tmp__O5ZF;
-      if (((void *)__tmp__O5ZF != (void *)NULL)) {
-        free__2XZF(__tmp__O5ZF);
-        free__2XZF(Self__I5ZF);
-        b__KR0G=(Self__I5ZF->value__ED0F >= __tmp__O5ZF->value__ED0F);
-        result__JR0G=NULL;
-        if (b__KR0G) {
-          result__JR0G=true__AMJF;
+      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;
         } else {
-          result__JR0G=LIP_BOOLEAN__;
+          result__GR2G=LIP_BOOLEAN__;
         };
-        result__L5ZF=result__JR0G;
+        result__NZ1F=result__GR2G;
       };
-      __tmp__T0QD=result__L5ZF;
+      __tmp__X0QD=result__NZ1F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__0MBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__WHDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0MBG=NULL;
+          __tmp__WHDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0MBG=NULL;
+          __tmp__WHDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__0MBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__WHDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__YMBG=__tmp__0MBG;
-      __tmp__T0QD=NULL;
+      s__UHDG=__tmp__WHDG;
+      __tmp__X0QD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__T0QD;
+    result__3YQD=__tmp__X0QD;
   };
-  if ((Self__EQVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__AA0F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__C01F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__AA0F=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__C01F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__AA0F=NULL;
+          __tmp__C01F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__AA0F=NULL;
+          __tmp__C01F=NULL;
         } break;
         }
       };
-      s__45ZF=__tmp__AA0F;
-      __tmp__00QD=NULL;
+      s__A01F=__tmp__C01F;
+      __tmp__40QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__KA0F=((__LIP_INTEGER *)__tmp__4YQD);
-      result__NA0F=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__QA0F=NULL;
+      Self__M01F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__P01F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__S01F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QA0F=NULL;
+          __tmp__S01F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QA0F=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__S01F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__QA0F=NULL;
+          __tmp__S01F=NULL;
         } break;
         }
       };
-      s__OA0F=__tmp__QA0F;
-      if (((void *)__tmp__QA0F != (void *)NULL)) {
-        free__2XZF(__tmp__QA0F);
-        free__2XZF(Self__KA0F);
-        b__MR0G=(Self__KA0F->value__ED0F <= __tmp__QA0F->value__ED0F);
-        result__LR0G=NULL;
-        if (b__MR0G) {
-          result__LR0G=true__AMJF;
+      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;
         } else {
-          result__LR0G=LIP_BOOLEAN__;
+          result__IR2G=LIP_BOOLEAN__;
         };
-        result__NA0F=result__LR0G;
+        result__P01F=result__IR2G;
       };
-      __tmp__00QD=result__NA0F;
+      __tmp__40QD=result__P01F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__LNBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__HIDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LNBG=NULL;
+          __tmp__HIDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LNBG=NULL;
+          __tmp__HIDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__LNBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__HIDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__JNBG=__tmp__LNBG;
-      __tmp__00QD=NULL;
+      s__FIDG=__tmp__HIDG;
+      __tmp__40QD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__00QD;
+    result__3YQD=__tmp__40QD;
   };
-  if ((Self__EQVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__CB0F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__E11F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CB0F=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__E11F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CB0F=NULL;
+          __tmp__E11F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CB0F=NULL;
+          __tmp__E11F=NULL;
         } break;
         }
       };
-      s__AB0F=__tmp__CB0F;
-      __tmp__B1QD=NULL;
+      s__C11F=__tmp__E11F;
+      __tmp__F1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__MB0F=((__LIP_INTEGER *)__tmp__4YQD);
-      result__PB0F=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__SB0F=NULL;
+      Self__O11F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__R11F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__U11F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__SB0F=NULL;
+          __tmp__U11F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__SB0F=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__U11F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__SB0F=NULL;
+          __tmp__U11F=NULL;
         } break;
         }
       };
-      s__QB0F=__tmp__SB0F;
-      if (((void *)__tmp__SB0F != (void *)NULL)) {
-        Self__MB0F->value__ED0F=(__INTEGER)(Self__MB0F->value__ED0F + __tmp__SB0F->value__ED0F);
-        free__2XZF(__tmp__SB0F);
-        result__PB0F=Self__MB0F;
+      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;
       };
-      __tmp__B1QD=result__PB0F;
+      __tmp__F1QD=result__R11F;
     } break;
     case __LIP_STRING__: {
-      Self__WNBG=((__LIP_STRING *)__tmp__4YQD);
-      result__ZNBG=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__2NBG=NULL;
+      Self__SIDG=((__LIP_STRING *)__tmp__CZQD);
+      result__VIDG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__YIDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__2NBG=NULL;
+          __tmp__YIDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__2NBG=NULL;
+          __tmp__YIDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__2NBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__YIDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__0NBG=__tmp__2NBG;
-      if (((void *)__tmp__2NBG != (void *)NULL)) {
-        copy__JCS(string_tmp__VH,Self__WNBG->value__TMTE);
-        append__RNS(string_tmp__VH,__tmp__2NBG->value__TMTE);
-        Self__WNBG->value__TMTE=get__YVB(string_tmp__VH);
-        free__HJBG(__tmp__2NBG);
-        result__ZNBG=Self__WNBG;
+      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;
       };
-      __tmp__B1QD=result__ZNBG;
+      __tmp__F1QD=result__VIDG;
     } break;
     };
-    result__ZYQD=__tmp__B1QD;
+    result__3YQD=__tmp__F1QD;
   };
-  if ((Self__EQVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__4YQD)->__id) {
+  if ((Self__RQVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__CZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__EC0F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__G21F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__EC0F=((__LIP_BOOLEAN *)__tmp__BZQD);
+          __tmp__G21F=((__LIP_BOOLEAN *)__tmp__FZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__EC0F=NULL;
+          __tmp__G21F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__EC0F=NULL;
+          __tmp__G21F=NULL;
         } break;
         }
       };
-      s__CC0F=__tmp__EC0F;
-      __tmp__I1QD=NULL;
+      s__E21F=__tmp__G21F;
+      __tmp__M1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__OC0F=((__LIP_INTEGER *)__tmp__4YQD);
-      result__RC0F=NULL;
-      if (__tmp__BZQD==NULL) {
-        __tmp__UC0F=NULL;
+      Self__Q21F=((__LIP_INTEGER *)__tmp__CZQD);
+      result__T21F=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__W21F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__UC0F=NULL;
+          __tmp__W21F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__UC0F=((__LIP_INTEGER *)__tmp__BZQD);
+          __tmp__W21F=((__LIP_INTEGER *)__tmp__FZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__UC0F=NULL;
+          __tmp__W21F=NULL;
         } break;
         }
       };
-      s__SC0F=__tmp__UC0F;
-      if (((void *)__tmp__UC0F != (void *)NULL)) {
-        Self__OC0F->value__ED0F=(__INTEGER)(Self__OC0F->value__ED0F - __tmp__UC0F->value__ED0F);
-        free__2XZF(__tmp__UC0F);
-        result__RC0F=Self__OC0F;
+      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;
       };
-      __tmp__I1QD=result__RC0F;
+      __tmp__M1QD=result__T21F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__BZQD==NULL) {
-        __tmp__NOBG=NULL;
+      if (__tmp__FZQD==NULL) {
+        __tmp__JJDG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__BZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__FZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__NOBG=NULL;
+          __tmp__JJDG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__NOBG=NULL;
+          __tmp__JJDG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__NOBG=((__LIP_STRING *)__tmp__BZQD);
+          __tmp__JJDG=((__LIP_STRING *)__tmp__FZQD);
         } break;
         }
       };
-      s__LOBG=__tmp__NOBG;
-      __tmp__I1QD=NULL;
+      s__HJDG=__tmp__JJDG;
+      __tmp__M1QD=NULL;
     } break;
     };
-    result__ZYQD=__tmp__I1QD;
+    result__3YQD=__tmp__M1QD;
   };
-  if (((void *)result__ZYQD == (void *)NULL)) {
-    __tmp__R1QD=Self__XYQD->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_261));
-    put_position__EOG(__tmp__R1QD);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  return(result__ZYQD);
+  return(result__3YQD);
 }
 
-static void* run_expr__V1QD(__LIP_UNARY *Self__W1QD)
+static void* run_expr__Z1QD(__LIP_UNARY *Self__01QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  void *__tmp__01QD;
-  void *__tmp__11QD,*__tmp__MY5G,*__tmp__NY5G,*result__Y1QD,*__tmp__D2QD;
-  void *__tmp__K2QD;
-  __LIP_INTEGER *Self__OY5G,*Self__CD0F,*Self__PD0F;
-  __LIP_STRING *Self__PY5G;
-  void *result__1LJF;
-  __POSITION __tmp__T2QD;
-  __CHARACTER Self__USVD;
-  __BOOLEAN b__ZLJF;
-  __tmp__01QD=Self__W1QD->value__Z1QD;
-  switch (((struct ___OBJ *)__tmp__01QD)->__id) {
+  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) {
   case __LIP_BINARY__: {
-    __tmp__11QD=run_expr__WYQD(__tmp__01QD);
+    __tmp__51QD=run_expr__0YQD(__tmp__41QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__11QD=run_expr__V1QD(__tmp__01QD);
+    __tmp__51QD=run_expr__Z1QD(__tmp__41QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__11QD=run_expr__FRTE(__tmp__01QD);
+    __tmp__51QD=run_expr__XTTE(__tmp__41QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__MY5G=((__LIP_VALUE *)__tmp__01QD)->value__FVTE;
-    switch (((struct ___OBJ *)__tmp__MY5G)->__id) {
+    __tmp__12BH=((__LIP_VALUE *)__tmp__41QD)->value__XXTE;
+    switch (((struct ___OBJ *)__tmp__12BH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__NY5G=((__LIP_BOOLEAN *)__tmp__MY5G);
+      __tmp__22BH=((__LIP_BOOLEAN *)__tmp__12BH);
     } break;
     case __LIP_INTEGER__: {
-      Self__OY5G=((__LIP_INTEGER *)__tmp__MY5G);
-      __tmp__NY5G=get__WTRE(Self__OY5G,Self__OY5G->value__ED0F);
+      Self__32BH=((__LIP_INTEGER *)__tmp__12BH);
+      __tmp__22BH=get__IWRE(Self__32BH,Self__32BH->value__G31F);
     } break;
     case __LIP_STRING__: {
-      Self__PY5G=((__LIP_STRING *)__tmp__MY5G);
-      __tmp__NY5G=get__N2DF(Self__PY5G,Self__PY5G->value__TMTE);
+      Self__42BH=((__LIP_STRING *)__tmp__12BH);
+      __tmp__22BH=get__3HEF(Self__42BH,Self__42BH->value__FPTE);
     } break;
     };
-    __tmp__11QD=__tmp__NY5G;
+    __tmp__51QD=__tmp__22BH;
   } break;
   };
-  result__Y1QD=__tmp__11QD;
-  Self__USVD=Self__W1QD->operator__21QD;
-  if ((Self__USVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__11QD)->__id) {
+  result__21QD=__tmp__51QD;
+  Self__BTVD=Self__01QD->operator__A2QD;
+  if ((Self__BTVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__51QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__D2QD=NULL;
+      __tmp__H2QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__CD0F=((__LIP_INTEGER *)__tmp__11QD);
-      Self__CD0F->value__ED0F=(__INTEGER)(- Self__CD0F->value__ED0F);
-      __tmp__D2QD=Self__CD0F;
+      Self__E31F=((__LIP_INTEGER *)__tmp__51QD);
+      Self__E31F->value__G31F=(__INTEGER)(- Self__E31F->value__G31F);
+      __tmp__H2QD=Self__E31F;
     } break;
     case __LIP_STRING__: {
-      __tmp__D2QD=NULL;
+      __tmp__H2QD=NULL;
     } break;
     };
-    result__Y1QD=__tmp__D2QD;
+    result__21QD=__tmp__H2QD;
   };
-  if ((Self__USVD == '!')) {
-    switch (((struct ___OBJ *)result__Y1QD)->__id) {
+  if ((Self__BTVD == '!')) {
+    switch (((struct ___OBJ *)result__21QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__ZLJF=(! ((__LIP_BOOLEAN *)result__Y1QD)->value__5CQD);
-      result__1LJF=NULL;
-      if (b__ZLJF) {
-        result__1LJF=true__AMJF;
+      b__ODKF=(! ((__LIP_BOOLEAN *)result__21QD)->value__DDQD);
+      result__QDKF=NULL;
+      if (b__ODKF) {
+        result__QDKF=true__VDKF;
       } else {
-        result__1LJF=LIP_BOOLEAN__;
+        result__QDKF=LIP_BOOLEAN__;
       };
-      __tmp__K2QD=result__1LJF;
+      __tmp__O2QD=result__QDKF;
     } break;
     case __LIP_INTEGER__: {
-      Self__PD0F=((__LIP_INTEGER *)result__Y1QD);
-      Self__PD0F->value__ED0F=(__INTEGER)(~ Self__PD0F->value__ED0F);
-      __tmp__K2QD=Self__PD0F;
+      Self__R31F=((__LIP_INTEGER *)result__21QD);
+      Self__R31F->value__G31F=(__INTEGER)(~ Self__R31F->value__G31F);
+      __tmp__O2QD=Self__R31F;
     } break;
     case __LIP_STRING__: {
-      __tmp__K2QD=NULL;
+      __tmp__O2QD=NULL;
     } break;
     };
-    result__Y1QD=__tmp__K2QD;
+    result__21QD=__tmp__O2QD;
   };
-  if (((void *)result__Y1QD == (void *)NULL)) {
-    __tmp__T2QD=Self__W1QD->parent_lip_code__104B.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 1,(&__string_261));
-    put_position__EOG(__tmp__T2QD);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+  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)) {
       exit(( 1));
     };
   };
-  return(result__Y1QD);
+  return(result__21QD);
 }
 
-static void* run_expr__FRTE(__LIP_CALL *Self__GRTE)
+static void* run_expr__XTTE(__LIP_CALL *Self__YTTE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  void *str__JRTE,*__tmp__5RTE;
-  void *val__KRTE,*result__LRTE,*__tmp__URTE,*__tmp__GVTE,*__tmp__HVTE;
-  void *__tmp__TRTE;
-  __LIP_INTEGER *Self__PF0F;
-  __LIP_STRING *Self__JPBG;
-  __POSITION pos__4XSG,pos__0WIF;
-  __STRING *Self__UP2G;
-  __INTEGER state__DSTF,Self__WJAG;
-  __BOOLEAN __tmp__QSTE,__tmp__CTTE,result__VLWE,sign__ESTF,__tmp__WTTF;
-  __BOOLEAN result__NR0G,__tmp__DUTF,result__0IHG,__tmp__WUTF;
-  __BOOLEAN result__QR0G,result__TR0G,result__WR0G,result__XR0G;
-  __CHARACTER Self__QWXG,Self__OR0G,Self__RWXG,Self__RR0G,Self__UR0G;
-  __CHARACTER mem__OXJF;
-  __FAST_ARRAYoLIP_SLOT_DATAo *Self__SENF;
-  str__JRTE=NULL;
-  val__KRTE=NULL;
-  result__LRTE=NULL;
-  if (((void *)Self__GRTE->argument__1KTE != (void *)NULL)) {
-    __tmp__TRTE=Self__GRTE->argument__1KTE;
-    switch (((struct ___OBJ *)__tmp__TRTE)->__id) {
+  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) {
     case __LIP_BINARY__: {
-      __tmp__URTE=run_expr__WYQD(__tmp__TRTE);
+      __tmp__GUTE=run_expr__0YQD(__tmp__FUTE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__URTE=run_expr__V1QD(__tmp__TRTE);
+      __tmp__GUTE=run_expr__Z1QD(__tmp__FUTE);
     } break;
     case __LIP_CALL__: {
-      __tmp__URTE=run_expr__FRTE(__tmp__TRTE);
+      __tmp__GUTE=run_expr__XTTE(__tmp__FUTE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__GVTE=((__LIP_VALUE *)__tmp__TRTE)->value__FVTE;
-      switch (((struct ___OBJ *)__tmp__GVTE)->__id) {
+      __tmp__YXTE=((__LIP_VALUE *)__tmp__FUTE)->value__XXTE;
+      switch (((struct ___OBJ *)__tmp__YXTE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__HVTE=((__LIP_BOOLEAN *)__tmp__GVTE);
+        __tmp__ZXTE=((__LIP_BOOLEAN *)__tmp__YXTE);
       } break;
       case __LIP_INTEGER__: {
-        Self__PF0F=((__LIP_INTEGER *)__tmp__GVTE);
-        __tmp__HVTE=get__WTRE(Self__PF0F,Self__PF0F->value__ED0F);
+        Self__R51F=((__LIP_INTEGER *)__tmp__YXTE);
+        __tmp__ZXTE=get__IWRE(Self__R51F,Self__R51F->value__G31F);
       } break;
       case __LIP_STRING__: {
-        Self__JPBG=((__LIP_STRING *)__tmp__GVTE);
-        __tmp__HVTE=get__N2DF(Self__JPBG,Self__JPBG->value__TMTE);
+        Self__FKDG=((__LIP_STRING *)__tmp__YXTE);
+        __tmp__ZXTE=get__3HEF(Self__FKDG,Self__FKDG->value__FPTE);
       } break;
       };
-      __tmp__URTE=__tmp__HVTE;
+      __tmp__GUTE=__tmp__ZXTE;
     } break;
     };
-    val__KRTE=__tmp__URTE;
+    val__2TTE=__tmp__GUTE;
   };
-  if (((void *)Self__GRTE->name__GLTE == (void *)(&__string_93))) {
-    if (val__KRTE==NULL) {
-      __tmp__5RTE=NULL;
+  if (((void *)Self__YTTE->name__YNTE == (void *)(&__string_93))) {
+    if (val__2TTE==NULL) {
+      __tmp__RUTE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__KRTE)->__id) {
+      switch (((struct ___OBJ *)val__2TTE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__5RTE=NULL;
+        __tmp__RUTE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__5RTE=NULL;
+        __tmp__RUTE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__5RTE=((void *)val__KRTE);
+        __tmp__RUTE=((void *)val__2TTE);
       } break;
       }
     };
-    str__JRTE=__tmp__5RTE;
-    if (((void *)__tmp__5RTE == (void *)NULL)) {
-      pos__4XSG=Self__GRTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-      put_error__text__0MG( 1,(&__string_292));
-      put_position__EOG(pos__4XSG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
-    ((__STRING *)string_tmp__VH)->count__GFC= 0;
-    append_in__NPBG(__tmp__5RTE,string_tmp__VH);
-    Self__UP2G=((__STRING *)string_tmp__VH);
-    if ((Self__UP2G->capacity__IBS > Self__UP2G->count__GFC)) {
-      ((__CHARACTER *)Self__UP2G->storage__RBS)[Self__UP2G->count__GFC]='\0';
+    ((__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';
     } else {
-      add_last__JLT(Self__UP2G,'\0');
-      Self__UP2G->count__GFC=(__INTEGER)(Self__UP2G->count__GFC -  1);
+      add_last__NLT(Self__TS4G,'\0');
+      Self__TS4G->count__KFC=(__INTEGER)(Self__TS4G->count__KFC -  1);
     };
-    result__LRTE=get__WTRE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__UP2G->storage__RBS)))))));
-    __tmp__QSTE=TRUE__;
+    result__3TTE=get__IWRE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__TS4G->storage__VBS)))))));
+    __tmp__CVTE=TRUE__;
   } else {
-    __tmp__QSTE=FALSE__;
+    __tmp__CVTE=FALSE__;
   };
-  if (__tmp__QSTE) {
-    __tmp__CTTE=TRUE__;
+  if (__tmp__CVTE) {
+    __tmp__UVTE=TRUE__;
   } else {
-    result__VLWE=((void *)Self__GRTE->name__GLTE == (void *)(&__string_106));
-    if (result__VLWE) {
-      state__DSTF= 0;
-      sign__ESTF=FALSE__;
-      while ((state__DSTF <=  2)) {
-        if (push_back_flag__5GKF) {
-          push_back_flag__5GKF=FALSE__;
+    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__;
         } else {
-          memory__WXJF=((__CHARACTER )(fgetc(stdin)));
+          memory__LPKF=((__CHARACTER )(fgetc(stdin)));
         };
-        if ((state__DSTF ==  0)) {
-          Self__QWXG=memory__WXJF;
-          if ((((((((Self__QWXG == ' ') || (Self__QWXG == '\t')) || (Self__QWXG == '\n')) || (Self__QWXG == '\r')) || (Self__QWXG == '\0')) || (Self__QWXG == '\f')) || (Self__QWXG == '\v'))) {
-            __tmp__WTTF=TRUE__;
+        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__;
           } else {
-            Self__OR0G=memory__WXJF;
-            result__NR0G=FALSE__;
-            if ((((__INTEGER_8 )Self__OR0G) >= ((__INTEGER_8 )'0'))) {
-              result__NR0G=(((__INTEGER_8 )Self__OR0G) <= ((__INTEGER_8 )'9'));
+            Self__LR2G=memory__LPKF;
+            result__KR2G=FALSE__;
+            if ((((__INTEGER_8 )Self__LR2G) >= ((__INTEGER_8 )'0'))) {
+              result__KR2G=(((__INTEGER_8 )Self__LR2G) <= ((__INTEGER_8 )'9'));
             };
-            if (result__NR0G) {
-              last_integer__3STE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__WXJF)) -  48);
-              state__DSTF= 2;
+            if (result__KR2G) {
+              last_integer__PVTE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__LPKF)) -  48);
+              state__SIVF= 2;
             };
-            __tmp__WTTF=result__NR0G;
+            __tmp__FKVF=result__KR2G;
           };
-          if (__tmp__WTTF) {
-            __tmp__DUTF=TRUE__;
+          if (__tmp__FKVF) {
+            __tmp__SKVF=TRUE__;
           } else {
-            result__0IHG=(memory__WXJF == '-');
-            if (result__0IHG) {
-              sign__ESTF=TRUE__;
-              state__DSTF= 1;
+            result__YDJG=(memory__LPKF == '-');
+            if (result__YDJG) {
+              sign__TIVF=TRUE__;
+              state__SIVF= 1;
             };
-            __tmp__DUTF=result__0IHG;
+            __tmp__SKVF=result__YDJG;
           };
-          if ((! __tmp__DUTF)) {
-            if ((memory__WXJF == '+')) {
-              state__DSTF= 1;
+          if ((! __tmp__SKVF)) {
+            if ((memory__LPKF == '+')) {
+              state__SIVF= 1;
             } else {
-              state__DSTF= 4;
+              state__SIVF= 4;
             };
           };
-          __tmp__WUTF=TRUE__;
+          __tmp__FLVF=TRUE__;
         } else {
-          __tmp__WUTF=FALSE__;
+          __tmp__FLVF=FALSE__;
         };
-        if ((! __tmp__WUTF)) {
-          if ((state__DSTF ==  1)) {
-            Self__RWXG=memory__WXJF;
-            if ((! (((((((Self__RWXG == ' ') || (Self__RWXG == '\t')) || (Self__RWXG == '\n')) || (Self__RWXG == '\r')) || (Self__RWXG == '\0')) || (Self__RWXG == '\f')) || (Self__RWXG == '\v')))) {
-              Self__RR0G=memory__WXJF;
-              result__QR0G=FALSE__;
-              if ((((__INTEGER_8 )Self__RR0G) >= ((__INTEGER_8 )'0'))) {
-                result__QR0G=(((__INTEGER_8 )Self__RR0G) <= ((__INTEGER_8 )'9'));
+        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 (result__QR0G) {
-                last_integer__3STE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__WXJF)) -  48);
-                state__DSTF= 2;
+              if (result__NR2G) {
+                last_integer__PVTE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__LPKF)) -  48);
+                state__SIVF= 2;
               } else {
-                state__DSTF= 4;
+                state__SIVF= 4;
               };
             };
           } else {
-            Self__UR0G=memory__WXJF;
-            result__TR0G=FALSE__;
-            if ((((__INTEGER_8 )Self__UR0G) >= ((__INTEGER_8 )'0'))) {
-              result__TR0G=(((__INTEGER_8 )Self__UR0G) <= ((__INTEGER_8 )'9'));
+            Self__RR2G=memory__LPKF;
+            result__QR2G=FALSE__;
+            if ((((__INTEGER_8 )Self__RR2G) >= ((__INTEGER_8 )'0'))) {
+              result__QR2G=(((__INTEGER_8 )Self__RR2G) <= ((__INTEGER_8 )'9'));
             };
-            if (result__TR0G) {
-              last_integer__3STE=(__INTEGER)((__INTEGER)(last_integer__3STE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__WXJF)) -  48));
+            if (result__QR2G) {
+              last_integer__PVTE=(__INTEGER)((__INTEGER)(last_integer__PVTE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__LPKF)) -  48));
             } else {
-              state__DSTF= 3;
+              state__SIVF= 3;
             };
           };
         };
-        result__WR0G=FALSE__;
-        if ((! push_back_flag__5GKF)) {
-          result__WR0G=(memory__WXJF == ((__CHARACTER )(EOF)));
+        result__TR2G=FALSE__;
+        if ((! push_back_flag__2FLF)) {
+          result__TR2G=(memory__LPKF == ((__CHARACTER )(EOF)));
         };
-        if (result__WR0G) {
-          Self__WJAG=state__DSTF;
-          if (((state__DSTF >=  0) && (state__DSTF <=  1))) {
-            state__DSTF= 4;
+        if (result__TR2G) {
+          Self__SECG=state__SIVF;
+          if (((state__SIVF >=  0) && (state__SIVF <=  1))) {
+            state__SIVF= 4;
           };
-          if (((Self__WJAG >=  2) && (Self__WJAG <=  3))) {
-            state__DSTF= 3;
+          if (((Self__SECG >=  2) && (Self__SECG <=  3))) {
+            state__SIVF= 3;
           };
         };
       };
-      result__XR0G=FALSE__;
-      if ((! push_back_flag__5GKF)) {
-        result__XR0G=(memory__WXJF == ((__CHARACTER )(EOF)));
+      result__UR2G=FALSE__;
+      if ((! push_back_flag__2FLF)) {
+        result__UR2G=(memory__LPKF == ((__CHARACTER )(EOF)));
       };
-      if (result__XR0G) {
-        push_back_flag__5GKF=TRUE__;
+      if (result__UR2G) {
+        push_back_flag__2FLF=TRUE__;
       };
-      if ((state__DSTF ==  4)) {
-        print__GHD((&__string_311));
-        print__GHD((&__string_205));
+      if ((state__SIVF ==  4)) {
+        print__KHD((&__string_317));
+        print__KHD((&__string_207));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__ESTF) {
-        last_integer__3STE=(__INTEGER)(- last_integer__3STE);
+      if (sign__TIVF) {
+        last_integer__PVTE=(__INTEGER)(- last_integer__PVTE);
       };
-      result__LRTE=get__WTRE(LIP_INTEGER__,last_integer__3STE);
+      result__3TTE=get__IWRE(LIP_INTEGER__,last_integer__PVTE);
     };
-    __tmp__CTTE=result__VLWE;
+    __tmp__UVTE=result__POWE;
   };
-  if ((! __tmp__CTTE)) {
-    if (((void *)Self__GRTE->name__GLTE == (void *)(&__string_107))) {
-      ((__STRING *)last_string__PTTE)->count__GFC= 0;
-      mem__OXJF='\0';
-      if (push_back_flag__5GKF) {
-        push_back_flag__5GKF=FALSE__;
+  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__;
       } else {
-        memory__WXJF=((__CHARACTER )(fgetc(stdin)));
+        memory__LPKF=((__CHARACTER )(fgetc(stdin)));
       };
-      if (((memory__WXJF != '\n') && (memory__WXJF != ((__CHARACTER )(EOF))))) {
-        add_last__JLT(((__STRING *)last_string__PTTE),memory__WXJF);
-        mem__OXJF=((__CHARACTER )(fgetc(stdin)));
-        while ((! ((mem__OXJF == ((__CHARACTER )(EOF))) || (mem__OXJF == '\n')))) {
-          add_last__JLT(((__STRING *)last_string__PTTE),mem__OXJF);
-          mem__OXJF=((__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)));
         };
-        memory__WXJF=mem__OXJF;
+        memory__LPKF=mem__DPKF;
       };
-      result__LRTE=get__N2DF(LIP_STRING__,get__YVB(last_string__PTTE));
+      result__3TTE=get__3HEF(LIP_STRING__,get__2VB(last_string__BWTE));
     } else {
-      if (((void *)fast_reference_at__4TRD(list_data__4NNC,Self__GRTE->name__GLTE) == (void *)NULL)) {
-        Self__SENF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__FUTE);
-        if (((void *)((void **)Self__SENF->parent_arrayed_collection__EUTE.storage__4JNF)[Self__SENF->parent_arrayed_collection__EUTE.upper__2ENF] == (void *)NULL)) {
-          copy__JCS(string_tmp__VH,(&__string_289));
-          append__RNS(string_tmp__VH,Self__GRTE->name__GLTE);
-          append__RNS(string_tmp__VH,(&__string_290));
-          pos__0WIF=Self__GRTE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-          put_error__text__0MG( 1,string_tmp__VH);
-          put_position__EOG(pos__0WIF);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__LRTE=NULL;
+      result__3TTE=NULL;
     };
   };
-  if (((void *)val__KRTE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__KRTE)->__id) {
+  if (((void *)val__2TTE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__2TTE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__2XZF(val__KRTE);
+      free__4R1F(val__2TTE);
     } break;
     case __LIP_STRING__: {
-      free__HJBG(val__KRTE);
+      free__DEDG(val__2TTE);
     } break;
     };
   };
-  return(result__LRTE);
+  return(result__3TTE);
 }
 
-static void* get__WTRE(__LIP_INTEGER *Self__XTRE,__INTEGER i__YTRE)
+static void* get__IWRE(__LIP_INTEGER *Self__JWRE,__INTEGER i__KWRE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  void *result__0TRE;
-  __LIP_INTEGER *result__SSPF;
-  __POINTER ptr__TSPF,ptr_table__RY5G,next__QY5G,result__SY5G;
-  __POINTER ptr_table__WY5G,next__VY5G,result__XY5G;
-  __INTEGER typ_id__YSPF;
-  __UINTEGER_32 sz__VSPF,a__QT2G,new_size__RT2G,t__VT2G,a__UT2G;
-  __UINTEGER_32 new_size__ZY5G,lab_type__YY5G;
-  __FAST_ARRAYoLIP_INTEGERo *Self__ZW2E,*Self__PX2E;
-  result__0TRE=NULL;
-  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__AURE)->parent_arrayed_collection__5TRE.upper__Y4VE <  0)) {
-    result__SSPF=NULL;
-    ptr__TSPF=((__POINTER )(NULL));
-    typ_id__YSPF= 0;
-    sz__VSPF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
-    if ((sz__VSPF ==  0)) {
-      result__SSPF=Self__XTRE;
-    } else {
-      typ_id__YSPF=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__VSPF);
-      if ((typ_id__YSPF == (__INTEGER)(-  1))) {
-        a__QT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__RT2G=(__UINTEGER_32)((__UINTEGER_32)(sz__VSPF + a__QT2G) & (__UINTEGER_32)(~ a__QT2G));
-        ptr_table__RY5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RT2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__QY5G=((__POINTER )(NULL));
-        result__SY5G=((__POINTER *)ptr_table__RY5G)[ 0];
-        if ((result__SY5G == (void *)NULL)) {
-          result__SY5G=new_lab__2QJ(new_size__RT2G);
-          next__QY5G=(void *)((unsigned long)result__SY5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RT2G)));
-          ((__POINTER *)next__QY5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RY5G)[ 0]=next__QY5G;
-        } else {
-          next__QY5G=((__POINTER *)result__SY5G)[ 0];
-          if ((next__QY5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SY5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__RT2G <<  1)) <=  4096)) {
-              next__QY5G=(void *)((unsigned long)result__SY5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RT2G)));
+  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)));
             } else {
-              next__QY5G=new_lab__2QJ(new_size__RT2G);
-            };
-            ((__POINTER *)next__QY5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RY5G)[ 0]=next__QY5G;
-          } else {
-            ((__POINTER *)result__SY5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__QY5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SY5G=next__QY5G;
-          };
-        };
-        ptr__TSPF=result__SY5G;
-      } else {
-        t__VT2G=((__UINTEGER_32 )typ_id__YSPF);
-        a__UT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__ZY5G=(__UINTEGER_32)((__UINTEGER_32)(sz__VSPF + a__UT2G) & (__UINTEGER_32)(~ a__UT2G));
-        ptr_table__WY5G=((__POINTER )(&(table_type[(t__VT2G)])));
-        lab_type__YY5G=(__UINTEGER_32)(t__VT2G |  1);
-        next__VY5G=((__POINTER )(NULL));
-        result__XY5G=((__POINTER *)ptr_table__WY5G)[ 0];
-        if ((result__XY5G == (void *)NULL)) {
-          result__XY5G=new_lab__2QJ(lab_type__YY5G);
-          next__VY5G=(void *)((unsigned long)result__XY5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZY5G)));
-          ((__POINTER *)next__VY5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WY5G)[ 0]=next__VY5G;
-        } else {
-          next__VY5G=((__POINTER *)result__XY5G)[ 0];
-          if ((next__VY5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XY5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZY5G <<  1)) <=  4096)) {
-              next__VY5G=(void *)((unsigned long)result__XY5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZY5G)));
+              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)));
             } else {
-              next__VY5G=new_lab__2QJ(lab_type__YY5G);
+              next__E3BH=new_lab__ARJ(lab_type__H3BH);
             };
-            ((__POINTER *)next__VY5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WY5G)[ 0]=next__VY5G;
+            ((__POINTER *)next__E3BH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__F3BH)[ 0]=next__E3BH;
           } else {
-            ((__POINTER *)result__XY5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__VY5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XY5G=next__VY5G;
+            ((__POINTER *)result__G3BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E3BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__G3BH=next__E3BH;
           };
         };
-        ptr__TSPF=result__XY5G;
+        ptr__RIRF=result__G3BH;
       };
-      result__SSPF=((__LIP_INTEGER *)ptr__TSPF);
-      *(result__SSPF) = *(Self__XTRE);
+      result__QIRF=((__LIP_INTEGER *)ptr__RIRF);
+      *(result__QIRF) = *(Self__JWRE);
     };
-    result__0TRE=result__SSPF;
+    result__MWRE=result__QIRF;
   } else {
-    Self__ZW2E=((__FAST_ARRAYoLIP_INTEGERo *)storage__AURE);
-    result__0TRE=((void **)Self__ZW2E->parent_arrayed_collection__5TRE.storage__YAWE)[Self__ZW2E->parent_arrayed_collection__5TRE.upper__Y4VE];
-    Self__PX2E=((__FAST_ARRAYoLIP_INTEGERo *)storage__AURE);
-    Self__PX2E->parent_arrayed_collection__5TRE.upper__Y4VE=(__INTEGER)(Self__PX2E->parent_arrayed_collection__5TRE.upper__Y4VE -  1);
+    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);
   };
-  ((__LIP_INTEGER *)result__0TRE)->value__ED0F=i__YTRE;
-  return(result__0TRE);
+  ((__LIP_INTEGER *)result__MWRE)->value__G31F=i__KWRE;
+  return(result__MWRE);
 }
 
-static void* get__N2DF(__LIP_STRING *Self__O2DF,void *str__P2DF)
+static void* get__3HEF(__LIP_STRING *Self__4HEF,void *str__5HEF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__R2DF;
-  __LIP_STRING *result__LK2F;
-  __POINTER ptr__MK2F,ptr_table__1Y5G,next__0Y5G,result__2Y5G;
-  __POINTER ptr_table__AZ5G,next__5Y5G,result__BZ5G;
-  __INTEGER typ_id__RK2F;
-  __UINTEGER_32 sz__OK2F,a__YT2G,new_size__ZT2G,t__3T2G,a__2T2G;
-  __UINTEGER_32 new_size__DZ5G,lab_type__CZ5G;
-  __FAST_ARRAYoLIP_STRINGo *Self__VBQF,*Self__LCQF;
-  result__R2DF=NULL;
-  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__X2DF)->parent_arrayed_collection__W2DF.upper__P4MF <  0)) {
-    result__LK2F=NULL;
-    ptr__MK2F=((__POINTER )(NULL));
-    typ_id__RK2F= 0;
-    sz__OK2F=((__UINTEGER_32 )sizeof(__LIP_STRING));
-    if ((sz__OK2F ==  0)) {
-      result__LK2F=Self__O2DF;
-    } else {
-      typ_id__RK2F=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__OK2F);
-      if ((typ_id__RK2F == (__INTEGER)(-  1))) {
-        a__YT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__ZT2G=(__UINTEGER_32)((__UINTEGER_32)(sz__OK2F + a__YT2G) & (__UINTEGER_32)(~ a__YT2G));
-        ptr_table__1Y5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZT2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__0Y5G=((__POINTER )(NULL));
-        result__2Y5G=((__POINTER *)ptr_table__1Y5G)[ 0];
-        if ((result__2Y5G == (void *)NULL)) {
-          result__2Y5G=new_lab__2QJ(new_size__ZT2G);
-          next__0Y5G=(void *)((unsigned long)result__2Y5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZT2G)));
-          ((__POINTER *)next__0Y5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1Y5G)[ 0]=next__0Y5G;
-        } else {
-          next__0Y5G=((__POINTER *)result__2Y5G)[ 0];
-          if ((next__0Y5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2Y5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ZT2G <<  1)) <=  4096)) {
-              next__0Y5G=(void *)((unsigned long)result__2Y5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZT2G)));
+  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)));
             } else {
-              next__0Y5G=new_lab__2QJ(new_size__ZT2G);
-            };
-            ((__POINTER *)next__0Y5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1Y5G)[ 0]=next__0Y5G;
-          } else {
-            ((__POINTER *)result__2Y5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__0Y5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2Y5G=next__0Y5G;
-          };
-        };
-        ptr__MK2F=result__2Y5G;
-      } else {
-        t__3T2G=((__UINTEGER_32 )typ_id__RK2F);
-        a__2T2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__DZ5G=(__UINTEGER_32)((__UINTEGER_32)(sz__OK2F + a__2T2G) & (__UINTEGER_32)(~ a__2T2G));
-        ptr_table__AZ5G=((__POINTER )(&(table_type[(t__3T2G)])));
-        lab_type__CZ5G=(__UINTEGER_32)(t__3T2G |  1);
-        next__5Y5G=((__POINTER )(NULL));
-        result__BZ5G=((__POINTER *)ptr_table__AZ5G)[ 0];
-        if ((result__BZ5G == (void *)NULL)) {
-          result__BZ5G=new_lab__2QJ(lab_type__CZ5G);
-          next__5Y5G=(void *)((unsigned long)result__BZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZ5G)));
-          ((__POINTER *)next__5Y5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AZ5G)[ 0]=next__5Y5G;
-        } else {
-          next__5Y5G=((__POINTER *)result__BZ5G)[ 0];
-          if ((next__5Y5G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BZ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__DZ5G <<  1)) <=  4096)) {
-              next__5Y5G=(void *)((unsigned long)result__BZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZ5G)));
+              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)));
             } else {
-              next__5Y5G=new_lab__2QJ(lab_type__CZ5G);
+              next__O3BH=new_lab__ARJ(lab_type__R3BH);
             };
-            ((__POINTER *)next__5Y5G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AZ5G)[ 0]=next__5Y5G;
+            ((__POINTER *)next__O3BH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__P3BH)[ 0]=next__O3BH;
           } else {
-            ((__POINTER *)result__BZ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__5Y5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BZ5G=next__5Y5G;
+            ((__POINTER *)result__Q3BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O3BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Q3BH=next__O3BH;
           };
         };
-        ptr__MK2F=result__BZ5G;
+        ptr__2E4F=result__Q3BH;
       };
-      result__LK2F=((__LIP_STRING *)ptr__MK2F);
-      *(result__LK2F) = *(Self__O2DF);
+      result__1E4F=((__LIP_STRING *)ptr__2E4F);
+      *(result__1E4F) = *(Self__4HEF);
     };
-    result__R2DF=result__LK2F;
+    result__BIEF=result__1E4F;
   } else {
-    Self__VBQF=((__FAST_ARRAYoLIP_STRINGo *)storage__X2DF);
-    result__R2DF=((void **)Self__VBQF->parent_arrayed_collection__W2DF.storage__FDNF)[Self__VBQF->parent_arrayed_collection__W2DF.upper__P4MF];
-    Self__LCQF=((__FAST_ARRAYoLIP_STRINGo *)storage__X2DF);
-    Self__LCQF->parent_arrayed_collection__W2DF.upper__P4MF=(__INTEGER)(Self__LCQF->parent_arrayed_collection__W2DF.upper__P4MF -  1);
+    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);
   };
-  ((__LIP_STRING *)result__R2DF)->value__TMTE=str__P2DF;
-  return(result__R2DF);
+  ((__LIP_STRING *)result__BIEF)->value__FPTE=str__5HEF;
+  return(result__BIEF);
 }
 
-static void free__2XZF(__LIP_INTEGER *Self__3XZF)
+static void free__4R1F(__LIP_INTEGER *Self__5R1F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__J40F,__tmp__N50F,__tmp__MOAG,Self__SGCG;
-  __FAST_ARRAYoLIP_INTEGERo *Self__H40F;
-  __BOOLEAN __tmp__X40F;
-  void **__tmp__M50F,**new__YNAG;
-  Self__H40F=((__FAST_ARRAYoLIP_INTEGERo *)storage__AURE);
-  new_capacity__J40F= 0;
-  if (((__INTEGER)(Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE +  1) <= (__INTEGER)(Self__H40F->parent_arrayed_collection__5TRE.capacity__NAWE -  1))) {
-    Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE=(__INTEGER)(Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE +  1);
-    __tmp__X40F=TRUE__;
+  __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__;
   } else {
-    __tmp__X40F=FALSE__;
-  };
-  if ((! __tmp__X40F)) {
-    if ((Self__H40F->parent_arrayed_collection__5TRE.capacity__NAWE ==  0)) {
-      Self__H40F->parent_arrayed_collection__5TRE.storage__YAWE=create__OMEF( 2);
-      Self__H40F->parent_arrayed_collection__5TRE.capacity__NAWE= 2;
-      Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE= 0;
-    } else {
-      new_capacity__J40F=(__INTEGER)(Self__H40F->parent_arrayed_collection__5TRE.capacity__NAWE <<  1);
-      __tmp__M50F=Self__H40F->parent_arrayed_collection__5TRE.storage__YAWE;
-      __tmp__N50F=Self__H40F->parent_arrayed_collection__5TRE.capacity__NAWE;
-      new__YNAG=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__M50F)),((__UINTEGER_32 )(__INTEGER)(__tmp__N50F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__J40F * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__MOAG=(__INTEGER)(new_capacity__J40F -  1);
-      Self__SGCG=__tmp__N50F;
-      while ((Self__SGCG <= __tmp__MOAG)) {
-        new__YNAG[Self__SGCG]=NULL;
-        Self__SGCG=(__INTEGER)(Self__SGCG +  1);
-      };
-      Self__H40F->parent_arrayed_collection__5TRE.storage__YAWE=new__YNAG;
-      Self__H40F->parent_arrayed_collection__5TRE.capacity__NAWE=new_capacity__J40F;
-      Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE=(__INTEGER)(Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE +  1);
-    };
-  };
-  ((void **)Self__H40F->parent_arrayed_collection__5TRE.storage__YAWE)[Self__H40F->parent_arrayed_collection__5TRE.upper__Y4VE]=Self__3XZF;
+    __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;
 }
 
-static void free__HJBG(__LIP_STRING *Self__IJBG)
+static void free__DEDG(__LIP_STRING *Self__EEDG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__O4BG,__tmp__S5BG,__tmp__1YEG,Self__ULFG;
-  __FAST_ARRAYoLIP_STRINGo *Self__M4BG;
-  __BOOLEAN __tmp__24BG;
-  void **__tmp__R5BG,**new__HYEG;
-  Self__M4BG=((__FAST_ARRAYoLIP_STRINGo *)storage__X2DF);
-  new_capacity__O4BG= 0;
-  if (((__INTEGER)(Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF +  1) <= (__INTEGER)(Self__M4BG->parent_arrayed_collection__W2DF.capacity__0CNF -  1))) {
-    Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF=(__INTEGER)(Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF +  1);
-    __tmp__24BG=TRUE__;
+  __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__;
   } else {
-    __tmp__24BG=FALSE__;
-  };
-  if ((! __tmp__24BG)) {
-    if ((Self__M4BG->parent_arrayed_collection__W2DF.capacity__0CNF ==  0)) {
-      Self__M4BG->parent_arrayed_collection__W2DF.storage__FDNF=create__VVUF( 2);
-      Self__M4BG->parent_arrayed_collection__W2DF.capacity__0CNF= 2;
-      Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF= 0;
-    } else {
-      new_capacity__O4BG=(__INTEGER)(Self__M4BG->parent_arrayed_collection__W2DF.capacity__0CNF <<  1);
-      __tmp__R5BG=Self__M4BG->parent_arrayed_collection__W2DF.storage__FDNF;
-      __tmp__S5BG=Self__M4BG->parent_arrayed_collection__W2DF.capacity__0CNF;
-      new__HYEG=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__R5BG)),((__UINTEGER_32 )(__INTEGER)(__tmp__S5BG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__O4BG * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__1YEG=(__INTEGER)(new_capacity__O4BG -  1);
-      Self__ULFG=__tmp__S5BG;
-      while ((Self__ULFG <= __tmp__1YEG)) {
-        new__HYEG[Self__ULFG]=NULL;
-        Self__ULFG=(__INTEGER)(Self__ULFG +  1);
-      };
-      Self__M4BG->parent_arrayed_collection__W2DF.storage__FDNF=new__HYEG;
-      Self__M4BG->parent_arrayed_collection__W2DF.capacity__0CNF=new_capacity__O4BG;
-      Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF=(__INTEGER)(Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF +  1);
-    };
-  };
-  ((void **)Self__M4BG->parent_arrayed_collection__W2DF.storage__FDNF)[Self__M4BG->parent_arrayed_collection__W2DF.upper__P4MF]=Self__IJBG;
+    __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;
 }
 
-static void load_directory__is_recursive__EPTF(__LIP_CALL *Self__FPTF,void *path__GPTF,__BOOLEAN is_rec__HPTF)
+static void load_directory__is_recursive__TFVF(__LIP_CALL *Self__UFVF,void *path__VFVF,__BOOLEAN is_rec__WFVF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  void *dir__JPTF,*__tmp__CQTF;
-  void *entry__IPTF;
-  __FILE_UNIX *Self__4ZXG;
-  __INTEGER __tmp__GQTF,Self__SMFG,i1__FZ5G,i2__GZ5G;
-  void *__tmp__NQTF,*__tmp__WQTF,*__tmp__NRTF;
-  __STRING_CONSTANT *Self__HZ5G;
-  __POSITION __tmp__1RTF;
-  __BOOLEAN __tmp__QPTF,__tmp__0PTF,__tmp__XPTF,__tmp__1PTF;
-  __BOOLEAN result__EZ5G,__tmp__ZQTF,__tmp__DRTF,__tmp__GRTF;
-  dir__JPTF=NULL;
-  if (FILE_SYSTEM__->parent_directory__5ED==0) {
+  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) {
   } else {
-    parent_directory__4DD();
+    parent_directory__CED();
   };
-  entry__IPTF=get_entry__D0AC(path__GPTF);
-  if (((void *)entry__IPTF != (void *)NULL)) {
-    if (((struct ___OBJ *)entry__IPTF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__QPTF=((void *)((__DIRECTORY_UNIX *)entry__IPTF) != (void *)NULL);
+  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);
     } else {
-      __tmp__QPTF=FALSE__;
+      __tmp__5FVF=FALSE__;
     };
-    __tmp__0PTF=__tmp__QPTF;
+    __tmp__JGVF=__tmp__5FVF;
   } else {
-    __tmp__0PTF=FALSE__;
+    __tmp__JGVF=FALSE__;
   };
-  if (__tmp__0PTF) {
-    if (((struct ___OBJ *)entry__IPTF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__XPTF=open__JERD(entry__IPTF);
+  if (__tmp__JGVF) {
+    if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__GGVF=open__NERD(entry__XFVF);
     } else {
-      Self__4ZXG=((__FILE_UNIX *)entry__IPTF);
-      Self__4ZXG->stream__UIRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__4ZXG->parent_entry_unix__MCF.parent_entry__IED.path__BD)->storage__FQO),"r+b")));
-      __tmp__XPTF=(Self__4ZXG->stream__UIRD != (void *)NULL);
+      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);
     };
-    __tmp__1PTF=__tmp__XPTF;
+    __tmp__KGVF=__tmp__GGVF;
   } else {
-    __tmp__1PTF=FALSE__;
+    __tmp__KGVF=FALSE__;
   };
-  if (__tmp__1PTF) {
-    if (entry__IPTF==NULL) {
-      __tmp__CQTF=NULL;
+  if (__tmp__KGVF) {
+    if (entry__XFVF==NULL) {
+      __tmp__RGVF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__IPTF)->__id) {
+      switch (((struct ___OBJ *)entry__XFVF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__CQTF=((void *)entry__IPTF);
+        __tmp__RGVF=((void *)entry__XFVF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__CQTF=NULL;
+        __tmp__RGVF=NULL;
       } break;
       }
     };
-    dir__JPTF=__tmp__CQTF;
-    __tmp__GQTF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__CQTF)->parent_directory__KED.list__YERD)->parent_linked_collection__XERD.upper__E12D;
-    Self__SMFG= 1;
-    while ((Self__SMFG <= __tmp__GQTF)) {
-      entry__IPTF=item__FCPE(dir__JPTF,Self__SMFG);
-      if (((struct ___OBJ *)entry__IPTF)->__id==__DIRECTORY_UNIX__) {
-        __tmp__NQTF=((__DIRECTORY_UNIX *)entry__IPTF)->parent_entry_unix__JED.parent_entry__IED.name__FNT;
+    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;
       } else {
-        __tmp__NQTF=((__FILE_UNIX *)entry__IPTF)->parent_entry_unix__MCF.parent_entry__IED.name__FNT;
+        __tmp__2GVF=((__FILE_UNIX *)entry__XFVF)->parent_entry_unix__QCF.parent_entry__MED.name__JNT;
       };
-      Self__HZ5G=((__STRING_CONSTANT *)__tmp__NQTF);
-      result__EZ5G=FALSE__;
-      i1__FZ5G= 0;
-      i2__GZ5G= 0;
-      if ((((__STRING_CONSTANT *)(&__string_151))->count__DD <= Self__HZ5G->count__DD)) {
-        i1__FZ5G=(__INTEGER)((__INTEGER)(Self__HZ5G->count__DD - ((__STRING_CONSTANT *)(&__string_151))->count__DD) +  1);
-        i2__GZ5G= 1;
-        while ((! (((i1__FZ5G > Self__HZ5G->count__DD) || (i2__GZ5G > ((__STRING_CONSTANT *)(&__string_151))->count__DD)) || (((__CHARACTER *)Self__HZ5G->storage__FQO)[(__INTEGER)(i1__FZ5G -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__FQO)[(__INTEGER)(i2__GZ5G -  1)])))) {
-          i1__FZ5G=(__INTEGER)(i1__FZ5G +  1);
-          i2__GZ5G=(__INTEGER)(i2__GZ5G +  1);
+      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);
         };
-        result__EZ5G=(i1__FZ5G > Self__HZ5G->count__DD);
+        result__T3BH=(i1__U3BH > Self__W3BH->count__DD);
       };
-      if (result__EZ5G) {
-        if (((struct ___OBJ *)entry__IPTF)->__id==__DIRECTORY_UNIX__) {
-          __tmp__WQTF=((__DIRECTORY_UNIX *)entry__IPTF)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+      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;
         } else {
-          __tmp__WQTF=((__FILE_UNIX *)entry__IPTF)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
+          __tmp__FHVF=((__FILE_UNIX *)entry__XFVF)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
         };
-        add_last__BBPD(path_file__UQTF,__tmp__WQTF);
-        __tmp__ZQTF=TRUE__;
+        add_last__FBPD(path_file__DHVF,__tmp__FHVF);
+        __tmp__IHVF=TRUE__;
       } else {
-        __tmp__ZQTF=FALSE__;
+        __tmp__IHVF=FALSE__;
       };
-      if ((! __tmp__ZQTF)) {
-        if (is_rec__HPTF) {
-          if (((struct ___OBJ *)entry__IPTF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__DRTF=((void *)((__DIRECTORY_UNIX *)entry__IPTF) != (void *)NULL);
+      if ((! __tmp__IHVF)) {
+        if (is_rec__WFVF) {
+          if (((struct ___OBJ *)entry__XFVF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__SHVF=((void *)((__DIRECTORY_UNIX *)entry__XFVF) != (void *)NULL);
           } else {
-            __tmp__DRTF=FALSE__;
+            __tmp__SHVF=FALSE__;
           };
-          __tmp__GRTF=__tmp__DRTF;
+          __tmp__VHVF=__tmp__SHVF;
         } else {
-          __tmp__GRTF=FALSE__;
+          __tmp__VHVF=FALSE__;
         };
-        if (__tmp__GRTF) {
-          if (((struct ___OBJ *)entry__IPTF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__NRTF=((__DIRECTORY_UNIX *)entry__IPTF)->parent_entry_unix__JED.parent_entry__IED.path__BD;
+        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;
           } else {
-            __tmp__NRTF=((__FILE_UNIX *)entry__IPTF)->parent_entry_unix__MCF.parent_entry__IED.path__BD;
+            __tmp__2HVF=((__FILE_UNIX *)entry__XFVF)->parent_entry_unix__QCF.parent_entry__MED.path__BD;
           };
-          load_directory__is_recursive__EPTF(Self__FPTF,__tmp__NRTF,TRUE__);
+          load_directory__is_recursive__TFVF(Self__UFVF,__tmp__2HVF,TRUE__);
         };
       };
-      Self__SMFG=(__INTEGER)(Self__SMFG +  1);
+      Self__QHHG=(__INTEGER)(Self__QHHG +  1);
     };
   } else {
-    copy__JCS(string_tmp__VH,(&__string_312));
-    append__RNS(string_tmp__VH,path__GPTF);
-    append__RNS(string_tmp__VH,(&__string_275));
-    __tmp__1RTF=Self__FPTF->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ;
-    put_error__text__0MG( 2,string_tmp__VH);
-    put_position__EOG(__tmp__1RTF);
-    put_string__E1F(msg_err__5MG);
-    if ((type_error__4MG !=  2)) {
+    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)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__NPBG(__LIP_STRING *Self__OPBG,void *str__PPBG)
+static void append_in__JKDG(__LIP_STRING *Self__KKDG,void *str__LKDG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER i__QPBG;
-  __CHARACTER car__RPBG;
-  car__RPBG='\0';
-  i__QPBG= 1;
-  while ((i__QPBG <= ((__STRING_CONSTANT *)Self__OPBG->value__TMTE)->count__DD)) {
-    car__RPBG=((__CHARACTER *)((__STRING_CONSTANT *)Self__OPBG->value__TMTE)->storage__FQO)[(__INTEGER)(i__QPBG -  1)];
-    if ((car__RPBG == '\\')) {
-      i__QPBG=(__INTEGER)(i__QPBG +  1);
-      if ((i__QPBG <= ((__STRING_CONSTANT *)Self__OPBG->value__TMTE)->count__DD)) {
-        car__RPBG=((__CHARACTER *)((__STRING_CONSTANT *)Self__OPBG->value__TMTE)->storage__FQO)[(__INTEGER)(i__QPBG -  1)];
-        if ((car__RPBG == 'a')) {
-          add_last__JLT(str__PPBG,'\a');
+  __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');
         };
-        if ((car__RPBG == 'b')) {
-          add_last__JLT(str__PPBG,'\b');
+        if ((car__NKDG == 'b')) {
+          add_last__NLT(str__LKDG,'\b');
         };
-        if ((car__RPBG == 'f')) {
-          add_last__JLT(str__PPBG,'\f');
+        if ((car__NKDG == 'f')) {
+          add_last__NLT(str__LKDG,'\f');
         };
-        if ((car__RPBG == 'n')) {
-          add_last__JLT(str__PPBG,'\n');
+        if ((car__NKDG == 'n')) {
+          add_last__NLT(str__LKDG,'\n');
         };
-        if ((car__RPBG == 'r')) {
-          add_last__JLT(str__PPBG,'\r');
+        if ((car__NKDG == 'r')) {
+          add_last__NLT(str__LKDG,'\r');
         };
-        if ((car__RPBG == 't')) {
-          add_last__JLT(str__PPBG,'\t');
+        if ((car__NKDG == 't')) {
+          add_last__NLT(str__LKDG,'\t');
         };
-        if ((car__RPBG == 'v')) {
-          add_last__JLT(str__PPBG,'\v');
+        if ((car__NKDG == 'v')) {
+          add_last__NLT(str__LKDG,'\v');
         };
-        if ((car__RPBG == '\\')) {
-          add_last__JLT(str__PPBG,'\\');
+        if ((car__NKDG == '\\')) {
+          add_last__NLT(str__LKDG,'\\');
         };
-        if ((car__RPBG == '?')) {
-          add_last__JLT(str__PPBG,'\?');
+        if ((car__NKDG == '?')) {
+          add_last__NLT(str__LKDG,'\?');
         };
-        if ((car__RPBG == '\'')) {
-          add_last__JLT(str__PPBG,'\'');
+        if ((car__NKDG == '\'')) {
+          add_last__NLT(str__LKDG,'\'');
         };
-        if ((car__RPBG == '\"')) {
-          add_last__JLT(str__PPBG,'\"');
+        if ((car__NKDG == '\"')) {
+          add_last__NLT(str__LKDG,'\"');
         };
       } else {
-        add_last__JLT(str__PPBG,car__RPBG);
+        add_last__NLT(str__LKDG,car__NKDG);
       };
     } else {
-      add_last__JLT(str__PPBG,car__RPBG);
+      add_last__NLT(str__LKDG,car__NKDG);
     };
-    i__QPBG=(__INTEGER)(i__QPBG +  1);
+    i__MKDG=(__INTEGER)(i__MKDG +  1);
   };
 }
 
-static void print_positif__C3DG(__INTEGER Self__D3DG)
+static void print_positif__AYFG(__INTEGER Self__BYFG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __INTEGER val__M3DG;
-  __CHARACTER char__L3DG;
-  char__L3DG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__D3DG %  10)) + ((__INTEGER_8 )'0')))));
-  val__M3DG=(__INTEGER)(Self__D3DG /  10);
-  if ((val__M3DG !=  0)) {
-    print_positif__C3DG(val__M3DG);
-  };
-  fputc((int)(char__L3DG),stdout);
+  __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);
 }
 
-static __BOOLEAN has__DLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ELMB,void *e__FLMB)
+static __BOOLEAN has__HLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ILMB,void *e__JLMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__K13G;
-  __INTEGER result__J13G,__tmp__L13G,Self__M13G;
-  void *node__OLMB;
-  Self__K13G=((__STRING_CONSTANT *)e__FLMB);
-  result__J13G= 0;
-  __tmp__L13G=Self__K13G->count__DD;
-  Self__M13G= 1;
-  while ((Self__M13G <= __tmp__L13G)) {
-    result__J13G=(__INTEGER)((__INTEGER)( 5 * result__J13G) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__K13G->storage__FQO)[(__INTEGER)(Self__M13G -  1)])));
-    Self__M13G=(__INTEGER)(Self__M13G +  1);
-  };
-  if ((result__J13G <  0)) {
-    result__J13G=(__INTEGER)(~ result__J13G);
-  };
-  node__OLMB=((void **)Self__ELMB->buckets__5DV)[(__INTEGER)(result__J13G % Self__ELMB->capacity__0HT)];
-  while ((! (((void *)node__OLMB == (void *)NULL) || __infix_equal_equal__O5DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__OLMB)->item__LEV,e__FLMB)))) {
-    node__OLMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__OLMB)->next__WEV;
-  };
-  return(((void *)node__OLMB != (void *)NULL));
+  __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));
 }
 
-static void display_row__DLIC(__ITM_TYPE_MULTI *Self__ELIC,void *buffer__FLIC)
+static void display_raw__HLIC(__ITM_TYPE_MULTI *Self__ILIC,void *buffer__JLIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__MLIC,Self__HKRC;
-  void *__tmp__TLIC,*__tmp__WLIC;
-  __ITM_TYPE_STYLE *Self__YS0G,*Self__DT0G;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__0S0G;
-  __tmp__MLIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ELIC->list_type__QJP)->parent_arrayed_collection__JXC.upper__0HV -  1);
-  Self__HKRC= 0;
-  while ((Self__HKRC <= __tmp__MLIC)) {
-    __tmp__TLIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ELIC->list_type__QJP)->parent_arrayed_collection__JXC.storage__BMV)[Self__HKRC];
-    switch (((struct ___OBJ *)__tmp__TLIC)->__id) {
+  __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) {
     case __ITM_TYPE_PARAMETER__: {
-      append__RNS(buffer__FLIC,((__ITM_TYPE_PARAMETER *)__tmp__TLIC)->parent_itm_type__NDE.name__0XP);
+      append__VNS(buffer__JLIC,((__ITM_TYPE_PARAMETER *)__tmp__XLIC)->parent_itm_type__RDE.name__4XP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__RNS(buffer__FLIC,((__ITM_TYPE_SIMPLE *)__tmp__TLIC)->name__0XP);
+      append__VNS(buffer__JLIC,((__ITM_TYPE_SIMPLE *)__tmp__XLIC)->name__4XP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__4FPD(__tmp__TLIC,buffer__FLIC);
+      append_in__CGPD(__tmp__XLIC,buffer__JLIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__CHPD(__tmp__TLIC,buffer__FLIC);
+      append_in__GHPD(__tmp__XLIC,buffer__JLIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__YS0G=((__ITM_TYPE_STYLE *)__tmp__TLIC);
-      if (((void *)Self__YS0G->style__DYP != (void *)NULL)) {
-        append__RNS(buffer__FLIC,Self__YS0G->style__DYP);
-        add_last__JLT(buffer__FLIC,' ');
+      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,' ');
       };
-      append__RNS(buffer__FLIC,Self__YS0G->parent_itm_type_simple__RRN.name__0XP);
+      append__VNS(buffer__JLIC,Self__NS2G->parent_itm_type_simple__VRN.name__4XP);
     } break;
     };
-    add_last__JLT(buffer__FLIC,',');
-    Self__HKRC=(__INTEGER)(Self__HKRC +  1);
+    add_last__NLT(buffer__JLIC,',');
+    Self__LKRC=(__INTEGER)(Self__LKRC +  1);
   };
-  Self__0S0G=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ELIC->list_type__QJP);
-  __tmp__WLIC=((void **)Self__0S0G->parent_arrayed_collection__JXC.storage__BMV)[Self__0S0G->parent_arrayed_collection__JXC.upper__0HV];
-  switch (((struct ___OBJ *)__tmp__WLIC)->__id) {
+  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) {
   case __ITM_TYPE_PARAMETER__: {
-    append__RNS(buffer__FLIC,((__ITM_TYPE_PARAMETER *)__tmp__WLIC)->parent_itm_type__NDE.name__0XP);
+    append__VNS(buffer__JLIC,((__ITM_TYPE_PARAMETER *)__tmp__0LIC)->parent_itm_type__RDE.name__4XP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__RNS(buffer__FLIC,((__ITM_TYPE_SIMPLE *)__tmp__WLIC)->name__0XP);
+    append__VNS(buffer__JLIC,((__ITM_TYPE_SIMPLE *)__tmp__0LIC)->name__4XP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__4FPD(__tmp__WLIC,buffer__FLIC);
+    append_in__CGPD(__tmp__0LIC,buffer__JLIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__CHPD(__tmp__WLIC,buffer__FLIC);
+    append_in__GHPD(__tmp__0LIC,buffer__JLIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__DT0G=((__ITM_TYPE_STYLE *)__tmp__WLIC);
-    if (((void *)Self__DT0G->style__DYP != (void *)NULL)) {
-      append__RNS(buffer__FLIC,Self__DT0G->style__DYP);
-      add_last__JLT(buffer__FLIC,' ');
+    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,' ');
     };
-    append__RNS(buffer__FLIC,Self__DT0G->parent_itm_type_simple__RRN.name__0XP);
+    append__VNS(buffer__JLIC,Self__ZS2G->parent_itm_type_simple__VRN.name__4XP);
   } break;
   };
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__AJK(__INTEGER new_count__CJK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__EJK(__INTEGER new_count__GJK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__I3K,ptr_table__KZ5G,next__JZ5G,result__LZ5G;
-  __POINTER ptr_table__PZ5G,next__OZ5G,result__QZ5G;
-  __INTEGER typ_id__N3K;
-  __UINTEGER_32 sz__K3K,a__AU2G,new_size__BU2G,t__FU2G,a__EU2G;
-  __UINTEGER_32 new_size__SZ5G,lab_type__RZ5G;
-  __FAST_ARRAYoITM_LOCALo *result__H3K,*Self__JMU;
-  result__H3K=NULL;
-  ptr__I3K=((__POINTER )(NULL));
-  typ_id__N3K= 0;
-  sz__K3K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
-  if ((sz__K3K ==  0)) {
-    result__H3K=FAST_ARRAYoITM_LOCALo__;
+  __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__;
   } else {
-    typ_id__N3K=__FAST_ARRAYoITM_LOCALo__;
-    clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__K3K);
-    if ((typ_id__N3K == (__INTEGER)(-  1))) {
-      a__AU2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__BU2G=(__UINTEGER_32)((__UINTEGER_32)(sz__K3K + a__AU2G) & (__UINTEGER_32)(~ a__AU2G));
-      ptr_table__KZ5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BU2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JZ5G=((__POINTER )(NULL));
-      result__LZ5G=((__POINTER *)ptr_table__KZ5G)[ 0];
-      if ((result__LZ5G == (void *)NULL)) {
-        result__LZ5G=new_lab__2QJ(new_size__BU2G);
-        next__JZ5G=(void *)((unsigned long)result__LZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BU2G)));
-        ((__POINTER *)next__JZ5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KZ5G)[ 0]=next__JZ5G;
-      } else {
-        next__JZ5G=((__POINTER *)result__LZ5G)[ 0];
-        if ((next__JZ5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LZ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__BU2G <<  1)) <=  4096)) {
-            next__JZ5G=(void *)((unsigned long)result__LZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BU2G)));
-          } else {
-            next__JZ5G=new_lab__2QJ(new_size__BU2G);
-          };
-          ((__POINTER *)next__JZ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KZ5G)[ 0]=next__JZ5G;
-        } else {
-          ((__POINTER *)result__LZ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__JZ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LZ5G=next__JZ5G;
-        };
-      };
-      ptr__I3K=result__LZ5G;
-    } else {
-      t__FU2G=((__UINTEGER_32 )typ_id__N3K);
-      a__EU2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SZ5G=(__UINTEGER_32)((__UINTEGER_32)(sz__K3K + a__EU2G) & (__UINTEGER_32)(~ a__EU2G));
-      ptr_table__PZ5G=((__POINTER )(&(table_type[(t__FU2G)])));
-      lab_type__RZ5G=(__UINTEGER_32)(t__FU2G |  1);
-      next__OZ5G=((__POINTER )(NULL));
-      result__QZ5G=((__POINTER *)ptr_table__PZ5G)[ 0];
-      if ((result__QZ5G == (void *)NULL)) {
-        result__QZ5G=new_lab__2QJ(lab_type__RZ5G);
-        next__OZ5G=(void *)((unsigned long)result__QZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SZ5G)));
-        ((__POINTER *)next__OZ5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PZ5G)[ 0]=next__OZ5G;
-      } else {
-        next__OZ5G=((__POINTER *)result__QZ5G)[ 0];
-        if ((next__OZ5G == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QZ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__SZ5G <<  1)) <=  4096)) {
-            next__OZ5G=(void *)((unsigned long)result__QZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SZ5G)));
-          } else {
-            next__OZ5G=new_lab__2QJ(lab_type__RZ5G);
-          };
-          ((__POINTER *)next__OZ5G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PZ5G)[ 0]=next__OZ5G;
-        } else {
-          ((__POINTER *)result__QZ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__OZ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QZ5G=next__OZ5G;
-        };
-      };
-      ptr__I3K=result__QZ5G;
-    };
-    result__H3K=((__FAST_ARRAYoITM_LOCALo *)ptr__I3K);
-    *(result__H3K) = *(FAST_ARRAYoITM_LOCALo__);
-  };
-  Self__JMU=((__FAST_ARRAYoITM_LOCALo *)result__H3K);
-  if ((Self__JMU->parent_arrayed_collection__U0H.capacity__HKU < new_count__CJK)) {
-    Self__JMU->parent_arrayed_collection__U0H.storage__SKU=create__XQQB(new_count__CJK);
-    Self__JMU->parent_arrayed_collection__U0H.capacity__HKU=new_count__CJK;
-  };
-  Self__JMU->parent_arrayed_collection__U0H.upper__L0K=(__INTEGER)(-  1);
-  return(result__H3K);
+    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);
 }
 
-static void add_last__V1U(__FAST_ARRAYoITM_LOCALo *Self__W1U,void *element__X1U)
+static void add_last__Z1U(__FAST_ARRAYoITM_LOCALo *Self__01U,void *element__11U)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__Y1U,__tmp__22U,__tmp__ACEC,Self__IEVD;
-  __BOOLEAN __tmp__G2U;
-  void **__tmp__12U,**new__MBEC;
-  new_capacity__Y1U= 0;
-  if (((__INTEGER)(Self__W1U->parent_arrayed_collection__U0H.upper__L0K +  1) <= (__INTEGER)(Self__W1U->parent_arrayed_collection__U0H.capacity__HKU -  1))) {
-    Self__W1U->parent_arrayed_collection__U0H.upper__L0K=(__INTEGER)(Self__W1U->parent_arrayed_collection__U0H.upper__L0K +  1);
-    __tmp__G2U=TRUE__;
+  __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__;
   } else {
-    __tmp__G2U=FALSE__;
-  };
-  if ((! __tmp__G2U)) {
-    if ((Self__W1U->parent_arrayed_collection__U0H.capacity__HKU ==  0)) {
-      Self__W1U->parent_arrayed_collection__U0H.storage__SKU=create__XQQB( 2);
-      Self__W1U->parent_arrayed_collection__U0H.capacity__HKU= 2;
-      Self__W1U->parent_arrayed_collection__U0H.upper__L0K= 0;
-    } else {
-      new_capacity__Y1U=(__INTEGER)(Self__W1U->parent_arrayed_collection__U0H.capacity__HKU <<  1);
-      __tmp__12U=Self__W1U->parent_arrayed_collection__U0H.storage__SKU;
-      __tmp__22U=Self__W1U->parent_arrayed_collection__U0H.capacity__HKU;
-      new__MBEC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__12U)),((__UINTEGER_32 )(__INTEGER)(__tmp__22U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Y1U * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ACEC=(__INTEGER)(new_capacity__Y1U -  1);
-      Self__IEVD=__tmp__22U;
-      while ((Self__IEVD <= __tmp__ACEC)) {
-        new__MBEC[Self__IEVD]=NULL;
-        Self__IEVD=(__INTEGER)(Self__IEVD +  1);
-      };
-      Self__W1U->parent_arrayed_collection__U0H.storage__SKU=new__MBEC;
-      Self__W1U->parent_arrayed_collection__U0H.capacity__HKU=new_capacity__Y1U;
-      Self__W1U->parent_arrayed_collection__U0H.upper__L0K=(__INTEGER)(Self__W1U->parent_arrayed_collection__U0H.upper__L0K +  1);
-    };
-  };
-  ((void **)Self__W1U->parent_arrayed_collection__U0H.storage__SKU)[Self__W1U->parent_arrayed_collection__U0H.upper__L0K]=element__X1U;
+    __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;
 }
 
-static void free__GJK(void *tmp__IJK)
+static void free__KJK(void *tmp__MJK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__COU,__tmp__GPU,__tmp__U5DC,Self__JCVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__AOU;
-  __BOOLEAN __tmp__QOU;
-  void **__tmp__FPU,**new__A5DC;
-  ((__FAST_ARRAYoITM_LOCALo *)tmp__IJK)->parent_arrayed_collection__U0H.upper__L0K=(__INTEGER)(-  1);
-  Self__AOU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__FRI);
-  new_capacity__COU= 0;
-  if (((__INTEGER)(Self__AOU->parent_arrayed_collection__ERI.upper__Z0T +  1) <= (__INTEGER)(Self__AOU->parent_arrayed_collection__ERI.capacity__MIU -  1))) {
-    Self__AOU->parent_arrayed_collection__ERI.upper__Z0T=(__INTEGER)(Self__AOU->parent_arrayed_collection__ERI.upper__Z0T +  1);
-    __tmp__QOU=TRUE__;
+  __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__;
   } else {
-    __tmp__QOU=FALSE__;
-  };
-  if ((! __tmp__QOU)) {
-    if ((Self__AOU->parent_arrayed_collection__ERI.capacity__MIU ==  0)) {
-      Self__AOU->parent_arrayed_collection__ERI.storage__XIU=create__UGQB( 2);
-      Self__AOU->parent_arrayed_collection__ERI.capacity__MIU= 2;
-      Self__AOU->parent_arrayed_collection__ERI.upper__Z0T= 0;
-    } else {
-      new_capacity__COU=(__INTEGER)(Self__AOU->parent_arrayed_collection__ERI.capacity__MIU <<  1);
-      __tmp__FPU=Self__AOU->parent_arrayed_collection__ERI.storage__XIU;
-      __tmp__GPU=Self__AOU->parent_arrayed_collection__ERI.capacity__MIU;
-      new__A5DC=((void **)realloc_dynamic__old_size__new_size__BELC(((__POINTER )((void **)__tmp__FPU)),((__UINTEGER_32 )(__INTEGER)(__tmp__GPU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__COU * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__U5DC=(__INTEGER)(new_capacity__COU -  1);
-      Self__JCVD=__tmp__GPU;
-      while ((Self__JCVD <= __tmp__U5DC)) {
-        new__A5DC[Self__JCVD]=NULL;
-        Self__JCVD=(__INTEGER)(Self__JCVD +  1);
-      };
-      Self__AOU->parent_arrayed_collection__ERI.storage__XIU=new__A5DC;
-      Self__AOU->parent_arrayed_collection__ERI.capacity__MIU=new_capacity__COU;
-      Self__AOU->parent_arrayed_collection__ERI.upper__Z0T=(__INTEGER)(Self__AOU->parent_arrayed_collection__ERI.upper__Z0T +  1);
-    };
-  };
-  ((void **)Self__AOU->parent_arrayed_collection__ERI.storage__XIU)[Self__AOU->parent_arrayed_collection__ERI.upper__Z0T]=tmp__IJK;
+    __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;
 }
 
-static void* copy__P3J(void *tmp__R3J)
+static void* copy__T3J(void *tmp__V3J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__4JU,other_upper__3JU,Self__W4JC;
-  void *result__T3J;
-  __FAST_ARRAYoITM_LOCALo *Self__1JU;
-  void **__tmp__VKU,**__tmp__XKU,**Self__1SCC;
-  result__T3J=create_with_capacity__AJK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__R3J)->parent_arrayed_collection__U0H.upper__L0K +  1));
-  Self__1JU=((__FAST_ARRAYoITM_LOCALo *)result__T3J);
-  new_capacity__4JU= 0;
-  other_upper__3JU=((__FAST_ARRAYoITM_LOCALo *)tmp__R3J)->parent_arrayed_collection__U0H.upper__L0K;
-  if ((other_upper__3JU >=  0)) {
-    new_capacity__4JU=(__INTEGER)(other_upper__3JU +  1);
-    if ((Self__1JU->parent_arrayed_collection__U0H.capacity__HKU < new_capacity__4JU)) {
-      Self__1JU->parent_arrayed_collection__U0H.storage__SKU=create__XQQB(new_capacity__4JU);
-      Self__1JU->parent_arrayed_collection__U0H.capacity__HKU=new_capacity__4JU;
-    };
-    __tmp__VKU=Self__1JU->parent_arrayed_collection__U0H.storage__SKU;
-    __tmp__XKU=((__FAST_ARRAYoITM_LOCALo *)tmp__R3J)->parent_arrayed_collection__U0H.storage__SKU;
-    Self__1SCC=((void **)__tmp__VKU);
-    Self__W4JC=other_upper__3JU;
-    while ((Self__W4JC >=  0)) {
-      Self__1SCC[Self__W4JC]=((void **)__tmp__XKU)[Self__W4JC];
-      Self__W4JC=(__INTEGER)(Self__W4JC -  1);
-    };
-  };
-  Self__1JU->parent_arrayed_collection__U0H.upper__L0K=other_upper__3JU;
-  free__GJK(tmp__R3J);
-  return(result__T3J);
+  __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);
 }
 
-static void** create__XSQB(__INTEGER nb_elements__ZSQB)
+static void** create__1SQB(__INTEGER nb_elements__3SQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__UT0G,a__ZT0G,new_size__VT0G,new_size2__WT0G,a__DR2G;
-  __UINTEGER_32 new_size__ER2G;
-  __POINTER result__TT0G,ptr_table__UZ5G,next__TZ5G,result__VZ5G;
-  void *result__YZ5G;
-  __INTEGER Self__K1MC;
-  void **Result__2NTB;
-  sz__UT0G=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZSQB * ((__INTEGER )(sizeof(void *)))));
-  result__TT0G=((__POINTER )(NULL));
-  a__ZT0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__VT0G=(__UINTEGER_32)((__UINTEGER_32)(sz__UT0G + a__ZT0G) & (__UINTEGER_32)(~ a__ZT0G));
-  new_size2__WT0G=(__UINTEGER_32)(new_size__VT0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__WT0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__DR2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__ER2G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WT0G + a__DR2G) & (__UINTEGER_32)(~ a__DR2G));
-    ptr_table__UZ5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ER2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__TZ5G=((__POINTER )(NULL));
-    result__VZ5G=((__POINTER *)ptr_table__UZ5G)[ 0];
-    if ((result__VZ5G == (void *)NULL)) {
-      result__VZ5G=new_lab__2QJ(new_size__ER2G);
-      next__TZ5G=(void *)((unsigned long)result__VZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ER2G)));
-      ((__POINTER *)next__TZ5G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__UZ5G)[ 0]=next__TZ5G;
-    } else {
-      next__TZ5G=((__POINTER *)result__VZ5G)[ 0];
-      if ((next__TZ5G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VZ5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__ER2G <<  1)) <=  4096)) {
-          next__TZ5G=(void *)((unsigned long)result__VZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ER2G)));
-        } else {
-          next__TZ5G=new_lab__2QJ(new_size__ER2G);
-        };
-        ((__POINTER *)next__TZ5G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UZ5G)[ 0]=next__TZ5G;
-      } else {
-        ((__POINTER *)result__VZ5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__TZ5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__VZ5G=next__TZ5G;
-      };
-    };
-    ((__POINTER *)result__VZ5G)[ 0]=((__POINTER ) 3);
-    result__TT0G=(void *)((unsigned long)result__VZ5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__YZ5G=first_free__HDVB;
-    while ((((void *)result__YZ5G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YZ5G)->map_size_and_id__YSB &  4294967292LU) < new_size__VT0G))) {
-      result__YZ5G=((__MEMORY *)result__YZ5G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__YZ5G == (void *)NULL)) {
-      result__YZ5G=new_page__454();
+    if (((void *)result__H4BH == (void *)NULL)) {
+      result__H4BH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__YZ5G,new_size__VT0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YZ5G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__TT0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YZ5G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__2NTB=((void **)result__TT0G);
-  Self__K1MC=(__INTEGER)(nb_elements__ZSQB -  1);
-  while ((Self__K1MC >=  0)) {
-    Result__2NTB[Self__K1MC]=NULL;
-    Self__K1MC=(__INTEGER)(Self__K1MC -  1);
+  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);
   };
-  return(Result__2NTB);
+  return(Result__AOTB);
 }
 
-static void* read_send_msg__23N(__PARSER *Self__33N,void *first_arg__43N)
+static void* read_send_msg__A4N(__PARSER *Self__B4N,void *first_arg__C4N)
 // ({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__A4N,*arg__E4N,*tmp__1NRB;
-  void *n__C4N,*result__IR2G;
-  __INTEGER p1__F4N,p2__G4N,old_derive__H4N,sav_derive__I4N;
-  __INTEGER typ_id__Q13G,typ_id__Z13G,typ_id__C23G,Self__D0YC;
-  __INTEGER typ_id__ACR;
-  __POSITION pos__QHRG,p__W13G,p__513G,p__I23G,p__N4Q;
-  __ITM_READ *result__O13G;
-  __POINTER ptr__P13G,ptr_table__2Z5G,next__1Z5G,result__3Z5G;
-  __POINTER ptr_table__B05G,next__A05G,result__C05G,ptr__Y13G;
-  __POINTER ptr_table__G05G,next__F05G,result__H05G,ptr_table__L05G;
-  __POINTER next__K05G,result__M05G,ptr__B23G,ptr_table__Q05G;
-  __POINTER next__P05G,result__R05G,ptr_table__V05G,next__U05G;
-  __POINTER result__W05G,ptr__1BR,ptr_table__005G,next__Z05G;
-  __POINTER result__105G,ptr_table__505G,next__405G,result__A15G;
-  __UINTEGER_32 sz__R13G,a__S13G,new_size__T13G,t__U13G,a__V13G;
-  __UINTEGER_32 new_size__E05G,lab_type__D05G,sz__013G,a__113G;
-  __UINTEGER_32 new_size__213G,t__313G,a__413G,new_size__O05G;
-  __UINTEGER_32 lab_type__N05G,sz__D23G,a__E23G,new_size__F23G,t__G23G;
-  __UINTEGER_32 a__H23G,new_size__Y05G,lab_type__X05G,sz__3BR,a__JS2G;
-  __UINTEGER_32 new_size__KS2G,t__OS2G,a__NS2G,new_size__C15G;
-  __UINTEGER_32 lab_type__B15G;
-  __ITM_READ_ARG1 *result__X13G;
-  __ITM_READ_ARG2 *result__A23G;
-  __ITM_READ_ARGS *result__0BR;
-  void *l_arg__D4N,*result__2J3G;
-  __FAST_ARRAYoSTRINGo *Self__JR2G,*Self__LR2G;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__3J3G,*Self__4J3G;
-  __BOOLEAN __tmp__CCO;
-  __FAST_ARRAYoITM_CODEo *Self__NCW;
-  result__A4N=NULL;
-  n__C4N=NULL;
-  l_arg__D4N=NULL;
-  arg__E4N=NULL;
-  p1__F4N= 0;
-  p2__G4N= 0;
-  old_derive__H4N= 0;
-  sav_derive__I4N= 0;
-  if (read_identifier__15K()) {
-    p1__F4N=(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD);
-    p2__G4N=position__CBC;
-    old_derive__H4N=short_derive__RBC;
-    result__IR2G=NULL;
-    if ((((__FAST_ARRAYoSTRINGo *)free__RNP)->parent_arrayed_collection__TJC.upper__WJC <  0)) {
-      result__IR2G=create__BBB( 128);
-    } else {
-      Self__JR2G=((__FAST_ARRAYoSTRINGo *)free__RNP);
-      result__IR2G=((void **)Self__JR2G->parent_arrayed_collection__TJC.storage__HGT)[Self__JR2G->parent_arrayed_collection__TJC.upper__WJC];
-      Self__LR2G=((__FAST_ARRAYoSTRINGo *)free__RNP);
-      Self__LR2G->parent_arrayed_collection__TJC.upper__WJC=(__INTEGER)(Self__LR2G->parent_arrayed_collection__TJC.upper__WJC -  1);
-    };
-    n__C4N=result__IR2G;
-    copy__JCS(result__IR2G,last_string__YZC);
-    result__2J3G=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H)->parent_arrayed_collection__Q3H.upper__YVT <  0)) {
-      result__2J3G=create_with_capacity__CVI( 16);
-    } else {
-      Self__3J3G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-      result__2J3G=((void **)Self__3J3G->parent_arrayed_collection__Q3H.storage__GAU)[Self__3J3G->parent_arrayed_collection__Q3H.upper__YVT];
-      Self__4J3G=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__R3H);
-      Self__4J3G->parent_arrayed_collection__Q3H.upper__YVT=(__INTEGER)(Self__4J3G->parent_arrayed_collection__Q3H.upper__YVT -  1);
-    };
-    l_arg__D4N=result__2J3G;
-    arg__E4N=read_argument__DOP(Self__33N);
-    if (((void *)arg__E4N != (void *)NULL)) {
-      add_last__E5U(result__2J3G,arg__E4N);
-      while (read_identifier__15K()) {
-        short__token__to__1AD((&__string_131),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-        append__RNS(n__C4N,(&__string_112));
-        append__RNS(n__C4N,last_string__YZC);
-        arg__E4N=read_argument__DOP(Self__33N);
-        if (((void *)arg__E4N == (void *)NULL)) {
-          pos__QHRG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_313));
-          put_position__EOG(pos__QHRG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+  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)) {
             exit(( 1));
           };
         };
-        add_last__E5U(l_arg__D4N,arg__E4N);
-      };
-    };
-    get__YVB(result__IR2G);
-    add_last__QRV(free__RNP,result__IR2G);
-    ((__STRING *)result__IR2G)->count__GFC= 0;
-    if (is_shorter__TY) {
-      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__2J3G)->parent_arrayed_collection__BTF.upper__MHL <  0)) || ((void *)first_arg__43N != (void *)NULL)) || (! fast_has__NDV(short_local__ZBC,last_string__YZC)))) {
-        sav_derive__I4N=short_derive__RBC;
-        short_derive__RBC=old_derive__H4N;
-        short__token__to__1AD((&__string_131),p1__F4N,p2__G4N);
-        short_derive__RBC=(__INTEGER)(sav_derive__I4N + (__INTEGER)(short_derive__RBC - old_derive__H4N));
-      };
-    };
-    if ((((__FAST_ARRAYoITM_CODEo *)result__2J3G)->parent_arrayed_collection__BTF.upper__MHL <  0)) {
-      if (((void *)first_arg__43N == (void *)NULL)) {
-        p__W13G=current_position__ZWF();
-        result__O13G=NULL;
-        ptr__P13G=((__POINTER )(NULL));
-        typ_id__Q13G= 0;
-        sz__R13G=((__UINTEGER_32 )sizeof(__ITM_READ));
-        if ((sz__R13G ==  0)) {
-          result__O13G=ITM_READ__;
-        } else {
-          typ_id__Q13G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__R13G);
-          if ((typ_id__Q13G == (__INTEGER)(-  1))) {
-            a__S13G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__T13G=(__UINTEGER_32)((__UINTEGER_32)(sz__R13G + a__S13G) & (__UINTEGER_32)(~ a__S13G));
-            ptr_table__2Z5G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T13G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__1Z5G=((__POINTER )(NULL));
-            result__3Z5G=((__POINTER *)ptr_table__2Z5G)[ 0];
-            if ((result__3Z5G == (void *)NULL)) {
-              result__3Z5G=new_lab__2QJ(new_size__T13G);
-              next__1Z5G=(void *)((unsigned long)result__3Z5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T13G)));
-              ((__POINTER *)next__1Z5G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2Z5G)[ 0]=next__1Z5G;
+        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;
             } else {
-              next__1Z5G=((__POINTER *)result__3Z5G)[ 0];
-              if ((next__1Z5G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3Z5G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__T13G <<  1)) <=  4096)) {
-                  next__1Z5G=(void *)((unsigned long)result__3Z5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T13G)));
+              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)));
                 } else {
-                  next__1Z5G=new_lab__2QJ(new_size__T13G);
+                  next__K4BH=new_lab__ARJ(new_size__145G);
                 };
-                ((__POINTER *)next__1Z5G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__2Z5G)[ 0]=next__1Z5G;
+                ((__POINTER *)next__K4BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__L4BH)[ 0]=next__K4BH;
               } else {
-                ((__POINTER *)result__3Z5G)[ 0]=(void *)((unsigned long)((__POINTER *)next__1Z5G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__3Z5G=next__1Z5G;
+                ((__POINTER *)result__M4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__M4BH=next__K4BH;
               };
             };
-            ptr__P13G=result__3Z5G;
-          } else {
-            t__U13G=((__UINTEGER_32 )typ_id__Q13G);
-            a__V13G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__E05G=(__UINTEGER_32)((__UINTEGER_32)(sz__R13G + a__V13G) & (__UINTEGER_32)(~ a__V13G));
-            ptr_table__B05G=((__POINTER )(&(table_type[(t__U13G)])));
-            lab_type__D05G=(__UINTEGER_32)(t__U13G |  1);
-            next__A05G=((__POINTER )(NULL));
-            result__C05G=((__POINTER *)ptr_table__B05G)[ 0];
-            if ((result__C05G == (void *)NULL)) {
-              result__C05G=new_lab__2QJ(lab_type__D05G);
-              next__A05G=(void *)((unsigned long)result__C05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E05G)));
-              ((__POINTER *)next__A05G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__B05G)[ 0]=next__A05G;
+            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;
             } else {
-              next__A05G=((__POINTER *)result__C05G)[ 0];
-              if ((next__A05G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C05G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__E05G <<  1)) <=  4096)) {
-                  next__A05G=(void *)((unsigned long)result__C05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E05G)));
+              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)));
                 } else {
-                  next__A05G=new_lab__2QJ(lab_type__D05G);
+                  next__P4BH=new_lab__ARJ(lab_type__S4BH);
                 };
-                ((__POINTER *)next__A05G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__B05G)[ 0]=next__A05G;
+                ((__POINTER *)next__P4BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__Q4BH)[ 0]=next__P4BH;
               } else {
-                ((__POINTER *)result__C05G)[ 0]=(void *)((unsigned long)((__POINTER *)next__A05G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__C05G=next__A05G;
+                ((__POINTER *)result__R4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__R4BH=next__P4BH;
               };
             };
-            ptr__P13G=result__C05G;
-          };
-          result__O13G=((__ITM_READ *)ptr__P13G);
-          *(result__O13G) = *(ITM_READ__);
-        };
-        ((__ITM_READ *)result__O13G)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__W13G;
-        result__A4N=result__O13G;
-      } else {
-        p__513G=current_position__ZWF();
-        result__X13G=NULL;
-        ptr__Y13G=((__POINTER )(NULL));
-        typ_id__Z13G= 0;
-        sz__013G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-        if ((sz__013G ==  0)) {
-          result__X13G=ITM_READ_ARG1__;
-        } else {
-          typ_id__Z13G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__013G);
-          if ((typ_id__Z13G == (__INTEGER)(-  1))) {
-            a__113G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__213G=(__UINTEGER_32)((__UINTEGER_32)(sz__013G + a__113G) & (__UINTEGER_32)(~ a__113G));
-            ptr_table__G05G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__213G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__F05G=((__POINTER )(NULL));
-            result__H05G=((__POINTER *)ptr_table__G05G)[ 0];
-            if ((result__H05G == (void *)NULL)) {
-              result__H05G=new_lab__2QJ(new_size__213G);
-              next__F05G=(void *)((unsigned long)result__H05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__213G)));
-              ((__POINTER *)next__F05G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__G05G)[ 0]=next__F05G;
+            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;
             } else {
-              next__F05G=((__POINTER *)result__H05G)[ 0];
-              if ((next__F05G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H05G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__213G <<  1)) <=  4096)) {
-                  next__F05G=(void *)((unsigned long)result__H05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__213G)));
+              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)));
                 } else {
-                  next__F05G=new_lab__2QJ(new_size__213G);
+                  next__U4BH=new_lab__ARJ(new_size__E55G);
                 };
-                ((__POINTER *)next__F05G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__G05G)[ 0]=next__F05G;
+                ((__POINTER *)next__U4BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__V4BH)[ 0]=next__U4BH;
               } else {
-                ((__POINTER *)result__H05G)[ 0]=(void *)((unsigned long)((__POINTER *)next__F05G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__H05G=next__F05G;
+                ((__POINTER *)result__W4BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__W4BH=next__U4BH;
               };
             };
-            ptr__Y13G=result__H05G;
-          } else {
-            t__313G=((__UINTEGER_32 )typ_id__Z13G);
-            a__413G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__O05G=(__UINTEGER_32)((__UINTEGER_32)(sz__013G + a__413G) & (__UINTEGER_32)(~ a__413G));
-            ptr_table__L05G=((__POINTER )(&(table_type[(t__313G)])));
-            lab_type__N05G=(__UINTEGER_32)(t__313G |  1);
-            next__K05G=((__POINTER )(NULL));
-            result__M05G=((__POINTER *)ptr_table__L05G)[ 0];
-            if ((result__M05G == (void *)NULL)) {
-              result__M05G=new_lab__2QJ(lab_type__N05G);
-              next__K05G=(void *)((unsigned long)result__M05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O05G)));
-              ((__POINTER *)next__K05G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__L05G)[ 0]=next__K05G;
+            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;
             } else {
-              next__K05G=((__POINTER *)result__M05G)[ 0];
-              if ((next__K05G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M05G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O05G <<  1)) <=  4096)) {
-                  next__K05G=(void *)((unsigned long)result__M05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O05G)));
+              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)));
                 } else {
-                  next__K05G=new_lab__2QJ(lab_type__N05G);
+                  next__Z4BH=new_lab__ARJ(lab_type__24BH);
                 };
-                ((__POINTER *)next__K05G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__L05G)[ 0]=next__K05G;
+                ((__POINTER *)next__Z4BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__04BH)[ 0]=next__Z4BH;
               } else {
-                ((__POINTER *)result__M05G)[ 0]=(void *)((unsigned long)((__POINTER *)next__K05G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__M05G=next__K05G;
+                ((__POINTER *)result__14BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z4BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__14BH=next__Z4BH;
               };
             };
-            ptr__Y13G=result__M05G;
-          };
-          result__X13G=((__ITM_READ_ARG1 *)ptr__Y13G);
-          *(result__X13G) = *(ITM_READ_ARG1__);
-        };
-        ((__ITM_READ_ARG1 *)result__X13G)->parent_itm_read__0HL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__513G;
-        result__A4N=result__X13G;
-      };
-      free__IVI(result__2J3G);
-      __tmp__CCO=TRUE__;
-    } else {
-      __tmp__CCO=FALSE__;
-    };
-    if ((! __tmp__CCO)) {
-      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__2J3G)->parent_arrayed_collection__BTF.upper__MHL +  1) ==  1)) {
-        p__I23G=current_position__ZWF();
-        result__A23G=NULL;
-        ptr__B23G=((__POINTER )(NULL));
-        typ_id__C23G= 0;
-        sz__D23G=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
-        if ((sz__D23G ==  0)) {
-          result__A23G=ITM_READ_ARG2__;
-        } else {
-          typ_id__C23G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__D23G);
-          if ((typ_id__C23G == (__INTEGER)(-  1))) {
-            a__E23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__F23G=(__UINTEGER_32)((__UINTEGER_32)(sz__D23G + a__E23G) & (__UINTEGER_32)(~ a__E23G));
-            ptr_table__Q05G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__F23G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__P05G=((__POINTER )(NULL));
-            result__R05G=((__POINTER *)ptr_table__Q05G)[ 0];
-            if ((result__R05G == (void *)NULL)) {
-              result__R05G=new_lab__2QJ(new_size__F23G);
-              next__P05G=(void *)((unsigned long)result__R05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F23G)));
-              ((__POINTER *)next__P05G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Q05G)[ 0]=next__P05G;
+            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;
             } else {
-              next__P05G=((__POINTER *)result__R05G)[ 0];
-              if ((next__P05G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R05G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__F23G <<  1)) <=  4096)) {
-                  next__P05G=(void *)((unsigned long)result__R05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F23G)));
+              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)));
                 } else {
-                  next__P05G=new_lab__2QJ(new_size__F23G);
+                  next__44BH=new_lab__ARJ(new_size__N55G);
                 };
-                ((__POINTER *)next__P05G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__Q05G)[ 0]=next__P05G;
+                ((__POINTER *)next__44BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__54BH)[ 0]=next__44BH;
               } else {
-                ((__POINTER *)result__R05G)[ 0]=(void *)((unsigned long)((__POINTER *)next__P05G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__R05G=next__P05G;
+                ((__POINTER *)result__A5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__A5BH=next__44BH;
               };
             };
-            ptr__B23G=result__R05G;
-          } else {
-            t__G23G=((__UINTEGER_32 )typ_id__C23G);
-            a__H23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__Y05G=(__UINTEGER_32)((__UINTEGER_32)(sz__D23G + a__H23G) & (__UINTEGER_32)(~ a__H23G));
-            ptr_table__V05G=((__POINTER )(&(table_type[(t__G23G)])));
-            lab_type__X05G=(__UINTEGER_32)(t__G23G |  1);
-            next__U05G=((__POINTER )(NULL));
-            result__W05G=((__POINTER *)ptr_table__V05G)[ 0];
-            if ((result__W05G == (void *)NULL)) {
-              result__W05G=new_lab__2QJ(lab_type__X05G);
-              next__U05G=(void *)((unsigned long)result__W05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y05G)));
-              ((__POINTER *)next__U05G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__V05G)[ 0]=next__U05G;
+            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;
             } else {
-              next__U05G=((__POINTER *)result__W05G)[ 0];
-              if ((next__U05G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W05G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Y05G <<  1)) <=  4096)) {
-                  next__U05G=(void *)((unsigned long)result__W05G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y05G)));
+              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)));
                 } else {
-                  next__U05G=new_lab__2QJ(lab_type__X05G);
+                  next__D5BH=new_lab__ARJ(lab_type__G5BH);
                 };
-                ((__POINTER *)next__U05G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__V05G)[ 0]=next__U05G;
+                ((__POINTER *)next__D5BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__E5BH)[ 0]=next__D5BH;
               } else {
-                ((__POINTER *)result__W05G)[ 0]=(void *)((unsigned long)((__POINTER *)next__U05G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__W05G=next__U05G;
+                ((__POINTER *)result__F5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__F5BH=next__D5BH;
               };
             };
-            ptr__B23G=result__W05G;
-          };
-          result__A23G=((__ITM_READ_ARG2 *)ptr__B23G);
-          *(result__A23G) = *(ITM_READ_ARG2__);
-        };
-        ((__ITM_READ_ARG2 *)result__A23G)->parent_itm_read__HKL.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__I23G;
-        result__A4N=result__A23G;
-        free__IVI(result__2J3G);
-      } else {
-        Self__NCW=((__FAST_ARRAYoITM_CODEo *)result__2J3G);
-        add_last__E5U(Self__NCW,first_arg__43N);
-        if ((Self__NCW->parent_arrayed_collection__BTF.upper__MHL !=  0)) {
-          if ((Self__NCW->parent_arrayed_collection__BTF.upper__MHL ==  1)) {
-            tmp__1NRB=((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[ 0];
-            ((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[ 0]=((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[ 1];
-            ((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[ 1]=tmp__1NRB;
-          } else {
-            Self__D0YC=(__INTEGER)(Self__NCW->parent_arrayed_collection__BTF.upper__MHL -  1);
-            while ((Self__D0YC >=  0)) {
-              ((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[(__INTEGER)(Self__D0YC +  1)]=((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[Self__D0YC];
-              ((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[Self__D0YC]=NULL;
-              Self__D0YC=(__INTEGER)(Self__D0YC -  1);
-            };
-            ((void **)Self__NCW->parent_arrayed_collection__BTF.storage__VXT)[ 0]=first_arg__43N;
-          };
-        };
-        l_arg__D4N=copy__A5H(result__2J3G);
-        p__N4Q=current_position__ZWF();
-        result__0BR=NULL;
-        ptr__1BR=((__POINTER )(NULL));
-        typ_id__ACR= 0;
-        sz__3BR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
-        if ((sz__3BR ==  0)) {
-          result__0BR=ITM_READ_ARGS__;
-        } else {
-          typ_id__ACR=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__3BR);
-          if ((typ_id__ACR == (__INTEGER)(-  1))) {
-            a__JS2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__KS2G=(__UINTEGER_32)((__UINTEGER_32)(sz__3BR + a__JS2G) & (__UINTEGER_32)(~ a__JS2G));
-            ptr_table__005G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KS2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__Z05G=((__POINTER )(NULL));
-            result__105G=((__POINTER *)ptr_table__005G)[ 0];
-            if ((result__105G == (void *)NULL)) {
-              result__105G=new_lab__2QJ(new_size__KS2G);
-              next__Z05G=(void *)((unsigned long)result__105G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KS2G)));
-              ((__POINTER *)next__Z05G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__005G)[ 0]=next__Z05G;
+            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;
             } else {
-              next__Z05G=((__POINTER *)result__105G)[ 0];
-              if ((next__Z05G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__105G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KS2G <<  1)) <=  4096)) {
-                  next__Z05G=(void *)((unsigned long)result__105G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KS2G)));
+              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)));
                 } else {
-                  next__Z05G=new_lab__2QJ(new_size__KS2G);
+                  next__I5BH=new_lab__ARJ(new_size__JV4G);
                 };
-                ((__POINTER *)next__Z05G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__005G)[ 0]=next__Z05G;
+                ((__POINTER *)next__I5BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__J5BH)[ 0]=next__I5BH;
               } else {
-                ((__POINTER *)result__105G)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z05G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__105G=next__Z05G;
+                ((__POINTER *)result__K5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__K5BH=next__I5BH;
               };
             };
-            ptr__1BR=result__105G;
-          } else {
-            t__OS2G=((__UINTEGER_32 )typ_id__ACR);
-            a__NS2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__C15G=(__UINTEGER_32)((__UINTEGER_32)(sz__3BR + a__NS2G) & (__UINTEGER_32)(~ a__NS2G));
-            ptr_table__505G=((__POINTER )(&(table_type[(t__OS2G)])));
-            lab_type__B15G=(__UINTEGER_32)(t__OS2G |  1);
-            next__405G=((__POINTER )(NULL));
-            result__A15G=((__POINTER *)ptr_table__505G)[ 0];
-            if ((result__A15G == (void *)NULL)) {
-              result__A15G=new_lab__2QJ(lab_type__B15G);
-              next__405G=(void *)((unsigned long)result__A15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C15G)));
-              ((__POINTER *)next__405G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__505G)[ 0]=next__405G;
+            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;
             } else {
-              next__405G=((__POINTER *)result__A15G)[ 0];
-              if ((next__405G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A15G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__C15G <<  1)) <=  4096)) {
-                  next__405G=(void *)((unsigned long)result__A15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C15G)));
+              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)));
                 } else {
-                  next__405G=new_lab__2QJ(lab_type__B15G);
+                  next__N5BH=new_lab__ARJ(lab_type__Q5BH);
                 };
-                ((__POINTER *)next__405G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__505G)[ 0]=next__405G;
+                ((__POINTER *)next__N5BH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__O5BH)[ 0]=next__N5BH;
               } else {
-                ((__POINTER *)result__A15G)[ 0]=(void *)((unsigned long)((__POINTER *)next__405G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__A15G=next__405G;
+                ((__POINTER *)result__P5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__P5BH=next__N5BH;
               };
             };
-            ptr__1BR=result__A15G;
+            ptr__5BR=result__P5BH;
           };
-          result__0BR=((__ITM_READ_ARGS *)ptr__1BR);
-          *(result__0BR) = *(ITM_READ_ARGS__);
+          result__4BR=((__ITM_READ_ARGS *)ptr__5BR);
+          *(result__4BR) = *(ITM_READ_ARGS__);
         };
-        ((__ITM_READ_ARGS *)result__0BR)->parent_itm_read__0CO.parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__N4Q;
-        result__A4N=result__0BR;
+        ((__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;
       };
     };
   };
-  return(result__A4N);
+  return(result__E4N);
 }
 
-static void* readlip_expr_cmp__Q01B(__PARSER *Self__R01B)
+static void* readlip_expr_cmp__U01B(__PARSER *Self__V01B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *right__U01B,*result__T01B;
-  void *op__V01B;
-  __POSITION pos__JKRG,p__NTBD;
-  __STRING_CONSTANT *Self__3RBD;
-  __LIP_BINARY *result__DHGD,*Self__PWSD;
-  __POINTER ptr__EHGD,ptr_table__E15G,next__D15G,result__F15G;
-  __POINTER ptr_table__J15G,next__I15G,result__K15G;
-  __INTEGER typ_id__JHGD;
-  __UINTEGER_32 sz__GHGD,a__ZS2G,new_size__0S2G,t__4S2G,a__3S2G;
-  __UINTEGER_32 new_size__M15G,lab_type__L15G;
-  __CHARACTER type__W01B;
-  right__U01B=NULL;
-  op__V01B=NULL;
-  type__W01B='\0';
-  result__T01B=readlip_expr_binary__NN3B(Self__R01B);
-  if (((void *)result__T01B != (void *)NULL)) {
-    while ((((((read_symbol__TWJ((&__string_19)) || read_symbol__TWJ((&__string_21))) || read_symbol__TWJ((&__string_17))) || read_symbol__TWJ((&__string_16))) || read_symbol__TWJ((&__string_18))) || read_symbol__TWJ((&__string_20)))) {
-      op__V01B=last_string__YZC;
-      right__U01B=readlip_expr_binary__NN3B(Self__R01B);
-      if (((void *)right__U01B == (void *)NULL)) {
-        pos__JKRG=current_position__ZWF();
-        put_error__text__0MG( 0,(&__string_225));
-        put_position__EOG(pos__JKRG);
-        put_string__E1F(msg_err__5MG);
-        if ((type_error__4MG !=  2)) {
+  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)) {
           exit(( 1));
         };
       };
-      Self__3RBD=((__STRING_CONSTANT *)op__V01B);
-      if (((void *)Self__3RBD == (void *)(&__string_19))) {
-        type__W01B='S';
-      };
-      if (((void *)Self__3RBD == (void *)(&__string_21))) {
-        type__W01B='I';
-      };
-      if (((void *)Self__3RBD == (void *)(&__string_17))) {
-        type__W01B='E';
-      };
-      if (((void *)Self__3RBD == (void *)(&__string_16))) {
-        type__W01B='=';
-      };
-      if (((void *)Self__3RBD == (void *)(&__string_18))) {
-        type__W01B='>';
-      };
-      if (((void *)Self__3RBD == (void *)(&__string_20))) {
-        type__W01B='<';
-      };
-      p__NTBD=current_position__ZWF();
-      result__DHGD=NULL;
-      ptr__EHGD=((__POINTER )(NULL));
-      typ_id__JHGD= 0;
-      sz__GHGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-      if ((sz__GHGD ==  0)) {
-        result__DHGD=LIP_BINARY__;
-      } else {
-        typ_id__JHGD=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__GHGD);
-        if ((typ_id__JHGD == (__INTEGER)(-  1))) {
-          a__ZS2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__0S2G=(__UINTEGER_32)((__UINTEGER_32)(sz__GHGD + a__ZS2G) & (__UINTEGER_32)(~ a__ZS2G));
-          ptr_table__E15G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0S2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__D15G=((__POINTER )(NULL));
-          result__F15G=((__POINTER *)ptr_table__E15G)[ 0];
-          if ((result__F15G == (void *)NULL)) {
-            result__F15G=new_lab__2QJ(new_size__0S2G);
-            next__D15G=(void *)((unsigned long)result__F15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0S2G)));
-            ((__POINTER *)next__D15G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__E15G)[ 0]=next__D15G;
-          } else {
-            next__D15G=((__POINTER *)result__F15G)[ 0];
-            if ((next__D15G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F15G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__0S2G <<  1)) <=  4096)) {
-                next__D15G=(void *)((unsigned long)result__F15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0S2G)));
+      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)));
               } else {
-                next__D15G=new_lab__2QJ(new_size__0S2G);
+                next__S5BH=new_lab__ARJ(new_size__ZV4G);
               };
-              ((__POINTER *)next__D15G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__E15G)[ 0]=next__D15G;
+              ((__POINTER *)next__S5BH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__T5BH)[ 0]=next__S5BH;
             } else {
-              ((__POINTER *)result__F15G)[ 0]=(void *)((unsigned long)((__POINTER *)next__D15G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__F15G=next__D15G;
-            };
-          };
-          ptr__EHGD=result__F15G;
-        } else {
-          t__4S2G=((__UINTEGER_32 )typ_id__JHGD);
-          a__3S2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__M15G=(__UINTEGER_32)((__UINTEGER_32)(sz__GHGD + a__3S2G) & (__UINTEGER_32)(~ a__3S2G));
-          ptr_table__J15G=((__POINTER )(&(table_type[(t__4S2G)])));
-          lab_type__L15G=(__UINTEGER_32)(t__4S2G |  1);
-          next__I15G=((__POINTER )(NULL));
-          result__K15G=((__POINTER *)ptr_table__J15G)[ 0];
-          if ((result__K15G == (void *)NULL)) {
-            result__K15G=new_lab__2QJ(lab_type__L15G);
-            next__I15G=(void *)((unsigned long)result__K15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M15G)));
-            ((__POINTER *)next__I15G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__J15G)[ 0]=next__I15G;
-          } else {
-            next__I15G=((__POINTER *)result__K15G)[ 0];
-            if ((next__I15G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K15G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__M15G <<  1)) <=  4096)) {
-                next__I15G=(void *)((unsigned long)result__K15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M15G)));
+              ((__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)));
               } else {
-                next__I15G=new_lab__2QJ(lab_type__L15G);
+                next__X5BH=new_lab__ARJ(lab_type__05BH);
               };
-              ((__POINTER *)next__I15G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__J15G)[ 0]=next__I15G;
+              ((__POINTER *)next__X5BH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Y5BH)[ 0]=next__X5BH;
             } else {
-              ((__POINTER *)result__K15G)[ 0]=(void *)((unsigned long)((__POINTER *)next__I15G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__K15G=next__I15G;
+              ((__POINTER *)result__Z5BH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X5BH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__Z5BH=next__X5BH;
             };
           };
-          ptr__EHGD=result__K15G;
+          ptr__IHGD=result__Z5BH;
         };
-        result__DHGD=((__LIP_BINARY *)ptr__EHGD);
-        *(result__DHGD) = *(LIP_BINARY__);
+        result__HHGD=((__LIP_BINARY *)ptr__IHGD);
+        *(result__HHGD) = *(LIP_BINARY__);
       };
-      Self__PWSD=((__LIP_BINARY *)result__DHGD);
-      Self__PWSD->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ=p__NTBD;
-      Self__PWSD->left__2YQD=result__T01B;
-      Self__PWSD->right__5YQD=right__U01B;
-      Self__PWSD->operator__CZQD=type__W01B;
-      result__T01B=result__DHGD;
+      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;
     };
   };
-  return(result__T01B);
+  return(result__X01B);
 }
 
-static void** create__1CIE(__INTEGER nb_elements__3CIE)
+static void** create__LFIE(__INTEGER nb_elements__NFIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__TV0G,a__YV0G,new_size__UV0G,new_size2__VV0G,a__JT2G;
-  __UINTEGER_32 new_size__KT2G;
-  __POINTER result__SV0G,ptr_table__O15G,next__N15G,result__P15G;
-  void *result__S15G;
-  __INTEGER Self__LHXE;
-  void **Result__PDNE;
-  sz__TV0G=((__UINTEGER_32 )(__INTEGER)(nb_elements__3CIE * ((__INTEGER )(sizeof(void *)))));
-  result__SV0G=((__POINTER )(NULL));
-  a__YV0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__UV0G=(__UINTEGER_32)((__UINTEGER_32)(sz__TV0G + a__YV0G) & (__UINTEGER_32)(~ a__YV0G));
-  new_size2__VV0G=(__UINTEGER_32)(new_size__UV0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__VV0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JT2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KT2G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VV0G + a__JT2G) & (__UINTEGER_32)(~ a__JT2G));
-    ptr_table__O15G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KT2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__N15G=((__POINTER )(NULL));
-    result__P15G=((__POINTER *)ptr_table__O15G)[ 0];
-    if ((result__P15G == (void *)NULL)) {
-      result__P15G=new_lab__2QJ(new_size__KT2G);
-      next__N15G=(void *)((unsigned long)result__P15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KT2G)));
-      ((__POINTER *)next__N15G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__O15G)[ 0]=next__N15G;
-    } else {
-      next__N15G=((__POINTER *)result__P15G)[ 0];
-      if ((next__N15G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P15G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__KT2G <<  1)) <=  4096)) {
-          next__N15G=(void *)((unsigned long)result__P15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KT2G)));
-        } else {
-          next__N15G=new_lab__2QJ(new_size__KT2G);
-        };
-        ((__POINTER *)next__N15G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__O15G)[ 0]=next__N15G;
-      } else {
-        ((__POINTER *)result__P15G)[ 0]=(void *)((unsigned long)((__POINTER *)next__N15G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__P15G=next__N15G;
-      };
-    };
-    ((__POINTER *)result__P15G)[ 0]=((__POINTER ) 3);
-    result__SV0G=(void *)((unsigned long)result__P15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__S15G=first_free__HDVB;
-    while ((((void *)result__S15G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__S15G)->map_size_and_id__YSB &  4294967292LU) < new_size__UV0G))) {
-      result__S15G=((__MEMORY *)result__S15G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__S15G == (void *)NULL)) {
-      result__S15G=new_page__454();
+    if (((void *)result__BACH == (void *)NULL)) {
+      result__BACH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__S15G,new_size__UV0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__S15G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__SV0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__S15G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__PDNE=((void **)result__SV0G);
-  Self__LHXE=(__INTEGER)(nb_elements__3CIE -  1);
-  while ((Self__LHXE >=  0)) {
-    Result__PDNE[Self__LHXE]=NULL;
-    Self__LHXE=(__INTEGER)(Self__LHXE -  1);
+  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);
   };
-  return(Result__PDNE);
+  return(Result__5FNE);
 }
 
-static void** create__XQQB(__INTEGER nb_elements__ZQQB)
+static void** create__1QQB(__INTEGER nb_elements__3QQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__EW0G,a__JW0G,new_size__FW0G,new_size2__GW0G,a__IU2G;
-  __UINTEGER_32 new_size__JU2G;
-  __POINTER result__DW0G,ptr_table__W15G,next__V15G,result__X15G;
-  void *result__015G;
-  __INTEGER Self__D0MC;
-  void **Result__TKTB;
-  sz__EW0G=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZQQB * ((__INTEGER )(sizeof(void *)))));
-  result__DW0G=((__POINTER )(NULL));
-  a__JW0G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__FW0G=(__UINTEGER_32)((__UINTEGER_32)(sz__EW0G + a__JW0G) & (__UINTEGER_32)(~ a__JW0G));
-  new_size2__GW0G=(__UINTEGER_32)(new_size__FW0G + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__GW0G <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__IU2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__JU2G=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GW0G + a__IU2G) & (__UINTEGER_32)(~ a__IU2G));
-    ptr_table__W15G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JU2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__V15G=((__POINTER )(NULL));
-    result__X15G=((__POINTER *)ptr_table__W15G)[ 0];
-    if ((result__X15G == (void *)NULL)) {
-      result__X15G=new_lab__2QJ(new_size__JU2G);
-      next__V15G=(void *)((unsigned long)result__X15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JU2G)));
-      ((__POINTER *)next__V15G)[ 0]=NULL;
-      ((__POINTER *)ptr_table__W15G)[ 0]=next__V15G;
-    } else {
-      next__V15G=((__POINTER *)result__X15G)[ 0];
-      if ((next__V15G == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X15G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__JU2G <<  1)) <=  4096)) {
-          next__V15G=(void *)((unsigned long)result__X15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JU2G)));
-        } else {
-          next__V15G=new_lab__2QJ(new_size__JU2G);
-        };
-        ((__POINTER *)next__V15G)[ 0]=NULL;
-        ((__POINTER *)ptr_table__W15G)[ 0]=next__V15G;
-      } else {
-        ((__POINTER *)result__X15G)[ 0]=(void *)((unsigned long)((__POINTER *)next__V15G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__X15G=next__V15G;
-      };
-    };
-    ((__POINTER *)result__X15G)[ 0]=((__POINTER ) 3);
-    result__DW0G=(void *)((unsigned long)result__X15G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __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 *))))));
   } else {
-    result__015G=first_free__HDVB;
-    while ((((void *)result__015G != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__015G)->map_size_and_id__YSB &  4294967292LU) < new_size__FW0G))) {
-      result__015G=((__MEMORY *)result__015G)->map_next_free__ZSB;
+    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;
     };
-    if (((void *)result__015G == (void *)NULL)) {
-      result__015G=new_page__454();
+    if (((void *)result__JACH == (void *)NULL)) {
+      result__JACH=new_page__CA5();
     };
-    to_busy__index__DTFC(result__015G,new_size__FW0G,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__015G)) - (unsigned long)begin_memory__5UH)))) >>  26));
-    result__DW0G=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__015G)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    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)));
   };
-  Result__TKTB=((void **)result__DW0G);
-  Self__D0MC=(__INTEGER)(nb_elements__ZQQB -  1);
-  while ((Self__D0MC >=  0)) {
-    Result__TKTB[Self__D0MC]=NULL;
-    Self__D0MC=(__INTEGER)(Self__D0MC -  1);
+  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);
   };
-  return(Result__TKTB);
+  return(Result__XKTB);
 }
 
-static void* read_argument__DOP(__PARSER *Self__EOP)
+static void* read_argument__HOP(__PARSER *Self__IOP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__GOP;
-  __POSITION p__R23G;
-  __ITM_READ *result__J23G;
-  __POINTER ptr__K23G,ptr_table__415G,next__315G,result__515G;
-  __POINTER ptr_table__D25G,next__C25G,result__E25G;
-  __INTEGER typ_id__L23G;
-  __UINTEGER_32 sz__M23G,a__N23G,new_size__O23G,t__P23G,a__Q23G;
-  __UINTEGER_32 new_size__G25G,lab_type__F25G;
-  result__GOP=read_expr_primary__Y3M(Self__EOP);
-  if ((((void *)result__GOP == (void *)NULL) && read_identifier__15K())) {
-    if (is_shorter__TY) {
-      if ((! fast_has__NDV(short_local__ZBC,last_string__YZC))) {
-        short__token__to__1AD((&__string_131),(__INTEGER)(position__CBC - ((__STRING_CONSTANT *)last_string__YZC)->count__DD),position__CBC);
-      };
-    };
-    p__R23G=current_position__ZWF();
-    result__J23G=NULL;
-    ptr__K23G=((__POINTER )(NULL));
-    typ_id__L23G= 0;
-    sz__M23G=((__UINTEGER_32 )sizeof(__ITM_READ));
-    if ((sz__M23G ==  0)) {
-      result__J23G=ITM_READ__;
-    } else {
-      typ_id__L23G=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__M23G);
-      if ((typ_id__L23G == (__INTEGER)(-  1))) {
-        a__N23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__O23G=(__UINTEGER_32)((__UINTEGER_32)(sz__M23G + a__N23G) & (__UINTEGER_32)(~ a__N23G));
-        ptr_table__415G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O23G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__315G=((__POINTER )(NULL));
-        result__515G=((__POINTER *)ptr_table__415G)[ 0];
-        if ((result__515G == (void *)NULL)) {
-          result__515G=new_lab__2QJ(new_size__O23G);
-          next__315G=(void *)((unsigned long)result__515G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O23G)));
-          ((__POINTER *)next__315G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__415G)[ 0]=next__315G;
-        } else {
-          next__315G=((__POINTER *)result__515G)[ 0];
-          if ((next__315G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__515G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__O23G <<  1)) <=  4096)) {
-              next__315G=(void *)((unsigned long)result__515G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O23G)));
+  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)));
             } else {
-              next__315G=new_lab__2QJ(new_size__O23G);
-            };
-            ((__POINTER *)next__315G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__415G)[ 0]=next__315G;
-          } else {
-            ((__POINTER *)result__515G)[ 0]=(void *)((unsigned long)((__POINTER *)next__315G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__515G=next__315G;
-          };
-        };
-        ptr__K23G=result__515G;
-      } else {
-        t__P23G=((__UINTEGER_32 )typ_id__L23G);
-        a__Q23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__G25G=(__UINTEGER_32)((__UINTEGER_32)(sz__M23G + a__Q23G) & (__UINTEGER_32)(~ a__Q23G));
-        ptr_table__D25G=((__POINTER )(&(table_type[(t__P23G)])));
-        lab_type__F25G=(__UINTEGER_32)(t__P23G |  1);
-        next__C25G=((__POINTER )(NULL));
-        result__E25G=((__POINTER *)ptr_table__D25G)[ 0];
-        if ((result__E25G == (void *)NULL)) {
-          result__E25G=new_lab__2QJ(lab_type__F25G);
-          next__C25G=(void *)((unsigned long)result__E25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G25G)));
-          ((__POINTER *)next__C25G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__D25G)[ 0]=next__C25G;
-        } else {
-          next__C25G=((__POINTER *)result__E25G)[ 0];
-          if ((next__C25G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E25G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G25G <<  1)) <=  4096)) {
-              next__C25G=(void *)((unsigned long)result__E25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G25G)));
+              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)));
             } else {
-              next__C25G=new_lab__2QJ(lab_type__F25G);
+              next__RACH=new_lab__ARJ(lab_type__UACH);
             };
-            ((__POINTER *)next__C25G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__D25G)[ 0]=next__C25G;
+            ((__POINTER *)next__RACH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SACH)[ 0]=next__RACH;
           } else {
-            ((__POINTER *)result__E25G)[ 0]=(void *)((unsigned long)((__POINTER *)next__C25G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__E25G=next__C25G;
+            ((__POINTER *)result__TACH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RACH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TACH=next__RACH;
           };
         };
-        ptr__K23G=result__E25G;
+        ptr__S55G=result__TACH;
       };
-      result__J23G=((__ITM_READ *)ptr__K23G);
-      *(result__J23G) = *(ITM_READ__);
+      result__R55G=((__ITM_READ *)ptr__S55G);
+      *(result__R55G) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__J23G)->parent_itm_code__AGJ.parent_itm_object__HDE.position__3CJ=p__R23G;
-    result__GOP=result__J23G;
+    ((__ITM_READ *)result__R55G)->parent_itm_code__EGJ.parent_itm_object__LDE.position__BDJ=p__Z55G;
+    result__KOP=result__R55G;
   };
-  return(result__GOP);
+  return(result__KOP);
 }
 
-static void* readlip_expr_binary__NN3B(__PARSER *Self__ON3B)
+static void* readlip_expr_binary__RN3B(__PARSER *Self__SN3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *right__RN3B,*result__QN3B;
-  __POSITION pos__NQRG,p__123G,p__I33G;
-  __LIP_BINARY *result__S23G,*Self__023G,*result__523G,*Self__H33G;
-  __POINTER ptr__T23G,ptr_table__O25G,next__N25G,result__P25G;
-  __POINTER ptr_table__T25G,next__S25G,result__U25G,ptr__A33G;
-  __POINTER ptr_table__Y25G,next__X25G,result__Z25G,ptr_table__325G;
-  __POINTER next__225G,result__425G;
-  __INTEGER typ_id__U23G,typ_id__B33G;
-  __UINTEGER_32 sz__V23G,a__W23G,new_size__X23G,t__Y23G,a__Z23G;
-  __UINTEGER_32 new_size__W25G,lab_type__V25G,sz__C33G,a__D33G;
-  __UINTEGER_32 new_size__E33G,t__F33G,a__G33G,new_size__A35G;
-  __UINTEGER_32 lab_type__525G;
-  __BOOLEAN result__H25G,__tmp__GO3B,result__K25G;
-  __CHARACTER result__I25G,result__L25G;
-  right__RN3B=NULL;
-  result__QN3B=readlip_expr_unary__OZ4B(Self__ON3B);
-  if (((void *)result__QN3B != (void *)NULL)) {
-    while_do__S35B:
+  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:
     {
-      result__H25G=FALSE__;
-      if ((! read_space__NRD())) {
-        result__H25G=FALSE__;
+      result__WACH=FALSE__;
+      if ((! read_space__RRD())) {
+        result__WACH=FALSE__;
       } else {
-        result__I25G='\0';
-        if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-          result__I25G=((__CHARACTER )(( 0)));
+        result__XACH='\0';
+        if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+          result__XACH=((__CHARACTER )(( 0)));
         } else {
-          result__I25G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+          result__XACH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
         };
-        if ((result__I25G == '-')) {
-          position__CBC=(__INTEGER)(position__CBC +  1);
-          result__H25G=TRUE__;
+        if ((result__XACH == '-')) {
+          position__GBC=(__INTEGER)(position__GBC +  1);
+          result__WACH=TRUE__;
         };
       };
-      if (result__H25G) {
-        __tmp__GO3B=TRUE__;
+      if (result__WACH) {
+        __tmp__KO3B=TRUE__;
       } else {
-        result__K25G=FALSE__;
-        if ((! read_space__NRD())) {
-          result__K25G=FALSE__;
+        result__ZACH=FALSE__;
+        if ((! read_space__RRD())) {
+          result__ZACH=FALSE__;
         } else {
-          result__L25G='\0';
-          if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-            result__L25G=((__CHARACTER )(( 0)));
+          result__0ACH='\0';
+          if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+            result__0ACH=((__CHARACTER )(( 0)));
           } else {
-            result__L25G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+            result__0ACH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
           };
-          if ((result__L25G == '+')) {
-            position__CBC=(__INTEGER)(position__CBC +  1);
-            result__K25G=TRUE__;
+          if ((result__0ACH == '+')) {
+            position__GBC=(__INTEGER)(position__GBC +  1);
+            result__ZACH=TRUE__;
           };
         };
-        __tmp__GO3B=result__K25G;
+        __tmp__KO3B=result__ZACH;
       };
-      if (__tmp__GO3B) {
-        right__RN3B=readlip_expr_unary__OZ4B(Self__ON3B);
-        if (((void *)right__RN3B == (void *)NULL)) {
-          pos__NQRG=current_position__ZWF();
-          put_error__text__0MG( 0,(&__string_225));
-          put_position__EOG(pos__NQRG);
-          put_string__E1F(msg_err__5MG);
-          if ((type_error__4MG !=  2)) {
+      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)) {
             exit(( 1));
           };
         };
-        if (result__H25G) {
-          p__123G=current_position__ZWF();
-          result__S23G=NULL;
-          ptr__T23G=((__POINTER )(NULL));
-          typ_id__U23G= 0;
-          sz__V23G=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__V23G ==  0)) {
-            result__S23G=LIP_BINARY__;
-          } else {
-            typ_id__U23G=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__V23G);
-            if ((typ_id__U23G == (__INTEGER)(-  1))) {
-              a__W23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__X23G=(__UINTEGER_32)((__UINTEGER_32)(sz__V23G + a__W23G) & (__UINTEGER_32)(~ a__W23G));
-              ptr_table__O25G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X23G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__N25G=((__POINTER )(NULL));
-              result__P25G=((__POINTER *)ptr_table__O25G)[ 0];
-              if ((result__P25G == (void *)NULL)) {
-                result__P25G=new_lab__2QJ(new_size__X23G);
-                next__N25G=(void *)((unsigned long)result__P25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X23G)));
-                ((__POINTER *)next__N25G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__O25G)[ 0]=next__N25G;
+        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;
               } else {
-                next__N25G=((__POINTER *)result__P25G)[ 0];
-                if ((next__N25G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P25G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__X23G <<  1)) <=  4096)) {
-                    next__N25G=(void *)((unsigned long)result__P25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X23G)));
+                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)));
                   } else {
-                    next__N25G=new_lab__2QJ(new_size__X23G);
+                    next__2ACH=new_lab__ARJ(new_size__555G);
                   };
-                  ((__POINTER *)next__N25G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__O25G)[ 0]=next__N25G;
+                  ((__POINTER *)next__2ACH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__3ACH)[ 0]=next__2ACH;
                 } else {
-                  ((__POINTER *)result__P25G)[ 0]=(void *)((unsigned long)((__POINTER *)next__N25G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__P25G=next__N25G;
+                  ((__POINTER *)result__4ACH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2ACH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__4ACH=next__2ACH;
                 };
               };
-              ptr__T23G=result__P25G;
+              ptr__155G=result__4ACH;
             } else {
-              t__Y23G=((__UINTEGER_32 )typ_id__U23G);
-              a__Z23G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__W25G=(__UINTEGER_32)((__UINTEGER_32)(sz__V23G + a__Z23G) & (__UINTEGER_32)(~ a__Z23G));
-              ptr_table__T25G=((__POINTER )(&(table_type[(t__Y23G)])));
-              lab_type__V25G=(__UINTEGER_32)(t__Y23G |  1);
-              next__S25G=((__POINTER )(NULL));
-              result__U25G=((__POINTER *)ptr_table__T25G)[ 0];
-              if ((result__U25G == (void *)NULL)) {
-                result__U25G=new_lab__2QJ(lab_type__V25G);
-                next__S25G=(void *)((unsigned long)result__U25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W25G)));
-                ((__POINTER *)next__S25G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__T25G)[ 0]=next__S25G;
+              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;
               } else {
-                next__S25G=((__POINTER *)result__U25G)[ 0];
-                if ((next__S25G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U25G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W25G <<  1)) <=  4096)) {
-                    next__S25G=(void *)((unsigned long)result__U25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W25G)));
+                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)));
                   } else {
-                    next__S25G=new_lab__2QJ(lab_type__V25G);
+                    next__BBCH=new_lab__ARJ(lab_type__EBCH);
                   };
-                  ((__POINTER *)next__S25G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__T25G)[ 0]=next__S25G;
+                  ((__POINTER *)next__BBCH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__CBCH)[ 0]=next__BBCH;
                 } else {
-                  ((__POINTER *)result__U25G)[ 0]=(void *)((unsigned long)((__POINTER *)next__S25G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__U25G=next__S25G;
+                  ((__POINTER *)result__DBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__DBCH=next__BBCH;
                 };
               };
-              ptr__T23G=result__U25G;
-            };
-            result__S23G=((__LIP_BINARY *)ptr__T23G);
-            *(result__S23G) = *(LIP_BINARY__);
-          };
-          Self__023G=((__LIP_BINARY *)result__S23G);
-          Self__023G->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ=p__123G;
-          Self__023G->left__2YQD=result__QN3B;
-          Self__023G->right__5YQD=right__RN3B;
-          Self__023G->operator__CZQD='-';
-          result__QN3B=result__S23G;
-        } else {
-          p__I33G=current_position__ZWF();
-          result__523G=NULL;
-          ptr__A33G=((__POINTER )(NULL));
-          typ_id__B33G= 0;
-          sz__C33G=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__C33G ==  0)) {
-            result__523G=LIP_BINARY__;
-          } else {
-            typ_id__B33G=-1;
-            clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__C33G);
-            if ((typ_id__B33G == (__INTEGER)(-  1))) {
-              a__D33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__E33G=(__UINTEGER_32)((__UINTEGER_32)(sz__C33G + a__D33G) & (__UINTEGER_32)(~ a__D33G));
-              ptr_table__Y25G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E33G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__X25G=((__POINTER )(NULL));
-              result__Z25G=((__POINTER *)ptr_table__Y25G)[ 0];
-              if ((result__Z25G == (void *)NULL)) {
-                result__Z25G=new_lab__2QJ(new_size__E33G);
-                next__X25G=(void *)((unsigned long)result__Z25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E33G)));
-                ((__POINTER *)next__X25G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__Y25G)[ 0]=next__X25G;
+              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;
               } else {
-                next__X25G=((__POINTER *)result__Z25G)[ 0];
-                if ((next__X25G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z25G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__E33G <<  1)) <=  4096)) {
-                    next__X25G=(void *)((unsigned long)result__Z25G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E33G)));
+                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)));
                   } else {
-                    next__X25G=new_lab__2QJ(new_size__E33G);
+                    next__GBCH=new_lab__ARJ(new_size__MAAH);
                   };
-                  ((__POINTER *)next__X25G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__Y25G)[ 0]=next__X25G;
+                  ((__POINTER *)next__GBCH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HBCH)[ 0]=next__GBCH;
                 } else {
-                  ((__POINTER *)result__Z25G)[ 0]=(void *)((unsigned long)((__POINTER *)next__X25G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__Z25G=next__X25G;
+                  ((__POINTER *)result__IBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IBCH=next__GBCH;
                 };
               };
-              ptr__A33G=result__Z25G;
+              ptr__IAAH=result__IBCH;
             } else {
-              t__F33G=((__UINTEGER_32 )typ_id__B33G);
-              a__G33G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__A35G=(__UINTEGER_32)((__UINTEGER_32)(sz__C33G + a__G33G) & (__UINTEGER_32)(~ a__G33G));
-              ptr_table__325G=((__POINTER )(&(table_type[(t__F33G)])));
-              lab_type__525G=(__UINTEGER_32)(t__F33G |  1);
-              next__225G=((__POINTER )(NULL));
-              result__425G=((__POINTER *)ptr_table__325G)[ 0];
-              if ((result__425G == (void *)NULL)) {
-                result__425G=new_lab__2QJ(lab_type__525G);
-                next__225G=(void *)((unsigned long)result__425G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A35G)));
-                ((__POINTER *)next__225G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__325G)[ 0]=next__225G;
+              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;
               } else {
-                next__225G=((__POINTER *)result__425G)[ 0];
-                if ((next__225G == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__425G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__A35G <<  1)) <=  4096)) {
-                    next__225G=(void *)((unsigned long)result__425G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A35G)));
+                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)));
                   } else {
-                    next__225G=new_lab__2QJ(lab_type__525G);
+                    next__LBCH=new_lab__ARJ(lab_type__OBCH);
                   };
-                  ((__POINTER *)next__225G)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__325G)[ 0]=next__225G;
+                  ((__POINTER *)next__LBCH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__MBCH)[ 0]=next__LBCH;
                 } else {
-                  ((__POINTER *)result__425G)[ 0]=(void *)((unsigned long)((__POINTER *)next__225G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__425G=next__225G;
+                  ((__POINTER *)result__NBCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LBCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__NBCH=next__LBCH;
                 };
               };
-              ptr__A33G=result__425G;
+              ptr__IAAH=result__NBCH;
             };
-            result__523G=((__LIP_BINARY *)ptr__A33G);
-            *(result__523G) = *(LIP_BINARY__);
+            result__HAAH=((__LIP_BINARY *)ptr__IAAH);
+            *(result__HAAH) = *(LIP_BINARY__);
           };
-          Self__H33G=((__LIP_BINARY *)result__523G);
-          Self__H33G->parent_lip_code__MPZB.parent_itm_object__PDE.position__3CJ=p__I33G;
-          Self__H33G->left__2YQD=result__QN3B;
-          Self__H33G->right__5YQD=right__RN3B;
-          Self__H33G->operator__CZQD='+';
-          result__QN3B=result__523G;
+          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;
         };
-        goto while_do__S35B;
+        goto while_do__W35B;
       };
     };
   };
-  return(result__QN3B);
+  return(result__UN3B);
 }
 
-static void* readlip_expr_unary__OZ4B(__PARSER *Self__PZ4B)
+static void* readlip_expr_unary__SZ4B(__PARSER *Self__TZ4B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *result__RZ4B,*result__FSEE;
-  void *nam__UZ4B,*n__135G;
-  __POSITION pos__5RRG,p__W4ZC,p__035G,p__YSEE;
-  __LIP_UNARY *result__MNBD,*Self__IHSD;
-  __POINTER ptr__NNBD,ptr_table__I35G,next__H35G,result__J35G;
-  __POINTER ptr_table__N35G,next__M35G,result__O35G,ptr__S35G;
-  __POINTER ptr_table__435G,next__335G,result__535G,ptr_table__D45G;
-  __POINTER next__C45G,result__E45G,ptr__1BLE,ptr_table__I45G;
-  __POINTER next__H45G,result__J45G,ptr_table__N45G,next__M45G;
-  __POINTER result__O45G;
-  __INTEGER typ_id__SNBD,typ_id__T35G,typ_id__ACLE;
-  __UINTEGER_32 sz__PNBD,a__PU2G,new_size__QU2G,t__UU2G,a__TU2G;
-  __UINTEGER_32 new_size__Q35G,lab_type__P35G,sz__U35G,a__V35G;
-  __UINTEGER_32 new_size__W35G,t__X35G,a__Y35G,new_size__G45G;
-  __UINTEGER_32 lab_type__F45G,sz__3BLE,a__XU2G,new_size__YU2G,t__2U2G;
-  __UINTEGER_32 a__1U2G,new_size__Q45G,lab_type__P45G;
-  __LIP_CALL *result__R35G,*Self__Z35G,*result__0BLE,*Self__FJVE;
-  __CHARACTER type__TZ4B,result__C35G,result__F35G;
-  __BOOLEAN result__B35G,__tmp__5Z4B,result__E35G,__tmp__504B;
-  result__RZ4B=NULL;
-  type__TZ4B='\0';
-  nam__UZ4B=NULL;
-  result__B35G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__B35G=FALSE__;
+  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__;
   } else {
-    result__C35G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__C35G=((__CHARACTER )(( 0)));
+    result__RBCH='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__RBCH=((__CHARACTER )(( 0)));
     } else {
-      result__C35G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__RBCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__C35G == '-')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__B35G=TRUE__;
+    if ((result__RBCH == '-')) {
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      result__QBCH=TRUE__;
     };
   };
-  if (result__B35G) {
-    __tmp__5Z4B=TRUE__;
+  if (result__QBCH) {
+    __tmp__D04B=TRUE__;
   } else {
-    result__E35G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__E35G=FALSE__;
+    result__TBCH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__TBCH=FALSE__;
     } else {
-      result__F35G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__F35G=((__CHARACTER )(( 0)));
+      result__UBCH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__UBCH=((__CHARACTER )(( 0)));
       } else {
-        result__F35G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__UBCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__F35G == '!')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__E35G=TRUE__;
+      if ((result__UBCH == '!')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__TBCH=TRUE__;
       };
     };
-    __tmp__5Z4B=result__E35G;
+    __tmp__D04B=result__TBCH;
   };
-  if (__tmp__5Z4B) {
-    result__RZ4B=readlip_expr_unary__OZ4B(Self__PZ4B);
-    if (((void *)result__RZ4B == (void *)NULL)) {
-      pos__5RRG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_225));
-      put_position__EOG(pos__5RRG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
-    if (result__B35G) {
-      type__TZ4B='-';
-    } else {
-      type__TZ4B='!';
-    };
-    p__W4ZC=current_position__ZWF();
-    result__MNBD=NULL;
-    ptr__NNBD=((__POINTER )(NULL));
-    typ_id__SNBD= 0;
-    sz__PNBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
-    if ((sz__PNBD ==  0)) {
-      result__MNBD=LIP_UNARY__;
-    } else {
-      typ_id__SNBD=-1;
-      clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__PNBD);
-      if ((typ_id__SNBD == (__INTEGER)(-  1))) {
-        a__PU2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__QU2G=(__UINTEGER_32)((__UINTEGER_32)(sz__PNBD + a__PU2G) & (__UINTEGER_32)(~ a__PU2G));
-        ptr_table__I35G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QU2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__H35G=((__POINTER )(NULL));
-        result__J35G=((__POINTER *)ptr_table__I35G)[ 0];
-        if ((result__J35G == (void *)NULL)) {
-          result__J35G=new_lab__2QJ(new_size__QU2G);
-          next__H35G=(void *)((unsigned long)result__J35G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QU2G)));
-          ((__POINTER *)next__H35G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__I35G)[ 0]=next__H35G;
-        } else {
-          next__H35G=((__POINTER *)result__J35G)[ 0];
-          if ((next__H35G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J35G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__QU2G <<  1)) <=  4096)) {
-              next__H35G=(void *)((unsigned long)result__J35G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QU2G)));
+    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)));
             } else {
-              next__H35G=new_lab__2QJ(new_size__QU2G);
-            };
-            ((__POINTER *)next__H35G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__I35G)[ 0]=next__H35G;
-          } else {
-            ((__POINTER *)result__J35G)[ 0]=(void *)((unsigned long)((__POINTER *)next__H35G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__J35G=next__H35G;
-          };
-        };
-        ptr__NNBD=result__J35G;
-      } else {
-        t__UU2G=((__UINTEGER_32 )typ_id__SNBD);
-        a__TU2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__Q35G=(__UINTEGER_32)((__UINTEGER_32)(sz__PNBD + a__TU2G) & (__UINTEGER_32)(~ a__TU2G));
-        ptr_table__N35G=((__POINTER )(&(table_type[(t__UU2G)])));
-        lab_type__P35G=(__UINTEGER_32)(t__UU2G |  1);
-        next__M35G=((__POINTER )(NULL));
-        result__O35G=((__POINTER *)ptr_table__N35G)[ 0];
-        if ((result__O35G == (void *)NULL)) {
-          result__O35G=new_lab__2QJ(lab_type__P35G);
-          next__M35G=(void *)((unsigned long)result__O35G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q35G)));
-          ((__POINTER *)next__M35G)[ 0]=NULL;
-          ((__POINTER *)ptr_table__N35G)[ 0]=next__M35G;
-        } else {
-          next__M35G=((__POINTER *)result__O35G)[ 0];
-          if ((next__M35G == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O35G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Q35G <<  1)) <=  4096)) {
-              next__M35G=(void *)((unsigned long)result__O35G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q35G)));
+              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)));
             } else {
-              next__M35G=new_lab__2QJ(lab_type__P35G);
+              next__1BCH=new_lab__ARJ(lab_type__4BCH);
             };
-            ((__POINTER *)next__M35G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__N35G)[ 0]=next__M35G;
+            ((__POINTER *)next__1BCH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2BCH)[ 0]=next__1BCH;
           } else {
-            ((__POINTER *)result__O35G)[ 0]=(void *)((unsigned long)((__POINTER *)next__M35G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__O35G=next__M35G;
+            ((__POINTER *)result__3BCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3BCH=next__1BCH;
           };
         };
-        ptr__NNBD=result__O35G;
+        ptr__RNBD=result__3BCH;
       };
-      result__MNBD=((__LIP_UNARY *)ptr__NNBD);
-      *(result__MNBD) = *(LIP_UNARY__);
+      result__QNBD=((__LIP_UNARY *)ptr__RNBD);
+      *(result__QNBD) = *(LIP_UNARY__);
     };
-    Self__IHSD=((__LIP_UNARY *)result__MNBD);
-    Self__IHSD->parent_lip_code__104B.parent_itm_object__PDE.position__3CJ=p__W4ZC;
-    Self__IHSD->operator__21QD=type__TZ4B;
-    Self__IHSD->value__Z1QD=result__RZ4B;
-    result__RZ4B=result__MNBD;
-    __tmp__504B=TRUE__;
+    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__;
   } else {
-    __tmp__504B=FALSE__;
-  };
-  if ((! __tmp__504B)) {
-    if (read_identifier__15K()) {
-      nam__UZ4B=last_string__YZC;
-      result__FSEE=NULL;
-      if (read_identifier__15K()) {
-        p__035G=current_position__ZWF();
-        n__135G=last_string__YZC;
-        result__R35G=NULL;
-        ptr__S35G=((__POINTER )(NULL));
-        typ_id__T35G= 0;
-        sz__U35G=((__UINTEGER_32 )sizeof(__LIP_CALL));
-        if ((sz__U35G ==  0)) {
-          result__R35G=LIP_CALL__;
-        } else {
-          typ_id__T35G=-1;
-          clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__U35G);
-          if ((typ_id__T35G == (__INTEGER)(-  1))) {
-            a__V35G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__W35G=(__UINTEGER_32)((__UINTEGER_32)(sz__U35G + a__V35G) & (__UINTEGER_32)(~ a__V35G));
-            ptr_table__435G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W35G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__335G=((__POINTER )(NULL));
-            result__535G=((__POINTER *)ptr_table__435G)[ 0];
-            if ((result__535G == (void *)NULL)) {
-              result__535G=new_lab__2QJ(new_size__W35G);
-              next__335G=(void *)((unsigned long)result__535G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W35G)));
-              ((__POINTER *)next__335G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__435G)[ 0]=next__335G;
+    __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;
             } else {
-              next__335G=((__POINTER *)result__535G)[ 0];
-              if ((next__335G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__535G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__W35G <<  1)) <=  4096)) {
-                  next__335G=(void *)((unsigned long)result__535G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W35G)));
+              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)));
                 } else {
-                  next__335G=new_lab__2QJ(new_size__W35G);
+                  next__MCCH=new_lab__ARJ(new_size__FCCH);
                 };
-                ((__POINTER *)next__335G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__435G)[ 0]=next__335G;
+                ((__POINTER *)next__MCCH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NCCH)[ 0]=next__MCCH;
               } else {
-                ((__POINTER *)result__535G)[ 0]=(void *)((unsigned long)((__POINTER *)next__335G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__535G=next__335G;
+                ((__POINTER *)result__OCCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MCCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__OCCH=next__MCCH;
               };
             };
-            ptr__S35G=result__535G;
-          } else {
-            t__X35G=((__UINTEGER_32 )typ_id__T35G);
-            a__Y35G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__G45G=(__UINTEGER_32)((__UINTEGER_32)(sz__U35G + a__Y35G) & (__UINTEGER_32)(~ a__Y35G));
-            ptr_table__D45G=((__POINTER )(&(table_type[(t__X35G)])));
-            lab_type__F45G=(__UINTEGER_32)(t__X35G |  1);
-            next__C45G=((__POINTER )(NULL));
-            result__E45G=((__POINTER *)ptr_table__D45G)[ 0];
-            if ((result__E45G == (void *)NULL)) {
-              result__E45G=new_lab__2QJ(lab_type__F45G);
-              next__C45G=(void *)((unsigned long)result__E45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G45G)));
-              ((__POINTER *)next__C45G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__D45G)[ 0]=next__C45G;
+            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;
             } else {
-              next__C45G=((__POINTER *)result__E45G)[ 0];
-              if ((next__C45G == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E45G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__G45G <<  1)) <=  4096)) {
-                  next__C45G=(void *)((unsigned long)result__E45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G45G)));
+              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)));
                 } else {
-                  next__C45G=new_lab__2QJ(lab_type__F45G);
+                  next__RCCH=new_lab__ARJ(lab_type__UCCH);
                 };
-                ((__POINTER *)next__C45G)[ 0]=NULL;
-                ((__POINTER *)ptr_table__D45G)[ 0]=next__C45G;
+                ((__POINTER *)next__RCCH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SCCH)[ 0]=next__RCCH;
               } else {
-                ((__POINTER *)result__E45G)[ 0]=(void *)((unsigned long)((__POINTER *)next__C45G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__E45G=next__C45G;
+                ((__POINTER *)result__TCCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RCCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TCCH=next__RCCH;
               };
             };
-            ptr__S35G=result__E45G;
-          };
-          result__R35G=((__LIP_CALL *)ptr__S35G);
-          *(result__R35G) = *(LIP_CALL__);
-        };
-        Self__Z35G=((__LIP_CALL *)result__R35G);
-        Self__Z35G->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ=p__035G;
-        Self__Z35G->name__GLTE=n__135G;
-        Self__Z35G->argument__1KTE=NULL;
-        result__FSEE=result__R35G;
-      } else {
-        result__FSEE=readlip_expr_base__4SEE(Self__PZ4B);
-      };
-      p__YSEE=current_position__ZWF();
-      result__0BLE=NULL;
-      ptr__1BLE=((__POINTER )(NULL));
-      typ_id__ACLE= 0;
-      sz__3BLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
-      if ((sz__3BLE ==  0)) {
-        result__0BLE=LIP_CALL__;
-      } else {
-        typ_id__ACLE=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__3BLE);
-        if ((typ_id__ACLE == (__INTEGER)(-  1))) {
-          a__XU2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__YU2G=(__UINTEGER_32)((__UINTEGER_32)(sz__3BLE + a__XU2G) & (__UINTEGER_32)(~ a__XU2G));
-          ptr_table__I45G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YU2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__H45G=((__POINTER )(NULL));
-          result__J45G=((__POINTER *)ptr_table__I45G)[ 0];
-          if ((result__J45G == (void *)NULL)) {
-            result__J45G=new_lab__2QJ(new_size__YU2G);
-            next__H45G=(void *)((unsigned long)result__J45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YU2G)));
-            ((__POINTER *)next__H45G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__I45G)[ 0]=next__H45G;
-          } else {
-            next__H45G=((__POINTER *)result__J45G)[ 0];
-            if ((next__H45G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J45G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__YU2G <<  1)) <=  4096)) {
-                next__H45G=(void *)((unsigned long)result__J45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YU2G)));
+            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)));
               } else {
-                next__H45G=new_lab__2QJ(new_size__YU2G);
+                next__WCCH=new_lab__ARJ(new_size__XX4G);
               };
-              ((__POINTER *)next__H45G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__I45G)[ 0]=next__H45G;
+              ((__POINTER *)next__WCCH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XCCH)[ 0]=next__WCCH;
             } else {
-              ((__POINTER *)result__J45G)[ 0]=(void *)((unsigned long)((__POINTER *)next__H45G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__J45G=next__H45G;
-            };
-          };
-          ptr__1BLE=result__J45G;
-        } else {
-          t__2U2G=((__UINTEGER_32 )typ_id__ACLE);
-          a__1U2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__Q45G=(__UINTEGER_32)((__UINTEGER_32)(sz__3BLE + a__1U2G) & (__UINTEGER_32)(~ a__1U2G));
-          ptr_table__N45G=((__POINTER )(&(table_type[(t__2U2G)])));
-          lab_type__P45G=(__UINTEGER_32)(t__2U2G |  1);
-          next__M45G=((__POINTER )(NULL));
-          result__O45G=((__POINTER *)ptr_table__N45G)[ 0];
-          if ((result__O45G == (void *)NULL)) {
-            result__O45G=new_lab__2QJ(lab_type__P45G);
-            next__M45G=(void *)((unsigned long)result__O45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q45G)));
-            ((__POINTER *)next__M45G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__N45G)[ 0]=next__M45G;
-          } else {
-            next__M45G=((__POINTER *)result__O45G)[ 0];
-            if ((next__M45G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O45G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__Q45G <<  1)) <=  4096)) {
-                next__M45G=(void *)((unsigned long)result__O45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q45G)));
+              ((__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)));
               } else {
-                next__M45G=new_lab__2QJ(lab_type__P45G);
+                next__1CCH=new_lab__ARJ(lab_type__4CCH);
               };
-              ((__POINTER *)next__M45G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__N45G)[ 0]=next__M45G;
+              ((__POINTER *)next__1CCH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2CCH)[ 0]=next__1CCH;
             } else {
-              ((__POINTER *)result__O45G)[ 0]=(void *)((unsigned long)((__POINTER *)next__M45G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__O45G=next__M45G;
+              ((__POINTER *)result__3CCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1CCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3CCH=next__1CCH;
             };
           };
-          ptr__1BLE=result__O45G;
+          ptr__LELE=result__3CCH;
         };
-        result__0BLE=((__LIP_CALL *)ptr__1BLE);
-        *(result__0BLE) = *(LIP_CALL__);
+        result__KELE=((__LIP_CALL *)ptr__LELE);
+        *(result__KELE) = *(LIP_CALL__);
       };
-      Self__FJVE=((__LIP_CALL *)result__0BLE);
-      Self__FJVE->parent_lip_code__N14B.parent_itm_object__PDE.position__3CJ=p__YSEE;
-      Self__FJVE->name__GLTE=nam__UZ4B;
-      Self__FJVE->argument__1KTE=result__FSEE;
-      result__RZ4B=result__0BLE;
+      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;
     } else {
-      result__RZ4B=readlip_expr_base__4SEE(Self__PZ4B);
+      result__VZ4B=readlip_expr_base__GVEE(Self__TZ4B);
     };
   };
-  return(result__RZ4B);
+  return(result__VZ4B);
 }
 
-static void* readlip_expr_base__4SEE(__PARSER *Self__5SEE)
+static void* readlip_expr_base__GVEE(__PARSER *Self__HVEE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__BTEE;
-  __POSITION pos__PSRG,pos__RSRG,pos__TSRG,p__02QE;
-  void *result__L4OE;
-  __LIP_VALUE *result__1URE,*Self__K3VE;
-  __POINTER ptr__2URE,ptr_table__Y45G,next__X45G,result__Z45G;
-  __POINTER ptr_table__345G,next__245G,result__445G;
-  __INTEGER typ_id__BVRE;
-  __UINTEGER_32 sz__4URE,a__5U2G,new_size__AV2G,t__EV2G,a__DV2G;
-  __UINTEGER_32 new_size__A55G,lab_type__545G;
-  __BOOLEAN result__R45G,result__U45G,__tmp__Y4OE,__tmp__I5OE;
-  __BOOLEAN result__VXPE,__tmp__35OE;
-  __CHARACTER result__S45G,result__V45G;
-  result__BTEE=NULL;
-  result__R45G=FALSE__;
-  if ((! read_space__NRD())) {
-    result__R45G=FALSE__;
+  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__;
   } else {
-    result__S45G='\0';
-    if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-      result__S45G=((__CHARACTER )(( 0)));
+    result__BDCH='\0';
+    if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+      result__BDCH=((__CHARACTER )(( 0)));
     } else {
-      result__S45G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+      result__BDCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
     };
-    if ((result__S45G == '(')) {
-      position__CBC=(__INTEGER)(position__CBC +  1);
-      result__R45G=TRUE__;
+    if ((result__BDCH == '(')) {
+      position__GBC=(__INTEGER)(position__GBC +  1);
+      result__ADCH=TRUE__;
     };
   };
-  if (result__R45G) {
-    result__BTEE=readlip_expr_operator__2NZB(Self__5SEE);
-    if (((void *)result__BTEE == (void *)NULL)) {
-      pos__PSRG=current_position__ZWF();
-      put_error__text__0MG( 0,(&__string_225));
-      put_position__EOG(pos__PSRG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+  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)) {
         exit(( 1));
       };
     };
-    result__U45G=FALSE__;
-    if ((! read_space__NRD())) {
-      result__U45G=FALSE__;
+    result__DDCH=FALSE__;
+    if ((! read_space__RRD())) {
+      result__DDCH=FALSE__;
     } else {
-      result__V45G='\0';
-      if ((position__CBC > ((__STRING *)source__5AC)->count__GFC)) {
-        result__V45G=((__CHARACTER )(( 0)));
+      result__EDCH='\0';
+      if ((position__GBC > ((__STRING *)source__DBC)->count__KFC)) {
+        result__EDCH=((__CHARACTER )(( 0)));
       } else {
-        result__V45G=((__CHARACTER *)((__STRING *)source__5AC)->storage__RBS)[(__INTEGER)(position__CBC -  1)];
+        result__EDCH=((__CHARACTER *)((__STRING *)source__DBC)->storage__VBS)[(__INTEGER)(position__GBC -  1)];
       };
-      if ((result__V45G == ')')) {
-        position__CBC=(__INTEGER)(position__CBC +  1);
-        result__U45G=TRUE__;
+      if ((result__EDCH == ')')) {
+        position__GBC=(__INTEGER)(position__GBC +  1);
+        result__DDCH=TRUE__;
       };
     };
-    if ((! result__U45G)) {
-      pos__RSRG=current_position__ZWF();
-      put_error__text__0MG( 2,(&__string_223));
-      put_position__EOG(pos__RSRG);
-      put_string__E1F(msg_err__5MG);
-      if ((type_error__4MG !=  2)) {
+    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)) {
         exit(( 1));
       };
     };
   } else {
-    result__L4OE=NULL;
-    if (read_integer__Q1P()) {
-      result__L4OE=get__WTRE(LIP_INTEGER__,((__INTEGER )last_integer__JRO));
-      __tmp__Y4OE=TRUE__;
+    result__1APE=NULL;
+    if (read_integer__U1P()) {
+      result__1APE=get__IWRE(LIP_INTEGER__,((__INTEGER )last_integer__NRO));
+      __tmp__IBPE=TRUE__;
     } else {
-      __tmp__Y4OE=FALSE__;
+      __tmp__IBPE=FALSE__;
     };
-    if (__tmp__Y4OE) {
-      __tmp__I5OE=TRUE__;
+    if (__tmp__IBPE) {
+      __tmp__YBPE=TRUE__;
     } else {
-      result__VXPE=read_string__1EQ();
-      if (result__VXPE) {
-        result__L4OE=get__N2DF(LIP_STRING__,last_string__YZC);
+      result__G0PE=read_string__5EQ();
+      if (result__G0PE) {
+        result__1APE=get__3HEF(LIP_STRING__,last_string__2ZC);
       };
-      __tmp__I5OE=result__VXPE;
+      __tmp__YBPE=result__G0PE;
     };
-    if ((! __tmp__I5OE)) {
-      if (read_cap_identifier__CZJ()) {
-        if (((void *)last_string__YZC == (void *)(&__string_42))) {
-          result__L4OE=true__AMJF;
-          __tmp__35OE=TRUE__;
+    if ((! __tmp__YBPE)) {
+      if (read_cap_identifier__GZJ()) {
+        if (((void *)last_string__2ZC == (void *)(&__string_42))) {
+          result__1APE=true__VDKF;
+          __tmp__NCPE=TRUE__;
         } else {
-          __tmp__35OE=FALSE__;
+          __tmp__NCPE=FALSE__;
         };
-        if ((! __tmp__35OE)) {
-          if (((void *)last_string__YZC == (void *)(&__string_43))) {
-            result__L4OE=LIP_BOOLEAN__;
+        if ((! __tmp__NCPE)) {
+          if (((void *)last_string__2ZC == (void *)(&__string_43))) {
+            result__1APE=LIP_BOOLEAN__;
           } else {
-            pos__TSRG=current_position__ZWF();
-            put_error__text__0MG( 0,(&__string_314));
-            put_position__EOG(pos__TSRG);
-            put_string__E1F(msg_err__5MG);
-            if ((type_error__4MG !=  2)) {
+            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)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    if (((void *)result__L4OE != (void *)NULL)) {
-      p__02QE=current_position__ZWF();
-      result__1URE=NULL;
-      ptr__2URE=((__POINTER )(NULL));
-      typ_id__BVRE= 0;
-      sz__4URE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
-      if ((sz__4URE ==  0)) {
-        result__1URE=LIP_VALUE__;
-      } else {
-        typ_id__BVRE=-1;
-        clone_allocation_size__NSB=(__UINTEGER_32)(clone_allocation_size__NSB + sz__4URE);
-        if ((typ_id__BVRE == (__INTEGER)(-  1))) {
-          a__5U2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__AV2G=(__UINTEGER_32)((__UINTEGER_32)(sz__4URE + a__5U2G) & (__UINTEGER_32)(~ a__5U2G));
-          ptr_table__Y45G=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AV2G / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__X45G=((__POINTER )(NULL));
-          result__Z45G=((__POINTER *)ptr_table__Y45G)[ 0];
-          if ((result__Z45G == (void *)NULL)) {
-            result__Z45G=new_lab__2QJ(new_size__AV2G);
-            next__X45G=(void *)((unsigned long)result__Z45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AV2G)));
-            ((__POINTER *)next__X45G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__Y45G)[ 0]=next__X45G;
-          } else {
-            next__X45G=((__POINTER *)result__Z45G)[ 0];
-            if ((next__X45G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z45G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__AV2G <<  1)) <=  4096)) {
-                next__X45G=(void *)((unsigned long)result__Z45G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AV2G)));
+    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)));
               } else {
-                next__X45G=new_lab__2QJ(new_size__AV2G);
+                next__GDCH=new_lab__ARJ(new_size__5X4G);
               };
-              ((__POINTER *)next__X45G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Y45G)[ 0]=next__X45G;
+              ((__POINTER *)next__GDCH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HDCH)[ 0]=next__GDCH;
             } else {
-              ((__POINTER *)result__Z45G)[ 0]=(void *)((unsigned long)((__POINTER *)next__X45G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__Z45G=next__X45G;
-            };
-          };
-          ptr__2URE=result__Z45G;
-        } else {
-          t__EV2G=((__UINTEGER_32 )typ_id__BVRE);
-          a__DV2G=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__A55G=(__UINTEGER_32)((__UINTEGER_32)(sz__4URE + a__DV2G) & (__UINTEGER_32)(~ a__DV2G));
-          ptr_table__345G=((__POINTER )(&(table_type[(t__EV2G)])));
-          lab_type__545G=(__UINTEGER_32)(t__EV2G |  1);
-          next__245G=((__POINTER )(NULL));
-          result__445G=((__POINTER *)ptr_table__345G)[ 0];
-          if ((result__445G == (void *)NULL)) {
-            result__445G=new_lab__2QJ(lab_type__545G);
-            next__245G=(void *)((unsigned long)result__445G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A55G)));
-            ((__POINTER *)next__245G)[ 0]=NULL;
-            ((__POINTER *)ptr_table__345G)[ 0]=next__245G;
-          } else {
-            next__245G=((__POINTER *)result__445G)[ 0];
-            if ((next__245G == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__445G - (unsigned long)begin_memory__5UH)))) &  4095) + (__UINTEGER_32)(new_size__A55G <<  1)) <=  4096)) {
-                next__245G=(void *)((unsigned long)result__445G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A55G)));
+              ((__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)));
               } else {
-                next__245G=new_lab__2QJ(lab_type__545G);
+                next__LDCH=new_lab__ARJ(lab_type__ODCH);
               };
-              ((__POINTER *)next__245G)[ 0]=NULL;
-              ((__POINTER *)ptr_table__345G)[ 0]=next__245G;
+              ((__POINTER *)next__LDCH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MDCH)[ 0]=next__LDCH;
             } else {
-              ((__POINTER *)result__445G)[ 0]=(void *)((unsigned long)((__POINTER *)next__245G)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__445G=next__245G;
+              ((__POINTER *)result__NDCH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LDCH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__NDCH=next__LDCH;
             };
           };
-          ptr__2URE=result__445G;
+          ptr__OXRE=result__NDCH;
         };
-        result__1URE=((__LIP_VALUE *)ptr__2URE);
-        *(result__1URE) = *(LIP_VALUE__);
+        result__NXRE=((__LIP_VALUE *)ptr__OXRE);
+        *(result__NXRE) = *(LIP_VALUE__);
       };
-      Self__K3VE=((__LIP_VALUE *)result__1URE);
-      Self__K3VE->parent_lip_code__JUEE.parent_itm_object__PDE.position__3CJ=p__02QE;
-      Self__K3VE->value__FVTE=result__L4OE;
-      result__BTEE=result__1URE;
+      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;
     };
   };
-  return(result__BTEE);
+  return(result__JVEE);
 }
 
 //==========================//
diff --git a/shorter/javadoc.li b/shorter/javadoc.li
index 1c8739c..8873547 100644
--- a/shorter/javadoc.li
+++ b/shorter/javadoc.li
@@ -15,7 +15,11 @@
   - end :=    
   "\n</body>\n\
   \</html>\n";
-    
+  
+  //
+  // Syntax.
+  //
+  
   - keyword := 
   "<strong><font color=\"#A020F0\">" + token + "</font></strong>";
 
@@ -42,12 +46,16 @@
   "<strong><font color=\"#0000FF\">" + token + "</font></strong>";
   
   - slot_style :=
-  "<br><br><strong><font color=\"#FF0000\">&nbsp &nbsp " + token + "</font></strong>";
+  "<strong><font color=\"#FF0000\">&nbsp &nbsp " + token + " </font></strong>";
+  
+  - local := token;  
+
+  - block := 
+  "<font color=\"#FF0000\">" + token + "</font>";  
   
   //
   // Java doc style.
-  //
- 
+  // 
    
   - title := "<td align=\"right\"><em><b>Lisaac<sup><font size=\"-2\">TM</font></sup>&nbsp;Platform</b></em></td><hr><h2>" + token + "</h2><hr>";
   
@@ -56,14 +64,13 @@
   - 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 := token;
+  - table_slot_comment := "<br>"+ 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>";
-
   
   //
   // Recursive Option.
diff --git a/src/item/itm_arg.li b/src/item/itm_arg.li
index 6e355a3..842ec2c 100644
--- a/src/item/itm_arg.li
+++ b/src/item/itm_arg.li
@@ -108,6 +108,18 @@ Section Public
     buffer.add_last ':';
     type.display buffer;    
   );
+
+  - shorter_in buf:STRING <-
+  (
+    (name = ALIAS_STR.variable_self).if {
+      put name to buf like (ALIAS_STR.short_keyword);
+    } else {
+      put name to buf like (ALIAS_STR.short_local);
+    };
+    buf.add_last ':';
+    type.shorter_in buf;    
+  );
+  
   
   //
   // Comparaison.
diff --git a/src/item/itm_args.li b/src/item/itm_args.li
index f3baf3c..d47d78d 100644
--- a/src/item/itm_args.li
+++ b/src/item/itm_args.li
@@ -120,7 +120,26 @@ Section Public
     type.last.display buffer;    
     buffer.add_last ')';
   );
-
+  
+  - shorter_in buf:STRING <-
+  (
+    buf.add_last '(';
+    (name.lower).to (name.upper - 1) do { j:INTEGER;      
+      (name.item j = ALIAS_STR.variable_self).if {
+        put (name.item j) to buf like (ALIAS_STR.short_keyword);
+      } else {
+        put (name.item j) to buf like (ALIAS_STR.short_local);
+      };
+      buf.add_last ':';
+      type.item j.shorter_in buf;
+      buf.add_last ',';
+    };
+    put (name.last) to buf like (ALIAS_STR.short_local);
+    buf.add_last ':';
+    type.last.shorter_in buf;    
+    buf.add_last ')';
+  );
+  
   //
   // Comparaison.
   //
diff --git a/src/item/itm_argument.li b/src/item/itm_argument.li
index 7b2fd71..1d994ed 100644
--- a/src/item/itm_argument.li
+++ b/src/item/itm_argument.li
@@ -71,6 +71,14 @@ Section Public
   //
   
   - is_equal other:ITM_ARGUMENT <- deferred;
-
+  
+  //
+  // Display.
+  //
+  
+  - shorter_in buf:STRING <-
+  (
+    deferred;
+  );
   
   
diff --git a/src/item/itm_slot.li b/src/item/itm_slot.li
index 21cac35..f334e5e 100644
--- a/src/item/itm_slot.li
+++ b/src/item/itm_slot.li
@@ -284,6 +284,55 @@ Section Public
     buffer.add_last (name.last);
   );
   
+  - shorter_profile_in buf:STRING <-
+  ( 
+    // style.
+    (style = '+').if {
+      put "+" to buf like (ALIAS_STR.short_slot_style);
+    } else {
+      put "-" to buf like (ALIAS_STR.short_slot_style);
+    };    
+    shorter_profile_intern_in buf;
+    // Result.
+    (result_type != ITM_TYPE_SIMPLE.type_void).if {
+      buf.add_last ' ';      
+      buf.add_last ':';      
+      result_type.shorter_in buf;
+    };
+  );
+  
+Section ITM_SLOT
+  
+  - shorter_profile_intern_in buf:STRING <-
+  ( + j,i:INTEGER;
+    // Name + arguments.
+    string_tmp.clear;
+    j := name.lower;
+    argument_list.first.shorter_in buf;
+    buf.add_last '.';
+    i := argument_list.lower+1;    
+    {j < name.upper}.while_do {    
+      ((name.item j = '_') && {name.item (j+1) = '_'}).if {
+        put string_tmp to buf like (ALIAS_STR.short_slot);
+        buf.add_last ' ';
+        argument_list.item i.shorter_in buf;
+        buf.add_last ' ';
+        string_tmp.clear;        
+        j := j + 2;
+        i := i + 1;
+      } else {
+        string_tmp.add_last (name.item j);
+        j := j + 1;
+      };      
+    };
+    string_tmp.add_last (name.last);
+    put string_tmp to buf like (ALIAS_STR.short_slot);
+    (i <= argument_list.upper).if {
+      buf.add_last ' ';
+      argument_list.last.shorter_in buf;
+    };
+  );
+  
 Section Private
   
   - default_value v:ITM_CODE in t:PROTOTYPE :ITM_CODE <-
diff --git a/src/item/itm_slot_operator.li b/src/item/itm_slot_operator.li
index d949fa6..7f91857 100644
--- a/src/item/itm_slot_operator.li
+++ b/src/item/itm_slot_operator.li
@@ -74,7 +74,7 @@ Section Public
   //
   // Display.
   //
-  
+    
   - pretty_name_in buffer:STRING <-
   ( 
     (name.has_prefix (ALIAS_STR.slot_postfix)).if {
@@ -87,3 +87,33 @@ Section Public
     buffer.append pretty_name;
     buffer.add_last '\'';
   );
+  
+Section ITM_SLOT
+  
+  - shorter_profile_intern_in buf:STRING <-
+  ( 
+    (name.has_prefix (ALIAS_STR.slot_postfix)).if {
+      argument_list.first.shorter_in buf;
+      buf.add_last ' ';
+      buf.add_last '\'';
+      put pretty_name to buf like (ALIAS_STR.short_slot);
+      buf.add_last '\'';
+    }.elseif {name.has_prefix (ALIAS_STR.slot_infix)} then {
+      argument_list.first.shorter_in buf;
+      buf.add_last ' ';
+      buf.add_last '\'';
+      put pretty_name to buf like (ALIAS_STR.short_slot);
+      buf.add_last '\'';
+      (priority_and_level != 0).if {
+          
+      };
+      buf.add_last ' ';
+      argument_list.second.shorter_in buf;
+    } 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;
+    };    
+  );
\ No newline at end of file
diff --git a/src/item/itm_type.li b/src/item/itm_type.li
index 865540b..2a5672e 100644
--- a/src/item/itm_type.li
+++ b/src/item/itm_type.li
@@ -43,6 +43,8 @@ Section Public
   
   - append_in buffer:STRING <- deferred;
   
+  - shorter_in buf:STRING <- deferred;
+  
   - to_run_in lst:FAST_ARRAY[TYPE_FULL] for p:PARAMETER_TO_TYPE <-
   (
     deferred;
diff --git a/src/item/itm_type_block.li b/src/item/itm_type_block.li
index 3b16a87..e41b27d 100644
--- a/src/item/itm_type_block.li
+++ b/src/item/itm_type_block.li
@@ -97,12 +97,31 @@ Section Public
       (typ_mul = NULL).if {
 	type_result.append_in buffer;
       } else {
-	typ_mul.display_row buffer;
+	typ_mul.display_raw buffer;
       };
     };
     buffer.add_last '}';
   );
   
+  - shorter_in buf:STRING <-
+  ( + typ_mul:ITM_TYPE_MULTI;
+    put "{" to buf like (ALIAS_STR.short_block);
+    (type_argument != NULL).if {
+      type_argument.shorter_in buf;
+      buf.add_last ';';
+      buf.add_last ' ';
+    };    
+    (type_result != NULL).if {
+      typ_mul ?= type_result;
+      (typ_mul = NULL).if {
+	type_result.shorter_in buf;
+      } else {
+	typ_mul.shorter_raw_in buf;
+      };
+    };
+    put "}" to buf like (ALIAS_STR.short_block);
+  );
+  
   //
   // Cast.
   //
diff --git a/src/item/itm_type_generic.li b/src/item/itm_type_generic.li
index 3a37b53..b1b0d3e 100644
--- a/src/item/itm_type_generic.li
+++ b/src/item/itm_type_generic.li
@@ -118,6 +118,22 @@ Section Public
     buffer.add_last ')';
   );
   
+  - shorter_in buf:STRING <-
+  (
+    (style != NULL).if {
+      put style to buf like (ALIAS_STR.short_keyword);
+      buf.add_last ' ';
+    };
+    put name to buf like (ALIAS_STR.short_prototype);
+    buf.add_last '(';
+    (list_type.lower).to (list_type.upper - 1) do { j:INTEGER;
+      list_type.item j.shorter_in buf;
+      buf.add_last ',';
+    };
+    list_type.last.shorter_in buf;
+    buf.add_last ')';
+  );
+  
   //
   // Cast.
   //
diff --git a/src/item/itm_type_generic_elt.li b/src/item/itm_type_generic_elt.li
index 8585936..75abb10 100644
--- a/src/item/itm_type_generic_elt.li
+++ b/src/item/itm_type_generic_elt.li
@@ -75,6 +75,13 @@ Section Public
     buffer.add_last ']';
   );
   
+  - shorter_in buf:STRING <-
+  (
+    string_tmp.clear;
+    string_tmp.add_last ('A' +# index);    
+    put string_tmp to buf like (ALIAS_STR.short_keyprototype);
+  );    
+  
   - string_tmp:STRING := STRING.create 100;
   
   - to_run:TYPE_FULL <-
diff --git a/src/item/itm_type_multi.li b/src/item/itm_type_multi.li
index d78caa5..ab8d8a2 100644
--- a/src/item/itm_type_multi.li
+++ b/src/item/itm_type_multi.li
@@ -123,11 +123,18 @@ Section Public
   - append_in buffer:STRING <-
   (    
     buffer.add_last '(';
-    display_row buffer;
+    display_raw buffer;
     buffer.add_last ')';
   );
   
-  - display_row buffer:STRING <-
+  - shorter_in buf:STRING <-
+  (
+    buf.add_last '(';
+    shorter_raw_in buf;
+    buf.add_last ')';
+  );
+    
+  - display_raw buffer:STRING <-
   (    
     (list_type.lower).to (list_type.upper - 1) do { j:INTEGER;
       list_type.item j.append_in buffer;
@@ -135,3 +142,12 @@ Section Public
     };
     list_type.last.append_in buffer;
   );
+  
+  - shorter_raw_in buf:STRING <-
+  (    
+    (list_type.lower).to (list_type.upper - 1) do { j:INTEGER;
+      list_type.item j.shorter_in buf;
+      buf.add_last ',';
+    };
+    list_type.last.shorter_in buf;
+  );
diff --git a/src/item/itm_type_simple.li b/src/item/itm_type_simple.li
index b9c82f5..134ee34 100644
--- a/src/item/itm_type_simple.li
+++ b/src/item/itm_type_simple.li
@@ -100,6 +100,19 @@ Section Public
     buffer.append name;
   );
   
+  - shorter_in buf:STRING <-
+  (
+    (style != NULL).if {
+      put style to buf like (ALIAS_STR.short_keyword);
+      buf.add_last ' ';
+    };
+    (Self = type_self).if {
+      put name to buf like (ALIAS_STR.short_keyprototype);
+    } else {
+      put name to buf like (ALIAS_STR.short_prototype);
+    };    
+  );
+  
   //
   // Cast.
   //
diff --git a/src/tools/alias_str.li b/src/tools/alias_str.li
index 2deef03..88a9546 100644
--- a/src/tools/alias_str.li
+++ b/src/tools/alias_str.li
@@ -178,10 +178,16 @@ Section Public
   - path_lisaac      :STRING_CONSTANT := "__PATH_LISAAC_SYSTEM__";
   - short_format     :STRING_CONSTANT := "__SHORT_LISAAC_FORMAT__";
   
+  //
+  // Shorter.
+  //
+  
   - short_type_file   :STRING_CONSTANT := "type_file";
   - short_token       :STRING_CONSTANT := "token";
   - short_begin       :STRING_CONSTANT := "begin";
   - short_end         :STRING_CONSTANT := "end";
+  
+  // Syntax
   - short_keyword     :STRING_CONSTANT := "keyword";
   - short_keyword_section:STRING_CONSTANT := "keyword_section";
   - short_integer     :STRING_CONSTANT := "integer";
@@ -199,6 +205,7 @@ Section Public
   - short_slot_style  :STRING_CONSTANT := "slot_style";
   - short_block       :STRING_CONSTANT := "block";
   - short_external    :STRING_CONSTANT := "external";
+  - short_local       :STRING_CONSTANT := "local";
 
   - short_title       :STRING_CONSTANT := "title";
   - short_table_begin :STRING_CONSTANT := "table_begin";
@@ -471,6 +478,7 @@ Section Public
     list.add short_slot_style;
     list.add short_block;
     list.add short_external;
+    list.add short_local;
     
     list.add short_title;
     list.add short_table_begin;
diff --git a/src/type/prototype.li b/src/type/prototype.li
index e38d337..4ab553d 100644
--- a/src/type/prototype.li
+++ b/src/type/prototype.li
@@ -391,6 +391,10 @@ Section Public
         
     // Detail.
     shorter_detail { sl:ITM_SLOT; 
+      sl.id_section.is_inherit_or_insert
+    } title "Inherit Detail" in buf;    
+    
+    shorter_detail { sl:ITM_SLOT; 
       sl.name.has_prefix "create"
     } title "Constructor Detail" in buf;    
     
@@ -469,6 +473,7 @@ Section PROTOTYPE
         string_tmp2.clear;
         s.pretty_name_in string_tmp2;
         put string_tmp2 to buf like (ALIAS_STR.short_slot_title);
+        s.shorter_profile_in buf;
         string_tmp.clear;
         get_all_comment_slot (s.name) in string_tmp;
         put string_tmp to buf like (ALIAS_STR.short_table_slot_comment);

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list