Merge pull request #428 from AFLplusplus/dev

Dev

23 files changed, 442 insertions, 31280 deletions

diff --git a/src/afl-analyze.c b/src/afl-analyze.c
index f9ba8860..56284f6f 100644
--- a/src/afl-analyze.c
+++ b/src/afl-analyze.c
@@ -1049,6 +1049,9 @@ int main(int argc, char **argv, char **envp) {
   check_environment_vars(envp);
 
   sharedmem_t shm = {0};
+
+  /* initialize cmplog_mode */
+  shm.cmplog_mode = 0;
   trace_bits = afl_shm_init(&shm, map_size, 0);
   atexit(at_exit_handler);
   setup_signal_handlers();
diff --git a/src/afl-common.c b/src/afl-common.c
index 2802cda3..79d419cd 100644
--- a/src/afl-common.c
+++ b/src/afl-common.c
@@ -54,6 +54,7 @@ char *afl_environment_variables[] = {
     "AFL_CMIN_CRASHES_ONLY", "AFL_CODE_END", "AFL_CODE_START",
     "AFL_COMPCOV_BINNAME", "AFL_COMPCOV_LEVEL", "AFL_CUSTOM_MUTATOR_LIBRARY",
     "AFL_CUSTOM_MUTATOR_ONLY", "AFL_CXX", "AFL_DEBUG", "AFL_DEBUG_CHILD_OUTPUT",
+    "AFL_DEBUG_GDB",
     //"AFL_DEFER_FORKSRV", // not implemented anymore, so warn additionally
     "AFL_DISABLE_TRIM", "AFL_DONT_OPTIMIZE", "AFL_DUMB_FORKSRV",
     "AFL_ENTRYPOINT", "AFL_EXIT_WHEN_DONE", "AFL_FAST_CAL", "AFL_FORCE_UI",
diff --git a/src/afl-forkserver.c b/src/afl-forkserver.c
index b2734335..419ce28e 100644
--- a/src/afl-forkserver.c
+++ b/src/afl-forkserver.c
@@ -525,6 +525,10 @@ void afl_fsrv_start(afl_forkserver_t *fsrv, char **argv,
 
     if ((status & FS_OPT_ENABLED) == FS_OPT_ENABLED) {
 
+      // workaround for recent afl++ versions
+      if ((status & FS_OPT_OLD_AFLPP_WORKAROUND) == FS_OPT_OLD_AFLPP_WORKAROUND)
+        status = (status & 0xf0ffffff);
+
       if ((status & FS_OPT_SNAPSHOT) == FS_OPT_SNAPSHOT) {
 
         fsrv->snapshot = 1;
@@ -569,7 +573,7 @@ void afl_fsrv_start(afl_forkserver_t *fsrv, char **argv,
         if (unlikely(tmp_map_size % 8)) {
 
           // should not happen
-          WARNF("Target reported non-aligned map size of %ud", tmp_map_size);
+          WARNF("Target reported non-aligned map size of %u", tmp_map_size);
           tmp_map_size = (((tmp_map_size + 8) >> 3) << 3);
 
         }
@@ -596,9 +600,9 @@ void afl_fsrv_start(afl_forkserver_t *fsrv, char **argv,
 
           // this is not afl-fuzz - we deny and return
           if (fsrv->use_shmem_fuzz)
-            status = (FS_OPT_ENABLED | FS_OPT_AUTODICT | FS_OPT_SHDMEM_FUZZ);
+            status = (FS_OPT_ENABLED | FS_OPT_SHDMEM_FUZZ);
           else
-            status = (FS_OPT_ENABLED | FS_OPT_AUTODICT);
+            status = (FS_OPT_ENABLED);
           if (write(fsrv->fsrv_ctl_fd, &status, 4) != 4) {
 
             FATAL("Writing to forkserver failed.");
@@ -610,7 +614,12 @@ void afl_fsrv_start(afl_forkserver_t *fsrv, char **argv,
         }
 
         if (!be_quiet) { ACTF("Using AUTODICT feature."); }
-        status = (FS_OPT_ENABLED | FS_OPT_AUTODICT);
+
+        if (fsrv->use_shmem_fuzz)
+          status = (FS_OPT_ENABLED | FS_OPT_AUTODICT | FS_OPT_SHDMEM_FUZZ);
+        else
+          status = (FS_OPT_ENABLED | FS_OPT_AUTODICT);
+
         if (write(fsrv->fsrv_ctl_fd, &status, 4) != 4) {
 
           FATAL("Writing to forkserver failed.");
@@ -862,16 +871,21 @@ void afl_fsrv_write_to_testcase(afl_forkserver_t *fsrv, u8 *buf, size_t len) {
     *fsrv->shmem_fuzz_len = len;
     memcpy(fsrv->shmem_fuzz, buf, len);
 #ifdef _DEBUG
-    fprintf(stderr, "FS crc: %08x len: %u\n",
-            hash64(fsrv->shmem_fuzz, *fsrv->shmem_fuzz_len, 0xa5b35705),
-            *fsrv->shmem_fuzz_len);
-    fprintf(stderr, "SHM :");
-    for (int i = 0; i < *fsrv->shmem_fuzz_len; i++)
-      fprintf(stderr, "%02x", fsrv->shmem_fuzz[i]);
-    fprintf(stderr, "\nORIG:");
-    for (int i = 0; i < *fsrv->shmem_fuzz_len; i++)
-      fprintf(stderr, "%02x", buf[i]);
-    fprintf(stderr, "\n");
+    if (getenv("AFL_DEBUG")) {
+
+      fprintf(stderr, "FS crc: %016llx len: %u\n",
+              hash64(fsrv->shmem_fuzz, *fsrv->shmem_fuzz_len, 0xa5b35705),
+              *fsrv->shmem_fuzz_len);
+      fprintf(stderr, "SHM :");
+      for (int i = 0; i < *fsrv->shmem_fuzz_len; i++)
+        fprintf(stderr, "%02x", fsrv->shmem_fuzz[i]);
+      fprintf(stderr, "\nORIG:");
+      for (int i = 0; i < *fsrv->shmem_fuzz_len; i++)
+        fprintf(stderr, "%02x", buf[i]);
+      fprintf(stderr, "\n");
+
+    }
+
 #endif
 
   } else {
diff --git a/src/afl-fuzz-bitmap.c b/src/afl-fuzz-bitmap.c
index f643b5c0..aa8d5a18 100644
--- a/src/afl-fuzz-bitmap.c
+++ b/src/afl-fuzz-bitmap.c
@@ -559,7 +559,7 @@ u8 save_if_interesting(afl_state_t *afl, void *mem, u32 len, u8 fault) {
 
       if (q->exec_cksum == cksum) {
 
-        q->n_fuzz = q->n_fuzz + 1;
+        ++q->n_fuzz;
         break;
 
       }
diff --git a/src/afl-fuzz-init.c b/src/afl-fuzz-init.c
index ee96c73c..a2e849dc 100644
--- a/src/afl-fuzz-init.c
+++ b/src/afl-fuzz-init.c
@@ -2128,14 +2128,17 @@ void check_binary(afl_state_t *afl, u8 *fname) {
 
   /* Check for blatant user errors. */
 
-  if ((!strncmp(afl->fsrv.target_path, "/tmp/", 5) &&
-       !strchr(afl->fsrv.target_path + 5, '/')) ||
-      (!strncmp(afl->fsrv.target_path, "/var/tmp/", 9) &&
-       !strchr(afl->fsrv.target_path + 9, '/'))) {
+  /*  disabled. not a real-worl scenario where this is a problem.
+    if ((!strncmp(afl->fsrv.target_path, "/tmp/", 5) &&
+         !strchr(afl->fsrv.target_path + 5, '/')) ||
+        (!strncmp(afl->fsrv.target_path, "/var/tmp/", 9) &&
+         !strchr(afl->fsrv.target_path + 9, '/'))) {
 
-    FATAL("Please don't keep binaries in /tmp or /var/tmp");
+      FATAL("Please don't keep binaries in /tmp or /var/tmp");
 
-  }
+    }
+
+  */
 
   fd = open(afl->fsrv.target_path, O_RDONLY);
 
diff --git a/src/afl-fuzz-mutators.c b/src/afl-fuzz-mutators.c
index f149bb4c..9fc77ffe 100644
--- a/src/afl-fuzz-mutators.c
+++ b/src/afl-fuzz-mutators.c
@@ -44,7 +44,7 @@ void setup_custom_mutators(afl_state_t *afl) {
       FATAL(
           "MOpt and custom mutator are mutually exclusive. We accept pull "
           "requests that integrates MOpt with the optional mutators "
-          "(custom/radamsa/redqueen/...).");
+          "(custom/redqueen/...).");
 
     u8 *fn_token = (u8 *)strsep((char **)&fn, ";:,");
 
@@ -89,7 +89,7 @@ void setup_custom_mutators(afl_state_t *afl) {
       FATAL(
           "MOpt and Python mutator are mutually exclusive. We accept pull "
           "requests that integrates MOpt with the optional mutators "
-          "(custom/radamsa/redqueen/...).");
+          "(custom/redqueen/...).");
 
     }
 
diff --git a/src/afl-fuzz-one.c b/src/afl-fuzz-one.c
index ae53feb8..9e54815c 100644
--- a/src/afl-fuzz-one.c
+++ b/src/afl-fuzz-one.c
@@ -953,6 +953,8 @@ u8 fuzz_one_original(afl_state_t *afl) {
 
     if (afl->queue_cur->cal_failed < CAL_CHANCES) {
 
+      afl->queue_cur->exec_cksum = 0;
+
       res =
           calibrate_case(afl, afl->queue_cur, in_buf, afl->queue_cycle - 1, 0);
 
@@ -1013,8 +1015,6 @@ u8 fuzz_one_original(afl_state_t *afl) {
 
   if (unlikely(perf_score == 0)) { goto abandon_entry; }
 
-  if (unlikely(afl->use_radamsa > 1)) { goto radamsa_stage; }
-
   if (afl->shm.cmplog_mode && !afl->queue_cur->fully_colorized) {
 
     if (input_to_state_stage(afl, in_buf, out_buf, len,
@@ -2144,6 +2144,7 @@ custom_mutator_stage:
 
       retry_external_pick:
         /* Pick a random other queue entry for passing to external API */
+
         do {
 
           tid = rand_below(afl, afl->queued_paths);
@@ -2168,7 +2169,7 @@ custom_mutator_stage:
         /* Make sure that the target has a reasonable length. */
 
         while (target && (target->len < 2 || target == afl->queue_cur) &&
-               afl->queued_paths > 1) {
+               afl->queued_paths > 3) {
 
           target = target->next;
           ++afl->splicing_with;
@@ -2900,63 +2901,6 @@ retry_splicing:
 #endif                                                     /* !IGNORE_FINDS */
 
   ret_val = 0;
-  goto radamsa_stage;
-
-radamsa_stage:
-
-  if (likely(!afl->use_radamsa || !afl->radamsa_mutate_ptr)) {
-
-    goto abandon_entry;
-
-  }
-
-  afl->stage_name = "radamsa";
-  afl->stage_short = "radamsa";
-  afl->stage_max = (HAVOC_CYCLES * perf_score / afl->havoc_div / 100)
-                   << afl->use_radamsa;
-
-  if (afl->stage_max < HAVOC_MIN) { afl->stage_max = HAVOC_MIN; }
-
-  orig_hit_cnt = afl->queued_paths + afl->unique_crashes;
-
-  /* Read the additional testcase.
-  We'll reuse in_scratch, as it is free at this point.
-  */
-  u8 *save_buf = ck_maybe_grow(BUF_PARAMS(in_scratch), len);
-  memcpy(save_buf, out_buf, len);
-
-  u32 max_len = len + choose_block_len(afl, HAVOC_BLK_XL);
-  u8 *new_buf = ck_maybe_grow(BUF_PARAMS(out_scratch), max_len);
-  u8 *tmp_buf;
-
-  for (afl->stage_cur = 0; afl->stage_cur < afl->stage_max; ++afl->stage_cur) {
-
-    u32 new_len = afl->radamsa_mutate_ptr(save_buf, len, new_buf, max_len,
-                                          get_rand_seed(afl));
-
-    if (new_len) {
-
-      temp_len = new_len;
-      tmp_buf = new_buf;
-
-    } else {
-
-      tmp_buf = save_buf;  // nope but I dont care
-      temp_len = len;
-
-    }
-
-    if (common_fuzz_stuff(afl, tmp_buf, temp_len)) { goto abandon_entry; }
-
-  }
-
-  new_hit_cnt = afl->queued_paths + afl->unique_crashes;
-
-  afl->stage_finds[STAGE_RADAMSA] += new_hit_cnt - orig_hit_cnt;
-  afl->stage_cycles[STAGE_RADAMSA] += afl->stage_max;
-
-  ret_val = 0;
-  goto abandon_entry;
 
 /* we are through with this queue entry - for this iteration */
 abandon_entry:
@@ -3099,6 +3043,8 @@ static u8 mopt_common_fuzzing(afl_state_t *afl, MOpt_globals_t MOpt_globals) {
 
     if (afl->queue_cur->cal_failed < CAL_CHANCES) {
 
+      afl->queue_cur->exec_cksum = 0;
+
       res =
           calibrate_case(afl, afl->queue_cur, in_buf, afl->queue_cycle - 1, 0);
 
diff --git a/src/afl-fuzz-queue.c b/src/afl-fuzz-queue.c
index 39087878..da6b1eee 100644
--- a/src/afl-fuzz-queue.c
+++ b/src/afl-fuzz-queue.c
@@ -312,13 +312,12 @@ void update_bitmap_score(afl_state_t *afl, struct queue_entry *q) {
   u64 fav_factor;
   u64 fuzz_p2;
 
-  if (unlikely(afl->schedule >= FAST))
+  if (unlikely(afl->schedule >= FAST && afl->schedule <= RARE))
     fuzz_p2 = next_pow2(q->n_fuzz);
   else
     fuzz_p2 = q->fuzz_level;
 
-  if (unlikely(afl->schedule == MMOPT || afl->schedule == RARE) ||
-      unlikely(afl->fixed_seed)) {
+  if (unlikely(afl->schedule >= RARE) || unlikely(afl->fixed_seed)) {
 
     fav_factor = q->len << 2;
 
@@ -339,13 +338,12 @@ void update_bitmap_score(afl_state_t *afl, struct queue_entry *q) {
         /* Faster-executing or smaller test cases are favored. */
         u64 top_rated_fav_factor;
         u64 top_rated_fuzz_p2;
-        if (unlikely(afl->schedule >= FAST))
+        if (unlikely(afl->schedule >= FAST && afl->schedule <= RARE))
           top_rated_fuzz_p2 = next_pow2(afl->top_rated[i]->n_fuzz);
         else
           top_rated_fuzz_p2 = afl->top_rated[i]->fuzz_level;
 
-        if (unlikely(afl->schedule == MMOPT || afl->schedule == RARE) ||
-            unlikely(afl->fixed_seed)) {
+        if (unlikely(afl->schedule >= RARE) || unlikely(afl->fixed_seed)) {
 
           top_rated_fav_factor = afl->top_rated[i]->len << 2;
 
@@ -366,8 +364,7 @@ void update_bitmap_score(afl_state_t *afl, struct queue_entry *q) {
 
         }
 
-        if (unlikely(afl->schedule == MMOPT || afl->schedule == RARE) ||
-            unlikely(afl->fixed_seed)) {
+        if (unlikely(afl->schedule >= RARE) || unlikely(afl->fixed_seed)) {
 
           if (fav_factor > afl->top_rated[i]->len << 2) { continue; }
 
@@ -512,8 +509,7 @@ u32 calculate_score(afl_state_t *afl, struct queue_entry *q) {
   // Longer execution time means longer work on the input, the deeper in
   // coverage, the better the fuzzing, right? -mh
 
-  if (afl->schedule != MMOPT && afl->schedule != RARE &&
-      likely(!afl->fixed_seed)) {
+  if (afl->schedule >= RARE && likely(!afl->fixed_seed)) {
 
     if (q->exec_us * 0.1 > avg_exec_us) {
 
@@ -625,6 +621,9 @@ u32 calculate_score(afl_state_t *afl, struct queue_entry *q) {
     case EXPLORE:
       break;
 
+    case SEEK:
+      break;
+
     case EXPLOIT:
       factor = MAX_FACTOR;
       break;
@@ -718,7 +717,7 @@ u32 calculate_score(afl_state_t *afl, struct queue_entry *q) {
 
   }
 
-  if (unlikely(afl->schedule >= FAST)) {
+  if (unlikely(afl->schedule >= FAST && afl->schedule <= RARE)) {
 
     if (factor > MAX_FACTOR) { factor = MAX_FACTOR; }
     perf_score *= factor / POWER_BETA;
diff --git a/src/afl-fuzz-run.c b/src/afl-fuzz-run.c
index a1e8417f..2a1664e2 100644
--- a/src/afl-fuzz-run.c
+++ b/src/afl-fuzz-run.c
@@ -156,16 +156,22 @@ static void write_with_gap(afl_state_t *afl, void *mem, u32 len, u32 skip_at,
     *afl->fsrv.shmem_fuzz_len = len - skip_len;
 
 #ifdef _DEBUG
-    fprintf(stderr, "FS crc: %08x len: %u\n",
-            hash64(fsrv->shmem_fuzz, *fsrv->shmem_fuzz_len, 0xa5b35705),
-            *fsrv->shmem_fuzz_len);
-    fprintf(stderr, "SHM :");
-    for (int i = 0; i < *fsrv->shmem_fuzz_len; i++)
-      fprintf(stderr, "%02x", fsrv->shmem_fuzz[i]);
-    fprintf(stderr, "\nORIG:");
-    for (int i = 0; i < *fsrv->shmem_fuzz_len; i++)
-      fprintf(stderr, "%02x", buf[i]);
-    fprintf(stderr, "\n");
+    if (afl->debug) {
+
+      fprintf(
+          stderr, "FS crc: %16llx len: %u\n",
+          hash64(afl->fsrv.shmem_fuzz, *afl->fsrv.shmem_fuzz_len, 0xa5b35705),
+          *afl->fsrv.shmem_fuzz_len);
+      fprintf(stderr, "SHM :");
+      for (int i = 0; i < *afl->fsrv.shmem_fuzz_len; i++)
+        fprintf(stderr, "%02x", afl->fsrv.shmem_fuzz[i]);
+      fprintf(stderr, "\nORIG:");
+      for (int i = 0; i < *afl->fsrv.shmem_fuzz_len; i++)
+        fprintf(stderr, "%02x", (u8)((u8 *)mem)[i]);
+      fprintf(stderr, "\n");
+
+    }
+
 #endif
 
     return;
@@ -262,6 +268,7 @@ u8 calibrate_case(afl_state_t *afl, struct queue_entry *q, u8 *use_mem,
 
     if (afl->fsrv.support_shmem_fuzz && !afl->fsrv.use_shmem_fuzz) {
 
+      unsetenv(SHM_FUZZ_ENV_VAR);
       afl_shm_deinit(afl->shm_fuzz);
       ck_free(afl->shm_fuzz);
       afl->shm_fuzz = NULL;
@@ -286,12 +293,6 @@ u8 calibrate_case(afl_state_t *afl, struct queue_entry *q, u8 *use_mem,
 
     u64 cksum;
 
-    if (!first_run && !(afl->stage_cur % afl->stats_update_freq)) {
-
-      show_stats(afl);
-
-    }
-
     write_to_testcase(afl, use_mem, q->len);
 
     fault = fuzz_run_target(afl, &afl->fsrv, use_tmout);
@@ -413,7 +414,7 @@ void sync_fuzzers(afl_state_t *afl) {
   DIR *          sd;
   struct dirent *sd_ent;
   u32            sync_cnt = 0, synced = 0, entries = 0;
-  u8             path[PATH_MAX];
+  u8             path[PATH_MAX + 256];
 
   sd = opendir(afl->sync_dir);
   if (!sd) { PFATAL("Unable to open '%s'", afl->sync_dir); }
@@ -427,7 +428,7 @@ void sync_fuzzers(afl_state_t *afl) {
   while ((sd_ent = readdir(sd))) {
 
     u8  qd_synced_path[PATH_MAX], qd_path[PATH_MAX];
-    u32 min_accept = 0, next_min_accept;
+    u32 min_accept = 0, next_min_accept = 0;
 
     s32 id_fd;
 
@@ -466,6 +467,12 @@ void sync_fuzzers(afl_state_t *afl) {
 
     synced++;
 
+    /* document the attempt to sync to this instance */
+
+    sprintf(qd_synced_path, "%s/.synced/%s.last", afl->out_dir, sd_ent->d_name);
+    id_fd = open(qd_synced_path, O_RDWR | O_CREAT | O_TRUNC, 0600);
+    if (id_fd >= 0) close(id_fd);
+
     /* Skip anything that doesn't have a queue/ subdirectory. */
 
     sprintf(qd_path, "%s/%s/queue", afl->sync_dir, sd_ent->d_name);
@@ -490,14 +497,13 @@ void sync_fuzzers(afl_state_t *afl) {
 
     if (id_fd < 0) { PFATAL("Unable to create '%s'", qd_synced_path); }
 
-    if (read(id_fd, &min_accept, sizeof(u32)) > 0) {
+    if (read(id_fd, &min_accept, sizeof(u32)) == sizeof(u32)) {
 
+      next_min_accept = min_accept;
       lseek(id_fd, 0, SEEK_SET);
 
     }
 
-    next_min_accept = min_accept;
-
     /* Show stats */
 
     snprintf(afl->stage_name_buf, STAGE_BUF_SIZE, "sync %u", ++sync_cnt);
@@ -533,7 +539,7 @@ void sync_fuzzers(afl_state_t *afl) {
       s32         fd;
       struct stat st;
 
-      sprintf(path, "%s/%s", qd_path, namelist[o]->d_name);
+      snprintf(path, sizeof(path), "%s/%s", qd_path, namelist[o]->d_name);
       afl->syncing_case = next_min_accept;
       next_min_accept++;
       o--;
diff --git a/src/afl-fuzz-state.c b/src/afl-fuzz-state.c
index 814c2ca2..ece2d170 100644
--- a/src/afl-fuzz-state.c
+++ b/src/afl-fuzz-state.c
@@ -30,9 +30,9 @@ s8  interesting_8[] = {INTERESTING_8};
 s16 interesting_16[] = {INTERESTING_8, INTERESTING_16};
 s32 interesting_32[] = {INTERESTING_8, INTERESTING_16, INTERESTING_32};
 
-char *power_names[POWER_SCHEDULES_NUM] = {
-
-    "explore", "exploit", "fast", "coe", "lin", "quad", "rare", "mmopt"};
+char *power_names[POWER_SCHEDULES_NUM] = {"explore", "exploit", "fast",
+                                          "coe",     "lin",     "quad",
+                                          "rare",    "mmopt",   "seek"};
 
 /* Initialize MOpt "globals" for this afl state */
 
diff --git a/src/afl-fuzz-stats.c b/src/afl-fuzz-stats.c
index 28473c0c..fc93011b 100644
--- a/src/afl-fuzz-stats.c
+++ b/src/afl-fuzz-stats.c
@@ -194,7 +194,8 @@ void maybe_update_plot_file(afl_state_t *afl, double bitmap_cvg, double eps) {
                afl->plot_prev_uc == afl->unique_crashes &&
                afl->plot_prev_uh == afl->unique_hangs &&
                afl->plot_prev_md == afl->max_depth) ||
-      unlikely(!afl->queue_cycle)) {
+      unlikely(!afl->queue_cycle) ||
+      unlikely(get_cur_time() - afl->start_time <= 60)) {
 
     return;
 
@@ -745,15 +746,13 @@ void show_stats(afl_state_t *afl) {
        afl->sync_id ? u_stringify_int(IB(0), afl->queued_imported)
                     : (u8 *)"n/a");
 
-  sprintf(tmp, "%s/%s, %s/%s, %s/%s",
+  sprintf(tmp, "%s/%s, %s/%s",
           u_stringify_int(IB(0), afl->stage_finds[STAGE_HAVOC]),
           u_stringify_int(IB(2), afl->stage_cycles[STAGE_HAVOC]),
           u_stringify_int(IB(3), afl->stage_finds[STAGE_SPLICE]),
-          u_stringify_int(IB(4), afl->stage_cycles[STAGE_SPLICE]),
-          u_stringify_int(IB(5), afl->stage_finds[STAGE_RADAMSA]),
-          u_stringify_int(IB(6), afl->stage_cycles[STAGE_RADAMSA]));
+          u_stringify_int(IB(4), afl->stage_cycles[STAGE_SPLICE]));
 
-  SAYF(bV bSTOP "   havoc/rad : " cRST "%-36s " bSTG bV bSTOP, tmp);
+  SAYF(bV bSTOP "havoc/splice : " cRST "%-36s " bSTG bV bSTOP, tmp);
 
   if (t_bytes) {
 
@@ -834,18 +833,19 @@ void show_stats(afl_state_t *afl) {
 
   }
 
-  if (afl->custom_mutators_count) {
+  // if (afl->custom_mutators_count) {
 
-    sprintf(tmp, "%s/%s",
-            u_stringify_int(IB(0), afl->stage_finds[STAGE_CUSTOM_MUTATOR]),
-            u_stringify_int(IB(1), afl->stage_cycles[STAGE_CUSTOM_MUTATOR]));
-    SAYF(bV bSTOP " custom mut. : " cRST "%-36s " bSTG bV RESET_G1, tmp);
+  //
+  //  sprintf(tmp, "%s/%s",
+  //          u_stringify_int(IB(0), afl->stage_finds[STAGE_CUSTOM_MUTATOR]),
+  //          u_stringify_int(IB(1), afl->stage_cycles[STAGE_CUSTOM_MUTATOR]));
+  //  SAYF(bV bSTOP " custom mut. : " cRST "%-36s " bSTG bV RESET_G1, tmp);
+  //
+  //} else {
 
-  } else {
-
-    SAYF(bV bSTOP "        trim : " cRST "%-36s " bSTG bV RESET_G1, tmp);
+  SAYF(bV bSTOP "        trim : " cRST "%-36s " bSTG bV RESET_G1, tmp);
 
-  }
+  //}
 
   /* Provide some CPU utilization stats. */
 
diff --git a/src/afl-fuzz.c b/src/afl-fuzz.c
index cefcd73f..f25f8bb6 100644
--- a/src/afl-fuzz.c
+++ b/src/afl-fuzz.c
@@ -26,6 +26,13 @@
 #include "afl-fuzz.h"
 #include "cmplog.h"
 #include <limits.h>
+#ifndef USEMMAP
+  #include <sys/mman.h>
+  #include <sys/stat.h>
+  #include <fcntl.h>
+  #include <sys/ipc.h>
+  #include <sys/shm.h>
+#endif
 
 #ifdef PROFILING
 extern u64 time_spent_working;
@@ -34,6 +41,7 @@ extern u64 time_spent_working;
 static void at_exit() {
 
   int   i;
+  char *list[4] = {SHM_ENV_VAR, SHM_FUZZ_ENV_VAR, CMPLOG_SHM_ENV_VAR, NULL};
   char *ptr = getenv("__AFL_TARGET_PID1");
 
   if (ptr && *ptr && (i = atoi(ptr)) > 0) kill(i, SIGKILL);
@@ -42,65 +50,29 @@ static void at_exit() {
 
   if (ptr && *ptr && (i = atoi(ptr)) > 0) kill(i, SIGKILL);
 
-  // anything else? shared memory?
-
-}
-
-static u8 *get_libradamsa_path(u8 *own_loc) {
-
-  u8 *tmp, *cp, *rsl, *own_copy;
+  i = 0;
+  while (list[i] != NULL) {
 
-  tmp = getenv("AFL_PATH");
+    ptr = getenv(list[i]);
 
-  if (tmp) {
-
-    cp = alloc_printf("%s/libradamsa.so", tmp);
-
-    if (access(cp, X_OK)) { FATAL("Unable to find '%s'", cp); }
-
-    return cp;
-
-  }
+    if (ptr && *ptr) {
 
-  own_copy = ck_strdup(own_loc);
-  rsl = strrchr(own_copy, '/');
+#ifdef USEMMAP
 
-  if (rsl) {
+      shm_unlink(ptr);
 
-    *rsl = 0;
-
-    cp = alloc_printf("%s/libradamsa.so", own_copy);
-    ck_free(own_copy);
-
-    if (!access(cp, X_OK)) { return cp; }
-
-  } else {
-
-    ck_free(own_copy);
-
-  }
-
-  if (!access(AFL_PATH "/libradamsa.so", X_OK)) {
+#else
 
-    return ck_strdup(AFL_PATH "/libradamsa.so");
+      shmctl(atoi(ptr), IPC_RMID, NULL);
 
-  }
+#endif
 
-  if (!access(BIN_PATH "/libradamsa.so", X_OK)) {
+    }
 
-    return ck_strdup(BIN_PATH "/libradamsa.so");
+    i++;
 
   }
 
-  SAYF(
-      "\n" cLRD "[-] " cRST
-      "Oops, unable to find the 'libradamsa.so' binary. The binary must be "
-      "built\n"
-      "    separately using 'make radamsa'. If you already have the binary "
-      "installed,\n    you may need to specify AFL_PATH in the environment.\n");
-
-  FATAL("Failed to locate 'libradamsa.so'.");
-
 }
 
 /* Display usage hints. */
@@ -115,12 +87,13 @@ static void usage(afl_state_t *afl, u8 *argv0, int more_help) {
       "  -o dir        - output directory for fuzzer findings\n\n"
 
       "Execution control settings:\n"
-      "  -p schedule   - power schedules recompute a seed's performance "
-      "score.\n"
-      "                  <explore(default), fast, coe, lin, quad, exploit, "
-      "mmopt, rare>\n"
+      "  -p schedule   - power schedules compute a seed's performance score. "
+      "<explore\n"
+      "                  (default), fast, coe, lin, quad, exploit, mmopt, "
+      "rare, seek>\n"
       "                  see docs/power_schedules.md\n"
-      "  -f file       - location read by the fuzzed program (stdin)\n"
+      "  -f file       - location read by the fuzzed program (default: stdin "
+      "or @@)\n"
       "  -t msec       - timeout for each run (auto-scaled, 50-%d ms)\n"
       "  -m megs       - memory limit for child process (%d MB)\n"
       "  -Q            - use binary-only instrumentation (QEMU mode)\n"
@@ -129,8 +102,6 @@ static void usage(afl_state_t *afl, u8 *argv0, int more_help) {
       "mode)\n\n"
 
       "Mutator settings:\n"
-      "  -R[R]         - add Radamsa as mutator, add another -R to exclusivly "
-      "run it\n"
       "  -L minutes    - use MOpt(imize) mode and set the time limit for "
       "entering the\n"
       "                  pacemaker mode (minutes of no new paths). 0 = "
@@ -146,7 +117,7 @@ static void usage(afl_state_t *afl, u8 *argv0, int more_help) {
       "devices etc.!)\n"
       "  -d            - quick & dirty mode (skips deterministic steps)\n"
       "  -n            - fuzz without instrumentation (non-instrumented mode)\n"
-      "  -x dir        - optional fuzzer dictionary (see README.md, its really "
+      "  -x dict_file  - optional fuzzer dictionary (see README.md, its really "
       "good!)\n\n"
 
       "Testing settings:\n"
@@ -159,14 +130,16 @@ static void usage(afl_state_t *afl, u8 *argv0, int more_help) {
 
       "Other stuff:\n"
       "  -T text       - text banner to show on the screen\n"
-      "  -M / -S id    - distributed mode (see docs/parallel_fuzzing.md)\n"
+      "  -M/-S id      - distributed mode (see docs/parallel_fuzzing.md)\n"
+      "                  use -D to force -S secondary to perform deterministic "
+      "fuzzing\n"
       "  -I command    - execute this command/script when a new crash is "
       "found\n"
-      "  -B bitmap.txt - mutate a specific test case, use the out/fuzz_bitmap "
-      "file\n"
+      //"  -B bitmap.txt - mutate a specific test case, use the out/fuzz_bitmap
+      //" "file\n"
       "  -C            - crash exploration mode (the peruvian rabbit thing)\n"
-      "  -e ext        - file extension for the temporarily generated test "
-      "case\n\n",
+      "  -e ext        - file extension for the fuzz test input file (if "
+      "needed)\n\n",
       argv0, EXEC_TIMEOUT, MEM_LIMIT);
 
   if (more_help > 1) {
@@ -289,10 +262,10 @@ int main(int argc, char **argv_orig, char **envp) {
   doc_path = access(DOC_PATH, F_OK) != 0 ? (u8 *)"docs" : (u8 *)DOC_PATH;
 
   gettimeofday(&tv, &tz);
-  afl->init_seed = tv.tv_sec ^ tv.tv_usec ^ getpid();
+  rand_set_seed(afl, tv.tv_sec ^ tv.tv_usec ^ getpid());
 
   while ((opt = getopt(argc, argv,
-                       "+c:i:I:o:f:m:t:T:dnCB:S:M:x:QNUWe:p:s:V:E:L:hRP:")) >
+                       "+c:i:I:o:f:m:t:T:dDnCB:S:M:x:QNUWe:p:s:V:E:L:hRP:")) >
          0) {
 
     switch (opt) {
@@ -311,7 +284,7 @@ int main(int argc, char **argv_orig, char **envp) {
 
       case 's': {
 
-        afl->init_seed = strtoul(optarg, 0L, 10);
+        rand_set_seed(afl, strtoul(optarg, 0L, 10));
         afl->fixed_seed = 1;
         break;
 
@@ -347,6 +320,10 @@ int main(int argc, char **argv_orig, char **envp) {
 
           afl->schedule = RARE;
 
+        } else if (!stricmp(optarg, "seek")) {
+
+          afl->schedule = SEEK;
+
         } else if (!stricmp(optarg, "explore") || !stricmp(optarg, "default") ||
 
                    !stricmp(optarg, "normal") || !stricmp(optarg, "afl")) {
@@ -384,7 +361,7 @@ int main(int argc, char **argv_orig, char **envp) {
         afl->out_dir = optarg;
         break;
 
-      case 'M': {                                         /* master sync ID */
+      case 'M': {                                           /* main sync ID */
 
         u8 *c;
 
@@ -413,7 +390,7 @@ int main(int argc, char **argv_orig, char **envp) {
 
       break;
 
-      case 'S':
+      case 'S':                                        /* secondary sync id */
 
         if (afl->sync_id) { FATAL("Multiple -S or -M options not supported"); }
         afl->sync_id = ck_strdup(optarg);
@@ -518,6 +495,11 @@ int main(int argc, char **argv_orig, char **envp) {
 
       break;
 
+      case 'D':                                    /* enforce deterministic */
+
+        afl->skip_deterministic = 0;
+        break;
+
       case 'd':                                       /* skip deterministic */
 
         afl->skip_deterministic = 1;
@@ -782,15 +764,9 @@ int main(int argc, char **argv_orig, char **envp) {
 
       case 'R':
 
-        if (afl->use_radamsa) {
-
-          afl->use_radamsa = 2;
-
-        } else {
-
-          afl->use_radamsa = 1;
-
-        }
+        FATAL(
+            "Radamsa is now a custom mutator, please use that "
+            "(custom_mutators/radamsa/).");
 
         break;
 
@@ -823,8 +799,7 @@ int main(int argc, char **argv_orig, char **envp) {
 
     WARNF(
         "Using -M main node with the AFL_CUSTOM_MUTATOR_ONLY mutator options "
-        "will "
-        "result in no deterministic mutations being done!");
+        "will result in no deterministic mutations being done!");
 
   }
 
@@ -834,59 +809,6 @@ int main(int argc, char **argv_orig, char **envp) {
 
   }
 
-  if (afl->init_seed) {
-
-    afl->rand_seed[0] = afl->init_seed;
-    afl->rand_seed[1] = afl->init_seed ^ 0x1234567890abcdef;
-    afl->rand_seed[2] = afl->init_seed & 0x0123456789abcdef;
-    afl->rand_seed[3] = afl->init_seed | 0x01abcde43f567908;
-
-  }
-
-  // srandom((u32)afl->init_seed);
-  // srand((u32)afl->init_seed);  // in case it is a different implementation
-
-  if (afl->use_radamsa) {
-
-    if (afl->limit_time_sig > 0) {
-
-      FATAL(
-          "MOpt and Radamsa are mutually exclusive unless you specify -L -1. "
-          "We accept pull requests that integrates MOpt with the optional "
-          "mutators (custom/radamsa/redqueen/...).");
-
-    }
-
-    if (afl->limit_time_sig && afl->use_radamsa > 1) {
-
-      FATAL("Radamsa in radamsa-only mode can not run together with -L");
-
-    }
-
-    OKF("Using Radamsa add-on");
-
-    u8 *  libradamsa_path = get_libradamsa_path(argv[0]);
-    void *handle = dlopen(libradamsa_path, RTLD_NOW);
-    ck_free(libradamsa_path);
-
-    if (!handle) { FATAL("Failed to dlopen() libradamsa"); }
-
-    void (*radamsa_init_ptr)(void) = dlsym(handle, "radamsa_init");
-    afl->radamsa_mutate_ptr = dlsym(handle, "radamsa");
-
-    if (!radamsa_init_ptr || !afl->radamsa_mutate_ptr) {
-
-      FATAL("Failed to dlsym() libradamsa");
-
-    }
-
-    /* radamsa_init installs some signal handlers, call it before
-       setup_signal_handlers so that AFL++ can then replace those signal
-       handlers */
-    radamsa_init_ptr();
-
-  }
-
   #if defined(__SANITIZE_ADDRESS__)
   if (afl->fsrv.mem_limit) {
 
@@ -960,6 +882,9 @@ int main(int argc, char **argv_orig, char **envp) {
     case RARE:
       OKF("Using rare edge focus power schedule (RARE)");
       break;
+    case SEEK:
+      OKF("Using seek power schedule (SEEK)");
+      break;
     case EXPLORE:
       OKF("Using exploration-based constant power schedule (EXPLORE, default)");
       break;
@@ -1095,6 +1020,8 @@ int main(int argc, char **argv_orig, char **envp) {
   check_crash_handling();
   check_cpu_governor(afl);
 
+  atexit(at_exit);
+
   afl->fsrv.trace_bits =
       afl_shm_init(&afl->shm, afl->fsrv.map_size, afl->non_instrumented_mode);
 
@@ -1106,7 +1033,7 @@ int main(int argc, char **argv_orig, char **envp) {
 
   if (afl->is_main_node && check_main_node_exists(afl) == 1) {
 
-    WARNF("it is wasteful to run more than one master!");
+    WARNF("it is wasteful to run more than one main node!");
     sleep(1);
 
   }
@@ -1258,8 +1185,6 @@ int main(int argc, char **argv_orig, char **envp) {
 
   }
 
-  atexit(at_exit);
-
   perform_dry_run(afl);
 
   cull_queue(afl);
@@ -1353,7 +1278,15 @@ int main(int argc, char **argv_orig, char **envp) {
 
     if (!skipped_fuzz && !afl->stop_soon && afl->sync_id) {
 
-      if (!(sync_interval_cnt++ % SYNC_INTERVAL)) { sync_fuzzers(afl); }
+      if (unlikely(afl->is_main_node)) {
+
+        if (!(sync_interval_cnt++ % (SYNC_INTERVAL / 2))) { sync_fuzzers(afl); }
+
+      } else {
+
+        if (!(sync_interval_cnt++ % SYNC_INTERVAL)) { sync_fuzzers(afl); }
+
+      }
 
     }
 
@@ -1422,10 +1355,13 @@ stop_fuzzing:
   destroy_queue(afl);
   destroy_extras(afl);
   destroy_custom_mutators(afl);
+  unsetenv(SHM_ENV_VAR);
+  unsetenv(CMPLOG_SHM_ENV_VAR);
   afl_shm_deinit(&afl->shm);
 
   if (afl->shm_fuzz) {
 
+    unsetenv(SHM_FUZZ_ENV_VAR);
     afl_shm_deinit(afl->shm_fuzz);
     ck_free(afl->shm_fuzz);
 
diff --git a/src/afl-performance.c b/src/afl-performance.c
index 07069108..6631f148 100644
--- a/src/afl-performance.c
+++ b/src/afl-performance.c
@@ -33,6 +33,17 @@ static inline uint64_t rotl(const uint64_t x, int k) {
 
 }
 
+void rand_set_seed(afl_state_t *afl, s64 init_seed) {
+
+  afl->init_seed = init_seed;
+  afl->rand_seed[0] =
+      hash64((u8 *)&afl->init_seed, sizeof(afl->init_seed), HASH_CONST);
+  afl->rand_seed[1] = afl->rand_seed[0] ^ 0x1234567890abcdef;
+  afl->rand_seed[2] = afl->rand_seed[0] & 0x0123456789abcdef;
+  afl->rand_seed[3] = afl->rand_seed[0] | 0x01abcde43f567908;
+
+}
+
 uint32_t rand_next(afl_state_t *afl) {
 
   const uint32_t result =
@@ -132,13 +143,25 @@ void long_jump(afl_state_t *afl) {
 /* we switch from afl's murmur implementation to xxh3 as it is 30% faster -
    and get 64 bit hashes instead of just 32 bit. Less collisions! :-) */
 
-u32 inline hash32(const void *key, u32 len, u32 seed) {
+#ifdef _DEBUG
+u32 hash32(u8 *key, u32 len, u32 seed) {
+
+#else
+u32 inline hash32(u8 *key, u32 len, u32 seed) {
+
+#endif
 
   return (u32)XXH64(key, len, seed);
 
 }
 
-u64 inline hash64(const void *key, u32 len, u64 seed) {
+#ifdef _DEBUG
+u64 hash64(u8 *key, u32 len, u64 seed) {
+
+#else
+u64 inline hash64(u8 *key, u32 len, u64 seed) {
+
+#endif
 
   return XXH64(key, len, seed);
 
diff --git a/src/afl-sharedmem.c b/src/afl-sharedmem.c
index f8bbebc8..6eb63949 100644
--- a/src/afl-sharedmem.c
+++ b/src/afl-sharedmem.c
@@ -66,6 +66,8 @@ static list_t shm_list = {.element_prealloc_count = 0};
 
 void afl_shm_deinit(sharedmem_t *shm) {
 
+  if (shm == NULL) return;
+
   list_remove(&shm_list, shm);
 
 #ifdef USEMMAP
@@ -83,6 +85,38 @@ void afl_shm_deinit(sharedmem_t *shm) {
 
   }
 
+  if (shm->g_shm_file_path[0]) {
+
+    shm_unlink(shm->g_shm_file_path);
+    shm->g_shm_file_path[0] = 0;
+
+  }
+
+  if (shm->cmplog_mode) {
+
+    if (shm->cmp_map != NULL) {
+
+      munmap(shm->cmp_map, shm->map_size);
+      shm->map = NULL;
+
+    }
+
+    if (shm->cmplog_g_shm_fd != -1) {
+
+      close(shm->cmplog_g_shm_fd);
+      shm->cmplog_g_shm_fd = -1;
+
+    }
+
+    if (shm->cmplog_g_shm_file_path[0]) {
+
+      shm_unlink(shm->cmplog_g_shm_file_path);
+      shm->cmplog_g_shm_file_path[0] = 0;
+
+    }
+
+  }
+
 #else
   shmctl(shm->shm_id, IPC_RMID, NULL);
   if (shm->cmplog_mode) { shmctl(shm->cmplog_shm_id, IPC_RMID, NULL); }
@@ -99,13 +133,15 @@ void afl_shm_deinit(sharedmem_t *shm) {
 u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
                  unsigned char non_instrumented_mode) {
 
-  shm->map_size = map_size;
+  shm->map_size = 0;
 
   shm->map = NULL;
+  shm->cmp_map = NULL;
 
 #ifdef USEMMAP
 
   shm->g_shm_fd = -1;
+  shm->cmplog_g_shm_fd = -1;
 
   /* ======
   generate random file name for multi instance
@@ -134,6 +170,8 @@ u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
 
     close(shm->g_shm_fd);
     shm->g_shm_fd = -1;
+    shm_unlink(shm->g_shm_file_path);
+    shm->g_shm_file_path[0] = 0;
     PFATAL("mmap() failed");
 
   }
@@ -147,11 +185,53 @@ u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
 
   if (shm->map == (void *)-1 || !shm->map) PFATAL("mmap() failed");
 
+  if (shm->cmplog_mode) {
+
+    snprintf(shm->cmplog_g_shm_file_path, L_tmpnam, "/afl_cmplog_%d_%ld",
+             getpid(), random());
+
+    /* create the shared memory segment as if it was a file */
+    shm->cmplog_g_shm_fd =
+        shm_open(shm->cmplog_g_shm_file_path, O_CREAT | O_RDWR | O_EXCL, 0600);
+    if (shm->cmplog_g_shm_fd == -1) { PFATAL("shm_open() failed"); }
+
+    /* configure the size of the shared memory segment */
+    if (ftruncate(shm->cmplog_g_shm_fd, map_size)) {
+
+      PFATAL("setup_shm(): cmplog ftruncate() failed");
+
+    }
+
+    /* map the shared memory segment to the address space of the process */
+    shm->cmp_map = mmap(0, map_size, PROT_READ | PROT_WRITE, MAP_SHARED,
+                        shm->cmplog_g_shm_fd, 0);
+    if (shm->map == MAP_FAILED) {
+
+      close(shm->cmplog_g_shm_fd);
+      shm->cmplog_g_shm_fd = -1;
+      shm_unlink(shm->cmplog_g_shm_file_path);
+      shm->cmplog_g_shm_file_path[0] = 0;
+      PFATAL("mmap() failed");
+
+    }
+
+    /* If somebody is asking us to fuzz instrumented binaries in
+       non-instrumented mode, we don't want them to detect instrumentation,
+       since we won't be sending fork server commands. This should be replaced
+       with better auto-detection later on, perhaps? */
+
+    if (!non_instrumented_mode)
+      setenv(CMPLOG_SHM_ENV_VAR, shm->cmplog_g_shm_file_path, 1);
+
+    if (shm->cmp_map == (void *)-1 || !shm->cmp_map)
+      PFATAL("cmplog mmap() failed");
+
+  }
+
 #else
   u8 *shm_str;
 
   shm->shm_id = shmget(IPC_PRIVATE, map_size, IPC_CREAT | IPC_EXCL | 0600);
-
   if (shm->shm_id < 0) { PFATAL("shmget() failed"); }
 
   if (shm->cmplog_mode) {
@@ -159,7 +239,12 @@ u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
     shm->cmplog_shm_id = shmget(IPC_PRIVATE, sizeof(struct cmp_map),
                                 IPC_CREAT | IPC_EXCL | 0600);
 
-    if (shm->cmplog_shm_id < 0) { PFATAL("shmget() failed"); }
+    if (shm->cmplog_shm_id < 0) {
+
+      shmctl(shm->shm_id, IPC_RMID, NULL);  // do not leak shmem
+      PFATAL("shmget() failed");
+
+    }
 
   }
 
@@ -186,7 +271,18 @@ u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
 
   shm->map = shmat(shm->shm_id, NULL, 0);
 
-  if (shm->map == (void *)-1 || !shm->map) { PFATAL("shmat() failed"); }
+  if (shm->map == (void *)-1 || !shm->map) {
+
+    shmctl(shm->shm_id, IPC_RMID, NULL);  // do not leak shmem
+    if (shm->cmplog_mode) {
+
+      shmctl(shm->cmplog_shm_id, IPC_RMID, NULL);  // do not leak shmem
+
+    }
+
+    PFATAL("shmat() failed");
+
+  }
 
   if (shm->cmplog_mode) {
 
@@ -194,6 +290,13 @@ u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
 
     if (shm->cmp_map == (void *)-1 || !shm->cmp_map) {
 
+      shmctl(shm->shm_id, IPC_RMID, NULL);  // do not leak shmem
+      if (shm->cmplog_mode) {
+
+        shmctl(shm->cmplog_shm_id, IPC_RMID, NULL);  // do not leak shmem
+
+      }
+
       PFATAL("shmat() failed");
 
     }
@@ -202,6 +305,7 @@ u8 *afl_shm_init(sharedmem_t *shm, size_t map_size,
 
 #endif
 
+  shm->map_size = map_size;
   list_append(&shm_list, shm);
 
   return shm->map;
diff --git a/src/afl-showmap.c b/src/afl-showmap.c
index 7b46cd2b..883398ff 100644
--- a/src/afl-showmap.c
+++ b/src/afl-showmap.c
@@ -82,11 +82,16 @@ static u8 quiet_mode,                  /* Hide non-essential messages?      */
     raw_instr_output,                  /* Do not apply AFL filters          */
     cmin_mode,                         /* Generate output in afl-cmin mode? */
     binary_mode,                       /* Write output as a binary map      */
-    keep_cores;                        /* Allow coredumps?                  */
+    keep_cores,                        /* Allow coredumps?                  */
+    remove_shm = 1;                    /* remove shmem?                     */
 
 static volatile u8 stop_soon,          /* Ctrl-C pressed?                   */
     child_crashed;                     /* Child crashed?                    */
 
+static sharedmem_t       shm;
+static afl_forkserver_t *fsrv;
+static sharedmem_t *     shm_fuzz;
+
 /* Classify tuple counts. Instead of mapping to individual bits, as in
    afl-fuzz.c, we map to more user-friendly numbers between 1 and 8. */
 
@@ -141,12 +146,33 @@ static void classify_counts(afl_forkserver_t *fsrv) {
 
 }
 
+static sharedmem_t *deinit_shmem(afl_forkserver_t *fsrv,
+                                 sharedmem_t *     shm_fuzz) {
+
+  afl_shm_deinit(shm_fuzz);
+  fsrv->support_shmem_fuzz = 0;
+  fsrv->shmem_fuzz_len = NULL;
+  fsrv->shmem_fuzz = NULL;
+  ck_free(shm_fuzz);
+  return NULL;
+
+}
+
 /* Get rid of temp files (atexit handler). */
 
 static void at_exit_handler(void) {
 
   if (stdin_file) { unlink(stdin_file); }
 
+  if (remove_shm) {
+
+    if (shm.map) afl_shm_deinit(&shm);
+    if (fsrv->use_shmem_fuzz) deinit_shmem(fsrv, shm_fuzz);
+
+  }
+
+  afl_fsrv_killall();
+
 }
 
 /* Write results. */
@@ -559,7 +585,7 @@ static void usage(u8 *argv0) {
       "size\n"
       "              the target was compiled for\n"
       "AFL_PRELOAD: LD_PRELOAD / DYLD_INSERT_LIBRARIES settings for target\n"
-      "AFL_QUIET: do not print extra informational output",
+      "AFL_QUIET: do not print extra informational output\n",
       argv0, MEM_LIMIT, doc_path);
 
   exit(1);
@@ -579,8 +605,8 @@ int main(int argc, char **argv_orig, char **envp) {
 
   char **argv = argv_cpy_dup(argc, argv_orig);
 
-  afl_forkserver_t  fsrv_var = {0};
-  afl_forkserver_t *fsrv = &fsrv_var;
+  afl_forkserver_t fsrv_var = {0};
+  fsrv = &fsrv_var;
   afl_fsrv_init(fsrv);
   map_size = get_map_size();
   fsrv->map_size = map_size;
@@ -775,7 +801,19 @@ int main(int argc, char **argv_orig, char **envp) {
 
   check_environment_vars(envp);
 
-  sharedmem_t shm = {0};
+  if (getenv("AFL_DEBUG")) {
+
+    SAYF(cMGN "[D]" cRST);
+    for (i = 0; i < argc; i++)
+      SAYF(" %s", argv[i]);
+    SAYF("\n");
+
+  }
+
+  //  if (afl->shmem_testcase_mode) { setup_testcase_shmem(afl); }
+
+  /* initialize cmplog_mode */
+  shm.cmplog_mode = 0;
   fsrv->trace_bits = afl_shm_init(&shm, map_size, 0);
   setup_signal_handlers();
 
@@ -829,16 +867,36 @@ int main(int argc, char **argv_orig, char **envp) {
 
   }
 
+  shm_fuzz = ck_alloc(sizeof(sharedmem_t));
+
+  /* initialize cmplog_mode */
+  shm_fuzz->cmplog_mode = 0;
+  u8 *map = afl_shm_init(shm_fuzz, MAX_FILE + sizeof(u32), 1);
+  if (!map) { FATAL("BUG: Zero return from afl_shm_init."); }
+#ifdef USEMMAP
+  setenv(SHM_FUZZ_ENV_VAR, shm_fuzz->g_shm_file_path, 1);
+#else
+  u8 *shm_str = alloc_printf("%d", shm_fuzz->shm_id);
+  setenv(SHM_FUZZ_ENV_VAR, shm_str, 1);
+  ck_free(shm_str);
+#endif
+  fsrv->support_shmem_fuzz = 1;
+  fsrv->shmem_fuzz_len = (u32 *)map;
+  fsrv->shmem_fuzz = map + sizeof(u32);
+
   if (in_dir) {
 
     DIR *          dir_in, *dir_out;
     struct dirent *dir_ent;
     int            done = 0;
     u8             infile[PATH_MAX], outfile[PATH_MAX];
+    u8             wait_for_gdb = 0;
 #if !defined(DT_REG)
     struct stat statbuf;
 #endif
 
+    if (getenv("AFL_DEBUG_GDB")) wait_for_gdb = 1;
+
     fsrv->dev_null_fd = open("/dev/null", O_RDWR);
     if (fsrv->dev_null_fd < 0) { PFATAL("Unable to open /dev/null"); }
 
@@ -897,6 +955,9 @@ int main(int argc, char **argv_orig, char **envp) {
     afl_fsrv_start(fsrv, use_argv, &stop_soon,
                    get_afl_env("AFL_DEBUG_CHILD_OUTPUT") ? 1 : 0);
 
+    if (fsrv->support_shmem_fuzz && !fsrv->use_shmem_fuzz)
+      shm_fuzz = deinit_shmem(fsrv, shm_fuzz);
+
     while (done == 0 && (dir_ent = readdir(dir_in))) {
 
       if (dir_ent->d_name[0] == '.') {
@@ -924,6 +985,14 @@ int main(int argc, char **argv_orig, char **envp) {
 
       if (read_file(infile)) {
 
+        if (wait_for_gdb) {
+
+          fprintf(stderr, "exec: gdb -p %d\n", fsrv->child_pid);
+          fprintf(stderr, "exec: kill -CONT %d\n", getpid());
+          kill(0, SIGSTOP);
+
+        }
+
         showmap_run_target_forkserver(fsrv, use_argv, in_data, in_len);
         ck_free(in_data);
         tcnt = write_results_to_file(fsrv, outfile);
@@ -939,6 +1008,9 @@ int main(int argc, char **argv_orig, char **envp) {
 
   } else {
 
+    if (fsrv->support_shmem_fuzz && !fsrv->use_shmem_fuzz)
+      shm_fuzz = deinit_shmem(fsrv, shm_fuzz);
+
     showmap_run_target(fsrv, use_argv);
     tcnt = write_results_to_file(fsrv, out_file);
 
@@ -960,13 +1032,16 @@ int main(int argc, char **argv_orig, char **envp) {
 
   }
 
+  remove_shm = 0;
   afl_shm_deinit(&shm);
+  if (fsrv->use_shmem_fuzz) shm_fuzz = deinit_shmem(fsrv, shm_fuzz);
 
   u32 ret = child_crashed * 2 + fsrv->last_run_timed_out;
 
   if (fsrv->target_path) { ck_free(fsrv->target_path); }
 
   afl_fsrv_deinit(fsrv);
+
   if (stdin_file) { ck_free(stdin_file); }
 
   argv_cpy_free(argv);
diff --git a/src/afl-tmin.c b/src/afl-tmin.c
index 9df5112b..2db1eae7 100644
--- a/src/afl-tmin.c
+++ b/src/afl-tmin.c
@@ -80,10 +80,16 @@ static u8 crash_mode,                  /* Crash-centric mode?               */
     hang_mode,                         /* Minimize as long as it hangs      */
     exit_crash,                        /* Treat non-zero exit as crash?     */
     edges_only,                        /* Ignore hit counts?                */
-    exact_mode;                        /* Require path match for crashes?   */
+    exact_mode,                        /* Require path match for crashes?   */
+    remove_out_file,                   /* remove out_file on exit?          */
+    remove_shm = 1;                    /* remove shmem on exit?             */
 
 static volatile u8 stop_soon;          /* Ctrl-C pressed?                   */
 
+static afl_forkserver_t *fsrv;
+static sharedmem_t       shm;
+static sharedmem_t *     shm_fuzz;
+
 /*
  * forkserver section
  */
@@ -105,6 +111,18 @@ static const u8 count_class_lookup[256] = {
 
 };
 
+static sharedmem_t *deinit_shmem(afl_forkserver_t *fsrv,
+                                 sharedmem_t *     shm_fuzz) {
+
+  afl_shm_deinit(shm_fuzz);
+  fsrv->support_shmem_fuzz = 0;
+  fsrv->shmem_fuzz_len = NULL;
+  fsrv->shmem_fuzz = NULL;
+  ck_free(shm_fuzz);
+  return NULL;
+
+}
+
 /* Apply mask to classified bitmap (if set). */
 
 static void apply_mask(u32 *mem, u32 *mask) {
@@ -169,7 +187,15 @@ static inline u8 anything_set(afl_forkserver_t *fsrv) {
 
 static void at_exit_handler(void) {
 
+  if (remove_shm) {
+
+    if (shm.map) afl_shm_deinit(&shm);
+    if (fsrv->use_shmem_fuzz) deinit_shmem(fsrv, shm_fuzz);
+
+  }
+
   afl_fsrv_killall();
+  if (remove_out_file) unlink(out_file);
 
 }
 
@@ -623,6 +649,7 @@ static void set_up_environment(afl_forkserver_t *fsrv) {
     }
 
     out_file = alloc_printf("%s/.afl-tmin-temp-%u", use_dir, (u32)getpid());
+    remove_out_file = 1;
 
   }
 
@@ -812,8 +839,8 @@ int main(int argc, char **argv_orig, char **envp) {
 
   char **argv = argv_cpy_dup(argc, argv_orig);
 
-  afl_forkserver_t  fsrv_var = {0};
-  afl_forkserver_t *fsrv = &fsrv_var;
+  afl_forkserver_t fsrv_var = {0};
+  fsrv = &fsrv_var;
   afl_fsrv_init(fsrv);
   map_size = get_map_size();
   fsrv->map_size = map_size;
@@ -1010,7 +1037,8 @@ int main(int argc, char **argv_orig, char **envp) {
 
   check_environment_vars(envp);
 
-  sharedmem_t shm = {0};
+  /* initialize cmplog_mode */
+  shm.cmplog_mode = 0;
   fsrv->trace_bits = afl_shm_init(&shm, map_size, 0);
 
   atexit(at_exit_handler);
@@ -1052,11 +1080,31 @@ int main(int argc, char **argv_orig, char **envp) {
 
   SAYF("\n");
 
+  shm_fuzz = ck_alloc(sizeof(sharedmem_t));
+
+  /* initialize cmplog_mode */
+  shm_fuzz->cmplog_mode = 0;
+  u8 *map = afl_shm_init(shm_fuzz, MAX_FILE + sizeof(u32), 1);
+  if (!map) { FATAL("BUG: Zero return from afl_shm_init."); }
+#ifdef USEMMAP
+  setenv(SHM_FUZZ_ENV_VAR, shm_fuzz->g_shm_file_path, 1);
+#else
+  u8 *shm_str = alloc_printf("%d", shm_fuzz->shm_id);
+  setenv(SHM_FUZZ_ENV_VAR, shm_str, 1);
+  ck_free(shm_str);
+#endif
+  fsrv->support_shmem_fuzz = 1;
+  fsrv->shmem_fuzz_len = (u32 *)map;
+  fsrv->shmem_fuzz = map + sizeof(u32);
+
   read_initial_file();
 
   afl_fsrv_start(fsrv, use_argv, &stop_soon,
                  get_afl_env("AFL_DEBUG_CHILD_OUTPUT") ? 1 : 0);
 
+  if (fsrv->support_shmem_fuzz && !fsrv->use_shmem_fuzz)
+    shm_fuzz = deinit_shmem(fsrv, shm_fuzz);
+
   ACTF("Performing dry run (mem limit = %llu MB, timeout = %u ms%s)...",
        fsrv->mem_limit, fsrv->exec_tmout, edges_only ? ", edges only" : "");
 
@@ -1110,7 +1158,9 @@ int main(int argc, char **argv_orig, char **envp) {
 
   OKF("We're done here. Have a nice day!\n");
 
+  remove_shm = 0;
   afl_shm_deinit(&shm);
+  if (fsrv->use_shmem_fuzz) shm_fuzz = deinit_shmem(fsrv, shm_fuzz);
   afl_fsrv_deinit(fsrv);
   if (fsrv->target_path) { ck_free(fsrv->target_path); }
   if (mask_bitmap) { ck_free(mask_bitmap); }
diff --git a/src/third_party/libradamsa/.gitignore b/src/third_party/libradamsa/.gitignore
deleted file mode 100644
index 9e2029e3..00000000
--- a/src/third_party/libradamsa/.gitignore
+++ /dev/null
@@ -1,3 +0,0 @@
-*.a
-*.o
-libradamsa-test
diff --git a/src/third_party/libradamsa/GNUmakefile b/src/third_party/libradamsa/GNUmakefile
deleted file mode 100644
index c5a78ead..00000000
--- a/src/third_party/libradamsa/GNUmakefile
+++ /dev/null
@@ -1,26 +0,0 @@
-CUR_DIR := $(shell dirname $(realpath $(lastword $(MAKEFILE_LIST))))
-
-all: libradamsa.so
-
-# These can be overriden:
-CFLAGS	?= -march=native $(CFLAGS_FLTO)
-
-# These are required: (otherwise radamsa gets very very slooooow)
-CFLAGS	+= -O3 -funroll-loops
-
-libradamsa.so: libradamsa.a
-	$(CC) $(CFLAGS) -shared libradamsa.a -o libradamsa.so
-
-libradamsa.a: libradamsa.c radamsa.h
-	@echo " ***************************************************************"
-	@echo " * Compiling libradamsa, wait some minutes (~3 on modern CPUs) *"
-	@echo " ***************************************************************"
-	$(CC) -fPIC $(CFLAGS) -I $(CUR_DIR) -o libradamsa.a -c libradamsa.c
-
-test: libradamsa.a libradamsa-test.c
-	$(CC) $(CFLAGS) -I $(CUR_DIR) -o libradamsa-test libradamsa-test.c libradamsa.a
-	./libradamsa-test libradamsa-test.c | grep "library test passed"
-	rm /tmp/libradamsa-*.fuzz
-
-clean:
-	rm -f libradamsa.a libradamsa.so libradamsa-test
diff --git a/src/third_party/libradamsa/LICENSE b/src/third_party/libradamsa/LICENSE
deleted file mode 100644
index 47c06fce..00000000
--- a/src/third_party/libradamsa/LICENSE
+++ /dev/null
@@ -1,19 +0,0 @@
-Copyright (c) 2013 Aki Helin
-
-Permission is hereby granted, free of charge, to any person obtaining a copy
-of this software and associated documentation files (the "Software"), to deal
-in the Software without restriction, including without limitation the rights
-to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-copies of the Software, and to permit persons to whom the Software is
-furnished to do so, subject to the following conditions:
-
-The above copyright notice and this permission notice shall be included in
-all copies or substantial portions of the Software.
-
-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-THE SOFTWARE.
diff --git a/src/third_party/libradamsa/README.md b/src/third_party/libradamsa/README.md
deleted file mode 100644
index b01a4c83..00000000
--- a/src/third_party/libradamsa/README.md
+++ /dev/null
@@ -1,9 +0,0 @@
-# libradamsa
-
-Pretranslated radamsa library. This code belongs to the radamsa author.
-
-> Original repository: https://gitlab.com/akihe/radamsa
-
-> Source commit: 7b2cc2d0
-
-> The code here is adapted for AFL++ with minor changes respect the original version
diff --git a/src/third_party/libradamsa/libradamsa-test.c b/src/third_party/libradamsa/libradamsa-test.c
deleted file mode 100644
index 53851083..00000000
--- a/src/third_party/libradamsa/libradamsa-test.c
+++ /dev/null
@@ -1,75 +0,0 @@
-#include <radamsa.h>
-#include <stdio.h>
-#include <inttypes.h>
-#include <string.h>
-#include <stdlib.h>
-#include <sys/mman.h>
-#include <sys/types.h>
-#include <fcntl.h>
-#include <unistd.h>
-#include <sys/stat.h>
-
-size_t filesize(char* filename) {
-    struct stat st;
-    stat(filename, &st);
-    return st.st_size;
-}
-
-#define BUFSIZE 1024*1024
-
-void fail(char *why) {
-   printf("fail: %s\n", why);
-   exit(1);
-}
-
-void write_output(char *data, size_t len, int num) {
-   char path[32];
-   int fd;
-   int wrote;
-   sprintf(path, "/tmp/libradamsa-%d.fuzz", num); 
-   fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR);
-   printf("Opened %s -> %d\n", path, fd);
-   if (fd < 0) {
-      fail("failed to open output file");
-   }
-   wrote = write(fd, data, len);
-   printf("wrote %d of %zu bytes\n", wrote, len);
-   if (wrote != len) {
-      fail("failed to write all of output at once");
-   }
-   close(fd);
-   printf("Wrote %zu bytes to %s\n", len, path);
-}
-
-int main(int nargs, char **argv) {
-   char *spath = argv[1];
-   int fd = open(spath, O_RDONLY, 0);
-   size_t len;
-   char *input;
-   char *output;
-   int seed = 0;
-   if (fd < 0) {
-      fail("cannot open input file");
-   }
-   len = filesize(spath);
-   input = malloc(len);
-   output = malloc(BUFSIZE);
-   if (!input || !output) {
-      fail("failed to allocate buffers\n");
-   }
-   radamsa_init();
-   if (len != read(fd, input, len)) {
-      fail("failed to read the entire sample at once");
-   }
-   while(seed++ < 100) {
-      size_t n;
-      n = radamsa((uint8_t *) input, len, (uint8_t *) output, BUFSIZE, seed);
-      write_output(output, n, seed);
-      printf("Fuzzed %zu -> %zu bytes\n", len, n);
-   }
-   printf("library test passed\n");
-   free(output);
-   free(input);
-   return 0;
-}
-
diff --git a/src/third_party/libradamsa/libradamsa.c b/src/third_party/libradamsa/libradamsa.c
deleted file mode 100644
index 37c986e9..00000000
--- a/src/third_party/libradamsa/libradamsa.c
+++ /dev/null
@@ -1,30853 +0,0 @@
-static const unsigned char heap[] = {2,3,4,105,111,116,97,2,3,7,112,97,116,116,101,114,110,
-2,3,1,61,2,3,1,47,2,3,1,60,2,3,2,60,60,2,3,2,62,62,2,3,4,116,121,112,101,1,4,
-1,8,1,4,1,8,1,4,1,7,1,4,1,9,1,4,1,8,1,4,1,7,1,4,1,9,1,4,1,8,2,3,5,101,114,114,
-111,114,1,4,1,1,2,3,4,98,97,110,100,1,4,1,1,2,3,4,98,120,111,114,1,4,1,1,2,3,
-4,100,111,110,101,1,4,1,1,2,3,4,114,111,111,116,1,4,1,1,2,3,8,102,105,110,105,
-115,104,101,100,1,4,1,1,2,3,7,99,114,97,115,104,101,100,1,4,1,1,2,3,9,100,101,
-108,105,118,101,114,101,100,1,4,1,1,2,3,5,105,111,109,117,120,1,4,1,1,2,3,4,
-101,120,112,116,1,4,1,1,2,3,3,105,110,99,1,4,1,1,2,3,8,97,110,111,110,105,109,
-97,115,1,4,1,1,2,3,3,109,117,108,1,4,1,1,2,3,12,109,101,109,111,114,121,45,108,
-105,109,105,116,1,4,1,1,2,3,8,113,117,111,116,105,101,110,116,1,4,1,1,2,3,7,
-107,105,108,108,105,110,103,1,4,1,1,2,3,9,107,105,108,108,101,100,45,98,121,
-1,4,1,1,2,3,12,113,114,45,98,105,103,45,115,109,97,108,108,1,4,1,1,2,3,9,110,
-101,103,97,116,105,118,101,63,1,4,1,1,2,3,7,114,101,115,117,109,101,100,1,4,
-1,1,2,3,8,114,101,108,101,97,115,101,100,1,4,1,1,2,3,5,119,114,105,116,101,1,
-4,1,1,2,3,9,114,101,109,97,105,110,100,101,114,1,4,1,1,2,3,2,116,99,2,3,17,97,
-108,114,101,97,100,121,45,112,114,111,102,105,108,105,110,103,2,3,4,112,114,
-111,102,2,3,17,115,116,97,114,116,101,100,45,112,114,111,102,105,108,105,110,
-103,2,3,22,110,111,116,45,112,114,111,102,105,108,105,110,103,45,121,111,117,
-45,102,111,111,108,1,4,1,5,1,4,1,5,1,4,1,5,1,4,1,5,1,4,1,5,2,3,14,110,111,116,
-45,97,45,102,117,110,99,116,105,111,110,1,4,1,1,2,3,2,111,102,1,4,1,1,2,3,4,
-112,108,117,115,1,4,1,1,2,3,3,116,97,103,1,4,1,1,2,3,9,116,114,117,110,99,97,
-116,101,47,1,4,1,1,2,3,4,114,101,97,100,1,4,1,1,2,3,12,114,101,97,100,45,116,
-105,109,101,111,117,116,2,3,7,116,105,109,101,111,117,116,2,3,5,97,108,97,114,
-109,1,4,1,3,1,4,1,3,1,4,1,3,2,3,4,98,121,116,101,1,4,1,1,2,3,8,98,97,100,45,
-98,121,116,101,1,4,1,1,2,3,5,99,108,111,115,101,2,3,4,111,112,101,110,1,4,1,
-2,1,4,1,2,2,3,4,98,105,111,114,1,4,1,1,2,16,3,0,5,186,2,16,3,0,5,185,2,16,3,
-0,5,184,2,16,3,0,5,183,2,16,3,0,5,182,2,16,3,0,5,181,2,16,3,0,5,180,2,16,3,0,
-5,179,2,16,3,0,5,178,2,16,3,0,5,177,2,16,3,0,5,176,2,16,3,0,5,175,2,16,3,0,5,
-174,2,16,3,0,5,173,2,16,3,0,5,172,2,16,28,2,1,0,23,1,1,4,4,1,1,3,5,1,1,2,6,9,
-5,3,5,4,5,6,4,3,5,3,61,2,16,35,2,3,0,30,16,4,24,0,10,0,6,21,4,6,7,8,1,1,2,9,
-70,5,3,7,3,5,3,13,4,3,9,2,24,4,61,2,16,27,2,2,0,22,1,1,2,5,138,2,6,205,7,5,5,
-10,4,5,5,6,4,7,6,3,10,5,61,2,16,110,2,2,0,10,1,1,2,5,9,4,3,3,5,1,2,3,0,12,1,
-1,2,6,5,4,3,5,4,3,6,2,2,4,0,15,1,1,2,7,9,4,3,5,5,4,6,5,3,7,3,2,5,0,17,1,1,2,
-8,5,4,3,5,4,5,6,5,7,6,3,8,4,2,6,0,20,1,1,2,9,9,4,3,5,5,4,6,5,5,7,6,8,7,3,9,5,
-25,0,0,11,1,2,2,4,1,2,3,3,3,4,1,61,2,16,3,0,5,171,2,16,3,0,5,170,2,16,3,0,5,
-169,2,16,3,0,5,168,2,16,3,0,5,167,2,16,25,2,2,0,20,1,1,4,5,1,1,3,6,1,1,2,7,27,
-4,5,6,7,8,24,8,61,2,16,3,0,5,166,2,16,3,0,5,165,2,16,25,2,3,0,20,1,1,2,6,138,
-1,7,5,6,9,5,6,5,4,5,7,4,3,9,4,61,2,16,3,0,5,164,2,16,3,0,5,163,2,16,3,0,5,162,
-2,16,25,2,1,0,20,1,1,2,4,10,3,5,141,6,9,4,9,5,5,4,6,5,3,9,4,61,2,16,3,0,5,161,
-2,16,3,0,5,160,2,16,3,0,5,159,2,16,3,0,5,158,2,16,29,2,1,0,24,1,1,2,4,10,6,5,
-205,6,141,7,5,4,9,5,4,5,6,5,7,6,3,9,4,61,2,16,3,0,5,157,2,16,3,0,5,156,2,16,
-3,0,5,155,2,16,3,0,5,154,2,16,3,0,5,153,2,16,3,0,5,152,2,16,3,0,5,151,2,16,37,
-2,3,0,7,1,1,2,6,3,6,3,2,2,0,21,1,1,3,5,23,2,0,5,6,1,1,2,7,5,4,5,6,4,3,7,3,61,
-2,16,3,0,5,150,2,16,3,0,5,149,2,16,3,0,5,148,2,16,3,0,5,147,2,16,3,0,5,146,2,
-16,3,0,5,145,2,16,3,0,5,144,2,16,3,0,5,143,2,16,3,0,5,142,2,16,3,0,5,141,2,16,
-3,0,5,140,2,16,3,0,5,139,2,16,3,0,5,138,2,16,3,0,5,137,2,16,3,0,5,136,2,16,3,
-0,5,135,2,16,3,0,5,134,2,16,3,0,5,133,2,16,3,0,5,132,2,16,3,0,5,131,2,16,3,0,
-5,130,2,16,3,0,5,129,2,16,3,0,5,128,2,16,3,0,5,127,2,16,3,0,5,126,2,16,3,0,5,
-125,2,16,3,0,5,124,2,16,3,0,5,123,2,16,3,0,5,122,2,16,3,0,5,121,2,16,3,0,5,120,
-2,16,3,0,5,119,2,16,3,0,5,118,2,16,3,0,5,117,2,16,23,2,3,0,7,1,1,2,6,3,6,3,25,
-1,0,7,1,1,3,5,3,5,2,61,2,16,3,0,5,116,2,16,3,0,5,115,2,16,3,0,5,114,2,16,3,0,
-5,113,2,16,3,0,5,112,2,16,3,0,5,111,2,16,3,0,5,110,2,16,3,0,5,109,2,16,3,0,5,
-108,2,16,3,0,5,107,2,16,27,2,3,0,22,1,1,2,6,198,4,3,5,3,3,1,1,4,8,5,4,5,8,4,
-3,6,3,61,2,16,3,0,5,106,2,16,3,0,5,105,2,16,3,0,5,104,2,16,3,0,5,103,2,16,3,
-0,5,102,2,16,3,0,5,101,2,16,3,0,5,100,2,16,3,0,5,99,2,16,3,0,5,98,2,16,3,0,5,
-97,2,16,3,0,5,96,2,16,3,0,5,95,2,16,3,0,5,94,2,16,3,0,5,93,2,16,3,0,5,92,2,16,
-3,0,5,91,2,16,3,0,5,90,2,16,3,0,5,89,2,16,3,0,5,88,2,16,3,0,5,87,2,16,3,0,5,
-86,2,16,3,0,5,85,2,16,3,0,5,84,2,16,3,0,5,83,2,16,3,0,5,82,2,16,3,0,5,81,2,16,
-3,0,5,80,2,16,3,0,5,79,2,16,3,0,5,78,2,16,3,0,5,77,2,16,3,0,5,76,2,16,3,0,5,
-75,2,16,3,0,5,74,2,16,3,0,5,73,2,16,3,0,5,72,2,16,3,0,5,71,2,16,3,0,5,70,2,16,
-3,0,5,69,2,16,3,0,5,68,2,16,3,0,5,67,2,16,3,0,5,66,2,16,3,0,5,65,2,16,3,0,5,
-64,2,16,3,0,5,63,2,16,3,0,5,62,2,16,3,0,5,61,2,16,3,0,5,60,2,16,3,0,5,59,2,16,
-3,0,5,58,2,16,3,0,5,57,2,16,3,0,5,56,2,16,3,0,5,55,2,16,3,0,5,54,2,16,3,0,5,
-53,2,16,3,0,5,52,2,16,3,0,5,51,2,16,3,0,5,50,2,16,3,0,5,49,2,16,3,0,5,48,2,16,
-3,0,5,47,2,16,3,0,5,46,2,16,3,0,5,45,2,16,3,0,5,44,2,16,3,0,5,43,2,16,3,0,5,
-42,2,16,3,0,5,41,2,16,3,0,5,40,2,16,3,0,5,39,2,16,3,0,5,38,2,16,3,0,5,37,2,16,
-3,0,5,36,2,16,3,0,5,35,2,16,3,0,5,34,2,16,3,0,5,33,2,16,3,0,5,32,2,16,3,0,5,
-31,2,16,3,0,5,30,2,16,3,0,5,29,2,16,3,0,5,28,2,16,3,0,5,27,2,16,3,0,5,26,2,16,
-3,0,5,25,2,16,3,0,5,24,2,16,3,0,5,23,2,16,3,0,5,22,2,16,3,0,5,21,2,16,3,0,5,
-20,2,16,3,0,5,19,2,16,3,0,5,18,2,16,3,0,5,17,2,16,3,0,5,16,2,16,3,0,5,15,2,16,
-3,0,5,14,2,16,3,0,5,13,2,16,3,0,5,12,2,16,3,0,5,11,2,16,3,0,5,10,2,16,3,0,5,
-9,2,16,3,0,5,8,2,16,3,0,5,7,2,16,3,0,5,6,2,16,3,0,5,5,2,16,3,0,5,4,2,16,3,0,
-5,3,2,16,3,0,5,2,2,16,3,0,5,1,2,16,3,0,5,0,2,16,3,0,4,255,2,16,3,0,4,254,2,16,
-3,0,4,253,2,16,3,0,4,252,2,16,3,0,4,251,2,16,3,0,4,250,2,16,3,0,4,249,2,16,3,
-0,4,248,2,16,3,0,4,247,2,16,3,0,4,246,2,16,3,0,4,245,2,16,3,0,4,244,2,16,3,0,
-4,243,2,16,3,0,4,242,2,16,3,0,4,241,2,16,3,0,4,240,2,16,3,0,4,239,2,16,3,0,4,
-238,2,16,3,0,4,237,2,16,3,0,4,236,2,16,3,0,4,235,2,16,3,0,4,234,2,16,3,0,4,233,
-2,16,3,0,4,232,2,16,3,0,4,231,2,16,3,0,4,230,2,16,3,0,4,229,2,16,3,0,4,228,2,
-16,3,0,4,227,2,16,3,0,4,226,2,16,3,0,4,225,2,16,3,0,4,224,2,16,3,0,4,223,2,16,
-3,0,4,222,2,16,3,0,4,221,2,16,3,0,4,220,2,16,3,0,4,219,2,16,3,0,4,218,2,16,3,
-0,4,217,2,16,3,0,4,216,2,16,3,0,4,215,2,16,3,0,4,214,2,16,3,0,4,213,2,16,3,0,
-4,212,2,16,3,0,4,211,2,16,3,0,4,210,2,16,3,0,4,209,2,16,3,0,4,208,2,16,3,0,4,
-207,2,16,3,0,4,206,2,16,3,0,4,205,2,16,3,0,4,204,2,16,3,0,4,203,2,16,3,0,4,202,
-2,16,3,0,4,201,2,16,3,0,4,200,2,16,3,0,4,199,2,16,3,0,4,198,2,16,3,0,4,197,2,
-16,3,0,4,196,2,16,3,0,4,195,2,16,3,0,4,194,2,16,3,0,4,193,2,16,3,0,4,192,2,16,
-3,0,4,191,2,16,3,0,4,190,2,16,3,0,4,189,2,16,3,0,4,188,2,16,3,0,4,187,2,16,3,
-0,4,186,2,16,3,0,4,185,2,16,3,0,4,184,2,16,3,0,4,183,2,16,3,0,4,182,2,16,3,0,
-4,181,2,16,3,0,4,180,2,16,3,0,4,179,2,16,3,0,4,178,2,16,3,0,4,177,2,16,3,0,4,
-176,2,16,3,0,4,175,2,16,3,0,4,174,2,16,3,0,4,173,2,16,3,0,4,172,2,16,3,0,4,171,
-2,16,3,0,4,170,2,16,3,0,4,169,2,16,3,0,4,168,2,16,3,0,4,167,2,16,3,0,4,166,2,
-16,3,0,4,165,2,16,3,0,4,164,2,16,3,0,4,163,2,16,3,0,4,162,2,16,3,0,4,161,2,16,
-3,0,4,160,2,16,3,0,4,159,2,16,3,0,4,158,2,16,3,0,4,157,2,16,3,0,4,156,2,16,3,
-0,4,155,2,16,3,0,4,154,2,16,3,0,4,153,2,16,3,0,4,152,2,16,3,0,4,151,2,16,3,0,
-4,150,2,16,3,0,4,149,2,16,3,0,4,148,2,16,3,0,4,147,2,16,3,0,4,146,2,16,3,0,4,
-145,2,16,3,0,4,144,2,16,3,0,4,143,2,16,3,0,4,142,2,16,3,0,4,141,2,16,3,0,4,140,
-2,16,3,0,4,139,2,16,3,0,4,138,2,16,3,0,4,137,2,16,3,0,4,136,2,16,3,0,4,135,2,
-16,3,0,4,134,2,16,3,0,4,133,2,16,3,0,4,132,2,16,3,0,4,131,2,16,3,0,4,130,2,16,
-3,0,4,129,2,16,3,0,4,128,2,16,3,0,4,127,2,16,3,0,4,126,2,16,3,0,4,125,2,16,3,
-0,4,124,2,16,3,0,4,123,2,16,3,0,4,122,2,16,3,0,4,121,2,16,3,0,4,120,2,16,3,0,
-4,119,2,16,3,0,4,118,2,16,3,0,4,117,2,16,3,0,4,116,2,16,3,0,4,115,2,16,3,0,4,
-114,2,16,3,0,4,113,2,16,3,0,4,112,2,16,3,0,4,111,2,16,3,0,4,110,2,16,3,0,4,109,
-2,16,3,0,4,108,2,16,3,0,4,107,2,16,3,0,4,106,2,16,3,0,4,105,2,16,3,0,4,104,2,
-16,3,0,4,103,2,16,3,0,4,102,2,16,3,0,4,101,2,16,3,0,4,100,2,16,3,0,4,99,2,16,
-3,0,4,98,2,16,3,0,4,97,2,16,3,0,4,96,2,16,3,0,4,95,2,16,3,0,4,94,2,16,3,0,4,
-93,2,16,3,0,4,92,2,16,3,0,4,91,2,16,3,0,4,90,2,16,3,0,4,89,2,16,3,0,4,88,2,16,
-3,0,4,87,2,16,3,0,4,86,2,16,3,0,4,85,2,16,3,0,4,84,2,16,3,0,4,83,2,16,3,0,4,
-82,2,16,3,0,4,81,2,16,3,0,4,80,2,16,3,0,4,79,2,16,3,0,4,78,2,16,3,0,4,77,2,16,
-3,0,4,76,2,16,3,0,4,75,2,16,3,0,4,74,2,16,3,0,4,73,2,16,3,0,4,72,2,16,3,0,4,
-71,2,16,3,0,4,70,2,16,3,0,4,69,2,16,3,0,4,68,2,16,3,0,4,67,2,16,3,0,4,66,2,16,
-3,0,4,65,2,16,3,0,4,64,2,16,3,0,4,63,2,16,3,0,4,62,2,16,3,0,4,61,2,16,3,0,4,
-60,2,16,3,0,4,59,2,16,3,0,4,58,2,16,3,0,4,57,2,16,3,0,4,56,2,16,78,2,3,0,7,1,
-1,2,6,3,6,3,2,2,0,2,24,4,2,1,0,4,13,4,24,4,2,4,0,18,1,1,2,7,198,4,3,4,3,3,5,
-5,4,6,5,3,7,3,25,1,0,26,1,1,4,5,1,1,2,6,13,7,9,5,9,5,6,10,4,6,5,7,5,10,4,3,9,
-4,61,2,16,54,2,3,0,7,1,1,2,6,3,6,3,2,2,0,17,1,1,2,5,13,6,9,5,8,5,4,5,6,4,3,8,
-3,25,3,0,17,1,1,3,7,198,4,4,4,3,3,1,1,5,4,3,7,4,61,2,16,48,2,3,0,7,1,1,2,6,3,
-6,3,25,3,0,17,1,1,3,7,198,4,4,4,3,3,1,1,2,4,3,7,4,2,2,0,2,24,4,2,1,0,5,10,0,
-4,24,4,61,2,16,54,2,3,0,7,1,1,2,6,3,6,3,2,2,0,18,1,1,2,5,10,0,6,9,5,8,5,4,5,
-6,4,3,8,3,25,2,0,16,1,1,3,6,198,4,4,4,3,3,9,5,4,3,6,2,61,2,16,3,0,4,55,2,16,
-3,0,4,54,2,16,37,2,3,0,7,1,1,2,6,3,6,3,25,2,0,21,1,2,2,6,1,1,2,7,5,6,9,5,6,5,
-4,5,7,4,3,9,4,61,2,16,80,2,3,0,7,1,1,2,6,3,6,3,2,2,0,2,24,4,25,2,0,21,1,2,2,
-6,1,1,2,7,5,6,9,5,6,5,4,5,7,4,3,9,4,2,1,0,33,1,1,3,4,208,4,2,0,24,4,1,2,3,5,
-1,2,4,6,1,1,2,7,9,5,8,5,6,4,7,5,3,8,3,61,2,16,3,0,4,53,2,16,3,0,4,52,2,16,3,
-0,4,51,2,16,3,0,4,50,2,16,3,0,4,49,2,16,3,0,4,48,2,16,3,0,4,47,2,16,3,0,4,46,
-2,16,3,0,4,45,2,16,3,0,4,44,2,16,3,0,4,43,2,16,3,0,4,42,2,16,3,0,4,41,2,16,3,
-0,4,40,2,16,3,0,4,39,2,16,3,0,4,38,2,16,3,0,4,37,2,16,67,2,1,0,62,1,2,2,4,1,
-1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,1,8,11,1,1,9,12,134,10,2,3,
-5,6,7,8,9,10,11,12,13,5,4,8,3,4,5,6,5,13,3,3,8,3,61,2,16,3,0,4,36,2,16,3,0,4,
-35,2,16,48,2,1,0,43,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,134,8,2,
-3,3,5,6,7,8,9,3,5,4,7,5,4,3,7,2,61,2,16,3,0,4,34,2,16,3,0,4,33,2,16,3,0,4,32,
-2,16,3,0,4,31,2,16,3,0,4,30,2,16,3,0,4,29,2,16,3,0,4,28,2,16,3,0,4,27,2,16,3,
-0,4,26,2,16,3,0,4,25,2,16,3,0,4,24,2,16,3,0,4,23,2,16,3,0,4,22,2,16,3,0,4,21,
-2,16,3,0,4,20,2,16,3,0,4,19,2,16,3,0,4,18,2,16,3,0,4,17,2,16,3,0,4,16,2,16,3,
-0,4,15,2,16,3,0,4,14,2,16,3,0,4,13,2,16,3,0,4,12,2,16,3,0,4,11,2,16,3,0,4,10,
-2,16,3,0,4,9,2,16,3,0,4,8,2,16,3,0,4,7,2,16,3,0,4,6,2,16,3,0,4,5,2,16,3,0,4,
-4,2,16,3,0,4,3,2,16,3,0,4,2,2,16,3,0,4,1,2,16,3,0,4,0,2,16,3,0,3,255,2,16,3,
-0,3,254,2,16,3,0,3,253,2,16,3,0,3,252,2,16,3,0,3,251,2,16,3,0,3,250,2,16,3,0,
-3,249,2,16,3,0,3,248,2,16,3,0,3,247,2,16,32,2,1,0,27,1,1,2,4,51,3,4,5,10,10,
-6,1,1,3,7,35,6,7,5,3,1,1,4,9,3,9,1,61,2,16,3,0,3,246,2,16,3,0,3,245,2,16,31,
-2,1,0,26,1,1,2,4,51,3,4,5,10,10,6,10,2,7,35,6,7,5,3,1,1,3,9,3,9,1,61,2,16,3,
-0,3,244,2,16,3,0,3,243,2,16,3,0,3,242,2,16,3,0,3,241,2,16,3,0,3,240,2,16,3,0,
-3,239,2,16,3,0,3,238,2,16,3,0,3,237,2,16,3,0,3,236,2,16,24,2,1,0,19,138,10,4,
-1,1,2,5,35,4,5,3,3,1,1,3,7,3,7,1,61,2,16,3,0,3,235,2,16,3,0,3,234,2,16,3,0,3,
-233,2,16,3,0,3,232,2,16,3,0,3,231,2,16,3,0,3,230,2,16,3,0,3,229,2,16,3,0,3,228,
-2,16,3,0,3,227,2,16,3,0,3,226,2,16,3,0,3,225,2,16,3,0,3,224,2,16,3,0,3,223,2,
-16,3,0,3,222,2,16,12,25,1,0,7,1,1,2,5,3,5,2,61,2,16,3,0,3,221,2,16,3,0,3,220,
-2,16,3,0,3,219,2,16,3,0,3,218,2,16,3,0,3,217,2,16,3,0,3,216,2,16,3,0,3,215,2,
-16,3,0,3,214,2,16,3,0,3,213,2,16,3,0,3,212,2,16,3,0,3,211,2,16,3,0,3,210,2,16,
-3,0,3,209,2,16,3,0,3,208,2,16,3,0,3,207,2,16,3,0,3,206,2,16,3,0,3,205,2,16,3,
-0,3,204,2,16,3,0,3,203,2,16,3,0,3,202,2,16,3,0,3,201,2,16,3,0,3,200,2,16,3,0,
-3,199,2,16,3,0,3,198,2,16,3,0,3,197,2,16,3,0,3,196,2,16,3,0,3,195,2,16,3,0,3,
-194,2,16,3,0,3,193,2,16,3,0,3,192,2,16,3,0,3,191,2,16,3,0,3,190,2,16,3,0,3,189,
-2,16,3,0,3,188,2,16,3,0,3,187,2,16,3,0,3,186,2,16,3,0,3,185,2,16,3,0,3,184,2,
-16,3,0,3,183,2,16,3,0,3,182,2,16,3,0,3,181,2,16,3,0,3,180,2,16,3,0,3,179,2,16,
-3,0,3,178,2,16,3,0,3,177,2,16,3,0,3,176,2,16,3,0,3,175,2,16,12,2,7,0,7,1,1,2,
-10,3,10,8,61,2,16,3,0,3,174,2,16,3,0,3,173,2,16,3,0,3,172,2,16,3,0,3,171,2,16,
-3,0,3,170,2,16,3,0,3,169,2,16,3,0,3,168,2,16,3,0,3,167,2,16,3,0,3,166,2,16,3,
-0,3,165,2,16,3,0,3,164,2,16,3,0,3,163,2,16,3,0,3,162,2,16,3,0,3,161,2,16,3,0,
-3,160,2,16,3,0,3,159,2,16,3,0,3,158,2,16,3,0,3,157,2,16,3,0,3,156,2,16,3,0,3,
-155,2,16,3,0,3,154,2,16,3,0,3,153,2,16,3,0,3,152,2,16,3,0,3,151,2,16,3,0,3,150,
-2,16,3,0,3,149,2,16,3,0,3,148,2,16,3,0,3,147,2,16,3,0,3,146,2,16,3,0,3,145,2,
-16,3,0,3,144,2,16,3,0,3,143,2,16,3,0,3,142,2,16,3,0,3,141,2,16,3,0,3,140,2,16,
-3,0,3,139,2,16,3,0,3,138,2,16,3,0,3,137,2,16,3,0,3,136,2,16,3,0,3,135,2,16,3,
-0,3,134,2,16,3,0,3,133,2,16,3,0,3,132,2,16,3,0,3,131,2,16,3,0,3,130,2,16,3,0,
-3,129,2,16,3,0,3,128,2,16,3,0,3,127,2,16,3,0,3,126,2,16,3,0,3,125,2,16,3,0,3,
-124,2,16,3,0,3,123,2,16,3,0,3,122,2,16,3,0,3,121,2,16,3,0,3,120,2,16,3,0,3,119,
-2,16,3,0,3,118,2,16,3,0,3,117,2,16,3,0,3,116,2,16,3,0,3,115,2,16,58,2,6,0,53,
-80,5,36,0,208,6,11,0,169,5,9,205,6,9,9,5,3,8,6,169,4,9,169,5,5,105,4,11,51,11,
-7,7,141,6,9,9,4,3,8,6,1,1,2,9,198,4,3,7,3,3,3,9,2,61,2,16,21,2,2,0,16,1,1,2,
-5,205,6,77,7,5,5,8,4,5,3,8,6,61,2,16,20,2,3,0,15,32,5,2,6,7,51,4,6,8,51,8,7,
-9,24,9,61,2,16,20,2,3,0,15,32,5,2,6,7,51,4,7,8,51,6,8,9,24,9,61,2,16,25,2,2,
-0,20,105,3,5,169,3,6,51,6,4,4,1,1,2,8,9,5,3,3,8,2,61,2,16,85,2,3,0,80,32,4,2,
-6,7,80,6,18,0,105,6,8,169,6,9,51,9,7,4,5,3,7,8,3,3,7,2,80,7,37,0,169,7,8,80,
-8,15,0,1,1,3,9,70,3,4,3,3,9,7,4,3,9,2,105,7,9,1,1,2,4,5,3,7,9,3,3,7,2,1,1,2,
-4,5,3,7,5,3,3,7,2,61,2,16,3,0,3,114,2,16,3,0,3,113,2,16,3,0,3,112,2,16,3,0,3,
-111,2,16,3,0,3,110,2,16,3,0,3,109,2,16,3,0,3,108,2,16,3,0,3,107,2,16,3,0,3,106,
-2,16,3,0,3,105,2,16,3,0,3,104,2,16,3,0,3,103,2,16,3,0,3,102,2,16,3,0,3,101,2,
-16,3,0,3,100,2,16,3,0,3,99,2,16,3,0,3,98,2,16,3,0,3,97,2,16,3,0,3,96,2,16,3,
-0,3,95,2,16,3,0,3,94,2,16,3,0,3,93,2,16,3,0,3,92,2,16,3,0,3,91,2,16,3,0,3,90,
-2,16,3,0,3,89,2,16,3,0,3,88,2,16,3,0,3,87,2,16,3,0,3,86,2,16,3,0,3,85,2,16,3,
-0,3,84,2,16,3,0,3,83,2,16,3,0,3,82,2,16,3,0,3,81,2,16,3,0,3,80,2,16,3,0,3,79,
-2,16,3,0,3,78,2,16,3,0,3,77,2,16,3,0,3,76,2,16,3,0,3,75,2,16,3,0,3,74,2,16,3,
-0,3,73,2,16,3,0,3,72,2,16,3,0,3,71,2,16,3,0,3,70,2,16,3,0,3,69,2,16,3,0,3,68,
-2,16,3,0,3,67,2,16,3,0,3,66,2,16,3,0,3,65,2,16,3,0,3,64,2,16,3,0,3,63,2,16,3,
-0,3,62,2,16,3,0,3,61,2,16,3,0,3,60,2,16,3,0,3,59,2,16,3,0,3,58,2,16,3,0,3,57,
-2,16,3,0,3,56,2,16,36,25,2,0,31,1,1,2,6,198,4,3,4,3,7,1,1,4,4,1,1,5,9,5,6,10,
-5,6,5,7,3,9,5,3,10,4,61,2,16,3,0,3,55,2,16,61,2,2,0,19,1,1,2,5,1,1,3,6,9,5,8,
-5,4,5,6,4,3,8,3,25,1,0,33,1,1,4,5,198,3,5,3,6,1,1,6,7,1,1,7,8,9,5,9,5,6,3,4,
-6,5,7,4,8,5,3,9,4,61,2,16,3,0,3,54,2,16,28,2,2,0,23,1,1,2,5,1,1,3,6,205,7,5,
-5,9,4,5,5,6,4,7,6,3,9,4,61,2,16,28,2,1,0,23,1,2,2,4,1,1,2,5,1,2,3,6,9,4,7,5,
-5,3,6,4,3,7,2,61,2,16,46,2,1,0,41,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,134,
-7,2,3,5,3,6,7,8,9,9,4,7,5,3,4,9,3,3,7,2,61,2,16,14,2,1,0,9,1,1,2,4,77,3,3,4,
-1,61,2,16,3,0,3,53,2,16,3,0,3,52,2,16,3,0,3,51,2,16,61,2,4,0,56,80,4,42,0,105,
-4,7,105,7,8,1,1,2,9,8,9,8,10,0,169,4,4,51,7,5,5,3,6,4,169,4,4,1,2,2,11,6,4,2,
-3,7,3,3,3,11,3,205,4,5,3,8,5,3,3,8,2,61,2,16,57,2,4,0,52,80,4,28,0,105,4,7,169,
-7,8,8,8,5,12,0,169,4,4,70,4,6,7,3,3,3,6,4,169,4,9,24,9,1,1,2,7,70,3,3,3,3,1,
-1,4,4,1,1,5,5,3,7,3,61,2,16,24,2,1,0,19,1,1,3,4,1,1,2,5,7,4,5,3,1,1,4,7,3,7,
-1,61,2,16,59,2,2,0,54,169,4,5,32,5,2,6,7,32,5,3,8,9,10,1,1,2,11,6,5,2,5,11,9,
-3,12,8,9,11,5,0,205,3,3,12,1,1,2,2,13,1,2,3,4,1,2,4,5,9,12,3,3,13,3,61,2,16,
-22,2,3,0,17,1,1,2,6,198,3,3,5,7,5,4,5,7,4,3,6,3,61,2,16,34,2,1,0,29,1,1,5,4,
-1,1,4,5,1,1,3,6,1,1,2,7,5,4,8,5,3,5,6,4,7,5,3,8,3,61,2,16,45,2,1,0,40,1,2,2,
-4,1,1,4,5,1,1,5,6,1,1,6,7,6,5,2,3,5,6,7,3,1,1,3,9,1,1,2,5,5,4,11,9,4,3,11,3,
-61,2,16,129,29,2,2,0,152,32,4,2,5,6,32,6,2,7,8,10,0,9,47,8,9,10,1,2,2,11,8,10,
-11,88,0,1,2,5,12,8,10,12,39,0,1,2,7,13,1,1,2,14,1,1,3,15,1,1,4,16,6,6,2,8,14,
-15,3,16,3,1,2,9,4,1,2,10,5,9,8,6,3,13,4,32,8,3,13,14,15,1,2,3,16,1,1,2,17,1,
-1,3,18,1,1,4,19,134,7,2,6,6,17,18,3,19,3,5,7,4,8,5,3,16,3,32,8,2,12,13,1,2,3,
-14,1,1,2,15,1,1,3,16,1,1,4,17,6,6,2,4,15,16,3,17,3,5,7,4,8,5,3,14,3,61,2,16,
-48,2,2,0,43,32,4,2,5,6,32,6,2,7,8,1,2,2,9,1,1,2,10,1,1,3,11,1,1,4,12,6,6,2,3,
-10,3,11,12,3,5,7,4,8,5,3,9,3,61,2,16,66,2,1,0,61,1,1,3,4,1,1,4,5,1,1,5,6,1,1,
-6,7,1,1,7,8,134,7,2,3,4,5,6,7,8,9,1,1,2,10,208,10,18,0,169,10,11,1,2,2,12,9,
-4,5,5,9,3,11,4,3,12,3,205,3,3,9,1,61,2,16,58,2,2,0,53,1,1,3,5,1,1,4,6,1,1,5,
-7,1,1,6,8,134,8,2,3,4,5,6,3,7,8,9,1,1,2,10,208,10,13,0,169,10,4,1,2,2,12,9,9,
-3,3,12,3,205,3,3,9,1,61,2,16,43,2,2,0,38,1,2,2,5,1,1,3,6,1,1,4,7,1,1,5,8,134,
-7,2,3,4,6,7,3,8,3,1,1,2,4,5,5,8,6,5,3,8,3,61,2,16,75,2,6,0,70,10,0,9,8,8,9,45,
-0,138,0,10,8,8,10,18,0,1,1,2,11,198,6,5,5,7,6,3,3,9,7,5,3,11,3,1,1,2,11,198,
-5,4,6,4,3,3,5,5,4,7,5,3,11,3,1,1,2,10,198,5,3,6,5,3,3,9,7,5,3,10,3,61,2,16,83,
-2,1,0,78,208,3,47,0,1,1,2,4,169,4,5,1,1,5,6,1,1,6,7,1,1,7,8,6,4,2,2,7,8,3,1,
-1,4,10,1,1,3,11,5,5,4,6,7,5,10,5,11,6,3,7,5,1,1,4,4,1,1,3,5,51,4,5,6,1,1,2,7,
-51,6,7,3,1,1,7,9,3,9,1,61,2,16,47,2,5,0,42,80,4,26,0,105,4,8,105,8,9,1,1,2,10,
-198,8,3,4,6,5,7,8,3,3,9,9,4,3,10,3,51,5,6,8,77,9,51,8,9,10,24,10,61,2,16,16,
-2,4,0,11,10,21,7,63,7,4,5,6,8,24,8,61,2,16,50,2,1,0,45,1,2,2,4,1,1,4,5,1,1,5,
-6,1,1,6,7,6,5,2,3,5,6,7,8,1,1,3,9,1,1,2,6,5,4,11,3,5,5,8,3,9,4,3,11,4,61,2,16,
-129,62,2,5,0,185,138,0,8,47,7,8,9,10,0,10,47,9,10,11,1,1,2,12,8,11,12,136,0,
-1,1,3,13,8,11,13,96,0,1,1,6,14,8,11,14,61,0,1,1,7,15,8,11,15,30,0,47,7,10,16,
-1,1,9,17,70,6,10,6,5,4,3,3,1,1,11,4,1,1,12,5,9,16,6,3,17,4,32,9,2,16,17,1,1,
-4,18,198,8,8,17,7,6,5,4,3,3,3,18,1,32,9,2,15,16,51,16,7,17,51,17,5,18,5,3,8,
-4,3,5,6,5,18,4,3,8,3,32,9,3,14,15,16,51,15,7,17,51,17,4,18,1,1,4,19,198,8,5,
-16,7,6,5,18,3,3,3,19,1,32,9,2,13,14,51,14,7,15,51,15,4,16,5,3,8,5,4,5,6,5,16,
-3,3,8,3,61,2,16,41,2,1,0,36,1,1,6,4,1,1,5,5,1,1,4,6,1,1,3,7,1,1,2,8,9,5,3,5,
-7,5,4,7,5,6,4,8,6,3,7,5,61,2,16,31,2,3,0,26,1,1,3,6,1,1,2,7,5,7,10,6,7,5,5,6,
-4,5,5,3,4,10,3,3,7,5,61,2,16,119,2,1,0,114,32,3,2,4,5,208,4,52,0,1,2,4,6,1,1,
-5,7,1,1,6,8,6,4,2,5,7,8,9,1,1,4,10,1,1,3,11,1,1,2,12,9,6,13,5,4,7,5,8,5,9,3,
-10,4,5,11,5,12,6,3,13,6,208,5,10,0,1,1,5,6,10,1,3,3,6,1,1,2,2,6,1,1,2,7,1,1,
-3,8,1,1,4,9,1,1,5,10,1,1,6,11,6,7,2,3,7,8,9,10,11,3,13,4,3,6,2,61,2,16,55,2,
-1,0,50,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,134,7,2,3,5,6,7,8,9,10,
-9,4,9,5,6,5,3,6,5,7,4,10,3,3,9,4,61,2,16,49,2,1,0,44,1,1,2,4,1,1,3,5,1,1,4,6,
-1,1,5,7,1,1,6,8,134,7,2,2,4,5,6,7,8,9,208,3,5,0,205,3,3,9,1,13,3,3,9,1,61,2,
-16,93,2,1,0,88,208,3,47,0,1,2,4,4,1,1,5,5,1,1,6,6,6,4,2,5,5,6,7,1,1,4,8,1,1,
-3,5,1,1,2,6,9,4,11,5,7,12,3,7,5,8,4,12,3,3,11,5,1,2,2,4,1,1,2,5,1,1,3,6,1,1,
-4,7,1,1,5,8,1,1,6,9,134,7,2,3,5,6,7,8,9,3,3,4,1,61,2,16,37,2,1,0,32,1,1,2,4,
-1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,134,7,2,2,4,5,6,7,8,9,24,9,61,2,16,53,2,1,0,
-48,1,1,2,4,1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,134,7,2,4,4,5,6,7,8,9,208,3,7,0,1,
-2,3,3,3,9,1,1,2,2,3,3,9,1,61,2,16,44,2,1,0,39,1,1,2,4,169,4,5,1,1,6,6,1,1,5,
-7,1,1,4,8,1,1,3,9,9,7,3,5,6,7,5,6,5,8,4,9,5,3,7,5,61,2,16,32,2,2,0,27,1,1,2,
-5,169,5,6,1,1,5,7,1,1,4,8,1,1,3,5,5,3,4,8,3,3,7,5,61,2,16,50,2,1,0,45,1,2,2,
-4,1,1,4,5,1,1,5,6,1,1,6,7,1,1,7,8,6,6,2,3,5,6,7,8,3,1,1,3,10,1,1,2,5,5,4,8,10,
-4,3,8,3,61,2,16,55,2,1,0,50,1,2,2,4,1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,1,1,7,9,
-6,7,2,3,5,6,7,8,9,3,1,1,2,11,1,2,4,5,5,4,8,11,4,3,8,3,61,2,16,119,2,1,0,114,
-32,3,2,4,5,208,4,52,0,1,2,4,6,1,1,5,7,1,1,6,8,6,4,2,5,7,8,9,1,1,4,10,1,1,3,11,
-1,1,2,12,9,6,13,5,4,7,5,8,5,9,3,10,4,5,11,5,12,6,3,13,6,208,5,10,0,1,1,5,6,138,
-0,3,3,6,1,1,2,2,6,1,1,2,7,1,1,3,8,1,1,4,9,1,1,5,10,1,1,6,11,6,7,2,3,7,8,9,10,
-11,3,13,4,3,6,2,61,2,16,62,2,1,0,57,1,1,3,4,1,1,4,5,1,1,5,6,1,1,6,7,1,1,7,8,
-134,7,2,4,4,5,6,7,8,9,208,3,18,0,1,2,2,10,1,1,2,11,134,4,2,3,11,9,3,3,10,2,13,
-3,3,9,1,61,2,16,98,2,1,0,93,208,3,47,0,1,2,4,4,1,1,6,5,1,1,7,6,6,4,2,5,5,6,7,
-1,1,5,8,1,1,4,5,1,1,3,6,9,4,11,5,7,12,3,7,5,8,4,12,3,3,11,5,1,2,2,4,1,1,2,5,
-1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,134,8,2,3,5,6,7,8,9,10,3,3,4,1,61,2,
-16,129,100,2,1,0,223,208,3,42,0,1,2,12,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,
-6,9,1,1,7,10,134,8,2,13,5,6,7,8,9,10,3,3,4,1,1,1,3,4,105,4,5,32,5,2,6,7,32,7,
-2,8,9,10,0,10,47,9,10,11,1,2,2,12,8,11,12,101,0,1,2,5,13,8,11,13,45,0,1,2,8,
-14,1,1,4,15,1,1,5,16,1,1,6,17,1,1,7,18,134,8,2,9,8,4,15,16,17,18,3,1,2,10,4,
-1,2,11,5,9,9,6,3,14,4,32,9,3,14,15,16,1,2,3,17,1,1,5,18,1,1,4,19,1,1,6,20,1,
-1,7,21,134,8,2,6,15,18,4,19,20,21,3,1,2,7,5,9,8,4,3,17,3,32,9,2,13,14,1,2,3,
-15,1,1,4,16,1,1,5,17,1,1,6,18,1,1,7,19,6,7,2,4,4,16,17,18,19,3,5,8,4,12,5,3,
-15,3,61,2,16,57,2,1,0,52,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,
-7,10,134,8,2,3,5,6,7,8,9,10,11,5,4,8,5,4,5,3,5,11,3,3,8,3,61,2,16,55,2,5,0,50,
-80,6,16,0,1,1,4,8,198,7,5,6,5,4,3,7,3,3,8,1,198,7,3,6,5,4,3,7,8,80,4,5,0,205,
-3,3,8,1,1,1,2,9,5,5,4,8,3,3,9,2,61,2,16,22,2,1,0,17,1,1,2,4,77,5,9,4,9,5,5,4,
-5,6,3,9,4,61,2,16,27,25,1,0,22,198,3,3,3,5,80,4,6,0,105,4,3,3,5,1,1,1,2,3,3,
-5,1,61,2,16,27,2,1,0,22,1,2,2,4,1,1,2,5,10,0,6,9,4,7,5,5,3,6,4,3,7,2,61,2,16,
-3,0,3,50,2,16,3,0,3,49,2,16,3,0,3,48,2,16,3,0,3,47,2,16,3,0,3,46,2,16,3,0,3,
-45,2,16,3,0,3,44,2,16,3,0,3,43,2,16,3,0,3,42,2,16,3,0,3,41,2,16,3,0,3,40,2,16,
-3,0,3,39,2,16,3,0,3,38,2,16,3,0,3,37,2,16,3,0,3,36,2,16,3,0,3,35,2,16,3,0,3,
-34,2,16,3,0,3,33,2,16,3,0,3,32,2,16,3,0,3,31,2,16,3,0,3,30,2,16,3,0,3,29,2,16,
-3,0,3,28,2,16,3,0,3,27,2,16,3,0,3,26,2,16,3,0,3,25,2,16,3,0,3,24,2,16,3,0,3,
-23,2,16,3,0,3,22,2,16,3,0,3,21,2,16,3,0,3,20,2,16,3,0,3,19,2,16,3,0,3,18,2,16,
-3,0,3,17,2,16,3,0,3,16,2,16,3,0,3,15,2,16,3,0,3,14,2,16,3,0,3,13,2,16,3,0,3,
-12,2,16,3,0,3,11,2,16,3,0,3,10,2,16,3,0,3,9,2,16,3,0,3,8,2,16,3,0,3,7,2,16,3,
-0,3,6,2,16,3,0,3,5,2,16,3,0,3,4,2,16,3,0,3,3,2,16,3,0,3,2,2,16,3,0,3,1,2,16,
-3,0,3,0,2,16,3,0,2,255,2,16,3,0,2,254,2,16,3,0,2,253,2,16,3,0,2,252,2,16,3,0,
-2,251,2,16,3,0,2,250,2,16,3,0,2,249,2,16,3,0,2,248,2,16,3,0,2,247,2,16,3,0,2,
-246,2,16,3,0,2,245,2,16,3,0,2,244,2,16,3,0,2,243,2,16,3,0,2,242,2,16,3,0,2,241,
-2,16,3,0,2,240,2,16,3,0,2,239,2,16,3,0,2,238,2,16,3,0,2,237,2,16,3,0,2,236,2,
-16,3,0,2,235,2,16,3,0,2,234,2,16,3,0,2,233,2,16,3,0,2,232,2,16,3,0,2,231,2,16,
-3,0,2,230,2,16,3,0,2,229,2,16,3,0,2,228,2,16,3,0,2,227,2,16,3,0,2,226,2,16,3,
-0,2,225,2,16,3,0,2,224,2,16,3,0,2,223,2,16,3,0,2,222,2,16,3,0,2,221,2,16,3,0,
-2,220,2,16,3,0,2,219,2,16,3,0,2,218,2,16,3,0,2,217,2,16,3,0,2,216,2,16,3,0,2,
-215,2,16,3,0,2,214,2,16,3,0,2,213,2,16,3,0,2,212,2,16,3,0,2,211,2,16,3,0,2,210,
-2,16,3,0,2,209,2,16,3,0,2,208,2,16,3,0,2,207,2,16,27,2,1,0,22,1,2,2,4,1,1,2,
-5,138,20,6,9,4,7,5,5,3,6,4,3,7,2,61,2,16,25,2,4,0,20,1,1,2,7,198,3,3,3,3,1,1,
-4,4,1,1,5,5,3,7,3,61,2,16,3,0,2,206,2,16,3,0,2,205,2,16,3,0,2,204,2,16,19,2,
-1,0,14,1,1,2,4,141,5,5,4,7,5,4,3,7,2,61,2,16,3,0,2,203,2,16,3,0,2,202,2,16,3,
-0,2,201,2,16,43,2,1,0,38,1,2,2,4,1,1,4,5,6,3,2,3,5,6,1,1,3,7,1,1,2,5,9,4,9,5,
-6,10,3,6,5,7,4,10,3,3,9,4,61,2,16,37,2,1,0,32,1,1,2,4,1,1,4,5,1,1,5,6,6,4,2,
-2,5,6,7,23,2,1,4,7,4,1,1,3,9,3,9,2,61,2,16,129,13,2,1,0,136,208,3,40,0,1,2,7,
-4,1,1,4,5,1,1,5,6,1,1,6,7,134,5,2,8,5,6,7,3,1,1,2,9,1,1,3,5,5,4,11,9,4,3,11,
-3,1,1,3,4,208,4,44,0,1,2,5,5,1,1,4,6,1,1,6,7,1,1,2,8,134,6,2,6,6,7,8,4,3,1,1,
-5,4,1,2,4,11,9,5,12,5,6,5,11,6,3,12,4,1,2,2,5,1,1,4,6,1,1,5,7,1,1,6,8,134,5,
-2,3,6,7,8,3,1,1,2,4,1,2,4,11,5,5,8,11,5,3,8,3,61,2,16,22,2,4,0,17,1,1,2,7,198,
-6,3,6,5,4,3,3,205,6,3,7,4,61,2,16,121,2,2,0,116,208,4,58,0,1,1,2,5,51,4,5,6,
-1,1,3,7,169,7,8,1,1,8,9,1,1,7,10,1,1,6,11,1,1,5,12,1,1,4,13,5,6,4,3,6,5,8,7,
-10,3,5,9,10,11,5,5,12,8,13,9,3,10,8,1,1,3,5,169,5,6,1,1,8,7,1,1,7,8,1,1,2,9,
-1,1,6,10,1,1,5,11,1,1,4,12,5,10,5,7,10,5,6,7,3,6,5,8,3,9,4,5,11,8,12,9,3,10,
-8,61,2,16,51,2,8,0,46,80,7,29,0,105,7,11,1,1,2,12,70,9,3,4,7,9,8,5,3,10,3,9,
-6,4,5,8,6,11,5,3,12,4,5,6,7,5,6,5,4,5,9,4,3,4,5,61,2,16,35,2,1,0,30,1,2,2,4,
-1,1,3,5,1,1,2,6,77,7,9,4,9,5,3,4,5,3,5,6,5,7,6,3,9,4,61,2,16,37,2,1,0,32,1,1,
-5,4,1,1,4,5,1,1,3,6,1,1,2,7,9,5,10,5,6,5,7,6,5,3,7,10,3,3,4,5,61,2,16,56,2,1,
-0,51,1,2,2,4,1,1,7,5,1,1,6,6,1,1,5,7,1,1,4,8,1,1,3,9,1,1,2,10,5,4,12,6,4,5,3,
-6,5,3,5,7,5,8,7,5,9,8,10,9,3,12,7,61,2,16,3,0,2,200,2,16,70,2,1,0,65,1,2,2,4,
-1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,1,1,7,9,1,1,8,10,1,1,9,11,134,9,2,3,5,6,7,8,
-9,10,11,12,1,1,2,13,1,2,4,5,5,4,9,3,6,5,12,3,13,4,3,9,4,61,2,16,28,2,7,0,23,
-1,1,2,10,198,9,3,6,7,9,8,5,4,3,3,5,6,4,7,5,3,10,3,61,2,16,46,2,4,0,41,80,4,35,
-0,105,4,7,10,0,8,47,7,8,9,8,9,5,15,0,105,4,10,169,4,4,70,4,2,10,3,3,3,6,4,169,
-4,10,24,10,24,4,61,2,16,59,2,1,0,54,1,2,2,4,1,1,7,5,1,1,6,6,1,1,5,7,1,1,4,8,
-1,1,3,9,1,1,2,10,9,4,12,5,5,13,3,5,5,6,4,7,6,5,8,7,9,8,5,10,9,13,3,3,12,7,61,
-2,16,55,2,1,0,50,1,2,2,4,1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,1,1,7,9,134,8,2,3,5,
-6,7,8,3,9,3,1,1,2,11,9,4,8,5,7,5,11,4,3,8,3,61,2,16,30,2,7,0,25,1,1,2,10,198,
-8,3,6,9,8,4,7,3,3,9,5,8,5,4,5,8,4,3,10,3,61,2,16,20,2,2,0,15,1,1,2,5,51,5,4,
-4,1,1,3,7,3,7,2,61,2,16,57,2,4,0,52,80,4,38,0,105,4,7,10,0,8,47,7,8,9,8,5,9,
-12,0,169,4,4,70,4,2,7,3,3,3,6,4,169,4,4,5,3,8,7,3,3,8,2,205,7,5,3,8,7,3,3,8,
-2,61,2,16,26,2,9,0,21,23,2,1,4,5,12,51,12,9,6,9,8,5,5,10,7,11,4,3,4,5,61,2,16,
-45,2,9,0,40,1,1,3,12,23,2,3,12,5,6,7,13,23,2,1,4,13,14,1,1,2,15,5,4,7,8,4,5,
-9,5,10,6,5,11,9,14,8,3,15,7,61,2,16,75,2,1,0,70,1,2,3,4,1,1,4,5,1,1,3,6,1,1,
-2,7,23,2,3,4,5,6,7,8,1,1,6,9,23,2,1,9,8,10,1,2,2,11,1,1,9,12,1,1,8,4,1,1,7,5,
-1,1,5,15,9,3,6,5,9,7,10,8,5,12,3,15,9,3,11,7,61,2,16,34,2,9,0,29,1,1,2,12,198,
-10,3,7,6,5,11,4,9,8,3,3,1,1,4,5,138,62,6,9,10,4,3,12,4,61,2,16,42,2,9,0,37,23,
-2,1,6,7,12,70,4,2,6,5,13,23,2,1,4,13,14,51,14,8,15,51,12,15,5,9,9,6,5,10,7,11,
-4,3,4,5,61,2,16,55,2,1,0,50,1,2,2,4,1,1,4,5,1,1,5,6,1,1,6,7,1,1,7,8,6,6,2,3,
-5,6,7,8,9,1,1,3,10,1,1,2,5,5,4,12,3,6,5,9,3,10,4,3,12,4,61,2,16,21,2,1,0,16,
-1,1,2,4,1,2,2,5,5,4,7,5,4,3,7,2,61,2,16,80,2,1,0,75,1,1,4,4,1,1,9,5,134,3,2,
-5,5,6,23,2,1,4,6,7,1,1,2,8,51,7,8,9,1,2,2,10,1,1,5,11,1,1,6,12,1,1,7,13,1,1,
-8,14,134,8,2,3,4,11,12,9,13,14,15,1,2,4,4,1,1,3,6,5,3,5,15,3,3,10,4,61,2,16,
-33,2,9,0,28,1,1,2,12,198,10,3,8,6,4,10,9,3,11,5,3,1,1,4,6,5,4,5,10,4,3,12,4,
-61,2,16,43,2,1,0,38,1,1,4,4,6,4,2,3,3,4,5,1,1,3,6,80,6,5,0,205,3,3,5,1,1,2,2,
-7,1,1,2,4,9,5,3,3,7,2,61,2,16,33,2,9,0,28,198,5,2,9,8,5,12,23,2,1,4,12,13,51,
-13,8,5,9,9,6,5,10,7,11,4,3,4,5,61,2,16,53,2,1,0,48,1,1,2,4,1,1,8,5,6,4,2,2,3,
-5,6,23,2,1,4,6,7,1,1,3,8,51,7,8,5,1,1,7,4,1,1,6,3,1,1,5,6,1,1,4,7,3,4,5,61,2,
-16,67,2,1,0,62,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,1,
-8,11,1,1,9,12,134,10,2,3,5,6,7,8,9,10,11,12,13,5,4,8,3,4,5,9,5,13,3,3,8,3,61,
-2,16,65,2,1,0,60,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,
-1,8,11,134,10,2,3,3,5,6,7,8,9,10,11,3,1,2,4,13,10,0,5,5,4,8,13,4,3,8,3,61,2,
-16,62,2,1,0,57,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,1,
-8,11,134,9,2,3,5,6,7,8,9,10,11,12,5,4,8,3,4,5,6,5,12,3,3,8,3,61,2,16,30,2,9,
-0,25,1,1,2,12,198,9,3,4,8,10,9,3,11,5,3,1,1,4,4,10,0,5,3,12,3,61,2,16,79,2,2,
-0,74,208,4,38,0,1,1,2,5,105,5,6,169,5,7,51,4,7,8,51,6,8,5,1,1,5,4,1,1,4,11,1,
-1,3,6,5,3,7,11,3,3,4,5,1,1,5,5,1,1,4,6,1,1,2,7,1,1,3,8,9,5,4,5,7,5,3,7,5,6,3,
-8,6,3,4,5,61,2,16,49,2,9,0,44,198,3,4,5,12,23,2,1,4,12,13,51,13,8,14,23,2,1,
-4,7,15,1,1,2,16,70,6,3,14,9,3,11,3,9,6,5,5,10,4,15,6,3,16,4,61,2,16,54,2,1,0,
-49,1,1,2,4,51,4,3,5,1,2,2,6,1,1,3,7,1,1,4,4,1,1,5,9,6,6,2,3,7,4,5,9,3,1,2,4,
-5,1,2,5,12,5,6,9,12,6,3,9,4,61,2,16,31,2,9,0,26,23,2,1,4,5,12,1,1,2,13,198,6,
-3,12,11,10,3,3,5,8,4,9,5,3,13,3,61,2,16,18,2,9,0,13,77,12,9,6,5,5,11,4,12,6,
-3,4,5,61,2,16,42,2,9,0,37,70,3,5,5,12,23,2,1,4,12,13,51,13,8,14,1,1,2,15,70,
-6,3,9,14,3,11,3,1,1,4,5,9,10,4,3,15,4,61,2,16,67,2,1,0,62,1,2,2,4,1,1,2,5,1,
-1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,1,8,11,1,1,9,12,134,10,2,3,5,6,7,8,
-9,10,11,12,13,205,5,9,4,8,5,3,4,13,3,3,8,3,61,2,16,33,2,9,0,28,1,1,2,12,198,
-10,3,7,8,4,10,9,3,11,5,3,1,1,4,6,5,4,5,10,4,3,12,4,61,2,16,74,2,1,0,69,1,2,3,
-4,1,2,4,5,1,1,3,6,1,1,2,7,23,2,3,4,5,6,7,8,1,1,5,9,23,2,1,9,8,10,1,2,2,11,1,
-1,9,3,1,1,8,4,1,1,7,5,1,1,6,6,1,1,4,16,9,9,7,5,10,8,16,9,3,11,7,61,2,16,28,2,
-9,0,23,1,1,2,12,198,10,3,7,6,11,4,10,9,8,3,3,1,1,4,4,3,12,2,61,2,16,26,2,1,0,
-21,1,2,2,4,1,1,2,5,23,2,1,4,5,4,1,1,3,7,3,7,2,61,2,16,54,2,9,0,49,198,4,4,6,
-5,12,23,2,1,4,12,13,51,13,8,5,1,1,3,15,23,2,1,15,4,16,23,2,1,6,16,8,1,1,2,18,
-5,6,4,9,6,5,10,7,11,9,3,18,7,61,2,16,48,2,2,0,43,1,1,2,5,1,1,7,6,134,3,2,2,6,
-7,23,2,1,5,7,8,1,1,3,9,51,8,9,5,1,1,6,4,1,1,5,6,1,1,4,7,3,4,5,61,2,16,42,2,9,
-0,37,198,8,3,4,8,10,9,11,5,12,70,4,2,12,5,13,23,2,1,4,13,14,51,14,8,5,9,9,6,
-5,10,7,11,4,3,4,5,61,2,16,47,2,2,0,42,1,1,2,5,1,1,6,6,6,4,2,2,3,6,7,23,2,1,5,
-7,8,51,8,4,4,1,1,5,10,1,1,4,3,77,5,1,1,3,6,3,10,4,61,2,16,58,2,9,0,53,208,6,
-22,0,1,1,3,12,198,8,4,7,4,10,3,11,5,3,5,8,4,9,5,3,12,3,198,3,2,5,12,23,2,1,4,
-12,13,51,7,8,14,51,13,14,4,5,9,5,10,6,3,11,4,61,2,16,24,2,1,0,19,1,1,3,4,1,1,
-2,5,51,4,5,4,1,1,4,7,3,7,2,61,2,16,54,2,1,0,49,1,1,7,4,1,1,8,5,6,5,2,2,3,4,5,
-6,23,2,1,4,6,7,1,1,2,8,51,7,8,5,1,1,6,4,1,1,5,3,1,1,4,6,1,1,3,7,3,4,5,61,2,16,
-69,2,1,0,64,1,2,2,4,1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,1,1,7,9,1,1,8,10,1,1,9,11,
-134,9,2,3,5,6,7,8,9,10,11,12,1,1,2,13,9,4,9,5,3,5,7,6,5,12,3,13,4,3,9,4,61,2,
-16,18,2,3,0,13,10,0,6,47,5,6,7,51,7,4,8,24,8,61,2,16,35,2,9,0,30,1,1,4,12,1,
-1,2,13,198,10,3,12,8,10,9,3,11,4,5,3,77,5,5,8,6,12,4,3,13,4,61,2,16,43,2,9,0,
-38,70,4,5,6,5,12,23,2,1,4,12,13,51,13,8,14,1,1,2,15,70,6,3,9,14,3,11,3,1,1,4,
-5,9,10,4,3,15,4,61,2,16,31,2,9,0,26,198,3,2,5,12,23,2,1,4,12,13,51,13,8,5,9,
-9,6,5,10,7,11,4,3,4,5,61,2,16,70,2,1,0,65,1,1,2,4,1,1,8,5,6,4,2,5,3,5,6,23,2,
-1,4,6,7,1,1,3,8,51,7,8,9,1,2,2,10,1,1,5,11,1,1,6,12,1,1,7,13,6,6,2,3,11,9,12,
-13,3,1,1,4,4,1,2,4,5,3,10,3,61,2,16,61,2,1,0,56,1,2,2,4,1,1,3,5,1,1,4,6,1,1,
-5,7,1,1,6,8,1,1,7,9,1,1,8,10,134,9,2,3,5,6,7,8,9,3,10,3,1,1,2,12,1,2,4,5,5,4,
-8,12,4,3,8,3,61,2,16,62,2,1,0,57,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,
-6,9,1,1,7,10,134,9,2,3,3,5,6,7,8,9,10,11,1,2,4,5,205,6,9,4,9,5,3,4,11,3,3,9,
-4,61,2,16,31,2,9,0,26,1,1,2,12,198,8,3,4,8,10,9,3,5,3,1,1,4,5,205,6,9,10,4,3,
-12,4,61,2,16,33,2,9,0,28,23,2,2,5,6,7,12,23,2,1,4,12,13,51,13,8,5,9,9,6,5,10,
-7,11,4,3,4,5,61,2,16,79,2,1,0,74,1,1,2,4,1,1,8,5,1,1,9,6,6,4,2,5,5,6,7,23,2,
-1,4,7,8,1,1,3,9,51,8,9,10,1,2,2,11,1,1,5,12,1,1,6,13,1,1,7,14,6,6,2,3,12,10,
-13,14,15,1,1,4,4,1,2,4,5,5,3,6,15,3,3,11,4,61,2,16,85,2,1,0,80,1,1,4,4,1,1,5,
-5,1,1,6,6,1,1,7,7,1,1,8,8,1,1,9,9,1,1,10,10,1,1,11,11,134,10,2,3,4,5,6,7,8,9,
-10,11,12,208,3,7,0,1,1,3,3,3,12,1,1,1,2,13,51,4,13,6,1,2,2,15,1,1,3,4,5,10,5,
-12,3,3,15,4,61,2,16,73,2,1,0,68,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,
-6,9,1,1,7,10,1,1,8,11,1,1,9,12,1,1,10,13,134,12,2,3,3,5,6,7,8,9,10,11,12,13,
-14,5,4,8,3,5,5,6,4,14,3,3,8,3,61,2,16,70,2,1,0,65,1,2,2,4,1,1,2,5,1,1,3,6,1,
-1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,1,8,11,1,1,9,12,134,11,2,3,3,5,6,7,8,9,10,11,
-12,13,77,6,5,4,9,3,4,5,11,5,13,3,3,9,4,61,2,16,26,2,2,0,21,1,1,2,5,1,1,3,6,13,
-7,9,5,9,5,6,5,7,6,3,9,4,61,2,16,51,2,1,0,46,208,3,31,0,1,1,2,4,10,0,5,47,4,5,
-6,1,1,5,7,1,1,4,3,1,1,3,5,5,6,4,7,6,3,6,4,1,1,4,4,1,1,3,3,3,4,1,61,2,16,57,2,
-1,0,52,208,3,11,0,1,1,4,4,1,1,2,3,3,4,1,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,
-5,8,6,6,2,3,5,6,7,8,3,5,4,7,5,4,3,7,2,61,2,16,12,2,1,0,7,1,1,2,4,3,4,1,61,2,
-16,43,2,1,0,38,1,2,2,4,1,1,3,5,6,3,2,3,5,6,1,1,2,7,1,2,4,5,9,4,9,5,6,10,3,6,
-5,7,4,10,3,3,9,4,61,2,16,45,2,1,0,40,1,2,2,4,1,1,4,5,1,1,5,6,134,4,2,3,5,6,7,
-1,1,3,8,1,1,2,5,5,4,10,3,6,5,7,3,8,4,3,10,4,61,2,16,48,2,1,0,43,1,2,2,4,1,1,
-2,5,1,1,3,6,1,1,4,7,1,1,5,8,134,6,2,3,5,6,7,8,9,10,0,5,9,4,8,5,3,4,9,3,3,8,3,
-61,2,16,43,2,1,0,38,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,134,6,2,3,5,3,6,7,8,13,6,
-9,4,10,5,3,4,8,3,3,10,4,61,2,16,44,2,1,0,39,1,2,2,4,1,1,2,5,1,1,3,6,134,5,2,
-3,3,5,6,7,1,2,4,8,205,6,5,4,10,5,4,5,7,3,8,5,3,10,4,61,2,16,44,2,1,0,39,1,1,
-2,4,47,4,3,5,1,2,2,6,1,1,3,7,1,1,4,8,134,4,2,3,7,8,3,1,2,4,10,5,5,4,10,5,3,6,
-3,61,2,16,52,2,1,0,47,208,3,32,0,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,134,5,2,3,5,
-6,7,3,5,4,7,5,4,3,7,2,1,1,4,4,1,1,3,3,3,4,1,61,2,16,55,2,1,0,50,1,2,2,4,1,1,
-3,5,1,1,4,6,1,1,5,7,1,1,6,8,6,6,2,3,5,6,7,8,9,1,1,2,10,1,2,4,5,5,4,12,3,6,5,
-9,3,10,4,3,12,4,61,2,16,110,2,4,0,105,10,0,7,8,3,7,60,0,1,2,2,8,47,8,3,9,1,1,
-7,10,1,1,6,11,1,1,5,12,1,1,4,13,1,1,3,14,1,1,2,15,5,9,16,6,7,5,5,6,4,5,5,10,
-3,11,4,5,12,8,13,9,5,14,10,15,11,3,16,9,1,1,6,8,23,2,1,8,4,9,1,1,4,10,51,9,10,
-6,1,1,2,4,1,1,7,3,1,1,5,5,1,1,3,7,3,4,5,61,2,16,54,2,1,0,49,1,2,2,4,1,1,3,5,
-1,1,4,6,1,1,5,7,1,1,6,8,1,1,7,9,134,8,2,3,5,3,6,7,8,9,3,1,1,2,11,13,5,5,4,8,
-11,4,3,8,3,61,2,16,65,2,5,0,60,80,5,32,0,32,5,2,8,9,32,8,2,10,11,1,1,3,12,198,
-8,4,11,4,6,9,10,3,3,5,7,4,11,5,3,12,3,80,6,10,0,77,8,5,6,5,8,6,3,4,5,1,1,2,8,
-9,7,4,3,8,2,61,2,16,67,2,5,0,62,80,5,34,0,32,5,2,8,9,32,8,2,10,11,1,1,3,12,198,
-8,4,4,7,6,9,10,3,3,1,1,5,5,9,11,4,3,12,3,80,6,10,0,77,8,5,6,5,8,6,3,4,5,1,1,
-2,8,9,7,4,3,8,2,61,2,16,35,2,1,0,30,1,2,2,4,1,1,3,5,1,1,2,6,77,7,9,5,10,5,6,
-5,7,6,5,3,7,10,3,3,4,5,61,2,16,3,0,2,199,2,16,3,0,2,198,2,16,3,0,2,197,2,16,
-3,0,2,196,2,16,31,2,1,0,26,1,1,3,4,1,1,4,5,134,3,2,2,5,3,1,1,2,7,5,4,8,7,4,3,
-8,2,61,2,16,28,2,1,0,23,1,2,2,4,1,1,2,5,1,1,3,6,134,5,2,3,5,6,3,3,3,4,1,61,2,
-16,67,2,2,0,62,1,2,3,5,1,1,2,6,134,4,2,7,4,6,7,23,2,1,5,7,8,77,9,51,8,9,4,1,
-2,5,11,1,2,6,12,51,11,12,13,1,2,4,14,51,5,14,15,51,15,9,16,51,13,16,5,1,2,2,
-18,3,18,3,61,2,16,3,0,2,195,2,16,3,0,2,194,2,16,3,0,2,193,2,16,3,0,2,192,2,16,
-3,0,2,191,2,16,3,0,2,190,2,16,3,0,2,189,2,16,3,0,2,188,2,16,3,0,2,187,2,16,3,
-0,2,186,2,16,3,0,2,185,2,16,3,0,2,184,2,16,3,0,2,183,2,16,3,0,2,182,2,16,3,0,
-2,181,2,16,3,0,2,180,2,16,3,0,2,179,2,16,3,0,2,178,2,16,3,0,2,177,2,16,3,0,2,
-176,2,16,3,0,2,175,2,16,3,0,2,174,2,16,3,0,2,173,2,16,3,0,2,172,2,16,3,0,2,171,
-2,16,3,0,2,170,2,16,3,0,2,169,2,16,3,0,2,168,2,16,3,0,2,167,2,16,3,0,2,166,2,
-16,3,0,2,165,2,16,3,0,2,164,2,16,3,0,2,163,2,16,3,0,2,162,2,16,3,0,2,161,2,16,
-3,0,2,160,2,16,3,0,2,159,2,16,3,0,2,158,2,16,3,0,2,157,2,16,3,0,2,156,2,16,3,
-0,2,155,2,16,3,0,2,154,2,16,3,0,2,153,2,16,3,0,2,152,2,16,3,0,2,151,2,16,3,0,
-2,150,2,16,3,0,2,149,2,16,3,0,2,148,2,16,3,0,2,147,2,16,3,0,2,146,2,16,3,0,2,
-145,2,16,3,0,2,144,2,16,3,0,2,143,2,16,3,0,2,142,2,16,3,0,2,141,2,16,3,0,2,140,
-2,16,3,0,2,139,2,16,3,0,2,138,2,16,3,0,2,137,2,16,3,0,2,136,2,16,3,0,2,135,2,
-16,3,0,2,134,2,16,3,0,2,133,2,16,3,0,2,132,2,16,3,0,2,131,2,16,3,0,2,130,2,16,
-3,0,2,129,2,16,3,0,2,128,2,16,3,0,2,127,2,16,3,0,2,126,2,16,3,0,2,125,2,16,3,
-0,2,124,2,16,3,0,2,123,2,16,3,0,2,122,2,16,3,0,2,121,2,16,3,0,2,120,2,16,3,0,
-2,119,2,16,3,0,2,118,2,16,3,0,2,117,2,16,3,0,2,116,2,16,3,0,2,115,2,16,3,0,2,
-114,2,16,3,0,2,113,2,16,3,0,2,112,2,16,3,0,2,111,2,16,3,0,2,110,2,16,3,0,2,109,
-2,16,3,0,2,108,2,16,3,0,2,107,2,16,3,0,2,106,2,16,3,0,2,105,2,16,3,0,2,104,2,
-16,3,0,2,103,2,16,3,0,2,102,2,16,49,2,2,0,44,1,1,2,5,1,1,7,6,6,4,2,2,4,6,7,23,
-2,1,5,7,8,1,1,3,9,51,8,9,5,1,1,6,4,1,1,5,6,1,1,4,7,3,4,5,61,2,16,23,2,9,0,18,
-198,8,2,4,8,10,9,11,5,4,5,3,7,6,3,3,7,2,61,2,16,3,0,2,101,2,16,3,0,2,100,2,16,
-3,0,2,99,2,16,3,0,2,98,2,16,3,0,2,97,2,16,3,0,2,96,2,16,3,0,2,95,2,16,3,0,2,
-94,2,16,3,0,2,93,2,16,3,0,2,92,2,16,3,0,2,91,2,16,3,0,2,90,2,16,3,0,2,89,2,16,
-3,0,2,88,2,16,3,0,2,87,2,16,3,0,2,86,2,16,3,0,2,85,2,16,3,0,2,84,2,16,3,0,2,
-83,2,16,3,0,2,82,2,16,3,0,2,81,2,16,3,0,2,80,2,16,3,0,2,79,2,16,3,0,2,78,2,16,
-3,0,2,77,2,16,3,0,2,76,2,16,3,0,2,75,2,16,32,2,3,0,27,1,1,2,6,198,4,3,5,3,7,
-1,1,4,5,205,9,9,6,10,5,7,3,9,6,3,10,4,61,2,16,116,2,1,0,111,80,3,62,0,1,2,4,
-4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,1,1,6,9,1,1,7,10,1,1,8,11,134,10,2,5,5,6,7,
-8,3,9,10,11,3,1,2,6,13,205,6,9,4,9,5,5,4,13,5,3,9,4,1,2,2,4,1,1,6,5,1,1,7,6,
-1,1,8,7,1,1,4,8,6,6,2,3,5,6,7,8,3,1,1,2,10,1,1,3,5,5,4,8,10,4,3,8,3,61,2,16,
-33,2,9,0,28,1,1,2,12,198,10,3,4,8,10,9,3,11,6,5,3,1,1,4,5,205,6,9,10,4,3,12,
-4,61,2,16,49,2,9,0,44,1,1,6,12,198,3,5,5,13,23,2,1,4,13,14,51,14,8,15,1,1,2,
-16,198,7,3,10,9,15,3,12,3,205,4,1,1,4,5,9,11,6,3,16,4,61,2,16,3,0,2,74,2,16,
-3,0,2,73,2,16,3,0,2,72,2,16,3,0,2,71,2,16,3,0,2,70,2,16,59,2,1,0,54,1,2,2,4,
-1,1,5,5,1,1,6,6,1,1,7,7,1,1,8,8,134,6,2,3,5,6,7,8,9,1,1,4,10,1,1,3,5,1,1,2,6,
-5,4,13,3,7,5,9,3,10,4,3,13,5,61,2,16,3,0,2,69,2,16,53,2,5,0,48,1,2,2,8,1,1,5,
-9,1,1,6,10,1,1,7,11,134,9,2,3,9,10,11,7,6,5,3,3,1,1,4,13,1,1,3,5,1,1,2,6,5,4,
-7,13,4,3,8,5,61,2,16,47,2,5,0,42,1,1,2,8,1,1,3,9,1,1,4,10,134,8,2,2,8,9,10,7,
-6,5,11,134,8,2,3,8,9,10,7,6,5,5,5,4,8,11,4,3,8,3,61,2,16,93,2,1,0,88,208,3,43,
-0,1,1,2,4,1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,134,5,2,4,6,7,8,9,205,10,5,4,8,5,3,
-5,9,4,10,5,3,8,3,1,2,2,4,1,1,4,5,1,1,5,6,1,1,6,7,1,1,3,8,134,6,2,3,5,6,7,8,3,
-1,1,2,10,5,4,7,10,4,3,7,2,61,2,16,92,2,1,0,87,208,3,41,0,1,2,4,4,1,1,3,5,1,1,
-4,6,1,1,5,7,1,1,6,8,134,6,2,5,5,6,7,8,3,1,1,2,10,5,4,7,10,4,3,7,2,1,2,2,4,1,
-1,3,5,1,1,6,6,1,1,4,7,1,1,5,8,1,1,2,9,134,7,2,3,5,6,7,8,9,3,5,4,7,5,4,3,7,2,
-61,2,16,21,2,5,0,16,1,1,2,8,198,7,3,4,7,6,5,3,3,3,8,2,61,2,16,72,2,1,0,67,1,
-2,2,4,1,1,5,5,1,1,6,6,1,1,7,7,1,1,8,8,1,1,9,9,1,1,10,10,1,1,11,11,134,9,2,3,
-5,6,7,8,9,10,11,12,1,1,4,5,1,1,3,6,1,1,2,7,9,4,10,5,3,4,12,3,3,10,5,61,2,16,
-51,2,5,0,46,1,2,2,8,1,1,3,9,1,1,4,10,1,1,5,11,1,1,6,12,1,1,7,13,134,12,2,3,4,
-9,10,11,12,13,7,6,5,3,3,1,1,2,4,3,8,2,61,2,16,45,2,5,0,40,1,1,2,8,1,1,3,9,1,
-1,4,10,134,8,2,2,4,6,5,8,9,10,11,134,8,2,3,4,6,5,8,9,10,5,9,11,4,3,7,3,61,2,
-16,92,2,1,0,87,208,3,41,0,1,2,4,4,1,1,3,5,1,1,4,6,1,1,5,7,1,1,6,8,134,6,2,5,
-5,6,7,8,3,1,1,2,10,5,4,7,10,4,3,7,2,1,2,2,4,1,1,5,5,1,1,6,6,1,1,2,7,1,1,3,8,
-1,1,4,9,134,7,2,3,5,6,7,8,9,3,5,4,7,5,4,3,7,2,61,2,16,24,2,5,0,19,1,1,2,8,198,
-7,3,7,6,5,4,3,3,9,7,4,3,8,2,61,2,16,7,2,5,0,2,24,4,61,2,16,24,2,2,0,19,1,1,2,
-5,1,1,3,6,9,4,8,5,5,4,6,5,3,8,3,61,2,16,7,2,5,0,2,24,7,61,2,16,13,2,3,0,8,5,
-4,8,5,4,3,8,3,61,2,16,37,2,5,0,32,1,2,2,8,1,1,3,9,1,1,4,10,1,1,5,11,134,6,2,
-3,9,10,11,3,3,1,1,2,4,3,8,5,61,2,16,52,2,5,0,47,1,2,2,8,1,1,6,9,1,1,7,10,1,1,
-8,11,134,9,2,3,7,6,5,9,10,11,3,3,1,1,5,4,1,1,4,5,1,1,3,6,1,1,2,7,3,8,5,61,2,
-16,3,0,2,68,2,16,43,2,1,0,38,1,2,2,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,134,7,2,
-3,3,5,6,7,8,3,5,4,7,8,4,3,7,2,61,2,16,33,2,5,0,28,1,1,3,8,134,6,2,2,7,6,5,3,
-3,1,1,2,10,9,4,5,5,8,6,10,4,3,6,4,61,2,16,84,2,1,0,79,208,3,38,0,1,1,3,4,1,1,
-2,5,1,1,4,6,1,1,5,7,134,4,2,4,6,7,8,205,9,5,4,10,5,3,5,8,4,9,5,3,10,3,1,2,2,
-4,1,1,5,5,1,1,2,6,1,1,4,7,1,1,3,8,134,6,2,3,5,6,7,8,3,5,4,8,7,4,3,8,2,61,2,16,
-30,2,5,0,25,1,1,3,8,134,6,2,2,6,5,4,3,3,1,1,2,5,5,7,4,8,6,3,6,4,61,2,16,84,2,
-1,0,79,208,3,37,0,1,2,3,4,1,1,2,5,1,1,3,6,1,1,4,7,1,1,5,8,134,6,2,4,5,6,7,8,
-3,5,4,8,7,4,3,8,2,1,1,4,4,1,1,3,5,1,1,5,6,1,1,2,7,134,4,2,2,6,7,8,205,9,5,4,
-10,5,3,5,8,4,9,5,3,10,3,61,2,16,83,2,1,0,78,208,3,37,0,1,2,2,4,1,1,2,5,1,1,3,
-6,1,1,4,7,1,1,5,8,134,6,2,4,5,6,7,8,3,5,4,7,8,4,3,7,2,1,2,2,4,1,1,3,5,1,1,5,
-6,1,1,4,7,1,1,2,8,134,6,2,3,5,6,7,8,3,5,4,7,6,4,3,7,2,61,2,16,32,2,4,0,27,208,
-4,21,0,208,5,15,0,1,1,2,7,198,6,3,6,3,4,5,3,3,7,2,24,4,24,5,61,2,16,93,2,1,0,
-88,208,3,42,0,1,2,3,4,1,1,6,5,1,1,5,6,1,1,4,7,1,1,3,8,1,1,2,9,5,4,10,5,3,5,6,
-4,7,5,5,8,6,9,7,3,10,5,1,2,2,4,1,1,6,5,1,1,5,6,1,1,4,7,1,1,3,8,1,1,2,9,5,4,10,
-5,3,5,6,4,7,5,5,8,6,9,7,3,10,5,61,2,16,58,2,1,0,53,1,1,3,4,8,3,4,33,0,1,2,2,
-5,1,1,4,6,1,1,5,7,1,1,6,8,1,1,7,9,134,7,2,3,3,6,7,8,9,3,3,5,2,1,1,7,5,1,1,2,
-3,3,5,1,61,2,16,58,2,1,0,53,1,1,3,4,8,3,4,33,0,1,2,2,5,1,1,4,6,1,1,5,7,1,1,6,
-8,1,1,7,9,134,7,2,3,6,7,8,3,9,3,3,5,2,1,1,7,5,1,1,2,3,3,5,1,61,2,16,89,2,5,0,
-84,1,1,3,8,44,8,5,9,208,9,27,0,1,1,2,10,1,1,4,11,134,8,2,4,11,4,7,6,5,3,3,5,
-8,5,10,6,3,6,4,8,8,5,30,0,1,1,2,10,1,1,4,11,134,8,2,3,11,7,6,5,4,3,3,9,7,4,5,
-8,5,10,6,3,6,4,1,2,2,10,9,7,5,3,10,3,61,2,16,25,2,4,0,20,208,4,14,0,1,1,2,7,
-198,5,3,6,5,4,5,3,7,3,24,4,61,2,16,129,51,2,2,0,174,208,3,66,0,1,1,4,5,1,1,9,
-6,6,4,2,7,3,6,7,23,2,1,5,7,8,1,1,3,9,51,8,9,10,1,2,5,11,1,1,6,12,1,1,7,13,1,
-1,8,14,6,6,2,6,12,10,13,14,3,1,1,5,16,5,4,6,16,4,3,11,4,1,1,2,5,208,5,47,0,1,
-1,4,6,1,1,9,7,6,3,2,4,7,8,23,2,1,6,8,9,1,1,3,10,51,9,10,5,1,1,8,4,1,1,7,3,1,
-1,6,6,1,1,5,7,3,4,5,1,2,2,6,1,1,6,7,1,1,3,8,1,1,7,9,1,1,8,10,6,6,2,3,7,8,9,10,
-3,1,1,5,4,1,1,4,5,1,1,9,14,5,6,9,14,6,3,9,4,61,2,16,3,0,2,67,2,16,3,0,2,66,2,
-16,3,0,2,65,2,16,3,0,2,64,2,16,3,0,2,63,2,16,3,0,2,62,2,16,3,0,2,61,2,16,3,0,
-2,60,2,16,30,2,5,0,25,1,1,2,8,205,9,1,1,3,10,134,6,2,2,10,6,5,4,5,9,9,4,3,8,
-3,61,2,16,45,2,5,0,40,1,1,2,8,205,9,1,1,3,10,1,1,4,11,1,1,5,12,1,1,6,13,134,
-9,2,2,10,6,5,4,11,12,13,5,9,9,4,3,8,3,61,2,16,31,2,5,0,26,1,1,2,8,205,9,1,1,
-3,10,134,7,2,2,10,4,7,6,5,5,9,9,4,3,8,3,61,2,16,85,2,1,0,80,208,3,38,0,1,1,3,
-4,1,1,2,5,1,1,4,6,1,1,5,7,134,4,2,3,6,7,8,205,9,5,4,10,5,3,5,8,4,9,5,3,10,3,
-1,1,4,4,1,1,2,5,205,6,1,1,5,7,1,1,3,8,134,4,2,2,7,8,9,5,4,8,5,3,5,6,4,9,5,3,
-8,3,61,2,16,27,2,5,0,22,1,1,2,8,1,1,3,9,134,6,2,2,9,6,5,4,4,205,5,3,8,3,61,2,
-16,42,2,5,0,37,1,1,2,8,1,1,3,9,1,1,4,10,1,1,5,11,1,1,6,12,134,9,2,2,9,6,5,4,
-10,11,12,4,205,5,3,8,3,61,2,16,28,2,5,0,23,1,1,2,8,1,1,3,9,134,7,2,2,9,4,7,6,
-5,4,205,5,3,8,3,61,2,16,85,2,1,0,80,208,3,38,0,1,1,3,4,1,1,2,5,1,1,4,6,1,1,5,
-7,134,4,2,3,6,7,8,205,9,5,4,10,5,3,5,8,4,9,5,3,10,3,1,1,4,4,1,1,2,5,1,1,5,6,
-1,1,3,7,134,4,2,2,6,7,8,205,9,5,4,10,5,3,5,8,4,9,5,3,10,3,61,2,16,3,0,2,59,2,
-3,29,115,116,114,105,110,103,45,108,101,110,103,116,104,58,32,110,111,116,32,
-97,32,115,116,114,105,110,103,58,32,2,3,24,115,116,114,45,105,116,101,114,58,
-32,110,111,116,32,97,32,115,116,114,105,110,103,58,32,2,3,68,105,109,112,108,
-101,109,101,110,116,97,116,105,111,110,32,114,101,115,116,114,105,99,116,105,
-111,110,58,32,97,100,100,32,109,111,114,101,32,118,97,108,117,101,115,32,116,
-111,32,99,111,110,116,105,110,117,97,116,105,111,110,32,104,97,110,100,108,105,
-110,103,2,16,3,0,2,58,2,16,3,0,2,57,2,16,3,0,2,56,2,16,3,0,2,55,2,16,3,0,2,54,
-2,16,3,0,2,53,2,16,3,0,2,52,1,17,3,136,71,7,8,1,17,2,136,71,1,2,16,3,0,2,51,
-1,17,3,136,71,1,136,72,1,17,3,136,71,136,85,1,1,17,3,136,69,4,136,70,1,17,2,
-136,67,1,1,17,2,136,33,136,34,1,17,2,136,45,1,1,17,3,84,85,85,1,17,2,84,1,2,
-3,9,66,97,100,32,109,97,116,104,58,2,3,10,98,97,100,32,109,97,116,104,58,32,
-2,3,12,66,97,100,32,110,117,109,98,101,114,58,32,1,17,3,136,97,0,32,0,25,1,40,
-2,0,0,1,0,13,0,1,40,2,0,0,0,1,1,17,3,135,117,11,6,1,17,4,135,117,135,120,135,
-119,4,1,17,2,136,98,135,117,1,17,2,136,57,135,117,1,17,5,135,117,4,137,70,1,
-136,10,1,17,4,135,117,5,137,72,3,1,17,3,135,114,17,11,1,17,7,135,113,0,0,135,
-255,255,127,8,135,114,9,7,137,48,1,17,2,136,100,1,1,17,3,135,112,11,135,113,
-1,17,2,136,106,1,1,17,5,135,113,13,1,135,115,135,115,1,17,2,136,66,1,1,17,2,
-135,113,135,114,1,17,2,136,68,1,1,17,3,135,114,136,5,18,1,17,3,135,114,2,1,1,
-17,4,135,114,3,135,118,135,118,1,17,2,136,75,1,1,17,3,135,115,22,136,9,1,17,
-3,135,115,2,1,1,17,3,135,115,18,1,1,17,3,135,115,25,24,1,17,2,136,16,136,13,
-1,17,2,136,17,136,14,1,17,2,136,18,136,15,1,17,12,135,118,5,14,3,10,16,2,12,
-1,29,4,28,1,18,2,1,21,1,17,2,136,21,136,18,1,17,2,136,22,136,19,1,17,2,136,23,
-136,20,1,17,12,135,121,19,3,10,21,2,15,17,1,9,34,33,1,18,2,1,26,1,17,2,136,90,
-135,122,1,17,2,137,2,135,122,1,17,2,135,122,2,1,17,5,135,122,36,137,63,2,1,1,
-17,2,135,121,135,122,1,17,2,136,95,1,1,17,2,135,122,1,1,17,2,137,8,135,122,1,
-17,3,136,12,136,31,44,1,17,3,136,13,136,32,45,1,17,3,135,124,4,1,1,17,2,136,
-61,5,1,17,11,135,125,45,137,110,18,136,22,6,4,44,5,2,1,1,17,2,137,14,1,1,17,
-2,135,126,136,23,1,17,2,136,102,1,1,17,2,137,17,135,127,1,17,2,136,43,136,40,
-1,17,3,136,4,2,1,1,17,2,136,69,3,1,17,2,136,46,136,43,1,17,2,136,47,136,44,1,
-17,4,136,4,28,136,32,0,0,135,255,255,127,1,17,12,136,4,56,137,120,8,5,4,59,7,
-3,2,1,0,0,135,255,255,127,1,17,2,137,25,1,1,17,2,136,4,136,5,1,17,2,137,27,1,
-1,17,4,136,1,60,137,119,1,1,17,3,135,127,136,37,136,37,1,17,2,136,116,1,1,17,
-2,135,127,136,42,1,17,2,135,127,136,40,1,17,7,135,127,136,2,33,38,2,136,41,1,
-1,17,2,136,120,1,1,17,2,136,97,35,1,17,3,136,1,6,1,1,17,2,136,1,1,1,17,2,137,
-38,1,1,17,2,136,1,37,1,17,2,137,36,1,1,17,3,136,0,1,136,1,1,17,3,136,0,136,5,
-1,1,17,3,136,0,3,1,1,17,3,136,3,4,136,4,1,17,3,136,3,136,8,1,1,17,3,136,3,6,
-1,1,17,4,136,3,136,10,4,1,1,17,2,136,9,1,1,17,2,136,77,15,1,17,3,136,5,25,1,
-1,17,3,136,5,17,1,1,17,3,136,5,57,1,1,17,3,136,5,53,1,1,17,2,136,5,1,1,17,3,
-136,5,55,1,1,17,3,136,5,56,1,1,17,2,136,5,1,1,17,3,136,5,1,20,1,17,4,136,5,29,
-11,1,1,17,2,137,60,1,1,17,2,136,86,136,83,1,17,2,136,87,136,84,1,17,2,136,88,
-136,85,1,17,2,136,89,136,86,1,17,2,136,90,136,87,1,17,3,136,69,136,88,101,1,
-17,3,136,70,136,89,102,1,17,3,136,71,136,90,103,1,17,13,136,14,101,138,10,9,
-8,39,7,6,5,4,3,2,1,1,17,2,137,70,1,1,17,3,136,14,76,136,15,1,17,2,137,30,1,1,
-17,4,136,15,78,97,136,17,1,17,2,137,32,1,1,17,3,136,16,3,0,0,131,255,255,127,
-1,17,3,136,16,2,4,1,17,7,136,16,0,0,135,255,255,127,82,2,77,1,136,21,1,17,2,
-137,36,1,1,17,4,136,17,122,138,8,115,1,17,3,135,125,1,135,126,1,17,3,135,125,
-86,1,1,17,2,137,82,1,1,17,3,135,126,88,137,70,1,17,4,135,126,59,1,2,1,17,3,135,
-126,7,1,1,17,2,135,126,1,1,17,2,137,87,136,79,1,17,2,135,125,1,1,17,2,137,85,
-1,1,17,3,135,123,95,135,124,1,17,4,135,123,135,126,66,1,1,17,4,135,123,3,64,
-1,1,17,2,136,1,1,1,40,2,0,0,0,0,13,0,1,17,3,135,125,81,136,104,1,17,3,135,125,
-82,1,1,17,5,135,125,69,1,4,3,1,17,3,135,125,70,1,1,17,2,137,99,1,1,17,2,135,
-126,129,3,1,17,2,136,126,1,1,17,2,135,127,1,1,17,2,137,0,3,1,17,2,136,1,1,1,
-17,5,136,1,6,129,8,3,1,1,17,2,137,106,1,1,17,2,137,4,129,10,1,17,3,136,33,22,
-1,1,17,3,136,33,129,12,1,1,17,2,137,7,129,13,1,17,3,136,96,25,1,1,17,2,136,2,
-129,15,1,17,2,136,3,129,16,1,17,2,137,48,28,1,17,13,136,3,129,19,138,36,129,
-18,6,4,111,3,2,1,29,136,4,136,4,1,17,2,137,50,129,16,1,17,3,135,107,47,1,1,17,
-2,137,52,129,18,1,17,2,135,108,129,19,1,17,6,135,108,50,3,2,1,129,20,1,17,3,
-135,108,6,137,2,1,17,2,137,122,1,1,17,2,135,109,0,0,132,128,128,0,1,17,3,130,
-12,0,0,1,0,0,2,1,17,3,130,13,0,0,3,0,0,8,1,17,3,130,14,0,0,5,0,0,32,1,17,5,130,
-12,2,0,0,2,0,0,4,3,1,17,3,130,16,0,0,7,0,0,129,0,1,17,3,130,17,0,0,9,0,0,132,
-0,1,17,5,130,15,2,0,0,6,0,0,64,4,1,17,3,130,19,0,0,11,0,0,144,0,1,17,3,130,20,
-0,0,13,0,0,192,0,1,17,5,130,18,2,0,0,10,0,0,136,0,4,1,17,5,130,19,4,0,0,4,0,
-0,16,7,1,17,3,130,23,0,0,15,0,0,130,128,0,1,17,3,130,24,0,0,17,0,0,136,128,0,
-1,17,5,130,22,2,0,0,14,0,0,129,128,0,5,1,17,3,130,26,0,0,19,0,0,160,128,0,1,
-17,3,130,27,0,0,21,0,0,129,128,128,0,1,17,3,130,28,0,0,23,0,0,132,128,128,0,
-1,17,5,130,26,3,0,0,18,0,0,144,128,0,5,1,17,5,130,27,2,0,0,22,0,0,130,128,128,
-0,3,1,17,5,130,28,6,0,0,12,0,0,160,0,10,1,17,5,130,29,2,0,0,20,0,0,192,128,0,
-3,1,17,5,130,25,1,0,0,16,0,0,132,128,0,2,1,17,5,130,31,1,0,0,8,0,0,130,0,12,
-1,17,3,136,3,129,19,136,91,1,17,3,136,3,25,1,1,17,4,136,3,26,1,137,116,1,17,
-3,136,2,129,53,136,3,1,17,3,136,2,72,1,1,17,3,136,2,129,29,1,1,17,3,136,106,
-129,11,1,1,17,4,136,3,129,65,1,8,1,17,3,136,3,129,13,1,1,17,6,136,3,33,137,62,
-129,67,1,10,1,17,4,136,3,129,1,8,1,1,17,4,136,3,129,5,129,2,1,1,17,2,137,117,
-1,1,17,2,136,4,1,1,17,8,136,3,129,64,136,4,136,4,137,42,137,42,39,1,1,17,2,138,
-34,1,1,17,3,136,0,129,66,137,44,1,17,3,136,1,129,67,137,45,1,17,3,136,1,59,136,
-5,1,17,3,136,1,60,1,1,17,3,136,1,129,66,1,1,17,4,136,1,6,1,138,43,1,17,6,136,
-1,129,72,6,5,136,7,1,1,17,2,138,42,1,1,17,3,136,86,129,43,136,2,1,17,2,137,93,
-2,1,17,2,137,107,3,1,17,3,136,4,104,1,1,17,3,136,4,129,47,1,1,17,3,136,4,106,
-1,1,17,6,136,4,107,6,129,49,5,1,1,18,2,1,129,76,1,18,2,129,52,1,1,17,3,136,95,
-129,57,136,6,1,17,3,136,6,111,1,1,17,3,136,6,129,59,136,8,1,17,3,136,6,113,1,
-1,17,2,137,105,14,1,17,2,137,119,15,1,17,3,136,16,116,1,1,17,3,136,16,129,64,
-1,1,17,3,136,16,118,1,1,17,7,136,11,8,129,66,5,119,1,6,1,18,2,1,129,88,1,17,
-2,138,63,1,1,18,2,129,70,1,1,17,3,136,29,14,136,11,1,17,4,136,10,15,1,136,11,
-1,18,2,18,1,1,18,2,129,69,1,1,17,3,136,12,5,136,14,1,17,3,136,12,6,1,1,17,2,
-136,12,1,1,18,2,11,1,1,17,2,138,73,1,1,18,2,129,80,1,1,17,2,138,9,7,1,17,4,135,
-72,8,1,129,117,1,17,2,138,11,3,1,17,5,135,73,4,129,119,1,10,1,17,2,135,70,135,
-71,1,17,2,138,38,1,1,17,2,135,71,1,1,18,2,1,90,1,17,3,137,110,130,0,135,27,1,
-17,4,135,24,129,127,130,15,1,1,17,2,135,23,135,24,1,17,2,138,47,1,1,17,2,135,
-23,135,24,1,17,3,135,23,5,1,1,17,2,138,47,1,1,17,3,135,127,14,138,77,1,17,2,
-135,25,1,1,17,3,135,25,9,1,1,17,2,135,25,7,1,17,7,135,25,130,9,130,24,2,5,10,
-1,1,17,2,138,95,1,1,17,3,138,102,0,13,0,1,2,3,36,66,97,100,32,118,101,99,116,
-111,114,32,110,111,100,101,32,105,110,32,100,105,115,112,97,116,99,104,45,49,
-58,32,116,121,112,101,32,2,3,27,76,101,97,102,32,118,101,99,116,111,114,32,105,
-110,32,100,105,115,112,97,116,99,104,45,50,58,32,2,3,35,66,97,100,32,118,101,
-99,116,111,114,32,110,111,100,101,32,105,110,32,100,105,115,112,97,116,99,104,
-45,50,58,32,111,98,106,32,2,3,24,118,101,99,45,108,101,97,102,45,111,102,58,
-32,98,97,100,32,105,110,100,101,120,58,32,2,3,29,118,101,99,116,111,114,45,108,
-101,110,103,116,104,58,32,110,111,116,32,97,32,118,101,99,116,111,114,58,32,
-1,17,4,134,87,130,17,5,0,0,159,127,1,17,4,134,87,130,18,4,5,1,17,2,138,25,2,
-1,17,2,138,26,3,1,17,6,134,89,3,2,4,0,0,160,0,1,1,17,2,138,107,1,1,17,2,136,
-97,5,1,17,3,134,89,2,1,1,17,6,134,87,130,25,10,1,7,0,0,160,0,1,17,6,134,87,130,
-26,10,139,18,139,78,28,1,17,2,138,70,134,83,1,17,2,135,98,1,1,17,3,134,84,36,
-1,1,17,2,138,115,1,1,17,3,134,84,34,134,85,1,17,4,134,84,41,1,0,0,160,0,1,17,
-3,134,84,3,1,1,17,3,134,84,9,1,1,17,4,134,84,9,135,94,1,2,3,17,104,111,119,32,
-100,111,32,105,32,105,116,101,114,97,116,101,32,1,17,2,133,16,135,68,1,17,3,
-133,16,138,74,1,1,1,2,0,0,0,0,13,0,1,1,2,1,0,13,0,1,17,3,133,7,1,133,8,1,17,
-4,133,6,138,8,1,133,7,1,17,4,133,6,2,138,79,1,1,17,2,139,1,1,1,17,4,133,7,130,
-45,9,10,1,17,4,133,7,134,103,1,35,1,17,3,133,7,135,73,1,1,17,3,138,121,138,84,
-1,1,17,2,138,68,5,1,17,3,133,9,2,1,1,17,2,139,16,139,17,1,17,2,139,16,1,1,17,
-2,139,15,139,16,1,17,2,139,16,139,15,1,17,3,139,18,0,13,1,130,64,2,3,29,115,
-116,114,105,110,103,45,108,101,110,103,116,104,58,32,110,111,116,32,97,32,115,
-116,114,105,110,103,58,32,2,3,24,115,116,114,45,105,116,101,114,58,32,110,111,
-116,32,97,32,115,116,114,105,110,103,58,32,2,3,25,115,116,114,45,105,116,101,
-114,114,58,32,110,111,116,32,97,32,115,116,114,105,110,103,58,32,2,3,23,70,97,
-105,108,101,100,32,116,111,32,109,97,107,101,32,115,116,114,105,110,103,58,32,
-1,1,2,0,0,0,0,13,0,2,3,68,105,109,112,108,101,109,101,110,116,97,116,105,111,
-110,32,114,101,115,116,114,105,99,116,105,111,110,58,32,97,100,100,32,109,111,
-114,101,32,118,97,108,117,101,115,32,116,111,32,99,111,110,116,105,110,117,97,
-116,105,111,110,32,104,97,110,100,108,105,110,103,2,16,3,0,2,50,2,16,11,2,3,
-0,6,50,4,5,6,24,6,61,2,16,10,2,2,0,5,62,4,5,24,5,61,2,16,13,2,5,0,8,63,4,5,6,
-7,8,24,8,61,1,17,3,139,17,2,139,18,1,17,2,139,20,1,1,17,2,139,18,3,1,17,3,139,
-18,7,8,1,17,2,139,18,1,2,16,3,0,2,49,1,17,3,139,18,1,139,19,1,17,3,139,18,139,
-32,1,1,17,3,139,16,4,139,17,1,17,2,139,16,1,1,17,2,139,16,2,1,17,2,139,16,3,
-1,17,2,139,16,4,1,17,2,139,16,5,1,17,2,139,16,6,1,17,2,139,16,6,1,17,3,139,16,
-8,1,1,17,2,131,61,9,1,17,2,139,16,10,1,17,2,139,16,11,1,17,5,139,13,2,139,15,
-8,139,14,1,17,2,139,13,1,1,17,4,139,13,4,139,18,1,1,17,3,139,12,13,139,117,1,
-17,4,139,10,2,139,12,139,11,1,17,3,139,10,12,1,1,17,2,139,8,139,9,1,17,2,139,
-11,1,1,17,2,139,9,139,8,1,17,3,139,8,2,1,1,17,3,139,8,23,1,1,17,3,139,8,24,1,
-1,17,3,139,61,0,13,0,130,107,1,18,3,48,130,112,130,112,1,18,3,49,130,112,130,
-113,1,18,3,50,130,114,130,113,1,18,3,51,130,114,130,114,1,17,3,139,9,139,11,
-139,10,1,17,2,139,57,1,1,17,2,139,9,139,10,1,17,2,139,21,1,1,17,2,139,10,139,
-63,1,17,2,139,10,1,1,17,2,139,10,1,1,17,2,139,25,1,1,17,2,139,10,139,11,1,17,
-2,139,30,1,1,17,2,139,10,139,11,1,17,2,139,29,1,1,17,2,139,11,139,71,1,17,2,
-139,11,1,1,17,2,139,74,1,1,17,2,139,75,139,12,1,17,2,139,74,139,75,1,17,2,139,
-77,1,1,17,2,139,12,1,1,17,2,139,12,1,1,17,3,139,12,139,31,1,1,17,2,139,77,1,
-1,17,3,139,13,5,1,1,17,2,139,83,139,13,1,17,3,139,90,0,13,0,1,1,17,3,139,12,
-1,139,13,1,17,4,139,12,2,139,15,1,1,17,2,139,12,1,1,17,2,139,11,139,12,1,17,
-3,139,11,18,1,1,17,2,139,11,1,1,17,4,139,11,82,1,79,1,17,4,139,9,8,139,101,139,
-10,1,17,2,139,9,1,1,17,4,139,6,10,139,22,139,7,1,17,2,139,6,1,1,17,3,135,97,
-135,99,135,98,1,17,5,131,109,131,113,131,112,131,111,131,110,1,17,5,131,110,
-131,109,131,108,131,107,131,106,1,17,2,131,106,2,1,17,2,131,107,2,1,17,3,131,
-83,131,85,131,84,1,17,2,139,11,4,1,17,3,131,109,6,1,1,17,3,131,108,7,1,1,17,
-3,131,53,8,1,1,17,2,139,15,8,1,17,3,131,113,10,1,1,17,3,131,113,11,1,1,17,4,
-131,56,8,4,1,1,17,2,139,19,12,1,17,3,132,88,12,1,1,17,5,131,58,11,3,13,1,1,17,
-3,131,58,12,1,1,17,2,131,117,17,1,17,3,131,59,2,1,1,17,2,139,25,18,1,17,3,131,
-123,20,1,1,17,3,131,120,21,1,1,17,3,131,62,22,1,1,17,2,139,29,22,1,17,3,131,
-127,24,1,1,17,3,131,123,25,1,1,17,4,131,65,22,4,1,1,17,3,131,65,23,1,1,17,2,
-132,0,28,1,17,3,131,126,2,1,1,17,2,139,36,29,1,17,2,139,36,30,1,17,4,132,0,31,
-2,1,1,17,2,139,39,4,1,17,2,139,39,16,1,17,4,132,3,35,2,1,1,17,4,132,3,35,4,1,
-1,17,2,139,92,1,1,17,2,139,44,37,1,17,2,139,44,38,1,17,4,132,8,39,2,1,1,17,2,
-139,47,41,1,17,2,139,47,42,1,17,4,132,11,43,2,1,1,17,3,131,122,4,1,1,17,2,139,
-100,1,1,17,3,132,11,132,12,132,12,1,17,2,132,11,1,1,17,2,139,42,46,1,17,3,132,
-12,12,1,1,17,2,139,52,139,53,1,17,4,132,13,139,55,139,54,1,1,17,2,132,13,1,1,
-17,2,139,108,1,1,17,2,139,56,139,57,1,17,4,132,15,139,58,139,59,1,1,17,2,132,
-17,1,1,17,2,139,112,1,1,17,3,139,57,5,139,53,1,17,2,139,60,10,1,17,3,132,19,
-94,1,1,17,3,139,60,8,139,61,1,17,2,139,68,33,1,17,2,139,69,62,1,17,3,132,13,
-35,1,1,17,3,132,13,62,1,1,17,3,132,13,66,1,1,17,2,139,73,66,1,17,3,132,17,39,
-1,1,17,3,132,17,66,1,1,17,3,132,17,70,1,1,17,3,132,17,5,1,1,17,4,132,17,69,10,
-1,1,17,2,139,78,72,1,17,5,132,18,70,2,72,1,1,17,3,132,18,71,1,1,17,2,139,81,
-58,1,17,2,139,83,76,1,17,3,132,53,78,1,1,17,3,132,21,61,1,1,17,3,132,21,77,1,
-1,17,2,139,87,80,1,17,3,132,57,82,1,1,17,3,132,25,65,1,1,17,3,132,25,81,1,1,
-17,3,132,25,5,1,1,17,4,132,31,83,10,1,1,17,2,139,93,86,1,17,5,132,27,84,2,86,
-1,1,17,3,132,27,85,1,1,17,3,132,26,132,27,132,27,1,17,3,132,27,132,26,132,26,
-1,17,2,139,98,17,1,17,3,132,26,93,1,1,17,2,132,3,1,1,17,2,139,101,94,1,17,3,
-132,71,96,1,1,17,3,132,29,97,1,1,17,2,132,6,1,1,17,2,132,6,1,1,17,3,132,6,6,
-1,1,17,3,136,89,97,1,1,17,2,132,33,1,1,17,3,132,33,13,1,1,17,2,139,109,103,1,
-17,2,132,34,1,1,17,4,132,34,15,3,1,1,17,2,139,113,106,1,17,2,132,35,1,1,17,2,
-139,115,108,1,17,3,132,43,109,1,1,17,2,132,16,1,1,17,2,139,118,111,1,17,3,132,
-88,112,1,1,17,3,132,46,113,1,1,17,2,132,19,1,1,17,2,132,19,1,1,17,3,132,19,6,
-1,1,17,3,136,106,114,1,1,17,2,132,50,1,1,17,3,132,50,30,1,1,17,4,132,47,13,30,
-1,1,17,4,132,47,118,16,1,1,17,3,132,47,119,1,1,17,2,140,93,1,1,17,3,132,48,36,
-124,1,17,3,132,48,122,1,1,17,3,132,50,52,126,1,17,3,132,49,124,1,1,17,4,132,
-49,5,3,1,1,17,3,132,49,132,64,1,1,17,2,140,100,1,1,17,2,136,8,129,2,1,17,3,136,
-0,129,1,1,1,17,3,139,31,3,1,2,3,9,66,97,100,32,109,97,116,104,58,2,3,10,98,97,
-100,32,109,97,116,104,58,32,2,3,12,66,97,100,32,110,117,109,98,101,114,58,32,
-1,17,3,140,113,0,0,0,132,31,1,17,3,140,112,0,32,0,132,31,1,40,2,0,0,1,0,13,0,
-1,40,2,0,0,0,1,1,17,3,140,4,129,77,7,1,17,4,140,4,140,7,140,6,4,1,17,2,140,113,
-140,4,1,17,2,140,72,140,4,1,17,5,140,4,4,141,85,1,140,25,1,17,4,140,4,5,141,
-87,3,1,17,2,140,4,2,1,17,3,140,2,129,84,13,1,17,7,140,1,0,0,135,255,255,127,
-9,140,2,10,8,141,64,1,17,2,140,116,1,1,17,3,140,0,12,140,1,1,17,2,140,122,1,
-1,17,5,140,1,14,1,140,3,140,3,1,17,2,140,82,1,1,17,2,140,1,140,2,1,17,2,140,
-84,1,1,17,3,140,2,140,21,19,1,17,3,140,2,2,1,1,17,4,140,2,3,140,6,140,6,1,17,
-2,140,91,1,1,17,3,140,3,23,140,25,1,17,3,140,3,2,1,1,17,3,140,3,19,1,1,17,3,
-140,3,26,25,1,17,2,140,32,140,29,1,17,2,140,33,140,30,1,17,2,140,34,140,31,1,
-17,12,140,6,5,14,3,10,16,2,12,1,30,4,29,1,18,2,1,21,1,17,2,140,37,140,34,1,17,
-2,140,38,140,35,1,17,2,140,39,140,36,1,17,12,140,9,19,3,10,21,2,15,17,1,9,35,
-34,1,18,2,1,26,1,17,2,140,106,140,10,1,17,2,141,18,140,10,1,17,2,140,10,2,1,
-17,5,140,10,37,141,79,2,1,1,17,2,140,9,140,10,1,17,2,140,111,1,1,17,2,140,10,
-1,1,17,2,141,24,140,10,1,17,3,140,28,140,47,45,1,17,3,140,29,140,48,46,1,17,
-3,140,12,4,1,1,17,2,140,77,5,1,17,11,140,13,46,141,126,18,140,38,6,4,45,5,2,
-1,1,17,2,141,30,1,1,17,2,140,14,140,39,1,17,2,140,118,1,1,17,2,141,33,140,15,
-1,17,2,140,59,140,56,1,17,3,140,20,2,1,1,17,2,140,85,3,1,17,2,140,62,140,59,
-1,17,2,140,63,140,60,1,17,4,140,20,28,140,48,0,0,135,255,255,127,1,17,12,140,
-20,57,142,8,8,5,4,60,7,3,2,1,0,0,135,255,255,127,1,17,2,141,41,1,1,17,2,140,
-20,140,21,1,17,2,141,43,1,1,17,2,140,21,140,52,1,17,2,141,45,1,1,17,2,140,21,
-140,22,1,17,2,141,47,1,1,17,3,140,77,1,140,22,1,17,4,140,22,66,142,12,6,1,17,
-4,140,22,67,141,61,5,1,17,4,140,22,68,142,12,3,1,17,3,140,22,140,60,140,60,1,
-17,2,141,11,1,1,17,2,140,22,140,65,1,17,2,140,22,140,63,1,17,7,140,22,140,25,
-40,45,2,140,64,1,1,17,2,141,15,1,1,17,2,140,120,42,1,17,3,140,24,6,1,1,17,2,
-140,24,1,1,17,2,141,61,1,1,17,2,140,24,44,1,17,2,141,59,1,1,17,3,140,23,1,140,
-24,1,17,3,140,23,140,28,1,1,17,3,140,23,3,1,1,17,3,140,26,4,140,27,1,17,3,140,
-26,140,31,1,1,17,3,140,26,6,1,1,17,4,140,26,140,33,4,1,1,17,2,140,32,1,1,17,
-2,140,100,15,1,17,3,140,28,32,1,1,17,3,140,28,17,1,1,17,3,140,28,64,1,1,17,3,
-140,28,60,1,1,17,2,140,28,1,1,17,3,140,28,62,1,1,17,3,140,28,63,1,1,17,2,140,
-28,1,1,17,3,140,28,1,20,1,17,4,140,28,29,11,1,1,17,2,141,83,1,1,17,2,140,109,
-140,106,1,17,2,140,110,140,107,1,17,2,140,111,140,108,1,17,2,140,112,140,109,
-1,17,2,140,113,140,110,1,17,3,140,92,140,111,109,1,17,3,140,93,140,112,110,1,
-17,3,140,94,140,113,111,1,17,13,140,37,109,142,33,9,8,39,7,6,5,4,3,2,1,1,17,
-2,141,93,1,1,17,3,140,37,83,140,38,1,17,2,141,53,1,1,17,4,140,38,85,104,140,
-40,1,17,2,141,55,1,1,17,3,140,39,3,0,0,131,255,255,127,1,17,3,140,39,2,4,1,17,
-7,140,39,0,0,135,255,255,127,89,2,84,1,140,44,1,17,2,141,59,1,1,17,4,140,40,
-130,68,142,31,124,1,17,3,140,40,111,140,47,1,17,3,140,40,2,1,1,17,3,140,40,94,
-1,1,17,2,141,64,1,1,17,3,140,41,91,140,116,1,17,3,140,41,67,1,1,17,3,140,62,
-98,1,1,17,4,140,42,69,1,4,1,17,3,140,42,10,1,1,17,2,140,42,1,1,17,2,140,42,129,
-1,1,17,3,140,42,2,1,1,17,3,140,41,129,3,141,124,1,17,3,140,41,4,1,1,17,3,140,
-41,129,5,1,1,17,3,140,41,129,6,141,127,1,17,3,140,41,129,7,1,1,17,3,140,105,
-8,1,1,17,3,140,47,129,9,142,2,1,17,3,140,45,129,10,142,3,1,17,3,140,45,129,11,
-1,1,17,3,140,47,129,12,142,5,1,17,3,140,46,129,13,141,53,1,17,3,140,51,14,1,
-1,17,3,140,48,129,15,141,55,1,17,16,140,47,129,17,142,29,129,16,11,8,108,7,5,
-142,9,4,2,1,16,140,48,141,56,1,17,3,140,46,27,140,47,1,17,3,140,46,119,1,1,17,
-2,142,3,1,1,17,3,140,47,121,141,119,1,17,4,140,47,92,1,2,1,17,3,140,47,33,1,
-1,17,2,140,47,1,1,17,2,142,8,141,0,1,17,2,140,46,1,1,17,2,142,6,1,1,17,3,140,
-44,129,0,140,45,1,17,4,140,44,140,47,99,1,1,17,4,140,44,3,92,1,1,17,2,140,50,
-1,1,40,2,0,0,0,0,13,0,1,17,3,140,46,114,141,25,1,17,3,140,46,115,1,1,17,5,140,
-46,97,1,4,3,1,17,3,140,46,98,1,1,17,2,142,20,1,1,17,2,140,47,129,37,1,17,2,141,
-47,1,1,17,2,140,48,1,1,17,2,141,49,3,1,17,2,140,50,1,1,17,5,140,50,6,129,42,
-3,1,1,17,2,142,27,1,1,17,2,141,77,1,1,17,3,140,52,129,18,1,1,17,3,140,52,23,
-1,1,17,2,140,52,129,51,1,17,3,140,52,141,54,129,52,1,17,3,140,89,129,13,1,1,
-17,2,141,96,4,1,17,3,140,87,129,51,1,1,17,2,141,85,50,1,17,2,141,99,51,1,17,
-13,140,57,129,55,142,103,129,54,3,2,129,18,140,93,5,1,8,140,93,7,1,17,2,141,
-64,129,55,1,17,3,140,93,33,1,1,17,3,140,93,129,57,1,1,17,2,141,67,129,58,1,17,
-3,141,28,36,1,1,17,2,140,62,129,60,1,17,2,140,63,129,61,1,17,2,141,108,39,1,
-17,13,140,63,129,64,142,96,129,63,6,4,129,27,3,2,1,40,140,64,140,64,2,3,33,117,
-116,102,56,32,101,110,99,111,100,101,58,32,99,111,100,101,32,112,111,105,110,
-116,32,116,111,111,32,104,105,103,104,32,2,3,21,108,105,115,116,45,114,101,102,
-58,32,111,117,116,32,111,102,32,108,105,115,116,2,3,30,108,105,115,116,45,115,
-101,116,58,32,111,117,116,32,111,102,32,108,105,115,116,32,115,101,116,116,105,
-110,103,32,2,3,28,108,105,115,116,45,100,101,108,58,32,111,117,116,32,111,102,
-32,108,105,115,116,44,32,108,101,102,116,32,2,3,29,108,101,100,110,58,32,111,
-117,116,32,111,102,32,108,105,115,116,44,32,114,101,109,97,105,110,105,110,103,
-32,2,3,24,108,105,110,115,58,32,111,117,116,32,111,102,32,108,105,115,116,44,
-32,108,101,102,116,32,2,3,10,98,97,100,32,105,111,116,97,58,32,1,17,5,140,68,
-131,21,6,129,44,141,64,1,17,2,142,56,1,1,17,2,140,69,142,56,1,17,5,140,69,131,
-24,8,129,47,1,1,17,2,142,17,1,1,17,2,140,70,142,59,1,17,5,140,70,131,27,10,129,
-50,1,1,17,2,142,62,1,1,17,2,140,75,142,62,1,17,5,140,72,131,30,12,129,53,1,1,
-17,2,142,23,1,1,17,2,140,78,142,65,1,17,5,140,73,131,33,14,129,56,1,1,17,2,142,
-26,1,1,17,2,140,74,129,53,1,17,3,140,74,131,7,1,1,17,2,140,81,142,70,1,17,3,
-140,75,129,61,1,1,17,2,142,73,1,1,17,3,140,76,129,63,141,83,1,17,2,142,75,1,
-1,17,2,140,77,142,75,1,17,3,140,77,129,61,1,1,17,3,140,77,129,91,1,1,17,2,142,
-37,1,1,17,2,140,81,142,79,1,17,3,140,81,129,65,1,1,17,3,140,81,129,93,1,1,17,
-2,142,41,1,1,17,4,140,82,131,50,30,143,58,1,17,2,140,82,2,1,17,5,140,82,129,
-98,2,129,97,1,1,17,2,140,84,8,1,17,4,140,83,129,101,2,1,1,17,3,140,83,129,100,
-1,1,17,6,140,82,131,6,142,18,142,18,129,79,141,34,1,17,2,140,82,1,2,3,17,100,
-105,118,105,115,105,111,110,32,98,121,32,122,101,114,111,32,1,17,2,142,27,129,
-106,1,17,3,140,84,129,1,1,1,17,2,142,29,129,108,1,17,2,140,85,129,109,1,17,6,
-140,85,129,4,3,2,1,129,110,1,17,3,140,85,51,141,107,1,17,2,142,99,1,1,17,2,140,
-86,0,0,132,128,128,0,1,17,3,134,117,0,0,1,0,0,2,1,17,3,134,118,0,0,3,0,0,8,1,
-17,3,134,119,0,0,5,0,0,32,1,17,5,134,117,2,0,0,2,0,0,4,3,1,17,3,134,121,0,0,
-7,0,0,129,0,1,17,3,134,122,0,0,9,0,0,132,0,1,17,5,134,120,2,0,0,6,0,0,64,4,1,
-17,3,134,124,0,0,11,0,0,144,0,1,17,3,134,125,0,0,13,0,0,192,0,1,17,5,134,123,
-2,0,0,10,0,0,136,0,4,1,17,5,134,124,4,0,0,4,0,0,16,7,1,17,3,135,0,0,0,15,0,0,
-130,128,0,1,17,3,135,1,0,0,17,0,0,136,128,0,1,17,5,134,127,2,0,0,14,0,0,129,
-128,0,5,1,17,3,135,3,0,0,19,0,0,160,128,0,1,17,3,135,4,0,0,21,0,0,129,128,128,
-0,1,17,3,135,5,0,0,23,0,0,132,128,128,0,1,17,5,135,3,3,0,0,18,0,0,144,128,0,
-5,1,17,5,135,4,2,0,0,22,0,0,130,128,128,0,3,1,17,5,135,5,6,0,0,12,0,0,160,0,
-10,1,17,5,135,6,2,0,0,20,0,0,192,128,0,3,1,17,5,135,2,1,0,0,16,0,0,132,128,0,
-2,1,17,5,135,8,1,0,0,8,0,0,130,0,12,1,17,3,140,108,129,108,141,68,1,17,3,140,
-108,25,1,1,17,4,140,108,26,1,142,93,1,17,3,140,107,130,15,140,108,1,17,3,140,
-107,129,26,1,1,17,3,140,107,129,118,1,1,17,3,141,83,129,100,1,1,17,4,140,108,
-130,115,1,8,1,17,3,140,108,129,102,1,1,17,6,140,108,33,142,39,130,117,1,10,1,
-17,4,140,108,129,85,8,1,1,17,4,140,108,129,94,129,86,1,1,17,2,142,94,1,1,17,
-2,140,109,1,1,17,8,140,108,130,26,140,109,140,109,142,19,142,19,39,1,1,17,2,
-143,11,1,1,17,3,140,105,130,28,142,21,1,17,3,140,106,130,29,142,22,1,17,3,140,
-106,115,140,110,1,17,3,140,106,116,1,1,17,3,140,106,130,28,1,1,17,4,140,106,
-6,1,143,20,1,17,6,140,106,130,34,6,5,140,112,1,1,17,2,143,19,1,1,17,3,141,63,
-130,4,140,107,1,17,2,142,70,2,1,17,2,142,84,3,1,17,3,140,109,129,58,1,1,17,3,
-140,109,130,8,1,1,17,3,140,109,129,60,1,1,17,6,140,109,129,61,6,130,10,5,1,1,
-18,2,1,130,37,1,18,2,130,13,1,1,17,3,141,72,130,18,140,111,1,17,3,140,111,129,
-65,1,1,17,3,140,111,130,20,140,113,1,17,3,140,111,129,67,1,1,17,2,142,82,14,
-1,17,2,142,96,15,1,17,3,140,121,129,70,1,1,17,3,140,121,130,25,1,1,17,3,140,
-121,129,72,1,1,17,7,140,116,8,130,27,5,129,73,1,6,1,18,2,1,130,49,1,17,2,143,
-40,1,1,18,2,130,31,1,1,17,6,140,117,130,59,144,13,140,118,140,118,130,57,1,17,
-2,143,43,1,1,17,3,141,8,16,140,118,1,17,4,140,117,17,1,140,118,1,18,2,20,1,1,
-18,2,130,32,1,1,17,3,140,119,7,140,121,1,17,3,140,119,8,1,1,17,2,140,119,1,1,
-18,2,13,1,1,17,2,143,52,1,1,18,2,130,43,1,1,17,3,141,97,26,141,0,1,17,2,140,
-123,1,1,17,2,140,123,1,1,17,3,140,123,16,1,1,17,2,140,123,1,1,17,2,142,126,141,
-5,1,17,2,140,124,41,1,17,2,143,0,141,7,1,17,2,142,124,43,1,17,2,141,102,1,1,
-17,2,143,3,141,10,1,17,2,141,1,46,1,17,2,143,5,141,12,1,17,2,141,3,48,1,17,2,
-143,7,141,14,1,17,2,141,5,50,1,17,2,143,9,141,16,1,17,2,141,7,52,1,17,15,141,
-7,129,107,14,13,12,11,9,8,7,6,5,4,3,2,1,1,17,2,143,73,1,1,17,2,141,8,141,20,
-1,17,3,142,28,22,1,1,17,3,141,9,3,1,1,17,3,141,9,4,1,1,17,2,141,9,1,1,17,3,141,
-9,32,1,1,17,3,141,9,7,1,1,17,3,141,9,8,1,1,17,3,141,20,35,1,1,17,3,141,10,10,
-1,1,17,2,141,18,141,30,1,17,3,141,11,12,1,1,17,2,141,11,1,1,17,3,141,11,14,1,
-1,17,2,141,22,141,34,1,17,3,141,12,36,1,1,17,3,141,16,17,1,1,17,2,141,16,1,1,
-17,3,141,14,19,1,1,17,3,141,69,46,1,1,17,3,141,15,21,1,1,17,3,141,15,22,142,
-104,1,17,2,143,30,77,1,17,2,141,86,78,1,17,12,141,17,132,64,129,6,144,70,25,
-15,11,4,3,2,1,79,1,17,2,143,99,1,1,17,2,141,17,141,71,1,17,3,141,17,143,52,1,
-1,17,2,143,102,1,1,17,3,141,17,142,47,143,51,1,17,3,141,19,143,55,1,1,17,2,143,
-63,1,1,17,2,141,19,141,77,1,17,3,141,19,1,143,106,1,17,3,141,19,143,59,1,1,17,
-2,143,109,1,1,17,3,141,15,143,97,143,109,1,17,3,141,15,143,62,1,1,17,2,143,108,
-1,1,17,2,141,15,143,100,1,17,3,141,15,143,65,1,1,17,2,143,111,1,2,3,17,78,111,
-32,97,114,103,117,109,101,110,116,115,32,102,111,114,32,1,17,2,141,17,143,116,
-1,17,2,141,17,1,1,17,2,143,77,1,1,17,3,141,18,143,119,143,119,1,17,2,141,18,
-1,1,17,2,143,80,1,1,17,2,143,62,143,122,1,17,3,141,20,2,1,1,17,2,143,125,1,1,
-17,4,141,20,143,125,7,141,21,1,17,2,143,88,1,1,17,3,141,21,3,143,9,1,17,2,144,
-1,1,1,17,2,141,22,1,1,17,3,141,22,4,1,1,17,2,141,22,1,1,17,3,141,102,132,70,
-60,1,17,3,141,22,129,37,141,23,1,17,3,141,22,129,38,141,24,1,17,2,143,23,129,
-39,1,17,2,143,23,94,1,17,3,143,23,129,41,1,1,17,2,143,73,92,1,17,2,141,22,1,
-1,17,3,141,22,129,44,1,1,17,3,141,21,132,79,141,22,1,17,3,142,69,2,143,71,1,
-17,3,141,22,130,16,1,1,17,5,141,22,132,78,3,1,131,38,1,17,2,141,20,141,21,1,
-17,4,141,20,2,6,142,4,1,17,2,141,19,141,20,1,17,5,141,19,129,52,2,96,1,1,17,
-6,141,19,141,26,129,53,4,143,56,1,1,17,2,143,109,1,1,17,2,143,86,105,1,17,4,
-141,21,106,1,132,90,1,17,2,143,88,101,1,17,5,141,22,102,132,92,1,108,1,17,2,
-143,90,83,1,17,4,141,23,84,132,94,1,1,17,2,143,92,59,1,17,4,141,24,60,26,1,1,
-17,2,141,23,141,24,1,17,2,143,119,1,1,17,2,141,24,1,1,18,2,1,129,66,1,18,2,2,
-28,1,18,2,3,27,1,17,4,141,27,132,103,133,4,50,1,18,3,1,33,0,13,1,1,18,3,2,33,
-0,13,1,1,17,3,141,25,131,11,143,75,1,17,3,141,25,13,142,114,1,17,3,141,25,131,
-13,1,1,17,4,141,25,15,3,1,1,17,3,141,25,130,124,1,1,17,2,144,4,1,1,17,2,141,
-26,1,1,17,2,141,27,2,1,17,2,141,27,18,1,17,2,142,88,1,1,17,2,141,29,20,1,17,
-2,142,90,1,1,17,10,141,30,24,26,6,5,131,69,3,1,131,70,145,0,1,17,2,144,54,1,
-1,17,3,141,18,18,0,0,128,255,255,127,1,17,3,141,17,131,7,141,18,1,17,3,143,16,
-1,141,17,1,17,3,141,17,2,1,1,17,3,141,17,131,29,1,1,17,3,143,102,4,1,1,17,3,
-141,18,131,31,1,1,17,5,141,18,133,28,130,14,131,32,1,1,17,3,141,17,7,141,18,
-1,17,3,143,106,8,1,1,17,3,141,18,131,35,1,1,17,6,141,18,31,4,0,0,129,128,128,
-0,131,36,1,1,17,3,141,17,11,141,18,1,17,6,141,17,33,2,0,0,132,128,0,131,38,1,
-1,17,4,141,17,34,1,0,0,144,0,1,17,3,141,17,35,1,1,17,3,143,98,133,41,141,15,
-1,17,2,144,30,141,15,1,17,2,141,15,1,1,17,3,144,62,3,1,1,17,4,141,15,133,41,
-133,62,4,1,17,2,141,14,141,15,1,17,2,144,38,1,1,17,2,141,14,141,15,1,17,3,141,
-14,8,1,1,17,2,144,38,1,1,17,3,141,118,56,144,68,1,17,2,141,16,1,1,17,3,141,16,
-12,1,1,17,2,141,16,7,1,17,7,141,16,133,51,133,71,2,5,10,1,1,17,2,144,86,1,1,
-17,3,144,93,0,13,0,1,1,17,2,141,17,141,18,1,17,2,144,47,1,1,17,2,141,18,141,
-20,1,17,2,144,49,1,1,17,3,142,1,65,144,79,1,17,2,141,20,1,1,17,2,143,122,3,1,
-17,2,143,123,6,1,17,3,141,22,69,1,1,17,9,141,22,133,63,133,82,26,144,84,4,3,
-22,1,1,17,2,144,98,1,1,17,3,144,105,0,13,0,1,1,17,2,144,0,123,1,17,3,141,25,
-2,1,1,17,3,144,37,1,32,1,17,3,144,5,2,136,29,1,17,4,141,26,133,41,141,27,79,
-1,17,4,141,26,133,31,1,30,1,17,4,141,25,133,43,141,26,81,1,17,4,141,25,133,33,
-1,32,1,17,4,141,25,133,34,1,144,104,1,17,3,141,25,130,18,1,1,17,3,141,25,130,
-19,1,1,17,3,141,25,130,20,1,1,17,5,141,25,87,7,131,82,1,1,17,3,141,25,77,1,1,
-17,3,141,25,130,44,1,1,17,2,144,111,1,1,17,3,141,25,133,82,133,100,1,17,4,141,
-25,133,33,141,27,1,1,17,2,144,15,3,1,17,3,141,26,133,35,1,1,17,2,141,24,84,1,
-17,3,141,23,86,141,24,1,17,3,141,23,97,1,1,17,5,141,23,68,1,6,141,29,1,17,5,
-141,23,141,29,89,4,1,1,17,7,141,23,8,6,0,0,160,0,141,31,144,76,1,1,17,2,143,
-34,1,1,17,2,141,24,1,1,17,2,141,22,144,9,1,17,3,141,21,129,86,141,22,1,17,3,
-141,21,144,81,1,1,17,4,141,21,1,129,88,141,24,1,17,5,141,21,144,83,4,142,103,
-1,1,17,3,141,21,144,84,1,1,17,2,145,6,1,1,17,2,144,69,1,1,17,3,143,60,49,1,1,
-17,3,141,24,50,1,1,17,3,142,21,129,95,1,1,17,3,141,25,64,1,1,17,3,144,72,65,
-1,1,17,4,141,25,40,141,26,133,124,1,17,4,141,25,136,68,72,1,2,3,0,1,18,2,134,
-21,0,0,32,1,17,2,144,106,1,1,18,2,134,11,1,1,17,3,141,16,45,141,17,1,17,3,141,
-16,2,1,1,17,4,141,16,9,1,6,2,3,9,109,99,112,47,108,105,110,107,115,2,3,9,109,
-99,112,47,98,114,101,97,107,2,3,18,115,116,111,112,112,105,110,103,32,111,110,
-32,115,105,103,110,97,108,2,3,5,35,116,114,117,101,2,3,6,35,102,97,108,115,101,
-2,3,11,35,60,102,117,110,99,116,105,111,110,62,2,3,6,35,60,87,84,70,62,1,17,
-3,145,35,0,13,4,136,81,1,17,3,145,34,0,0,0,136,81,1,1,2,0,12,2,0,13,0,1,1,2,
-0,12,1,1,1,1,2,0,12,0,1,1,17,3,145,40,1,133,87,1,17,3,145,41,0,0,19,136,88,1,
-17,2,144,125,141,25,1,17,2,141,25,1,1,17,2,141,25,1,1,17,2,145,35,1,1,17,2,144,
-65,5,1,17,2,144,66,6,1,17,4,141,28,6,2,1,1,17,2,141,66,4,2,3,36,66,97,100,32,
-118,101,99,116,111,114,32,110,111,100,101,32,105,110,32,100,105,115,112,97,116,
-99,104,45,49,58,32,116,121,112,101,32,2,3,27,76,101,97,102,32,118,101,99,116,
-111,114,32,105,110,32,100,105,115,112,97,116,99,104,45,50,58,32,2,3,35,66,97,
-100,32,118,101,99,116,111,114,32,110,111,100,101,32,105,110,32,100,105,115,112,
-97,116,99,104,45,50,58,32,111,98,106,32,2,3,39,98,97,100,32,118,101,99,116,111,
-114,32,110,111,100,101,32,105,110,32,118,101,99,45,114,101,102,45,100,105,103,
-105,116,58,32,116,121,112,101,32,2,3,23,118,101,99,116,111,114,45,114,101,102,
-58,32,98,97,100,32,105,110,100,101,120,58,32,2,3,24,118,101,99,45,108,101,97,
-102,45,111,102,58,32,98,97,100,32,105,110,100,101,120,58,32,2,3,29,118,101,99,
-116,111,114,45,108,101,110,103,116,104,58,32,110,111,116,32,97,32,118,101,99,
-116,111,114,58,32,1,17,4,141,36,134,17,7,0,0,159,127,1,17,4,141,36,134,18,6,
-7,1,17,2,144,102,2,1,17,2,144,103,3,1,17,6,141,38,3,2,4,0,0,160,0,1,1,17,2,145,
-56,1,1,17,5,141,39,134,23,10,0,0,159,127,0,0,160,0,1,17,2,145,58,1,1,17,2,143,
-48,1,1,17,3,141,41,8,1,1,17,3,141,41,5,1,1,17,3,141,41,4,0,0,159,127,1,17,8,
-141,41,134,29,15,2,11,1,5,0,0,160,0,1,17,2,143,53,12,1,17,3,141,45,9,1,1,17,
-6,141,43,134,32,17,1,14,0,0,160,0,1,17,6,141,43,134,33,17,145,102,146,34,124,
-1,17,2,145,26,141,39,1,17,2,142,54,1,1,17,3,141,40,129,43,1,1,17,2,145,71,1,
-1,17,3,141,40,129,37,141,41,1,17,4,141,40,129,48,1,0,0,160,0,1,17,3,141,40,3,
-1,1,17,3,141,40,9,1,1,17,4,141,40,9,142,50,1,1,17,2,141,38,142,115,1,17,3,141,
-38,129,51,1,1,17,2,145,37,1,1,17,3,141,39,129,53,144,114,1,17,2,141,39,1,1,17,
-2,145,40,1,1,17,2,142,68,1,1,17,4,141,41,129,13,1,5,1,17,2,145,85,1,1,17,4,141,
-42,129,59,144,95,0,0,160,0,1,17,3,141,53,2,1,1,17,3,141,43,22,1,1,17,2,145,89,
-1,1,17,2,145,24,1,1,17,2,145,25,2,1,17,4,141,46,129,65,2,1,1,17,4,141,46,132,
-44,1,0,0,159,127,1,17,3,145,82,27,1,1,17,2,144,123,129,118,1,17,3,142,20,2,1,
-1,17,4,141,49,54,1,137,23,1,17,2,145,19,134,16,1,17,4,141,50,124,1,71,1,17,2,
-141,49,141,50,1,17,5,141,49,72,2,71,1,1,17,2,141,51,141,49,1,17,5,141,49,141,
-94,2,129,29,1,1,17,2,141,47,141,48,1,17,2,141,46,141,47,1,17,4,141,46,134,43,
-2,1,1,17,3,141,46,131,18,1,1,17,5,141,46,142,53,5,129,37,1,1,17,2,141,52,141,
-56,1,17,2,141,51,141,52,1,17,4,141,51,134,48,2,1,1,17,3,141,51,131,23,1,1,17,
-5,141,50,145,114,5,129,42,1,1,17,4,141,50,142,59,1,87,1,17,2,141,60,141,50,1,
-17,6,141,49,19,143,87,73,1,141,50,1,17,5,141,49,134,21,3,141,107,1,1,17,4,141,
-49,141,90,1,97,1,17,2,145,40,134,37,1,17,3,145,39,129,17,1,1,17,6,141,51,141,
-120,3,95,96,1,1,17,2,141,65,141,64,1,17,3,141,50,141,51,1,1,17,3,141,50,145,
-75,1,1,17,5,141,50,141,117,4,141,54,1,1,17,4,141,50,145,77,1,129,24,1,17,4,141,
-50,142,68,1,129,104,1,17,3,141,50,142,115,1,1,17,2,146,1,1,1,17,2,141,49,142,
-23,1,17,5,141,49,134,77,146,3,145,82,1,1,17,2,141,49,120,1,17,5,141,49,145,84,
-2,142,74,1,1,17,3,141,49,142,75,1,1,17,2,146,7,1,2,3,7,10,32,32,32,32,32,32,
-2,3,49,69,82,82,79,82,58,32,102,100,32,114,101,97,100,32,119,105,116,104,32,
-116,105,109,101,111,117,116,32,104,97,100,32,110,111,32,109,97,116,99,104,105,
-110,103,32,97,108,97,114,109,2,3,11,32,45,32,102,111,117,110,100,32,105,116,
-2,3,23,119,97,107,101,117,112,58,32,117,110,107,110,111,119,110,32,119,97,107,
-101,117,112,32,2,3,23,98,97,100,32,109,117,120,101,114,32,109,101,115,115,97,
-103,101,32,102,114,111,109,32,2,3,22,110,111,116,32,115,117,114,101,32,104,111,
-119,32,116,111,32,97,108,97,114,109,32,1,1,2,0,0,10,0,13,0,1,1,2,0,0,10,0,13,
-0,1,1,2,0,0,10,0,13,0,1,1,2,0,13,0,0,13,0,1,17,3,144,69,134,62,146,27,1,17,3,
-141,61,134,63,1,1,17,2,141,61,1,1,17,4,141,58,4,1,141,59,1,17,2,141,57,129,8,
-1,17,3,146,11,142,92,1,1,17,3,143,117,1,141,57,1,17,3,141,56,2,141,57,1,17,3,
-144,9,3,1,1,17,5,141,57,4,141,61,3,1,1,17,2,141,57,1,1,17,2,141,65,0,0,14,1,
-17,2,141,66,0,0,88,1,17,2,141,59,4,1,17,4,141,53,2,141,57,141,54,1,17,3,141,
-57,4,1,1,17,3,141,57,3,1,1,17,3,141,55,8,1,1,17,2,141,72,0,0,129,1,1,17,2,141,
-51,10,1,17,2,146,43,141,51,1,17,2,146,44,141,51,1,17,2,145,102,1,1,17,2,141,
-51,1,1,17,2,145,104,3,1,17,4,141,52,4,1,141,54,1,17,3,141,52,3,1,1,17,2,145,
-107,6,1,17,3,141,53,8,1,1,17,2,145,109,8,1,17,4,141,54,10,1,141,59,1,17,4,141,
-54,5,3,1,1,17,3,141,54,11,141,61,1,17,3,141,54,2,1,1,17,2,146,52,1,1,17,3,141,
-54,144,60,146,52,1,17,2,146,15,1,1,17,2,145,117,17,1,17,2,145,105,18,1,17,4,
-141,57,2,3,1,1,17,2,145,120,19,1,17,2,145,108,20,1,17,4,141,59,2,6,1,1,17,4,
-141,59,4,1,146,71,1,17,2,141,64,1,1,17,2,141,59,141,60,1,17,2,146,25,1,1,17,
-3,141,60,1,145,99,1,17,4,141,59,141,60,2,145,100,1,17,4,141,59,2,1,146,77,1,
-17,2,141,59,1,1,17,2,145,94,134,113,1,17,4,142,94,2,1,143,78,1,17,2,141,58,36,
-1,17,5,141,58,135,24,147,21,146,123,1,1,17,3,142,35,129,39,1,1,17,7,141,59,135,
-26,142,67,147,23,146,125,129,32,144,45,1,17,3,141,59,2,1,1,17,2,141,59,1,1,17,
-2,146,77,1,1,17,3,141,58,1,141,59,1,17,3,145,121,129,44,1,1,17,2,146,1,3,1,17,
-3,146,0,129,46,1,1,17,5,141,61,0,0,160,0,134,126,3,1,1,17,2,146,44,1,1,17,2,
-141,62,1,1,17,5,141,62,135,14,1,84,71,1,17,3,141,62,3,0,12,1,1,17,7,141,62,2,
-0,12,1,135,16,1,86,72,1,17,2,141,66,5,1,17,5,141,63,135,18,1,88,73,1,17,3,141,
-63,55,0,12,1,1,17,3,141,63,1,83,1,17,3,144,41,2,1,1,17,3,141,59,135,11,146,21,
-1,17,2,144,87,1,1,17,6,141,60,10,141,65,0,12,2,86,146,94,1,17,2,146,96,1,1,17,
-5,141,60,12,0,12,2,87,141,61,1,17,3,141,60,135,7,1,1,17,3,141,59,3,146,40,1,
-17,10,141,59,146,127,135,64,141,61,146,123,1,15,141,61,0,12,2,89,1,17,3,141,
-59,135,65,141,62,1,17,3,141,62,4,146,43,1,17,3,141,60,135,67,1,1,17,3,141,60,
-135,68,1,1,17,3,141,60,11,1,1,17,5,141,60,12,6,5,1,1,17,2,141,60,146,106,1,17,
-3,141,60,130,73,1,1,17,2,146,67,1,1,17,3,141,126,132,72,0,0,189,132,64,1,17,
-3,146,63,74,1,1,17,3,141,127,76,1,1,17,3,141,63,4,146,54,1,17,3,143,87,130,89,
-1,1,17,3,141,65,6,146,56,1,17,3,143,89,130,91,1,1,17,12,141,66,147,16,147,12,
-5,3,147,40,147,10,1,32,141,78,0,12,2,105,1,17,5,141,64,135,97,141,66,12,141,
-65,1,17,3,141,64,141,70,1,1,17,2,141,64,1,1,17,5,141,64,135,84,1,4,141,68,1,
-17,2,141,64,1,1,17,4,141,64,135,81,135,82,1,1,17,3,141,62,30,141,63,1,17,4,141,
-62,135,89,141,65,147,18,1,17,3,146,22,130,87,0,0,135,255,255,127,1,17,3,145,
-112,130,100,1,1,17,5,141,64,135,107,141,76,22,141,75,1,17,3,141,74,141,80,1,
-1,17,4,141,65,135,74,3,1,1,17,5,141,65,135,94,1,14,141,78,1,17,13,141,65,147,
-25,135,96,141,72,147,27,8,147,26,47,7,0,12,2,119,135,90,1,1,17,3,141,65,130,
-98,1,1,17,3,143,102,135,78,1,1,17,5,141,66,135,80,12,23,1,1,17,2,146,94,1,1,
-17,2,141,67,1,1,17,3,142,26,135,92,1,1,17,3,141,68,147,88,1,1,17,2,141,68,135,
-116,1,17,3,142,28,2,1,2,19,129,0,0,0,0,0,0,0,0,0,0,8,8,8,8,8,0,0,0,0,0,0,0,0,
-0,0,0,0,0,0,0,0,0,0,8,1,16,0,1,1,1,0,0,0,1,3,0,3,2,1,6,6,6,6,6,6,6,6,6,6,1,0,
-1,1,1,1,1,5,37,5,37,69,5,1,1,65,1,1,1,1,1,33,1,1,1,1,1,1,1,1,33,1,1,0,16,0,1,
-1,0,21,53,5,37,69,5,1,1,65,1,1,1,1,17,33,1,1,17,1,17,1,1,1,33,1,1,0,16,0,1,0,
-2,3,12,101,110,100,32,111,102,32,105,110,112,117,116,2,3,16,116,114,97,105,108,
-105,110,103,32,103,97,114,98,97,103,101,1,17,2,146,103,141,72,1,17,2,141,72,
-146,52,1,17,5,141,72,2,4,146,98,1,1,17,2,146,106,1,1,17,2,141,73,145,35,1,17,
-3,141,73,5,147,39,1,17,3,141,73,2,1,1,17,5,141,73,7,9,146,103,1,1,17,2,147,32,
-1,1,17,2,147,22,1,1,17,2,141,79,145,41,1,17,4,141,76,1,11,147,45,1,17,5,141,
-76,12,14,146,108,1,1,17,2,147,37,1,1,17,2,147,27,1,1,17,2,146,113,141,78,1,17,
-2,141,77,141,78,1,17,2,144,22,1,1,17,2,139,54,147,34,1,17,2,147,36,1,1,17,3,
-141,75,1,146,72,1,17,2,141,75,1,1,17,3,141,79,135,83,141,80,1,17,3,141,76,2,
-1,1,17,2,141,80,1,1,17,2,147,42,1,1,17,3,147,49,0,13,0,1,1,17,2,141,79,141,87,
-1,17,3,141,79,2,1,1,17,2,141,79,1,1,17,2,146,42,1,1,17,2,139,76,141,74,1,17,
-3,139,75,32,33,1,17,2,139,75,1,1,17,4,139,75,139,78,131,64,1,1,17,2,139,75,1,
-1,17,3,139,75,5,1,2,3,17,104,111,119,32,100,111,32,105,32,105,116,101,114,97,
-116,101,32,1,17,2,141,79,144,1,1,17,3,141,79,147,7,1,1,17,2,147,18,1,1,17,2,
-141,76,141,77,1,17,4,141,76,1,135,43,141,79,1,17,3,141,76,147,11,1,1,17,2,147,
-68,1,1,17,2,141,76,141,77,1,17,3,141,75,141,76,147,21,1,17,2,141,75,1,1,1,2,
-0,0,0,0,13,0,1,1,2,1,0,13,0,1,17,3,141,76,1,141,77,1,17,4,141,73,136,34,14,129,
-120,1,17,4,141,73,143,41,1,130,110,1,17,3,141,73,144,11,1,1,17,3,147,59,147,
-22,1,1,17,2,147,6,5,1,17,3,141,75,2,1,1,17,2,141,58,60,1,17,3,141,57,1,141,58,
-1,17,2,141,57,131,51,1,17,2,141,57,1,1,17,3,141,57,131,49,1,1,17,3,141,57,136,
-16,1,1,18,3,51,50,0,0,43,1,18,3,52,51,0,0,45,1,17,2,142,0,0,0,43,1,18,3,50,2,
-1,1,18,3,51,4,1,1,17,3,141,61,6,141,126,1,17,2,141,82,1,1,17,3,144,46,40,1,1,
-17,3,144,47,62,1,1,17,3,141,64,14,1,1,17,2,146,85,1,1,17,3,141,65,131,64,142,
-4,1,17,2,141,88,1,1,17,3,141,127,3,1,1,17,3,141,121,10,1,1,17,2,146,90,1,1,17,
-3,141,126,131,42,142,9,1,17,2,141,93,1,1,17,3,141,71,3,1,1,17,2,141,95,1,1,17,
-3,141,72,69,1,1,17,3,141,72,67,1,1,17,3,141,72,70,1,1,17,5,141,72,147,106,136,
-92,131,76,142,16,1,17,3,142,7,20,1,1,17,2,141,93,142,18,1,17,3,144,79,131,77,
-1,1,17,3,141,75,131,82,1,1,17,2,141,95,1,1,17,3,141,76,7,1,1,17,2,141,97,1,1,
-17,3,142,101,131,80,142,24,1,17,3,145,88,131,58,1,1,17,3,141,79,133,43,1,1,17,
-3,141,79,35,1,1,17,2,141,111,1,1,17,3,144,75,73,1,1,17,3,144,76,91,1,1,17,3,
-141,91,43,1,1,17,2,141,115,1,1,17,3,141,84,89,1,1,17,4,141,84,87,11,1,1,17,3,
-141,84,90,1,1,17,2,141,115,1,1,17,3,141,85,34,1,1,17,3,141,119,21,1,1,17,2,146,
-121,1,1,17,2,141,85,74,1,17,3,144,8,2,1,1,17,2,147,50,1,1,17,2,141,87,2,1,17,
-4,141,87,131,28,2,1,1,17,2,141,87,136,107,1,17,5,141,87,129,48,1,0,12,2,130,
-109,2,3,4,114,118,97,108,2,3,49,115,121,115,99,97,108,108,32,49,52,32,45,32,
-109,101,109,108,105,109,105,116,32,101,120,99,101,101,100,101,100,44,32,100,
-114,111,112,112,105,110,103,32,97,32,116,104,114,101,97,100,1,17,3,141,82,135,
-118,141,85,1,17,2,141,82,147,65,1,17,3,141,84,135,124,141,87,1,17,8,141,83,143,
-51,3,129,122,135,125,2,143,50,1,1,17,3,142,111,147,91,1,1,17,3,141,84,135,125,
-1,1,17,3,141,83,1,141,84,1,17,2,143,118,1,1,17,2,141,84,136,0,1,17,4,140,6,136,
-1,1,130,123,1,17,2,141,84,3,1,17,3,141,84,135,44,1,1,17,4,141,84,136,6,1,130,
-126,1,17,3,144,120,135,46,1,1,17,6,140,10,135,47,141,89,136,6,1,131,0,1,17,3,
-141,86,6,1,1,17,2,141,86,148,23,1,17,2,148,25,1,1,17,2,141,87,3,1,17,3,141,87,
-2,1,1,17,3,141,87,3,1,1,17,2,141,86,141,87,1,17,2,148,30,1,1,17,3,141,86,8,148,
-114,1,17,3,141,86,9,148,113,1,17,4,141,86,136,15,1,27,1,17,2,141,86,147,90,1,
-17,3,141,90,12,149,0,1,17,3,141,87,136,18,141,103,1,17,2,141,87,148,124,1,17,
-5,141,87,136,95,2,143,77,1,1,17,4,141,87,136,23,1,130,22,1,17,3,141,87,136,113,
-148,49,1,17,2,141,87,1,1,17,2,141,87,147,98,1,17,3,145,101,136,89,1,1,17,3,141,
-88,136,98,1,1,17,4,141,88,137,35,1,139,95,1,17,3,141,88,136,100,1,1,17,4,141,
-88,137,37,1,139,97,1,17,2,141,98,148,127,1,17,4,141,88,36,141,89,1,1,17,5,141,
-88,136,34,142,92,131,27,45,1,17,3,141,88,136,97,1,1,17,5,141,87,136,34,141,119,
-131,29,142,2,1,17,7,140,2,136,35,141,120,142,2,136,39,141,120,147,109,1,17,3,
-141,88,130,33,1,1,17,4,141,88,136,39,1,130,38,1,17,4,141,88,33,149,9,148,123,
-1,17,4,141,88,129,93,1,50,1,17,2,141,88,148,121,1,17,4,141,88,31,148,120,1,1,
-17,2,141,110,148,115,1,17,2,141,89,1,1,17,3,141,89,147,118,1,1,17,2,141,113,
-148,116,1,17,2,141,90,147,120,1,17,3,145,38,35,1,1,17,4,141,91,3,136,112,1,1,
-17,2,141,90,141,91,1,17,3,141,90,137,5,1,1,17,4,141,89,137,6,1,141,90,1,17,5,
-141,89,136,52,142,9,64,147,126,1,17,2,141,121,148,113,1,17,2,141,90,1,1,17,5,
-141,90,135,98,142,12,148,114,148,1,1,17,4,141,90,135,99,1,148,117,1,17,4,141,
-90,136,59,1,148,118,1,17,4,141,90,136,60,1,148,117,1,17,5,141,89,136,59,142,
-16,131,55,148,5,1,17,3,141,89,136,60,1,1,17,3,141,89,137,4,1,1,17,3,141,89,136,
-64,1,1,17,4,140,68,136,65,1,131,59,1,17,2,140,100,148,10,1,17,2,140,100,1,1,
-2,24,142,12,53,51,50,49,45,43,37,35,33,141,120,32,29,27,25,22,18,15,14,12,8,
-141,97,3,1,1,17,3,141,93,136,69,79,1,17,3,141,92,136,118,141,93,1,17,3,144,103,
-144,90,1,1,17,2,148,88,1,1,17,4,141,93,136,75,141,94,149,2,1,17,3,141,93,136,
-72,1,1,17,3,141,93,132,66,1,1,17,3,141,93,136,76,1,1,17,4,141,93,136,77,1,149,
-6,1,17,4,141,93,6,1,149,3,1,17,3,141,93,132,24,1,1,17,3,144,102,145,41,1,1,17,
-2,142,19,149,8,1,17,2,141,116,1,1,17,4,141,96,136,81,142,38,149,12,1,17,2,142,
-22,149,12,1,17,2,141,97,17,1,17,3,141,97,137,82,1,1,17,4,141,97,18,7,1,1,17,
-6,140,90,136,86,5,149,19,4,1,1,2,24,142,33,74,72,71,70,66,64,58,56,54,142,13,
-53,50,48,46,43,39,36,35,1,7,141,118,24,22,1,17,2,141,102,1,1,17,5,141,100,22,
-137,87,1,0,0,206,16,1,17,2,141,100,1,1,17,3,144,117,136,80,1,1,17,2,148,7,137,
-71,1,17,2,141,98,1,1,17,3,141,98,129,99,1,1,17,7,141,98,4,149,70,130,96,131,
-90,108,1,1,17,2,148,11,130,77,1,17,3,144,2,130,79,1,1,17,3,144,4,134,78,0,0,
-189,132,64,1,17,3,144,4,2,1,1,40,2,0,0,2,0,13,0,1,40,2,0,0,130,233,171,36,1,
-1,40,2,0,0,131,185,187,41,1,1,40,2,0,0,132,241,227,71,1,2,3,16,98,97,100,32,
-114,97,110,100,32,108,105,109,105,116,58,32,2,3,19,114,97,110,100,45,101,108,
-101,109,58,32,119,104,97,116,32,98,101,32,2,3,22,114,110,100,45,114,97,110,103,
-101,58,32,98,97,100,32,114,97,110,103,101,58,32,1,17,2,148,125,141,90,1,17,2,
-141,90,1,1,17,2,148,123,1,1,17,2,141,91,0,0,129,191,159,25,1,17,2,148,87,1,1,
-17,4,141,91,1,141,92,0,0,132,128,128,9,1,17,4,143,98,132,102,1,10,1,17,4,141,
-91,3,141,92,0,0,132,128,128,9,1,17,4,141,91,4,141,95,0,0,132,128,128,9,1,17,
-7,141,91,5,141,96,0,0,132,128,128,9,2,0,0,129,191,159,25,1,1,17,8,141,91,132,
-110,4,6,141,97,0,0,132,128,128,9,133,92,1,1,17,2,141,91,146,44,1,17,3,143,41,
-2,1,1,17,2,149,6,1,1,17,3,146,91,135,11,141,93,1,17,4,141,93,132,111,1,0,0,135,
-255,255,127,1,17,3,141,93,133,39,1,1,17,2,148,76,1,1,17,6,141,93,0,0,135,255,
-255,127,133,41,141,94,132,118,1,1,17,3,141,93,17,149,25,1,17,3,141,94,18,149,
-26,1,17,7,141,93,5,2,3,1,133,44,141,94,1,17,2,141,93,1,1,17,5,141,93,137,114,
-26,1,7,1,17,3,141,93,131,86,149,30,1,17,3,147,45,2,1,1,17,5,141,94,137,117,28,
-131,84,1,1,17,3,141,93,132,127,141,94,1,17,3,147,48,5,1,1,17,5,141,94,144,126,
-3,132,83,1,1,17,3,141,99,134,99,149,36,1,17,3,147,51,8,1,1,17,5,141,97,145,102,
-3,134,87,1,1,17,3,141,97,148,109,1,1,17,3,141,97,135,109,149,40,1,17,3,141,97,
-12,1,1,17,3,145,125,135,120,1,1,17,3,141,98,133,7,1,1,17,3,141,97,133,10,145,
-66,1,17,3,141,97,130,102,1,1,17,3,141,97,133,2,1,1,17,4,141,97,141,101,18,1,
-1,17,5,141,97,130,97,149,48,148,118,1,1,17,2,147,76,1,1,17,3,141,98,130,117,
-142,19,1,17,4,141,98,141,105,133,17,1,1,17,2,141,98,3,1,17,5,141,98,148,123,
-2,133,19,1,1,17,5,141,98,130,103,149,54,134,2,1,1,17,2,147,82,1,1,17,3,141,99,
-1,144,58,1,17,3,141,99,14,147,96,1,17,3,141,99,29,1,1,17,3,141,99,134,7,1,1,
-17,3,141,117,133,26,149,60,1,17,3,147,75,32,1,1,17,5,141,101,138,19,57,133,26,
-1,1,17,3,141,101,133,19,1,1,17,3,141,100,133,81,141,101,1,17,4,141,98,137,110,
-147,70,140,111,1,17,4,141,98,137,127,141,100,1,1,17,3,146,31,137,99,1,1,17,4,
-141,99,138,50,1,140,115,1,17,4,143,46,138,50,1,140,112,1,17,3,141,100,138,5,
-1,1,17,2,149,23,1,1,17,3,141,101,1,149,21,1,17,4,141,101,133,60,1,141,108,1,
-17,4,141,101,137,124,1,10,1,17,2,149,24,1,1,17,2,141,102,1,1,17,3,142,6,133,
-33,149,77,1,17,4,141,102,49,141,103,1,2,3,6,112,99,97,112,110,103,1,4,1,1,2,
-3,9,103,101,110,101,114,97,116,111,114,1,4,1,1,1,42,2,0,0,4,0,0,5,1,17,2,148,
-103,137,61,2,16,3,0,2,48,1,17,4,1,137,59,133,52,2,1,17,3,148,91,137,62,1,1,17,
-3,147,109,133,52,148,88,2,16,3,0,2,47,1,17,3,1,141,8,2,1,17,2,149,82,1,1,17,
-2,149,17,133,47,1,17,3,148,8,141,12,1,1,17,3,145,90,141,13,1,1,17,3,147,53,133,
-59,148,95,2,16,3,0,2,46,1,17,4,1,141,15,2,138,30,2,16,3,0,2,45,1,17,3,1,133,
-55,2,1,17,3,145,107,138,35,1,1,17,2,149,92,1,1,17,2,149,27,141,19,1,17,2,143,
-47,1,1,17,4,145,58,133,68,1,0,0,144,0,2,16,3,0,2,44,1,17,3,1,132,62,2,1,17,4,
-141,83,135,23,1,0,0,144,0,1,17,2,149,20,141,25,2,16,3,0,2,43,1,17,6,1,135,28,
-3,0,0,144,0,132,66,2,2,16,3,0,2,42,1,17,4,1,133,68,2,0,0,144,0,2,16,3,0,2,41,
-1,17,4,1,135,35,147,76,2,1,40,2,0,0,129,0,0,13,0,1,40,2,0,0,0,1,1,40,2,0,0,127,
-0,13,0,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,1,4,1,40,2,0,0,130,0,0,13,0,1,
-40,2,0,0,0,1,1,40,2,0,0,129,127,0,13,0,1,40,2,0,0,135,255,255,127,1,1,40,2,0,
-0,1,4,1,40,2,0,0,130,128,0,0,13,0,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,40,2,0,0,129,
-255,127,0,13,0,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,135,255,255,127,1,1,40,
-2,0,0,1,5,1,40,2,0,0,132,128,0,0,13,0,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,40,2,0,
-0,131,255,127,0,13,0,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,135,255,255,127,
-1,1,40,2,0,0,1,5,1,40,2,0,0,129,0,0,13,0,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,40,
-2,0,0,0,1,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,40,2,0,0,127,0,13,0,1,40,2,0,0,135,
-255,255,127,1,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,135,255,255,127,1,1,40,
-2,0,0,135,255,255,127,1,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,1,8,1,40,2,0,
-0,130,0,0,13,0,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,40,2,0,0,0,1,1,
-40,2,0,0,0,1,1,40,2,0,0,129,127,0,13,0,1,40,2,0,0,135,255,255,127,1,1,40,2,0,
-0,135,255,255,127,1,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,135,255,255,127,
-1,1,40,2,0,0,135,255,255,127,1,1,40,2,0,0,1,8,1,11,33,2,8,1,15,21,14,28,31,27,
-35,38,34,42,44,41,47,49,46,0,0,131,255,127,0,0,132,128,0,0,0,132,128,1,0,0,129,
-255,127,0,0,130,128,0,0,0,130,128,1,0,0,129,127,0,0,130,0,0,0,130,1,0,0,127,
-0,0,129,0,0,0,129,1,0,0,1,0,0,2,0,0,3,1,17,3,142,101,134,4,150,38,1,17,3,142,
-96,134,3,150,39,1,17,3,142,103,134,4,150,40,1,17,3,148,55,129,12,1,2,16,3,0,
-2,40,1,17,2,1,150,43,2,16,3,0,2,39,1,17,4,1,134,9,134,11,2,2,16,3,0,2,38,1,17,
-3,1,129,18,2,2,16,3,0,2,37,1,17,3,1,118,2,2,16,3,0,2,36,1,17,13,1,134,17,150,
-51,134,15,150,51,129,12,14,13,12,134,13,10,116,2,2,16,3,0,2,35,1,17,3,1,129,
-24,2,1,17,2,149,107,141,99,1,17,2,143,15,1,1,17,3,149,4,141,102,1,2,16,3,0,2,
-34,1,17,3,1,141,105,2,1,17,2,150,8,1,1,17,2,149,113,141,105,1,17,2,147,17,1,
-2,16,3,0,2,33,1,17,3,1,141,109,2,1,17,2,150,51,1,1,17,2,149,84,138,38,1,17,3,
-148,14,141,111,1,2,16,3,0,2,32,1,17,3,1,138,43,2,1,17,3,143,49,141,116,1,1,17,
-3,143,32,141,116,1,2,16,3,0,2,31,1,17,3,1,141,119,2,1,17,3,142,54,139,1,1,2,
-16,3,0,2,30,1,17,3,1,129,36,150,70,2,16,3,0,2,29,1,17,3,1,129,38,2,1,17,3,148,
-125,129,39,1,1,17,2,149,119,141,124,2,16,3,0,2,28,1,17,3,1,141,126,2,2,16,3,
-0,2,27,1,17,3,1,138,58,2,2,16,3,0,2,26,1,17,3,1,138,50,2,1,17,3,149,120,13,1,
-1,17,3,146,88,142,5,1,1,17,3,149,122,15,1,1,17,3,146,86,142,8,1,2,16,3,0,2,25,
-1,17,3,1,142,8,147,96,2,16,3,0,2,24,1,17,3,1,142,10,2,2,16,3,0,2,23,1,17,3,1,
-142,12,147,109,1,17,3,2,142,13,147,101,2,16,3,0,2,22,1,17,4,1,142,16,3,2,2,16,
-3,0,2,21,1,17,3,1,134,117,2,2,16,3,0,2,20,1,17,4,1,142,20,9,2,1,17,3,148,59,
-39,150,35,2,16,3,0,2,19,1,17,4,1,41,2,3,2,16,3,0,2,18,1,17,3,1,132,91,2,1,17,
-3,145,89,134,72,149,43,2,16,3,0,2,17,1,17,4,1,32,136,31,2,2,16,3,0,2,16,1,17,
-5,1,34,139,40,2,23,2,16,3,0,2,15,1,17,4,1,129,85,2,36,2,16,3,0,2,14,1,17,3,1,
-134,72,2,2,16,3,0,2,13,1,17,3,1,0,0,134,141,32,2,1,17,3,143,76,142,36,1,2,16,
-3,0,2,12,1,17,3,1,142,38,2,1,17,3,142,107,15,1,2,16,3,0,2,11,1,17,3,1,65,150,
-124,2,16,3,0,2,10,1,17,3,1,4,2,2,3,5,98,121,116,101,115,1,4,1,1,1,1,2,0,0,0,
-0,13,0,1,1,2,0,0,0,1,1,1,2,0,0,0,1,1,1,2,0,0,6,1,2,16,3,0,2,9,1,17,3,150,21,
-132,118,2,2,16,3,0,2,8,1,17,3,1,136,54,2,1,17,3,148,77,133,31,1,2,16,3,0,2,7,
-2,16,3,0,2,6,1,17,3,1,134,91,151,12,1,17,4,146,105,129,112,1,0,0,160,0,2,16,
-3,0,2,5,2,16,3,0,2,4,2,16,3,0,2,3,2,16,3,0,2,2,2,16,3,0,2,1,2,16,3,0,2,0,1,17,
-2,150,60,142,65,1,17,3,146,1,142,66,149,84,2,16,3,0,1,255,1,17,4,1,142,64,3,
-2,1,17,2,150,101,1,2,3,8,111,110,99,101,45,100,101,99,2,3,8,109,97,110,121,45,
-100,101,99,2,3,5,98,117,114,115,116,1,4,1,3,1,4,1,3,1,4,1,3,1,17,2,147,22,22,
-1,17,3,150,70,140,11,1,1,17,4,148,59,142,76,1,129,81,1,17,3,148,38,135,0,148,
-39,2,16,3,0,1,254,1,17,3,1,142,82,2,2,16,3,0,1,253,1,17,3,1,142,85,2,2,16,3,
-0,1,252,2,16,3,0,1,251,1,17,2,1,2,2,16,3,0,1,250,1,17,4,1,142,88,5,2,2,16,3,
-0,1,249,1,17,5,1,139,20,12,129,91,2,2,16,3,0,1,248,1,17,3,1,139,111,2,2,16,3,
-0,1,247,1,17,3,1,142,92,2,2,16,3,0,1,246,1,17,4,1,130,22,2,148,65,2,16,3,0,1,
-245,1,17,3,1,139,76,2,2,16,3,0,1,244,1,17,2,1,2,2,16,3,0,1,243,1,17,3,1,135,
-74,2,2,16,3,0,1,242,1,17,3,1,130,30,2,1,17,2,150,113,135,70,2,16,3,0,1,241,1,
-17,3,1,142,107,2,2,16,3,0,1,240,1,17,3,1,5,2,2,16,3,0,1,239,1,17,5,1,139,39,
-2,152,30,38,1,17,2,150,120,135,77,2,16,3,0,1,238,1,17,3,1,142,114,2,2,16,3,0,
-1,237,1,17,4,1,129,121,2,129,116,2,16,3,0,1,236,1,17,3,1,14,2,2,16,3,0,1,235,
-1,17,5,1,139,48,2,152,39,46,1,17,2,151,28,1,1,17,2,151,2,135,87,2,16,3,0,1,234,
-1,17,3,1,135,45,144,48,2,16,3,0,1,233,1,17,4,1,142,126,4,2,2,16,3,0,1,232,1,
-17,3,1,135,39,2,2,16,3,0,1,231,1,17,4,1,130,7,2,130,2,2,16,3,0,1,230,1,17,2,
-1,2,1,17,3,25,29,1,1,17,5,24,139,62,1,152,53,59,2,16,3,0,1,229,2,16,3,0,1,228,
-1,17,3,1,129,119,2,2,16,3,0,1,227,1,17,3,1,130,65,2,1,42,2,0,0,11,0,0,20,2,3,
-8,109,117,116,97,45,110,117,109,2,3,9,98,121,116,101,45,100,114,111,112,2,3,
-8,98,121,116,101,45,105,110,99,2,3,8,98,121,116,101,45,100,101,99,2,3,11,98,
-121,116,101,45,105,110,115,101,114,116,2,3,11,98,121,116,101,45,114,101,112,
-101,97,116,2,3,11,98,121,116,101,45,114,97,110,100,111,109,2,3,9,98,121,116,
-101,45,112,101,114,109,2,3,9,102,117,115,101,45,116,104,105,115,2,3,9,102,117,
-115,101,45,110,101,120,116,2,3,8,102,117,115,101,45,111,108,100,2,3,10,115,101,
-113,45,114,101,112,101,97,116,2,3,11,115,101,100,45,115,101,113,45,100,101,108,
-2,3,8,108,105,110,101,45,100,101,108,2,3,12,108,105,110,101,45,100,101,108,45,
-115,101,113,2,3,8,108,105,110,101,45,100,117,112,2,3,10,108,105,110,101,45,99,
-108,111,110,101,2,3,11,108,105,110,101,45,114,101,112,101,97,116,2,3,9,108,105,
-110,101,45,115,119,97,112,2,3,9,108,105,110,101,45,112,101,114,109,2,3,8,108,
-105,115,116,45,105,110,115,2,3,12,108,105,115,116,45,114,101,112,108,97,99,101,
-2,3,10,117,116,102,56,45,119,105,100,101,110,2,3,11,117,116,102,56,45,105,110,
-115,101,114,116,2,3,13,116,114,101,101,45,115,119,97,112,45,111,110,101,2,3,
-13,116,114,101,101,45,115,119,97,112,45,116,119,111,2,3,8,116,114,101,101,45,
-100,101,108,2,3,8,116,114,101,101,45,100,117,112,2,3,12,116,114,101,101,45,115,
-116,117,116,116,101,114,2,3,4,116,101,120,116,2,3,9,100,101,108,105,109,105,
-116,101,100,2,3,37,115,116,114,105,110,103,45,102,108,97,116,116,101,110,58,
-32,119,104,97,116,32,107,105,110,100,32,111,102,32,110,111,100,101,32,105,115,
-32,2,3,23,115,116,114,105,110,103,45,109,117,116,97,116,101,58,32,119,104,97,
-116,32,105,115,32,2,3,9,97,98,45,115,116,114,105,110,103,1,4,1,34,1,4,1,34,1,
-4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,
-34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,
-4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,
-34,1,4,1,34,1,4,1,34,1,4,1,34,1,4,1,32,1,17,2,151,87,143,79,1,17,2,144,123,1,
-1,17,3,150,112,143,82,1,2,16,3,0,1,226,1,17,3,1,143,85,2,1,17,2,151,116,1,1,
-17,3,144,103,137,97,152,40,1,17,3,150,55,131,12,1,2,16,3,0,1,225,1,17,3,1,137,
-92,2,1,17,3,150,78,140,81,152,44,2,16,3,0,1,224,1,17,3,1,137,90,2,2,16,3,0,1,
-223,1,17,3,1,137,76,2,1,17,3,149,125,131,20,1,2,16,3,0,1,222,1,17,3,1,136,15,
-2,2,16,3,0,1,221,1,17,3,1,131,24,2,2,16,3,0,1,220,1,17,3,1,137,3,2,1,17,3,144,
-114,137,105,1,1,17,2,151,97,143,102,2,16,3,0,1,219,1,17,3,1,143,106,2,2,16,3,
-0,1,218,1,17,4,1,22,152,61,2,1,17,3,150,76,131,33,1,1,17,3,21,137,112,1,2,16,
-3,0,1,217,1,17,3,1,143,110,151,0,2,16,3,0,1,216,1,17,3,1,136,31,2,1,17,2,152,
-17,1,1,17,2,150,75,1,2,16,3,0,1,215,1,17,3,1,143,118,2,2,16,3,0,1,214,1,17,4,
-1,34,152,73,2,2,16,3,0,1,213,1,17,3,1,136,26,2,2,16,3,0,1,212,1,17,3,1,131,18,
-2,1,17,3,150,92,131,49,1,1,17,3,37,138,0,1,1,17,3,147,120,138,3,152,80,1,17,
-3,129,65,138,16,1,1,17,3,129,65,131,53,1,1,17,3,148,116,131,54,1,1,17,3,42,138,
-5,1,1,17,2,152,10,144,2,1,17,3,150,100,144,3,1,1,17,3,148,88,141,19,1,1,17,3,
-147,96,144,7,1,1,17,3,152,68,141,23,1,1,17,4,30,51,152,90,1,1,17,3,150,105,131,
-62,1,2,16,3,0,1,211,1,17,3,1,136,57,2,2,16,3,0,1,210,1,17,3,1,136,51,2,1,17,
-3,145,26,138,17,1,1,17,3,151,3,141,6,152,97,1,17,3,150,46,141,7,1,2,16,3,0,1,
-209,1,17,3,1,138,16,2,1,17,3,151,45,131,25,1,2,16,3,0,1,208,1,17,3,1,138,21,
-2,1,17,3,150,21,138,20,1,2,16,3,0,1,207,1,17,3,1,138,24,2,2,16,3,0,1,206,1,17,
-3,1,136,59,2,2,16,3,0,1,205,1,17,3,1,136,62,2,2,16,3,0,1,204,1,17,3,1,131,53,
-2,2,16,3,0,1,203,1,17,3,1,131,51,2,1,17,3,65,136,79,1,1,17,3,150,64,131,87,1,
-2,16,3,0,1,202,1,17,3,1,136,82,2,2,16,3,0,1,201,1,17,3,1,136,76,2,1,17,3,145,
-51,138,42,1,1,17,2,152,47,144,39,1,17,3,151,38,144,41,1,2,16,3,0,1,200,1,17,
-3,1,138,60,2,2,16,3,0,1,199,1,17,4,1,88,152,127,2,2,16,3,0,1,198,1,17,3,1,136,
-95,2,2,16,3,0,1,197,1,17,3,1,138,66,2,2,16,3,0,1,196,1,17,3,1,131,104,2,2,16,
-3,0,1,195,1,17,3,1,136,91,2,1,17,3,149,96,144,53,149,103,1,17,3,150,66,144,54,
-1,2,16,3,0,1,194,1,17,3,1,144,57,2,2,16,3,0,1,193,1,17,3,1,138,76,2,1,17,3,149,
-105,136,108,1,2,16,3,0,1,192,1,17,3,1,144,63,2,2,16,3,0,1,191,1,17,4,1,131,117,
-11,2,2,16,3,0,1,190,1,17,3,1,136,104,2,2,16,3,0,1,189,1,17,3,1,144,69,2,1,17,
-2,152,103,1,1,17,3,150,95,138,87,153,24,1,17,3,145,119,144,71,1,1,17,3,151,40,
-131,125,1,1,17,3,145,85,144,74,1,2,16,3,0,1,188,1,17,2,1,144,74,2,16,3,0,1,187,
-1,17,4,1,120,152,91,2,2,16,3,0,1,186,1,17,3,1,132,4,2,2,16,3,0,1,185,1,17,3,
-1,8,2,2,16,3,0,1,184,1,17,3,1,14,2,2,16,3,0,1,183,1,17,3,1,138,88,2,1,17,2,152,
-93,144,85,1,17,3,147,34,144,87,1,1,17,4,12,129,3,152,102,1,1,17,3,11,132,14,
-1,1,17,3,10,17,1,1,17,3,9,22,1,1,17,3,8,138,95,1,2,3,11,111,112,101,110,45,115,
-105,110,103,108,101,2,3,3,98,117,103,2,3,36,98,117,103,32,45,32,101,118,101,
-114,121,116,104,105,110,103,32,115,104,111,117,108,100,32,98,101,32,112,97,114,
-115,101,97,98,108,101,2,3,16,119,104,97,116,32,102,105,110,101,32,110,111,100,
-101,58,32,2,3,16,119,104,97,116,32,102,105,110,101,32,110,111,100,101,58,32,
-1,17,3,145,59,0,13,2,0,0,48,1,17,3,145,60,0,13,2,0,0,50,1,17,3,145,61,0,13,2,
-0,0,52,1,17,5,145,59,2,0,13,2,0,0,49,3,1,17,3,145,63,0,13,2,0,0,54,1,17,3,145,
-59,0,13,2,0,0,57,1,17,4,145,64,1,0,13,2,0,0,56,1,17,5,145,58,1,0,13,2,0,0,55,
-3,1,17,5,145,64,1,0,13,2,0,0,53,6,1,17,5,145,65,1,0,13,2,0,0,51,6,1,18,3,133,
-121,133,120,1,1,18,2,133,118,1,1,18,3,133,121,2,1,1,18,3,133,122,1,133,127,1,
-18,2,133,112,1,2,3,19,116,97,103,45,105,110,102,111,58,32,98,97,100,32,110,111,
-100,101,32,2,3,7,87,84,78,32,73,83,32,2,3,3,63,63,63,2,3,7,87,84,78,32,73,83,
-32,2,3,3,63,63,63,2,3,7,120,112,45,115,119,97,112,2,3,36,103,101,110,101,114,
-97,116,101,45,110,111,100,101,58,32,117,110,101,120,112,101,99,116,101,100,32,
-110,111,100,101,32,116,121,112,101,32,2,3,9,120,112,45,105,110,115,101,114,116,
-2,3,6,120,112,45,100,117,112,2,3,7,120,112,45,112,117,109,112,2,3,9,120,112,
-45,114,101,112,101,97,116,1,4,1,31,1,4,1,7,1,4,1,6,1,4,1,6,1,4,1,6,1,4,1,6,1,
-17,2,153,9,145,1,1,17,3,150,43,145,2,1,1,17,3,149,86,145,4,1,2,16,3,0,1,182,
-1,17,4,1,145,5,145,7,2,1,17,3,153,12,153,31,1,1,17,3,152,111,142,10,1,1,18,3,
-134,53,134,52,0,0,32,1,18,3,134,54,134,53,0,0,10,1,18,3,134,51,2,1,1,18,4,134,
-45,1,134,44,0,13,0,1,18,3,134,57,134,56,0,0,34,1,18,3,134,58,134,57,0,0,39,1,
-18,3,134,55,2,1,2,16,3,0,1,181,1,17,2,1,137,55,2,16,3,0,1,180,1,17,4,1,137,56,
-2,137,57,2,16,3,0,1,179,1,17,4,1,137,58,2,137,59,2,16,3,0,1,178,1,17,3,1,137,
-60,2,1,18,3,134,73,134,72,1,1,18,2,134,52,1,1,17,3,148,89,142,17,148,12,2,16,
-3,0,1,177,1,17,3,1,145,27,2,1,17,2,147,94,1,2,16,3,0,1,176,1,17,3,1,134,73,2,
-1,17,2,147,101,1,1,17,3,150,65,134,63,1,2,16,3,0,1,175,1,17,3,1,145,34,148,21,
-1,17,3,147,109,134,89,1,1,17,2,148,11,1,1,17,3,147,108,134,80,1,1,17,4,150,78,
-134,78,6,1,1,17,2,153,10,142,101,1,17,3,150,120,145,38,1,2,16,3,0,1,174,1,17,
-4,1,134,90,4,2,1,17,2,152,112,1,1,17,3,148,20,145,44,148,31,1,17,2,147,115,1,
-1,17,3,147,109,3,1,1,17,3,148,24,33,1,1,18,3,134,89,1,24,1,17,3,148,113,145,
-49,148,36,2,16,3,0,1,173,1,17,3,1,44,2,1,17,2,147,122,1,1,17,3,147,120,5,147,
-126,1,17,3,148,0,43,1,1,17,2,148,30,1,2,16,3,0,1,172,1,17,3,1,134,100,2,1,17,
-4,150,98,134,98,6,1,2,16,3,0,1,171,1,17,3,1,134,102,2,1,17,3,148,1,50,1,1,17,
-3,148,8,38,1,1,17,3,148,40,52,1,2,16,3,0,1,170,2,16,3,0,1,169,1,17,2,1,2,1,17,
-2,148,14,154,26,1,17,2,148,43,1,2,16,3,0,1,168,1,17,3,1,134,113,2,1,17,2,148,
-18,76,1,17,2,148,47,1,2,16,3,0,1,167,1,17,3,1,134,117,2,1,17,2,148,50,1,1,17,
-3,147,110,134,119,1,2,16,3,0,1,166,1,17,5,1,134,118,12,8,2,1,17,3,148,53,68,
-1,1,17,2,148,22,1,1,17,4,148,18,134,112,1,18,1,17,3,148,59,58,1,1,17,2,148,27,
-148,28,2,16,3,0,1,165,1,17,2,1,154,45,1,17,2,148,28,1,2,16,3,0,1,164,1,17,3,
-1,135,3,2,1,17,3,148,29,78,1,1,17,3,148,36,66,1,1,17,2,148,66,1,1,17,3,147,126,
-135,7,1,1,17,5,148,16,135,5,10,1,11,1,17,2,148,69,1,2,16,3,0,1,163,1,17,3,1,
-135,11,2,2,16,3,0,1,162,2,16,3,0,1,161,1,17,2,1,131,54,1,17,2,148,75,1,1,17,
-3,153,89,135,4,1,1,17,4,148,43,135,22,1,5,1,17,2,147,125,131,58,1,17,2,153,112,
-145,104,2,16,3,0,1,160,1,17,5,1,131,61,145,106,3,2,2,16,3,0,1,159,1,17,3,1,145,
-104,2,1,17,3,148,85,1,148,96,1,17,3,148,50,8,1,1,17,3,148,88,135,37,1,1,18,3,
-135,25,16,1,1,18,4,135,19,1,135,18,0,13,0,2,16,3,0,1,158,1,17,5,1,135,8,2,129,
-22,129,21,1,17,3,152,27,145,117,153,71,2,16,3,0,1,157,1,17,3,1,142,48,2,2,16,
-3,0,1,156,1,17,4,1,142,50,145,122,2,1,17,2,154,67,1,1,17,2,153,96,142,50,1,17,
-2,146,31,1,1,17,3,150,64,145,125,1,1,17,3,131,61,142,55,1,1,17,3,147,55,146,
-0,1,2,16,3,0,1,155,1,17,4,1,142,56,146,2,2,2,16,3,0,1,154,1,17,2,1,2,2,16,3,
-0,1,153,1,17,3,1,2,154,6,1,17,3,152,101,12,1,1,17,3,147,24,146,6,154,89,2,16,
-3,0,1,152,1,17,2,1,2,2,16,3,0,1,151,1,17,3,1,146,11,2,2,16,3,0,1,150,1,17,2,
-1,2,2,16,3,0,1,149,1,17,3,1,146,16,2,1,17,2,154,47,1,2,16,3,0,1,148,1,17,2,1,
-143,52,2,16,3,0,1,147,1,17,2,1,154,106,1,17,3,153,9,146,20,154,103,1,17,3,147,
-70,146,22,1,1,17,3,152,119,17,1,1,17,3,147,36,146,25,1,2,16,3,0,1,146,1,17,4,
-1,10,6,2,1,17,2,8,129,31,1,17,3,153,16,146,27,154,110,1,17,3,147,77,146,29,1,
-1,17,3,152,126,24,1,1,17,3,147,43,146,32,1,1,17,4,7,16,5,1,2,16,3,0,1,145,1,
-17,2,1,154,121,1,17,2,18,143,69,2,16,3,0,1,144,1,17,12,1,131,119,154,123,31,
-11,129,41,5,154,124,3,136,23,2,129,69,2,16,3,0,1,143,1,17,6,1,136,25,21,129,
-70,146,34,2,1,17,3,147,57,146,39,154,122,1,17,2,150,88,1,2,16,3,0,1,142,1,17,
-3,1,146,43,2,2,16,3,0,1,141,1,17,2,1,2,2,16,3,0,1,140,1,17,5,1,151,65,8,146,
-48,2,2,16,3,0,1,139,1,17,3,1,154,73,2,1,17,2,154,123,1,1,17,2,154,58,146,50,
-2,16,3,0,1,138,1,17,4,1,146,53,2,132,7,2,16,3,0,1,137,1,17,5,1,132,9,143,46,
-2,146,54,2,16,3,0,1,136,1,17,3,1,146,52,2,2,16,3,0,1,135,1,17,5,1,132,13,146,
-58,146,60,2,2,16,3,0,1,134,1,17,3,1,146,56,2,2,16,3,0,1,133,1,17,3,1,143,65,
-2,1,17,3,152,104,146,63,154,18,2,16,3,0,1,132,1,17,4,1,146,66,154,80,2,1,17,
-3,152,107,146,66,154,21,2,16,3,0,1,131,1,17,6,1,155,27,146,64,3,146,69,2,2,16,
-3,0,1,130,1,17,3,1,146,66,2,2,16,3,0,1,129,1,17,3,1,146,74,2,1,17,2,153,12,1,
-1,17,3,152,115,146,74,154,29,1,17,3,152,116,146,75,154,30,1,17,3,152,117,146,
-76,154,31,2,16,3,0,1,128,1,17,4,1,146,78,154,33,155,55,2,16,3,0,1,127,1,17,4,
-1,146,81,4,2,1,17,3,152,122,146,81,154,36,2,16,3,0,1,126,1,17,10,1,132,38,146,
-84,9,155,42,8,155,43,10,3,2,2,16,3,0,1,125,1,17,3,1,146,81,2,2,16,3,0,1,124,
-1,17,4,1,143,77,146,89,2,1,17,2,155,34,1,2,16,3,0,1,123,1,17,2,1,2,1,17,2,154,
-65,143,19,1,17,2,154,66,143,20,1,17,3,152,124,146,93,1,2,16,3,0,1,122,1,17,3,
-1,146,96,2,2,16,3,0,1,121,1,17,5,1,146,97,6,146,99,2,2,16,3,0,1,120,1,17,3,1,
-143,29,2,1,17,2,153,72,129,117,1,17,3,152,33,146,101,154,56,2,16,3,0,1,119,1,
-17,3,1,139,24,2,2,16,3,0,1,118,1,17,3,1,141,51,2,2,16,3,0,1,117,1,17,3,1,146,
-107,2,1,17,3,153,108,1,155,63,1,17,3,152,61,133,11,1,1,17,2,154,51,1,1,17,2,
-154,85,143,43,1,17,3,153,15,146,112,1,1,17,2,154,84,3,2,16,3,0,1,116,1,17,3,
-1,135,58,2,1,17,3,155,14,138,63,1,1,17,2,154,91,143,45,2,16,3,0,1,115,1,17,4,
-1,146,120,3,2,1,17,3,154,108,20,1,1,17,3,148,38,146,122,1,1,17,3,151,74,146,
-124,1,2,16,3,0,1,114,1,17,4,1,144,7,12,2,2,16,3,0,1,113,1,17,3,1,143,56,2,2,
-16,3,0,1,112,1,17,3,1,29,2,2,16,3,0,1,111,1,17,2,1,2,2,16,3,0,1,110,1,17,13,
-1,132,87,155,91,4,155,92,130,9,155,109,144,15,2,155,78,136,121,0,12,2,130,20,
-2,16,3,0,1,109,1,17,3,1,147,2,2,2,16,3,0,1,108,1,17,4,1,144,19,155,82,2,2,16,
-3,0,1,107,1,17,3,1,2,148,54,2,16,3,0,1,106,1,17,3,1,50,2,1,17,3,153,110,92,1,
-1,17,3,155,3,80,1,2,16,3,0,1,105,1,17,3,1,129,29,2,2,16,3,0,1,104,1,17,2,1,147,
-18,2,16,3,0,1,103,1,17,2,1,147,20,1,17,3,154,20,144,13,1,2,16,3,0,1,102,1,17,
-4,1,144,15,5,2,1,17,2,149,50,1,2,16,3,0,1,101,1,17,3,1,147,27,2,2,16,3,0,1,100,
-1,17,3,1,147,30,2,1,17,2,155,103,1,2,16,3,0,1,99,1,17,2,1,147,31,1,17,3,154,
-31,144,24,1,1,17,3,154,2,4,1,2,16,3,0,1,98,1,17,3,1,147,35,2,1,17,2,6,147,36,
-1,17,3,154,36,144,29,1,1,17,3,154,7,9,1,2,16,3,0,1,97,1,17,3,1,147,40,2,2,16,
-3,0,1,96,1,17,3,1,147,42,2,1,17,3,9,147,43,1,1,17,2,14,147,44,1,17,3,148,20,
-147,45,1,1,17,3,154,45,144,38,1,2,16,3,0,1,95,1,17,3,1,147,48,2,1,17,2,148,25,
-144,84,1,17,4,149,109,137,35,1,0,12,2,1,17,4,149,110,147,51,1,130,64,1,17,3,
-154,51,147,52,1,1,17,2,155,27,18,1,17,2,147,90,1,1,17,2,129,39,144,90,1,17,4,
-149,115,137,41,1,0,12,2,1,17,4,149,116,147,57,1,130,72,1,17,3,154,57,147,58,
-1,2,16,3,0,1,94,1,17,16,1,133,15,144,52,156,37,12,6,156,19,25,130,65,17,156,
-20,156,39,155,15,147,60,2,130,74,2,16,3,0,1,93,1,17,6,1,147,62,10,130,74,147,
-58,2,2,16,3,0,1,92,1,17,5,1,152,83,2,144,67,156,10,2,16,3,0,1,91,1,17,3,1,144,
-79,2,1,17,2,150,109,1,2,16,3,0,1,90,1,17,3,1,144,80,156,15,2,16,3,0,1,89,1,17,
-6,1,156,50,153,116,156,48,144,82,156,17,1,17,3,148,118,147,68,1,2,16,3,0,1,88,
-1,17,3,1,147,74,2,2,16,3,0,1,87,1,17,2,1,2,2,16,3,0,1,86,1,17,4,1,155,103,9,
-2,2,16,3,0,1,85,1,17,3,1,147,78,130,85,2,16,3,0,1,84,1,17,4,1,147,80,2,156,59,
-2,16,3,0,1,83,1,17,4,1,147,82,2,156,43,2,16,3,0,1,82,1,17,3,1,147,82,2,1,18,
-2,9,1,1,17,3,151,50,147,86,156,65,1,17,3,4,147,85,1,1,18,2,12,1,1,18,2,13,156,
-40,1,17,3,13,147,90,156,69,1,17,4,10,147,91,1,133,48,1,17,3,9,147,90,1,1,18,
-2,17,1,2,16,3,0,1,81,1,17,3,1,144,97,156,39,1,17,2,149,119,156,75,2,16,3,0,1,
-80,1,17,5,1,156,77,144,100,2,156,42,2,16,3,0,1,79,1,17,3,1,147,98,2,2,16,3,0,
-1,78,1,17,2,1,2,2,16,3,0,1,77,1,17,4,1,156,3,9,2,1,17,2,155,78,144,126,2,16,
-3,0,1,76,2,16,3,0,1,75,1,17,4,1,4,155,125,2,2,16,3,0,1,74,1,17,3,1,134,119,2,
-2,16,3,0,1,73,1,17,4,1,147,115,7,2,1,17,3,149,40,145,6,1,2,16,3,0,1,72,1,17,
-3,1,30,2,1,17,2,155,126,135,34,1,17,3,152,73,144,38,1,2,16,3,0,1,71,1,17,3,151,
-98,147,122,155,11,1,17,3,149,44,147,122,1,1,17,3,151,100,147,124,155,13,1,17,
-3,149,46,147,124,1,1,17,3,153,44,147,125,1,2,16,3,0,1,70,1,17,3,1,148,1,2,2,
-16,3,0,1,69,1,17,2,1,2,2,16,3,0,1,68,1,17,5,1,148,5,9,148,4,2,1,17,3,150,37,
-144,110,1,1,17,3,151,98,148,6,1,2,16,3,0,1,67,1,17,5,1,148,9,2,148,8,155,25,
-2,16,3,0,1,66,1,17,3,1,135,63,2,2,16,3,0,1,65,1,17,4,1,144,55,19,2,1,17,2,150,
-33,156,117,2,16,3,0,1,64,1,17,9,1,156,121,156,101,131,19,148,14,2,145,54,131,
-24,156,97,2,16,3,0,1,63,1,17,3,1,5,2,2,16,3,0,1,62,1,17,3,1,144,76,2,1,17,3,
-153,63,28,1,2,16,3,0,1,61,1,17,4,1,43,156,36,149,75,2,16,3,0,1,60,1,17,3,1,4,
-2,1,17,3,154,55,135,68,1,2,16,3,0,1,59,1,17,3,1,63,2,1,17,3,39,60,1,2,16,3,0,
-1,58,1,17,2,1,157,8,2,16,3,0,1,57,1,17,4,1,53,156,46,2,2,16,3,0,1,56,1,17,3,
-1,135,77,2,1,17,3,46,75,1,2,16,3,0,1,55,1,17,3,1,140,85,156,119,2,16,3,0,1,54,
-1,17,5,1,143,71,155,121,135,92,2,2,16,3,0,1,53,1,17,4,1,148,38,0,0,129,128,0,
-2,2,16,3,0,1,52,1,17,3,1,148,40,2,1,17,3,152,124,141,15,1,2,16,3,0,1,51,1,17,
-2,1,2,1,17,3,152,23,148,47,155,64,1,17,3,152,24,148,48,155,65,2,16,3,0,1,50,
-1,17,3,1,148,51,2,2,16,3,0,1,49,1,17,3,1,141,23,2,1,17,4,134,34,148,54,6,1,2,
-16,3,0,1,48,1,17,4,1,76,156,9,149,108,2,16,3,0,1,47,1,17,6,1,78,156,71,149,110,
-140,103,2,2,16,3,0,1,46,1,17,2,1,2,2,16,3,0,1,45,1,17,3,1,15,2,2,16,3,0,1,44,
-1,17,3,1,135,106,2,1,17,2,156,34,145,125,1,17,3,154,16,148,62,1,2,16,3,0,1,43,
-1,17,4,1,145,51,4,2,2,16,3,0,1,42,1,17,3,1,101,2,2,16,3,0,1,41,1,17,3,1,18,2,
-2,16,3,0,1,40,1,17,4,151,8,141,14,2,1,2,16,3,0,1,39,1,17,3,1,112,2,2,16,3,0,
-1,38,1,17,4,1,140,123,156,31,157,55,2,16,3,0,1,37,1,17,3,1,157,33,2,1,17,3,151,
-57,34,1,1,17,4,60,102,156,95,150,6,2,16,3,0,1,36,1,17,3,1,3,2,1,17,3,51,135,
-127,1,1,17,3,96,125,1,2,16,3,0,1,35,1,17,11,1,97,131,90,52,131,88,12,131,87,
-2,131,86,59,131,89,2,16,3,0,1,34,1,17,3,1,136,14,2,2,16,3,0,1,33,2,16,3,0,1,
-32,1,17,2,1,2,2,16,3,0,1,31,1,17,3,1,5,2,1,17,2,156,126,1,2,16,3,0,1,30,2,16,
-3,0,1,29,1,17,3,1,148,98,2,2,16,3,0,1,28,2,16,3,0,1,27,1,17,3,154,29,135,96,
-1,1,17,3,155,23,135,70,1,1,17,3,150,21,148,103,1,2,16,3,0,1,26,1,17,2,1,2,2,
-16,3,0,1,25,1,17,3,1,129,39,2,2,16,3,0,1,24,1,17,4,1,10,14,2,2,16,3,0,1,23,1,
-17,3,1,13,2,2,16,3,0,1,22,1,17,3,1,129,96,2,1,17,3,150,43,139,90,1,2,16,3,0,
-1,21,1,17,3,1,148,117,2,1,17,2,152,31,1,1,18,4,2,0,13,1,0,13,1,1,2,16,3,0,1,
-20,2,16,3,0,1,19,1,17,3,1,141,92,2,2,16,3,0,1,18,2,16,3,0,1,17,1,17,4,1,136,
-0,2,133,111,1,17,3,155,100,141,45,156,79,2,16,3,0,1,16,1,17,3,1,148,127,2,2,
-16,3,0,1,15,1,17,3,1,149,2,2,2,16,3,0,1,14,1,17,3,1,149,4,2,1,17,2,157,74,1,
-1,17,2,156,103,140,43,1,17,2,156,104,140,44,2,16,3,0,1,13,1,17,6,1,3,156,90,
-149,7,2,156,90,2,16,3,0,1,12,1,17,3,1,149,5,2,2,16,3,0,1,11,1,17,4,1,141,58,
-157,58,2,2,16,3,0,1,10,1,17,2,1,141,60,1,17,3,155,72,141,63,156,32,1,17,3,156,
-42,141,64,1,2,16,3,0,1,9,1,17,3,1,141,62,2,2,16,3,0,1,8,1,17,3,1,149,20,2,1,
-17,3,154,53,7,1,2,16,3,0,1,7,1,17,3,1,149,24,2,1,17,2,155,0,1,1,17,2,157,32,
-149,24,1,17,2,150,68,1,1,17,3,156,57,149,27,1,1,17,3,135,53,149,29,1,1,17,2,
-157,60,1,1,17,3,154,89,149,29,157,44,2,16,3,0,1,6,1,17,3,1,149,33,2,1,17,2,150,
-87,1,2,16,3,0,1,5,2,16,3,0,1,4,1,17,3,1,139,108,2,2,16,3,0,1,3,1,17,3,1,139,
-110,2,2,16,3,0,1,2,1,17,3,1,11,157,54,2,16,3,0,1,1,1,17,5,1,135,71,4,141,88,
-2,2,16,3,0,1,0,1,17,2,1,2,2,16,3,0,0,255,1,17,5,1,149,46,13,141,94,2,2,16,3,
-0,0,254,1,17,5,1,136,101,130,86,24,2,1,17,2,157,80,1,2,16,3,0,0,253,1,17,3,1,
-157,82,157,82,2,16,3,0,0,252,1,17,2,1,157,84,2,16,3,0,0,251,1,17,2,1,157,86,
-2,16,3,0,0,250,1,17,7,1,136,110,6,136,52,4,134,9,2,1,17,3,155,69,136,26,1,2,
-16,3,0,0,249,1,17,3,1,149,60,2,2,16,3,0,0,248,1,17,3,1,58,2,2,16,3,0,0,247,1,
-17,3,1,15,2,1,17,3,154,97,140,41,1,2,16,3,0,0,246,1,17,3,1,149,68,2,1,17,2,157,
-99,1,2,16,3,0,0,245,1,17,2,1,157,101,2,16,3,0,0,244,1,17,4,1,136,67,2,134,23,
-1,17,3,155,122,149,72,1,2,16,3,0,0,243,1,17,3,1,149,75,2,2,16,3,0,0,242,1,17,
-4,1,65,2,157,86,2,16,3,0,0,241,1,17,3,1,149,80,2,2,16,3,0,0,240,1,17,3,1,88,
-2,2,16,3,0,0,239,1,17,3,1,137,8,2,1,17,3,18,149,85,1,1,17,2,157,116,1,1,17,2,
-17,157,117,1,17,4,16,136,82,1,134,37,1,17,3,156,9,149,87,1,1,17,3,15,149,89,
-1,1,17,2,157,84,149,89,2,16,3,0,0,238,1,17,3,1,144,116,2,1,17,3,135,29,142,13,
-1,1,17,4,18,82,5,1,1,17,3,17,149,96,1,1,17,3,16,103,1,1,17,3,15,137,22,1,1,17,
-3,32,149,99,1,1,17,2,158,2,1,1,17,2,31,158,3,1,17,4,30,136,96,1,134,50,1,17,
-3,156,23,149,101,1,1,17,3,29,149,103,1,1,17,2,157,98,149,103,2,16,3,0,0,237,
-1,17,3,1,142,24,2,2,16,3,0,0,236,1,17,3,1,143,10,2,1,17,4,33,97,6,1,1,17,3,32,
-149,111,1,1,17,3,31,118,1,1,17,3,30,137,37,1,1,17,3,47,149,114,1,1,17,2,158,
-17,1,1,17,2,46,158,18,1,17,4,45,136,111,1,134,66,1,17,3,156,38,149,116,1,1,17,
-3,44,149,118,1,1,17,2,157,113,149,118,2,16,3,0,0,235,1,17,3,1,145,15,2,2,16,
-3,0,0,234,1,17,4,1,111,5,2,2,16,3,0,0,233,1,17,3,1,149,126,2,2,16,3,0,0,232,
-1,17,3,1,145,31,2,2,16,3,0,0,231,1,17,3,1,129,8,2,2,16,3,0,0,230,1,17,3,1,137,
-56,2,1,17,3,50,137,57,1,1,17,3,67,150,6,1,1,17,2,158,37,1,1,17,2,66,158,38,1,
-17,4,65,137,3,1,134,84,1,17,3,156,58,150,8,1,1,17,3,64,150,10,1,1,17,2,158,18,
-150,10,2,16,3,0,0,229,1,17,3,1,150,12,2,1,17,4,20,129,2,4,1,2,16,3,0,0,228,1,
-17,3,1,150,17,2,2,16,3,0,0,227,1,17,3,1,137,71,2,1,17,3,67,129,26,1,1,17,3,66,
-137,73,1,1,17,3,83,150,22,1,1,17,2,158,53,1,2,16,3,0,0,226,1,17,4,1,145,56,157,
-106,137,77,2,16,3,0,0,225,1,17,5,1,137,79,143,56,2,0,0,136,128,0,2,16,3,0,0,
-224,1,17,3,1,137,81,2,1,17,2,129,112,1,2,16,3,0,0,223,1,17,3,1,150,30,157,48,
-2,16,3,0,0,222,1,17,3,1,142,79,2,1,17,2,158,65,1,1,17,2,94,158,66,1,17,4,93,
-137,31,1,134,111,1,17,3,156,86,150,36,1,1,17,3,92,150,38,1,1,17,2,158,12,5,2,
-16,3,0,0,221,1,17,3,1,150,40,2,1,17,4,48,129,30,4,1,1,17,3,28,150,44,1,2,16,
-3,0,0,220,1,17,3,1,16,2,1,17,3,94,129,53,1,1,17,3,93,137,100,1,1,17,3,110,150,
-49,1,1,17,2,158,80,1,1,17,2,109,158,81,1,17,4,108,137,46,1,134,125,1,17,3,156,
-101,150,51,1,1,17,3,107,150,53,1,2,16,3,0,0,219,1,17,2,1,150,54,1,17,4,62,129,
-44,3,1,1,17,3,42,150,58,1,1,17,3,41,137,111,1,1,17,3,107,129,66,1,1,17,3,106,
-137,113,1,1,17,3,123,150,62,1,1,17,2,158,93,1,1,17,2,122,158,94,1,17,4,121,137,
-59,1,135,9,1,17,3,156,114,150,64,1,1,17,3,120,150,66,1,2,16,3,0,0,218,1,17,2,
-1,147,59,1,17,3,156,100,137,75,1,1,17,3,154,42,144,68,1,2,16,3,0,0,217,1,17,
-3,1,144,72,2,2,16,3,0,0,216,1,17,3,1,137,93,2,1,17,3,63,150,74,1,2,16,3,0,0,
-215,1,17,4,1,129,65,11,2,2,16,3,0,0,214,1,17,3,1,150,80,2,1,17,3,129,0,129,87,
-1,1,17,3,127,138,6,1,1,17,3,129,16,150,83,1,1,17,2,158,114,1,1,17,2,129,15,158,
-115,1,17,4,129,14,137,80,1,135,29,1,17,3,157,7,137,54,1,2,16,3,0,0,213,1,17,
-3,1,150,88,2,2,16,3,0,0,212,1,17,3,1,129,94,2,2,16,3,0,0,211,1,17,3,1,136,48,
-2,1,17,3,155,125,141,69,1,1,17,3,129,28,150,95,1,1,17,2,158,126,1,1,17,3,154,
-30,150,95,157,113,1,17,3,136,16,150,98,1,1,17,3,158,1,150,98,1,2,16,3,0,0,210,
-1,17,5,1,147,89,158,101,150,100,2,2,16,3,0,0,209,1,17,5,1,147,91,158,103,150,
-102,2,1,17,2,158,87,1,1,17,2,129,35,159,7,1,17,4,129,34,137,100,1,135,48,2,16,
-3,0,0,208,1,17,3,1,137,75,2,1,17,3,19,129,112,1,2,16,3,0,0,207,1,17,3,1,136,
-66,2,1,17,3,129,127,136,67,1,2,16,3,0,0,206,1,17,3,1,141,89,2,1,17,3,156,125,
-143,85,1,1,17,3,134,59,150,116,1,2,16,3,0,0,205,1,17,3,1,150,117,2,1,17,3,156,
-22,15,1,1,17,3,156,23,141,95,1,2,16,3,0,0,204,1,17,3,1,150,122,2,1,17,2,159,
-25,1,2,16,3,0,0,203,1,17,2,1,153,111,2,16,3,0,0,202,1,17,4,1,137,121,158,31,
-135,68,1,17,3,157,48,137,95,1,1,17,3,157,11,137,96,1,1,17,3,151,53,151,1,1,2,
-16,3,0,0,201,1,17,2,1,2,2,16,3,0,0,200,1,17,3,1,151,6,2,2,16,3,0,0,199,1,17,
-3,1,130,11,2,2,16,3,0,0,198,1,17,3,1,138,62,2,2,16,3,0,0,197,1,17,3,1,136,95,
-2,2,16,3,0,0,196,1,17,3,1,136,97,2,1,17,3,151,119,147,120,1,2,16,3,0,0,195,1,
-17,3,1,141,120,2,1,17,3,153,49,147,123,1,1,17,3,153,50,141,122,1,2,16,3,0,0,
-194,1,17,3,1,151,21,2,1,17,2,156,82,1,2,16,3,0,0,193,1,17,4,1,151,24,27,2,1,
-17,2,159,31,151,23,1,17,3,158,22,151,25,1,1,17,2,159,20,151,25,1,17,2,129,86,
-159,58,1,17,4,129,85,138,23,1,135,97,2,16,3,0,0,192,1,17,4,1,142,68,4,2,2,16,
-3,0,0,191,1,17,2,1,151,31,2,16,3,0,0,190,1,17,4,1,148,44,4,2,2,16,3,0,0,189,
-1,17,3,1,145,20,2,2,16,3,0,0,188,1,17,5,1,151,38,142,76,13,2,1,17,3,136,116,
-130,46,1,2,16,3,0,0,187,1,17,3,1,143,74,2,2,16,3,0,0,186,1,17,3,1,138,66,2,1,
-17,3,152,101,142,82,1,1,17,2,159,39,151,40,1,17,3,152,87,151,47,1,2,16,3,0,0,
-185,1,17,4,1,148,47,4,2,2,16,3,0,0,184,1,17,3,1,145,34,2,1,17,2,159,45,151,46,
-1,17,3,152,93,151,53,1,2,16,3,0,0,183,1,17,4,1,148,53,4,2,2,16,3,0,0,182,1,17,
-3,1,145,40,2,2,16,3,0,0,181,1,17,3,1,151,59,2,1,17,2,159,53,151,54,1,17,3,152,
-101,151,61,1,2,16,3,0,0,180,1,17,4,1,148,61,4,2,2,16,3,0,0,179,1,17,3,1,145,
-48,2,2,16,3,0,0,178,1,17,3,1,138,85,2,2,16,3,0,0,177,1,17,3,1,143,116,2,2,16,
-3,0,0,176,1,17,3,1,138,89,2,2,16,3,0,0,175,1,17,4,1,143,118,2,159,103,2,16,3,
-0,0,174,1,17,3,1,143,112,2,2,16,3,0,0,173,1,17,3,1,151,77,2,1,17,2,159,108,1,
-1,17,2,159,85,151,77,1,17,3,158,76,151,79,1,1,17,2,130,11,159,111,1,17,4,130,
-10,138,76,1,136,21,2,16,3,0,0,172,1,17,5,1,151,83,142,121,4,2,1,17,3,130,4,130,
-91,1,1,17,3,158,111,135,111,1,1,17,3,156,118,142,62,1,1,17,3,130,21,151,88,1,
-1,17,2,159,119,1,2,16,3,0,0,171,1,17,2,159,60,148,79,1,17,3,159,21,151,90,1,
-1,17,3,157,23,151,91,131,99,1,17,3,159,80,148,82,1,2,16,3,0,0,170,1,17,6,1,148,
-84,4,151,94,2,159,74,1,17,4,160,17,142,72,7,1,1,17,3,153,121,130,93,153,9,2,
-16,3,0,0,169,1,17,3,1,151,100,2,1,17,3,157,122,4,1,1,17,3,159,76,148,103,148,
-92,2,16,3,0,0,168,1,17,2,1,160,6,2,16,3,0,0,167,1,17,3,1,138,100,2,1,17,3,158,
-27,138,74,1,1,17,3,130,33,151,107,1,1,17,3,155,41,7,1,2,16,3,0,0,166,1,17,3,
-1,160,13,2,1,17,3,153,40,11,1,2,16,3,0,0,165,1,17,3,1,151,114,2,1,17,3,157,42,
-138,109,131,14,1,17,3,158,36,138,83,1,1,17,3,130,42,151,116,1,1,17,3,153,35,
-16,1,2,16,3,0,0,164,1,17,2,1,2,2,16,3,0,0,163,1,17,3,1,131,22,2,1,17,3,152,99,
-22,1,2,16,3,0,0,162,1,17,3,1,151,125,2,2,16,3,0,0,161,1,17,2,1,2,1,18,3,14,136,
-38,136,66,1,17,2,160,31,1,1,18,3,16,136,27,136,67,1,17,2,160,33,1,1,18,3,18,
-136,22,136,68,1,17,2,160,35,1,1,18,3,20,136,3,136,69,1,17,2,160,37,1,1,18,3,
-22,136,10,136,70,1,17,2,160,39,1,1,18,3,24,135,123,136,71,1,17,2,160,41,1,1,
-18,3,26,135,100,136,72,1,17,2,160,43,1,1,1,2,0,0,0,0,13,0,1,18,3,16,135,57,136,
-74,1,18,5,19,135,58,2,1,136,75,1,1,2,0,0,0,0,13,0,1,18,3,19,135,53,136,76,1,
-18,5,22,135,54,2,1,136,77,1,1,2,0,0,129,46,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,
-0,129,98,1,1,1,2,0,0,129,45,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,
-2,0,0,129,14,0,13,0,1,1,2,0,0,129,32,1,1,1,2,0,0,129,97,1,1,1,2,0,0,129,32,0,
-13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,62,0,13,0,1,1,2,0,0,
-129,59,1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,63,0,13,0,1,1,2,0,0,129,63,1,1,1,
-2,0,0,129,111,1,1,1,2,0,0,129,45,0,13,0,1,1,2,0,0,129,63,1,1,1,2,0,0,129,96,
-1,1,1,2,0,0,129,45,0,13,0,1,1,2,0,0,129,58,1,1,1,2,0,0,129,109,1,1,1,2,0,0,129,
-45,0,13,0,1,1,2,0,0,129,42,1,1,1,2,0,0,129,109,1,1,1,2,0,0,129,63,0,13,0,1,1,
-2,0,0,129,35,1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,15,0,13,0,1,1,2,0,0,129,60,
-1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,22,0,13,0,1,1,2,0,0,129,31,1,1,1,2,0,0,129,
-29,1,1,1,2,0,0,129,112,1,1,1,2,0,0,129,31,0,13,0,1,1,2,0,0,129,67,1,1,1,2,0,
-0,129,58,0,13,0,1,1,2,0,0,129,55,1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,16,0,13,
-0,1,1,2,0,0,129,78,1,1,1,2,0,0,129,2,0,13,0,1,1,2,0,0,129,62,1,1,1,2,0,0,129,
-97,1,1,1,2,0,0,129,44,0,13,0,1,1,2,0,0,129,44,1,1,1,2,0,0,129,111,1,1,1,2,0,
-0,129,32,0,13,0,1,1,2,0,0,129,5,1,1,1,2,0,0,129,29,1,1,1,2,0,0,129,112,1,1,1,
-2,0,0,129,62,0,13,0,1,1,2,0,0,129,63,1,1,1,2,0,0,129,15,1,1,1,2,0,0,129,116,
-1,1,1,2,0,0,129,63,0,13,0,1,1,2,0,0,129,63,1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,
-0,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,16,1,1,1,2,0,0,129,112,1,1,1,2,0,0,
-129,63,0,13,0,1,1,2,0,0,129,59,1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,127,0,13,
-0,1,1,2,0,0,129,126,1,1,1,2,0,0,129,126,0,13,0,1,1,2,0,0,129,127,1,1,1,2,0,0,
-129,127,0,13,0,1,1,2,0,0,129,127,1,1,1,2,0,0,0,1,1,1,2,0,0,0,1,1,1,2,0,0,0,0,
-13,0,1,1,2,0,0,0,1,1,1,2,0,0,129,127,1,1,1,2,0,0,129,127,1,1,1,2,0,0,56,0,13,
-0,1,1,2,0,0,118,1,1,1,2,0,0,47,1,1,1,2,0,0,43,1,1,1,2,0,0,57,0,13,0,1,1,2,0,
-0,118,1,1,1,2,0,0,47,1,1,1,2,0,0,43,1,1,1,2,0,0,43,0,13,0,1,1,2,0,0,118,1,1,
-1,2,0,0,47,1,1,1,2,0,0,43,1,1,1,2,0,0,47,0,13,0,1,1,2,0,0,118,1,1,1,2,0,0,47,
-1,1,1,2,0,0,43,1,1,1,2,0,0,76,0,13,0,1,1,2,0,0,100,1,1,1,2,0,0,129,119,1,1,1,
-2,0,0,115,0,13,0,1,1,2,0,0,102,1,1,1,2,0,0,115,1,1,1,2,0,0,129,93,1,1,1,2,0,
-0,129,127,0,13,0,1,1,2,0,0,129,126,1,1,1,2,0,0,14,1,1,1,2,0,0,40,0,13,0,1,1,
-2,0,0,129,110,1,1,1,2,0,0,129,123,1,1,1,2,0,0,129,127,0,13,0,1,1,2,0,0,40,1,
-1,1,2,0,0,129,110,1,1,1,2,0,0,129,123,1,1,1,2,0,0,51,0,13,0,1,1,2,0,0,129,21,
-1,1,1,2,0,0,49,1,1,1,2,0,0,129,4,1,1,1,2,0,0,129,41,0,13,0,1,1,2,0,0,129,18,
-1,1,1,2,0,0,129,31,1,1,1,2,0,0,129,112,1,1,1,2,0,0,129,0,0,13,0,1,1,2,0,0,129,
-57,1,1,1,2,0,0,129,96,1,1,1,2,0,0,129,1,0,13,0,1,1,2,0,0,129,57,1,1,1,2,0,0,
-129,96,1,1,1,2,0,0,129,2,0,13,0,1,1,2,0,0,129,57,1,1,1,2,0,0,129,96,1,1,1,2,
-0,0,129,3,0,13,0,1,1,2,0,0,129,57,1,1,1,2,0,0,129,96,1,1,1,2,0,0,129,4,0,13,
-0,1,1,2,0,0,129,57,1,1,1,2,0,0,129,96,1,1,1,2,0,0,129,32,0,13,0,1,1,2,0,0,129,
-0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,33,0,13,0,1,1,2,0,0,
-129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,34,0,13,0,1,1,2,
-0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,35,0,13,0,1,
-1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,36,0,13,
-0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,37,
-0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,
-38,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,
-129,39,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,
-0,0,129,40,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,
-1,2,0,0,129,41,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,
-1,1,1,2,0,0,129,42,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,
-115,1,1,1,2,0,0,129,43,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,
-129,115,1,1,1,2,0,0,129,44,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,
-0,0,129,115,1,1,1,2,0,0,129,45,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,
-1,2,0,0,129,115,1,1,1,2,0,0,129,46,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,
-1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,47,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,
-32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,48,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,
-129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,49,0,13,0,1,1,2,0,0,129,0,1,1,1,2,
-0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,50,0,13,0,1,1,2,0,0,129,0,1,1,
-1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,51,0,13,0,1,1,2,0,0,129,0,
-1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,52,0,13,0,1,1,2,0,0,129,
-0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,53,0,13,0,1,1,2,0,0,
-129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,54,0,13,0,1,1,2,
-0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,55,0,13,0,1,
-1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,56,0,13,
-0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,57,
-0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,
-58,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,
-129,59,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,
-0,0,129,60,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,
-1,2,0,0,129,61,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,
-1,1,1,2,0,0,129,62,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,
-115,1,1,1,2,0,0,129,63,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,32,1,1,1,2,0,0,
-129,115,1,1,1,2,0,0,129,0,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,
-0,0,129,115,1,1,1,2,0,0,129,1,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,
-1,2,0,0,129,115,1,1,1,2,0,0,129,2,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,
-1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,3,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,
-32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,4,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,
-129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,5,0,13,0,1,1,2,0,0,129,1,1,1,1,2,
-0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,6,0,13,0,1,1,2,0,0,129,1,1,1,
-1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,7,0,13,0,1,1,2,0,0,129,1,
-1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,8,0,13,0,1,1,2,0,0,129,
-1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,9,0,13,0,1,1,2,0,0,
-129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,10,0,13,0,1,1,2,
-0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,11,0,13,0,1,
-1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,12,0,13,
-0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,13,
-0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,
-14,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,
-129,15,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,
-0,0,129,16,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,
-1,2,0,0,129,17,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,
-1,1,1,2,0,0,129,18,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,
-115,1,1,1,2,0,0,129,19,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,
-129,115,1,1,1,2,0,0,129,20,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,
-0,0,129,115,1,1,1,2,0,0,129,21,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,
-1,2,0,0,129,115,1,1,1,2,0,0,129,22,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,
-1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,23,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,
-32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,24,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,
-129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,25,0,13,0,1,1,2,0,0,129,1,1,1,1,2,
-0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,26,0,13,0,1,1,2,0,0,129,1,1,1,
-1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,27,0,13,0,1,1,2,0,0,129,1,
-1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,28,0,13,0,1,1,2,0,0,129,
-1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,29,0,13,0,1,1,2,0,0,
-129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,30,0,13,0,1,1,2,
-0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,31,0,13,0,1,
-1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,32,0,13,
-0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,33,
-0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,
-34,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,
-129,35,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,
-0,0,129,36,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,
-1,2,0,0,129,37,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,
-1,1,1,2,0,0,129,38,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,
-115,1,1,1,2,0,0,129,39,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,
-129,115,1,1,1,2,0,0,129,40,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,
-0,0,129,115,1,1,1,2,0,0,129,41,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,
-1,2,0,0,129,115,1,1,1,2,0,0,129,42,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,
-1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,43,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,
-32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,44,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,
-129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,45,0,13,0,1,1,2,0,0,129,1,1,1,1,2,
-0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,46,0,13,0,1,1,2,0,0,129,1,1,1,
-1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,47,0,13,0,1,1,2,0,0,129,1,
-1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,48,0,13,0,1,1,2,0,0,129,
-1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,49,0,13,0,1,1,2,0,0,
-129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,50,0,13,0,1,1,2,
-0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,51,0,13,0,1,
-1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,52,0,13,
-0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,53,
-0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,
-54,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,
-129,55,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,1,2,
-0,0,129,56,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,1,1,
-1,2,0,0,129,57,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,115,
-1,1,1,2,0,0,129,58,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,129,
-115,1,1,1,2,0,0,129,59,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,0,0,
-129,115,1,1,1,2,0,0,129,60,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,1,2,
-0,0,129,115,1,1,1,2,0,0,129,61,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,1,1,
-1,2,0,0,129,115,1,1,1,2,0,0,129,62,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,32,
-1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,63,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,
-32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,1,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,
-129,32,1,1,1,2,0,0,129,115,1,1,1,2,0,0,129,32,0,13,0,1,1,2,0,0,129,62,1,1,1,
-2,0,0,129,111,1,1,1,2,0,0,129,36,0,13,0,1,1,2,0,0,129,5,1,1,1,2,0,0,129,99,1,
-1,1,2,0,0,129,37,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,38,
-0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,39,0,13,0,1,1,2,0,
-0,129,1,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,40,0,13,0,1,1,2,0,0,129,1,1,1,1,2,
-0,0,129,98,1,1,1,2,0,0,129,41,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,98,1,1,
-1,2,0,0,129,31,0,13,0,1,1,2,0,0,129,5,1,1,1,2,0,0,129,97,1,1,1,2,0,0,129,32,
-0,13,0,1,1,2,0,0,129,5,1,1,1,2,0,0,129,97,1,1,1,2,0,0,129,15,0,13,0,1,1,2,0,
-0,129,77,1,1,1,2,0,0,129,16,0,13,0,1,1,2,0,0,129,55,1,1,1,2,0,0,129,111,1,1,
-1,2,0,0,129,48,0,13,0,1,1,2,0,0,129,74,1,1,1,2,0,0,129,49,0,13,0,1,1,2,0,0,129,
-74,1,1,1,2,0,0,129,50,0,13,0,1,1,2,0,0,129,74,1,1,1,2,0,0,129,51,0,13,0,1,1,
-2,0,0,129,74,1,1,1,2,0,0,129,52,0,13,0,1,1,2,0,0,129,74,1,1,1,2,0,0,129,53,0,
-13,0,1,1,2,0,0,129,74,1,1,1,2,0,0,129,54,0,13,0,1,1,2,0,0,129,74,1,1,1,2,0,0,
-129,55,0,13,0,1,1,2,0,0,129,74,1,1,1,2,0,0,129,56,0,13,0,1,1,2,0,0,129,74,1,
-1,1,2,0,0,129,48,0,13,0,1,1,2,0,0,129,61,1,1,1,2,0,0,129,111,1,1,1,2,0,0,129,
-16,0,13,0,1,1,2,0,0,129,75,1,1,1,2,0,0,129,17,0,13,0,1,1,2,0,0,129,75,1,1,1,
-2,0,0,129,55,0,13,0,1,1,2,0,0,129,66,1,1,1,2,0,0,129,5,0,13,0,1,1,2,0,0,129,
-77,1,1,1,2,0,0,129,12,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,
-129,13,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,42,0,13,0,1,
-1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,43,0,13,0,1,1,2,0,0,129,0,1,
-1,1,2,0,0,129,98,1,1,1,2,0,0,129,44,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,
-1,1,1,2,0,0,129,45,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,
-46,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,14,0,13,0,1,1,2,
-0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,15,0,13,0,1,1,2,0,0,129,0,1,1,1,
-2,0,0,129,98,1,1,1,2,0,0,129,0,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,99,1,1,
-1,2,0,0,129,31,0,13,0,1,1,2,0,0,129,1,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,47,
-0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,41,0,13,0,1,1,2,0,
-0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,40,0,13,0,1,1,2,0,0,129,0,1,1,1,2,
-0,0,129,98,1,1,1,2,0,0,129,0,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,
-2,0,0,129,1,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,2,0,13,
-0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,3,0,13,0,1,1,2,0,0,129,
-0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,4,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,
-98,1,1,1,2,0,0,129,5,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,
-6,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,7,0,13,0,1,1,2,0,
-0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,8,0,13,0,1,1,2,0,0,129,0,1,1,1,2,
-0,0,129,98,1,1,1,2,0,0,129,9,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,
-2,0,0,129,10,0,13,0,1,1,2,0,0,129,0,1,1,1,2,0,0,129,98,1,1,1,2,0,0,129,14,0,
-13,0,1,1,2,0,0,129,32,1,1,1,2,0,0,129,97,1,1,1,2,0,0,129,0,0,13,0,1,1,2,0,0,
-129,26,1,1,1,2,0,0,129,97,1,1,1,2,0,0,129,32,0,13,0,1,1,2,0,0,129,66,1,1,1,2,
-0,0,9,0,13,0,1,1,2,0,0,10,0,13,0,1,1,2,0,0,11,0,13,0,1,1,2,0,0,12,0,13,0,1,1,
-2,0,0,13,0,13,0,1,2,129,69,133,31,133,28,133,25,133,22,133,19,133,16,133,13,
-133,10,133,7,133,4,133,1,132,125,132,123,132,120,132,118,132,115,132,112,132,
-108,132,104,132,101,132,97,132,94,132,92,132,90,132,86,132,82,132,78,132,74,
-132,70,132,66,132,63,132,59,132,56,132,53,132,49,132,45,132,41,132,38,132,35,
-132,32,132,29,132,26,132,22,132,18,132,14,132,10,132,6,132,2,131,126,131,122,
-131,118,131,114,131,110,131,106,131,102,131,98,131,94,131,90,131,86,131,82,131,
-78,131,74,131,70,131,66,131,62,131,58,131,54,131,50,131,46,131,42,131,38,131,
-34,131,30,131,26,131,22,131,18,131,14,131,10,131,6,131,2,130,126,130,122,130,
-118,130,114,130,110,130,106,130,102,130,98,130,94,130,90,130,86,130,82,130,78,
-130,74,130,70,130,66,130,62,130,58,130,54,130,50,130,46,130,42,130,38,130,34,
-130,30,130,26,130,22,130,18,130,14,130,10,130,6,130,2,129,126,129,122,129,118,
-129,114,129,110,129,106,129,102,129,98,129,94,129,90,129,86,129,82,129,78,129,
-74,129,70,129,66,129,62,129,58,129,54,129,50,129,46,129,42,129,38,129,34,129,
-30,129,26,129,22,129,19,129,16,129,13,129,10,129,7,129,4,129,1,126,123,121,118,
-116,114,112,110,108,106,104,102,100,97,95,93,91,89,86,83,80,77,74,71,68,65,62,
-59,56,53,50,47,44,41,38,35,32,29,26,23,20,17,14,11,8,6,5,4,3,2,1,1,17,2,135,
-112,165,84,1,17,4,135,111,144,49,1,141,112,1,17,3,163,104,157,54,1,1,17,3,135,
-110,157,56,1,2,16,3,0,0,160,1,17,2,1,157,57,1,17,3,164,117,157,58,1,2,16,3,0,
-0,159,1,17,4,1,152,84,2,157,60,2,16,3,0,0,158,1,17,3,1,152,87,2,1,17,4,135,116,
-136,52,8,1,1,17,3,135,115,157,66,1,1,17,3,135,114,136,73,1,1,17,3,135,113,144,
-120,1,1,17,3,136,2,157,69,1,1,17,2,165,100,1,1,17,2,136,1,165,101,1,17,4,136,
-0,144,66,1,142,0,1,17,3,163,121,157,71,1,1,17,3,135,127,157,73,1,1,17,2,165,
-81,154,65,1,17,3,135,63,157,74,1,1,17,4,135,82,136,64,3,1,1,17,3,135,62,157,
-78,1,2,16,3,0,0,157,1,17,4,1,144,122,2,27,1,17,3,136,0,136,87,1,1,17,3,135,127,
-145,6,1,1,17,3,136,16,157,83,1,1,17,2,165,114,1,1,17,3,158,40,0,0,125,0,0,123,
-1,17,4,158,45,1,0,0,93,0,0,91,1,17,3,158,47,0,0,34,0,0,34,1,17,3,158,48,0,0,
-41,0,0,40,1,17,5,158,41,1,0,0,39,0,0,39,2,1,17,5,158,47,4,0,0,62,0,0,60,1,1,
-17,3,159,114,154,79,165,91,1,17,3,161,18,154,82,159,113,1,17,3,163,123,157,91,
-1,1,17,3,161,27,157,92,164,110,2,16,3,0,0,156,1,17,5,1,154,84,3,157,94,2,2,16,
-3,0,0,155,1,17,4,1,157,96,164,114,2,2,16,3,0,0,154,1,17,8,1,154,88,159,121,157,
-98,9,154,28,2,10,1,17,2,166,3,1,2,16,3,0,0,153,1,17,2,159,29,165,56,2,16,3,0,
-0,152,1,17,3,1,157,103,2,2,16,3,0,0,151,1,17,4,1,157,106,164,22,2,1,17,3,158,
-72,166,3,1,1,17,3,7,157,109,1,1,17,2,161,22,1,1,17,3,158,127,151,127,166,64,
-1,17,3,164,79,145,36,1,2,16,3,0,0,150,1,17,3,1,151,116,2,1,17,3,162,67,5,1,1,
-17,2,165,122,157,114,1,17,2,159,30,1,1,17,3,165,19,157,117,1,2,16,3,0,0,149,
-1,17,2,1,2,2,16,3,0,0,148,1,17,3,1,157,122,2,2,16,3,0,0,147,1,17,3,1,157,124,
-2,2,16,3,0,0,146,1,17,3,1,166,21,2,1,17,2,166,29,1,1,17,2,166,6,157,126,1,17,
-2,160,26,1,1,17,3,159,51,158,1,1,1,17,2,166,9,158,1,1,17,2,160,29,1,1,17,3,159,
-54,158,4,1,2,16,3,0,0,145,1,17,2,1,2,1,17,2,166,14,158,6,1,17,2,160,34,1,1,17,
-3,159,59,158,9,1,1,17,2,159,73,1,2,16,3,0,0,144,1,17,4,1,158,13,6,2,2,16,3,0,
-0,143,1,17,5,1,158,15,13,154,71,2,1,17,3,159,67,166,39,1,2,16,3,0,0,142,1,17,
-3,1,158,18,2,1,17,3,164,2,166,42,1,1,17,2,166,92,1,1,17,3,163,79,158,19,165,
-102,1,17,3,164,77,158,22,1,1,17,2,166,29,155,13,1,17,3,164,54,158,22,1,1,17,
-3,163,83,158,23,165,106,2,16,3,0,0,141,1,17,5,1,155,15,3,158,25,2,2,16,3,0,0,
-140,1,17,3,1,56,2,1,17,3,143,76,158,29,1,2,16,3,0,0,139,1,17,5,1,158,31,10,158,
-32,2,2,16,3,0,0,138,1,17,4,1,154,90,2,72,1,17,4,139,75,155,23,158,35,1,2,16,
-3,0,0,137,1,17,2,1,2,1,17,3,164,28,137,33,1,2,16,3,0,0,136,1,17,2,1,165,121,
-1,17,3,164,96,158,40,1,2,16,3,0,0,135,1,17,4,1,158,41,158,43,2,1,17,3,70,166,
-67,1,1,17,2,166,117,1,2,16,3,0,0,134,1,17,2,1,166,77,1,17,3,165,73,145,15,1,
-1,17,3,162,115,158,48,1,2,16,3,0,0,133,1,17,3,1,6,2,2,16,3,0,0,132,1,17,3,1,
-54,2,2,16,3,0,0,131,1,17,3,1,68,2,1,17,3,160,65,18,1,1,17,3,159,113,149,32,1,
-2,16,3,0,0,130,1,17,3,1,158,59,2,2,16,3,0,0,129,1,17,2,1,166,91,2,16,3,0,0,128,
-1,17,4,1,145,57,4,2,2,16,3,0,0,127,1,17,3,1,155,110,2,1,17,2,134,91,166,96,1,
-17,4,158,124,145,61,1,142,122,1,17,3,165,93,145,35,1,1,17,3,163,7,158,68,1,1,
-17,3,20,25,1,1,17,2,166,77,158,69,1,17,3,161,18,158,71,1,2,16,3,0,0,126,1,17,
-4,1,75,4,2,1,17,3,142,18,155,90,1,2,16,3,0,0,125,1,17,3,1,158,77,2,2,16,3,0,
-0,124,1,17,3,1,145,84,2,2,16,3,0,0,123,1,17,4,1,145,106,2,166,111,2,16,3,0,0,
-122,1,17,3,1,145,73,2,1,17,3,160,2,152,86,1,1,17,3,162,48,103,1,1,17,3,164,3,
-48,1,1,17,3,160,118,149,62,1,1,17,2,28,166,118,2,16,3,0,0,121,1,17,4,1,158,90,
-3,2,2,16,3,0,0,120,1,17,3,1,156,9,2,1,17,2,166,123,1,1,17,2,134,119,166,124,
-1,17,4,159,24,145,89,1,143,21,1,17,3,165,121,145,63,1,1,17,3,163,35,158,96,1,
-1,17,3,48,53,1,1,17,3,165,19,79,1,1,17,3,161,3,155,15,1,1,17,3,164,111,158,99,
-1,1,17,3,144,45,158,100,1,2,16,3,0,0,119,1,17,4,1,158,102,2,162,96,2,16,3,0,
-0,118,1,17,4,1,158,104,2,162,98,2,16,3,0,0,117,1,17,3,1,155,123,2,1,17,3,33,
-158,109,1,1,17,4,30,146,7,1,167,12,2,16,3,0,0,116,1,17,3,1,145,102,2,1,17,3,
-162,76,129,3,1,1,17,3,164,31,76,1,1,17,3,161,18,149,90,1,1,17,2,56,167,18,1,
-17,4,28,158,117,2,1,1,17,3,27,156,35,1,1,17,2,167,21,1,1,17,2,165,112,158,119,
-1,18,3,56,143,46,1,1,17,2,167,24,1,1,17,2,166,116,158,121,1,17,3,167,56,158,
-124,1,1,18,3,60,143,49,1,1,17,2,167,28,1,1,17,2,167,5,158,125,1,17,3,165,124,
-158,127,1,1,17,2,140,120,1,2,16,3,0,0,115,1,17,3,1,151,48,2,2,16,3,0,0,114,1,
-17,3,1,129,6,2,2,16,3,0,0,113,1,17,3,1,151,44,2,1,17,2,167,38,1,2,16,3,0,0,112,
-1,17,2,1,146,52,1,17,3,163,91,129,29,1,2,16,3,0,0,111,1,17,5,1,159,12,166,94,
-159,13,160,55,1,17,3,165,43,3,1,2,16,3,0,0,110,1,17,3,1,159,16,2,1,17,2,167,
-89,1,1,17,2,135,43,167,48,1,17,4,159,76,146,13,1,143,70,1,17,3,166,45,145,115,
-1,1,17,3,163,87,159,20,1,1,17,3,100,105,1,1,17,2,167,29,159,21,1,17,3,166,20,
-159,23,1,2,16,3,0,0,109,1,17,3,1,18,2,2,16,3,0,0,108,1,17,5,1,167,58,129,29,
-6,2,2,16,3,0,0,107,1,17,3,1,146,52,2,1,17,3,81,14,1,1,17,3,165,80,146,37,1,1,
-17,3,162,124,129,51,1,1,17,3,164,79,124,1,1,17,3,161,66,150,10,1,1,17,2,104,
-167,66,1,17,4,76,159,37,2,1,1,17,3,75,156,83,1,1,17,2,167,69,1,2,16,3,0,0,106,
-2,16,3,0,0,105,2,16,3,0,0,104,1,17,3,1,151,79,2,2,16,3,0,0,103,1,17,3,1,151,
-81,2,2,16,3,0,0,102,1,17,3,1,151,84,2,1,17,3,166,22,151,93,167,1,2,16,3,0,0,
-101,1,17,3,1,159,49,2,1,17,3,167,37,4,1,2,16,3,0,0,100,1,17,3,1,159,53,2,2,16,
-3,0,0,99,1,17,2,1,2,1,17,2,167,49,159,54,1,17,3,166,24,159,55,1,2,16,3,0,0,98,
-1,17,3,1,156,47,2,2,16,3,0,0,97,2,16,3,0,0,96,2,16,3,0,0,95,1,17,2,167,32,156,
-51,1,17,4,145,3,5,1,143,114,2,16,3,0,0,94,2,16,3,0,0,93,1,17,3,1,159,65,2,1,
-17,3,164,109,159,66,3,2,16,3,0,0,92,1,17,4,1,159,68,2,143,120,2,16,3,0,0,91,
-1,17,3,1,156,60,2,2,16,3,0,0,90,1,17,5,1,159,73,7,2,143,123,2,16,3,0,0,89,1,
-17,3,1,156,64,2,2,16,3,0,0,88,2,16,3,0,0,87,1,17,3,1,159,77,2,2,16,3,0,0,86,
-1,17,3,1,159,79,4,2,16,3,0,0,85,1,17,3,1,159,83,2,2,16,3,0,0,84,1,17,3,1,159,
-83,8,2,16,3,0,0,83,1,17,3,1,159,85,2,1,17,3,6,156,103,1,2,16,3,0,0,82,1,17,5,
-1,159,89,7,156,103,2,1,17,3,160,66,44,1,2,16,3,0,0,81,1,17,5,1,159,92,14,156,
-108,2,2,16,3,0,0,80,1,17,4,1,36,30,144,17,1,17,3,16,159,94,19,1,17,3,15,159,
-97,1,2,16,3,0,0,79,1,17,5,1,156,89,4,159,98,2,2,16,3,0,0,78,1,17,6,1,159,100,
-25,8,54,2,2,16,3,0,0,77,1,17,5,1,156,93,39,159,103,2,1,17,2,167,73,156,92,2,
-16,3,0,0,76,2,16,3,0,0,75,1,17,3,1,159,105,2,1,17,3,37,159,108,1,2,16,3,0,0,
-74,1,17,6,1,51,45,144,32,159,109,2,1,17,3,161,39,64,1,2,16,3,0,0,73,2,16,3,0,
-0,72,1,17,3,1,159,112,2,2,16,3,0,0,71,1,17,3,1,159,116,2,2,16,3,0,0,70,1,17,
-3,1,159,118,2,2,16,3,0,0,69,1,17,5,1,159,120,9,159,119,2,1,17,3,161,49,81,1,
-2,16,3,0,0,68,1,17,6,1,64,19,144,45,159,123,2,1,17,2,167,93,156,112,1,17,3,19,
-159,123,161,4,1,17,3,55,159,126,1,2,16,3,0,0,67,2,16,3,0,0,66,1,17,6,1,160,0,
-3,70,2,168,92,2,16,3,0,0,65,1,17,7,1,156,119,72,7,168,94,76,2,2,16,3,0,0,64,
-1,17,7,1,73,72,71,30,10,2,1,17,2,168,12,160,4,1,17,3,166,102,156,125,1,2,16,
-3,0,0,63,1,17,9,1,168,100,156,127,144,58,160,7,2,144,59,157,47,144,91,1,17,3,
-141,77,160,4,1,1,17,3,167,113,157,12,1,2,16,3,0,0,62,1,17,2,1,168,104,1,17,3,
-165,120,160,8,1,2,16,3,0,0,61,1,17,3,1,160,16,2,1,17,3,168,77,154,19,1,1,1,2,
-0,0,110,0,13,0,1,1,2,0,0,37,1,1,1,2,0,0,110,0,13,0,1,1,2,0,0,37,1,1,1,2,0,0,
-115,0,13,0,1,1,2,0,0,37,1,1,1,2,0,0,100,0,13,0,1,1,2,0,0,37,1,1,1,2,0,0,112,
-0,13,0,1,1,2,0,0,37,1,1,1,2,0,0,120,0,13,0,1,1,2,0,0,35,1,1,1,2,0,0,37,1,1,1,
-2,0,0,48,0,13,0,1,1,2,0,0,92,1,1,1,2,0,0,110,0,13,0,1,1,2,0,0,37,1,1,1,2,0,0,
-100,1,1,1,2,0,0,37,1,1,1,2,0,0,97,1,1,1,2,0,0,97,1,1,1,2,0,0,97,1,1,1,2,0,0,
-97,1,1,1,2,0,0,96,0,13,0,1,1,2,0,0,99,1,1,1,2,0,0,108,1,1,1,2,0,0,97,1,1,1,2,
-0,0,99,1,1,1,2,0,0,120,1,1,1,2,0,0,96,1,1,1,2,0,0,99,0,13,0,1,1,2,0,0,108,1,
-1,1,2,0,0,97,1,1,1,2,0,0,99,1,1,1,2,0,0,120,1,1,1,2,0,0,59,1,1,1,2,0,0,41,0,
-13,0,1,1,2,0,0,99,1,1,1,2,0,0,108,1,1,1,2,0,0,97,1,1,1,2,0,0,99,1,1,1,2,0,0,
-120,1,1,1,2,0,0,40,1,1,1,2,0,0,36,1,1,1,2,0,0,99,0,13,0,1,1,2,0,0,108,1,1,1,
-2,0,0,97,1,1,1,2,0,0,99,1,1,1,2,0,0,120,1,1,1,2,0,0,33,1,1,1,2,0,0,99,0,13,0,
-1,1,2,0,0,108,1,1,1,2,0,0,97,1,1,1,2,0,0,99,1,1,1,2,0,0,120,1,1,1,2,0,0,34,1,
-1,1,2,0,0,99,0,13,0,1,1,2,0,0,108,1,1,1,2,0,0,97,1,1,1,2,0,0,99,1,1,1,2,0,0,
-120,1,1,1,2,0,0,39,1,1,1,2,0,0,48,0,13,0,1,1,2,0,0,48,1,1,1,2,0,0,120,1,1,1,
-2,0,0,92,1,1,1,2,0,0,110,0,13,0,1,1,2,0,0,92,1,1,1,2,0,0,114,1,1,1,2,0,0,92,
-1,1,1,2,0,0,114,0,13,0,1,1,2,0,0,92,1,1,1,2,0,0,110,0,13,0,1,1,2,0,0,92,1,1,
-1,2,0,0,97,0,13,0,1,1,2,0,0,48,1,1,1,2,0,0,120,1,1,1,2,0,0,92,1,1,1,2,0,0,100,
-0,13,0,1,1,2,0,0,48,1,1,1,2,0,0,120,1,1,1,2,0,0,92,1,1,1,2,0,0,78,0,13,0,1,1,
-2,0,0,97,1,1,1,2,0,0,78,1,1,1,2,0,0,102,0,13,0,1,1,2,0,0,110,1,1,1,2,0,0,105,
-1,1,1,2,0,0,43,1,1,1,2,0,0,72,0,13,0,1,1,2,0,0,84,1,1,1,2,0,0,65,1,1,1,2,0,0,
-80,1,1,1,2,0,0,36,1,1,1,2,0,0,33,0,13,0,1,1,2,0,0,33,1,1,1,2,0,0,36,1,1,1,2,
-0,0,33,0,13,0,1,1,2,0,0,33,1,1,1,2,0,0,59,0,13,0,1,1,2,0,0,48,1,1,1,2,0,0,48,
-1,1,1,2,0,0,48,1,1,1,2,0,0,35,1,1,1,2,0,0,38,1,1,1,2,0,0,48,0,13,0,1,1,2,0,0,
-48,1,1,1,2,0,0,48,1,1,1,2,0,0,48,1,1,1,2,0,0,117,1,1,1,2,0,0,92,1,1,1,2,0,0,
-38,0,13,0,1,1,2,0,0,36,1,1,1,2,0,0,43,0,13,0,1,1,2,0,0,36,1,1,1,2,0,0,96,0,13,
-0,1,1,2,0,0,36,1,1,1,2,0,0,39,0,13,0,1,1,2,0,0,36,1,1,1,2,0,0,49,0,13,0,1,1,
-2,0,0,36,1,1,1,2,1,0,13,0,1,1,2,4,1,1,1,2,7,1,1,1,2,10,1,1,1,2,13,1,1,1,2,16,
-1,1,1,2,23,1,1,1,2,30,1,1,1,2,33,1,1,1,2,37,1,1,1,2,43,1,1,1,2,48,1,1,1,2,52,
-1,1,1,2,57,1,1,1,2,62,1,1,1,2,65,1,1,1,2,68,1,1,1,2,73,1,1,1,2,78,1,1,1,2,85,
-1,1,1,2,92,1,1,1,2,99,1,1,1,2,108,1,1,1,2,115,1,1,1,2,123,1,1,1,2,129,4,1,1,
-1,2,129,7,1,1,1,2,129,11,1,1,1,2,129,14,1,1,1,2,129,17,1,1,1,2,129,20,1,1,1,
-2,129,23,1,1,17,4,162,103,155,59,169,124,1,2,16,3,0,0,60,1,17,3,1,148,97,2,2,
-16,3,0,0,59,1,17,3,166,102,158,37,168,63,2,16,3,0,0,58,1,17,3,1,153,94,2,2,16,
-3,0,0,57,1,17,3,1,6,2,2,16,3,0,0,56,1,17,4,1,153,100,7,2,2,16,3,0,0,55,1,17,
-3,1,148,107,2,1,17,2,169,62,161,54,1,17,2,165,103,1,2,16,3,0,0,54,1,17,3,1,161,
-58,2,2,16,3,0,0,53,1,17,3,1,169,84,2,1,17,3,162,111,161,61,1,1,17,3,142,34,161,
-63,1,1,17,2,170,8,1,2,16,3,0,0,52,1,17,10,1,0,0,128,255,127,0,0,129,128,0,0,
-0,129,255,127,0,0,130,128,0,0,0,131,255,127,0,0,132,128,0,148,118,168,58,0,0,
-136,0,2,16,3,0,0,51,1,17,3,1,148,120,2,2,16,3,0,0,50,1,17,3,1,161,68,169,23,
-1,17,2,170,15,1,1,17,2,144,125,158,62,2,16,3,0,0,49,1,17,4,1,155,81,170,27,2,
-2,16,3,0,0,48,1,17,3,1,21,2,1,17,3,168,44,149,1,1,1,17,2,145,3,14,1,17,4,6,155,
-86,170,32,1,1,17,3,5,25,1,1,17,3,168,48,149,5,1,1,17,2,145,7,11,2,16,3,0,0,47,
-1,17,4,1,155,91,170,37,2,1,17,3,167,114,149,9,1,2,16,3,0,0,46,1,17,3,1,155,89,
-2,1,17,3,168,75,158,78,170,41,2,16,3,0,0,45,1,17,8,1,155,92,13,9,22,3,161,88,
-2,2,16,3,0,0,44,1,17,3,1,149,16,2,2,16,3,0,0,43,1,17,4,1,155,107,170,47,146,
-16,2,16,3,0,0,42,1,17,4,1,155,109,170,49,146,17,2,16,3,0,0,41,1,17,9,1,146,20,
-6,4,170,61,146,19,2,159,8,146,51,2,16,3,0,0,40,1,17,3,1,161,94,2,2,16,3,0,0,
-39,1,17,3,1,155,118,2,2,16,3,0,0,38,1,17,3,1,149,28,2,1,17,2,170,7,1,1,17,2,
-140,36,170,8,1,17,4,140,35,148,101,1,146,27,1,17,3,168,28,148,75,1,1,17,3,140,
-34,161,108,1,1,17,3,139,22,129,99,1,1,17,3,140,30,140,114,1,2,16,3,0,0,37,1,
-17,4,1,170,15,8,2,1,17,3,168,37,129,97,1,1,17,3,167,18,129,110,1,1,17,3,167,
-19,152,91,1,1,17,3,140,50,161,117,1,1,17,2,170,20,1,2,16,3,0,0,36,1,17,2,1,154,
-24,2,16,3,0,0,35,1,17,3,1,154,27,2,2,16,3,0,0,34,1,17,3,1,154,43,2,1,17,4,163,
-60,158,123,170,78,161,124,1,17,4,165,88,154,66,1,148,113,2,16,3,0,0,33,1,17,
-4,1,154,68,2,148,115,1,17,3,163,11,161,127,170,82,1,17,3,168,97,149,54,1,1,17,
-3,168,32,154,46,1,2,16,3,0,0,32,1,17,3,1,161,127,2,2,16,3,0,0,31,1,17,3,1,162,
-1,2,1,17,4,166,84,158,115,8,1,2,16,3,0,0,30,1,17,2,170,16,152,75,1,17,3,169,
-7,162,11,1,1,17,2,139,16,3,1,17,3,168,61,159,3,1,2,16,3,0,0,29,1,17,4,1,162,
-14,2,170,54,2,16,3,0,0,28,1,17,4,1,162,17,6,2,2,16,3,0,0,27,1,17,3,1,170,42,
-2,2,16,3,0,0,26,1,17,3,1,162,19,2,2,16,3,0,0,25,1,17,3,1,27,2,2,16,3,0,0,24,
-1,17,2,1,2,2,16,3,0,0,23,1,17,4,1,18,162,27,2,2,16,3,0,0,22,1,17,2,1,2,2,16,
-3,0,0,21,1,17,5,1,22,170,90,23,2,2,16,3,0,0,20,1,17,3,1,170,56,2,2,16,3,0,0,
-19,1,17,2,1,2,1,17,2,167,96,1,2,16,3,0,0,18,1,17,2,170,44,162,36,1,17,2,166,
-85,1,1,17,3,167,124,154,85,1,1,17,3,167,88,154,88,1,1,17,3,5,152,86,1,1,17,2,
-170,115,1,1,17,3,168,68,162,42,170,125,1,17,3,170,32,153,82,1,1,17,3,146,80,
-3,1,2,16,3,0,0,17,1,17,2,1,2,2,16,3,0,0,16,1,17,3,1,154,95,2,2,16,3,0,0,15,1,
-17,3,1,154,99,2,2,16,3,0,0,14,1,17,3,1,154,87,2,2,16,3,0,0,13,1,17,3,1,147,124,
-2,2,16,3,0,0,12,1,17,3,1,154,94,2,1,17,2,170,89,1,2,3,2,102,116,2,3,2,102,111,
-2,3,2,102,110,2,3,3,110,117,109,2,3,2,116,100,2,3,3,116,114,50,2,3,3,116,115,
-49,2,3,2,116,114,2,3,3,116,115,50,2,3,2,108,100,2,3,3,108,100,115,2,3,3,108,
-114,50,2,3,2,108,105,2,3,2,108,115,2,3,2,108,112,2,3,2,108,114,2,3,3,108,105,
-115,2,3,3,108,114,115,2,3,2,115,114,2,3,2,115,100,2,3,2,98,100,2,3,2,98,102,
-2,3,2,98,105,2,3,2,98,114,2,3,2,98,112,2,3,3,98,101,105,2,3,3,98,101,100,2,3,
-3,98,101,114,2,3,2,117,119,2,3,2,117,105,2,3,2,120,112,2,3,2,97,98,1,2,4,0,0,
-8,0,0,2,139,124,32,1,1,2,1,0,13,0,1,2,4,0,0,2,0,0,2,139,70,33,1,1,2,1,2,1,2,
-4,0,0,9,0,0,1,139,101,34,1,1,2,1,2,1,2,4,0,0,2,0,0,5,141,29,35,1,1,2,1,2,1,2,
-4,0,0,7,0,0,1,131,106,36,1,1,2,1,2,1,2,4,0,0,4,0,0,1,131,104,37,1,1,2,1,2,1,
-2,4,0,0,5,0,0,1,132,11,38,1,1,2,1,2,1,2,4,0,0,5,0,0,1,131,67,39,1,1,2,1,2,1,
-2,4,0,0,8,0,0,1,131,117,40,1,1,2,1,2,1,2,4,0,0,6,0,0,1,138,109,41,1,1,2,1,2,
-1,2,4,0,0,8,0,0,1,138,109,42,1,1,2,1,2,1,2,4,0,0,2,0,0,1,138,109,43,1,1,2,1,
-2,1,2,4,0,0,4,0,0,1,138,109,44,1,1,2,1,2,1,2,4,0,0,7,0,0,1,138,107,45,1,1,2,
-1,2,1,2,4,0,0,2,0,0,1,138,107,46,1,1,2,1,2,1,2,4,0,0,6,0,0,1,138,113,47,1,1,
-2,1,2,1,2,4,0,0,5,0,0,1,138,108,48,1,1,2,1,2,1,2,4,0,0,9,0,0,1,138,107,49,1,
-1,2,1,2,1,2,4,0,0,2,0,0,1,139,50,50,1,1,2,1,2,1,2,4,0,0,3,0,0,1,139,41,51,1,
-1,2,1,2,1,2,4,0,0,7,0,0,1,141,46,52,1,1,2,1,2,1,2,4,0,0,2,0,0,1,140,127,53,1,
-1,2,1,2,1,2,4,0,0,3,0,0,1,140,113,54,1,1,2,1,2,1,2,4,0,0,2,0,0,1,140,88,55,1,
-1,2,1,2,1,2,4,0,0,4,0,0,1,140,56,56,1,1,2,1,2,1,2,4,0,0,5,0,0,1,141,42,57,1,
-1,2,1,2,1,2,4,0,0,2,0,0,1,141,29,58,1,1,2,1,2,1,2,4,0,0,2,0,0,1,140,83,59,1,
-1,2,1,2,1,2,4,0,0,8,0,0,1,133,78,60,1,1,2,1,2,1,2,4,0,0,5,0,0,2,133,66,61,1,
-1,2,1,2,1,2,4,0,0,2,0,0,9,142,33,62,1,1,2,1,2,1,2,4,0,0,2,0,0,1,129,36,63,1,
-1,2,1,2,1,18,3,121,1,120,1,1,2,0,0,1,148,44,1,1,2,0,0,2,148,35,1,1,2,0,0,1,148,
-23,1,1,2,1,0,13,0,1,1,2,4,1,1,1,2,4,1,1,18,3,148,22,0,0,4,1,1,2,3,0,13,1,0,0,
-192,0,0,0,0,1,17,2,168,94,148,94,1,17,3,168,36,155,83,1,1,17,3,164,50,154,44,
-1,2,16,3,0,0,11,1,17,4,1,160,50,171,54,2,2,16,3,0,0,10,1,17,3,1,163,42,2,1,17,
-3,167,14,163,44,1,1,17,3,171,69,160,33,1,1,17,3,171,70,156,6,1,2,16,3,0,0,9,
-1,17,3,1,13,2,2,16,3,0,0,8,2,16,3,0,0,7,1,17,3,1,3,2,2,16,3,0,0,6,1,17,3,1,160,
-85,172,6,2,16,3,0,0,5,1,17,2,1,2,2,16,3,0,0,4,1,17,3,1,6,2,1,17,3,148,124,127,
-1,1,17,3,165,82,160,91,172,12,1,17,3,164,98,163,58,1,2,16,3,0,0,3,1,17,3,1,158,
-85,2,2,16,3,0,0,2,1,17,4,1,150,126,6,2,2,16,3,0,0,1,1,17,3,1,156,95,2,2,16,3,
-0,0,0,1,17,3,1,151,23,2,1,17,2,166,38,1,1,18,4,2,42,34,1,1,18,2,151,30,1,0};
-/* Owl Lisp runtime */
-
-#include <signal.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <errno.h>
-#include <time.h>
-#include <inttypes.h>
-#include <fcntl.h>
-#include <sys/time.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <dirent.h>
-#include <string.h>
-#include <netinet/in.h>
-#include <sys/select.h>
-#include <sys/socket.h>
-#include <sys/wait.h>
-#include <termios.h>
-#include <stdio.h>
-#include <netdb.h>
-
-#include "./radamsa.h"
-
-#ifndef EMULTIHOP
-#define EMULTIHOP -1
-#endif
-#ifndef ENODATA
-#define ENODATA -1
-#endif
-#ifndef ENOLINK
-#define ENOLINK -1
-#endif
-#ifndef ENOSR
-#define ENOSR -1
-#endif
-#ifndef ENOSTR
-#define ENOSTR -1
-#endif
-#ifndef ENOTRECOVERABLE
-#define ENOTRECOVERABLE -1
-#endif
-#ifndef EOWNERDEAD
-#define EOWNERDEAD -1
-#endif
-#ifndef ETIME
-#define ETIME -1
-#endif
-#ifndef F_DUPFD_CLOEXEC
-#define F_DUPFD_CLOEXEC -1
-#endif
-#ifndef O_CLOEXEC
-#define O_CLOEXEC 0
-#endif
-#ifndef O_EXEC
-#define O_EXEC 0
-#endif
-#ifndef O_NOFOLLOW
-#define O_NOFOLLOW 0
-#endif
-#ifndef O_RSYNC
-#define O_RSYNC 0
-#endif
-#ifndef O_DSYNC
-#define O_DSYNC 0
-#endif
-#ifndef O_SEARCH
-#define O_SEARCH 0
-#endif
-#ifndef O_TTY_INIT
-#define O_TTY_INIT 0
-#endif
-#ifdef __APPLE__
-#define st_atim st_atimespec
-#define st_mtim st_mtimespec
-#define st_ctim st_ctimespec
-#endif
-
-typedef unsigned int uint;
-typedef uint8_t byte;
-typedef uintptr_t word; /* heap cell */
-typedef uint32_t hval; /* heap value */
-typedef intptr_t wdiff;
-
-/*** Macros ***/
-
-#define IPOS                        8 /* offset of immediate payload */
-#define SPOS                        16 /* offset of size bits in header immediate values */
-#define TPOS                        2  /* offset of type bits in header */
-#define V(ob)                       (*(word *)(ob))
-#define W                           ((uint)sizeof(word))
-#define LDW                         ((W >> 3) + 2) /* poor man's log2(W), valid for 4, 8, 16 */
-#define NWORDS                      1024*1024*8    /* static malloc'd heap size if used as a library */
-#define FBITS                       24             /* bits in fixnum, on the way to 24 and beyond */
-#define FMAX                        ((1<<FBITS)-1) /* maximum fixnum (and most negative fixnum) */
-#define MAXOBJ                      0xffff         /* max words in tuple including header */
-#define MAXPAYL                     ((MAXOBJ - 1) * W) /* maximum payload in an allocated object */
-#define RAWBIT                      2048
-#define FPOS                        (SPOS - LDW) /* offset of the fractional part in the header size */
-#define payl_len(hdr)               (((hval)hdr >> FPOS) - W - (W - 1))
-#define make_immediate(value, type) ((hval)(value) << IPOS | (type) << TPOS | 2)
-#define make_header(size, type)     ((hval)(size) << SPOS | (type) << TPOS | 2)
-#define BOOL(cval)                  ((cval) ? ITRUE : IFALSE)
-#define immval(desc)                ((hval)(desc) >> IPOS)
-#define fixnump(desc)               (((desc) & 255) == 2)
-#define NR                          98 /* FIXME: should be ~32, see owl/register.scm:/define.n-registers/ */
-#define header(x)                   V(x)
-#define is_type(x, t)               (((x) & (63 << TPOS | 2)) == ((t) << TPOS | 2))
-#define objsize(x)                  ((hval)(x) >> SPOS)
-#define immediatep(x)               ((word)(x) & 2)
-#define allocp(x)                   (!immediatep(x))
-#define rawp(hdr)                   ((hdr) & RAWBIT)
-#define NEXT(n)                     ip += n; continue
-#define PAIRHDR                     make_header(3, 1)
-#define NUMHDR                      make_header(3, 40) /* <- on the way to 40, see type-int+ in defmac.scm */
-#define NUMNHDR                     make_header(3, 41)
-#define pairp(ob)                   (allocp(ob) && V(ob) == PAIRHDR)
-#define cons(a, d)                  mkpair(PAIRHDR, a, d)
-#define INULL                       make_immediate(0, 13)
-#define IFALSE                      make_immediate(1, 13)
-#define ITRUE                       make_immediate(2, 13)
-#define IEMPTY                      make_immediate(3, 13) /* empty ff */
-#define IEOF                        make_immediate(4, 13)
-#define IHALT                       make_immediate(5, 13)
-#define TNUM                        0
-#define TTUPLE                      2
-#define TSTRING                     3
-#define TPORT                       12
-#define TTHREAD                     31
-#define TNUMN                       32
-#define TBVEC                       19
-#define TBYTECODE                   16
-#define TPROC                       17
-#define TCLOS                       18
-#define F(value)                    make_immediate(value, TNUM)
-#define stringp(ob)                 (allocp(ob) && (V(ob) & make_header(0, 63)) == make_header(0, TSTRING))
-#define FLAG                        1
-#define cont(n)                     V((word)(n) & ~FLAG)
-#define flag(n)                     ((word)(n) ^ FLAG)
-#define flagged(n)                  ((word)(n) & FLAG)
-#define flagged_or_raw(n)           ((word)(n) & (RAWBIT | FLAG))
-#define TBIT                        1024
-#define teardown_needed(hdr)        ((word)(hdr) & TBIT)
-#define A0                          R[*ip]
-#define A1                          R[ip[1]]
-#define A2                          R[ip[2]]
-#define A3                          R[ip[3]]
-#define A4                          R[ip[4]]
-#define A5                          R[ip[5]]
-#define G(ptr, n)                   (((word *)(ptr))[n])
-#define TICKS                       10000 /* # of function calls in a thread quantum */
-#define allocate(size, to)          (to = fp, fp += size)
-#define error(opcode, a, b)         do { R[4] = F(opcode); R[5] = (word)(a); R[6] = (word)(b); goto invoke_mcp; } while (0)
-#define assert(exp, val, code)      if (!(exp)) error(code, val, ITRUE)
-#define assert_not(exp, val, code)  if (exp) error(code, val, ITRUE)
-#define MEMPAD                      (NR + 2) * 8 /* space at end of heap for starting GC */
-#define MINGEN                      1024 * 32 /* minimum generation size before doing full GC */
-#define INITCELLS                   100000
-
-/*** Globals and Prototypes ***/
-
-extern char **environ;
-
-/* memstart <= genstart <= memend */
-static word *genstart;
-static word *memstart;
-static word *memend;
-static hval max_heap_mb; /* max heap size in MB */
-static int breaked;      /* set in signal handler, passed over to owl in thread switch */
-static word state;       /* IFALSE | previous program state across runs */
-static const byte *hp;
-static word *fp;
-static byte *file_heap;
-static struct termios tsettings;
-static uint64_t nalloc;
-static size_t maxheap;
-
-/*** Garbage Collector, based on "Efficient Garbage Compaction Algorithm" by Johannes Martin (1982) ***/
-
-static __inline__ void rev(word pos) {
-   word val = V(pos);
-   word next = cont(val);
-   V(pos) = next;
-   cont(val) = (pos | FLAG) ^ (val & FLAG);
-}
-
-static __inline__ word *chase(word *pos) {
-   word val = cont(pos);
-   while (allocp(val) && flagged(val)) {
-      pos = (word *)val;
-      val = cont(pos);
-   }
-   return pos;
-}
-
-static void mark(word *pos, word *end) {
-   while (pos != end) {
-      word val = *pos;
-      if (allocp(val) && val >= (word)genstart) {
-         if (flagged(val)) {
-            pos = (word *)flag(chase((word *)val));
-         } else {
-            word hdr = header(val);
-            rev((word) pos);
-            if (!flagged_or_raw(hdr))
-               pos = (word *)val + objsize(hdr);
-         }
-      }
-      --pos;
-   }
-}
-
-static word *compact() {
-   word *new = genstart;
-   word *old = new;
-   word *end = memend - 1;
-   while (old < end) {
-      word val = *old;
-      if (flagged(val)) {
-         hval h;
-         *new = val;
-         do { /* unthread */
-            rev((word) new);
-         } while (flagged(*new));
-         h = objsize(*new);
-         if (old == new) {
-            old += h;
-            new += h;
-         } else {
-            while (--h)
-               *++new = *++old;
-            old++;
-            new++;
-         }
-      } else {
-         /* if (teardown_needed(val))
-            printf("gc: would teardown\n"); */
-         old += objsize(val);
-      }
-   }
-   return new;
-}
-
-static void fix_pointers(word *pos, wdiff delta) {
-   for (;;) {
-      word hdr = *pos;
-      hval n = objsize(hdr);
-      if (hdr == 0) /* end marker reached. only dragons beyond this point. */
-         return;
-      if (rawp(hdr)) {
-         pos += n; /* no pointers in raw objects */
-      } else {
-         for (++pos; --n; ++pos) {
-            word val = *pos;
-            if (allocp(val))
-               *pos = val + delta;
-         }
-      }
-   }
-}
-
-/* emulate sbrk with malloc'd memory, because sbrk is no longer properly supported */
-/* n-cells-wanted → heap-delta (to be added to pointers), updates memstart and memend */
-static wdiff adjust_heap(wdiff cells) {
-   word *old = memstart;
-   word nwords = memend - memstart + MEMPAD; /* MEMPAD is after memend */
-   word new_words = nwords + (cells > 0xffffff ? 0xffffff : cells); /* limit heap growth speed */
-   if (((cells > 0) && (new_words*W < nwords*W)) || ((cells < 0) && (new_words*W > nwords*W)))
-      return 0; /* don't try to adjust heap, if the size_t would overflow in realloc */
-   memstart = realloc(memstart, new_words*W);
-   if (memstart == old) { /* whee, no heap slide \o/ */
-      memend = memstart + new_words - MEMPAD; /* leave MEMPAD words alone */
-      return 0;
-   } else if (memstart) { /* d'oh! we need to O(n) all the pointers... */
-      wdiff delta = (word)memstart - (word)old;
-      memend = memstart + new_words - MEMPAD; /* leave MEMPAD words alone */
-      fix_pointers(memstart, delta);
-      return delta;
-   } else {
-      breaked |= 8; /* will be passed over to mcp at thread switch */
-      return 0;
-   }
-}
-
-/* input desired allocation size and (the only) pointer to root object
-   return a pointer to the same object after heap compaction, possible heap size change and relocation */
-static word *gc(int size, word *regs) {
-   word *root;
-   word *realend = memend;
-   wdiff nfree;
-   fp = regs + objsize(*regs);
-   root = fp+1;
-   *root = (word) regs;
-   memend = fp;
-   nalloc += fp - genstart;
-   mark(root, fp);
-   fp = compact();
-   regs = (word *)*root;
-   memend = realend;
-   nfree = (word)memend - (word)regs;
-   if (genstart == memstart) {
-      word heapsize = (word) memend - (word) memstart;
-      word nused = heapsize - nfree;
-      if (maxheap < nused)
-         maxheap = nused;
-      if (heapsize / (1024 * 1024) > max_heap_mb)
-         breaked |= 8; /* will be passed over to mcp at thread switch */
-      nfree -= size*W + MEMPAD; /* how much really could be snipped off */
-      if (nfree < (heapsize / 5) || nfree < 0) {
-         /* increase heap size if less than 20% is free by ~10% of heap size (growth usually implies more growth) */
-         regs[objsize(*regs)] = 0; /* use an invalid descriptor to denote end live heap data */
-         regs = (word *) ((word)regs + adjust_heap(size*W + nused/10 + 4096));
-         nfree = memend - regs;
-         if (nfree <= size)
-            breaked |= 8; /* will be passed over to mcp at thread switch. may cause owl<->gc loop if handled poorly on lisp side! */
-      } else if (nfree > (heapsize/3)) {
-         /* decrease heap size if more than 33% is free by 10% of the free space */
-         wdiff dec = -(nfree / 10);
-         wdiff new = nfree - dec;
-         if (new > size*W*2 + MEMPAD) {
-            regs[objsize(*regs)] = 0; /* as above */
-            regs = (word *) ((word)regs + adjust_heap(dec+MEMPAD*W));
-            heapsize = (word)memend - (word)memstart;
-            nfree = (word)memend - (word)regs;
-         }
-      }
-      genstart = regs; /* always start new generation */
-   } else if (nfree < MINGEN || nfree < size*W*2) {
-      genstart = memstart; /* start full generation */
-      return gc(size, regs);
-   } else {
-      genstart = regs; /* start new generation */
-   }
-   return regs;
-}
-
-/*** OS Interaction and Helpers ***/
-
-//static void signal_handler(int signal) {
-//   switch (signal) {
-//      case SIGINT:
-//         breaked |= 2;
-//         break;
-//      case SIGPIPE:
-//         break; /* can cause loop when reporting errors */
-//      default:
-//         breaked |= 4;
-//   }
-//}
-
-/* list length, no overflow or valid termination checks */
-static uint llen(word *ptr) {
-   uint len = 0;
-   while (pairp(ptr)) {
-      len++;
-      ptr = (word *) ptr[2];
-   }
-   return len;
-}
-/*
-static void set_signal_handler(void) {
-   struct sigaction sa;
-   sa.sa_handler = signal_handler;
-   sigemptyset(&sa.sa_mask);
-   sa.sa_flags = SA_RESTART;
-   sigaction(SIGINT, &sa, NULL);
-   sigaction(SIGPIPE, &sa, NULL);
-}
-*/
-static word mkpair(word h, word a, word d) {
-   word *pair;
-   allocate(3, pair);
-   pair[0] = h;
-   pair[1] = a;
-   pair[2] = d;
-   return (word)pair;
-}
-
-/* recursion depth does not exceed two */
-static word mkint(uint64_t x) {
-   return mkpair(NUMHDR, F(x), x > FMAX ? mkint(x >> FBITS) : INULL);
-}
-
-/* make a raw object to hold len bytes (compute size, advance fp, clear padding) */
-static word mkraw(uint type, hval len) {
-   word *ob;
-   byte *end;
-   hval hdr = (W + len + W - 1) << FPOS | RAWBIT | make_header(0, type);
-   uint pads = -len % W;
-   allocate(objsize(hdr), ob);
-   *ob = hdr;
-   end = (byte *)ob + W + len;
-   while (pads--)
-      *end++ = 0; /* clear the padding bytes */
-   return (word)ob;
-}
-
-/*** Primops called from VM and generated C-code ***/
-
-static hval prim_connect(word *host, word port, word type) {
-   int sock;
-   byte *ip = (byte *)host + W;
-   unsigned long ipfull;
-   struct sockaddr_in addr;
-   char udp = (immval(type) == 1);
-   port = immval(port);
-   if ((sock = socket(PF_INET, (udp ? SOCK_DGRAM : SOCK_STREAM), (udp ? IPPROTO_UDP : 0))) == -1)
-      return IFALSE;
-   if (udp)
-      return make_immediate(sock, TPORT);
-   if (!allocp(host)) /* bad host type */
-      return IFALSE;
-   addr.sin_family = AF_INET;
-   addr.sin_port = htons(port);
-   addr.sin_addr.s_addr = (in_addr_t) host[1];
-   ipfull = ip[0] << 24 | ip[1] << 16 | ip[2] << 8 | ip[3];
-   addr.sin_addr.s_addr = htonl(ipfull);
-   if (connect(sock, (struct sockaddr *) &addr, sizeof(struct sockaddr_in)) < 0) {
-      close(sock);
-      return IFALSE;
-   }
-   return make_immediate(sock, TPORT);
-}
-
-static word prim_less(word a, word b) {
-   if (immediatep(a))
-      return immediatep(b) ? BOOL(a < b) : ITRUE;  /* imm < alloc */
-   else
-      return immediatep(b) ? IFALSE : BOOL(a < b); /* alloc > imm */
-}
-
-static word prim_ref(word pword, hval pos) {
-   hval hdr;
-   if (immediatep(pword))
-      return IFALSE;
-   hdr = header(pword);
-   pos = immval(pos);
-   if (rawp(hdr)) { /* raw data is #[hdrbyte{W} b0 .. bn 0{0,W-1}] */
-      if (payl_len(hdr) <= pos)
-         return IFALSE;
-      return F(((byte *)pword)[W + pos]);
-   }
-   if (!pos || objsize(hdr) <= pos) /* tuples are indexed from 1 (probably later 0-255) */
-      return IFALSE;
-   return G(pword, pos);
-}
-
-static int64_t cnum(word a) {
-   uint64_t x;
-   if (allocp(a)) {
-      word *p = (word *)a;
-      uint shift = 0;
-      x = 0;
-      do {
-         x |= (uint64_t)immval(p[1]) << shift;
-         shift += FBITS;
-         p = (word *)p[2];
-      } while (shift < 64 && allocp(p));
-      return header(a) == NUMNHDR ? -x : x;
-   }
-   x = immval(a);
-   return is_type(a, TNUMN) ? -x : x;
-}
-
-static word onum(int64_t n, uint s) {
-   word h = NUMHDR, t = TNUM;
-   if (s && n < 0) {
-      h = NUMNHDR;
-      t = TNUMN;
-      n = -n;
-   }
-   if (n > FMAX) {
-      word p = mkint(n);
-      header(p) = h;
-      return p;
-   }
-   return make_immediate(n, t);
-}
-
-static word prim_set(word wptr, hval pos, word val) {
-   word *ob = (word *)wptr;
-   hval hdr, p;
-   word *new;
-   pos = immval(pos);
-   if (immediatep(ob))
-      return IFALSE;
-   hdr = *ob;
-   if (rawp(hdr) || (hdr = objsize(hdr)) < pos)
-      return IFALSE;
-   allocate(hdr, new);
-   for (p = 0; p <= hdr; ++p)
-      new[p] = (pos == p && p) ? val : ob[p];
-   return (word) new;
-}
-
-static void setdown(void) {
-   tcsetattr(0, TCSANOW, &tsettings); /* return stdio settings */
-}
-
-static word do_poll(word, word, word);
-
-/* system- and io primops */
-static word prim_sys(word op, word a, word b, word c) {
-   switch (immval(op)) {
-      case 0: { /* clock_gettime clock_id → nanoseconds */
-         struct timespec ts;
-         if (clock_gettime(cnum(a), &ts) != -1)
-            return onum(ts.tv_sec * INT64_C(1000000000) + ts.tv_nsec, 1);
-         return IFALSE; }
-      case 1: /* open path flags mode → port | #f */
-         if (stringp(a)) {
-            int fd = open((const char *)a + W, cnum(b), immval(c));
-            if (fd != -1)
-               return make_immediate(fd, TPORT);
-         }
-         return IFALSE;
-      case 2:
-         return BOOL(close(immval(a)) == 0);
-      case 3: { /* 3 = sopen port 0=tcp|1=udp -> False | fd  */
-         int port = immval(a);
-         int type = immval(b);
-         int s;
-         int opt = 1; /* TRUE */
-         char udp = (type == 1);
-         struct sockaddr_in myaddr;
-         myaddr.sin_family = AF_INET;
-         myaddr.sin_port = htons(port);
-         myaddr.sin_addr.s_addr = INADDR_ANY;
-         s = socket(AF_INET, (udp ? SOCK_DGRAM : SOCK_STREAM), (udp ? IPPROTO_UDP : 0));
-         if (s < 0)
-            return IFALSE;
-         if (type != 1) {
-            if (setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, sizeof(opt)) \
-                || bind(s, (struct sockaddr *) &myaddr, sizeof(myaddr)) != 0 \
-                || listen(s, SOMAXCONN) != 0) {
-               close(s);
-               return IFALSE;
-            }
-         } else {
-            if (bind(s, (struct sockaddr *) &myaddr, sizeof(myaddr)) != 0) {
-               close(s);
-               return IFALSE;
-            }
-         }
-         return make_immediate(s, TPORT); }
-      case 4: { /* 4 = accept port -> rval=False|(ip . fd) */
-         int sock = immval(a);
-         struct sockaddr_in addr;
-         socklen_t len = sizeof(addr);
-         int fd;
-         word ipa;
-         fd = accept(sock, (struct sockaddr *)&addr, &len);
-         if (fd < 0) return IFALSE;
-         ipa = mkraw(TBVEC, 4);
-         memcpy((word *)ipa + 1, &addr.sin_addr, 4);
-         return cons(ipa, make_immediate(fd, TPORT)); }
-      case 5: /* read fd len -> bvec | EOF | #f */
-         if (is_type(a, TPORT)) {
-            size_t len = memend - fp;
-            const size_t max = len > MAXOBJ ? MAXPAYL : (len - 1) * W;
-            len = cnum(b);
-            len = read(immval(a), fp + 1, len < max ? len : max);
-            if (len == 0)
-               return IEOF;
-            if (len != (size_t)-1)
-               return mkraw(TBVEC, len);
-         }
-         return IFALSE;
-      case 6:
-         setdown();
-         exit(immval(a)); /* stop the press */
-      case 7: /* set memory limit (in mb) */
-         max_heap_mb = immval(a);
-         return a;
-      case 8: { /* return system constants */
-         static const word sysconst[] = {
-            S_IFMT, W, S_IFBLK, S_IFCHR, S_IFIFO, S_IFREG, S_IFDIR, S_IFLNK,
-            S_IFSOCK, E2BIG, EACCES, EADDRINUSE, EADDRNOTAVAIL, EAFNOSUPPORT, EAGAIN, EALREADY,
-            EBADF, EBADMSG, EBUSY, ECANCELED, ECHILD, ECONNABORTED, ECONNREFUSED, ECONNRESET,
-            EDEADLK, EDESTADDRREQ, EDOM, EDQUOT, EEXIST, EFAULT, EFBIG, EHOSTUNREACH,
-            EIDRM, EILSEQ, EINPROGRESS, EINTR, EINVAL, EIO, EISCONN, EISDIR,
-            ELOOP, EMFILE, EMLINK, EMSGSIZE, EMULTIHOP, ENAMETOOLONG, ENETDOWN, ENETRESET,
-            ENETUNREACH, ENFILE, ENOBUFS, ENODATA, ENODEV, ENOENT, ENOEXEC, ENOLCK,
-            ENOLINK, ENOMEM, ENOMSG, ENOPROTOOPT, ENOSPC, ENOSR, ENOSTR, ENOSYS,
-            ENOTCONN, ENOTDIR, ENOTEMPTY, ENOTRECOVERABLE, ENOTSOCK, ENOTSUP, ENOTTY, ENXIO,
-            EOPNOTSUPP, EOVERFLOW, EOWNERDEAD, EPERM, EPIPE, EPROTO, EPROTONOSUPPORT, EPROTOTYPE,
-            ERANGE, EROFS, ESPIPE, ESRCH, ESTALE, ETIME, ETIMEDOUT, ETXTBSY,
-            EWOULDBLOCK, EXDEV, SEEK_SET, SEEK_CUR, SEEK_END, O_EXEC, O_RDONLY, O_RDWR,
-            O_SEARCH, O_WRONLY, O_APPEND, O_CLOEXEC, O_CREAT,
-#if defined O_DIRECTORY
-                                                              O_DIRECTORY,
-#endif
-                                                                           O_DSYNC, O_EXCL,
-            O_NOCTTY, O_NOFOLLOW, O_NONBLOCK, O_RSYNC, O_SYNC, O_TRUNC, O_TTY_INIT, O_ACCMODE,
-            FD_CLOEXEC, F_DUPFD, F_DUPFD_CLOEXEC, F_GETFD, F_SETFD, F_GETFL, F_SETFL,
-            F_GETLK, F_SETLK, F_SETLKW, F_RDLCK, F_UNLCK, F_WRLCK, CLOCK_MONOTONIC,
-            CLOCK_PROCESS_CPUTIME_ID, CLOCK_REALTIME, CLOCK_THREAD_CPUTIME_ID,
-#if !defined __HAIKU__
-            F_GETOWN, F_SETOWN
-#endif
-         };
-         return onum(sysconst[immval(a) % (sizeof sysconst / W)], 0); }
-      case 9: /* return process variables */
-         return onum(
-            a == F(0) ? errno :
-            a == F(1) ? (uintptr_t)environ :
-            a == F(8) ? nalloc + fp - memstart : /* total allocated objects so far */
-            a == F(9) ? maxheap : /* maximum heap size in a major gc */
-            max_heap_mb, 0);
-      case 10: { /* receive-udp-packet sock → (ip-bvec . payload-bvec)| #false */
-         struct sockaddr_in si_other;
-         socklen_t slen = sizeof(si_other);
-         word bvec, ipa;
-         int recvd;
-         recvd = recvfrom(immval(a), fp + 1, 65528, 0, (struct sockaddr *)&si_other, &slen);
-         if (recvd < 0)
-            return IFALSE;
-         bvec = mkraw(TBVEC, recvd);
-         ipa = mkraw(TBVEC, 4);
-         memcpy((word *)ipa + 1, &si_other.sin_addr, 4);
-         return cons(ipa, bvec); }
-      case 11: /* open-dir path → dirobjptr | #false */
-         if (stringp(a)) {
-            DIR *dirp = opendir((const char *)a + W);
-            if (dirp != NULL)
-               return onum((intptr_t)dirp, 1);
-         }
-         return IFALSE;
-      case 12: { /* read-dir dirp → pointer */
-         struct dirent *ent;
-         errno = 0;
-         ent = readdir((DIR *)(intptr_t)cnum(a));
-         return onum(ent != NULL ? (uintptr_t)&ent->d_name : 0, 0); }
-      case 13: /* close-dir dirp → bool */
-         return BOOL(closedir((DIR *)(intptr_t)cnum(a)) == 0);
-      case 14: /* strerror errnum → pointer */
-         return onum((uintptr_t)strerror(immval(a)), 0);
-      case 15: /* fcntl port cmd arg → integer | #f */
-         if (is_type(a, TPORT)) {
-            int res = fcntl(immval(a), cnum(b), (intptr_t)cnum(c));
-            if (res != -1)
-               return onum(res, 1);
-         }
-         return IFALSE;
-      case 16: /* getenv key → pointer */
-         return onum(stringp(a) ? (uintptr_t)getenv((const char *)a + W) : 0, 0);
-      case 17: { /* exec[v] path argl ret */
-         char *path = (char *)a + W;
-         int nargs = llen((word *)b);
-         char **argp, **args = realloc(NULL, (nargs + 1) * sizeof(char *));
-         if (args == NULL)
-            return IFALSE;
-         for (argp = args; nargs--; ++argp) {
-            *argp = (char *)G(b, 1) + W;
-            b = G(b, 2);
-         }
-         *argp = NULL;
-         execv(path, args); /* may return -1 and set errno */
-         free(args);
-         return IFALSE; }
-      case 18: { /* fork → #f: failed, 0: we're in child process, integer: we're in parent process */
-         pid_t pid = fork();
-         return pid != -1 ? onum(pid, 1) : IFALSE; }
-      case 19: { /* wait <pid> <respair> _ */
-         pid_t pid = a != IFALSE ? cnum(a) : -1;
-         int status;
-         word *r = (word *)b;
-         pid = waitpid(pid, &status, WNOHANG|WUNTRACED); /* |WCONTINUED */
-         if (pid == -1)
-            return IFALSE; /* error */
-         if (pid == 0)
-            return ITRUE; /* no changes, would block */
-         if (WIFEXITED(status)) {
-            r[1] = F(1);
-            r[2] = F(WEXITSTATUS(status));
-         } else if (WIFSIGNALED(status)) {
-            r[1] = F(2);
-            r[2] = F(WTERMSIG(status));
-         } else if (WIFSTOPPED(status)) {
-            r[1] = F(3);
-            r[2] = F(WSTOPSIG(status));
-         /*} else if (WIFCONTINUED(status)) {
-            r[1] = F(4);
-            r[2] = F(1); */
-         } else {
-            r = (word *)IFALSE;
-         }
-         return (word)r; }
-      case 20: /* chdir path → bool */
-         return BOOL(stringp(a) && chdir((char *)a + W) == 0);
-      case 21: /* kill pid signal → bool */
-         return BOOL(kill(cnum(a), immval(b)) == 0);
-      case 22: /* unlink path → bool */
-         return BOOL(stringp(a) && unlink((char *)a + W) == 0);
-      case 23: /* rmdir path → bool */
-         return BOOL(stringp(a) && rmdir((char *)a + W) == 0);
-      case 24: /* mknod path (type . mode) dev → bool */
-         if (stringp(a) && pairp(b)) {
-            const char *path = (const char *)a + W;
-            const mode_t type = cnum(G(b, 1)), mode = immval(G(b, 2));
-            if ((type == S_IFDIR ? mkdir(path, mode) : mknod(path, type | mode, cnum(c))) == 0)
-               return ITRUE;
-         }
-         return IFALSE;
-      case 25: /* lseek port offset whence → offset | #f */
-         if (is_type(a, TPORT)) {
-            off_t o = lseek(immval(a), cnum(b), cnum(c));
-            if (o != -1)
-               return onum(o, 1);
-         }
-         return IFALSE;
-      case 26:
-         if (a != IFALSE) {
-            static struct termios old;
-            tcgetattr(0, &old);
-            old.c_iflag &= ~(IGNBRK | BRKINT | PARMRK | ISTRIP | INLCR | IGNCR | ICRNL | IXON);
-            old.c_oflag &= ~OPOST;
-            old.c_lflag &= ~(ECHO | ECHONL | ICANON | ISIG | IEXTEN);
-            old.c_cflag &= ~(CSIZE | PARENB);
-            old.c_cflag |= CS8;
-            return BOOL(tcsetattr(0, TCSANOW, &old) == 0);
-         }
-         return BOOL(tcsetattr(0, TCSANOW, &tsettings) == 0);
-      case 27: { /* sendmsg sock (port . ipv4) bvec */
-         int sock = immval(a);
-         int port;
-         struct sockaddr_in peer;
-         byte *ip, *data = (byte *)c + W;
-         size_t len = payl_len(header(c));
-         port = immval(G(b, 1));
-         ip = (byte *)G(b, 2) + W;
-         peer.sin_family = AF_INET;
-         peer.sin_port = htons(port);
-         peer.sin_addr.s_addr = htonl(ip[0] << 24 | ip[1] << 16 | ip[2] << 8 | ip[3]);
-         return BOOL(sendto(sock, data, len, 0, (struct sockaddr *)&peer, sizeof(peer)) != -1); }
-      case 28: /* setenv <owl-raw-bvec-or-ascii-leaf-string> <owl-raw-bvec-or-ascii-leaf-string-or-#f> */
-         if (stringp(a) && (b == IFALSE || stringp(b))) {
-            const char *name = (const char *)a + W;
-            if ((b != IFALSE ? setenv(name, (const char *)b + W, 1) : unsetenv(name)) == 0)
-               return ITRUE;
-         }
-         return IFALSE;
-      case 29:
-         return prim_connect((word *) a, b, c);
-      case 30: /* dup2 old-port new-fd → new-port | #f */
-         if (is_type(a, TPORT)) {
-            int fd = dup2(immval(a), immval(b));
-            if (fd != -1)
-               return make_immediate(fd, TPORT);
-         }
-         return IFALSE;
-      case 31: { /* pipe → '(read-port . write-port) | #f */
-         int fd[2];
-         if (pipe(fd) != 0)
-            return IFALSE;
-         return cons(make_immediate(fd[0], TPORT), make_immediate(fd[1], TPORT)); }
-      case 32: /* rename src dst → bool */
-         return BOOL(stringp(a) && stringp(b) && rename((char *)a + W, (char *)b + W) == 0);
-      case 33: /* link src dst → bool */
-         return BOOL(stringp(a) && stringp(b) && link((char *)a + W, (char *)b + W) == 0);
-      case 34: /* symlink src dst → bool */
-         return BOOL(stringp(a) && stringp(b) && symlink((char *)a + W, (char *)b + W) == 0);
-      case 35: /* readlink path → raw-sting | #false */
-         if (stringp(a)) {
-            size_t len = memend - fp;
-            size_t max = len > MAXOBJ ? MAXPAYL + 1 : (len - 1) * W;
-            /* the last byte is temporarily used to check, if the string fits */
-            len = readlink((const char *)a + W, (char *)fp + W, max);
-            if (len != (size_t)-1 && len != max)
-               return mkraw(TSTRING, len);
-         }
-         return IFALSE;
-      case 36: /* getcwd → raw-sting | #false */
-         {
-            size_t len = memend - fp;
-            size_t max = len > MAXOBJ ? MAXPAYL + 1 : (len - 1) * W;
-            /* the last byte is temporarily used for the terminating '\0' */
-            if (getcwd((char *)fp + W, max) != NULL)
-               return mkraw(TSTRING, strnlen((char *)fp + W, max - 1));
-         }
-         return IFALSE;
-      case 37: /* umask mask → mask */
-         return F(umask(immval(a)));
-      case 38: /* stat fd|path follow → list */
-         if (immediatep(a) || stringp(a)) {
-            struct stat st;
-            int flg = b != IFALSE ? 0 : AT_SYMLINK_NOFOLLOW;
-            if ((allocp(a) ? fstatat(AT_FDCWD, (char *)a + W, &st, flg) : fstat(immval(a), &st)) == 0) {
-               word lst = INULL;
-               lst = cons(onum(st.st_blocks, 1), lst);
-               lst = cons(onum(st.st_blksize, 1), lst);
-               lst = cons(onum(st.st_ctim.tv_sec * INT64_C(1000000000) + st.st_atim.tv_nsec, 1), lst);
-               lst = cons(onum(st.st_mtim.tv_sec * INT64_C(1000000000) + st.st_atim.tv_nsec, 1), lst);
-               lst = cons(onum(st.st_atim.tv_sec * INT64_C(1000000000) + st.st_atim.tv_nsec, 1), lst);
-               lst = cons(onum(st.st_size, 1), lst);
-               lst = cons(onum(st.st_rdev, 0), lst);
-               lst = cons(onum(st.st_gid, 0), lst);
-               lst = cons(onum(st.st_uid, 0), lst);
-               lst = cons(onum(st.st_nlink, 0), lst);
-               lst = cons(onum(st.st_mode, 0), lst);
-               lst = cons(onum(st.st_ino, 0), lst);
-               lst = cons(onum(st.st_dev, 1), lst);
-               return lst;
-            }
-         }
-         return INULL;
-      case 39: /* chmod fd|path mode follow → bool */
-         if ((immediatep(a) || stringp(a)) && fixnump(b)) {
-            mode_t mod = immval(b);
-            int flg = c != IFALSE ? 0 : AT_SYMLINK_NOFOLLOW;
-            if ((allocp(a) ? fchmodat(AT_FDCWD, (char *)a + W, mod, flg) : fchmod(immval(a), mod)) == 0)
-               return ITRUE;
-         }
-         return IFALSE;
-      case 40: /* chown fd|path (uid . gid) follow → bool */
-         if ((immediatep(a) || stringp(a)) && pairp(b)) {
-            uid_t uid = cnum(G(b, 1));
-            gid_t gid = cnum(G(b, 2));
-            int flg = c != IFALSE ? 0 : AT_SYMLINK_NOFOLLOW;
-            if ((allocp(a) ? fchownat(AT_FDCWD, (char *)a + W, uid, gid, flg) : fchown(immval(a), uid, gid)) == 0)
-               return ITRUE;
-         }
-         return IFALSE;
-      case 41: { /* peek mem nbytes → num */
-         const word p = cnum(a);
-         return onum(
-            b == F(1) ? *(uint8_t *)p :
-            b == F(2) ? *(uint16_t *)p :
-            b == F(4) ? *(uint32_t *)p :
-            b == F(8) ? *(uint64_t *)p :
-            V(p), 0);
-         }
-      case 42: /* write fd data len | #f → nbytes | #f */
-         if (is_type(a, TPORT) && allocp(b)) {
-            size_t len, size = payl_len(header(b));
-            len = c != IFALSE ? cnum(c) : size;
-            if (len <= size) {
-               len = write(immval(a), (const word *)b + 1, len);
-               if (len != (size_t)-1)
-                  return onum(len, 0);
-            }
-         }
-         return IFALSE;
-      case 43:
-         return do_poll(a, b, c);
-      case 44:  {
-         char *host = (char *) (word *) a + W;
-         struct addrinfo *res;
-         int nth = immval(b);
-         int rv = getaddrinfo(host, NULL, NULL, &res);
-         if (rv == 0) {
-            word rv = IFALSE;
-            while (nth--) {
-               if (res)
-                  res = res->ai_next;
-               if (!res)
-                  return INULL;
-            }
-            if (res->ai_addr->sa_family == AF_INET6) {
-               char *n = (char *) &((struct sockaddr_in6*)res->ai_addr)->sin6_addr;
-               rv = mkraw(TBVEC, 6);
-               memcpy((word *)rv + 1, n, 6);
-            } else if (res->ai_addr->sa_family == AF_INET) {
-               char *n = (char *) &((struct sockaddr_in*)res->ai_addr)->sin_addr;
-               rv = mkraw(TBVEC, 4);
-               memcpy((word *)rv + 1, n, 4);
-            }
-            freeaddrinfo(res);
-            return rv;
-         }
-         return IFALSE; }
-      default:
-         return IFALSE;
-   }
-}
-
-static word prim_lraw(word wptr, word type) {
-   word *lst = (word *)wptr;
-   byte *pos;
-   word *ob, raw;
-   uint len = 0;
-   for (ob = lst; pairp(ob); ob = (word *)ob[2])
-      len++;
-   if ((word)ob != INULL || len > MAXPAYL)
-      return IFALSE;
-   raw = mkraw(immval(type), len);
-   pos = (byte *)raw + W;
-   for (ob = lst; (word)ob != INULL; ob = (word *)ob[2])
-      *pos++ = immval(ob[1]);
-   return raw;
-}
-
-/* TODO: implement this in owl */
-static word do_poll(word a, word b, word c) {
-   fd_set rs, ws, es;
-   word *cur;
-   hval r1, r2;
-   int nfds = 1;
-   struct timeval tv;
-   int res;
-   FD_ZERO(&rs); FD_ZERO(&ws); FD_ZERO(&es);
-   for (cur = (word *)a; (word)cur != INULL; cur = (word *)cur[2]) {
-      int fd = immval(G(cur[1], 1));
-      FD_SET(fd, &rs);
-      FD_SET(fd, &es);
-      if (fd >= nfds)
-         nfds = fd + 1;
-   }
-   for (cur = (word *)b; (word)cur != INULL; cur = (word *)cur[2]) {
-      int fd = immval(G(cur[1], 1));
-      FD_SET(fd, &ws);
-      FD_SET(fd, &es);
-      if (fd >= nfds)
-         nfds = fd + 1;
-   }
-   if (c == IFALSE) {
-      res = select(nfds, &rs, &ws, &es, NULL);
-   } else {
-      hval ms = immval(c);
-      tv.tv_sec = ms/1000;
-      tv.tv_usec = (ms%1000)*1000;
-      res = select(nfds, &rs, &ws, &es, &tv);
-   }
-   if (res < 1) {
-      r1 = IFALSE; r2 = BOOL(res < 0); /* 0 = timeout, otherwise error or signal */
-   } else {
-      int fd; /* something active, wake the first thing */
-      for (fd = 0; ; ++fd) {
-         if (FD_ISSET(fd, &rs)) {
-            r1 = make_immediate(fd, TPORT); r2 = F(1); break;
-         } else if (FD_ISSET(fd, &ws)) {
-            r1 = make_immediate(fd, TPORT); r2 = F(2); break;
-         } else if (FD_ISSET(fd, &es)) {
-            r1 = make_immediate(fd, TPORT); r2 = F(3); break;
-         }
-      }
-   }
-   return cons(r1, r2);
-}
-
-static word vm(word *ob, word arg) {
-   byte *ip;
-   uint bank = 0;
-   uint ticker = TICKS;
-   unsigned short acc;
-   uint op;
-   word R[NR];
-
-   static const uint16_t load_imms[] = { F(0), INULL, ITRUE, IFALSE };
-
-   /* clear blank regs */
-   for (acc = 1; acc != NR; ++acc)
-      R[acc] = INULL;
-   R[0] = IFALSE;
-   R[3] = IHALT;
-   R[4] = arg;
-   acc = 2; /* boot always calls with 2 args */
-
-apply: /* apply something at ob to values in regs, or maybe switch context */
-
-   if (allocp(ob)) {
-      hval hdr = *ob & 4095; /* cut size out, take just header info */
-      if (hdr == make_header(0, TPROC)) { /* proc */
-         R[1] = (word) ob; ob = (word *) ob[1];
-      } else if (hdr == make_header(0, TCLOS)) { /* clos */
-         R[1] = (word) ob; ob = (word *) ob[1];
-         R[2] = (word) ob; ob = (word *) ob[1];
-      } else if (!is_type(hdr, TBYTECODE)) { /* not even code, extend bits later */
-         error(259, ob, INULL);
-      }
-      if (!ticker--)
-         goto switch_thread;
-      ip = (byte *)ob + W;
-      goto invoke;
-   } else if ((word)ob == IHALT) {
-      /* it's the final continuation */
-      ob = (word *) R[0];
-      if (allocp(ob)) {
-         R[0] = IFALSE;
-         breaked = 0;
-         R[4] = R[3];
-         R[3] = F(2);
-         R[5] = IFALSE;
-         R[6] = IFALSE;
-         ticker = FMAX;
-         bank = 0;
-         acc = 4;
-         goto apply;
-      }
-      if (acc == 2) /* update state when main program exits with 2 values */
-         state = R[4];
-      return R[3];
-   } else {
-      word *state;
-      allocate(acc+1, state);
-      *state = make_header(acc+1, TTUPLE);
-      memcpy(state + 1, R + 3, acc * W); /* first arg at R3 */
-      error(0, ob, state); /* not callable */
-   }
-
-switch_thread: /* enter mcp if present */
-   if (R[0] == IFALSE) { /* no mcp, ignore */
-      ticker = TICKS;
-      goto apply;
-   } else {
-      /* save vm state and enter mcp cont at R0 */
-      word *state;
-      ticker = FMAX;
-      bank = 0;
-      acc = acc + 4;
-      R[acc] = (word) ob;
-      allocate(acc, state);
-      *state = make_header(acc, TTHREAD);
-      state[acc-1] = R[acc];
-      memcpy(state + 1, R + 1, (acc - 2) * W);
-      ob = (word *) R[0];
-      R[0] = IFALSE; /* remove mcp cont */
-      /* R3 marks the syscall to perform */
-      R[3] = breaked ? (breaked & 8 ? F(14) : F(10)) : F(1);
-      R[4] = (word) state;
-      R[5] = F(breaked);
-      R[6] = IFALSE;
-      acc = 4;
-      breaked = 0;
-      goto apply;
-   }
-invoke: /* nargs and regs ready, maybe gc and execute ob */
-   if (((word)fp) + 1024*64 >= ((word) memend)) {
-      *fp = make_header(NR + 2, 50); /* hdr r_0 .. r_(NR-1) ob */
-      memcpy(fp + 1, R, NR * W);
-      fp[NR + 1] = (word)ob;
-      fp = gc(1024*64, fp);
-      ob = (word *)fp[NR + 1];
-      memcpy(R, fp + 1, NR * W);
-      ip = (byte *)ob + W;
-   }
-
-   for (;;) {
-      op = *ip++;
-      /* main dispatch */
-      switch (op & 63) {
-      case 0:
-         op = *ip << 8 | ip[1];
-         goto super_dispatch;
-      case 1:
-         A2 = G(A0, ip[1]);
-         NEXT(3);
-      case 2: /* jmp-nargs a hi lo */
-         if (acc != *ip)
-            ip += ip[1] << 8 | ip[2];
-         NEXT(3);
-      case 3: /* goto */
-         ob = (word *)A0;
-         acc = ip[1];
-         goto apply;
-      case 5: /* mov2 from1 to1 from2 to2 */
-         A1 = A0;
-         A3 = A2;
-         NEXT(4);
-      case 6: { /* opcodes 134, 6, 198, 70 */
-         word size = *ip++, tmp;
-         word *ob;
-         tmp = R[op & 64 ? 1 : *ip++];
-         allocate(size, ob);
-         *ob = make_header(size, (op >> 7) + TPROC);
-         ob[1] = G(tmp, *ip++);
-         for (tmp = 2; tmp != size; ++tmp)
-            ob[tmp] = R[*ip++];
-         R[*ip++] = (word)ob;
-         NEXT(0); }
-      case 7: /* eq? a b r */
-         A2 = BOOL(A0 == A1);
-         NEXT(3);
-      case 8: /* jeq a b o, extended jump */
-         if (A0 == A1)
-            ip += ip[3] << 8 | ip[2];
-         NEXT(4);
-      case 9:
-         A1 = A0;
-         NEXT(2);
-      case 10: /* ldfix n to, encoding: nnnnnnnn nsoooooo (num-1/sign/op) */
-         A1 = ((hval)*ip << 9) + (op << 1) + F(1) - 20;
-         NEXT(2);
-      case 13: /* ldi{2bit what} [to] */
-         A0 = load_imms[op >> 6];
-         NEXT(1);
-      case 15: { /* type o r */
-         word ob = A0;
-         if (allocp(ob))
-            ob = V(ob);
-         A1 = F((hval)ob >> TPOS & 63);
-         NEXT(2); }
-      case 16: /* jeqi[which] a lo hi */ /* FIXME: move this to op4 after fasl update, and encode offset in big-endian (like most other jump instructions) */
-         if (A0 == load_imms[op >> 6])
-            ip += ip[2] << 8 | ip[1];
-         NEXT(3);
-      case 18: /* fxand a b r, prechecked */
-         A2 = A0 & A1;
-         NEXT(3);
-      case 21: { /* fx- a b r u, types prechecked, signs ignored */
-         hval r = immval(A0) - immval(A1);
-         A3 = F(r >> FBITS & 1);
-         A2 = F(r);
-         NEXT(4); }
-      case 22: { /* fx+ a b r o, types prechecked, signs ignored */
-         hval r = immval(A0) + immval(A1);
-         A3 = F(r >> FBITS);
-         A2 = F(r);
-         NEXT(4); }
-      case 23: { /* mkt t s f1 .. fs r */
-         word t = *ip++;
-         word s = *ip++ + 1; /* the argument is n-1 to allow making a 256-tuple with 255, and avoid 0-tuples */
-         word *ob;
-         uint p;
-         allocate(s+1, ob); /* s fields + header */
-         *ob = make_header(s+1, t);
-         for (p = 0; p != s; ++p)
-            ob[p + 1] = R[ip[p]];
-         R[ip[p]] = (word)ob;
-         NEXT(s+1); }
-      case 24: /* ret val == implicit call r3 with 1 arg */
-         ob = (word *) R[3];
-         R[3] = A0;
-         acc = 1;
-         goto apply;
-      case 25: { /* jmp-var-args a hi lo */
-         uint needed = *ip;
-         if (acc == needed) {
-            R[acc + 3] = INULL; /* add empty extra arg list */
-         } else if (acc > needed) {
-            word tail; /* TODO: no call overflow handling yet */
-            for (tail = INULL; acc > needed; --acc)
-               tail = cons(R[acc + 2], tail);
-            R[acc + 3] = tail;
-         } else {
-            ip += ip[1] << 8 | ip[2];
-         }
-         NEXT(3); }
-      case 26: { /* fxqr ah al b qh ql r, b != 0, int32 / int16 -> int32, as fixnums */
-         uint64_t a = (uint64_t)immval(A0) << FBITS | immval(A1);
-         hval b = immval(A2);
-         uint64_t q;
-         q = a / b;
-         A3 = F(q >> FBITS);
-         A4 = F(q);
-         A5 = F(a - q*b);
-         NEXT(6); }
-      case 27: /* syscall cont op arg1 arg2 */
-         ob = (word *) R[0];
-         R[0] = IFALSE;
-         R[3] = A1;
-         R[4] = A0;
-         R[5] = A2;
-         R[6] = A3;
-         acc = 4;
-         if (ticker > 10)
-            bank = ticker; /* deposit remaining ticks for return to thread */
-         goto apply;
-      case 28: { /* sizeb obj to */
-         word ob = A0;
-         if (immediatep(ob)) {
-            A1 = IFALSE;
-         } else {
-            word hdr = header(ob);
-            A1 = rawp(hdr) ? F(payl_len(hdr)) : IFALSE;
-         }
-         NEXT(2); }
-      case 29: /* fxior a b r, prechecked */
-         A2 = A0 | A1;
-         NEXT(3);
-      case 32: { /* bind tuple <n> <r0> .. <rn> */
-         word *tuple = (word *) R[*ip++];
-         word hdr, pos = 1, n = *ip++ + 1;
-         assert(allocp(tuple), tuple, 32);
-         hdr = *tuple;
-         assert_not(rawp(hdr) || objsize(hdr) != n, tuple, 32);
-         while (--n)
-            R[*ip++] = tuple[pos++];
-         NEXT(0); }
-      case 33: /* fxxor a b r, prechecked */
-         A2 = A0 ^ (FMAX << IPOS & A1); /* inherit A0's type info */
-         NEXT(3);
-      case 35: { /* listuple type size lst to */
-         uint type = immval(A0);
-         hval size = immval(A1) + 1;
-         word *lst = (word *)A2;
-         word *ob;
-         if (size < MAXOBJ) {
-            allocate(size, ob);
-            A3 = (word) ob;
-            *ob++ = make_header(size, type);
-            while (--size) {
-               assert(pairp(lst), lst, 35);
-               *ob++ = lst[1];
-               lst = (word *) lst[2];
-            }
-         } else {
-            A3 = IFALSE;
-         }
-         NEXT(4); }
-      case 39: { /* fx* a b l h */
-         uint64_t res = (uint64_t)immval(A0) * immval(A1);
-         A3 = F(res >> FBITS);
-         A2 = F(res);
-         NEXT(4); }
-      case 41: { /* car a r, or cdr d r */
-         word *ob = (word *)A0;
-         assert(pairp(ob), ob, op);
-         A1 = ob[op >> 6];
-         NEXT(2); }
-      case 44: /* less a b r */
-         A2 = prim_less(A0, A1);
-         NEXT(3);
-      case 45: /* set t o v r */
-         A3 = prim_set(A0, A1, A2);
-         NEXT(4);
-      case 47: /* ref t o r */
-         A2 = prim_ref(A0, A1);
-         NEXT(3);
-      case 50: { /* run thunk quantum */
-         word hdr;
-         ob = (word *)A0;
-         R[0] = R[3];
-         ticker = bank ? bank : immval(A1);
-         bank = 0;
-         assert(allocp(ob), ob, 50);
-         hdr = *ob;
-         if (is_type(hdr, TTHREAD)) {
-            hval pos = objsize(hdr) - 1;
-            word code = ob[pos];
-            acc = pos - 3;
-            while (--pos)
-               R[pos] = ob[pos];
-            ip = (byte *)code + W;
-         } else {
-            /* call a thunk with terminal continuation */
-            R[3] = IHALT; /* exit via R0 when the time comes */
-            acc = 1;
-            goto apply;
-         }
-         NEXT(0); }
-      case 51: /* cons a b r */
-         A2 = cons(A0, A1);
-         NEXT(3);
-      case 58: { /* fx>> x n hi lo */
-         hval x = immval(A0);
-         uint n = immval(A1);
-         A2 = F(x >> n);
-         A3 = F(x << (FBITS - n));
-         NEXT(4); }
-      case 59: /* lraw lst type r (FIXME: alloc amount testing compiler pass not in place yet) */
-         A2 = prim_lraw(A0, A1);
-         NEXT(3);
-      case 61: { /* arity error */
-         word *t;
-         allocate(acc + 1, t);
-         *t = make_header(acc + 1, TTUPLE);
-         memcpy(t + 1, R + 3, acc * W);
-         error(61, ob, t); }
-      case 62: /* set-ticker <val> <to> -> old ticker value */
-         /* ponder: it should be possible to remove this, if the only use is to yield control */
-         A1 = F(ticker);
-         ticker = immval(A0);
-         NEXT(2);
-      case 63: /* sys-prim op arg1 arg2 arg3 r1 */
-         A4 = prim_sys(A0, A1, A2, A3);
-         NEXT(5);
-      default:
-         error(256, F(op), IFALSE); /* report unimplemented opcode */
-      }
-   }
-
-super_dispatch: /* run macro instructions */
-   switch (op) {
-   case 0:
-    if(acc==2){
-      {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[5]=ob[1];R[6]=ob[2];R[7]=ob[3];R[8]=ob[4];}
-      R[9]=G(R[2],2);
-      R[10]=G(R[1],2);
-      R[11]=G(R[1],3);
-      R[12]=G(R[1],4);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[8];fp[6]=R[12];fp[5]=R[11];fp[4]=R[10];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-      ob=(word*)R[9];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[13]=F(0);
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 2:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],8);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[12]=G(R[1],7);
-        R[7]=R[4];R[4]=R[12];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],8);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-        R[8]=G(R[1],4);
-        R[5]=G(R[1],5);
-        R[6]=R[4];
-        R[3]=R[7];R[4]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 3:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[5];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[5]=128*508+258;
-      R[9]=R[4];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 4:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[6];R[8]=(word)fp;fp+=4;
-      R[9]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[11]=R[5];
-      R[7]=R[4];R[4]=R[3];
-      R[3]=R[8];R[5]=R[9];
-      ob=(word*)R[11];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 5:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[8];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-      R[10]=R[5];R[5]=R[4];
-      R[6]=R[7];R[4]=R[10];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 6:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[8]=R[4];R[4]=R[7];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 7:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[8];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 8:
-    if(acc==3){
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[6];R[6]=R[5];
-      R[5]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 9:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[8]=(word)fp;fp+=3;
-      R[9]=IFALSE;
-      R[10]=R[7];R[11]=R[6];
-      R[6]=R[5];R[3]=R[8];
-      R[7]=R[9];R[5]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 10:
-    if(acc==1){
-      {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[4]=ob[1];R[5]=ob[2];R[6]=ob[3];}
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[8];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 11:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[2],4);
-      R[5]=INULL;
-      R[11]=R[4];R[6]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 12:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[5];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-      R[5]=F(0);
-      R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 13:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],2);
-        R[6]=INULL;
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 14:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[8]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 15:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=8;
-      R[9]=R[4];R[5]=R[3];
-      R[4]=R[8];R[3]=R[10];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 16:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],2);
-      R[8]=R[4];
-      R[5]=R[7];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 17:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],7);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=R[3];R[7]=R[4];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 18:
-    if(acc==4){
-      if(R[5]==F(0)){
-        R[7]=INULL;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 19:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[6];fp[3]=R[4];fp[2]=R[7];R[9]=(word)fp;fp+=6;
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 20:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],5);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[4];fp[6]=R[9];fp[5]=R[3];fp[4]=R[5];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=9;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 21:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],7);
-        if(R[4]==INULL){
-          R[5]=G(R[1],8);
-          R[6]=G(R[1],6);
-          R[7]=G(R[1],3);
-          R[8]=G(R[1],5);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[4]=G(R[1],2);
-          ob=(word*)R[5];acc=3;
-        }else{
-          R[5]=G(R[1],5);
-          R[6]=G(R[1],4);
-          *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[4];acc=1;
-        }
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],7);
-        R[8]=G(R[1],8);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[8]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 22:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[5]=INULL;
-      R[6]=R[3];
-      R[7]=R[8];R[3]=R[9];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 23:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],2);
-        R[10]=G(R[1],3);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[3];fp[4]=R[6];fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[5];acc=3;
-      }else{
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],2);
-        R[10]=G(R[1],3);
-        R[11]=G(R[1],4);
-        *fp=make_header(10,TCLOS);fp[1]=G(R[2],4);fp[9]=R[7];fp[8]=R[3];fp[7]=R[11];fp[6]=R[4];fp[5]=R[10];fp[4]=R[5];fp[3]=R[6];fp[2]=R[9];R[3]=(word)fp;fp+=10;
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 24:
-    if(acc==1){
-      {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[4]=ob[1];R[5]=ob[2];R[6]=ob[3];R[7]=ob[4];}
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      R[12]=G(R[1],8);
-      R[13]=G(R[1],9);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],2);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[5];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=11;
-      R[4]=G(R[1],3);
-      R[16]=G(R[1],2);
-      R[10]=R[6];
-      R[5]=R[9];R[6]=R[16];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 25:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      R[11]=G(R[1],5);
-      R[12]=G(R[1],6);
-      R[13]=G(R[1],7);
-      R[14]=G(R[1],8);
-      R[15]=G(R[1],9);
-      R[16]=G(R[1],10);
-      *fp=make_header(14,TCLOS);fp[1]=G(R[2],3);fp[13]=R[16];fp[12]=R[15];fp[11]=R[4];fp[10]=R[5];fp[9]=R[6];fp[8]=R[14];fp[7]=R[13];fp[6]=R[12];fp[5]=R[11];fp[4]=R[10];fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=14;
-      R[4]=G(R[1],2);
-      R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 26:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      *fp=make_header(5,2);fp[1]=R[3];fp[2]=R[4];fp[3]=R[5];fp[4]=R[6];R[4]=(word)fp;fp+=5;
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      R[12]=G(R[1],9);
-      R[13]=G(R[1],10);
-      R[14]=G(R[1],11);
-      R[15]=G(R[1],12);
-      R[16]=G(R[1],13);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[16];fp[8]=R[15];fp[7]=R[14];fp[6]=R[13];fp[5]=R[12];fp[4]=R[11];fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=10;
-      R[5]=G(R[1],5);
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 27:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      R[12]=G(R[1],9);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[3];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-      R[7]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 28:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      R[10]=G(R[1],9);
-      R[11]=G(R[1],10);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],4);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[12]=(word)fp;fp+=10;
-      if(R[3]==IFALSE){
-        R[3]=IFALSE;
-        ob=(word*)R[12];acc=1;
-      }else{
-        R[13]=G(R[2],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[12];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-        R[4]=G(R[1],2);
-        ob=(word*)R[13];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 29:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],8);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[12]=G(R[1],2);
-        R[7]=R[4];R[4]=R[12];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],8);
-        R[8]=G(R[1],9);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 30:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 31:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[8]=128*0+258;
-      R[4]=R[5];R[5]=R[8];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 32:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[5]=128*2+258;
-      R[10]=R[4];R[4]=R[6];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 33:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[8]=G(R[2],4);
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 34:
-    if(acc==3){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 35:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=128*18+258;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 36:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*2+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 37:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],7);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        R[10]=128*1+258;
-        R[11]=R[4];R[3]=R[6];
-        R[4]=R[7];R[5]=R[8];
-        R[6]=R[9];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[12]=R[4];R[6]=R[3];
-        R[3]=R[9];R[4]=R[10];
-        ob=(word*)R[12];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 38:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[5];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 39:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[4];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 40:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[11]=(word)fp;fp+=9;
-      R[5]=128*0+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 41:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[11];fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],5);
-        R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],5);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],2);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];}
-          R[7]=G(R[1],4);
-          R[3]=G(R[1],8);
-          R[4]=G(R[1],5);
-          R[5]=G(R[1],7);
-          R[6]=G(R[1],3);
-          ob=(word*)R[7];acc=5;
-        }else{
-          R[6]=G(R[2],6);
-          if(R[3]==R[6]){
-            R[7]=G(R[1],2);
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];R[10]=ob[3];R[11]=ob[4];}
-            R[12]=G(R[2],3);
-            R[13]=G(R[1],6);
-            R[14]=G(R[1],7);
-            R[15]=G(R[1],8);
-            *fp=make_header(7,TCLOS);fp[1]=G(R[2],7);fp[6]=R[15];fp[5]=R[14];fp[4]=R[13];fp[3]=R[9];fp[2]=R[11];R[3]=(word)fp;fp+=7;
-            R[4]=G(R[1],5);
-            R[5]=R[10];
-            ob=(word*)R[12];acc=3;
-          }else{
-            R[5]=G(R[1],2);
-            R[8]=G(R[2],8);
-            R[3]=G(R[1],8);
-            R[4]=G(R[2],9);
-            ob=(word*)R[8];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 42:
-    if(acc==2){
-      R[5]=G(R[2],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      *fp=make_header(5,2);fp[1]=R[5];fp[2]=R[6];fp[3]=R[4];fp[4]=R[7];R[6]=(word)fp;fp+=5;
-      R[9]=G(R[2],2);
-      R[10]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[10];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 43:
-    if(acc==2){
-      R[5]=G(R[2],4);
-      *fp=make_header(3,2);fp[1]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],4);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 44:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=128*6+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 45:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[2],2);
-        R[4]=G(R[1],2);
-        R[7]=G(R[1],3);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=128*0+258;
-        if(R[4]==R[5]){
-          R[6]=G(R[2],2);
-          R[4]=G(R[1],2);
-          R[8]=G(R[1],3);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[8];fp[3]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[6];acc=2;
-        }else{
-          R[6]=128*2+258;
-          if(R[4]==R[6]){
-            R[7]=G(R[2],5);
-            R[8]=G(R[1],2);
-            R[9]=G(R[1],3);
-            *fp=make_header(4,TCLOS);fp[1]=G(R[2],6);fp[3]=R[9];fp[2]=R[8];R[10]=(word)fp;fp+=4;
-            R[4]=R[3];R[3]=R[10];
-            ob=(word*)R[7];acc=2;
-          }else{
-            R[7]=G(R[2],7);
-            R[8]=G(R[1],2);
-            R[9]=G(R[1],3);
-            *fp=make_header(5,TCLOS);fp[1]=G(R[2],8);fp[4]=R[9];fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-            R[4]=F(0);
-            R[5]=INULL;
-            ob=(word*)R[7];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 46:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[4]=R[6];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 47:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],4);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[9];R[6]=(word)fp;fp+=3;
-      R[9]=R[5];R[5]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 48:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[8]=(word)fp;fp+=5;
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 49:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[4];R[6]=(word)fp;fp+=3;
-      R[11]=R[5];R[3]=R[7];
-      R[4]=R[8];R[5]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 50:
-    if(acc==4){
-      if(R[4]==F(0)){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[7]=128*0+258;
-        {hval r=immval(R[4])-immval(R[7]);R[9]=F(r>>FBITS&1);R[8]=F(r);}
-        R[10]=G(R[1],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-        R[4]=128*192+258;
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 51:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=128*20+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 52:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[1],2);
-        R[4]=128*252+258;
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=128*0+258;
-        if(R[4]==R[5]){
-          R[6]=G(R[1],2);
-          R[4]=128*254+258;
-          ob=(word*)R[6];acc=2;
-        }else{
-          R[6]=128*2+258;
-          if(R[4]==R[6]){
-            R[7]=G(R[1],2);
-            R[4]=128*508+258;
-            ob=(word*)R[7];acc=2;
-          }else{
-            R[7]=128*4+258;
-            if(R[4]==R[7]){
-              R[8]=G(R[1],2);
-              R[4]=128*510+258;
-              ob=(word*)R[8];acc=2;
-            }else{
-              R[8]=128*6+258;
-              if(R[4]==R[8]){
-                R[9]=G(R[1],2);
-                R[4]=G(R[2],2);
-                ob=(word*)R[9];acc=2;
-              }else{
-                R[9]=128*8+258;
-                if(R[4]==R[9]){
-                  R[10]=G(R[1],2);
-                  R[4]=G(R[2],3);
-                  ob=(word*)R[10];acc=2;
-                }else{
-                  R[10]=128*10+258;
-                  if(R[4]==R[10]){
-                    R[11]=G(R[1],2);
-                    R[4]=G(R[2],4);
-                    ob=(word*)R[11];acc=2;
-                  }else{
-                    R[11]=128*12+258;
-                    if(R[4]==R[11]){
-                      R[12]=G(R[1],2);
-                      R[4]=G(R[2],5);
-                      ob=(word*)R[12];acc=2;
-                    }else{
-                      R[12]=128*14+258;
-                      if(R[4]==R[12]){
-                        R[13]=G(R[1],2);
-                        R[4]=G(R[2],6);
-                        ob=(word*)R[13];acc=2;
-                      }else{
-                        R[13]=128*16+258;
-                        if(R[4]==R[13]){
-                          R[14]=G(R[1],2);
-                          R[4]=G(R[2],7);
-                          ob=(word*)R[14];acc=2;
-                        }else{
-                          R[14]=G(R[2],8);
-                          R[15]=G(R[1],2);
-                          *fp=make_header(3,TPROC);fp[1]=G(R[2],9);fp[2]=R[15];R[16]=(word)fp;fp+=3;
-                          R[5]=G(R[2],10);
-                          R[4]=R[3];R[3]=R[16];
-                          ob=(word*)R[14];acc=3;
-                        }
-                      }
-                    }
-                  }
-                }
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 53:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 54:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-      if(R[3]==IFALSE){
-        R[3]=G(R[1],2);
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[9]=G(R[2],2);
-        R[4]=G(R[1],2);
-        R[3]=R[8];
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 55:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=128*38+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 56:
-    if(acc==2){
-      R[5]=G(R[2],4);
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[5];fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[5]=128*0+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 57:
-    if(acc==5){
-      if(R[5]==F(0)){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 58:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      R[11]=128*0+258;
-      R[8]=R[5];R[5]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 59:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=INULL;
-      R[10]=R[6];
-      R[11]=R[5];R[5]=R[3];
-      R[6]=R[7];R[7]=R[4];
-      R[4]=R[10];R[3]=R[11];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 60:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=128*62+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 61:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],3);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 62:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[4]==R[3]){
-        R[5]=G(R[1],3);
-        R[3]=IFALSE;
-        ob=(word*)R[5];acc=1;
-      }else{
-        R[5]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[5];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 63:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[2],3);
-        R[3]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[4]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],4);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],2);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];R[9]=ob[3];R[10]=ob[4];}
-          R[11]=G(R[2],5);
-          R[12]=G(R[1],4);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[2],6);fp[4]=R[12];fp[3]=R[8];fp[2]=R[9];R[3]=(word)fp;fp+=5;
-          R[5]=G(R[1],3);
-          R[4]=R[10];
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[6]=G(R[2],7);
-          if(R[3]==R[6]){
-            R[7]=G(R[1],2);
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-            R[10]=G(R[2],3);
-            R[3]=G(R[1],4);
-            R[5]=G(R[1],3);
-            R[4]=R[9];
-            ob=(word*)R[10];acc=3;
-          }else{
-            R[7]=G(R[2],8);
-            R[3]=G(R[1],4);
-            R[4]=G(R[2],9);
-            R[5]=G(R[1],2);
-            ob=(word*)R[7];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 64:
-    if(acc==2){
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],7);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],2);fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=5;
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[7];R[9]=(word)fp;fp+=5;
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],4);fp[4]=R[7];fp[3]=R[5];fp[2]=R[6];R[10]=(word)fp;fp+=5;
-      R[5]=INULL;
-      R[6]=R[5];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 65:
-    if(acc==7){
-      if(R[4]==INULL){
-        if(R[5]==INULL){
-          R[10]=G(R[1],2);
-          R[4]=R[6];
-          ob=(word*)R[10];acc=2;
-        }else{
-          R[10]=G(R[1],3);
-          *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-          R[4]=G(R[1],5);
-          ob=(word*)R[10];acc=4;
-        }
-      }else{
-        R[10]=G(R[1],6);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[1],7);fp[8]=R[8];fp[7]=R[3];fp[6]=R[4];fp[5]=R[7];fp[4]=R[9];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 66:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],8);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],3);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],4);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],2);
-        if(R[4]==INULL){
-          R[5]=G(R[1],8);
-          R[6]=G(R[1],7);
-          R[7]=G(R[1],6);
-          R[8]=INULL;
-          R[9]=G(R[1],3);
-          R[10]=G(R[1],5);
-          R[11]=G(R[1],4);
-          R[12]=R[8];R[8]=R[5];
-          R[3]=R[6];R[4]=R[7];
-          R[6]=R[9];R[7]=R[10];
-          R[9]=R[11];R[5]=R[12];
-          ob=(word*)R[8];acc=7;
-        }else{
-          R[5]=G(R[2],4);
-          R[6]=G(R[1],4);
-          R[7]=G(R[1],5);
-          R[8]=G(R[1],6);
-          R[9]=G(R[1],7);
-          R[10]=G(R[1],8);
-          *fp=make_header(7,TPROC);fp[1]=G(R[2],5);fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-          R[12]=G(R[2],6);
-          R[6]=G(R[1],3);
-          R[9]=R[5];
-          R[5]=R[4];R[4]=R[12];
-          ob=(word*)R[9];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 67:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=INULL;
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[5];
-      R[5]=R[7];R[7]=R[8];
-      R[8]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[12];
-      ob=(word*)R[8];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 68:
-    if(acc==7){
-      if(R[4]==INULL){
-        R[10]=G(R[1],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[4]=G(R[1],4);
-        ob=(word*)R[10];acc=4;
-      }else{
-        R[10]=G(R[1],5);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[1],6);fp[8]=R[7];fp[7]=R[3];fp[6]=R[6];fp[5]=R[8];fp[4]=R[9];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 69:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],8);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],5);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        *fp=make_header(10,TCLOS);fp[1]=G(R[2],5);fp[9]=R[11];fp[8]=R[10];fp[7]=R[3];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 70:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      R[12]=G(R[1],9);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[3];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 71:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[10];fp[7]=R[3];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-      R[14]=G(R[1],2);
-      R[7]=R[4];R[4]=R[14];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 72:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      *fp=make_header(10,TPROC);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[13]=(word)fp;fp+=10;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 73:
-    if(acc==1){
-      R[4]=G(R[1],9);
-      R[5]=G(R[1],8);
-      R[6]=G(R[1],7);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],5);
-      R[9]=INULL;
-      R[10]=G(R[1],4);
-      R[11]=G(R[1],3);
-      R[12]=G(R[1],2);
-      R[15]=R[10];
-      R[10]=R[4];R[4]=R[6];
-      R[6]=R[8];R[8]=R[3];
-      R[3]=R[5];R[5]=R[7];
-      R[7]=R[9];R[9]=R[15];
-      ob=(word*)R[10];acc=10;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 74:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],8);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],4);
-        *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[11]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],6);
-        R[9]=R[4];R[4]=R[11];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[2],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],6);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 75:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 76:
-    if(acc==1){
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[6];R[13]=R[5];
-      R[5]=R[3];R[6]=R[7];
-      R[7]=R[8];R[8]=R[4];
-      R[4]=R[12];R[3]=R[13];
-      ob=(word*)R[8];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 77:
-    if(acc==10){
-      if(R[4]==INULL){
-        R[13]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-        R[4]=R[7];R[5]=R[8];
-        ob=(word*)R[13];acc=3;
-      }else{
-        R[13]=G(R[1],4);
-        *fp=make_header(12,TCLOS);fp[1]=G(R[1],5);fp[11]=R[10];fp[10]=R[3];fp[9]=R[5];fp[8]=R[6];fp[7]=R[8];fp[6]=R[9];fp[5]=R[11];fp[4]=R[12];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=12;
-        ob=(word*)R[13];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 78:
-    if(acc==1){
-      R[4]=G(R[1],8);
-      if(R[3]==R[4]){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],9);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],5);
-        R[11]=G(R[1],11);
-        R[12]=G(R[1],10);
-        R[13]=G(R[1],4);
-        *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=11;
-        R[4]=G(R[1],7);
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=128*182+258;
-        if(R[3]==R[5]){
-          R[6]=G(R[2],2);
-          R[7]=G(R[1],2);
-          R[8]=G(R[1],3);
-          R[9]=G(R[1],4);
-          R[10]=G(R[1],5);
-          R[11]=G(R[1],6);
-          R[12]=G(R[1],7);
-          R[13]=G(R[1],9);
-          R[14]=G(R[1],10);
-          R[15]=G(R[1],11);
-          *fp=make_header(12,TCLOS);fp[1]=G(R[2],4);fp[11]=R[15];fp[10]=R[14];fp[9]=R[13];fp[8]=R[4];fp[7]=R[12];fp[6]=R[11];fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=12;
-          R[4]=R[7];
-          ob=(word*)R[6];acc=2;
-        }else{
-          R[6]=G(R[2],5);
-          R[7]=G(R[1],2);
-          R[8]=G(R[1],3);
-          R[9]=G(R[1],4);
-          R[10]=G(R[1],5);
-          R[11]=G(R[1],6);
-          R[12]=G(R[1],7);
-          R[13]=G(R[1],9);
-          R[14]=G(R[1],10);
-          R[15]=G(R[1],11);
-          *fp=make_header(12,TCLOS);fp[1]=G(R[2],6);fp[11]=R[15];fp[10]=R[14];fp[9]=R[13];fp[8]=R[4];fp[7]=R[12];fp[6]=R[11];fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[16]=(word)fp;fp+=12;
-          R[4]=R[3];R[3]=R[16];
-          ob=(word*)R[6];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 79:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],11);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],10);
-        R[10]=G(R[1],4);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[12]=G(R[1],3);
-        R[5]=G(R[1],7);
-        R[8]=R[4];R[4]=R[12];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        R[12]=G(R[1],9);
-        R[13]=G(R[1],10);
-        R[14]=G(R[1],11);
-        *fp=make_header(12,TCLOS);fp[1]=G(R[2],5);fp[11]=R[14];fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=12;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 80:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[2],4);
-      R[6]=G(R[1],2);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 81:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        R[11]=G(R[1],9);
-        R[12]=G(R[1],10);
-        R[13]=G(R[1],11);
-        *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-        R[15]=G(R[1],2);
-        R[7]=R[4];R[4]=R[15];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        R[12]=G(R[1],9);
-        R[13]=G(R[1],10);
-        R[14]=G(R[1],11);
-        *fp=make_header(12,TCLOS);fp[1]=G(R[2],5);fp[11]=R[14];fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=12;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 82:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        R[12]=G(R[1],9);
-        R[13]=G(R[1],10);
-        R[14]=G(R[1],11);
-        *fp=make_header(12,TCLOS);fp[1]=G(R[2],3);fp[11]=R[14];fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=12;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        R[12]=G(R[1],9);
-        R[13]=G(R[1],10);
-        R[14]=G(R[1],11);
-        *fp=make_header(12,TCLOS);fp[1]=G(R[2],5);fp[11]=R[14];fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=12;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 83:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      R[13]=G(R[1],11);
-      *fp=make_header(12,TCLOS);fp[1]=G(R[2],3);fp[11]=R[13];fp[10]=R[12];fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=12;
-      R[15]=128*182+258;
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[15];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 84:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      R[13]=G(R[1],11);
-      *fp=make_header(11,TPROC);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[14]=(word)fp;fp+=11;
-      R[15]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[14];R[4]=R[15];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 85:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      R[13]=G(R[1],11);
-      *fp=make_header(12,TCLOS);fp[1]=G(R[2],3);fp[11]=R[13];fp[10]=R[12];fp[9]=R[3];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=12;
-      R[15]=G(R[1],2);
-      R[7]=R[4];R[4]=R[15];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 86:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      R[13]=G(R[1],11);
-      *fp=make_header(11,TPROC);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[14]=(word)fp;fp+=11;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[14];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 87:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      *fp=make_header(11,TPROC);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[3];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-      R[14]=128*182+258;
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[14];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 88:
-    if(acc==1){
-      R[4]=G(R[1],10);
-      R[5]=G(R[1],9);
-      R[6]=G(R[1],8);
-      R[7]=G(R[1],7);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],4);
-      R[11]=G(R[1],3);
-      R[12]=G(R[1],2);
-      R[15]=R[6];R[16]=R[5];
-      R[5]=R[7];R[7]=R[3];
-      R[6]=R[8];R[8]=R[9];
-      R[9]=R[10];R[10]=R[4];
-      R[4]=R[15];R[3]=R[16];
-      ob=(word*)R[10];acc=10;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 89:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-      R[14]=G(R[1],2);
-      R[7]=R[4];R[4]=R[14];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 90:
-    if(acc==1){
-      R[4]=G(R[2],5);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      *fp=make_header(5,2);fp[1]=R[4];fp[2]=R[5];fp[3]=R[3];fp[4]=R[6];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],5);
-      if(R[8]==INULL){
-        R[9]=G(R[2],2);
-        R[10]=G(R[1],6);
-        R[11]=G(R[1],7);
-        R[12]=G(R[1],8);
-        R[13]=G(R[1],9);
-        R[14]=G(R[1],10);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[14];fp[6]=R[13];fp[5]=R[12];fp[4]=R[11];fp[3]=R[7];fp[2]=R[10];R[3]=(word)fp;fp+=8;
-        R[4]=G(R[1],4);
-        ob=(word*)R[9];acc=2;
-      }else{
-        R[9]=G(R[2],2);
-        R[10]=G(R[1],6);
-        R[11]=G(R[1],7);
-        R[12]=G(R[1],8);
-        R[13]=G(R[1],9);
-        R[14]=G(R[1],10);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],4);fp[8]=R[14];fp[7]=R[13];fp[6]=R[12];fp[5]=R[11];fp[4]=R[7];fp[3]=R[10];fp[2]=R[8];R[3]=(word)fp;fp+=9;
-        R[4]=G(R[1],4);
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 91:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[7]=R[4];R[4]=R[12];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 92:
-    if(acc==1){
-      R[4]=G(R[2],4);
-      *fp=make_header(3,2);fp[1]=R[4];fp[2]=R[3];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      R[12]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[12];fp[6]=R[11];fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=8;
-      R[14]=G(R[1],2);
-      R[4]=R[5];R[5]=R[14];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 93:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 94:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=INULL;
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[5];R[5]=R[7];
-      R[7]=R[8];R[8]=R[9];
-      R[9]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[12];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 95:
-    if(acc==4){
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[8];R[8]=R[9];
-      R[9]=R[7];R[7]=R[12];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 96:
-    if(acc==4){
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[8];
-      R[8]=R[7];R[7]=R[12];
-      ob=(word*)R[8];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 97:
-    if(acc==7){
-      R[10]=G(R[1],4);
-      R[11]=G(R[1],3);
-      R[12]=G(R[1],2);
-      ob=(word*)R[10];acc=10;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 98:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 99:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=128*10+258;
-      R[9]=R[6];
-      R[6]=R[5];R[5]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 100:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=ITRUE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[5]==F(0)){
-          R[7]=ITRUE;
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          R[7]=G(R[1],2);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-          ob=(word*)R[7];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 101:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[7]=R[4];R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 102:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[4];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=128*16+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 103:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[5]=128*250+258;
-        R[9]=R[4];R[4]=R[6];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 104:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[5]=128*60+258;
-        R[9]=R[4];R[4]=R[6];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 105:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[5]=128*16+258;
-        if(R[4]==R[5]){
-          R[6]=G(R[1],2);
-          R[3]=ITRUE;
-          ob=(word*)R[6];acc=1;
-        }else{
-          R[6]=128*18+258;
-          if(R[4]==R[6]){
-            R[7]=G(R[1],2);
-            R[3]=ITRUE;
-            ob=(word*)R[7];acc=1;
-          }else{
-            R[7]=128*24+258;
-            if(R[4]==R[7]){
-              R[8]=G(R[1],2);
-              R[3]=ITRUE;
-              ob=(word*)R[8];acc=1;
-            }else{
-              R[8]=G(R[1],2);
-              R[3]=IFALSE;
-              ob=(word*)R[8];acc=1;
-            }
-          }
-        }
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=ITRUE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 106:
-    if(acc==2){
-      R[5]=128*76+258;
-      if(R[4]==R[5]){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[6]=128*66+258;
-        if(R[4]==R[6]){
-          ob=(word*)R[3];R[3]=R[6];acc=1;
-        }else{
-          R[7]=IFALSE;
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 107:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],5);
-      R[11]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[4];fp[7]=R[5];fp[6]=R[11];fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[12]=(word)fp;fp+=9;
-      R[5]=128*18+258;
-      R[4]=R[3];R[3]=R[12];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 108:
-    if(acc==2){
-      R[5]=G(R[1],8);
-      if(R[5]==IFALSE){
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[7];R[8]=(word)fp;fp+=3;
-        R[5]=G(R[1],3);
-        R[10]=G(R[1],4);
-        R[7]=128*1+258;
-        R[12]=R[6];R[4]=R[3];
-        R[3]=R[8];R[6]=R[10];
-        ob=(word*)R[12];acc=5;
-      }else{
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[10];fp[5]=R[9];fp[4]=R[3];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-        R[12]=G(R[1],2);
-        R[13]=G(R[1],7);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[5];fp[3]=R[13];fp[2]=R[4];R[14]=(word)fp;fp+=5;
-        R[9]=R[6];R[4]=R[12];
-        R[5]=R[13];R[6]=R[14];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 109:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[5];
-      R[3]=R[6];R[4]=R[7];
-      R[5]=R[8];R[6]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 110:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[5]=IFALSE;
-        R[8]=R[3];
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 111:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],4);
-        R[6]=G(R[1],4);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],5);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 112:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[6]=IFALSE;
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[8]=R[4];
-        R[9]=R[5];R[5]=R[3];
-        R[4]=R[6];R[3]=R[9];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 113:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[5]=128*2+258;
-      R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 114:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[6];fp[3]=R[7];fp[2]=R[8];R[10]=(word)fp;fp+=6;
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[10];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=G(R[1],5);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 115:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[3];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      R[11]=128*0+258;
-      R[8]=R[5];R[5]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 116:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[11]=(word)fp;fp+=9;
-      R[5]=128*2+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 117:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[7]=R[4];R[4]=R[12];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 118:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[12]=(word)fp;fp+=10;
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[3];R[5]=(word)fp;fp+=3;
-      R[8]=R[4];
-      R[4]=R[11];R[3]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 119:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[13]=G(R[1],9);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[13];R[5]=(word)fp;fp+=3;
-      R[8]=R[4];R[4]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 120:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[4]=(word)fp;fp+=6;
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 121:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[8];fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[10]=G(R[2],2);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[8];fp[6]=R[3];fp[5]=R[5];fp[4]=R[6];fp[3]=R[7];fp[2]=R[9];R[3]=(word)fp;fp+=8;
-      R[4]=R[6];
-      ob=(word*)R[10];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 122:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[13]=128*2+258;
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 123:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[11]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[6]=128*2+258;
-        R[9]=R[4];R[4]=R[11];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[1],7);
-        R[5]=G(R[1],8);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=128*1+258;
-        R[11]=R[4];R[3]=R[6];
-        R[4]=R[7];R[5]=R[8];
-        R[6]=R[9];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 124:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[11]=(word)fp;fp+=7;
-      R[8]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 125:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 126:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[1],3);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[9]=R[4];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 127:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],2);
-      R[10]=G(R[1],3);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[7];fp[6]=R[4];fp[5]=R[5];fp[4]=R[6];fp[3]=R[10];fp[2]=R[9];R[4]=(word)fp;fp+=8;
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 128:
-    if(acc==2){
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[8];fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[10]=G(R[2],2);
-      R[11]=G(R[1],3);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[8];fp[6]=R[3];fp[5]=R[6];fp[4]=R[11];fp[3]=R[7];fp[2]=R[9];R[3]=(word)fp;fp+=8;
-      R[13]=G(R[1],2);
-      R[4]=R[5];R[5]=R[13];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 129:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],6);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=128*1+258;
-      R[11]=R[4];R[4]=R[6];
-      R[5]=R[7];R[6]=R[8];
-      R[7]=R[9];R[8]=R[10];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 130:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[7]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 131:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[10]=(word)fp;fp+=8;
-      R[11]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 132:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[11]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 133:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[5]=INULL;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 134:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=128*0+258;
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 135:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 136:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=5;
-      R[5]=G(R[1],2);
-      R[6]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 137:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=INULL;
-        R[9]=R[6];
-        R[6]=R[4];R[3]=R[5];
-        R[5]=R[7];R[4]=R[9];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=G(R[1],4);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 138:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[2],4);
-      R[6]=IFALSE;
-      R[12]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[12];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 139:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 140:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[12]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[12];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 141:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],3);
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-        R[4]=G(R[1],2);
-        R[8]=R[5];
-        R[5]=R[3];R[3]=R[9];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 142:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],5);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 143:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=G(R[1],2);
-        R[11]=IFALSE;
-        R[12]=R[4];
-        R[4]=R[6];R[6]=R[11];
-        ob=(word*)R[12];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 144:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 145:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[5]=R[6];R[6]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 146:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[7];fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 147:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 148:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],3);
-        R[3]=G(R[1],6);
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[4];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        R[4]=R[6];
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 149:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[8];fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[5]=R[7];R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 150:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[6]=IFALSE;
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[7]=(word)fp;fp+=5;
-        R[8]=R[4];
-        R[4]=R[3];R[3]=R[7];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 151:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[7]=R[4];R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 152:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 153:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 154:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=G(R[1],2);
-        *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[4]=R[6];
-        ob=(word*)R[8];acc=2;
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-        if(R[8]==R[5]){
-          R[10]=G(R[1],4);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-          R[4]=R[5];R[5]=R[6];
-          ob=(word*)R[10];acc=3;
-        }else{
-          R[10]=G(R[1],6);
-          *fp=make_header(8,TCLOS);fp[1]=G(R[1],7);fp[7]=R[7];fp[6]=R[3];fp[5]=R[5];fp[4]=R[6];fp[3]=R[8];fp[2]=R[9];R[3]=(word)fp;fp+=8;
-          R[4]=G(R[1],8);
-          R[6]=IFALSE;
-          R[5]=R[8];
-          ob=(word*)R[10];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 155:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[5]=G(R[1],4);
-        R[8]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],7);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[4];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-        R[10]=G(R[1],2);
-        R[6]=INULL;
-        R[5]=R[3];R[7]=R[4];
-        R[3]=R[9];R[4]=R[10];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 156:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],3);
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[9];fp[5]=R[8];fp[4]=R[4];fp[3]=R[7];fp[2]=R[6];R[10]=(word)fp;fp+=7;
-        R[4]=G(R[1],2);
-        R[8]=R[5];
-        R[5]=R[3];R[3]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 157:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[11]=(word)fp;fp+=8;
-      R[12]=G(R[2],4);
-      R[8]=R[5];R[4]=R[3];
-      R[3]=R[11];R[5]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 158:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[5]=128*124+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 159:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      if(R[4]==R[3]){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-        R[9]=128*254+258;
-        R[10]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[5]=G(R[2],4);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        R[8]=R[5];
-        R[3]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 160:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*382+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 161:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[5];fp[3]=R[4];fp[2]=R[6];R[8]=(word)fp;fp+=6;
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 162:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      R[11]=G(R[1],5);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[3];fp[8]=R[6];fp[7]=R[11];fp[6]=R[5];fp[5]=R[10];fp[4]=R[4];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=10;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 163:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],8);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],9);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[5]=R[4];R[4]=R[10];
-        ob=(word*)R[5];acc=3;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],7);
-        R[8]=G(R[1],8);
-        R[9]=G(R[1],9);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-        R[11]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[9]=R[4];R[6]=R[3];
-        R[3]=R[10];R[4]=R[11];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 164:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],2);fp[7]=R[10];fp[6]=R[3];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[5]=R[6];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 165:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],2);
-      R[10]=G(R[1],3);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[7];fp[7]=R[3];fp[6]=R[6];fp[5]=R[10];fp[4]=R[5];fp[3]=R[4];fp[2]=R[9];R[3]=(word)fp;fp+=9;
-      R[4]=R[5];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 166:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],7);
-        R[5]=G(R[1],8);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],6);
-        R[10]=128*1+258;
-        R[11]=R[4];R[3]=R[6];
-        R[4]=R[7];R[5]=R[8];
-        R[6]=R[9];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-        R[11]=G(R[1],3);
-        R[8]=R[4];R[5]=R[3];
-        R[3]=R[10];R[4]=R[11];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 167:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 168:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=128*0+258;
-      R[10]=R[4];
-      R[11]=R[6];R[6]=R[3];
-      R[4]=R[7];R[5]=R[8];
-      R[7]=R[9];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 169:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-        R[7]=R[4];
-        R[4]=R[3];R[3]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 170:
-    if(acc==5){
-      if(R[4]==INULL){
-        if(R[5]==INULL){
-          R[8]=G(R[1],2);
-          R[4]=R[6];
-          ob=(word*)R[8];acc=2;
-        }else{
-          R[8]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[4]=R[5];
-          ob=(word*)R[8];acc=2;
-        }
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-        R[10]=128*18+258;
-        if(R[8]==R[10]){
-          R[11]=G(R[1],4);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],5);fp[5]=R[7];fp[4]=R[3];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[4]=R[10];
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[11]=G(R[1],4);
-          *fp=make_header(6,TPROC);fp[1]=G(R[1],6);fp[5]=R[7];fp[4]=R[3];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[4]=R[8];
-          ob=(word*)R[11];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 171:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[7]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 172:
-    if(acc==2){
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[7];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[8]=(word)fp;fp+=7;
-      R[9]=G(R[1],2);
-      if(R[9]==INULL){
-        R[10]=G(R[2],2);
-        R[4]=G(R[1],3);
-        R[3]=R[8];
-        ob=(word*)R[10];acc=2;
-      }else{
-        R[10]=G(R[2],3);
-        R[11]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[8];fp[2]=R[11];R[3]=(word)fp;fp+=4;
-        R[4]=R[9];
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 173:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[5];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-      R[4]=R[5];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 174:
-    if(acc==1){
-      if(immediatep(R[3])){R[4]=IFALSE;}else{hval h=V(R[3]);R[4]=rawp(h)?F(payl_len(h)):IFALSE;}      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[12]=128*2+258;
-      R[8]=R[5];R[5]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 175:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],6);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[5]=128*0+258;
-        R[8]=R[4];R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],7);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],4);
-        R[10]=F(0);
-        R[11]=R[4];R[3]=R[6];
-        R[4]=R[7];R[5]=R[8];
-        R[6]=R[9];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 176:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[1],2);
-      R[5]=F(0);
-      R[9]=R[4];R[6]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 177:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[4];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-      R[12]=128*0+258;
-      R[8]=R[5];R[5]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 178:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 179:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-      R[4]=F(0);
-      R[13]=128*0+258;
-      R[9]=R[5];R[5]=R[13];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 180:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[11];R[13]=(word)fp;fp+=3;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[12];R[4]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 181:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-      R[7]=R[4];R[4]=R[11];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 182:
-    if(acc==1){
-      if(immediatep(R[3])){R[4]=IFALSE;}else{hval h=V(R[3]);R[4]=rawp(h)?F(payl_len(h)):IFALSE;}      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      R[12]=G(R[1],8);
-      R[13]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[13];fp[8]=R[12];fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=10;
-      R[15]=128*0+258;
-      R[9]=R[5];
-      R[10]=R[6];R[6]=R[4];
-      R[4]=R[10];R[5]=R[15];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 183:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      R[12]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[13]=(word)fp;fp+=10;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[12];R[14]=(word)fp;fp+=3;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[13];R[4]=R[14];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 184:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      R[10]=G(R[1],9);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],3);
-      R[5]=128*0+258;
-      R[6]=G(R[1],2);
-      R[9]=R[4];R[4]=R[12];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 185:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],8);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[7];R[13]=(word)fp;fp+=3;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[12];R[4]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 186:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[5]=128*18+258;
-      R[8]=R[4];R[4]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 187:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      R[12]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=10;
-      R[14]=128*2+258;
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[14];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 188:
-    if(acc==2){
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      R[10]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],5);fp[9]=R[10];fp[8]=R[9];fp[7]=R[8];fp[6]=R[3];fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=10;
-      R[12]=G(R[1],2);
-      if(R[12]==INULL){
-        R[13]=G(R[2],2);
-        R[4]=G(R[1],3);
-        R[3]=R[11];
-        ob=(word*)R[13];acc=2;
-      }else{
-        R[13]=G(R[2],3);
-        R[14]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[11];fp[2]=R[14];R[3]=(word)fp;fp+=4;
-        R[4]=R[12];
-        ob=(word*)R[13];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 189:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=10;
-      R[13]=F(0);
-      R[5]=128*0+258;
-      R[6]=G(R[1],2);
-      R[9]=R[4];R[4]=R[13];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 190:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[12]=G(R[1],9);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[12];R[13]=(word)fp;fp+=3;
-      R[5]=G(R[1],2);
-      R[9]=R[4];R[6]=R[3];
-      R[3]=R[11];R[4]=R[13];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 191:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      R[5]=R[4];R[4]=R[7];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 192:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[9]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      if(R[10]==INULL){
-        ob=(word*)R[9];acc=1;
-      }else{
-        R[11]=G(R[2],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[9];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-        R[4]=R[10];
-        ob=(word*)R[11];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 193:
-    if(acc==4){
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-      R[4]=R[5];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 194:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[3];fp[6]=R[6];fp[5]=R[5];fp[4]=R[9];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 195:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=10;
-      R[4]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 196:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[12]=(word)fp;fp+=9;
-      R[4]=G(R[1],3);
-      R[14]=G(R[1],2);
-      R[9]=R[5];R[6]=R[3];
-      R[3]=R[12];R[5]=R[14];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 197:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[11]=(word)fp;fp+=8;
-      R[12]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[9]=R[5];R[4]=R[3];
-      R[3]=R[11];R[5]=R[12];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 198:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[12]=(word)fp;fp+=9;
-      R[13]=128*4+258;
-      R[8]=R[5];R[4]=R[3];
-      R[3]=R[12];R[5]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 199:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      R[12]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[13]=(word)fp;fp+=10;
-      R[4]=R[3];R[3]=R[13];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 200:
-    if(acc==2){
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      R[10]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[10];fp[8]=R[3];fp[7]=R[4];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=10;
-      R[12]=G(R[1],3);
-      if(R[12]==F(0)){
-        R[13]=G(R[2],2);
-        R[4]=R[6];R[3]=R[11];
-        ob=(word*)R[13];acc=2;
-      }else{
-        R[3]=G(R[1],2);
-        ob=(word*)R[11];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 201:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],2);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      R[5]=R[4];
-      R[4]=R[3];R[3]=R[12];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 202:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 203:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[5]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 204:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=R[5];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 205:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[4];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-      R[4]=R[6];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 206:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[12]=(word)fp;fp+=9;
-      R[4]=R[3];R[3]=R[12];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 207:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[10]=(word)fp;fp+=6;
-      R[6]=G(R[1],2);
-      R[9]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 208:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],3);
-      R[11]=G(R[1],2);
-      R[8]=R[5];R[5]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 209:
-    if(acc==5){
-      if(R[5]==INULL){
-        R[8]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[6];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],5);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 210:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],3);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 211:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[11]=R[4];
-      R[5]=R[3];R[6]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 212:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[10]=(word)fp;fp+=7;
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 213:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[4];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 214:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-      R[4]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 215:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],8);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[8];R[6]=(word)fp;fp+=3;
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 216:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[5]=128*2+258;
-      R[9]=128*38+258;
-      R[10]=R[4];R[3]=R[6];
-      R[4]=R[7];R[6]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 217:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[6];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 218:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 219:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 220:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[11]=(word)fp;fp+=8;
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 221:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[3];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 222:
-    if(acc==5){
-      if(R[4]==F(0)){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[5]=128*0+258;
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 223:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 224:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[5]=128*2+258;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 225:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[5];R[4]=R[3];
-        R[3]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],3);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[2],5);
-        R[8]=R[5];
-        R[4]=R[6];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 226:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[5]=128*0+258;
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 227:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[11]=(word)fp;fp+=8;
-      R[12]=128*510+258;
-      R[8]=R[5];R[4]=R[3];
-      R[3]=R[11];R[5]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 228:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[4];fp[8]=R[11];fp[7]=R[10];fp[6]=R[3];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=10;
-      R[4]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 229:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 230:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[10]=(word)fp;fp+=7;
-      R[11]=128*14+258;
-      R[8]=R[5];R[4]=R[3];
-      R[3]=R[10];R[5]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 231:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[11]=(word)fp;fp+=8;
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 232:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-      R[4]=128*0+258;
-      R[13]=G(R[1],2);
-      R[8]=R[5];R[5]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 233:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[3];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-      R[7]=R[4];R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 234:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=G(R[1],2);
-      R[13]=G(R[1],9);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[13];R[6]=(word)fp;fp+=3;
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 235:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 236:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[5]=F(0);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 237:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      if(R[3]==IFALSE){
-        R[7]=G(R[2],2);
-        R[4]=G(R[1],2);
-        R[5]=128*0+258;
-        R[3]=R[6];
-        ob=(word*)R[7];acc=3;
-      }else{
-        R[3]=128*508+258;
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 238:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=128*508+258;
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 239:
-    if(acc==1){
-      if(immediatep(R[3])){R[4]=IFALSE;}else{hval h=V(R[3]);R[4]=rawp(h)?F(payl_len(h)):IFALSE;}      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[11]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 240:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[10]=(word)fp;fp+=7;
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 241:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-      R[4]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 242:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=G(R[1],2);
-      R[6]=G(R[2],4);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 243:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],2);
-      R[7]=R[4];R[4]=R[11];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 244:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 245:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],6);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[11]=R[6];R[6]=R[3];
-      R[4]=R[7];R[5]=R[8];
-      R[7]=R[9];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 246:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-      R[4]=R[5];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 247:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[6]=F(0);
-      R[12]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[12];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 248:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],5);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[4];fp[3]=R[5];fp[2]=R[7];R[3]=(word)fp;fp+=9;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 249:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[7]=R[4];R[4]=R[12];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 250:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      if(R[4]==F(0)){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],5);
-        R[11]=128*18+258;
-        R[8]=R[5];R[5]=R[11];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[1],2);
-        if(R[5]==IFALSE){
-          R[6]=G(R[2],4);
-          R[7]=G(R[1],5);
-          R[8]=G(R[1],6);
-          R[9]=G(R[1],7);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-          R[4]=G(R[1],4);
-          R[5]=G(R[2],6);
-          ob=(word*)R[6];acc=3;
-        }else{
-          R[6]=G(R[2],4);
-          R[7]=G(R[1],5);
-          R[8]=G(R[1],6);
-          R[9]=G(R[1],7);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],7);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-          R[4]=G(R[1],4);
-          R[5]=G(R[2],6);
-          ob=(word*)R[6];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 251:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=128*1+258;
-      R[10]=R[4];
-      R[11]=R[6];R[6]=R[3];
-      R[4]=R[7];R[5]=R[8];
-      R[7]=R[9];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 252:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=128*2+258;
-      R[10]=R[4];
-      R[11]=R[6];R[6]=R[3];
-      R[4]=R[7];R[5]=R[8];
-      R[7]=R[9];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 253:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        R[8]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[10]=128*1+258;
-        R[11]=R[5];
-        R[4]=R[3];R[3]=R[7];
-        R[5]=R[8];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }else{
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        R[8]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[10]=F(0);
-        R[11]=R[5];
-        R[4]=R[3];R[3]=R[7];
-        R[5]=R[8];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 254:
-    if(acc==5){
-      if(R[5]==INULL){
-        R[8]=G(R[1],2);
-        *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[5]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[8]=G(R[1],4);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],5);fp[6]=R[3];fp[5]=R[5];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        R[4]=R[5];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 255:
-    if(acc==2){
-      if(R[3]==IFALSE){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[4]=G(R[1],5);
-        R[10]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[10];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],5);fp[7]=R[9];fp[6]=R[8];fp[5]=R[4];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-        R[4]=G(R[1],2);
-        R[12]=128*0+258;
-        R[8]=R[5];R[5]=R[12];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 256:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[5]=R[6];
-      R[6]=R[3];R[7]=R[4];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 257:
-    if(acc==3){
-      if(R[4]==F(0)){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[5];R[8]=(word)fp;fp+=4;
-        R[5]=G(R[1],2);
-        R[4]=R[3];R[3]=R[8];
-        ob=(word*)R[6];acc=3;
-      }else{
-        R[6]=G(R[2],4);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[9];fp[5]=R[3];fp[4]=R[8];fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[5]=128*0+258;
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 258:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[11]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 259:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[9]=R[5];R[5]=R[6];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 260:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 261:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=128*1+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 262:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 263:
-    if(acc==5){
-      if(R[4]==INULL){
-        if(R[6]==F(0)){
-          R[8]=IFALSE;
-          R[4]=INULL;
-          R[7]=R[3];R[3]=R[8];
-          ob=(word*)R[7];acc=2;
-        }else{
-          R[4]=INULL;
-          R[7]=R[3];R[3]=R[5];
-          ob=(word*)R[7];acc=2;
-        }
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 264:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        if(R[4]==F(0)){
-          R[5]=G(R[1],5);
-          R[3]=IFALSE;
-          R[4]=G(R[1],2);
-          ob=(word*)R[5];acc=2;
-        }else{
-          R[5]=G(R[1],5);
-          R[3]=G(R[1],3);
-          R[4]=G(R[1],2);
-          ob=(word*)R[5];acc=2;
-        }
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 265:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[5]=128*18+258;
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 266:
-    if(acc==2){
-      R[5]=128*94+258;
-      R[6]=prim_less(R[4],R[5]);
-      if(R[6]==IFALSE){
-        R[7]=128*112+258;
-        R[8]=prim_less(R[7],R[4]);
-        if(R[8]==IFALSE){
-          R[9]=G(R[1],2);
-          ob=(word*)R[9];acc=3;
-        }else{
-          R[9]=IFALSE;
-          ob=(word*)R[3];R[3]=R[9];acc=1;
-        }
-      }else{
-        R[7]=IFALSE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 267:
-    if(acc==4){
-      if(immediatep(R[4])){R[7]=IFALSE;}else{hval h=V(R[4]);R[7]=rawp(h)?F(payl_len(h)):IFALSE;}      if(R[7]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],4);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[8]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[8];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-        R[5]=128*0+258;
-        R[4]=R[7];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 268:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[6];fp[6]=R[3];fp[5]=R[5];fp[4]=R[9];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],2);
-      R[5]=R[4];R[4]=R[11];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 269:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      if(R[4]==R[5]){
-        if(R[4]==F(0)){
-          R[6]=G(R[1],4);
-          R[7]=G(R[1],6);
-          *fp=make_header(3,TCLOS);fp[1]=G(R[2],2);fp[2]=R[7];R[8]=(word)fp;fp+=3;
-          R[5]=G(R[1],5);
-          R[4]=R[3];R[3]=R[8];
-          ob=(word*)R[6];acc=3;
-        }else{
-          R[6]=128*0+258;
-          {hval r=immval(R[4])-immval(R[6]);R[8]=F(r>>FBITS&1);R[7]=F(r);}
-          R[9]=G(R[1],4);
-          R[10]=G(R[1],6);
-          R[11]=G(R[1],7);
-          *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[11];fp[3]=R[10];fp[2]=R[7];R[12]=(word)fp;fp+=5;
-          R[5]=G(R[1],5);
-          R[4]=R[3];R[3]=R[12];
-          ob=(word*)R[9];acc=3;
-        }
-      }else{
-        if(R[4]==F(0)){
-          R[6]=G(R[2],4);
-          R[7]=G(R[1],6);
-          *fp=make_header(3,TCLOS);fp[1]=G(R[2],5);fp[2]=R[7];R[8]=(word)fp;fp+=3;
-          R[5]=G(R[1],5);
-          R[4]=R[3];R[3]=R[8];
-          ob=(word*)R[6];acc=3;
-        }else{
-          R[6]=128*0+258;
-          {hval r=immval(R[4])-immval(R[6]);R[8]=F(r>>FBITS&1);R[7]=F(r);}
-          R[9]=G(R[2],4);
-          R[10]=G(R[1],6);
-          R[11]=G(R[1],7);
-          *fp=make_header(5,TPROC);fp[1]=G(R[2],6);fp[4]=R[11];fp[3]=R[10];fp[2]=R[7];R[12]=(word)fp;fp+=5;
-          R[5]=G(R[1],5);
-          R[4]=R[3];R[3]=R[12];
-          ob=(word*)R[9];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 270:
-    if(acc==4){
-      R[7]=128*14+258;
-      if(R[5]==R[7]){
-        R[8]=IFALSE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        if(R[4]==INULL){
-          R[8]=IFALSE;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          R[8]=G(R[1],2);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-          ob=(word*)R[8];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 271:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],4);
-        R[3]=ITRUE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 272:
-    if(acc==1){
-      R[4]=128*254+258;
-      R[5]=R[4]&R[3];
-      if(R[5]==F(0)){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        ob=(word*)R[6];acc=2;
-      }else{
-        R[6]=G(R[1],4);
-        R[3]=ITRUE;
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 273:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],4);
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 274:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        R[5]=G(R[1],2);
-        R[4]=128*1+258;
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[1],2);
-        R[4]=128*0+258;
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 275:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=IFALSE;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 276:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=R[3]&R[5];
-      if(R[6]==F(0)){
-        R[7]=G(R[1],2);
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[1],2);
-        R[8]=128*1+258;
-        R[3]=R[4];R[4]=R[8];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 277:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[6];fp[6]=R[5];fp[5]=R[10];fp[4]=R[4];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=9;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 278:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[9]=R[4];R[6]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 279:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],5);
-      R[11]=G(R[1],6);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 280:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],8);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],9);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],5);
-        R[5]=G(R[1],3);
-        R[6]=R[4];R[4]=R[10];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],7);
-        R[8]=G(R[1],8);
-        R[9]=G(R[1],9);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[11]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[9]=R[4];R[4]=R[11];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 281:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      R[11]=G(R[1],5);
-      R[12]=G(R[1],6);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[3];fp[7]=R[11];fp[6]=R[6];fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=10;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 282:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],7);
-      R[8]=G(R[1],8);
-      R[9]=G(R[1],9);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],2);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=R[4];R[4]=R[11];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 283:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[8]=128*0+258;
-      R[10]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[5];
-      R[5]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 284:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[8]=128*1+258;
-      R[10]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 285:
-    if(acc==2){
-      if(R[4]==INULL){
-        R[5]=IFALSE;
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[5]=G(R[1],2);
-        *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 286:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=ITRUE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 287:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[7];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 288:
-    if(acc==3){
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[5]=G(R[1],2);
-      R[11]=R[4];R[4]=R[3];
-      R[6]=R[8];R[3]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 289:
-    if(acc==3){
-      R[6]=G(R[1],5);
-      if(R[5]==R[6]){
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],3);
-        R[5]=R[4];
-        R[4]=R[3];R[3]=R[8];
-        ob=(word*)R[7];acc=5;
-      }else{
-        R[7]=G(R[1],3);
-        R[6]=G(R[1],2);
-        ob=(word*)R[7];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 290:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=128*10+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 291:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[1],2);
-        R[6]=G(R[2],2);
-        R[7]=G(R[2],3);
-        R[8]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=128*0+258;
-        if(R[4]==R[5]){
-          R[6]=G(R[1],2);
-          R[4]=G(R[2],4);
-          R[5]=G(R[2],5);
-          ob=(word*)R[6];acc=3;
-        }else{
-          R[6]=128*2+258;
-          if(R[4]==R[6]){
-            R[7]=G(R[1],2);
-            R[4]=G(R[2],6);
-            R[5]=G(R[2],7);
-            ob=(word*)R[7];acc=3;
-          }else{
-            R[7]=128*4+258;
-            if(R[4]==R[7]){
-              R[8]=G(R[1],2);
-              R[4]=G(R[2],8);
-              R[5]=G(R[2],9);
-              ob=(word*)R[8];acc=3;
-            }else{
-              R[8]=G(R[1],2);
-              R[4]=G(R[2],10);
-              R[5]=G(R[2],11);
-              ob=(word*)R[8];acc=3;
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 292:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-      R[8]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 293:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 294:
-    if(acc==4){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[7]=G(R[2],4);
-        R[8]=G(R[1],2);
-        *fp=make_header(4,2);fp[1]=R[7];fp[2]=R[8];fp[3]=R[4];R[9]=(word)fp;fp+=4;
-        R[10]=G(R[2],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=5;
-        R[12]=128*0+258;
-        R[4]=R[5];R[5]=R[12];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 295:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[5];fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 296:
-    if(acc==3){
-      R[6]=prim_less(R[5],R[4]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 297:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[10]=R[4];R[5]=R[3];
-        R[3]=R[8];R[4]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 298:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[4];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 299:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[9];R[11]=(word)fp;fp+=3;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 300:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[8]=R[4];R[5]=R[3];
-        R[3]=R[9];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 301:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[4];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[10]=(word)fp;fp+=7;
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 302:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[6]=(word)fp;fp+=7;
-      R[3]=G(R[1],2);
-      R[5]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 303:
-    if(acc==4){
-      if(R[4]==F(0)){
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],4);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[3];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        R[12]=G(R[1],5);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],4);fp[3]=R[12];fp[2]=R[5];R[5]=(word)fp;fp+=4;
-        ob=(word*)R[7];acc=3;
-      }else{
-        R[7]=G(R[2],5);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],6);fp[6]=R[9];fp[5]=R[5];fp[4]=R[6];fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=7;
-        R[5]=128*0+258;
-        ob=(word*)R[7];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 304:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],4);fp[3]=R[10];fp[2]=R[9];R[5]=(word)fp;fp+=4;
-      R[9]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 305:
-    if(acc==5){
-      if(R[6]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=IFALSE;
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 306:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=R[3]&R[5];
-      if(R[6]==F(0)){
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],2);
-        R[3]=R[4];R[4]=R[8];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],4);
-        R[10]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[10];fp[4]=R[9];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-        R[4]=R[8];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 307:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=128*2+258;
-      R[9]=R[6];
-      R[6]=R[5];R[5]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 308:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=R[3]&R[5];
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[10];fp[4]=R[9];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-      R[4]=F(0);
-      R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 309:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-      if(R[3]==IFALSE){
-        R[9]=G(R[2],2);
-        R[5]=G(R[2],3);
-        R[3]=R[8];
-        ob=(word*)R[9];acc=3;
-      }else{
-        ob=(word*)R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 310:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[5]=128*0+258;
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],5);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[6];R[4]=R[7];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 311:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[8]=128*2+258;
-      R[9]=R[5];R[5]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 312:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[10]=R[4];R[5]=R[3];
-        R[3]=R[8];R[4]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 313:
-    if(acc==2){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[8];fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 314:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      if(R[4]==R[5]){
-        R[6]=G(R[2],2);
-        *fp=make_header(4,2);fp[1]=R[6];fp[2]=R[4];fp[3]=R[4];R[7]=(word)fp;fp+=4;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 315:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-      if(R[3]==INULL){
-        R[9]=G(R[2],2);
-        R[4]=R[5];R[3]=R[8];
-        ob=(word*)R[9];acc=2;
-      }else{
-        ob=(word*)R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 316:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-      R[10]=R[5];
-      R[6]=R[4];R[4]=R[3];
-      R[5]=R[7];R[3]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 317:
-    if(acc==2){
-      R[5]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],4);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[9];fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 318:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[5];
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 319:
-    if(acc==1){
-      {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[4]=ob[1];R[5]=ob[2];}
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 320:
-    if(acc==2){
-      R[5]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],9);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      if(R[7]==F(0)){
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],4);
-        *fp=make_header(4,2);fp[1]=R[8];fp[2]=R[9];fp[3]=R[4];R[10]=(word)fp;fp+=4;
-        R[11]=G(R[2],2);
-        R[12]=G(R[1],3);
-        *fp=make_header(4,2);fp[1]=R[11];fp[2]=R[10];fp[3]=R[12];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[6];acc=1;
-      }else{
-        R[8]=128*0+258;
-        if(R[7]==R[8]){
-          R[9]=G(R[2],4);
-          R[10]=G(R[1],4);
-          *fp=make_header(4,2);fp[1]=R[9];fp[2]=R[10];fp[3]=R[4];R[11]=(word)fp;fp+=4;
-          R[12]=G(R[2],2);
-          R[13]=G(R[1],3);
-          *fp=make_header(4,2);fp[1]=R[12];fp[2]=R[11];fp[3]=R[13];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[6];acc=1;
-        }else{
-          R[9]=128*2+258;
-          if(R[7]==R[9]){
-            R[10]=G(R[2],5);
-            R[11]=G(R[1],4);
-            *fp=make_header(5,TCLOS);fp[1]=G(R[2],6);fp[4]=R[6];fp[3]=R[11];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-            R[4]=G(R[1],3);
-            R[5]=INULL;
-            ob=(word*)R[10];acc=3;
-          }else{
-            R[10]=G(R[2],7);
-            R[4]=G(R[2],8);
-            R[3]=R[6];R[5]=R[7];
-            ob=(word*)R[10];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 321:
-    if(acc==3){
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 322:
-    if(acc==5){
-      if(R[6]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[5]=128*4+258;
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 323:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[4]=G(R[1],2);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[4];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 324:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],5);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 325:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[9]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      R[7]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 326:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 327:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=INULL;
-      R[10]=R[5];R[5]=R[7];
-      R[7]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 328:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 329:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[9]=(word)fp;fp+=7;
-      if(R[3]==IFALSE){
-        R[10]=G(R[2],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[9];R[3]=(word)fp;fp+=3;
-        ob=(word*)R[10];acc=2;
-      }else{
-        ob=(word*)R[9];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 330:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }else{
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 331:
-    if(acc==2){
-      {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[5]=ob[1];R[6]=ob[2];}
-      {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];}
-      R[9]=G(R[2],2);
-      R[10]=G(R[1],3);
-      R[11]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[11];fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],4);fp[3]=R[5];fp[2]=R[7];R[5]=(word)fp;fp+=4;
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 332:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      if(R[4]==R[5]){
-        R[6]=G(R[1],2);
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        if(R[4]==R[6]){
-          ob=(word*)R[3];R[3]=R[5];acc=1;
-        }else{
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 333:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 334:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[5];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 335:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      if(R[4]==R[3]){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        R[9]=128*0+258;
-        R[10]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[5]=G(R[1],3);
-        ob=(word*)R[5];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 336:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];R[8]=ob[3];R[9]=ob[4];}
-        R[10]=G(R[2],3);
-        R[11]=G(R[1],3);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[11];fp[3]=R[7];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-        R[13]=G(R[1],4);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],5);fp[2]=R[13];R[4]=(word)fp;fp+=3;
-        R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[5]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[5];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 337:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[3]=R[5];
-        R[5]=R[4];R[4]=R[6];
-        ob=(word*)R[5];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[3]=R[5];
-        R[4]=R[7];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 338:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=128*0+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 339:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[5]=G(R[2],4);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 340:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[2],4);
-        R[9]=R[4];
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 341:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=G(R[2],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 342:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[2],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 343:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 344:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[7]=(word)fp;fp+=5;
-      if(R[3]==IFALSE){
-        R[3]=G(R[1],2);
-        ob=(word*)R[7];acc=1;
-      }else{
-        R[8]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[3]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 345:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];R[8]=ob[3];}
-        R[6]=G(R[1],5);
-        R[10]=G(R[1],4);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[10];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],3);
-        R[5]=R[7];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[5]=G(R[2],4);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],2);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];R[9]=ob[3];R[10]=ob[4];}
-          R[11]=G(R[2],5);
-          R[3]=G(R[1],4);
-          R[13]=G(R[1],5);
-          *fp=make_header(3,TPROC);fp[1]=G(R[2],6);fp[2]=R[13];R[4]=(word)fp;fp+=3;
-          R[5]=G(R[1],3);
-          R[6]=R[10];
-          ob=(word*)R[11];acc=4;
-        }else{
-          R[6]=G(R[1],4);
-          R[3]=G(R[1],3);
-          ob=(word*)R[6];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 346:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=INULL;
-        R[7]=G(R[1],2);
-        R[9]=R[6];
-        R[6]=R[4];R[3]=R[5];
-        R[5]=R[7];R[4]=R[9];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        R[8]=INULL;
-        R[6]=G(R[1],2);
-        R[10]=R[4];R[3]=R[5];
-        R[4]=R[7];R[5]=R[8];
-        ob=(word*)R[10];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 347:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 348:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],5);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        R[8]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[10]=R[4];R[3]=R[5];
-        R[4]=R[7];R[5]=R[8];
-        ob=(word*)R[10];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 349:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[2],4);
-        R[5]=INULL;
-        R[10]=R[4];R[4]=R[8];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[2],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],6);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=128*0+258;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 350:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],4);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[2],3);
-        R[3]=G(R[1],5);
-        R[5]=G(R[1],2);
-        R[4]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],4);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],4);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];R[9]=ob[3];R[10]=ob[4];}
-          R[11]=G(R[2],5);
-          R[12]=G(R[1],3);
-          R[13]=G(R[1],5);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[2],6);fp[6]=R[13];fp[5]=R[8];fp[4]=R[9];fp[3]=R[12];fp[2]=R[10];R[3]=(word)fp;fp+=7;
-          R[5]=G(R[1],2);
-          R[4]=R[8];
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[6]=G(R[2],7);
-          if(R[3]==R[6]){
-            R[7]=G(R[1],4);
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];R[10]=ob[3];}
-            R[11]=G(R[2],8);
-            R[3]=G(R[1],5);
-            R[6]=G(R[1],2);
-            R[4]=R[9];R[5]=R[10];
-            ob=(word*)R[11];acc=4;
-          }else{
-            R[7]=G(R[2],9);
-            if(R[3]==R[7]){
-              R[8]=G(R[1],4);
-              {word*ob=(word*)R[8];hval hdr;assert(allocp(R[8]),R[8],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];R[11]=ob[3];}
-              R[12]=G(R[2],10);
-              R[3]=G(R[1],5);
-              R[6]=G(R[1],2);
-              R[4]=R[10];R[5]=R[11];
-              ob=(word*)R[12];acc=4;
-            }else{
-              R[8]=G(R[2],11);
-              if(R[3]==R[8]){
-                R[9]=G(R[1],4);
-                {word*ob=(word*)R[9];hval hdr;assert(allocp(R[9]),R[9],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[10]=ob[1];R[11]=ob[2];}
-                R[12]=G(R[2],5);
-                R[3]=G(R[1],5);
-                R[5]=G(R[1],2);
-                R[4]=R[11];
-                ob=(word*)R[12];acc=3;
-              }else{
-                R[9]=G(R[2],12);
-                if(R[3]==R[9]){
-                  R[10]=G(R[1],4);
-                  {word*ob=(word*)R[10];hval hdr;assert(allocp(R[10]),R[10],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[11]=ob[1];R[12]=ob[2];R[13]=ob[3];}
-                  R[6]=G(R[1],3);
-                  R[15]=G(R[1],5);
-                  *fp=make_header(5,TPROC);fp[1]=G(R[2],13);fp[4]=R[6];fp[3]=R[15];fp[2]=R[12];R[3]=(word)fp;fp+=5;
-                  R[5]=G(R[1],2);
-                  R[4]=R[13];
-                  ob=(word*)R[6];acc=4;
-                }else{
-                  R[10]=G(R[2],14);
-                  R[11]=G(R[1],4);
-                  R[12]=G(R[1],5);
-                  *fp=make_header(4,TCLOS);fp[1]=G(R[2],15);fp[3]=R[12];fp[2]=R[11];R[3]=(word)fp;fp+=4;
-                  R[4]=G(R[2],16);
-                  R[5]=INULL;
-                  ob=(word*)R[10];acc=3;
-                }
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 351:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-      R[4]=128*122+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 352:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=128*92+258;
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 353:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=128*62+258;
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 354:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[4]=128*122+258;
-      R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 355:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*118+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 356:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 357:
-    if(acc==1){
-      {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[4]=ob[1];R[5]=ob[2];}
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[4];fp[4]=R[5];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 358:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      if(R[7]==IFALSE){
-        ob=(word*)R[6];acc=1;
-      }else{
-        R[8]=G(R[2],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[6];R[9]=(word)fp;fp+=3;
-        R[5]=R[3];
-        R[4]=R[7];R[3]=R[9];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 359:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*62+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 360:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*120+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 361:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 362:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 363:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 364:
-    if(acc==3){
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[6];R[8]=(word)fp;fp+=3;
-      R[6]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 365:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=128*0+258;
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 366:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[1],4);
-        R[3]=G(R[1],3);
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[5]=G(R[2],3);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],2);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];R[9]=ob[3];}
-          R[10]=G(R[2],4);
-          R[3]=G(R[1],4);
-          R[4]=G(R[1],3);
-          R[7]=F(0);
-          R[5]=R[8];R[6]=R[9];
-          ob=(word*)R[10];acc=5;
-        }else{
-          R[6]=G(R[2],5);
-          if(R[3]==R[6]){
-            R[7]=G(R[1],2);
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-            R[10]=G(R[2],4);
-            R[3]=G(R[1],4);
-            R[4]=G(R[1],3);
-            R[6]=INULL;
-            R[7]=128*2+258;
-            R[5]=R[9];
-            ob=(word*)R[10];acc=5;
-          }else{
-            R[7]=G(R[2],6);
-            if(R[3]==R[7]){
-              R[8]=G(R[1],2);
-              {word*ob=(word*)R[8];hval hdr;assert(allocp(R[8]),R[8],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];R[11]=ob[3];}
-              R[12]=G(R[2],4);
-              R[3]=G(R[1],4);
-              R[4]=G(R[1],3);
-              R[7]=128*0+258;
-              R[5]=R[10];R[6]=R[11];
-              ob=(word*)R[12];acc=5;
-            }else{
-              R[8]=G(R[2],7);
-              if(R[3]==R[8]){
-                R[9]=G(R[1],2);
-                {word*ob=(word*)R[9];hval hdr;assert(allocp(R[9]),R[9],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=5,ob,IFALSE);
-R[10]=ob[1];R[11]=ob[2];R[12]=ob[3];R[13]=ob[4];}
-                R[14]=G(R[2],8);
-                R[15]=G(R[1],4);
-                *fp=make_header(5,TCLOS);fp[1]=G(R[2],9);fp[4]=R[15];fp[3]=R[11];fp[2]=R[12];R[3]=(word)fp;fp+=5;
-                R[17]=G(R[1],5);
-                *fp=make_header(3,TPROC);fp[1]=G(R[2],10);fp[2]=R[17];R[4]=(word)fp;fp+=3;
-                R[5]=G(R[1],3);
-                R[6]=R[13];
-                ob=(word*)R[14];acc=4;
-              }else{
-                R[9]=G(R[2],11);
-                R[3]=G(R[1],4);
-                R[4]=G(R[2],12);
-                R[5]=G(R[2],13);
-                R[6]=G(R[1],2);
-                ob=(word*)R[9];acc=4;
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 367:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[8]=128*2+258;
-      R[10]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 368:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[6]=R[7];
-      ob=(word*)R[8];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 369:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      if(R[4]==INULL){
-        R[5]=G(R[1],4);
-        ob=(word*)R[5];acc=1;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-        R[9]=R[5];R[4]=R[3];
-        R[5]=R[6];R[3]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 370:
-    if(acc==1){
-      {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[4]=ob[1];R[5]=ob[2];}
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[2],4);
-      R[12]=G(R[1],2);
-      R[9]=R[6];R[6]=R[12];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 371:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[7]=(word)fp;fp+=5;
-      if(R[3]==IFALSE){
-        R[8]=G(R[2],2);
-        R[4]=G(R[1],2);
-        R[3]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[8]=G(R[2],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[7];R[3]=(word)fp;fp+=3;
-        R[4]=G(R[1],2);
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 372:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[5]=128*18+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 373:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[1],2);
-        R[6]=128*94+258;
-        R[7]=INULL;
-        R[8]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[1],3);
-        R[6]=INULL;
-        R[9]=R[6];
-        R[6]=R[5];R[5]=R[9];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 374:
-    if(acc==4){
-      if(R[4]==F(0)){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[5]=128*18+258;
-        ob=(word*)R[7];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 375:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[10]=128*94+258;
-      R[8]=R[5];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 376:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 377:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[5]=IFALSE;
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[9]=(word)fp;fp+=7;
-        R[7]=R[4];
-        R[4]=R[3];R[3]=R[9];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 378:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=prim_less(R[4],R[3]);
-      if(R[5]==IFALSE){
-        R[6]=G(R[1],6);
-        R[3]=G(R[1],5);
-        ob=(word*)R[6];acc=1;
-      }else{
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],2);
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 379:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[8]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 380:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=G(R[1],2);
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[1],3);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],4);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 381:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[5]=128*0+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 382:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],4);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],3);
-        R[10]=G(R[1],5);
-        R[11]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[11];fp[4]=R[10];fp[3]=R[5];fp[2]=R[9];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],2);
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[5]=G(R[2],5);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],4);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];R[9]=ob[3];}
-          R[10]=G(R[2],3);
-          R[11]=G(R[1],3);
-          R[12]=G(R[1],5);
-          R[13]=G(R[1],6);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],6);fp[5]=R[13];fp[4]=R[12];fp[3]=R[6];fp[2]=R[11];R[3]=(word)fp;fp+=6;
-          R[4]=G(R[1],2);
-          ob=(word*)R[10];acc=2;
-        }else{
-          R[6]=G(R[2],7);
-          if(R[3]==R[6]){
-            R[7]=G(R[1],4);
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-            R[10]=G(R[2],8);
-            R[4]=G(R[1],3);
-            R[12]=G(R[1],2);
-            R[13]=G(R[1],5);
-            R[14]=G(R[1],6);
-            *fp=make_header(7,TCLOS);fp[1]=G(R[2],9);fp[6]=R[14];fp[5]=R[13];fp[4]=R[12];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-            R[5]=R[9];
-            ob=(word*)R[10];acc=3;
-          }else{
-            R[7]=G(R[2],3);
-            R[8]=G(R[1],3);
-            R[9]=G(R[1],4);
-            R[10]=G(R[1],5);
-            R[11]=G(R[1],6);
-            *fp=make_header(6,TCLOS);fp[1]=G(R[2],10);fp[5]=R[11];fp[4]=R[10];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-            R[4]=G(R[1],2);
-            ob=(word*)R[7];acc=2;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 383:
-    if(acc==3){
-      if(R[3]==IFALSE){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],4);
-        ob=(word*)R[6];acc=2;
-      }else{
-        {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];R[8]=ob[3];}
-        R[9]=G(R[2],2);
-        R[10]=G(R[1],5);
-        R[11]=G(R[1],6);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[11];fp[6]=R[10];fp[5]=R[5];fp[4]=R[7];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-        R[4]=G(R[1],4);
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 384:
-    if(acc==1){
-      R[4]=G(R[2],4);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      *fp=make_header(5,2);fp[1]=R[4];fp[2]=R[5];fp[3]=R[6];fp[4]=R[7];R[4]=(word)fp;fp+=5;
-      R[9]=G(R[2],2);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[11];fp[3]=R[10];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[5]=G(R[1],5);
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 385:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[4]=IFALSE;
-        R[8]=R[3];
-        R[3]=R[4];R[5]=R[4];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[6];fp[5]=R[3];fp[4]=R[5];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 386:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=8;
-      R[5]=128*0+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 387:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[2],3);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[4]=G(R[1],5);
-        R[10]=G(R[1],6);
-        R[11]=G(R[1],7);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[11];fp[6]=R[10];fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-        R[13]=128*2+258;
-        R[8]=R[5];R[5]=R[13];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],6);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 388:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      if(R[3]==R[4]){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[4]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 389:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=INULL;
-        R[9]=R[5];
-        R[10]=R[6];R[6]=R[4];
-        R[5]=R[7];R[4]=R[10];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 390:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[5]=128*0+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 391:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[1],3);
-        if(R[8]==INULL){
-          R[9]=G(R[2],3);
-          R[3]=G(R[1],4);
-          R[4]=R[5];R[5]=R[8];
-          ob=(word*)R[9];acc=3;
-        }else{
-          R[9]=G(R[2],4);
-          R[10]=G(R[1],4);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[10];fp[4]=R[8];fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-          R[4]=R[8];
-          ob=(word*)R[9];acc=2;
-        }
-      }else{
-        R[5]=G(R[2],3);
-        R[6]=G(R[1],4);
-        R[4]=G(R[1],2);
-        R[8]=G(R[1],3);
-        R[9]=R[5];
-        R[3]=R[6];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 392:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[5]=128*0+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 393:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],3);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-        R[4]=G(R[1],4);
-        R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],5);
-        R[6]=G(R[1],6);
-        R[4]=G(R[1],2);
-        R[8]=G(R[1],5);
-        R[9]=R[5];
-        R[3]=R[6];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 394:
-    if(acc==1){
-      R[4]=G(R[2],4);
-      *fp=make_header(3,2);fp[1]=R[4];fp[2]=R[3];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 395:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 396:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 397:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[5]=R[3];R[6]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 398:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 399:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[6];R[4]=R[7];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[2],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],6);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=128*0+258;
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 400:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[1],4);
-        R[3]=G(R[1],3);
-        R[4]=R[5];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[5]=G(R[2],3);
-        if(R[3]==R[5]){
-          R[6]=G(R[1],2);
-          {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];R[9]=ob[3];}
-          R[10]=G(R[2],4);
-          R[11]=G(R[1],4);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[2],5);fp[3]=R[11];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-          R[4]=G(R[1],3);
-          R[5]=R[8];
-          ob=(word*)R[10];acc=3;
-        }else{
-          R[6]=G(R[2],6);
-          if(R[3]==R[6]){
-            R[7]=G(R[1],2);
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];R[10]=ob[3];}
-            R[11]=G(R[2],4);
-            R[12]=G(R[1],4);
-            *fp=make_header(4,TCLOS);fp[1]=G(R[2],7);fp[3]=R[12];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-            R[4]=G(R[1],3);
-            R[5]=R[9];
-            ob=(word*)R[11];acc=3;
-          }else{
-            R[7]=G(R[2],8);
-            if(R[3]==R[7]){
-              R[8]=G(R[1],2);
-              {word*ob=(word*)R[8];hval hdr;assert(allocp(R[8]),R[8],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];}
-              R[11]=G(R[2],4);
-              R[12]=G(R[1],4);
-              *fp=make_header(3,TCLOS);fp[1]=G(R[2],9);fp[2]=R[12];R[3]=(word)fp;fp+=3;
-              R[4]=G(R[1],3);
-              R[5]=R[10];
-              ob=(word*)R[11];acc=3;
-            }else{
-              R[8]=G(R[2],10);
-              R[9]=G(R[1],4);
-              *fp=make_header(3,TCLOS);fp[1]=G(R[2],11);fp[2]=R[9];R[3]=(word)fp;fp+=3;
-              R[4]=G(R[2],12);
-              R[5]=G(R[1],2);
-              ob=(word*)R[8];acc=3;
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 401:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      *fp=make_header(3,2);fp[1]=R[5];fp[2]=R[4];R[4]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 402:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[4];R[7]=(word)fp;fp+=4;
-      R[4]=G(R[2],4);
-      R[6]=G(R[1],2);
-      R[10]=R[5];
-      R[5]=R[3];R[3]=R[7];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 403:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,2);fp[1]=R[5];fp[2]=R[6];fp[3]=R[4];R[4]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 404:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*252+258;
-      R[7]=R[4];
-      R[3]=R[5];R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 405:
-    if(acc==5){
-      if(R[6]==INULL){
-        R[7]=R[3];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[4]=R[6];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 406:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 407:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 408:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=R[3];R[3]=R[7];
-      R[7]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 409:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],2);
-        R[7]=R[4];
-        R[4]=R[3];R[3]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 410:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 411:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=G(R[2],2);
-        R[5]=INULL;
-        R[6]=G(R[1],2);
-        ob=(word*)R[7];acc=4;
-      }else{
-        R[7]=G(R[2],3);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[3];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 412:
-    if(acc==4){
-      if(R[4]==IFALSE){
-        R[7]=IFALSE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[5]==INULL){
-          R[7]=G(R[1],2);
-          R[5]=INULL;
-          R[6]=IFALSE;
-          ob=(word*)R[7];acc=4;
-        }else{
-          R[7]=G(R[1],3);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],4);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-          R[4]=R[5];
-          ob=(word*)R[7];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 413:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[6]=IFALSE;
-      R[11]=R[4];R[5]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 414:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=IFALSE;
-      R[11]=R[5];R[5]=R[4];
-      R[4]=R[6];R[6]=R[7];
-      R[7]=R[8];R[8]=R[9];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 415:
-    if(acc==3){
-      if(R[4]==IFALSE){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        R[8]=128*0+258;
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 416:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],3);
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],4);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[9];R[3]=(word)fp;fp+=3;
-        R[4]=G(R[1],2);
-        R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[1],2);
-        *fp=make_header(3,2);fp[1]=R[4];fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[2],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],5);fp[3]=R[8];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-        R[4]=G(R[1],3);
-        R[5]=INULL;
-        ob=(word*)R[7];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 417:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      *fp=make_header(3,2);fp[1]=R[7];fp[2]=R[6];R[6]=(word)fp;fp+=3;
-      R[9]=G(R[1],2);
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 418:
-    if(acc==2){
-      R[5]=128*66+258;
-      if(R[4]==R[5]){
-        R[6]=IFALSE;
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[6]=128*118+258;
-        if(R[4]==R[6]){
-          R[7]=IFALSE;
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          R[7]=ITRUE;
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 419:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*118+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 420:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=128*122+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 421:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(3,2);fp[1]=R[7];fp[2]=R[8];R[6]=(word)fp;fp+=3;
-      R[10]=G(R[1],3);
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 422:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[2],4);
-      R[5]=G(R[2],5);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 423:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*122+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 424:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*122+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 425:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[10]=(word)fp;fp+=5;
-      R[9]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 426:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      *fp=make_header(4,2);fp[1]=R[6];fp[2]=R[7];fp[3]=R[8];R[6]=(word)fp;fp+=4;
-      R[10]=G(R[1],4);
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 427:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=IFALSE;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 428:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*120+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 429:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[7];R[9]=(word)fp;fp+=7;
-      if(R[6]==IFALSE){
-        R[3]=R[6];
-        ob=(word*)R[9];acc=1;
-      }else{
-        R[10]=G(R[2],2);
-        R[4]=R[6];R[3]=R[9];
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 430:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[6];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[8];R[4]=(word)fp;fp+=3;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 431:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*182+258;
-      R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 432:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[6];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[4]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 433:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[8];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      R[5]=INULL;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 434:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[7]=128*190+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 435:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=128*126+258;
-        R[9]=R[4];
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=128*244+258;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 436:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=128*92+258;
-        R[9]=R[4];
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=128*180+258;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 437:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=128*114+258;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 438:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 439:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 440:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[11]=R[7];R[7]=R[3];
-      R[6]=R[5];R[4]=R[8];
-      R[5]=R[9];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 441:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[4];fp[3]=R[7];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-      R[8]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 442:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[4];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[8]=R[5];R[4]=R[3];
-      R[3]=R[9];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 443:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[10]=G(R[1],5);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[10];R[6]=(word)fp;fp+=3;
-      R[10]=R[5];
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 444:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 445:
-    if(acc==6){
-      R[9]=G(R[1],2);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[1],3);fp[7]=R[8];fp[6]=R[3];fp[5]=R[6];fp[4]=R[7];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-      R[4]=R[5];
-      ob=(word*)R[9];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 446:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=128*18+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 447:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[5]=128*38+258;
-        R[8]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[11]=G(R[1],2);
-        R[8]=R[4];
-        R[5]=R[6];R[4]=R[11];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 448:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-      R[4]=R[6];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 449:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 450:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[7]=R[4];R[4]=R[12];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 451:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[4];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[11]=128*18+258;
-      R[8]=R[5];R[5]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 452:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[8]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 453:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[4];fp[5]=R[8];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 454:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[11]=128*0+258;
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 455:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[10];fp[2]=R[9];R[6]=(word)fp;fp+=4;
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 456:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[4]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=R[5];
-      R[3]=R[6];R[5]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 457:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[5]=128*4+258;
-      R[10]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 458:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=128*4+258;
-        R[8]=R[4];R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 459:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[5]=128*2+258;
-      R[11]=R[4];R[6]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 460:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[9]=(word)fp;fp+=6;
-      R[10]=128*18+258;
-      R[8]=R[5];R[4]=R[3];
-      R[3]=R[9];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 461:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 462:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=128*2+258;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 463:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[8]=R[4];R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 464:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[8]=R[4];R[4]=R[3];
-      R[5]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 465:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],3);
-      R[10]=G(R[1],2);
-      R[11]=R[5];R[5]=R[10];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 466:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[8]=(word)fp;fp+=6;
-      R[5]=128*2+258;
-      R[10]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 467:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[5]=128*0+258;
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }else{
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 468:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[8]=(word)fp;fp+=5;
-      R[9]=128*18+258;
-      R[10]=R[5];R[4]=R[3];
-      R[3]=R[8];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 469:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[10]=128*2+258;
-      R[8]=R[5];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 470:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[11]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 471:
-    if(acc==2){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 472:
-    if(acc==5){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[10]=128*0+258;
-        R[4]=R[5];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 473:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 474:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[6]=G(R[2],4);
-      R[10]=R[5];R[5]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 475:
-    if(acc==2){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[5]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 476:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[5]=F(0);
-      R[10]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 477:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[10]=R[4];R[4]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 478:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[5];
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 479:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 480:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[10]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 481:
-    if(acc==3){
-      if(R[5]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        R[4]=R[5];
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 482:
-    if(acc==5){
-      if(R[5]==F(0)){
-        ob=(word*)R[6];acc=2;
-      }else{
-        R[8]=128*0+258;
-        {hval r=immval(R[5])-immval(R[8]);R[10]=F(r>>FBITS&1);R[9]=F(r);}
-        R[11]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[7];fp[4]=R[9];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[11];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 483:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[3];fp[5]=R[5];fp[4]=R[6];fp[3]=R[7];fp[2]=R[9];R[3]=(word)fp;fp+=7;
-      R[5]=G(R[1],2);
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 484:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[3];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[11]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 485:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[3];R[3]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 486:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      R[9]=128*0+258;
-      R[12]=R[9];R[13]=R[5];
-      R[5]=R[4];R[9]=R[8];
-      R[8]=R[12];R[4]=R[13];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 487:
-    if(acc==7){
-      R[10]=G(R[1],2);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[1],3);fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[3]=(word)fp;fp+=8;
-      R[5]=G(R[1],4);
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 488:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=9;
-      if(R[4]==IFALSE){
-        R[12]=G(R[2],2);
-        R[5]=128*2+258;
-        R[4]=R[8];R[3]=R[11];
-        ob=(word*)R[12];acc=3;
-      }else{
-        R[3]=R[4];
-        ob=(word*)R[11];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 489:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        *fp=make_header(4,2);fp[1]=R[4];fp[2]=R[5];fp[3]=R[6];R[4]=(word)fp;fp+=4;
-        R[8]=G(R[2],2);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],7);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-        R[5]=INULL;
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],8);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[12]=R[4];R[4]=R[9];
-        ob=(word*)R[12];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 490:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[4];fp[4]=R[5];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 491:
-    if(acc==6){
-      R[9]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[8];fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 492:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],6);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[9];R[10]=(word)fp;fp+=3;
-      R[11]=R[4];R[12]=R[5];
-      R[5]=R[7];R[7]=R[3];
-      R[4]=R[6];R[6]=R[8];
-      R[8]=R[10];R[3]=R[12];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 493:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[3];fp[5]=R[4];fp[4]=R[6];fp[3]=R[7];fp[2]=R[9];R[3]=(word)fp;fp+=7;
-      R[11]=G(R[2],4);
-      R[4]=R[5];R[5]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 494:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,2);fp[1]=R[3];fp[2]=R[5];fp[3]=R[6];R[4]=(word)fp;fp+=4;
-        R[8]=G(R[2],2);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-        R[5]=INULL;
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],3);
-        R[4]=R[3];R[3]=R[6];
-        R[6]=R[8];R[8]=R[5];
-        R[5]=R[7];R[7]=R[9];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 495:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[4]=R[7];
-      ob=(word*)R[8];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 496:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=G(R[2],3);
-      R[11]=R[4];R[12]=R[5];
-      R[5]=R[7];R[7]=R[3];
-      R[4]=R[6];R[6]=R[8];
-      R[8]=R[9];R[3]=R[12];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 497:
-    if(acc==5){
-      *fp=make_header(4,2);fp[1]=R[5];fp[2]=R[6];fp[3]=R[7];R[8]=(word)fp;fp+=4;
-      R[9]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-      R[5]=INULL;
-      R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 498:
-    if(acc==6){
-      R[9]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[8];fp[5]=R[6];fp[4]=R[7];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[5]=128*46+258;
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 499:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[1],2);
-      R[12]=IFALSE;
-      R[8]=R[5];R[5]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 500:
-    if(acc==2){
-      if(R[3]==IFALSE){
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],4);
-        R[7]=INULL;
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],5);
-        R[11]=R[5];R[3]=R[6];
-        R[4]=R[7];R[5]=R[8];
-        R[6]=R[9];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }else{
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],7);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-        R[9]=G(R[1],4);
-        R[10]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[5]=R[3];R[6]=R[4];
-        R[3]=R[9];R[4]=R[10];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 501:
-    if(acc==6){
-      R[9]=G(R[2],2);
-      R[10]=G(R[1],2);
-      R[11]=G(R[1],3);
-      R[12]=G(R[1],4);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[8];fp[9]=R[3];fp[8]=R[4];fp[7]=R[5];fp[6]=R[7];fp[5]=R[12];fp[4]=R[11];fp[3]=R[10];fp[2]=R[6];R[3]=(word)fp;fp+=11;
-      R[4]=R[6];
-      ob=(word*)R[9];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 502:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],10);
-        R[9]=G(R[1],3);
-        R[10]=G(R[1],4);
-        R[11]=G(R[1],9);
-        R[12]=G(R[1],5);
-        *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-        R[14]=G(R[1],8);
-        R[8]=R[4];
-        R[5]=R[7];R[4]=R[14];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],8);
-        R[8]=G(R[1],9);
-        R[9]=G(R[1],10);
-        *fp=make_header(7,TPROC);fp[1]=G(R[2],4);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 503:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      R[12]=G(R[1],8);
-      R[13]=G(R[1],9);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[3];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=11;
-      R[15]=F(0);
-      R[8]=R[5];R[5]=R[15];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 504:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[13]=(word)fp;fp+=11;
-      if(R[3]==IFALSE){
-        R[14]=G(R[2],2);
-        R[4]=R[5];R[3]=R[13];
-        ob=(word*)R[14];acc=2;
-      }else{
-        ob=(word*)R[13];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 505:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      R[12]=G(R[1],10);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],5);fp[10]=R[12];fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[13]=(word)fp;fp+=11;
-      if(R[3]==IFALSE){
-        R[3]=IFALSE;
-        ob=(word*)R[13];acc=1;
-      }else{
-        R[14]=G(R[2],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[13];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[5]=G(R[2],4);
-        R[4]=R[8];
-        ob=(word*)R[14];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 506:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        if(R[4]==INULL){
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],9);
-          R[4]=G(R[1],2);
-          R[8]=INULL;
-          R[9]=R[5];
-          R[3]=R[6];R[5]=R[8];
-          ob=(word*)R[9];acc=3;
-        }else{
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],9);
-          R[7]=G(R[1],2);
-          R[8]=G(R[1],4);
-          R[9]=G(R[1],7);
-          R[10]=G(R[1],5);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[4];R[11]=(word)fp;fp+=6;
-          R[8]=R[5];R[3]=R[6];
-          R[4]=R[7];R[5]=R[11];
-          ob=(word*)R[8];acc=3;
-        }
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],8);
-        R[8]=G(R[1],9);
-        R[9]=G(R[1],10);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[11]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[8]=R[4];R[4]=R[11];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 507:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 508:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[7];
-      R[11]=R[5];R[7]=R[6];
-      R[6]=R[3];R[5]=R[4];
-      R[3]=R[8];R[4]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 509:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 510:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[7]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 511:
-    if(acc==5){
-      if(R[5]==F(0)){
-        R[8]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[8]=128*0+258;
-        {hval r=immval(R[5])-immval(R[8]);R[10]=F(r>>FBITS&1);R[9]=F(r);}
-        R[11]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],4);fp[6]=R[7];fp[5]=R[3];fp[4]=R[4];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 512:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[6]=IFALSE;
-      R[9]=R[4];R[5]=R[3];
-      R[4]=R[8];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 513:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=128*0+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 514:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[10]=R[5];R[4]=R[3];
-      R[3]=R[8];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 515:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[5];
-      R[4]=R[6];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 516:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[12]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[12];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 517:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[2],4);
-      R[8]=G(R[1],2);
-      R[9]=R[4];
-      R[5]=R[3];R[3]=R[6];
-      R[4]=R[7];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 518:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[8]=128*510+258;
-      R[9]=R[5];R[5]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 519:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      R[5]=INULL;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 520:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[5]=128*6+258;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 521:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-      R[13]=G(R[1],2);
-      R[7]=R[4];R[4]=R[13];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 522:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        if(R[6]==INULL){
-          R[7]=R[3];
-          R[3]=R[4];R[4]=R[5];
-          ob=(word*)R[7];acc=2;
-        }else{
-          R[7]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[7];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 523:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[9]=G(R[1],2);
-      R[10]=R[6];R[6]=R[5];
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 524:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 525:
-    if(acc==1){
-      R[4]=G(R[2],3);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[2],2);
-      R[10]=R[6];
-      R[11]=R[5];R[5]=R[3];
-      R[6]=R[7];R[7]=R[4];
-      R[4]=R[10];R[3]=R[11];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 526:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-      R[5]=F(0);
-      R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 527:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[5]=128*14+258;
-        R[8]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 528:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],2);
-        R[8]=R[5];R[4]=R[3];
-        R[3]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[5]=G(R[2],3);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[9];fp[5]=R[8];fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        R[4]=G(R[2],5);
-        R[12]=INULL;
-        R[9]=R[5];R[5]=R[12];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 529:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-        R[7]=R[4];
-        R[4]=R[3];R[3]=R[9];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 530:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 531:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[7]=R[4];R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 532:
-    if(acc==3){
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 533:
-    if(acc==6){
-      if(R[5]==INULL){
-        R[8]=R[3];R[3]=R[4];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[9]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[8];fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-        R[5]=IFALSE;
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 534:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=R[3]&R[5];
-      if(R[5]==R[6]){
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],3);
-        R[10]=G(R[1],2);
-        R[11]=G(R[1],5);
-        R[12]=G(R[1],6);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[12];fp[6]=R[11];fp[5]=R[4];fp[4]=R[10];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=8;
-        R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],3);
-        R[10]=G(R[1],4);
-        R[11]=G(R[1],5);
-        R[12]=G(R[1],6);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[12];fp[6]=R[11];fp[5]=R[4];fp[4]=R[10];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=8;
-        R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 535:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 536:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=INULL;
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 537:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[5]=INULL;
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 538:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=R[4];
-      R[3]=R[5];R[4]=R[6];
-      R[5]=R[7];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 539:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 540:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[5]=R[3];
-        R[3]=R[7];R[4]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 541:
-    if(acc==2){
-      {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[5]=ob[1];R[6]=ob[2];}
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[6];R[9]=(word)fp;fp+=4;
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 542:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[4];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=R[5];R[4]=R[3];
-      R[3]=R[7];R[5]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 543:
-    if(acc==3){
-      if(R[5]==INULL){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[4]=R[5];
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 544:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[6]=INULL;
-      R[11]=R[4];R[5]=R[3];
-      R[4]=R[7];R[3]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 545:
-    if(acc==3){
-      if(R[4]==INULL){
-        R[6]=INULL;
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 546:
-    if(acc==5){
-      if(R[4]==R[5]){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[7];fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 547:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=128*22+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 548:
-    if(acc==2){
-      if(R[4]==F(0)){
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-        R[4]=G(R[1],2);
-        R[9]=128*0+258;
-        R[10]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[5]=128*0+258;
-        if(R[4]==R[5]){
-          R[6]=G(R[2],4);
-          R[7]=G(R[1],3);
-          *fp=make_header(4,TPROC);fp[1]=G(R[2],5);fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-          R[4]=G(R[1],2);
-          ob=(word*)R[6];acc=3;
-        }else{
-          R[6]=128*2+258;
-          if(R[4]==R[6]){
-            R[7]=G(R[1],3);
-            R[4]=F(0);
-            ob=(word*)R[7];acc=2;
-          }else{
-            R[7]=128*4+258;
-            if(R[4]==R[7]){
-              R[8]=G(R[1],3);
-              R[4]=R[5];
-              ob=(word*)R[8];acc=2;
-            }else{
-              R[8]=128*6+258;
-              if(R[4]==R[8]){
-                R[9]=G(R[2],6);
-                R[10]=G(R[1],3);
-                R[5]=G(R[2],7);
-                R[4]=R[3];R[3]=R[10];
-                ob=(word*)R[9];acc=3;
-              }else{
-                R[9]=128*8+258;
-                if(R[4]==R[9]){
-                  R[10]=G(R[2],6);
-                  R[11]=G(R[1],3);
-                  R[5]=G(R[2],7);
-                  R[4]=R[3];R[3]=R[11];
-                  ob=(word*)R[10];acc=3;
-                }else{
-                  R[10]=128*10+258;
-                  if(R[4]==R[10]){
-                    R[11]=G(R[2],6);
-                    R[12]=G(R[1],3);
-                    R[5]=G(R[2],7);
-                    R[4]=R[3];R[3]=R[12];
-                    ob=(word*)R[11];acc=3;
-                  }else{
-                    R[11]=128*12+258;
-                    if(R[4]==R[11]){
-                      R[12]=G(R[2],6);
-                      R[13]=G(R[1],2);
-                      R[14]=G(R[1],3);
-                      *fp=make_header(4,TCLOS);fp[1]=G(R[2],8);fp[3]=R[14];fp[2]=R[13];R[15]=(word)fp;fp+=4;
-                      R[5]=G(R[2],7);
-                      R[4]=R[3];R[3]=R[15];
-                      ob=(word*)R[12];acc=3;
-                    }else{
-                      R[12]=128*14+258;
-                      if(R[4]==R[12]){
-                        R[13]=G(R[2],6);
-                        R[14]=G(R[1],2);
-                        R[15]=G(R[1],3);
-                        *fp=make_header(4,TCLOS);fp[1]=G(R[2],9);fp[3]=R[15];fp[2]=R[14];R[16]=(word)fp;fp+=4;
-                        R[5]=G(R[2],7);
-                        R[4]=R[3];R[3]=R[16];
-                        ob=(word*)R[13];acc=3;
-                      }else{
-                        R[13]=128*16+258;
-                        if(R[4]==R[13]){
-                          R[14]=G(R[2],10);
-                          R[4]=G(R[1],2);
-                          R[16]=G(R[1],3);
-                          *fp=make_header(5,TCLOS);fp[1]=G(R[2],11);fp[4]=R[16];fp[3]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-                          R[5]=R[6];
-                          ob=(word*)R[14];acc=3;
-                        }else{
-                          R[14]=G(R[2],12);
-                          R[15]=G(R[1],2);
-                          R[16]=G(R[1],3);
-                          *fp=make_header(4,TCLOS);fp[1]=G(R[2],13);fp[3]=R[16];fp[2]=R[15];R[17]=(word)fp;fp+=4;
-                          R[6]=128*256+258;
-                          R[4]=R[3];R[3]=R[17];
-                          ob=(word*)R[14];acc=4;
-                        }
-                      }
-                    }
-                  }
-                }
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 549:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[6];R[8]=(word)fp;fp+=4;
-      R[9]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 550:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[8]=(word)fp;fp+=5;
-      R[9]=128*4+258;
-      R[10]=R[5];R[4]=R[3];
-      R[3]=R[8];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 551:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      if(R[4]==F(0)){
-        R[3]=G(R[2],2);
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[3]=G(R[2],3);
-        ob=(word*)R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 552:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[9]=R[3];R[3]=R[6];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 553:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 554:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[3];fp[5]=R[8];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[5]=G(R[2],4);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 555:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[2],4);
-        R[8]=R[4];
-        R[4]=R[5];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],5);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],6);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],6);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 556:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 557:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[8]=R[4];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 558:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 559:
-    if(acc==4){
-      if(R[5]==F(0)){
-        R[7]=IFALSE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[4]==INULL){
-          R[7]=ITRUE;
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          R[7]=G(R[1],2);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[7];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 560:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=128*0+258;
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-        R[5]=128*0+258;
-        R[10]=R[4];
-        R[4]=R[3];R[3]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 561:
-    R[5]=G(R[4],0);
-    ob=(word*)R[3];R[3]=R[5];acc=1;
-     break;
-   case 562:
-    if(acc==2){
-      assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 563:
-    R[5]=G(R[4],0);
-    ob=(word*)R[3];R[3]=R[5];acc=1;
-     break;
-   case 564:
-    if(acc==3){
-      R[6]=prim_ref(R[4],R[5]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 565:
-    if(acc==3){
-      R[6]=R[4]^(FMAX<<IPOS&R[5]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 566:
-    if(acc==3){
-      R[6]=BOOL(R[4]==R[5]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 567:
-    if(acc==3){
-      R[6]=prim_lraw(R[4],R[5]);      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 568:
-    if(acc==3){
-      R[6]=cons(R[4],R[5]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 569:
-    if(acc==2){
-      assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 570:
-    if(acc==2){
-      assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 571:
-    if(acc==3){
-      R[6]=R[4]^(FMAX<<IPOS&R[5]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 572:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],2);
-      R[10]=G(R[1],3);
-      R[11]=G(R[1],4);
-      R[12]=G(R[1],5);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[12];fp[9]=R[11];fp[8]=R[10];fp[7]=R[7];fp[6]=R[6];fp[5]=R[5];fp[4]=R[4];fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=11;
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 573:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],4);
-        R[11]=G(R[1],8);
-        R[12]=G(R[1],9);
-        R[13]=G(R[1],10);
-        *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        R[10]=G(R[1],9);
-        R[11]=G(R[1],10);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[12]=(word)fp;fp+=8;
-        R[13]=IFALSE;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[12];R[5]=R[13];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 574:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],10);
-        R[7]=G(R[1],9);
-        R[8]=G(R[1],8);
-        R[9]=G(R[1],3);
-        R[10]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        R[6]=R[8];R[7]=R[9];
-        ob=(word*)R[10];acc=5;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        R[10]=G(R[1],9);
-        R[11]=G(R[1],10);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[12]=(word)fp;fp+=8;
-        R[13]=IFALSE;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[12];R[5]=R[13];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 575:
-    if(acc==5){
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],2);fp[5]=R[5];fp[4]=R[6];fp[3]=R[7];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[5]=(word)fp;fp+=6;
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 576:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],2);
-      R[10]=G(R[1],3);
-      R[11]=G(R[1],4);
-      R[12]=G(R[1],5);
-      *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[3];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[5];fp[5]=R[6];fp[4]=R[7];fp[3]=R[4];fp[2]=R[9];R[3]=(word)fp;fp+=11;
-      R[4]=R[10];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 577:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],10);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        R[11]=G(R[1],7);
-        R[12]=G(R[1],8);
-        R[13]=G(R[1],9);
-        *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],8);
-        R[7]=G(R[1],9);
-        R[8]=G(R[1],10);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 578:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],4);
-        R[11]=G(R[1],8);
-        R[12]=G(R[1],9);
-        R[13]=G(R[1],10);
-        *fp=make_header(11,TCLOS);fp[1]=G(R[2],3);fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=11;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        R[10]=G(R[1],9);
-        R[11]=G(R[1],10);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[12]=(word)fp;fp+=8;
-        R[13]=IFALSE;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[12];R[5]=R[13];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 579:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],10);
-        R[8]=G(R[1],9);
-        R[9]=G(R[1],8);
-        R[10]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        R[6]=R[8];R[7]=R[9];
-        ob=(word*)R[10];acc=5;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        R[10]=G(R[1],9);
-        R[11]=G(R[1],10);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[12]=(word)fp;fp+=8;
-        R[13]=IFALSE;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[12];R[5]=R[13];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 580:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[5]=R[3];R[6]=R[4];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 581:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[3];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],2);
-      R[7]=R[4];R[4]=R[12];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 582:
-    if(acc==5){
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=5;
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[5]=(word)fp;fp+=5;
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 583:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        R[5]=IFALSE;
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[8]=R[4];
-        R[4]=R[5];R[5]=R[6];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 584:
-    if(acc==5){
-      R[8]=IFALSE;
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 585:
-    if(acc==5){
-      R[8]=ITRUE;
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 586:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 587:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=IFALSE;
-      R[9]=R[5];
-      R[10]=R[6];R[6]=R[4];
-      R[5]=R[7];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 588:
-    if(acc==5){
-      if(R[4]==IFALSE){
-        if(R[7]==IFALSE){
-          R[8]=G(R[1],3);
-          R[4]=G(R[1],2);
-          ob=(word*)R[8];acc=4;
-        }else{
-          R[8]=G(R[1],3);
-          R[9]=G(R[1],4);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[9];fp[4]=R[3];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-          R[4]=G(R[1],2);
-          ob=(word*)R[8];acc=4;
-        }
-      }else{
-        if(R[7]==IFALSE){
-          R[8]=G(R[1],4);
-          R[9]=G(R[1],3);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[3];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[5]=G(R[1],2);
-          R[6]=R[4];
-          R[7]=R[8];R[4]=R[9];
-          ob=(word*)R[7];acc=5;
-        }else{
-          R[8]=G(R[1],4);
-          R[9]=G(R[1],3);
-          *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[8];fp[6]=R[3];fp[5]=R[9];fp[4]=R[7];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-          R[5]=G(R[1],2);
-          R[6]=R[4];
-          R[7]=R[8];R[4]=R[9];
-          ob=(word*)R[7];acc=5;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 589:
-    if(acc==5){
-      if(R[6]==IFALSE){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[7];fp[3]=R[4];fp[2]=R[5];R[4]=(word)fp;fp+=5;
-        R[5]=R[4];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 590:
-    if(acc==5){
-      if(R[4]==IFALSE){
-        if(R[7]==IFALSE){
-          R[8]=G(R[1],3);
-          R[4]=G(R[1],2);
-          ob=(word*)R[8];acc=4;
-        }else{
-          R[8]=G(R[1],4);
-          R[4]=G(R[1],3);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[4];fp[4]=R[3];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[5]=G(R[1],2);
-          R[6]=R[7];R[7]=R[8];
-          ob=(word*)R[7];acc=5;
-        }
-      }else{
-        if(R[7]==IFALSE){
-          R[8]=G(R[1],3);
-          R[9]=G(R[1],4);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[9];fp[4]=R[3];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-          R[4]=G(R[1],2);
-          ob=(word*)R[8];acc=4;
-        }else{
-          R[8]=G(R[1],4);
-          R[9]=G(R[1],3);
-          *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[8];fp[6]=R[3];fp[5]=R[9];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-          R[5]=G(R[1],2);
-          R[6]=R[7];
-          R[7]=R[8];R[4]=R[9];
-          ob=(word*)R[7];acc=5;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 591:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 592:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=IFALSE;
-      R[10]=R[7];
-      R[7]=R[6];R[6]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      if(acc==4){
-        R[7]=G(R[1],2);
-        ob=(word*)R[7];acc=5;
-      }else{
-        error(61,ob,F(acc));
-      }
-    }
-     break;
-   case 593:
-    if(acc==5){
-      if(R[4]==IFALSE){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],2);fp[4]=R[7];fp[3]=R[5];fp[2]=R[6];R[8]=(word)fp;fp+=5;
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[7];fp[3]=R[5];fp[2]=R[6];R[5]=(word)fp;fp+=5;
-        R[10]=R[4];R[4]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 594:
-    if(acc==5){
-      R[8]=G(R[1],3);
-      if(R[8]==R[5]){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[9]=prim_less(R[8],R[5]);
-        if(R[9]==IFALSE){
-          R[10]=G(R[1],4);
-          R[6]=G(R[1],2);
-          R[4]=R[7];
-          R[5]=R[8];R[7]=R[10];
-          ob=(word*)R[7];acc=5;
-        }else{
-          R[7]=G(R[1],4);
-          R[6]=G(R[1],2);
-          R[5]=R[8];
-          ob=(word*)R[7];acc=5;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 595:
-    if(acc==5){
-      if(R[4]==IFALSE){
-        R[8]=G(R[1],2);
-        R[4]=IFALSE;
-        R[7]=R[4];
-        ob=(word*)R[8];acc=5;
-      }else{
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=5;
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],4);fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[5]=(word)fp;fp+=5;
-        R[10]=R[4];R[4]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 596:
-    if(acc==5){
-      R[8]=G(R[1],4);
-      R[9]=prim_less(R[8],R[5]);
-      if(R[9]==IFALSE){
-        if(R[8]==R[5]){
-          R[10]=G(R[2],2);
-          R[6]=G(R[1],3);
-          R[5]=R[8];
-          ob=(word*)R[10];acc=5;
-        }else{
-          R[10]=G(R[1],2);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[6]=G(R[1],3);
-          R[4]=R[7];
-          R[5]=R[8];R[7]=R[10];
-          ob=(word*)R[7];acc=5;
-        }
-      }else{
-        R[10]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[3];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-        R[6]=G(R[1],3);
-        R[5]=R[8];R[7]=R[10];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 597:
-    if(acc==5){
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],2);fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=6;
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[5]=(word)fp;fp+=6;
-      R[4]=R[8];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 598:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      R[11]=G(R[2],2);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[5];fp[6]=R[6];fp[5]=R[7];fp[4]=R[8];fp[3]=R[9];fp[2]=R[10];R[3]=(word)fp;fp+=9;
-      R[13]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=R[4];R[4]=R[13];
-      ob=(word*)R[11];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 599:
-    if(acc==5){
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],2);
-      R[11]=G(R[2],2);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[9];fp[6]=R[10];fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[3]=(word)fp;fp+=9;
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=R[8];
-      ob=(word*)R[11];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 600:
-    if(acc==5){
-      R[8]=G(R[2],2);
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      ob=(word*)R[8];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 601:
-    if(acc==5){
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],2);
-      R[11]=G(R[2],2);
-      R[12]=G(R[1],5);
-      R[13]=G(R[1],6);
-      R[14]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[5];fp[6]=R[6];fp[5]=R[7];fp[4]=R[14];fp[3]=R[13];fp[2]=R[12];R[3]=(word)fp;fp+=9;
-      R[7]=R[4];R[4]=R[8];
-      R[5]=R[9];R[6]=R[10];
-      ob=(word*)R[11];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 602:
-    if(acc==5){
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],2);
-      R[11]=G(R[2],2);
-      R[12]=G(R[1],5);
-      R[13]=G(R[1],6);
-      R[14]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[3];fp[7]=R[8];fp[6]=R[9];fp[5]=R[10];fp[4]=R[14];fp[3]=R[13];fp[2]=R[12];R[3]=(word)fp;fp+=9;
-      ob=(word*)R[11];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 603:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],7);
-      R[7]=G(R[1],8);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[9]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[13]=R[4];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[13];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 604:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[5];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 605:
-    if(acc==3){
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[6];R[5]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 606:
-    if(acc==3){
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=IFALSE;
-      R[10]=R[4];
-      R[4]=R[6];R[5]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 607:
-    if(acc==3){
-      R[6]=IFALSE;
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[6];R[5]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 608:
-    if(acc==3){
-      R[6]=IFALSE;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[6];R[5]=R[7];
-      R[7]=R[6];R[6]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 609:
-    if(acc==5){
-      if(R[4]==IFALSE){
-        if(R[7]==IFALSE){
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[5];fp[2]=R[6];R[8]=(word)fp;fp+=4;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=5;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }
-      }else{
-        if(R[7]==IFALSE){
-          *fp=make_header(5,TPROC);fp[1]=G(R[1],4);fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[8]=(word)fp;fp+=5;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          *fp=make_header(6,TPROC);fp[1]=G(R[1],5);fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=6;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 610:
-    if(acc==3){
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[5];
-      R[4]=R[6];R[5]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 611:
-    if(acc==3){
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=IFALSE;
-      R[10]=R[5];
-      R[4]=R[6];R[5]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 612:
-    if(acc==3){
-      R[6]=IFALSE;
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[10]=R[5];
-      R[4]=R[6];R[5]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 613:
-    if(acc==3){
-      R[6]=IFALSE;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[5];
-      R[4]=R[6];R[5]=R[7];
-      R[7]=R[6];R[6]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 614:
-    if(acc==4){
-      assert(pairp(R[4]),R[4],105);R[7]=G(R[4],1);
-      if(R[7]==R[5]){
-        R[8]=G(R[4],2);
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        R[8]=G(R[4],1);
-        {word ob=R[8];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        if(R[9]==F(0)){
-          R[10]=G(R[4],1);
-          R[4]=G(R[4],2);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[6];acc=4;
-        }else{
-          R[4]=G(R[4],2);
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 615:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 616:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=128*46+258;
-      R[7]=IFALSE;
-      R[9]=R[5];R[5]=R[4];
-      R[4]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 617:
-    if(acc==6){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[8];R[9]=(word)fp;fp+=3;
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],2);fp[3]=R[4];fp[2]=R[5];R[4]=(word)fp;fp+=4;
-      R[5]=R[9];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 618:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[5];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 619:
-    if(acc==3){
-      if(R[3]==IFALSE){
-        R[6]=G(R[1],2);
-        if(R[6]==IFALSE){
-          R[7]=G(R[1],3);
-          R[3]=IFALSE;
-          ob=(word*)R[7];acc=1;
-        }else{
-          R[5]=G(R[1],4);
-          R[3]=G(R[1],3);
-          *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[6];R[4]=(word)fp;fp+=3;
-          ob=(word*)R[5];acc=3;
-        }
-      }else{
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[3];fp[4]=R[8];fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 620:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[3];R[7]=(word)fp;fp+=4;
-        R[3]=R[5];
-        R[5]=R[4];R[4]=R[7];
-        ob=(word*)R[5];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 621:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[2],3);
-      R[9]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 622:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=F(0);
-      R[6]=INULL;
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 623:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=INULL;
-      R[6]=G(R[1],2);
-      R[7]=G(R[2],2);
-      R[9]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 624:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=128*92+258;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 625:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*250+258;
-      R[7]=R[4];
-      R[3]=R[5];R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 626:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      R[12]=G(R[1],9);
-      R[13]=G(R[1],10);
-      R[14]=G(R[1],11);
-      *fp=make_header(12,TCLOS);fp[1]=G(R[2],3);fp[11]=R[14];fp[10]=R[13];fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[15]=(word)fp;fp+=12;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[15];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 627:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      R[12]=G(R[1],9);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[12];fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[13]=(word)fp;fp+=10;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[13];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 628:
-    if(acc==3){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*82+258;
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*62+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=128*80+258;
-          R[12]=BOOL(R[6]==R[11]);
-          if(R[12]==IFALSE){
-            if(R[5]==F(0)){
-              R[13]=IFALSE;
-              R[7]=R[3];
-              R[3]=R[4];R[4]=R[13];
-              ob=(word*)R[7];acc=2;
-            }else{
-              R[13]=ITRUE;
-              R[7]=R[3];
-              R[3]=R[4];R[4]=R[13];
-              ob=(word*)R[7];acc=2;
-            }
-          }else{
-            R[13]=IFALSE;
-            R[7]=R[3];
-            R[3]=R[4];R[4]=R[13];
-            ob=(word*)R[7];acc=2;
-          }
-        }else{
-          R[11]=IFALSE;
-          R[7]=R[3];
-          R[3]=R[4];R[4]=R[11];
-          ob=(word*)R[7];acc=2;
-        }
-      }else{
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];}
-        R[11]=128*0+258;
-        if(R[9]==R[11]){
-          R[12]=G(R[1],2);
-          *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-          R[5]=R[10];
-          ob=(word*)R[12];acc=3;
-        }else{
-          R[12]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-          R[5]=R[10];
-          ob=(word*)R[12];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 629:
-    if(acc==2){
-      R[5]=F(0);
-      R[4]=BOOL(R[4]==R[5]);
-      R[7]=G(R[1],2);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 630:
-    if(acc==3){
-      if(R[5]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[6]=G(R[1],2);
-        R[7]=INULL;
-        R[9]=R[6];R[6]=R[7];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 631:
-    if(acc==5){
-      if(R[5]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-        R[10]=G(R[1],4);
-        R[6]=INULL;
-        R[7]=R[5];
-        R[5]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 632:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[10]=G(R[2],4);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 633:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[8];R[9]=(word)fp;fp+=3;
-      R[10]=R[4];
-      R[11]=R[5];R[5]=R[3];
-      R[4]=R[6];R[6]=R[7];
-      R[7]=R[9];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 634:
-    if(acc==6){
-      if(R[5]==INULL){
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[9]=G(R[1],2);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[1],3);fp[7]=R[7];fp[6]=R[3];fp[5]=R[8];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[4]=R[5];
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 635:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=G(R[2],4);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 636:
-    if(acc==2){
-      assert(pairp(R[3]),R[3],169);R[5]=G(R[3],2);
-      if(R[5]==INULL){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],3);
-        R[10]=G(R[1],5);
-        R[11]=G(R[1],4);
-        *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[4];fp[3]=R[8];fp[2]=R[7];R[12]=(word)fp;fp+=8;
-        R[4]=R[3];R[3]=R[12];
-        ob=(word*)R[6];acc=2;
-      }else{
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],4);fp[4]=R[8];fp[3]=R[7];fp[2]=R[3];R[9]=(word)fp;fp+=5;
-        R[10]=G(R[1],3);
-        R[11]=G(R[1],2);
-        R[5]=R[4];R[7]=R[8];
-        R[8]=R[6];R[3]=R[9];
-        R[4]=R[10];R[6]=R[11];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 637:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[2],4);
-      R[10]=G(R[1],2);
-      R[11]=R[5];R[5]=R[10];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 638:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=cons(R[3],R[4]);
-      R[6]=G(R[1],7);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],3);
-      R[4]=R[8];R[8]=R[6];
-      R[6]=R[5];R[3]=R[7];
-      R[5]=R[9];R[7]=R[10];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 639:
-    if(acc==3){
-      assert(pairp(R[4]),R[4],105);R[6]=G(R[4],1);
-      assert(pairp(R[5]),R[5],105);R[7]=G(R[5],1);
-      R[8]=prim_less(R[6],R[7]);
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 640:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[5]=F(0);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 641:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=cons(R[3],R[5]);
-      R[7]=G(R[1],3);
-      R[8]=cons(R[6],R[7]);
-      R[9]=G(R[1],4);
-      R[3]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 642:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[5];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 643:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=INULL;
-        R[6]=cons(R[4],R[5]);
-        R[7]=G(R[1],4);
-        R[5]=cons(R[7],R[6]);
-        R[9]=G(R[2],2);
-        R[3]=G(R[1],5);
-        R[4]=G(R[2],3);
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[10]=R[4];
-        R[5]=R[6];R[4]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 644:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[8]=F(0);
-      R[4]=R[5];R[5]=R[8];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 645:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[6];R[4]=R[7];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        R[3]=F(0);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 646:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-      R[8]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 647:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[8]=F(0);
-      R[9]=G(R[1],3);
-      R[11]=R[7];
-      R[7]=R[8];R[8]=R[9];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 648:
-    if(acc==7){
-      if(R[5]==INULL){
-        R[10]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[8];
-        ob=(word*)R[10];acc=2;
-      }else{
-        R[10]=G(R[1],4);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[1],5);fp[8]=R[3];fp[7]=R[4];fp[6]=R[5];fp[5]=R[6];fp[4]=R[8];fp[3]=R[9];fp[2]=R[7];R[3]=(word)fp;fp+=9;
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 649:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        R[11]=G(R[1],3);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],8);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[5]=128*0+258;
-        R[8]=R[4];R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 650:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[11]=R[4];R[12]=R[5];
-      R[5]=R[7];R[7]=R[3];
-      R[4]=R[6];R[6]=R[8];
-      R[8]=R[9];R[3]=R[12];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 651:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(8,TPROC);fp[1]=G(R[2],2);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],3);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],4);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[5];fp[4]=R[8];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-        R[4]=G(R[1],2);
-        R[5]=128*0+258;
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 652:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=8;
-      R[13]=G(R[1],3);
-      R[4]=R[5];R[5]=R[13];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 653:
-    if(acc==7){
-      if(R[5]==INULL){
-        R[10]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[8];
-        ob=(word*)R[10];acc=2;
-      }else{
-        R[10]=G(R[1],4);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[1],5);fp[8]=R[9];fp[7]=R[3];fp[6]=R[6];fp[5]=R[7];fp[4]=R[5];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-        R[4]=R[5];
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 654:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(8,TPROC);fp[1]=G(R[2],2);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],4);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[12]=G(R[1],2);
-        R[8]=R[4];
-        R[5]=R[7];R[4]=R[12];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 655:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[3];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=10;
-      R[8]=R[5];R[5]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 656:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],7);
-      R[8]=G(R[1],8);
-      R[9]=G(R[1],9);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[10]=(word)fp;fp+=8;
-      if(R[3]==IFALSE){
-        R[3]=G(R[1],3);
-        ob=(word*)R[10];acc=1;
-      }else{
-        assert(pairp(R[4]),R[4],105);R[6]=G(R[4],1);
-        R[12]=G(R[2],2);
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[3]=R[10];
-        ob=(word*)R[12];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 657:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[5];fp[3]=R[7];fp[2]=R[3];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[1],3);
-      R[5]=128*0+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 658:
-    if(acc==1){
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[6];
-      R[13]=R[5];R[5]=R[3];
-      R[6]=R[7];R[7]=R[8];
-      R[8]=R[9];R[9]=R[4];
-      R[4]=R[12];R[3]=R[13];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 659:
-    if(acc==3){
-      if(R[5]==F(0)){
-        R[6]=F(0);
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[8]=128*0+258;
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 660:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 661:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=R[5];R[5]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 662:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 663:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 664:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[9]=128*0+258;
-      R[10]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 665:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=prim_ref(R[4],R[3]);
-      R[6]=G(R[1],4);
-      R[3]=G(R[1],3);
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 666:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 667:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 668:
-    if(acc==3){
-      if(R[5]==F(0)){
-        R[6]=F(0);
-        R[7]=R[3];
-        R[3]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-        R[7]=F(0);
-        R[8]=BOOL(R[6]==R[7]);
-        if(R[8]==IFALSE){
-          R[9]=128*78+258;
-          R[10]=BOOL(R[6]==R[9]);
-          if(R[10]==IFALSE){
-            R[11]=G(R[1],2);
-            R[4]=G(R[1],3);
-            ob=(word*)R[11];acc=3;
-          }else{
-            R[11]=G(R[1],4);
-            ob=(word*)R[11];acc=3;
-          }
-        }else{
-          R[9]=G(R[1],5);
-          ob=(word*)R[9];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 669:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=INULL;
-      R[8]=IFALSE;
-      R[11]=R[7];R[7]=R[8];
-      R[8]=R[6];R[6]=R[11];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 670:
-    if(acc==6){
-      {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];}
-      if(R[10]==INULL){
-        if(R[7]==IFALSE){
-          R[11]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[5]=R[9];
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[11]=G(R[1],4);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[5]=R[9];
-          ob=(word*)R[11];acc=3;
-        }
-      }else{
-        R[11]=G(R[1],6);
-        *fp=make_header(7,TPROC);fp[1]=G(R[1],7);fp[6]=R[8];fp[5]=R[3];fp[4]=R[10];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        R[5]=IFALSE;
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 671:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=cons(R[3],R[5]);
-      R[7]=G(R[1],3);
-      R[8]=prim_less(R[3],R[7]);
-      R[9]=G(R[1],6);
-      R[3]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[7]=R[8];R[8]=R[9];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 672:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[4]=cons(R[4],R[5]);
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 673:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      if(R[5]==R[6]){
-        R[7]=G(R[1],3);
-        *fp=make_header(3,TPROC);fp[1]=G(R[1],4);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[5]=R[4];
-        ob=(word*)R[7];acc=3;
-      }else{
-        R[7]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[9]=128*0+258;
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[7];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 674:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 675:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=R[4];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 676:
-    if(acc==2){
-      R[5]=G(R[2],4);
-      if(R[3]==R[5]){
-        R[6]=G(R[1],3);
-        R[7]=F(0);
-        R[3]=R[4];R[4]=R[7];
-        ob=(word*)R[6];acc=2;
-      }else{
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],3);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[4];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        R[5]=R[3];R[3]=R[8];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 677:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 678:
-    if(acc==1){
-      R[4]=128*2+258;
-      R[5]=prim_ref(R[3],R[4]);
-      R[6]=128*0+258;
-      R[7]=prim_ref(R[5],R[6]);
-      R[8]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[8];fp[2]=R[3];R[9]=(word)fp;fp+=4;
-      R[3]=cons(R[7],R[9]);
-      R[11]=G(R[1],2);
-      ob=(word*)R[11];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 679:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      if(R[5]==F(0)){
-        R[6]=G(R[1],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[5]=128*0+258;
-        ob=(word*)R[6];acc=3;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-        R[7]=128*78+258;
-        if(R[6]==R[7]){
-          R[8]=G(R[1],4);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-          R[10]=G(R[1],6);
-          R[6]=INULL;
-          R[5]=R[4];R[4]=R[10];
-          ob=(word*)R[8];acc=4;
-        }else{
-          {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=4,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];R[10]=ob[3];}
-          R[11]=G(R[1],7);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],8);fp[5]=R[3];fp[4]=R[9];fp[3]=R[8];fp[2]=R[10];R[3]=(word)fp;fp+=6;
-          R[4]=R[9];R[5]=R[10];
-          ob=(word*)R[11];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 680:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        if(R[4]==IFALSE){
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],2);
-          R[7]=G(R[1],5);
-          *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[4]=G(R[2],4);
-          R[10]=G(R[1],4);
-          R[6]=INULL;
-          R[12]=R[5];R[5]=R[10];
-          ob=(word*)R[12];acc=4;
-        }else{
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],2);
-          R[7]=G(R[1],5);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[2],5);fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[4]=G(R[2],4);
-          R[10]=G(R[1],4);
-          R[6]=INULL;
-          R[12]=R[5];R[5]=R[10];
-          ob=(word*)R[12];acc=4;
-        }
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],7);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-        R[7]=G(R[1],3);
-        if(R[7]==IFALSE){
-          R[3]=G(R[2],6);
-          ob=(word*)R[6];acc=1;
-        }else{
-          R[3]=G(R[2],4);
-          ob=(word*)R[6];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 681:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      *fp=make_header(3,40);fp[1]=R[3];fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[4]=G(R[2],4);
-      R[10]=INULL;
-      R[11]=R[6];R[6]=R[10];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 682:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[2],4);
-      R[5]=G(R[1],2);
-      R[9]=INULL;
-      R[10]=R[4];R[3]=R[6];
-      R[4]=R[7];R[6]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 683:
-    if(acc==1){
-      R[4]=IFALSE;
-      R[5]=G(R[1],2);
-      *fp=make_header(4,2);fp[1]=R[4];fp[2]=R[5];fp[3]=R[3];R[3]=(word)fp;fp+=4;
-      R[7]=G(R[1],3);
-      ob=(word*)R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 684:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[2],4);
-      R[8]=INULL;
-      R[9]=R[4];
-      R[5]=R[3];R[3]=R[6];
-      R[4]=R[7];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 685:
-    if(acc==1){
-      R[4]=ITRUE;
-      R[5]=G(R[1],2);
-      *fp=make_header(4,2);fp[1]=R[4];fp[2]=R[3];fp[3]=R[5];R[3]=(word)fp;fp+=4;
-      R[7]=G(R[1],3);
-      ob=(word*)R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 686:
-    if(acc==5){
-      if(R[5]==INULL){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=128*0+258;
-        R[9]=prim_ref(R[5],R[8]);
-        R[10]=G(R[1],2);
-        {uint64_t p=(uint64_t)immval(R[9])*immval(R[10]);R[11]=F(p);R[12]=F(p>>FBITS);}
-        {hval r=immval(R[11])+immval(R[4]);R[14]=F(r>>FBITS);R[13]=F(r);}
-        R[15]=128*2+258;
-        R[5]=prim_ref(R[5],R[15]);
-        *fp=make_header(3,40);fp[1]=R[13];fp[2]=R[6];R[6]=(word)fp;fp+=3;
-        R[4]=R[12];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 687:
-    if(acc==3){
-      if(R[4]==INULL){
-        R[6]=F(0);
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        if(R[6]==F(0)){
-          R[4]=R[7];
-          ob=(word*)R[5];acc=3;
-        }else{
-          if(R[7]==INULL){
-            ob=(word*)R[3];R[3]=R[6];acc=1;
-          }else{
-            R[8]=INULL;
-            *fp=make_header(3,40);fp[1]=R[6];fp[2]=R[8];R[5]=(word)fp;fp+=3;
-            R[10]=G(R[1],2);
-            R[4]=R[7];
-            ob=(word*)R[10];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 688:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];}
-        *fp=make_header(3,40);fp[1]=R[7];fp[2]=R[5];R[5]=(word)fp;fp+=3;
-        R[4]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 689:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=INULL;
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 690:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],3);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 691:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-      R[4]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 692:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[10]=R[7];
-      R[7]=R[4];R[4]=R[3];
-      R[5]=R[8];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 693:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[8]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 694:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 695:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=128*0+258;
-      R[10]=R[4];
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 696:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],2);
-      R[7]=R[4];R[4]=R[11];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 697:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[11]=(word)fp;fp+=9;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 698:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 699:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 700:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[7]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 701:
-    if(acc==1){
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[5];R[5]=R[7];
-      R[7]=R[9];R[9]=R[4];
-      R[4]=R[6];R[6]=R[8];
-      R[8]=R[3];R[3]=R[12];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 702:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[9]=(word)fp;fp+=7;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 703:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      if(R[4]==R[5]){
-        R[6]=G(R[1],2);
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 704:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[5]=R[3];R[3]=R[7];
-      R[7]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 705:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[5]=R[3];R[6]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 706:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 707:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[12];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 708:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[8]=G(R[2],4);
-      R[9]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 709:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[7]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 710:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 711:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[2],4);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 712:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 713:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      *fp=make_header(5,2);fp[1]=R[4];fp[2]=R[5];fp[3]=R[6];fp[4]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],4);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 714:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      *fp=make_header(3,2);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 715:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=IFALSE;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 716:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 717:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[5]=G(R[1],2);
-      R[6]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 718:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=G(R[1],2);
-      R[6]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 719:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=2;
-    }else{
-      if(acc==2){
-        R[5]=G(R[1],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        ob=(word*)R[5];acc=2;
-      }else{
-        error(61,ob,F(acc));
-      }
-    }
-     break;
-   case 720:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*18+258;
-      R[8]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 721:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=IFALSE;
-      R[11]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      R[6]=R[7];R[8]=R[7];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 722:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 723:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*92+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 724:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 725:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[4]=F(0);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 726:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],8);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      R[11]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[8];R[13]=(word)fp;fp+=3;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[12];R[4]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 727:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[6];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=128*90+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 728:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[3];fp[5]=R[4];fp[4]=R[5];fp[3]=R[8];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[4]=R[6];R[5]=R[8];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 729:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],2);
-      R[7]=R[4];R[4]=R[11];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 730:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],5);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[4]=G(R[1],2);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 731:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[3];fp[5]=R[4];fp[4]=R[5];fp[3]=R[8];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 732:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],5);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[9]=128*84+258;
-      if(R[6]==R[9]){
-        R[3]=G(R[2],2);
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[10]=G(R[2],3);
-        R[4]=G(R[2],4);
-        R[5]=F(0);
-        R[3]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 733:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[4]=128*0+258;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 734:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[7];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 735:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[6];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=128*200+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 736:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 737:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=128*84+258;
-      if(R[9]==R[10]){
-        R[3]=R[6];
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[11]=G(R[2],2);
-        R[4]=F(0);
-        R[5]=R[6];R[3]=R[8];
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 738:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[6];fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 739:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[5]=G(R[1],2);
-      R[4]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 740:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[2],4);
-      R[5]=G(R[2],5);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 741:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[5];R[7]=(word)fp;fp+=3;
-      R[5]=F(0);
-      R[9]=R[6];
-      R[6]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 742:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=G(R[1],2);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 743:
-    if(acc==1){
-      R[4]=128*112+258;
-      R[5]=G(R[1],2);
-      R[6]=prim_less(R[4],R[5]);
-      R[7]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[7];fp[2]=R[3];R[8]=(word)fp;fp+=4;
-      if(R[6]==IFALSE){
-        R[3]=R[5];
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[9]=128*12+258;
-        {hval r=immval(R[5])-immval(R[9]);R[11]=F(r>>FBITS&1);R[10]=F(r);}
-        R[3]=R[10];
-        ob=(word*)R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 744:
-    if(acc==1){
-      R[4]=128*28+258;
-      R[5]=R[3]&R[4];
-      R[6]=G(R[2],2);
-      R[3]=G(R[1],3);
-      R[4]=G(R[1],2);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 745:
-    if(acc==2){
-      R[5]=128*30+258;
-      if(R[4]==R[5]){
-        R[6]=G(R[1],2);
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[4];R[6]=(word)fp;fp+=3;
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 746:
-    if(acc==2){
-      R[5]=128*94+258;
-      R[6]=R[4]^(FMAX<<IPOS&R[5]);
-      R[7]=G(R[1],2);
-      R[8]=prim_less(R[6],R[7]);
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 747:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=prim_ref(R[5],R[4]);
-      R[7]=128*6+258;
-      R[8]=R[6]&R[7];
-      R[9]=F(0);
-      R[10]=prim_less(R[9],R[8]);
-      ob=(word*)R[3];R[3]=R[10];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 748:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[2],4);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 749:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[12]=G(R[2],4);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[11];R[4]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 750:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[11]=(word)fp;fp+=6;
-      R[9]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 751:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 752:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 753:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[2],4);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 754:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[2],4);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 755:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[10]=(word)fp;fp+=5;
-      R[9]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 756:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[8];R[6]=(word)fp;fp+=3;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 757:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[6];R[6]=(word)fp;fp+=4;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 758:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],4);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 759:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[8];fp[2]=R[7];R[9]=(word)fp;fp+=4;
-      R[10]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 760:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=128*182+258;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 761:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[7];R[8]=(word)fp;fp+=3;
-      R[9]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 762:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 763:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[8];R[6]=(word)fp;fp+=3;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 764:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[6]=G(R[2],2);
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 765:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 766:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        if(R[4]==INULL){
-          R[5]=G(R[1],3);
-          R[3]=R[4];
-          ob=(word*)R[5];acc=1;
-        }else{
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],3);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[5];acc=2;
-        }
-      }else{
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 767:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=R[4];R[4]=R[5];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 768:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 769:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=G(R[1],2);
-        ob=(word*)R[7];acc=3;
-      }else{
-        R[7]=G(R[1],3);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],4);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 770:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 771:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        R[4]=G(R[1],3);
-        R[3]=R[7];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[4]=G(R[1],4);
-        R[3]=ITRUE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 772:
-    if(acc==3){
-      R[6]=INULL;
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      R[10]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 773:
-    if(acc==4){
-      R[7]=ITRUE;
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 774:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[8];fp[2]=R[6];R[7]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 775:
-    if(acc==5){
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],2);fp[6]=R[9];fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[7];R[7]=(word)fp;fp+=3;
-      ob=(word*)R[8];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 776:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[1],5);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 777:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[9];fp[2]=R[7];R[7]=(word)fp;fp+=4;
-      ob=(word*)R[8];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 778:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 779:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=IFALSE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        R[8]=G(R[2],2);
-        R[9]=G(R[1],2);
-        R[10]=G(R[1],3);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[7];fp[7]=R[3];fp[6]=R[6];fp[5]=R[5];fp[4]=R[4];fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=9;
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 780:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],8);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],7);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[11]=G(R[1],3);
-        R[5]=R[4];R[4]=R[11];
-        ob=(word*)R[5];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(7,TPROC);fp[1]=G(R[2],4);fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        R[4]=G(R[1],3);
-        R[13]=IFALSE;
-        R[9]=R[6];R[6]=R[13];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 781:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],2);fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 782:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 783:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],5);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        R[6]=G(R[4],1);
-        R[7]=G(R[1],3);
-        R[8]=cons(R[6],R[7]);
-        R[9]=G(R[1],6);
-        R[3]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 784:
-    if(acc==6){
-      if(R[4]==INULL){
-        R[9]=IFALSE;
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        R[9]=G(R[2],2);
-        R[10]=G(R[1],2);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[7];fp[7]=R[3];fp[6]=R[6];fp[5]=R[10];fp[4]=R[5];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=9;
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 785:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],8);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],7);
-        R[9]=G(R[1],2);
-        *fp=make_header(7,TPROC);fp[1]=G(R[2],2);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],3);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[1],5);
-        if(R[5]==R[6]){
-          R[7]=G(R[4],2);
-          R[8]=G(R[1],4);
-          R[5]=cons(R[6],R[8]);
-          R[10]=G(R[1],8);
-          R[3]=G(R[1],7);
-          R[6]=G(R[1],6);
-          R[4]=R[7];
-          ob=(word*)R[10];acc=4;
-        }else{
-          R[7]=G(R[1],7);
-          R[3]=IFALSE;
-          ob=(word*)R[7];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 786:
-    if(acc==6){
-      if(R[4]==INULL){
-        ob=(word*)R[7];acc=4;
-      }else{
-        R[9]=G(R[1],2);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[1],3);fp[7]=R[8];fp[6]=R[3];fp[5]=R[5];fp[4]=R[6];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 787:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        *fp=make_header(7,TPROC);fp[1]=G(R[2],2);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],6);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 788:
-    if(acc==4){
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[7]=(word)fp;fp+=5;
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 789:
-    if(acc==4){
-      R[8]=R[3];R[3]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 790:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[8];R[6]=(word)fp;fp+=4;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 791:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[9];fp[3]=R[8];fp[2]=R[6];R[6]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 792:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],2);fp[2]=R[7];R[8]=(word)fp;fp+=3;
-      R[9]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 793:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],2);
-      R[5]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 794:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[6];R[6]=(word)fp;fp+=3;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 795:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 796:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[7];R[6]=(word)fp;fp+=4;
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 797:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],2);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 798:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[8];fp[2]=R[7];R[9]=(word)fp;fp+=4;
-      R[10]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 799:
-    if(acc==4){
-      R[7]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[7];R[8]=(word)fp;fp+=4;
-      R[4]=cons(R[8],R[4]);
-      R[10]=G(R[1],2);
-      R[11]=G(R[1],3);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[6];fp[5]=R[8];fp[4]=R[11];fp[3]=R[10];fp[2]=R[7];R[6]=(word)fp;fp+=7;
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 800:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[8]=cons(R[6],R[7]);
-      R[6]=G(R[1],4);
-      R[10]=G(R[1],5);
-      R[11]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[3];fp[5]=R[5];fp[4]=R[11];fp[3]=R[4];fp[2]=R[10];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[1],3);
-      R[5]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 801:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 802:
-    if(acc==4){
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[7]=(word)fp;fp+=5;
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 803:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],2);
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 804:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[6];R[6]=R[3];
-      R[3]=R[5];R[5]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 805:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[3];
-      R[3]=R[4];R[4]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 806:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[6]=cons(R[7],R[6]);
-      R[9]=G(R[1],3);
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 807:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[7];fp[2]=R[6];R[8]=(word)fp;fp+=4;
-      R[4]=cons(R[8],R[4]);
-      R[10]=G(R[1],2);
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 808:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      R[6]=G(R[1],2);
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 809:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      R[9]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 810:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=G(R[2],2);
-        R[6]=G(R[2],3);
-        ob=(word*)R[7];acc=4;
-      }else{
-        R[7]=G(R[2],4);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],3);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],5);fp[7]=R[6];fp[6]=R[3];fp[5]=R[9];fp[4]=R[5];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=8;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 811:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],5);
-        R[5]=R[4];R[4]=R[10];
-        ob=(word*)R[5];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[1],5);
-        if(R[5]==R[6]){
-          R[7]=G(R[1],3);
-          R[8]=cons(R[6],R[7]);
-          R[5]=G(R[4],2);
-          R[10]=G(R[1],7);
-          R[3]=G(R[1],6);
-          R[4]=R[8];
-          ob=(word*)R[10];acc=4;
-        }else{
-          R[7]=G(R[2],3);
-          R[3]=G(R[1],6);
-          R[9]=G(R[1],3);
-          R[6]=G(R[2],4);
-          R[5]=R[4];R[4]=R[9];
-          ob=(word*)R[7];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 812:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=G(R[2],2);
-        R[6]=G(R[2],3);
-        ob=(word*)R[7];acc=4;
-      }else{
-        R[7]=G(R[2],4);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],3);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],5);fp[7]=R[6];fp[6]=R[3];fp[5]=R[4];fp[4]=R[5];fp[3]=R[9];fp[2]=R[8];R[3]=(word)fp;fp+=8;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 813:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],7);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[5]=R[4];R[4]=R[10];
-        ob=(word*)R[5];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[5]=ob[1];R[6]=ob[2];}
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[6];fp[4]=R[5];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=8;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 814:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=G(R[2],3);
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=cons(R[4],R[5]);
-        R[7]=G(R[1],7);
-        R[3]=G(R[1],6);
-        R[5]=G(R[1],5);
-        R[10]=R[6];
-        R[6]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 815:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 816:
-    if(acc==5){
-      if(R[5]==INULL){
-        R[8]=G(R[1],2);
-        R[6]=G(R[1],3);
-        ob=(word*)R[8];acc=4;
-      }else{
-        R[8]=G(R[1],4);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],5);fp[6]=R[6];fp[5]=R[3];fp[4]=R[5];fp[3]=R[4];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-        R[4]=R[5];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 817:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],4);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[1],3);
-        R[7]=cons(R[5],R[6]);
-        R[5]=G(R[4],2);
-        R[6]=G(R[4],1);
-        R[10]=G(R[1],6);
-        R[3]=G(R[1],5);
-        R[4]=R[7];
-        ob=(word*)R[10];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 818:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=IFALSE;
-        R[9]=R[3];R[4]=R[5];
-        R[5]=R[6];R[3]=R[8];
-        ob=(word*)R[9];acc=3;
-      }else{
-        assert(pairp(R[4]),R[4],105);R[8]=G(R[4],1);
-        {word ob=R[8];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        if(R[9]==F(0)){
-          R[4]=G(R[4],2);
-          R[5]=cons(R[8],R[5]);
-          ob=(word*)R[7];acc=5;
-        }else{
-          R[4]=G(R[4],2);
-          ob=(word*)R[8];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 819:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[5]=G(R[2],4);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 820:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[9]=R[6];
-      R[6]=R[5];R[5]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 821:
-    if(acc==4){
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[7]=(word)fp;fp+=5;
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 822:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[7]=(word)fp;fp+=4;
-      R[4]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=R[6];R[6]=R[5];
-      R[3]=R[7];R[5]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 823:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=F(0);
-      R[7]=INULL;
-      R[8]=G(R[2],3);
-      R[10]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 824:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=F(0);
-      R[7]=INULL;
-      R[8]=G(R[1],2);
-      R[10]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 825:
-    if(acc==6){
-      R[9]=G(R[1],2);
-      if(R[5]==R[9]){
-        R[10]=G(R[1],3);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],4);fp[5]=R[3];fp[4]=R[8];fp[3]=R[4];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-        R[4]=R[6];
-        ob=(word*)R[10];acc=2;
-      }else{
-        if(R[4]==INULL){
-          R[10]=G(R[1],3);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-          R[4]=R[6];
-          ob=(word*)R[10];acc=2;
-        }else{
-          R[10]=128*0+258;
-          {hval r=immval(R[5])+immval(R[10]);R[12]=F(r>>FBITS);R[11]=F(r);}
-          assert(pairp(R[4]),R[4],169);R[13]=G(R[4],2);
-          R[14]=G(R[4],1);
-          R[6]=cons(R[14],R[6]);
-          R[5]=R[11];R[4]=R[13];
-          ob=(word*)R[8];acc=6;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 826:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 827:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],5);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],3);
-        R[7]=F(0);
-        R[8]=INULL;
-        R[9]=G(R[1],2);
-        R[11]=R[6];
-        R[6]=R[8];R[8]=R[4];
-        R[3]=R[5];R[5]=R[7];
-        R[7]=R[9];R[4]=R[11];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 828:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 829:
-    if(acc==4){
-      if(immediatep(R[4])){R[7]=IFALSE;}else{hval h=V(R[4]);R[7]=rawp(h)?F(payl_len(h)):IFALSE;}      if(R[7]==F(0)){
-        R[8]=ITRUE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],2);fp[5]=R[6];fp[4]=R[5];fp[3]=R[7];fp[2]=R[4];R[4]=(word)fp;fp+=6;
-        ob=(word*)R[4];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 830:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[4];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      R[9]=R[5];R[5]=R[6];
-      R[6]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 831:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      if(R[3]==R[4]){
-        R[5]=G(R[1],6);
-        R[3]=ITRUE;
-        ob=(word*)R[5];acc=1;
-      }else{
-        if(R[3]==F(0)){
-          R[5]=G(R[2],5);
-          R[6]=G(R[1],5);
-          *fp=make_header(3,2);fp[1]=R[5];fp[2]=R[6];R[5]=(word)fp;fp+=3;
-          R[8]=G(R[2],2);
-          R[9]=G(R[1],6);
-          R[10]=G(R[1],4);
-          *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[10];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-          R[4]=G(R[2],4);
-          ob=(word*)R[8];acc=3;
-        }else{
-          if(R[3]==IFALSE){
-            R[5]=G(R[1],6);
-            R[3]=IFALSE;
-            ob=(word*)R[5];acc=1;
-          }else{
-            R[5]=G(R[2],6);
-            R[6]=G(R[1],5);
-            R[7]=G(R[1],6);
-            R[8]=G(R[1],7);
-            *fp=make_header(5,TPROC);fp[1]=G(R[2],7);fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[9]=(word)fp;fp+=5;
-            R[4]=G(R[1],2);
-            R[8]=R[5];
-            R[5]=R[3];R[3]=R[9];
-            ob=(word*)R[8];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 832:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-      if(R[3]==IFALSE){
-        R[3]=IFALSE;
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[9]=G(R[2],4);
-        *fp=make_header(3,2);fp[1]=R[9];fp[2]=R[6];R[5]=(word)fp;fp+=3;
-        R[11]=G(R[2],2);
-        R[4]=G(R[2],3);
-        R[3]=R[8];
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 833:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=R[4];
-      R[3]=R[5];R[4]=R[6];
-      R[5]=R[7];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 834:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[3];fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=8;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 835:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 836:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 837:
-    if(acc==4){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[4];R[7]=(word)fp;fp+=3;
-      R[8]=F(0);
-      R[4]=R[6];R[6]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 838:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[6];fp[3]=R[8];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[8];fp[3]=R[5];fp[2]=R[6];R[10]=(word)fp;fp+=6;
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[12]=R[4];
-      R[4]=R[9];R[5]=R[10];
-      ob=(word*)R[12];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 839:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      if(R[6]==F(0)){
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[8];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[10]=G(R[1],3);
-        R[5]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=3;
-      }else{
-        {hval r=immval(R[6])+immval(R[6]);R[8]=F(r>>FBITS);R[7]=F(r);}
-        R[9]=G(R[2],3);
-        R[10]=G(R[1],5);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],4);fp[5]=R[10];fp[4]=R[3];fp[3]=R[5];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-        R[12]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=R[4];R[4]=R[12];
-        ob=(word*)R[9];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 840:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=128*0+258;
-      R[10]=R[6];
-      R[11]=R[5];R[5]=R[3];
-      R[6]=R[7];R[7]=R[4];
-      R[4]=R[10];R[3]=R[11];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 841:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[3];fp[3]=R[5];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-      R[10]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[12]=R[6];
-      R[6]=R[4];R[4]=R[10];
-      ob=(word*)R[12];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 842:
-    if(acc==6){
-      R[9]=128*0+258;
-      if(R[7]==R[9]){
-        R[8]=R[4];
-        R[4]=R[5];R[5]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        {hval x=immval(R[7]);uint n=immval(R[9]);R[10]=F(x>>n);R[11]=F(x<<(FBITS-n));}
-        assert(pairp(R[6]),R[6],105);R[12]=G(R[6],1);
-        *fp=make_header(7,TPROC);fp[1]=G(R[1],2);fp[6]=R[8];fp[5]=R[3];fp[4]=R[4];fp[3]=R[10];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-        R[7]=R[10];R[6]=R[12];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 843:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],3);
-      R[4]=R[8];R[8]=R[6];
-      R[6]=R[5];R[5]=R[3];
-      R[3]=R[7];R[7]=R[9];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 844:
-    if(acc==6){
-      R[9]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[8];fp[5]=R[5];fp[4]=R[6];fp[3]=R[7];fp[2]=R[9];R[10]=(word)fp;fp+=7;
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[9];fp[2]=R[6];R[5]=(word)fp;fp+=6;
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[4];R[6]=(word)fp;fp+=3;
-      R[9]=R[4];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 845:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      {hval r=immval(R[6])+immval(R[6]);R[8]=F(r>>FBITS);R[7]=F(r);}
-      R[9]=G(R[1],4);
-      {hval r=immval(R[9])-immval(R[6]);R[11]=F(r>>FBITS&1);R[10]=F(r);}
-      if(R[11]==F(0)){
-        R[8]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[5];R[5]=R[6];
-        R[6]=R[7];R[7]=R[10];
-        ob=(word*)R[8];acc=6;
-      }else{
-        R[12]=G(R[2],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[7]=G(R[1],3);
-        R[5]=R[9];
-        ob=(word*)R[12];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 846:
-    if(acc==3){
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],5);
-      {hval r=immval(R[6])-immval(R[7]);R[9]=F(r>>FBITS&1);R[8]=F(r);}
-      if(R[9]==F(0)){
-        R[10]=G(R[1],6);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[6]=G(R[1],4);
-        R[4]=R[5];R[5]=R[7];
-        R[7]=R[8];R[8]=R[10];
-        ob=(word*)R[8];acc=6;
-      }else{
-        R[10]=G(R[2],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[12]=G(R[1],2);
-        R[5]=R[6];
-        R[6]=R[7];R[7]=R[12];
-        ob=(word*)R[10];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 847:
-    if(acc==6){
-      R[9]=128*0+258;
-      if(R[6]==R[9]){
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        {hval x=immval(R[6]);uint n=immval(R[9]);R[10]=F(x>>n);R[11]=F(x<<(FBITS-n));}
-        R[12]=R[5]&R[10];
-        if(R[12]==F(0)){
-          assert(pairp(R[4]),R[4],105);R[13]=G(R[4],1);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-          R[6]=R[10];R[4]=R[13];
-          ob=(word*)R[8];acc=6;
-        }else{
-          assert(pairp(R[4]),R[4],105);R[13]=G(R[4],1);
-          R[4]=G(R[4],2);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[13];R[3]=(word)fp;fp+=4;
-          R[6]=R[10];
-          ob=(word*)R[8];acc=6;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 848:
-    if(acc==4){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-      R[8]=F(0);
-      R[9]=128*0+258;
-      R[11]=R[8];
-      R[8]=R[7];R[7]=R[5];
-      R[6]=R[9];R[5]=R[11];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 849:
-    if(acc==4){
-      R[7]=IFALSE;
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],2);fp[3]=R[4];fp[2]=R[6];R[8]=(word)fp;fp+=4;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[4];R[6]=(word)fp;fp+=3;
-      R[10]=R[5];
-      R[4]=R[7];R[5]=R[8];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 850:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[2],3);
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 851:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[8]=(word)fp;fp+=5;
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[4];fp[2]=R[5];R[9]=(word)fp;fp+=5;
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[7];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[11]=R[5];
-      R[4]=R[8];R[5]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 852:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[5];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[9]=R[4];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 853:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 854:
-    if(acc==3){
-      R[6]=IFALSE;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=G(R[1],4);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[9];fp[5]=R[8];fp[4]=R[5];fp[3]=R[7];fp[2]=R[4];R[10]=(word)fp;fp+=7;
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[9];fp[3]=R[7];fp[2]=R[4];R[11]=(word)fp;fp+=5;
-      R[9]=R[5];R[4]=R[6];
-      R[5]=R[10];R[6]=R[11];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 855:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=cons(R[4],R[5]);
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=4;
-      R[5]=G(R[2],4);
-      R[4]=R[6];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 856:
-    if(acc==3){
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[4]=cons(R[6],R[7]);
-      R[6]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-      R[5]=G(R[1],4);
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 857:
-    if(acc==4){
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 858:
-    if(acc==4){
-      R[4]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=R[5];R[5]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 859:
-    if(acc==4){
-      R[7]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[9]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 860:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=F(0);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 861:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 862:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[2],3);
-      R[8]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 863:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[8]=R[4];R[4]=R[5];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 864:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[2],4);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 865:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[10]=(word)fp;fp+=8;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 866:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[8]=(word)fp;fp+=3;
-      R[9]=128*82+258;
-      R[10]=R[7];R[7]=R[6];
-      R[6]=R[5];R[5]=R[4];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 867:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=BOOL(R[3]==R[4]);
-      R[6]=G(R[1],3);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-      if(R[5]==IFALSE){
-        R[8]=G(R[2],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[8];acc=1;
-      }else{
-        R[3]=R[5];
-        ob=(word*)R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 868:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=F(0);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 869:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[3]=(word)fp;fp+=3;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 870:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 871:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[3]=BOOL(R[3]==R[4]);
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 872:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 873:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 874:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*16+258;
-      R[6]=F(0);
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 875:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=128*80+258;
-      R[7]=128*0+258;
-      R[9]=R[5];R[5]=R[4];
-      R[4]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 876:
-    if(acc==2){
-      R[5]=IFALSE;
-      R[6]=prim_sys(R[4],R[5],R[5],R[5]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      if(acc==3){
-        R[6]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[5];
-        ob=(word*)R[6];acc=2;
-      }else{
-        if(acc==4){
-          R[7]=G(R[1],2);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],4);fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-          R[4]=R[5];
-          ob=(word*)R[7];acc=2;
-        }else{
-          if(acc==5){
-            R[8]=G(R[1],2);
-            *fp=make_header(6,TCLOS);fp[1]=G(R[1],5);fp[5]=R[3];fp[4]=R[4];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-            R[4]=R[5];
-            ob=(word*)R[8];acc=2;
-          }else{
-            error(61,ob,F(acc));
-          }
-        }
-      }
-    }
-     break;
-   case 877:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[7]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 878:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[3]=prim_sys(R[4],R[5],R[6],R[3]);
-      R[8]=G(R[1],5);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 879:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=IFALSE;
-      R[3]=prim_sys(R[4],R[5],R[3],R[6]);
-      R[8]=G(R[1],4);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 880:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=IFALSE;
-      R[3]=prim_sys(R[4],R[3],R[5],R[5]);
-      R[7]=G(R[1],3);
-      ob=(word*)R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 881:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 882:
-    if(acc==1){
-      R[4]=128*14+258;
-      R[5]=G(R[1],2);
-      R[6]=IFALSE;
-      R[7]=prim_sys(R[4],R[5],R[6],R[6]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 883:
-    if(acc==4){
-      if(R[4]==R[5]){
-        R[7]=ITRUE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 884:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 885:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 886:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        R[8]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[10]=R[4];R[3]=R[5];
-        R[4]=R[7];R[5]=R[8];
-        ob=(word*)R[10];acc=4;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 887:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[1],3);
-        assert(pairp(R[6]),R[6],105);R[7]=G(R[6],1);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],4);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[9];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 888:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 889:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[10]=R[4];R[6]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 890:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=128*80+258;
-        R[8]=cons(R[7],R[5]);
-        R[9]=128*78+258;
-        R[10]=cons(R[9],R[8]);
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 891:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=128*18+258;
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 892:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 893:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],5);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],5);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-        R[6]=128*80+258;
-        R[7]=G(R[1],2);
-        R[8]=cons(R[6],R[7]);
-        R[9]=G(R[1],4);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[9];R[3]=(word)fp;fp+=3;
-        R[4]=G(R[1],3);
-        R[6]=R[5];R[5]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 894:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[3];fp[5]=R[8];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 895:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],6);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[3]=R[6];
-        R[6]=R[4];R[4]=R[7];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[9];fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[5]=G(R[1],3);
-        R[4]=R[6];R[6]=R[7];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 896:
-    if(acc==1){
-      R[4]=128*62+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=128*90+258;
-      R[7]=cons(R[6],R[5]);
-      R[3]=cons(R[4],R[7]);
-      R[9]=G(R[1],2);
-      ob=(word*)R[9];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 897:
-    if(acc==1){
-      assert(pairp(R[3]),R[3],169);R[4]=G(R[3],2);
-      R[5]=128*78+258;
-      R[3]=cons(R[5],R[4]);
-      R[7]=G(R[1],2);
-      ob=(word*)R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 898:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],6);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-        R[7]=G(R[1],3);
-        if(R[7]==IFALSE){
-          R[3]=G(R[2],4);
-          ob=(word*)R[6];acc=1;
-        }else{
-          R[3]=G(R[2],5);
-          ob=(word*)R[6];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 899:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 900:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 901:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],6);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      if(R[3]==IFALSE){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[8];fp[3]=R[5];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        ob=(word*)R[6];acc=2;
-      }else{
-        R[6]=G(R[2],4);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[5];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 902:
-    if(acc==1){
-      R[4]=128*68+258;
-      R[3]=cons(R[4],R[3]);
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 903:
-    if(acc==1){
-      R[4]=128*110+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=128*232+258;
-      R[3]=cons(R[6],R[5]);
-      R[8]=G(R[1],2);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 904:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[1],5);
-        R[5]=G(R[1],3);
-        R[6]=G(R[2],4);
-        R[7]=G(R[1],2);
-        R[9]=R[6];
-        R[6]=R[4];R[3]=R[5];
-        R[5]=R[7];R[4]=R[9];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 905:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=128*0+258;
-        R[6]=prim_ref(R[4],R[5]);
-        R[7]=128*184+258;
-        R[8]=G(R[1],2);
-        R[9]=cons(R[7],R[8]);
-        R[10]=G(R[2],4);
-        R[11]=G(R[1],3);
-        R[12]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[12];fp[5]=R[4];fp[4]=R[11];fp[3]=R[6];fp[2]=R[9];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 906:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],3);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=128*0+258;
-        R[6]=prim_ref(R[4],R[5]);
-        R[7]=128*248+258;
-        R[8]=G(R[1],2);
-        R[9]=cons(R[7],R[8]);
-        R[10]=G(R[2],4);
-        R[11]=G(R[1],3);
-        R[12]=G(R[1],5);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],5);fp[6]=R[12];fp[5]=R[4];fp[4]=R[11];fp[3]=R[6];fp[2]=R[9];R[3]=(word)fp;fp+=7;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 907:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[5]=128*1+258;
-      R[6]=128*0+258;
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 908:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],5);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[6];fp[2]=R[9];R[10]=(word)fp;fp+=4;
-      R[5]=G(R[1],2);
-      R[9]=R[4];R[6]=R[3];
-      R[3]=R[8];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 909:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=prim_ref(R[6],R[5]);
-      R[6]=G(R[1],3);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      R[5]=R[4];R[4]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 910:
-    if(acc==1){
-      R[4]=128*62+258;
-      R[3]=cons(R[4],R[3]);
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 911:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[5]=R[3];R[3]=R[6];
-      R[6]=R[4];R[4]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 912:
-    if(acc==1){
-      R[4]=128*244+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=128*68+258;
-      R[3]=cons(R[6],R[5]);
-      R[8]=G(R[1],2);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 913:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[9]=R[6];
-      R[6]=R[4];R[4]=R[3];
-      R[5]=R[7];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 914:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[7]=R[4];R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 915:
-    if(acc==1){
-      R[4]=128*180+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=128*68+258;
-      R[3]=cons(R[6],R[5]);
-      R[8]=G(R[1],2);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 916:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[7]=R[4];R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 917:
-    if(acc==1){
-      R[4]=128*184+258;
-      R[5]=G(R[1],2);
-      R[6]=cons(R[4],R[5]);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[8];R[9]=(word)fp;fp+=3;
-      R[4]=R[3];R[5]=R[6];
-      R[6]=R[7];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 918:
-    if(acc==1){
-      R[4]=128*62+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=128*198+258;
-      R[7]=cons(R[6],R[5]);
-      R[8]=128*202+258;
-      R[9]=cons(R[8],R[7]);
-      R[10]=128*180+258;
-      R[11]=cons(R[10],R[9]);
-      R[12]=128*68+258;
-      R[3]=cons(R[12],R[11]);
-      R[14]=G(R[1],2);
-      ob=(word*)R[14];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 919:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[2],4);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }else{
-        R[4]=128*80+258;
-        R[5]=G(R[1],2);
-        R[6]=cons(R[4],R[5]);
-        R[7]=128*230+258;
-        R[8]=cons(R[7],R[6]);
-        R[9]=128*196+258;
-        R[10]=cons(R[9],R[8]);
-        R[11]=128*200+258;
-        R[12]=cons(R[11],R[10]);
-        R[13]=128*210+258;
-        R[14]=cons(R[13],R[12]);
-        R[15]=128*194+258;
-        R[16]=cons(R[15],R[14]);
-        R[17]=128*220+258;
-        R[18]=cons(R[17],R[16]);
-        R[19]=128*88+258;
-        R[20]=cons(R[19],R[18]);
-        R[21]=128*202+258;
-        R[22]=cons(R[21],R[20]);
-        R[23]=cons(R[17],R[22]);
-        R[24]=cons(R[11],R[23]);
-        R[25]=128*78+258;
-        R[3]=cons(R[25],R[24]);
-        R[27]=G(R[1],3);
-        ob=(word*)R[27];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 920:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*36+258;
-      if(R[5]==R[6]){
-        R[7]=G(R[1],2);
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[5]=INULL;
-        R[6]=R[4];R[4]=R[8];
-        ob=(word*)R[7];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 921:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[7]=(word)fp;fp+=5;
-      R[5]=G(R[2],4);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 922:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],2);
-        if(R[4]==F(0)){
-          R[5]=G(R[1],4);
-          R[3]=INULL;
-          ob=(word*)R[5];acc=1;
-        }else{
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],3);
-          R[7]=G(R[1],4);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[9]=128*0+258;
-          R[10]=R[5];R[5]=R[9];
-          ob=(word*)R[10];acc=3;
-        }
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[5]=128*0+258;
-        R[10]=R[4];R[4]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 923:
-    if(acc==4){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*62+258;
-      if(R[8]==R[7]){
-        R[9]=INULL;
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        R[9]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[4];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 924:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 925:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*28+258;
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*36+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=128*20+258;
-          R[13]=BOOL(R[7]==R[12]);
-          if(R[13]==IFALSE){
-            ob=(word*)R[3];R[3]=R[5];acc=1;
-          }else{
-            R[14]=G(R[1],2);
-            *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-            ob=(word*)R[14];acc=2;
-          }
-        }else{
-          if(immediatep(R[4])){R[12]=IFALSE;}else{hval h=V(R[4]);R[12]=rawp(h)?F(payl_len(h)):IFALSE;}          R[13]=G(R[1],4);
-          R[6]=R[5];R[5]=R[12];
-          ob=(word*)R[13];acc=4;
-        }
-      }else{
-        R[10]=128*0+258;
-        R[4]=prim_ref(R[4],R[10]);
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 926:
-    if(acc==5){
-      R[8]=128*0+258;
-      if(R[5]==R[8]){
-        R[9]=prim_ref(R[4],R[5]);
-        R[10]=cons(R[9],R[6]);
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }else{
-        R[9]=prim_ref(R[4],R[5]);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],2);fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=6;
-        R[11]=cons(R[9],R[10]);
-        ob=(word*)R[3];R[3]=R[11];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 927:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=128*0+258;
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 928:
-    if(acc==5){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-        R[10]=128*0+258;
-        R[4]=R[5];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 929:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=prim_ref(R[4],R[3]);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[4];fp[3]=R[3];fp[2]=R[6];R[8]=(word)fp;fp+=6;
-      R[3]=cons(R[5],R[8]);
-      R[10]=G(R[1],2);
-      ob=(word*)R[10];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 930:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 931:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 932:
-    if(acc==2){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 933:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[6];fp[4]=R[4];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[4]=G(R[1],2);
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 934:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[8];fp[3]=R[7];fp[2]=R[6];R[9]=(word)fp;fp+=5;
-      R[8]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 935:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 936:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[8]=(word)fp;fp+=6;
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 937:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],5);
-        R[3]=INULL;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[9]=R[6];
-        R[6]=R[4];R[3]=R[5];
-        R[5]=R[7];R[4]=R[9];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 938:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*28+258;
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*36+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          ob=(word*)R[3];R[3]=R[5];acc=1;
-        }else{
-          if(immediatep(R[4])){R[12]=IFALSE;}else{hval h=V(R[4]);R[12]=rawp(h)?F(payl_len(h)):IFALSE;}          if(R[12]==F(0)){
-            ob=(word*)R[3];R[3]=R[5];acc=1;
-          }else{
-            R[13]=G(R[1],2);
-            *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-            R[5]=128*0+258;
-            R[4]=R[12];
-            ob=(word*)R[13];acc=3;
-          }
-        }
-      }else{
-        R[10]=128*0+258;
-        R[4]=prim_ref(R[4],R[10]);
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 939:
-    if(acc==5){
-      if(R[5]==F(0)){
-        R[8]=prim_ref(R[4],R[5]);
-        R[9]=cons(R[8],R[6]);
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        R[8]=128*0+258;
-        {hval r=immval(R[5])-immval(R[8]);R[10]=F(r>>FBITS&1);R[9]=F(r);}
-        R[11]=prim_ref(R[4],R[5]);
-        R[6]=cons(R[11],R[6]);
-        R[5]=R[9];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 940:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*36+258;
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*20+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*28+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=IFALSE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }else{
-            R[12]=ITRUE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }else{
-          R[10]=ITRUE;
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }
-      }else{
-        R[8]=ITRUE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 941:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],4);
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 942:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[5]=R[3];R[6]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 943:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*36+258;
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*28+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*20+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            {word ob=R[4];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-            R[13]=INULL;
-            R[14]=cons(R[12],R[13]);
-            R[15]=G(R[1],5);
-            R[16]=cons(R[15],R[14]);
-            R[17]=G(R[1],4);
-            R[18]=cons(R[17],R[16]);
-            R[5]=cons(R[4],R[18]);
-            R[20]=G(R[1],2);
-            R[4]=G(R[1],3);
-            ob=(word*)R[20];acc=3;
-          }else{
-            R[12]=G(R[1],6);
-            ob=(word*)R[12];acc=2;
-          }
-        }else{
-          R[10]=128*2+258;
-          R[11]=prim_ref(R[4],R[10]);
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }
-      }else{
-        if(immediatep(R[4])){R[8]=IFALSE;}else{hval h=V(R[4]);R[8]=rawp(h)?F(payl_len(h)):IFALSE;}        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 944:
-    if(acc==3){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*78+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=G(R[1],2);
-          R[4]=G(R[1],3);
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[11]=G(R[1],4);
-          ob=(word*)R[11];acc=3;
-        }
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=128*36+258;
-        if(R[9]==R[10]){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          R[11]=G(R[1],6);
-          R[12]=prim_less(R[5],R[11]);
-          if(R[12]==IFALSE){
-            R[13]=G(R[1],5);
-            ob=(word*)R[13];acc=3;
-          }else{
-            ob=(word*)R[3];R[3]=R[4];acc=1;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 945:
-    if(acc==3){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*78+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=G(R[1],2);
-          R[4]=G(R[1],3);
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[11]=G(R[1],4);
-          ob=(word*)R[11];acc=3;
-        }
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=128*36+258;
-        if(R[9]==R[10]){
-          R[11]=prim_ref(R[4],R[5]);
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }else{
-          R[11]=G(R[1],8);
-          R[12]=prim_less(R[5],R[11]);
-          if(R[12]==IFALSE){
-            R[13]=G(R[1],5);
-            *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-            ob=(word*)R[13];acc=3;
-          }else{
-            R[13]=G(R[1],7);
-            ob=(word*)R[13];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 946:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[2],3);
-      R[6]=R[4]&R[5];
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[4]=R[3];
-      R[5]=R[6];R[3]=R[8];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 947:
-    if(acc==3){
-      R[6]=128*2+258;
-      R[7]=prim_ref(R[5],R[6]);
-      R[8]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 948:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[4];R[9]=(word)fp;fp+=4;
-      R[4]=R[3];
-      R[5]=R[6];R[3]=R[9];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 949:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*36+258;
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*28+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=128*20+258;
-          R[13]=BOOL(R[7]==R[12]);
-          if(R[13]==IFALSE){
-            {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-            R[15]=G(R[1],2);
-            R[4]=G(R[1],3);
-            ob=(word*)R[15];acc=3;
-          }else{
-            R[14]=G(R[1],4);
-            if(R[5]==R[14]){
-              R[15]=G(R[1],5);
-              R[16]=prim_ref(R[4],R[15]);
-              ob=(word*)R[3];R[3]=R[16];acc=1;
-            }else{
-              R[15]=R[5]&R[14];
-              R[16]=128*0+258;
-              {hval r=immval(R[15])+immval(R[16]);R[18]=F(r>>FBITS);R[17]=F(r);}
-              R[19]=prim_ref(R[4],R[17]);
-              ob=(word*)R[3];R[3]=R[19];acc=1;
-            }
-          }
-        }else{
-          R[12]=128*0+258;
-          R[4]=prim_ref(R[4],R[12]);
-          ob=(word*)R[6];acc=4;
-        }
-      }else{
-        R[10]=G(R[1],4);
-        R[11]=R[5]&R[10];
-        R[12]=prim_ref(R[4],R[11]);
-        ob=(word*)R[3];R[3]=R[12];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 950:
-    if(acc==4){
-      {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];}
-      if(R[8]==INULL){
-        R[9]=G(R[1],5);
-        R[10]=prim_less(R[7],R[9]);
-        if(R[10]==IFALSE){
-          R[11]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-          R[5]=R[7];
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[11]=G(R[1],4);
-          R[5]=R[7];
-          ob=(word*)R[11];acc=3;
-        }
-      }else{
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-        R[5]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 951:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*28+258;
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*20+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-          R[12]=G(R[1],2);
-          R[4]=G(R[1],3);
-          ob=(word*)R[12];acc=3;
-        }else{
-          R[11]=G(R[1],2);
-          R[12]=G(R[1],4);
-          R[5]=R[4];R[4]=R[12];
-          ob=(word*)R[11];acc=3;
-        }
-      }else{
-        R[9]=128*22+258;
-        {hval x=immval(R[5]);uint n=immval(R[9]);R[10]=F(x>>n);R[11]=F(x<<(FBITS-n));}
-        R[12]=128*2+258;
-        {hval r=immval(R[10])+immval(R[12]);R[14]=F(r>>FBITS);R[13]=F(r);}
-        R[15]=prim_ref(R[4],R[13]);
-        ob=(word*)R[3];R[3]=R[15];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 952:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*28+258;
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-        R[10]=G(R[1],2);
-        R[4]=G(R[1],3);
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[9]=G(R[1],4);
-        R[10]=R[5]&R[9];
-        R[11]=128*2+258;
-        {hval r=immval(R[10])+immval(R[11]);R[13]=F(r>>FBITS);R[12]=F(r);}
-        R[14]=prim_ref(R[4],R[12]);
-        ob=(word*)R[3];R[3]=R[14];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 953:
-    if(acc==2){
-      ob=(word*)R[3];R[3]=R[4];acc=1;
-    }else{
-      if(acc==3){
-        if(immediatep(R[4])){R[6]=IFALSE;}else{hval h=V(R[4]);R[6]=rawp(h)?F(payl_len(h)):IFALSE;}        R[7]=G(R[1],2);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[8]=(word)fp;fp+=3;
-        R[9]=INULL;
-        R[10]=R[7];
-        R[3]=R[8];R[7]=R[9];
-        ob=(word*)R[10];acc=5;
-      }else{
-        if(acc==4){
-          R[7]=G(R[1],2);
-          *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[3];R[8]=(word)fp;fp+=3;
-          R[9]=INULL;
-          R[10]=R[7];
-          R[3]=R[8];R[7]=R[9];
-          ob=(word*)R[10];acc=5;
-        }else{
-          error(61,ob,F(acc));
-        }
-      }
-    }
-     break;
-   case 954:
-    if(acc==3){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        if(immediatep(R[6])){R[8]=IFALSE;}else{hval h=V(R[6]);R[8]=rawp(h)?F(payl_len(h)):IFALSE;}        *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[3];fp[3]=R[6];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-        R[4]=R[7];
-        ob=(word*)R[5];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 955:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=F(0);
-      R[8]=G(R[1],2);
-      R[10]=R[4];
-      R[11]=R[5];R[5]=R[7];
-      R[7]=R[3];R[4]=R[6];
-      R[6]=R[8];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 956:
-    if(acc==6){
-      R[9]=prim_less(R[5],R[6]);
-      if(R[9]==IFALSE){
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        R[10]=128*0+258;
-        {hval r=immval(R[6])-immval(R[10]);R[12]=F(r>>FBITS&1);R[11]=F(r);}
-        R[13]=prim_ref(R[4],R[11]);
-        R[7]=cons(R[13],R[7]);
-        R[6]=R[11];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 957:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*36+258;
-      R[7]=BOOL(R[5]==R[6]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 958:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*22+258;
-      R[7]=BOOL(R[5]==R[6]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 959:
-    if(acc==2){
-      R[5]=ITRUE;
-      R[6]=BOOL(R[4]==R[5]);
-      if(R[6]==IFALSE){
-        R[7]=IFALSE;
-        R[8]=BOOL(R[4]==R[7]);
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 960:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[3]=R[5];
-      ob=(word*)R[4];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 961:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[7]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 962:
-    if(acc==3){
-      R[6]=128*0+258;
-      R[4]=prim_ref(R[4],R[6]);
-      R[8]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[5]=G(R[1],4);
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 963:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=128*246+258;
-        R[5]=G(R[1],2);
-        R[6]=cons(R[4],R[5]);
-        R[3]=cons(R[4],R[6]);
-        R[8]=G(R[1],4);
-        ob=(word*)R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 964:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=128*246+258;
-        R[5]=G(R[1],2);
-        R[6]=cons(R[4],R[5]);
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],4);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[8];R[3]=(word)fp;fp+=3;
-        R[4]=G(R[1],3);
-        R[5]=R[6];
-        ob=(word*)R[7];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 965:
-    if(acc==1){
-      R[4]=128*246+258;
-      R[3]=cons(R[4],R[3]);
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 966:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*6+258;
-      R[7]=BOOL(R[5]==R[6]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 967:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 968:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 969:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-        R[6]=128*32+258;
-        R[7]=BOOL(R[5]==R[6]);
-        if(R[7]==IFALSE){
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-          R[9]=128*34+258;
-          R[3]=BOOL(R[8]==R[9]);
-          R[11]=G(R[1],3);
-          ob=(word*)R[11];acc=1;
-        }else{
-          R[8]=G(R[1],3);
-          R[3]=R[7];
-          ob=(word*)R[8];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 970:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*30+258;
-      R[7]=BOOL(R[6]==R[5]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 971:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[7]=(word)fp;fp+=3;
-      R[8]=G(R[1],4);
-      R[9]=R[6];
-      R[6]=R[5];R[5]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 972:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 973:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 974:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[5]=IFALSE;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 975:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 976:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 977:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 978:
-    if(acc==2){
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[4];R[5]=(word)fp;fp+=4;
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*4+258;
-      if(R[6]==R[7]){
-        R[3]=G(R[1],2);
-        ob=(word*)R[5];acc=1;
-      }else{
-        R[3]=G(R[1],3);
-        ob=(word*)R[5];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 979:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[2],4);
-      R[8]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      R[5]=R[7];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 980:
-    if(acc==1){
-      R[4]=128*4+258;
-      R[3]=prim_lraw(R[3],R[4]);      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 981:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[7]=R[4];R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 982:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 983:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 984:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        if(R[4]==INULL){
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],3);
-          R[7]=G(R[1],4);
-          R[8]=G(R[1],5);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-          R[4]=R[6];
-          ob=(word*)R[5];acc=2;
-        }else{
-          R[5]=G(R[1],3);
-          R[6]=G(R[1],4);
-          R[7]=G(R[1],5);
-          *fp=make_header(5,TPROC);fp[1]=G(R[2],4);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[4];acc=1;
-        }
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[7]=R[4];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 985:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        if(R[4]==INULL){
-          R[5]=G(R[1],4);
-          R[3]=IFALSE;
-          ob=(word*)R[5];acc=1;
-        }else{
-          R[5]=G(R[1],2);
-          R[6]=G(R[1],4);
-          R[7]=G(R[1],5);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[4];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[1],3);
-        assert(pairp(R[6]),R[6],105);R[7]=G(R[6],1);
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],4);
-        R[10]=G(R[1],5);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],4);fp[5]=R[10];fp[4]=R[9];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=R[5];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 986:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 987:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[8]=(word)fp;fp+=6;
-      if(R[3]==IFALSE){
-        R[3]=IFALSE;
-        ob=(word*)R[8];acc=1;
-      }else{
-        assert(pairp(R[5]),R[5],105);R[9]=G(R[5],1);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[11]=G(R[2],2);
-        R[3]=R[8];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 988:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        R[6]=G(R[1],3);
-        assert(pairp(R[6]),R[6],169);R[7]=G(R[6],2);
-        R[6]=G(R[1],5);
-        R[3]=G(R[1],4);
-        R[4]=R[5];R[5]=R[7];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 989:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        if(R[4]==INULL){
-          R[5]=G(R[1],4);
-          R[3]=ITRUE;
-          ob=(word*)R[5];acc=1;
-        }else{
-          R[5]=G(R[1],3);
-          R[6]=G(R[1],4);
-          R[7]=G(R[1],5);
-          *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[4];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 990:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],4);
-      R[8]=INULL;
-      R[9]=R[5];
-      R[3]=R[6];R[6]=R[4];
-      R[4]=R[7];R[5]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 991:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[7]=F(0);
-      R[8]=ITRUE;
-      R[11]=R[5];R[12]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      R[5]=R[12];R[8]=R[12];
-      ob=(word*)R[11];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 992:
-    if(acc==7){
-      if(R[4]==INULL){
-        R[10]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=4;
-        R[4]=R[5];
-        R[5]=R[6];R[6]=R[7];
-        ob=(word*)R[10];acc=4;
-      }else{
-        R[10]=G(R[1],4);
-        if(R[6]==R[10]){
-          R[11]=G(R[1],2);
-          *fp=make_header(6,TPROC);fp[1]=G(R[1],5);fp[5]=R[9];fp[4]=R[3];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-          R[4]=R[5];
-          R[5]=R[6];R[6]=R[7];
-          ob=(word*)R[11];acc=4;
-        }else{
-          R[11]=G(R[1],6);
-          *fp=make_header(9,TCLOS);fp[1]=G(R[1],7);fp[8]=R[9];fp[7]=R[3];fp[6]=R[4];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-          ob=(word*)R[11];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 993:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(8,TPROC);fp[1]=G(R[2],2);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],5);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[11]=(word)fp;fp+=9;
-        if(R[6]==IFALSE){
-          R[3]=IFALSE;
-          ob=(word*)R[11];acc=1;
-        }else{
-          assert(pairp(R[8]),R[8],105);R[12]=G(R[8],1);
-          R[13]=G(R[2],3);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[11];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-          R[4]=128*254+258;
-          R[5]=R[12];
-          ob=(word*)R[13];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 994:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],4);
-        R[10]=G(R[1],5);
-        R[11]=G(R[1],7);
-        R[12]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[12];fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[7];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-        R[4]=R[5];
-        ob=(word*)R[6];acc=2;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],6);
-        R[7]=G(R[1],7);
-        R[8]=G(R[1],8);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[13]=R[4];R[4]=R[10];
-        ob=(word*)R[13];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 995:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],7);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],3);
-        R[8]=cons(R[5],R[7]);
-        R[9]=G(R[2],2);
-        R[10]=G(R[1],5);
-        R[11]=G(R[1],6);
-        R[12]=G(R[1],7);
-        R[13]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[13];fp[7]=R[12];fp[6]=R[6];fp[5]=R[8];fp[4]=R[11];fp[3]=R[10];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        R[4]=G(R[1],4);
-        R[5]=128*0+258;
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 996:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],7);
-      R[8]=G(R[1],8);
-      *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[8];fp[6]=R[7];fp[5]=R[6];fp[4]=R[5];fp[3]=R[3];fp[2]=R[4];R[9]=(word)fp;fp+=8;
-      R[10]=G(R[1],3);
-      if(R[10]==IFALSE){
-        R[3]=IFALSE;
-        ob=(word*)R[9];acc=1;
-      }else{
-        R[11]=G(R[2],2);
-        R[4]=G(R[1],2);
-        R[5]=128*254+258;
-        R[3]=R[9];
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 997:
-    if(acc==1){
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[6];
-      R[13]=R[5];R[5]=R[7];
-      R[7]=R[3];R[6]=R[8];
-      R[8]=R[9];R[9]=R[4];
-      R[4]=R[12];R[3]=R[13];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 998:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=128*510+258;
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 999:
-    if(acc==1){
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],6);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[12]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      R[8]=R[9];R[9]=R[4];
-      R[4]=R[3];R[3]=R[12];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1000:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=cons(R[3],R[4]);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=INULL;
-      R[10]=F(0);
-      R[11]=ITRUE;
-      R[4]=R[8];
-      R[8]=R[5];R[5]=R[9];
-      R[9]=R[6];R[3]=R[7];
-      R[6]=R[10];R[7]=R[11];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1001:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=cons(R[3],R[4]);
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[7];R[3]=(word)fp;fp+=3;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1002:
-    if(acc==4){
-      if(R[6]==IFALSE){
-        R[7]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1003:
-    if(acc==1){
-      R[4]=128*4+258;
-      R[5]=prim_lraw(R[3],R[4]);      if(R[5]==IFALSE){
-        R[6]=G(R[2],2);
-        R[3]=G(R[1],3);
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],2);
-        ob=(word*)R[6];acc=3;
-      }else{
-        R[6]=G(R[1],3);
-        R[3]=R[5];
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1004:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[5];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1005:
-    if(acc==1){
-      R[4]=128*0+258;
-      if(R[3]==R[4]){
-        R[5]=G(R[1],2);
-        assert(pairp(R[5]),R[5],105);R[3]=G(R[5],1);
-        R[7]=G(R[1],3);
-        ob=(word*)R[7];acc=1;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[9]=(word)fp;fp+=6;
-        R[10]=128*6+258;
-        R[8]=R[5];R[4]=R[3];
-        R[3]=R[9];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1006:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[5]=128*0+258;
-        R[10]=R[4];R[4]=R[8];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[5]=128*2+258;
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1007:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1008:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[8]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1009:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[8]=R[5];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1010:
-    if(acc==2){
-      R[5]=INULL;
-      R[6]=cons(R[4],R[5]);
-      R[7]=cons(R[3],R[6]);
-      R[8]=G(R[1],2);
-      R[9]=cons(R[8],R[7]);
-      R[10]=G(R[1],3);
-      R[5]=cons(R[10],R[9]);
-      R[12]=G(R[2],2);
-      R[13]=G(R[1],4);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[13];R[3]=(word)fp;fp+=3;
-      R[15]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[15];R[4]=(word)fp;fp+=3;
-      ob=(word*)R[12];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1011:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[2],4);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1012:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[2],4);
-      R[5]=F(0);
-      R[10]=R[4];R[6]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1013:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[2],4);
-      R[9]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1014:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[2],4);
-      R[5]=F(0);
-      R[11]=R[4];R[6]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1015:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1016:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*4+258;
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*42+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=128*40+258;
-          R[13]=BOOL(R[7]==R[12]);
-          if(R[13]==IFALSE){
-            R[14]=G(R[1],2);
-            R[15]=G(R[1],3);
-            R[5]=R[4];R[4]=R[15];
-            ob=(word*)R[14];acc=3;
-          }else{
-            *fp=make_header(5,TCLOS);fp[1]=G(R[1],6);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[14]=(word)fp;fp+=5;
-            R[15]=G(R[1],4);
-            *fp=make_header(4,TPROC);fp[1]=G(R[1],5);fp[3]=R[14];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-            ob=(word*)R[15];acc=2;
-          }
-        }else{
-          R[12]=G(R[1],4);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],7);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[12];acc=2;
-        }
-      }else{
-        R[10]=G(R[1],8);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],9);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1017:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-        R[5]=128*0+258;
-        R[10]=R[4];
-        R[4]=R[3];R[3]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1018:
-    if(acc==3){
-      R[6]=128*2+258;
-      if(R[4]==R[6]){
-        R[7]=G(R[1],2);
-        R[4]=prim_ref(R[7],R[6]);
-        R[6]=G(R[1],4);
-        R[5]=G(R[1],3);
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[7]=G(R[1],2);
-        R[8]=prim_ref(R[7],R[4]);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[5];fp[2]=R[4];R[5]=(word)fp;fp+=4;
-        R[4]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1019:
-    if(acc==5){
-      R[8]=128*0+258;
-      if(R[6]==R[8]){
-        R[9]=prim_ref(R[4],R[6]);
-        R[10]=cons(R[9],R[5]);
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }else{
-        R[9]=prim_ref(R[4],R[6]);
-        *fp=make_header(6,TPROC);fp[1]=G(R[1],2);fp[5]=R[7];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[10]=(word)fp;fp+=6;
-        R[11]=cons(R[9],R[10]);
-        ob=(word*)R[3];R[3]=R[11];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1020:
-    if(acc==5){
-      if(R[6]==F(0)){
-        R[8]=prim_ref(R[4],R[6]);
-        R[9]=cons(R[8],R[5]);
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        R[8]=prim_ref(R[4],R[6]);
-        *fp=make_header(6,TPROC);fp[1]=G(R[1],2);fp[5]=R[7];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-        R[10]=cons(R[8],R[9]);
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1021:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      {hval r=immval(R[4])-immval(R[5]);R[7]=F(r>>FBITS&1);R[6]=F(r);}
-      R[8]=G(R[1],5);
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[7]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1022:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*4+258;
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*42+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=128*40+258;
-          R[13]=BOOL(R[7]==R[12]);
-          if(R[13]==IFALSE){
-            R[14]=G(R[1],2);
-            R[15]=G(R[1],3);
-            R[5]=R[4];R[4]=R[15];
-            ob=(word*)R[14];acc=3;
-          }else{
-            *fp=make_header(5,TCLOS);fp[1]=G(R[1],4);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[5]=(word)fp;fp+=5;
-            R[4]=128*2+258;
-            ob=(word*)R[5];acc=3;
-          }
-        }else{
-          R[12]=G(R[1],5);
-          R[6]=128*0+258;
-          ob=(word*)R[12];acc=4;
-        }
-      }else{
-        R[10]=G(R[1],6);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],7);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1023:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=F(0);
-        R[10]=R[4];
-        R[11]=R[5];R[5]=R[7];
-        R[7]=R[3];R[4]=R[6];
-        R[6]=R[8];R[3]=R[11];
-        ob=(word*)R[10];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1024:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],4);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[5];fp[6]=R[4];fp[5]=R[9];fp[4]=R[3];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=8;
-      R[4]=R[7];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1025:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      if(R[4]==R[3]){
-        R[5]=G(R[1],2);
-        R[6]=prim_ref(R[5],R[4]);
-        R[7]=G(R[1],5);
-        R[3]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[4]=R[6];R[6]=R[7];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[5]=G(R[1],2);
-        R[6]=prim_ref(R[5],R[4]);
-        R[7]=G(R[1],5);
-        R[3]=G(R[1],4);
-        R[9]=G(R[1],7);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[9];fp[2]=R[4];R[5]=(word)fp;fp+=4;
-        R[4]=R[6];R[6]=R[7];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1026:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1027:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      if(R[4]==R[3]){
-        R[5]=G(R[1],5);
-        R[6]=prim_ref(R[5],R[4]);
-        R[7]=G(R[1],4);
-        R[3]=cons(R[6],R[7]);
-        R[9]=G(R[1],2);
-        ob=(word*)R[9];acc=1;
-      }else{
-        R[5]=G(R[1],5);
-        R[6]=prim_ref(R[5],R[4]);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[5];fp[3]=R[7];fp[2]=R[4];R[9]=(word)fp;fp+=6;
-        R[3]=cons(R[6],R[9]);
-        R[11]=G(R[1],2);
-        ob=(word*)R[11];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1028:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      {hval r=immval(R[4])+immval(R[5]);R[7]=F(r>>FBITS);R[6]=F(r);}
-      R[8]=G(R[1],5);
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[7]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1029:
-    if(acc==6){
-      if(R[6]==R[7]){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[9]=prim_ref(R[4],R[6]);
-        *fp=make_header(7,TPROC);fp[1]=G(R[1],2);fp[6]=R[8];fp[5]=R[4];fp[4]=R[5];fp[3]=R[7];fp[2]=R[6];R[10]=(word)fp;fp+=7;
-        R[11]=cons(R[9],R[10]);
-        ob=(word*)R[3];R[3]=R[11];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1030:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      {hval r=immval(R[4])+immval(R[5]);R[7]=F(r>>FBITS);R[6]=F(r);}
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[4]=R[9];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1031:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*4+258;
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*42+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*40+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=G(R[1],2);
-            R[13]=G(R[1],3);
-            R[5]=R[4];R[4]=R[13];
-            ob=(word*)R[12];acc=3;
-          }else{
-            R[12]=128*0+258;
-            R[13]=prim_ref(R[4],R[12]);
-            ob=(word*)R[3];R[3]=R[13];acc=1;
-          }
-        }else{
-          R[10]=G(R[1],4);
-          ob=(word*)R[10];acc=2;
-        }
-      }else{
-        if(immediatep(R[4])){R[8]=IFALSE;}else{hval h=V(R[4]);R[8]=rawp(h)?F(payl_len(h)):IFALSE;}        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1032:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*4+258;
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*42+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*40+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=IFALSE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }else{
-            R[12]=ITRUE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }else{
-          R[10]=ITRUE;
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }
-      }else{
-        R[8]=ITRUE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1033:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=INULL;
-      R[9]=R[4];R[10]=R[5];
-      R[5]=R[3];R[4]=R[6];
-      R[6]=R[7];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1034:
-    if(acc==5){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=128*0+258;
-        {hval r=immval(R[5])-immval(R[8]);R[10]=F(r>>FBITS&1);R[9]=F(r);}
-        R[11]=prim_ref(R[4],R[5]);
-        R[6]=cons(R[11],R[6]);
-        R[5]=R[9];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1035:
-    if(acc==1){
-      R[4]=128*0+258;
-      {hval r=immval(R[3])-immval(R[4]);R[6]=F(r>>FBITS&1);R[5]=F(r);}
-      if(R[6]==F(0)){
-        R[7]=G(R[1],2);
-        R[3]=R[5];
-        ob=(word*)R[7];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1036:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*2+258;
-      R[7]=BOOL(R[5]==R[6]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1037:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[11]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      R[7]=R[8];R[8]=R[4];
-      R[4]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1038:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      R[5]=128*254+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1039:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[2],4);
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[3]=cons(R[4],R[5]);
-        R[7]=G(R[1],4);
-        ob=(word*)R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1040:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[2],4);
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[2],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],6);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=128*10+258;
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1041:
-    if(acc==1){
-      R[4]=128*60+258;
-      R[5]=R[3]&R[4];
-      R[6]=128*382+258;
-      R[7]=R[5]|R[6];
-      R[8]=G(R[2],2);
-      R[9]=G(R[1],3);
-      R[10]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[10];fp[3]=R[7];fp[2]=R[9];R[3]=(word)fp;fp+=5;
-      R[4]=G(R[1],2);
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1042:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=cons(R[3],R[4]);
-      R[6]=G(R[1],3);
-      R[3]=cons(R[6],R[5]);
-      R[8]=G(R[1],4);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1043:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[2],4);
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[2],5);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],6);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=128*22+258;
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1044:
-    if(acc==1){
-      R[4]=128*28+258;
-      R[5]=R[3]&R[4];
-      R[6]=128*446+258;
-      R[7]=R[5]|R[6];
-      R[8]=G(R[2],2);
-      R[4]=G(R[1],2);
-      R[10]=G(R[1],3);
-      R[11]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[11];fp[4]=R[7];fp[3]=R[10];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[5]=128*10+258;
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1045:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[7]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1046:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=cons(R[3],R[4]);
-      R[6]=G(R[1],3);
-      R[7]=cons(R[6],R[5]);
-      R[8]=G(R[1],4);
-      R[3]=cons(R[8],R[7]);
-      R[10]=G(R[1],5);
-      ob=(word*)R[10];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1047:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],5);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=128*34+258;
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1048:
-    if(acc==1){
-      R[4]=128*12+258;
-      R[5]=R[3]&R[4];
-      R[6]=128*478+258;
-      R[7]=R[5]|R[6];
-      R[8]=G(R[2],2);
-      R[4]=G(R[1],2);
-      R[10]=G(R[1],3);
-      R[11]=G(R[1],4);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[11];fp[4]=R[7];fp[3]=R[10];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[5]=128*22+258;
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1049:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=128*10+258;
-      R[8]=R[4];
-      R[4]=R[5];R[5]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1050:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1051:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=cons(R[3],R[4]);
-      R[6]=G(R[1],3);
-      R[7]=cons(R[6],R[5]);
-      R[8]=G(R[1],4);
-      R[9]=cons(R[8],R[7]);
-      R[10]=G(R[1],5);
-      R[3]=cons(R[10],R[9]);
-      R[12]=G(R[1],6);
-      ob=(word*)R[12];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1052:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=128*124+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1053:
-    if(acc==1){
-      R[4]=128*254+258;
-      R[3]=R[4]|R[3];
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1054:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      if(R[5]==F(0)){
-        R[6]=ITRUE;
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-        R[7]=128*78+258;
-        if(R[6]==R[7]){
-          R[8]=G(R[1],2);
-          R[5]=G(R[1],3);
-          ob=(word*)R[8];acc=3;
-        }else{
-          R[8]=IFALSE;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1055:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=128*0+258;
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1056:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1057:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[2],4);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1058:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1059:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1060:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1061:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      R[13]=128*0+258;
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[12];R[4]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1062:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1063:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=F(0);
-      R[9]=R[5];
-      R[5]=R[6];R[6]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1064:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=128*0+258;
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1065:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[11]=R[6];R[12]=R[5];
-      R[5]=R[3];R[6]=R[7];
-      R[7]=R[8];R[8]=R[4];
-      R[4]=R[11];R[3]=R[12];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1066:
-    if(acc==4){
-      if(R[5]==F(0)){
-        R[7]=128*0+258;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        R[7]=128*0+258;
-        if(R[5]==R[7]){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          R[8]=128*2+258;
-          if(R[5]==R[8]){
-            R[9]=G(R[1],2);
-            R[5]=R[4];
-            ob=(word*)R[9];acc=3;
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-            if(R[9]==F(0)){
-              R[10]=G(R[1],3);
-              *fp=make_header(4,TCLOS);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-              R[4]=R[5];R[5]=R[7];
-              ob=(word*)R[10];acc=3;
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-              R[11]=128*78+258;
-              if(R[10]==R[11]){
-                R[12]=G(R[1],3);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-                R[4]=R[5];R[5]=R[7];
-                ob=(word*)R[12];acc=3;
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-                R[13]=128*62+258;
-                if(R[12]==R[13]){
-                  R[14]=G(R[1],6);
-                  *fp=make_header(5,TCLOS);fp[1]=G(R[1],7);fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-                  R[4]=R[5];
-                  ob=(word*)R[14];acc=2;
-                }else{
-                  {word ob=R[5];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-                  R[15]=128*80+258;
-                  if(R[14]==R[15]){
-                    R[16]=G(R[1],6);
-                    *fp=make_header(5,TCLOS);fp[1]=G(R[1],8);fp[4]=R[3];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-                    R[4]=R[5];
-                    ob=(word*)R[16];acc=2;
-                  }else{
-                    R[16]=G(R[1],9);
-                    R[17]=G(R[1],10);
-                    R[6]=R[5];
-                    R[5]=R[4];R[4]=R[17];
-                    ob=(word*)R[16];acc=4;
-                  }
-                }
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1067:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=128*0+258;
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1068:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[9]=R[4];
-      R[10]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1069:
-    if(acc==5){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[10]=128*0+258;
-        R[4]=R[5];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1070:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=G(R[1],3);
-        R[8]=R[4];R[4]=R[5];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],4);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[8]=R[4];
-        R[4]=R[6];R[5]=R[6];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1071:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[5]=128*0+258;
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1072:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1073:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=128*0+258;
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1074:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];R[10]=R[5];
-      R[5]=R[3];R[4]=R[6];
-      R[6]=R[7];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1075:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[5]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1076:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=F(0);
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*62+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*78+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=128*80+258;
-            R[13]=BOOL(R[5]==R[12]);
-            if(R[13]==IFALSE){
-              R[14]=128*82+258;
-              R[15]=BOOL(R[5]==R[14]);
-              if(R[15]==IFALSE){
-                R[16]=128*84+258;
-                R[17]=BOOL(R[5]==R[16]);
-                if(R[17]==IFALSE){
-                  R[18]=IFALSE;
-                  ob=(word*)R[3];R[3]=R[18];acc=1;
-                }else{
-                  R[18]=ITRUE;
-                  ob=(word*)R[3];R[3]=R[18];acc=1;
-                }
-              }else{
-                R[16]=ITRUE;
-                ob=(word*)R[3];R[3]=R[16];acc=1;
-              }
-            }else{
-              R[14]=ITRUE;
-              ob=(word*)R[3];R[3]=R[14];acc=1;
-            }
-          }else{
-            R[12]=ITRUE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }else{
-          R[10]=ITRUE;
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }
-      }else{
-        R[8]=ITRUE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1077:
-    if(acc==3){
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],2);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1078:
-    if(acc==5){
-      if(R[6]==INULL){
-        R[8]=ITRUE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        assert(pairp(R[6]),R[6],105);R[8]=G(R[6],1);
-        *fp=make_header(6,TPROC);fp[1]=G(R[1],2);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1079:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],4);
-        R[4]=G(R[1],3);
-        R[3]=R[8];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1080:
-    if(acc==5){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-      R[9]=128*82+258;
-      if(R[8]==R[9]){
-        R[10]=128*0+258;
-        R[11]=prim_ref(R[4],R[10]);
-        R[12]=128*2+258;
-        R[4]=prim_ref(R[4],R[12]);
-        *fp=make_header(6,TPROC);fp[1]=G(R[1],2);fp[5]=R[7];fp[4]=R[3];fp[3]=R[11];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[7];acc=5;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-        R[11]=128*84+258;
-        if(R[10]==R[11]){
-          {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[12]=ob[1];R[13]=ob[2];}
-          *fp=make_header(6,TPROC);fp[1]=G(R[1],5);fp[5]=R[7];fp[4]=R[3];fp[3]=R[12];fp[2]=R[6];R[14]=(word)fp;fp+=6;
-          R[15]=128*0+258;
-          if(R[13]==R[15]){
-            R[16]=128*208+258;
-            R[17]=cons(R[16],R[5]);
-            R[3]=cons(R[11],R[17]);
-            ob=(word*)R[14];acc=1;
-          }else{
-            R[16]=128*1+258;
-            if(R[13]==R[16]){
-              R[17]=128*208+258;
-              R[18]=cons(R[17],R[5]);
-              R[19]=128*88+258;
-              R[3]=cons(R[19],R[18]);
-              ob=(word*)R[14];acc=1;
-            }else{
-              R[17]=G(R[1],3);
-              *fp=make_header(7,TCLOS);fp[1]=G(R[1],4);fp[6]=R[7];fp[5]=R[14];fp[4]=R[13];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-              R[5]=F(0);
-              R[4]=R[13];
-              ob=(word*)R[17];acc=3;
-            }
-          }
-        }else{
-          R[12]=G(R[1],3);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],6);fp[6]=R[3];fp[5]=R[7];fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-          R[5]=F(0);
-          ob=(word*)R[12];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1081:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=F(0);
-        R[5]=G(R[1],2);
-        R[8]=R[4];R[4]=R[10];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1082:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[5]=R[7];
-      R[7]=R[4];R[4]=R[3];
-      R[3]=R[6];R[6]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1083:
-    if(acc==1){
-      R[4]=128*88+258;
-      R[3]=cons(R[4],R[3]);
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1084:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],4);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],3);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1085:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=128*208+258;
-        R[5]=G(R[1],2);
-        R[6]=cons(R[4],R[5]);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],5);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[8];R[3]=(word)fp;fp+=3;
-        R[4]=G(R[1],4);
-        R[11]=G(R[1],3);
-        R[5]=R[6];R[6]=R[11];
-        ob=(word*)R[7];acc=5;
-      }else{
-        R[4]=128*208+258;
-        R[5]=G(R[1],2);
-        R[6]=cons(R[4],R[5]);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],5);
-        R[4]=G(R[1],4);
-        R[10]=G(R[1],3);
-        R[5]=R[6];
-        R[3]=R[8];R[6]=R[10];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1086:
-    if(acc==1){
-      R[4]=128*84+258;
-      R[3]=cons(R[4],R[3]);
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1087:
-    if(acc==1){
-      R[4]=128*92+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[9]=G(R[1],2);
-      R[3]=R[7];R[7]=R[6];
-      R[4]=R[8];R[6]=R[9];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1088:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[6];R[9]=(word)fp;fp+=3;
-      R[6]=G(R[1],5);
-      R[5]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1089:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[3];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1090:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[2],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[6];R[6]=R[3];
-      R[3]=R[5];R[5]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1091:
-    if(acc==3){
-      R[6]=cons(R[5],R[4]);
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1092:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[7]=128*18+258;
-      R[8]=R[5];
-      R[3]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1093:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[5];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      if(R[3]==IFALSE){
-        R[3]=128*172+258;
-        ob=(word*)R[6];acc=1;
-      }else{
-        R[3]=128*94+258;
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1094:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[5]=G(R[1],2);
-      R[10]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1095:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=128*0+258;
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1096:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[5]=128*0+258;
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1097:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[11]=R[6];R[12]=R[5];
-      R[5]=R[7];R[7]=R[3];
-      R[6]=R[8];R[8]=R[4];
-      R[4]=R[11];R[3]=R[12];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1098:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1099:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1100:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1101:
-    if(acc==3){
-      if(R[5]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        assert(pairp(R[5]),R[5],169);R[6]=G(R[5],2);
-        if(R[6]==INULL){
-          ob=(word*)R[3];R[3]=R[5];acc=1;
-        }else{
-          R[7]=G(R[1],2);
-          ob=(word*)R[7];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1102:
-    if(acc==3){
-      if(R[5]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[7]=(word)fp;fp+=4;
-        R[8]=INULL;
-        R[9]=F(0);
-        R[10]=R[6];R[3]=R[7];
-        R[6]=R[8];R[7]=R[9];
-        ob=(word*)R[10];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1103:
-    if(acc==1){
-      assert(pairp(R[3]),R[3],169);R[4]=G(R[3],2);
-      if(R[4]==INULL){
-        R[3]=G(R[3],1);
-        R[6]=G(R[1],3);
-        ob=(word*)R[6];acc=1;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],3);
-        R[4]=G(R[1],2);
-        R[8]=R[5];
-        R[5]=R[3];R[3]=R[6];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1104:
-    if(acc==4){
-      assert(pairp(R[5]),R[5],169);R[7]=G(R[5],2);
-      if(R[7]==INULL){
-        R[8]=G(R[5],1);
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        R[8]=G(R[1],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1105:
-    if(acc==6){
-      if(R[5]==INULL){
-        if(R[6]==INULL){
-          ob=(word*)R[3];R[3]=R[6];acc=1;
-        }else{
-          R[9]=INULL;
-          R[10]=cons(R[6],R[9]);
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }
-      }else{
-        R[9]=128*18+258;
-        if(R[7]==R[9]){
-          assert(pairp(R[5]),R[5],169);R[10]=G(R[5],2);
-          R[11]=G(R[5],1);
-          R[12]=INULL;
-          R[13]=cons(R[11],R[12]);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          R[7]=128*0+258;
-          R[5]=R[10];R[6]=R[13];
-          ob=(word*)R[8];acc=6;
-        }else{
-          R[10]=128*0+258;
-          {hval r=immval(R[7])+immval(R[10]);R[12]=F(r>>FBITS);R[11]=F(r);}
-          assert(pairp(R[5]),R[5],169);R[13]=G(R[5],2);
-          R[5]=G(R[5],1);
-          R[15]=G(R[1],3);
-          *fp=make_header(7,TPROC);fp[1]=G(R[1],4);fp[6]=R[8];fp[5]=R[3];fp[4]=R[4];fp[3]=R[13];fp[2]=R[11];R[3]=(word)fp;fp+=7;
-          R[9]=R[6];
-          R[6]=R[4];R[4]=R[9];
-          ob=(word*)R[15];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1106:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[11]=R[5];
-      R[5]=R[7];R[7]=R[8];
-      R[8]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[11];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1107:
-    if(acc==4){
-      if(R[5]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        assert(pairp(R[5]),R[5],105);R[7]=G(R[5],1);
-        R[8]=G(R[5],2);
-        if(R[8]==INULL){
-          R[9]=INULL;
-          R[10]=cons(R[7],R[9]);
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }else{
-          assert(pairp(R[8]),R[8],105);R[9]=G(R[8],1);
-          R[10]=G(R[8],2);
-          R[11]=G(R[1],2);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[10];R[3]=(word)fp;fp+=6;
-          R[5]=R[7];R[6]=R[9];
-          ob=(word*)R[11];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1108:
-    if(acc==5){
-      if(R[5]==INULL){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        if(R[6]==INULL){
-          ob=(word*)R[3];R[3]=R[5];acc=1;
-        }else{
-          assert(pairp(R[6]),R[6],105);R[8]=G(R[6],1);
-          assert(pairp(R[5]),R[5],105);R[9]=G(R[5],1);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],2);fp[6]=R[3];fp[5]=R[7];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-          R[11]=R[4];
-          R[4]=R[8];R[5]=R[9];
-          ob=(word*)R[11];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1109:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[4]=G(R[1],4);
-        R[11]=G(R[1],2);
-        R[5]=R[6];R[6]=R[11];
-        ob=(word*)R[7];acc=5;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1110:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=INULL;
-        R[9]=cons(R[5],R[8]);
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        assert(pairp(R[4]),R[4],105);R[8]=G(R[4],1);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],2);fp[6]=R[3];fp[5]=R[7];fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1111:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[5]=G(R[1],4);
-        R[11]=G(R[1],3);
-        R[4]=R[6];R[6]=R[11];
-        ob=(word*)R[7];acc=5;
-      }else{
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],2);
-        R[3]=cons(R[4],R[5]);
-        R[7]=G(R[1],6);
-        ob=(word*)R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1112:
-    if(acc==3){
-      if(R[4]==INULL){
-        R[6]=IFALSE;
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[5];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1113:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1114:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=F(0);
-      R[7]=R[5];R[5]=R[6];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1115:
-    if(acc==3){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1116:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[5];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1117:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=128*0+258;
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1118:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=G(R[2],4);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1119:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1120:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[5]=128*0+258;
-      R[9]=R[4];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1121:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[10]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      R[7]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1122:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1123:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        if(R[4]==INULL){
-          R[5]=G(R[1],5);
-          R[3]=G(R[1],3);
-          ob=(word*)R[5];acc=1;
-        }else{
-          R[5]=G(R[1],5);
-          R[6]=G(R[1],3);
-          R[7]=G(R[1],4);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[5];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[4],2);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[5]=G(R[1],3);
-        R[4]=R[6];R[6]=R[7];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1124:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1125:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        if(R[4]==INULL){
-          R[5]=G(R[1],5);
-          R[3]=G(R[1],2);
-          ob=(word*)R[5];acc=1;
-        }else{
-          R[5]=G(R[1],2);
-          R[6]=G(R[1],4);
-          R[7]=G(R[1],5);
-          R[8]=G(R[1],6);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-          ob=(word*)R[4];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],3);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[4]=R[5];R[5]=R[10];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1126:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=R[6];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1127:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1128:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        if(R[4]==INULL){
-          R[5]=G(R[1],5);
-          R[3]=G(R[1],2);
-          ob=(word*)R[5];acc=2;
-        }else{
-          R[5]=G(R[1],2);
-          R[6]=G(R[1],5);
-          R[7]=G(R[1],3);
-          *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[4];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],4);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[4]=G(R[4],2);
-        R[7]=G(R[1],5);
-        R[3]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1129:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1130:
-    if(acc==4){
-      if(R[5]==F(0)){
-        R[7]=INULL;
-        R[8]=cons(R[5],R[7]);
-        R[9]=cons(R[4],R[8]);
-        R[10]=G(R[1],4);
-        R[5]=cons(R[10],R[9]);
-        R[12]=G(R[1],2);
-        R[4]=G(R[1],3);
-        ob=(word*)R[12];acc=3;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-        R[8]=128*84+258;
-        if(R[7]==R[8]){
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-          if(R[9]==R[8]){
-            {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[10]=ob[1];R[11]=ob[2];}
-            {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[12]=ob[1];R[13]=ob[2];}
-            R[14]=G(R[1],5);
-            *fp=make_header(8,TCLOS);fp[1]=G(R[1],6);fp[7]=R[3];fp[6]=R[6];fp[5]=R[10];fp[4]=R[13];fp[3]=R[11];fp[2]=R[12];R[3]=(word)fp;fp+=8;
-            R[4]=R[12];R[5]=R[12];
-            ob=(word*)R[14];acc=3;
-          }else{
-            {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[10]=ob[1];R[11]=ob[2];}
-            R[12]=G(R[1],5);
-            *fp=make_header(7,TCLOS);fp[1]=G(R[1],7);fp[6]=R[3];fp[5]=R[6];fp[4]=R[11];fp[3]=R[5];fp[2]=R[10];R[3]=(word)fp;fp+=7;
-            R[4]=R[5];
-            ob=(word*)R[12];acc=3;
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-          if(R[9]==R[8]){
-            {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[10]=ob[1];R[11]=ob[2];}
-            R[12]=G(R[1],5);
-            *fp=make_header(7,TCLOS);fp[1]=G(R[1],8);fp[6]=R[3];fp[5]=R[6];fp[4]=R[4];fp[3]=R[11];fp[2]=R[10];R[3]=(word)fp;fp+=7;
-            R[4]=R[10];R[5]=R[10];
-            ob=(word*)R[12];acc=3;
-          }else{
-            {word ob=R[4];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-            R[11]=128*82+258;
-            if(R[10]==R[11]){
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-              if(R[12]==R[11]){
-                R[13]=128*0+258;
-                R[14]=prim_ref(R[4],R[13]);
-                R[15]=128*2+258;
-                R[16]=prim_ref(R[5],R[15]);
-                R[17]=G(R[1],5);
-                *fp=make_header(6,TCLOS);fp[1]=G(R[1],9);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-                R[4]=R[14];R[5]=R[16];
-                ob=(word*)R[17];acc=3;
-              }else{
-                R[13]=128*0+258;
-                R[14]=prim_ref(R[4],R[13]);
-                R[15]=128*2+258;
-                R[4]=prim_ref(R[4],R[15]);
-                R[17]=G(R[1],5);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],10);fp[3]=R[3];fp[2]=R[14];R[3]=(word)fp;fp+=4;
-                ob=(word*)R[17];acc=3;
-              }
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-              if(R[12]==R[11]){
-                R[13]=128*2+258;
-                R[14]=prim_ref(R[5],R[13]);
-                R[15]=G(R[1],5);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],11);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                R[5]=R[14];
-                ob=(word*)R[15];acc=3;
-              }else{
-                R[13]=G(R[1],12);
-                ob=(word*)R[13];acc=3;
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1131:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*2+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[1],3);
-      R[8]=128*0+258;
-      R[5]=prim_ref(R[7],R[8]);
-      R[10]=G(R[2],2);
-      R[11]=G(R[1],4);
-      R[12]=G(R[1],5);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[12];fp[3]=R[11];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[4]=R[6];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1132:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=8;
-      R[8]=R[4];
-      R[4]=R[6];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1133:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1134:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=F(0);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1135:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1136:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[8];fp[5]=R[4];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[6]=R[4];R[4]=R[3];
-      R[5]=R[7];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1137:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1138:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=9;
-      R[8]=R[4];
-      R[4]=R[7];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1139:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[9]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1140:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],7);
-      R[11]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],3);fp[9]=R[11];fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=10;
-      R[8]=R[4];
-      R[4]=R[6];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1141:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      R[11]=G(R[1],9);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[12]=(word)fp;fp+=9;
-      R[13]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[12];R[4]=R[13];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1142:
-    if(acc==1){
-      R[4]=G(R[1],7);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      R[10]=G(R[1],8);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],2);fp[8]=R[10];fp[7]=R[4];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=9;
-      R[6]=R[4];R[4]=R[3];
-      R[5]=R[9];R[3]=R[11];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1143:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1144:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1145:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=G(R[1],2);
-      R[6]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1146:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=F(0);
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*62+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=128*78+258;
-          R[13]=BOOL(R[7]==R[12]);
-          if(R[13]==IFALSE){
-            R[14]=128*80+258;
-            R[15]=BOOL(R[7]==R[14]);
-            if(R[15]==IFALSE){
-              R[16]=128*82+258;
-              R[17]=BOOL(R[7]==R[16]);
-              if(R[17]==IFALSE){
-                R[18]=128*84+258;
-                R[19]=BOOL(R[7]==R[18]);
-                if(R[19]==IFALSE){
-                  R[20]=G(R[1],2);
-                  ob=(word*)R[20];acc=3;
-                }else{
-                  {word ob=R[5];if(allocp(ob))ob=V(ob);R[20]=F((hval)ob>>TPOS&63);}
-                  if(R[20]==R[18]){
-                    {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[21]=ob[1];R[22]=ob[2];}
-                    {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[23]=ob[1];R[24]=ob[2];}
-                    *fp=make_header(8,TCLOS);fp[1]=G(R[1],3);fp[7]=R[3];fp[6]=R[6];fp[5]=R[21];fp[4]=R[24];fp[3]=R[22];fp[2]=R[23];R[3]=(word)fp;fp+=8;
-                    R[4]=R[21];R[5]=R[23];
-                    ob=(word*)R[6];acc=4;
-                  }else{
-                    {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[21]=ob[1];R[22]=ob[2];}
-                    *fp=make_header(6,TCLOS);fp[1]=G(R[1],4);fp[5]=R[3];fp[4]=R[6];fp[3]=R[22];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-                    R[4]=R[21];
-                    ob=(word*)R[6];acc=4;
-                  }
-                }
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[18]=F((hval)ob>>TPOS&63);}
-                R[19]=BOOL(R[18]==R[16]);
-                if(R[19]==IFALSE){
-                  R[20]=128*84+258;
-                  R[21]=BOOL(R[18]==R[20]);
-                  if(R[21]==IFALSE){
-                    R[22]=128*0+258;
-                    R[23]=prim_ref(R[4],R[22]);
-                    *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-                    R[4]=R[23];
-                    ob=(word*)R[6];acc=4;
-                  }else{
-                    {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[22]=ob[1];R[23]=ob[2];}
-                    *fp=make_header(6,TCLOS);fp[1]=G(R[1],6);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[23];R[3]=(word)fp;fp+=6;
-                    R[5]=R[22];
-                    ob=(word*)R[6];acc=4;
-                  }
-                }else{
-                  R[20]=128*0+258;
-                  R[21]=prim_ref(R[4],R[20]);
-                  R[22]=prim_ref(R[5],R[20]);
-                  *fp=make_header(6,TCLOS);fp[1]=G(R[1],7);fp[5]=R[3];fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-                  R[4]=R[21];R[5]=R[22];
-                  ob=(word*)R[6];acc=4;
-                }
-              }
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[16]=F((hval)ob>>TPOS&63);}
-              R[17]=128*82+258;
-              R[18]=BOOL(R[16]==R[17]);
-              if(R[18]==IFALSE){
-                R[19]=128*84+258;
-                R[20]=BOOL(R[16]==R[19]);
-                if(R[20]==IFALSE){
-                  R[21]=G(R[1],2);
-                  ob=(word*)R[21];acc=3;
-                }else{
-                  {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[21]=ob[1];R[22]=ob[2];}
-                  *fp=make_header(6,TCLOS);fp[1]=G(R[1],8);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[22];R[3]=(word)fp;fp+=6;
-                  R[5]=R[21];
-                  ob=(word*)R[6];acc=4;
-                }
-              }else{
-                R[19]=128*0+258;
-                R[20]=prim_ref(R[5],R[19]);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],9);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                R[5]=R[20];
-                ob=(word*)R[6];acc=4;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-            R[15]=128*82+258;
-            R[16]=BOOL(R[14]==R[15]);
-            if(R[16]==IFALSE){
-              R[17]=128*84+258;
-              R[18]=BOOL(R[14]==R[17]);
-              if(R[18]==IFALSE){
-                R[19]=G(R[1],2);
-                ob=(word*)R[19];acc=3;
-              }else{
-                {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[19]=ob[1];R[20]=ob[2];}
-                *fp=make_header(6,TCLOS);fp[1]=G(R[1],10);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[20];R[3]=(word)fp;fp+=6;
-                R[5]=R[19];
-                ob=(word*)R[6];acc=4;
-              }
-            }else{
-              R[17]=128*0+258;
-              R[18]=prim_ref(R[5],R[17]);
-              *fp=make_header(4,TCLOS);fp[1]=G(R[1],11);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-              R[5]=R[18];
-              ob=(word*)R[6];acc=4;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-          R[13]=128*82+258;
-          R[14]=BOOL(R[12]==R[13]);
-          if(R[14]==IFALSE){
-            R[15]=128*84+258;
-            R[16]=BOOL(R[12]==R[15]);
-            if(R[16]==IFALSE){
-              R[17]=G(R[1],2);
-              ob=(word*)R[17];acc=3;
-            }else{
-              {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[17]=ob[1];R[18]=ob[2];}
-              *fp=make_header(6,TCLOS);fp[1]=G(R[1],12);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[18];R[3]=(word)fp;fp+=6;
-              R[5]=R[17];
-              ob=(word*)R[6];acc=4;
-            }
-          }else{
-            R[15]=128*0+258;
-            R[16]=prim_ref(R[5],R[15]);
-            *fp=make_header(4,TCLOS);fp[1]=G(R[1],13);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-            R[5]=R[16];
-            ob=(word*)R[6];acc=4;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-        R[11]=128*82+258;
-        R[12]=BOOL(R[10]==R[11]);
-        if(R[12]==IFALSE){
-          R[13]=128*84+258;
-          R[14]=BOOL(R[10]==R[13]);
-          if(R[14]==IFALSE){
-            R[15]=G(R[1],2);
-            ob=(word*)R[15];acc=3;
-          }else{
-            {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[15]=ob[1];R[16]=ob[2];}
-            *fp=make_header(6,TCLOS);fp[1]=G(R[1],14);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[16];R[3]=(word)fp;fp+=6;
-            R[5]=R[15];
-            ob=(word*)R[6];acc=4;
-          }
-        }else{
-          R[13]=128*0+258;
-          R[14]=prim_ref(R[5],R[13]);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],15);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-          R[5]=R[14];
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1147:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*2+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[4]=R[3];
-      R[5]=R[6];R[3]=R[8];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1148:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],7);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],2);fp[8]=R[9];fp[7]=R[4];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=9;
-      R[9]=R[6];R[6]=R[4];
-      R[5]=R[7];R[4]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1149:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[12]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[11];R[4]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1150:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],2);fp[6]=R[7];fp[5]=R[3];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=R[4];R[4]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1151:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],2);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[7]=(word)fp;fp+=5;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1152:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*84+258;
-      if(R[6]==R[7]){
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-        if(R[8]==R[7]){
-          {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];}
-          {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[11]=ob[1];R[12]=ob[2];}
-          R[13]=G(R[1],2);
-          R[4]=R[9];R[5]=R[10];
-          R[6]=R[11];R[7]=R[12];
-          ob=(word*)R[13];acc=5;
-        }else{
-          {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];}
-          R[11]=G(R[1],2);
-          R[7]=F(0);
-          R[6]=R[5];
-          R[4]=R[9];R[5]=R[10];
-          ob=(word*)R[11];acc=5;
-        }
-      }else{
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-        R[10]=G(R[1],2);
-        R[5]=F(0);
-        R[6]=R[8];R[7]=R[9];
-        ob=(word*)R[10];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1153:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[4]=R[5];R[5]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1154:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-        R[7]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[6];R[4]=R[7];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1155:
-    if(acc==3){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*84+258;
-      if(R[6]==R[7]){
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[10]=ob[1];R[11]=ob[2];}
-        R[12]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[9];fp[2]=R[11];R[3]=(word)fp;fp+=5;
-        R[4]=R[8];R[5]=R[10];
-        ob=(word*)R[12];acc=3;
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-        R[10]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-        R[4]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1156:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      *fp=make_header(3,43);fp[1]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=3;
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1157:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        *fp=make_header(3,43);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[6]=G(R[1],3);
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1158:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=F(0);
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*62+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=128*78+258;
-          R[13]=BOOL(R[7]==R[12]);
-          if(R[13]==IFALSE){
-            R[14]=128*80+258;
-            R[15]=BOOL(R[7]==R[14]);
-            if(R[15]==IFALSE){
-              R[16]=128*82+258;
-              R[17]=BOOL(R[7]==R[16]);
-              if(R[17]==IFALSE){
-                R[18]=128*84+258;
-                R[19]=BOOL(R[7]==R[18]);
-                if(R[19]==IFALSE){
-                  R[20]=G(R[1],2);
-                  R[21]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[21];
-                  ob=(word*)R[20];acc=4;
-                }else{
-                  {word ob=R[5];if(allocp(ob))ob=V(ob);R[20]=F((hval)ob>>TPOS&63);}
-                  if(R[20]==R[18]){
-                    R[21]=128*0+258;
-                    R[22]=prim_ref(R[4],R[21]);
-                    R[23]=prim_ref(R[5],R[21]);
-                    *fp=make_header(6,TPROC);fp[1]=G(R[1],4);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-                    R[4]=R[22];R[5]=R[23];
-                    ob=(word*)R[6];acc=4;
-                  }else{
-                    R[21]=IFALSE;
-                    ob=(word*)R[3];R[3]=R[21];acc=1;
-                  }
-                }
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[18]=F((hval)ob>>TPOS&63);}
-                R[19]=BOOL(R[18]==R[16]);
-                if(R[19]==IFALSE){
-                  R[20]=IFALSE;
-                  ob=(word*)R[3];R[3]=R[20];acc=1;
-                }else{
-                  R[20]=128*0+258;
-                  R[21]=prim_ref(R[4],R[20]);
-                  R[22]=prim_ref(R[5],R[20]);
-                  *fp=make_header(6,TPROC);fp[1]=G(R[1],5);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-                  R[4]=R[21];R[5]=R[22];
-                  ob=(word*)R[6];acc=4;
-                }
-              }
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[16]=F((hval)ob>>TPOS&63);}
-              R[17]=BOOL(R[16]==R[14]);
-              if(R[17]==IFALSE){
-                R[18]=IFALSE;
-                ob=(word*)R[3];R[3]=R[18];acc=1;
-              }else{
-                R[18]=G(R[1],6);
-                ob=(word*)R[18];acc=3;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-            R[15]=BOOL(R[14]==R[12]);
-            if(R[15]==IFALSE){
-              R[16]=IFALSE;
-              ob=(word*)R[3];R[3]=R[16];acc=1;
-            }else{
-              R[16]=G(R[1],6);
-              ob=(word*)R[16];acc=3;
-            }
-          }
-        }else{
-          R[12]=BOOL(R[4]==R[5]);
-          ob=(word*)R[3];R[3]=R[12];acc=1;
-        }
-      }else{
-        R[10]=BOOL(R[4]==R[5]);
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1159:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=128*2+258;
-        R[6]=prim_ref(R[4],R[5]);
-        R[7]=G(R[1],3);
-        R[5]=prim_ref(R[7],R[5]);
-        R[9]=G(R[1],5);
-        R[3]=G(R[1],4);
-        R[4]=R[6];R[6]=R[9];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1160:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1161:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*82+258;
-      if(R[7]==R[8]){
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[8]);
-        if(R[10]==IFALSE){
-          R[11]=F(0);
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*62+258;
-            R[14]=BOOL(R[9]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=128*78+258;
-              R[16]=BOOL(R[9]==R[15]);
-              if(R[16]==IFALSE){
-                R[17]=128*80+258;
-                R[18]=BOOL(R[9]==R[17]);
-                if(R[18]==IFALSE){
-                  R[19]=G(R[1],2);
-                  ob=(word*)R[19];acc=3;
-                }else{
-                  R[19]=G(R[2],2);
-                  ob=(word*)R[19];acc=3;
-                }
-              }else{
-                R[17]=G(R[2],2);
-                ob=(word*)R[17];acc=3;
-              }
-            }else{
-              R[15]=G(R[2],2);
-              ob=(word*)R[15];acc=3;
-            }
-          }else{
-            R[13]=G(R[2],2);
-            ob=(word*)R[13];acc=3;
-          }
-        }else{
-          R[11]=128*2+258;
-          R[12]=prim_ref(R[4],R[11]);
-          R[13]=prim_ref(R[5],R[11]);
-          if(R[12]==R[13]){
-            R[14]=128*0+258;
-            R[4]=prim_ref(R[4],R[14]);
-            R[5]=prim_ref(R[5],R[14]);
-            R[17]=G(R[2],3);
-            *fp=make_header(4,TCLOS);fp[1]=G(R[2],4);fp[3]=R[3];fp[2]=R[12];R[3]=(word)fp;fp+=4;
-            ob=(word*)R[17];acc=3;
-          }else{
-            R[14]=128*0+258;
-            R[4]=prim_ref(R[4],R[14]);
-            R[16]=prim_ref(R[5],R[14]);
-            R[17]=G(R[2],5);
-            *fp=make_header(6,TCLOS);fp[1]=G(R[2],6);fp[5]=R[3];fp[4]=R[12];fp[3]=R[13];fp[2]=R[16];R[3]=(word)fp;fp+=6;
-            R[5]=R[13];
-            ob=(word*)R[17];acc=3;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        if(R[9]==R[8]){
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-          R[11]=F(0);
-          R[12]=BOOL(R[10]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*62+258;
-            R[14]=BOOL(R[10]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=128*78+258;
-              R[16]=BOOL(R[10]==R[15]);
-              if(R[16]==IFALSE){
-                R[17]=128*80+258;
-                R[18]=BOOL(R[10]==R[17]);
-                if(R[18]==IFALSE){
-                  R[19]=G(R[1],2);
-                  ob=(word*)R[19];acc=3;
-                }else{
-                  R[19]=G(R[2],7);
-                  ob=(word*)R[19];acc=3;
-                }
-              }else{
-                R[17]=G(R[2],7);
-                ob=(word*)R[17];acc=3;
-              }
-            }else{
-              R[15]=G(R[2],7);
-              ob=(word*)R[15];acc=3;
-            }
-          }else{
-            R[13]=G(R[2],7);
-            ob=(word*)R[13];acc=3;
-          }
-        }else{
-          R[10]=G(R[1],2);
-          ob=(word*)R[10];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1162:
-    if(acc==3){
-      {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-      R[8]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[5]=R[4];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1163:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[5]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1164:
-    if(acc==3){
-      {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-      R[8]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=5;
-      R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1165:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      *fp=make_header(3,42);fp[1]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=3;
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1166:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*82+258;
-      if(R[6]==R[7]){
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-        R[9]=BOOL(R[8]==R[7]);
-        if(R[9]==IFALSE){
-          R[10]=128*84+258;
-          R[11]=BOOL(R[8]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=128*0+258;
-            R[13]=prim_ref(R[4],R[12]);
-            R[14]=128*2+258;
-            R[15]=prim_ref(R[4],R[14]);
-            R[16]=G(R[2],2);
-            *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[13];R[3]=(word)fp;fp+=5;
-            R[4]=R[5];R[5]=R[15];
-            ob=(word*)R[16];acc=3;
-          }else{
-            R[12]=G(R[1],2);
-            R[8]=R[5];
-            R[5]=R[4];R[4]=R[8];
-            ob=(word*)R[12];acc=3;
-          }
-        }else{
-          R[10]=128*2+258;
-          R[11]=prim_ref(R[4],R[10]);
-          R[12]=prim_ref(R[5],R[10]);
-          if(R[11]==R[12]){
-            R[13]=128*0+258;
-            R[4]=prim_ref(R[4],R[13]);
-            R[5]=prim_ref(R[5],R[13]);
-            R[16]=G(R[2],4);
-            *fp=make_header(4,TCLOS);fp[1]=G(R[2],5);fp[3]=R[3];fp[2]=R[11];R[3]=(word)fp;fp+=4;
-            ob=(word*)R[16];acc=3;
-          }else{
-            R[13]=128*0+258;
-            R[4]=prim_ref(R[4],R[13]);
-            R[15]=prim_ref(R[5],R[13]);
-            R[16]=G(R[2],2);
-            *fp=make_header(6,TCLOS);fp[1]=G(R[2],6);fp[5]=R[3];fp[4]=R[11];fp[3]=R[12];fp[2]=R[15];R[3]=(word)fp;fp+=6;
-            R[5]=R[12];
-            ob=(word*)R[16];acc=3;
-          }
-        }
-      }else{
-        R[8]=G(R[1],2);
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1167:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[10]=R[4];
-      R[5]=R[6];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1168:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1169:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[9]=R[4];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1170:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*2+258;
-      R[6]=prim_ref(R[4],R[5]);
-      *fp=make_header(3,42);fp[1]=R[3];fp[2]=R[6];R[3]=(word)fp;fp+=3;
-      R[8]=G(R[1],3);
-      ob=(word*)R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1171:
-    if(acc==4){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*62+258;
-      if(R[7]==R[8]){
-        R[9]=G(R[1],2);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[9];acc=2;
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=128*80+258;
-        if(R[9]==R[10]){
-          R[11]=G(R[1],2);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],4);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[11];acc=2;
-        }else{
-          R[11]=G(R[1],5);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],6);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[11];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1172:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=R[4];
-        R[4]=R[5];R[5]=R[6];
-        ob=(word*)R[9];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[7]=R[4];
-        R[4]=R[3];R[3]=R[5];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1173:
-    if(acc==1){
-      R[4]=128*0+258;
-      if(R[3]==R[4]){
-        R[5]=G(R[1],3);
-        if(R[5]==R[4]){
-          R[6]=G(R[1],4);
-          R[3]=G(R[1],2);
-          ob=(word*)R[6];acc=1;
-        }else{
-          R[6]=G(R[1],2);
-          *fp=make_header(3,42);fp[1]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=3;
-          R[8]=G(R[1],4);
-          ob=(word*)R[8];acc=1;
-        }
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[3];fp[2]=R[6];R[9]=(word)fp;fp+=6;
-        R[8]=R[5];R[4]=R[3];
-        R[5]=R[7];R[3]=R[9];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1174:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[10]=R[4];R[4]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1175:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[9]=R[4];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1176:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[4]=R[8];
-      ob=(word*)R[9];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1177:
-    if(acc==3){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      if(R[6]==F(0)){
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-        if(R[7]==F(0)){
-          R[8]=F(0);
-          {uint64_t a=(uint64_t)immval(R[8])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[9]=F(q>>FBITS);R[10]=F(q);R[11]=F(a-q*b);}
-          if(R[11]==F(0)){
-            ob=(word*)R[3];R[3]=R[10];acc=1;
-          }else{
-            R[12]=IFALSE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }else{
-          R[8]=IFALSE;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }
-      }else{
-        R[7]=IFALSE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1178:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1179:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      *fp=make_header(3,42);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1180:
-    if(acc==2){
-      assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-      R[6]=G(R[4],2);
-      R[7]=G(R[1],2);
-      R[4]=G(R[1],3);
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1181:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*62+258;
-      if(R[7]==R[8]){
-        R[9]=G(R[1],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[9];acc=2;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=128*80+258;
-        if(R[9]==R[10]){
-          R[11]=G(R[1],2);
-          *fp=make_header(5,TPROC);fp[1]=G(R[1],4);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[11];acc=2;
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          if(R[11]==R[8]){
-            R[12]=G(R[1],2);
-            *fp=make_header(5,TPROC);fp[1]=G(R[1],5);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-            R[4]=R[5];
-            ob=(word*)R[12];acc=2;
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-            if(R[12]==R[10]){
-              R[13]=G(R[1],2);
-              *fp=make_header(5,TPROC);fp[1]=G(R[1],6);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-              R[4]=R[5];
-              ob=(word*)R[13];acc=2;
-            }else{
-              {word ob=R[4];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-              if(R[13]==F(0)){
-                R[14]=G(R[1],7);
-                ob=(word*)R[14];acc=3;
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-                if(R[14]==F(0)){
-                  R[15]=G(R[1],7);
-                  ob=(word*)R[15];acc=3;
-                }else{
-                  if(R[4]==R[5]){
-                    ob=(word*)R[3];R[3]=R[4];acc=1;
-                  }else{
-                    R[15]=G(R[1],8);
-                    ob=(word*)R[15];acc=3;
-                  }
-                }
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1182:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[9]=R[5];
-      R[5]=R[6];R[6]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1183:
-    if(acc==3){
-      R[6]=128*0+258;
-      R[7]=cons(R[6],R[4]);
-      R[5]=cons(R[6],R[5]);
-      R[9]=G(R[1],2);
-      R[6]=F(0);
-      R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1184:
-    if(acc==5){
-      assert(pairp(R[4]),R[4],169);R[8]=G(R[4],2);
-      assert(pairp(R[5]),R[5],169);R[9]=G(R[5],2);
-      if(R[8]==F(0)){
-        R[10]=G(R[1],2);
-        R[5]=R[6];R[4]=R[9];
-        ob=(word*)R[10];acc=3;
-      }else{
-        if(R[9]==F(0)){
-          R[10]=G(R[1],2);
-          R[5]=R[6];R[4]=R[8];
-          ob=(word*)R[10];acc=3;
-        }else{
-          R[10]=G(R[4],1);
-          R[11]=G(R[1],3);
-          *fp=make_header(9,TCLOS);fp[1]=G(R[1],4);fp[8]=R[7];fp[7]=R[3];fp[6]=R[6];fp[5]=R[9];fp[4]=R[5];fp[3]=R[8];fp[2]=R[4];R[3]=(word)fp;fp+=9;
-          R[4]=R[8];R[5]=R[10];
-          ob=(word*)R[11];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1185:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],4);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],6);
-        R[9]=G(R[1],7);
-        R[10]=G(R[1],8);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[10];fp[5]=R[9];fp[4]=R[4];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-        R[4]=G(R[1],5);
-        ob=(word*)R[6];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        R[11]=G(R[1],7);
-        R[12]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],4);fp[8]=R[12];fp[7]=R[11];fp[6]=R[10];fp[5]=R[9];fp[4]=R[4];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=9;
-        R[4]=R[9];
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1186:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],6);
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],7);
-        R[8]=G(R[1],8);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],4);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-        R[6]=G(R[2],4);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        R[11]=G(R[1],7);
-        R[12]=G(R[1],8);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],5);fp[7]=R[12];fp[6]=R[11];fp[5]=R[10];fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[3]=(word)fp;fp+=8;
-        R[4]=G(R[2],6);
-        R[15]=F(0);
-        R[9]=R[6];R[6]=R[15];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1187:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=7;
-      R[11]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[10];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1188:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],5);
-      R[10]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-      R[4]=G(R[2],4);
-      R[13]=F(0);
-      R[9]=R[6];R[6]=R[13];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1189:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[9]=(word)fp;fp+=7;
-      R[8]=R[4];R[4]=R[5];
-      R[5]=R[3];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1190:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[10]=(word)fp;fp+=8;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1191:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=128*2+258;
-        R[5]=G(R[1],2);
-        R[6]=cons(R[4],R[5]);
-        R[7]=128*0+258;
-        R[8]=G(R[1],3);
-        R[5]=cons(R[7],R[8]);
-        R[7]=G(R[1],7);
-        R[3]=G(R[1],6);
-        R[12]=G(R[1],5);
-        R[4]=R[6];R[6]=R[12];
-        ob=(word*)R[7];acc=5;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1192:
-    if(acc==1){
-      R[4]=128*2+258;
-      R[5]=cons(R[4],R[3]);
-      R[6]=128*0+258;
-      R[7]=G(R[1],2);
-      R[8]=cons(R[6],R[7]);
-      R[7]=G(R[1],5);
-      R[3]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[4]=R[5];R[5]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1193:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],6);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],2);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1194:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[7]=R[4];R[4]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1195:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=6;
-      R[9]=G(R[1],2);
-      R[5]=128*0+258;
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1196:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[3]=cons(R[3],R[4]);
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1197:
-    if(acc==2){
-      assert(pairp(R[4]),R[4],105);R[5]=G(R[4],1);
-      R[6]=G(R[1],2);
-      if(R[5]==R[6]){
-        R[7]=G(R[4],2);
-        {word ob=R[7];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-        if(R[8]==F(0)){
-          R[9]=128*0+258;
-          R[10]=F(0);
-          R[11]=cons(R[9],R[10]);
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }else{
-          R[9]=128*2+258;
-          R[10]=prim_ref(R[7],R[9]);
-          R[11]=prim_ref(R[10],R[9]);
-          if(R[11]==INULL){
-            R[12]=128*0+258;
-            R[13]=prim_ref(R[10],R[12]);
-            R[14]=cons(R[12],R[13]);
-            ob=(word*)R[3];R[3]=R[14];acc=1;
-          }else{
-            R[12]=128*0+258;
-            R[13]=cons(R[12],R[10]);
-            ob=(word*)R[3];R[3]=R[13];acc=1;
-          }
-        }
-      }else{
-        {hval r=immval(R[5])+immval(R[5]);R[8]=F(r>>FBITS);R[7]=F(r);}
-        R[9]=G(R[4],2);
-        R[10]=cons(R[7],R[9]);
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1198:
-    if(acc==4){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[7]=G(R[1],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[7];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1199:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=128*82+258;
-      if(R[6]==R[7]){
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-        if(R[8]==R[7]){
-          R[9]=128*0+258;
-          R[10]=prim_ref(R[4],R[9]);
-          R[11]=128*2+258;
-          R[12]=prim_ref(R[5],R[11]);
-          R[13]=G(R[1],2);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          R[4]=R[10];R[5]=R[12];
-          ob=(word*)R[13];acc=3;
-        }else{
-          R[9]=128*0+258;
-          R[10]=prim_ref(R[4],R[9]);
-          R[11]=128*2+258;
-          R[12]=prim_ref(R[4],R[11]);
-          R[13]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-          R[4]=R[5];R[5]=R[12];
-          ob=(word*)R[13];acc=3;
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-        if(R[8]==R[7]){
-          R[9]=128*2+258;
-          R[10]=prim_ref(R[5],R[9]);
-          R[11]=G(R[1],2);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-          R[5]=R[10];
-          ob=(word*)R[11];acc=3;
-        }else{
-          R[9]=G(R[1],6);
-          ob=(word*)R[9];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1200:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],3);
-      R[4]=R[3];
-      R[5]=R[6];R[3]=R[8];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1201:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[1],3);
-      R[8]=128*2+258;
-      R[5]=prim_ref(R[7],R[8]);
-      R[10]=G(R[2],2);
-      R[11]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[11];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[4]=R[6];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1202:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=INULL;
-      R[10]=R[7];R[7]=R[6];
-      R[6]=R[5];R[5]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1203:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[5];
-        ob=(word*)R[8];acc=2;
-      }else{
-        if(R[6]==F(0)){
-          R[8]=G(R[1],2);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-          R[4]=R[5];
-          ob=(word*)R[8];acc=2;
-        }else{
-          assert(pairp(R[4]),R[4],169);R[8]=G(R[4],2);
-          R[9]=G(R[4],1);
-          R[10]=cons(R[9],R[5]);
-          R[11]=G(R[1],5);
-          *fp=make_header(6,TPROC);fp[1]=G(R[1],6);fp[5]=R[7];fp[4]=R[3];fp[3]=R[8];fp[2]=R[10];R[3]=(word)fp;fp+=6;
-          R[5]=128*0+258;
-          R[4]=R[6];
-          ob=(word*)R[11];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1204:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=INULL;
-      R[5]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1205:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-      R[9]=F(0);
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1206:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=F(0);
-        R[8]=R[4];R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];
-        R[4]=R[5];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1207:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],5);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];
-        R[4]=R[5];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1208:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],2);
-        R[9]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[4]=G(R[1],5);
-        R[3]=INULL;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1209:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[5]=INULL;
-        R[6]=cons(R[4],R[5]);
-        R[7]=G(R[1],3);
-        R[8]=cons(R[7],R[6]);
-        R[9]=G(R[1],4);
-        R[10]=cons(R[9],R[8]);
-        R[11]=G(R[2],4);
-        R[5]=cons(R[11],R[10]);
-        R[13]=G(R[2],2);
-        R[3]=G(R[1],5);
-        R[4]=G(R[2],3);
-        ob=(word*)R[13];acc=3;
-      }else{
-        R[4]=G(R[1],5);
-        R[3]=INULL;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1210:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[4];fp[4]=R[7];fp[3]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-      R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1211:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[3]=INULL;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-        R[9]=R[4];
-        R[5]=R[6];R[4]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1212:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[10]=R[7];
-      R[7]=R[4];R[4]=R[3];
-      R[5]=R[8];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1213:
-    if(acc==4){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        if(R[4]==INULL){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          assert(pairp(R[4]),R[4],169);R[7]=G(R[4],2);
-          R[8]=G(R[1],2);
-          *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-          R[10]=128*0+258;
-          R[4]=R[5];R[5]=R[10];
-          ob=(word*)R[8];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1214:
-    if(acc==4){
-      if(R[5]==F(0)){
-        R[7]=INULL;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[4]==INULL){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          assert(pairp(R[4]),R[4],105);R[7]=G(R[4],1);
-          R[8]=G(R[4],2);
-          R[9]=G(R[1],2);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-          R[11]=128*0+258;
-          R[4]=R[5];R[5]=R[11];
-          ob=(word*)R[9];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1215:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=F(0);
-      R[9]=R[5];
-      R[10]=R[6];R[6]=R[4];
-      R[5]=R[7];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1216:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[5]=128*0+258;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1217:
-    if(acc==5){
-      if(R[5]==F(0)){
-        R[8]=cons(R[6],R[4]);
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        if(R[4]==INULL){
-          R[8]=G(R[1],2);
-          R[4]=G(R[1],3);
-          ob=(word*)R[8];acc=3;
-        }else{
-          {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-          R[10]=G(R[1],4);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],5);fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-          R[12]=128*0+258;
-          R[4]=R[5];R[5]=R[12];
-          ob=(word*)R[10];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1218:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-      R[3]=cons(R[3],R[5]);
-      R[7]=G(R[1],3);
-      ob=(word*)R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1219:
-    if(acc==5){
-      if(R[5]==F(0)){
-        ob=(word*)R[6];acc=2;
-      }else{
-        if(R[4]==INULL){
-          R[8]=G(R[1],2);
-          R[4]=G(R[1],3);
-          ob=(word*)R[8];acc=3;
-        }else{
-          {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[8]=ob[1];R[9]=ob[2];}
-          R[10]=G(R[1],4);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],5);fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-          R[12]=128*0+258;
-          R[4]=R[5];R[5]=R[12];
-          ob=(word*)R[10];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1220:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=G(R[1],2);
-        R[4]=G(R[1],3);
-        ob=(word*)R[7];acc=3;
-      }else{
-        if(R[5]==F(0)){
-          assert(pairp(R[4]),R[4],169);R[7]=G(R[4],2);
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          assert(pairp(R[4]),R[4],105);R[7]=G(R[4],1);
-          R[8]=G(R[4],2);
-          R[9]=G(R[1],4);
-          *fp=make_header(6,TCLOS);fp[1]=G(R[1],5);fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-          R[11]=128*0+258;
-          R[4]=R[5];R[5]=R[11];
-          ob=(word*)R[9];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1221:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[5]=R[3];R[6]=R[4];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1222:
-    if(acc==5){
-      if(R[4]==INULL){
-        R[8]=G(R[1],2);
-        R[4]=G(R[1],3);
-        R[5]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        if(R[5]==F(0)){
-          assert(pairp(R[4]),R[4],169);R[8]=G(R[4],2);
-          R[9]=cons(R[6],R[8]);
-          ob=(word*)R[3];R[3]=R[9];acc=1;
-        }else{
-          assert(pairp(R[4]),R[4],105);R[8]=G(R[4],1);
-          R[9]=G(R[4],2);
-          R[10]=G(R[1],4);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],5);fp[6]=R[3];fp[5]=R[8];fp[4]=R[7];fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=7;
-          R[12]=128*0+258;
-          R[4]=R[5];R[5]=R[12];
-          ob=(word*)R[10];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1223:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[5]=R[3];R[3]=R[7];
-      R[7]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1224:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=G(R[1],2);
-        R[4]=G(R[1],3);
-        ob=(word*)R[7];acc=3;
-      }else{
-        if(R[5]==F(0)){
-          assert(pairp(R[4]),R[4],105);R[7]=G(R[4],1);
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          assert(pairp(R[4]),R[4],169);R[7]=G(R[4],2);
-          R[8]=G(R[1],4);
-          *fp=make_header(5,TPROC);fp[1]=G(R[1],5);fp[4]=R[6];fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-          R[10]=128*0+258;
-          R[4]=R[5];R[5]=R[10];
-          ob=(word*)R[8];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1225:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];R[10]=R[5];
-      R[5]=R[3];R[4]=R[6];
-      R[6]=R[7];R[3]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1226:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1227:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*62+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[6]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*80+258;
-            R[14]=BOOL(R[6]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=G(R[1],2);
-              R[16]=G(R[1],3);
-              R[6]=R[5];
-              R[5]=R[4];R[4]=R[16];
-              ob=(word*)R[15];acc=4;
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-              R[16]=BOOL(R[15]==R[7]);
-              if(R[16]==IFALSE){
-                R[17]=BOOL(R[15]==R[9]);
-                if(R[17]==IFALSE){
-                  R[18]=BOOL(R[15]==R[11]);
-                  if(R[18]==IFALSE){
-                    R[19]=BOOL(R[15]==R[13]);
-                    if(R[19]==IFALSE){
-                      R[20]=G(R[1],2);
-                      R[21]=G(R[1],3);
-                      R[6]=R[5];
-                      R[5]=R[4];R[4]=R[21];
-                      ob=(word*)R[20];acc=4;
-                    }else{
-                      R[20]=G(R[1],4);
-                      *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                      ob=(word*)R[20];acc=2;
-                    }
-                  }else{
-                    R[19]=G(R[1],4);
-                    *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                    ob=(word*)R[19];acc=2;
-                  }
-                }else{
-                  R[18]=G(R[1],7);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[1],8);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  ob=(word*)R[18];acc=3;
-                }
-              }else{
-                R[17]=G(R[1],7);
-                *fp=make_header(3,TCLOS);fp[1]=G(R[1],9);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                ob=(word*)R[17];acc=3;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-            R[14]=BOOL(R[13]==R[7]);
-            if(R[14]==IFALSE){
-              R[15]=BOOL(R[13]==R[9]);
-              if(R[15]==IFALSE){
-                R[16]=BOOL(R[13]==R[11]);
-                if(R[16]==IFALSE){
-                  R[17]=128*80+258;
-                  R[18]=BOOL(R[13]==R[17]);
-                  if(R[18]==IFALSE){
-                    R[19]=G(R[1],2);
-                    R[20]=G(R[1],3);
-                    R[6]=R[5];
-                    R[5]=R[4];R[4]=R[20];
-                    ob=(word*)R[19];acc=4;
-                  }else{
-                    R[19]=G(R[1],4);
-                    *fp=make_header(4,TCLOS);fp[1]=G(R[1],10);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-                    R[4]=R[5];
-                    ob=(word*)R[19];acc=2;
-                  }
-                }else{
-                  R[17]=G(R[1],11);
-                  ob=(word*)R[17];acc=3;
-                }
-              }else{
-                R[16]=G(R[1],7);
-                *fp=make_header(3,TPROC);fp[1]=G(R[1],12);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                ob=(word*)R[16];acc=3;
-              }
-            }else{
-              R[15]=G(R[1],7);
-              *fp=make_header(3,TPROC);fp[1]=G(R[1],13);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-              ob=(word*)R[15];acc=3;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=128*78+258;
-              R[15]=BOOL(R[11]==R[14]);
-              if(R[15]==IFALSE){
-                R[16]=128*80+258;
-                R[17]=BOOL(R[11]==R[16]);
-                if(R[17]==IFALSE){
-                  R[18]=G(R[1],2);
-                  R[19]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[19];
-                  ob=(word*)R[18];acc=4;
-                }else{
-                  ob=(word*)R[3];R[3]=R[4];acc=1;
-                }
-              }else{
-                ob=(word*)R[3];R[3]=R[4];acc=1;
-              }
-            }else{
-              {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[14]=F(q>>FBITS);R[15]=F(q);R[16]=F(a-q*b);}
-              R[17]=G(R[1],4);
-              R[4]=R[16];
-              ob=(word*)R[17];acc=2;
-            }
-          }else{
-            {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[13]=F(q>>FBITS);R[14]=F(q);R[15]=F(a-q*b);}
-            R[16]=G(R[1],4);
-            R[4]=R[15];
-            ob=(word*)R[16];acc=2;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*62+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*78+258;
-            R[14]=BOOL(R[9]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=128*80+258;
-              R[16]=BOOL(R[9]==R[15]);
-              if(R[16]==IFALSE){
-                R[17]=G(R[1],2);
-                R[18]=G(R[1],3);
-                R[6]=R[5];
-                R[5]=R[4];R[4]=R[18];
-                ob=(word*)R[17];acc=4;
-              }else{
-                ob=(word*)R[3];R[3]=R[4];acc=1;
-              }
-            }else{
-              ob=(word*)R[3];R[3]=R[4];acc=1;
-            }
-          }else{
-            {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[13]=F(q>>FBITS);R[14]=F(q);R[15]=F(a-q*b);}
-            ob=(word*)R[3];R[3]=R[15];acc=1;
-          }
-        }else{
-          {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[11]=F(q>>FBITS);R[12]=F(q);R[13]=F(a-q*b);}
-          ob=(word*)R[3];R[3]=R[13];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1228:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[3]=R[4];
-      ob=(word*)R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1229:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[3]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1230:
-    if(acc==3){
-      if(R[5]==F(0)){
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[9]=R[6];R[6]=R[5];
-        R[5]=R[4];R[4]=R[7];
-        ob=(word*)R[9];acc=4;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-        R[7]=F(0);
-        R[8]=BOOL(R[6]==R[7]);
-        if(R[8]==IFALSE){
-          R[9]=128*62+258;
-          R[10]=BOOL(R[6]==R[9]);
-          if(R[10]==IFALSE){
-            R[11]=128*78+258;
-            R[12]=BOOL(R[6]==R[11]);
-            if(R[12]==IFALSE){
-              R[13]=128*80+258;
-              R[14]=BOOL(R[6]==R[13]);
-              if(R[14]==IFALSE){
-                R[15]=G(R[1],2);
-                R[16]=G(R[1],3);
-                R[6]=R[5];
-                R[5]=R[4];R[4]=R[16];
-                ob=(word*)R[15];acc=4;
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-                R[16]=BOOL(R[15]==R[7]);
-                if(R[16]==IFALSE){
-                  R[17]=BOOL(R[15]==R[9]);
-                  if(R[17]==IFALSE){
-                    R[18]=BOOL(R[15]==R[11]);
-                    if(R[18]==IFALSE){
-                      R[19]=BOOL(R[15]==R[13]);
-                      if(R[19]==IFALSE){
-                        R[20]=G(R[1],2);
-                        R[21]=G(R[1],3);
-                        R[6]=R[5];
-                        R[5]=R[4];R[4]=R[21];
-                        ob=(word*)R[20];acc=4;
-                      }else{
-                        R[20]=G(R[1],4);
-                        *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                        ob=(word*)R[20];acc=2;
-                      }
-                    }else{
-                      R[19]=G(R[1],4);
-                      *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                      ob=(word*)R[19];acc=2;
-                    }
-                  }else{
-                    R[18]=G(R[1],7);
-                    *fp=make_header(3,TPROC);fp[1]=G(R[1],8);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    ob=(word*)R[18];acc=3;
-                  }
-                }else{
-                  R[17]=G(R[1],9);
-                  ob=(word*)R[17];acc=3;
-                }
-              }
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-              R[14]=BOOL(R[13]==R[7]);
-              if(R[14]==IFALSE){
-                R[15]=BOOL(R[13]==R[9]);
-                if(R[15]==IFALSE){
-                  R[16]=BOOL(R[13]==R[11]);
-                  if(R[16]==IFALSE){
-                    R[17]=128*80+258;
-                    R[18]=BOOL(R[13]==R[17]);
-                    if(R[18]==IFALSE){
-                      R[19]=G(R[1],2);
-                      R[20]=G(R[1],3);
-                      R[6]=R[5];
-                      R[5]=R[4];R[4]=R[20];
-                      ob=(word*)R[19];acc=4;
-                    }else{
-                      R[19]=G(R[1],4);
-                      *fp=make_header(4,TCLOS);fp[1]=G(R[1],10);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-                      R[4]=R[5];
-                      ob=(word*)R[19];acc=2;
-                    }
-                  }else{
-                    R[17]=G(R[1],11);
-                    ob=(word*)R[17];acc=3;
-                  }
-                }else{
-                  R[16]=G(R[1],9);
-                  ob=(word*)R[16];acc=3;
-                }
-              }else{
-                R[15]=G(R[1],7);
-                *fp=make_header(3,TPROC);fp[1]=G(R[1],12);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                ob=(word*)R[15];acc=3;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-            R[12]=BOOL(R[11]==R[7]);
-            if(R[12]==IFALSE){
-              R[13]=BOOL(R[11]==R[9]);
-              if(R[13]==IFALSE){
-                R[14]=128*78+258;
-                R[15]=BOOL(R[11]==R[14]);
-                if(R[15]==IFALSE){
-                  R[16]=128*80+258;
-                  R[17]=BOOL(R[11]==R[16]);
-                  if(R[17]==IFALSE){
-                    R[18]=G(R[1],2);
-                    R[19]=G(R[1],3);
-                    R[6]=R[5];
-                    R[5]=R[4];R[4]=R[19];
-                    ob=(word*)R[18];acc=4;
-                  }else{
-                    ob=(word*)R[3];R[3]=R[7];acc=1;
-                  }
-                }else{
-                  ob=(word*)R[3];R[3]=R[7];acc=1;
-                }
-              }else{
-                {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[14]=F(q>>FBITS);R[15]=F(q);R[16]=F(a-q*b);}
-                ob=(word*)R[3];R[3]=R[15];acc=1;
-              }
-            }else{
-              R[13]=G(R[1],13);
-              ob=(word*)R[13];acc=3;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-          R[10]=BOOL(R[9]==R[7]);
-          if(R[10]==IFALSE){
-            R[11]=128*62+258;
-            R[12]=BOOL(R[9]==R[11]);
-            if(R[12]==IFALSE){
-              R[13]=128*78+258;
-              R[14]=BOOL(R[9]==R[13]);
-              if(R[14]==IFALSE){
-                R[15]=128*80+258;
-                R[16]=BOOL(R[9]==R[15]);
-                if(R[16]==IFALSE){
-                  R[17]=G(R[1],2);
-                  R[18]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[18];
-                  ob=(word*)R[17];acc=4;
-                }else{
-                  ob=(word*)R[3];R[3]=R[7];acc=1;
-                }
-              }else{
-                ob=(word*)R[3];R[3]=R[7];acc=1;
-              }
-            }else{
-              R[13]=G(R[1],13);
-              ob=(word*)R[13];acc=3;
-            }
-          }else{
-            {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[11]=F(q>>FBITS);R[12]=F(q);R[13]=F(a-q*b);}
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1231:
-    if(acc==2){
-      {word ob=R[3];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=F(0);
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=G(R[2],2);
-        R[9]=G(R[1],2);
-        R[4]=R[3];R[3]=R[9];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[8]=G(R[2],3);
-        R[9]=G(R[1],2);
-        R[4]=R[3];R[3]=R[9];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1232:
-    if(acc==3){
-      R[6]=F(0);
-      {uint64_t a=(uint64_t)immval(R[6])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[7]=F(q>>FBITS);R[8]=F(q);R[9]=F(a-q*b);}
-      if(R[8]==F(0)){
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        R[10]=G(R[1],2);
-        R[4]=R[8];
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1233:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1234:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1235:
-    if(acc==4){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=128*62+258;
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*80+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=G(R[1],2);
-          ob=(word*)R[12];acc=3;
-        }else{
-          R[12]=G(R[1],3);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],4);fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          ob=(word*)R[12];acc=2;
-        }
-      }else{
-        R[10]=G(R[1],3);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],5);fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[10];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1236:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[9]=R[6];
-      R[6]=R[4];R[4]=R[3];
-      R[5]=R[7];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1237:
-    if(acc==2){
-      if(R[4]==IFALSE){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[5]=G(R[1],2);
-        ob=(word*)R[5];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1238:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      R[9]=128*0+258;
-      R[4]=R[5];R[5]=R[9];
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1239:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=128*0+258;
-        R[8]=R[4];
-        R[4]=R[5];R[5]=R[10];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=128*0+258;
-        R[7]=F(0);
-        R[8]=G(R[1],2);
-        R[9]=G(R[1],3);
-        R[10]=G(R[2],5);
-        R[11]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        R[5]=R[7];R[6]=R[8];
-        R[7]=R[9];R[8]=R[10];
-        ob=(word*)R[11];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1240:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        R[9]=G(R[1],2);
-        R[5]=128*0+258;
-        R[11]=R[4];R[4]=R[9];
-        ob=(word*)R[11];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1241:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[5]=128*0+258;
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1242:
-    if(acc==7){
-      {word ob=R[6];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-      R[11]=128*62+258;
-      if(R[10]==R[11]){
-        R[12]=IFALSE;
-        ob=(word*)R[3];R[3]=R[12];acc=1;
-      }else{
-        {word ob=R[6];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-        R[13]=128*80+258;
-        if(R[12]==R[13]){
-          R[14]=IFALSE;
-          ob=(word*)R[3];R[3]=R[14];acc=1;
-        }else{
-          if(R[6]==F(0)){
-            R[14]=G(R[1],2);
-            R[4]=R[8];
-            ob=(word*)R[14];acc=2;
-          }else{
-            R[14]=G(R[1],3);
-            *fp=make_header(9,TCLOS);fp[1]=G(R[1],4);fp[8]=R[9];fp[7]=R[3];fp[6]=R[4];fp[5]=R[5];fp[4]=R[7];fp[3]=R[8];fp[2]=R[6];R[3]=(word)fp;fp+=9;
-            R[5]=R[4];R[4]=R[6];
-            ob=(word*)R[14];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1243:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],5);
-        R[5]=128*44+258;
-        if(R[4]==R[5]){
-          R[6]=G(R[1],2);
-          R[7]=128*2+258;
-          R[8]=prim_ref(R[6],R[7]);
-          R[9]=G(R[1],3);
-          R[10]=G(R[1],4);
-          R[11]=G(R[1],7);
-          R[12]=G(R[1],8);
-          *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[12];fp[4]=R[11];fp[3]=R[10];fp[2]=R[9];R[13]=(word)fp;fp+=6;
-          R[14]=prim_ref(R[8],R[7]);
-          if(R[14]==INULL){
-            R[15]=128*0+258;
-            R[3]=prim_ref(R[8],R[15]);
-            ob=(word*)R[13];acc=1;
-          }else{
-            R[3]=R[8];
-            ob=(word*)R[13];acc=1;
-          }
-        }else{
-          R[6]=G(R[1],6);
-          {hval r=immval(R[6])+immval(R[6]);R[8]=F(r>>FBITS);R[7]=F(r);}
-          R[9]=128*0+258;
-          {hval r=immval(R[4])+immval(R[9]);R[11]=F(r>>FBITS);R[10]=F(r);}
-          R[9]=G(R[1],8);
-          R[3]=G(R[1],7);
-          R[6]=G(R[1],2);
-          R[15]=G(R[1],4);
-          R[8]=G(R[1],3);
-          R[4]=R[7];
-          R[5]=R[10];R[7]=R[15];
-          ob=(word*)R[9];acc=7;
-        }
-      }else{
-        R[4]=G(R[2],3);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        R[10]=G(R[1],7);
-        R[11]=G(R[1],8);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],4);fp[8]=R[11];fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-        R[9]=R[4];
-        R[4]=R[7];R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1244:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(8,TPROC);fp[1]=G(R[2],3);fp[7]=R[10];fp[6]=R[9];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[11]=(word)fp;fp+=8;
-      R[12]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[11];R[4]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1245:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[1],5);
-      R[8]=R[7]|R[6];
-      R[9]=128*2+258;
-      R[10]=prim_ref(R[4],R[9]);
-      *fp=make_header(3,40);fp[1]=R[8];fp[2]=R[10];R[8]=(word)fp;fp+=3;
-      R[9]=G(R[1],7);
-      R[13]=G(R[1],6);
-      R[5]=G(R[1],4);
-      R[15]=G(R[1],3);
-      R[6]=R[3];R[4]=R[7];
-      R[3]=R[13];R[7]=R[15];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1246:
-    if(acc==1){
-      R[4]=F(0);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],4);
-      R[9]=128*0+258;
-      R[10]=G(R[1],3);
-      R[12]=R[8];R[8]=R[6];
-      R[6]=R[3];R[5]=R[4];
-      R[4]=R[9];R[9]=R[7];
-      R[7]=R[10];R[3]=R[12];
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1247:
-    if(acc==6){
-      R[9]=G(R[1],2);
-      ob=(word*)R[9];acc=7;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1248:
-    if(acc==3){
-      R[6]=128*2+258;
-      R[7]=prim_ref(R[4],R[6]);
-      if(R[7]==INULL){
-        R[8]=128*0+258;
-        R[9]=prim_ref(R[4],R[8]);
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        R[8]=128*0+258;
-        R[9]=prim_ref(R[4],R[8]);
-        if(R[9]==F(0)){
-          R[4]=prim_ref(R[4],R[6]);
-          ob=(word*)R[5];acc=3;
-        }else{
-          R[10]=G(R[1],2);
-          R[5]=INULL;
-          ob=(word*)R[10];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1249:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[5]=R[3];R[3]=R[6];
-      R[6]=R[4];R[4]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1250:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*2+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[1],3);
-      R[5]=prim_ref(R[7],R[5]);
-      R[9]=G(R[1],4);
-      R[10]=G(R[1],5);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[10];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[4]=R[6];R[6]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1251:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[5]=R[6];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1252:
-    if(acc==3){
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[5];fp[4]=R[3];fp[3]=R[4];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-      R[9]=F(0);
-      R[10]=R[6];
-      R[5]=R[7];R[6]=R[9];
-      ob=(word*)R[10];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1253:
-    if(acc==1){
-      R[4]=128*2+258;
-      R[5]=prim_less(R[3],R[4]);
-      if(R[5]==IFALSE){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[9];fp[3]=R[8];fp[2]=R[7];R[10]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        R[5]=R[3];R[3]=R[10];
-        ob=(word*)R[6];acc=3;
-      }else{
-        R[6]=G(R[2],4);
-        R[3]=G(R[1],4);
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1254:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],2);
-      R[9]=R[4];R[5]=R[3];
-      R[3]=R[7];R[4]=R[8];
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1255:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[1],3);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1256:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=7;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1257:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],5);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],3);
-        R[9]=R[6];
-        R[6]=R[4];R[3]=R[5];
-        R[5]=R[7];R[4]=R[9];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[4]=G(R[1],5);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1258:
-    if(acc==3){
-      if(R[5]==F(0)){
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[9]=R[6];R[6]=R[5];
-        R[5]=R[4];R[4]=R[7];
-        ob=(word*)R[9];acc=4;
-      }else{
-        {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-        R[7]=F(0);
-        R[8]=BOOL(R[6]==R[7]);
-        if(R[8]==IFALSE){
-          R[9]=128*78+258;
-          R[10]=BOOL(R[6]==R[9]);
-          if(R[10]==IFALSE){
-            R[11]=128*62+258;
-            R[12]=BOOL(R[6]==R[11]);
-            if(R[12]==IFALSE){
-              R[13]=128*80+258;
-              R[14]=BOOL(R[6]==R[13]);
-              if(R[14]==IFALSE){
-                R[15]=G(R[1],2);
-                R[16]=G(R[1],3);
-                R[6]=R[5];
-                R[5]=R[4];R[4]=R[16];
-                ob=(word*)R[15];acc=4;
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-                R[16]=BOOL(R[15]==R[7]);
-                if(R[16]==IFALSE){
-                  R[17]=BOOL(R[15]==R[11]);
-                  if(R[17]==IFALSE){
-                    R[18]=BOOL(R[15]==R[9]);
-                    if(R[18]==IFALSE){
-                      R[19]=BOOL(R[15]==R[13]);
-                      if(R[19]==IFALSE){
-                        R[20]=G(R[1],2);
-                        R[21]=G(R[1],3);
-                        R[6]=R[5];
-                        R[5]=R[4];R[4]=R[21];
-                        ob=(word*)R[20];acc=4;
-                      }else{
-                        R[20]=G(R[1],4);
-                        *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                        ob=(word*)R[20];acc=2;
-                      }
-                    }else{
-                      R[19]=G(R[1],4);
-                      *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-                      ob=(word*)R[19];acc=2;
-                    }
-                  }else{
-                    R[18]=G(R[1],7);
-                    *fp=make_header(3,TCLOS);fp[1]=G(R[1],8);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    ob=(word*)R[18];acc=3;
-                  }
-                }else{
-                  R[17]=G(R[1],7);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[1],9);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  ob=(word*)R[17];acc=3;
-                }
-              }
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-              R[14]=BOOL(R[13]==R[7]);
-              if(R[14]==IFALSE){
-                R[15]=BOOL(R[13]==R[11]);
-                if(R[15]==IFALSE){
-                  R[16]=BOOL(R[13]==R[9]);
-                  if(R[16]==IFALSE){
-                    R[17]=128*80+258;
-                    R[18]=BOOL(R[13]==R[17]);
-                    if(R[18]==IFALSE){
-                      R[19]=G(R[1],2);
-                      R[20]=G(R[1],3);
-                      R[6]=R[5];
-                      R[5]=R[4];R[4]=R[20];
-                      ob=(word*)R[19];acc=4;
-                    }else{
-                      R[8]=R[3];R[3]=R[7];
-                      ob=(word*)R[8];acc=2;
-                    }
-                  }else{
-                    R[8]=R[3];R[3]=R[7];
-                    ob=(word*)R[8];acc=2;
-                  }
-                }else{
-                  {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[16]=F(q>>FBITS);R[17]=F(q);R[18]=F(a-q*b);}
-                  R[19]=G(R[1],4);
-                  *fp=make_header(4,TPROC);fp[1]=G(R[1],10);fp[3]=R[3];fp[2]=R[17];R[3]=(word)fp;fp+=4;
-                  R[4]=R[18];
-                  ob=(word*)R[19];acc=2;
-                }
-              }else{
-                {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[15]=F(q>>FBITS);R[16]=F(q);R[17]=F(a-q*b);}
-                R[18]=G(R[1],4);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],11);fp[3]=R[3];fp[2]=R[17];R[3]=(word)fp;fp+=4;
-                R[4]=R[16];
-                ob=(word*)R[18];acc=2;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-            R[12]=BOOL(R[11]==R[7]);
-            if(R[12]==IFALSE){
-              R[13]=BOOL(R[11]==R[9]);
-              if(R[13]==IFALSE){
-                R[14]=128*62+258;
-                R[15]=BOOL(R[11]==R[14]);
-                if(R[15]==IFALSE){
-                  R[16]=128*80+258;
-                  R[17]=BOOL(R[11]==R[16]);
-                  if(R[17]==IFALSE){
-                    R[18]=G(R[1],2);
-                    R[19]=G(R[1],3);
-                    R[6]=R[5];
-                    R[5]=R[4];R[4]=R[19];
-                    ob=(word*)R[18];acc=4;
-                  }else{
-                    R[18]=G(R[1],4);
-                    *fp=make_header(4,TCLOS);fp[1]=G(R[1],12);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-                    R[4]=R[5];
-                    ob=(word*)R[18];acc=2;
-                  }
-                }else{
-                  R[16]=G(R[1],7);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[1],13);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  ob=(word*)R[16];acc=3;
-                }
-              }else{
-                R[14]=G(R[1],14);
-                ob=(word*)R[14];acc=3;
-              }
-            }else{
-              R[13]=G(R[1],7);
-              *fp=make_header(3,TPROC);fp[1]=G(R[1],15);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-              ob=(word*)R[13];acc=3;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-          R[10]=BOOL(R[9]==R[7]);
-          if(R[10]==IFALSE){
-            R[11]=128*78+258;
-            R[12]=BOOL(R[9]==R[11]);
-            if(R[12]==IFALSE){
-              R[13]=128*62+258;
-              R[14]=BOOL(R[9]==R[13]);
-              if(R[14]==IFALSE){
-                R[15]=128*80+258;
-                R[16]=BOOL(R[9]==R[15]);
-                if(R[16]==IFALSE){
-                  R[17]=G(R[1],2);
-                  R[18]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[18];
-                  ob=(word*)R[17];acc=4;
-                }else{
-                  R[8]=R[3];R[3]=R[7];
-                  ob=(word*)R[8];acc=2;
-                }
-              }else{
-                {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[15]=F(q>>FBITS);R[16]=F(q);R[17]=F(a-q*b);}
-                R[18]=G(R[1],4);
-                *fp=make_header(4,TPROC);fp[1]=G(R[1],16);fp[3]=R[3];fp[2]=R[17];R[3]=(word)fp;fp+=4;
-                R[4]=R[16];
-                ob=(word*)R[18];acc=2;
-              }
-            }else{
-              R[8]=R[3];R[3]=R[7];
-              ob=(word*)R[8];acc=2;
-            }
-          }else{
-            {uint64_t a=(uint64_t)immval(R[7])<<FBITS|immval(R[4]);hval b=immval(R[5]);uint64_t q=a/b;R[11]=F(q>>FBITS);R[12]=F(q);R[13]=F(a-q*b);}
-            R[7]=R[3];
-            R[3]=R[12];R[4]=R[13];
-            ob=(word*)R[7];acc=2;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1259:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1260:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[4];R[7]=(word)fp;fp+=4;
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1261:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[4];R[7]=(word)fp;fp+=4;
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1262:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[8]=R[4];R[4]=R[7];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1263:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      R[7]=G(R[1],2);
-      R[8]=R[4];R[4]=R[7];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1264:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[6];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1265:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1266:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      ob=(word*)R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1267:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1268:
-    if(acc==2){
-      R[5]=G(R[2],2);
-      R[6]=G(R[1],2);
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1269:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=F(0);
-      R[5]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1270:
-    if(acc==4){
-      R[7]=G(R[2],2);
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[6];fp[5]=R[3];fp[4]=R[5];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=7;
-      R[6]=F(0);
-      R[5]=R[8];
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1271:
-    if(acc==1){
-      R[4]=128*2+258;
-      R[5]=prim_less(R[3],R[4]);
-      if(R[5]==IFALSE){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],3);
-        R[8]=G(R[1],4);
-        R[9]=G(R[1],5);
-        R[10]=G(R[1],6);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[10];fp[5]=R[9];fp[4]=R[8];fp[3]=R[3];fp[2]=R[7];R[11]=(word)fp;fp+=7;
-        R[4]=G(R[1],2);
-        R[5]=R[3];R[3]=R[11];
-        ob=(word*)R[6];acc=3;
-      }else{
-        R[6]=G(R[2],4);
-        R[7]=G(R[1],5);
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        R[10]=G(R[1],4);
-        R[11]=R[6];
-        R[3]=R[7];R[6]=R[10];
-        ob=(word*)R[11];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1272:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      R[9]=128*0+258;
-      R[5]=G(R[1],2);
-      R[11]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1273:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[9]=G(R[1],2);
-      R[10]=R[4];R[5]=R[3];
-      R[3]=R[8];R[4]=R[9];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1274:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[7];fp[5]=R[3];fp[4]=R[5];fp[3]=R[6];fp[2]=R[4];R[3]=(word)fp;fp+=7;
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1275:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],6);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[10]=(word)fp;fp+=8;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1276:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        R[8]=G(R[1],7);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[10]=G(R[1],3);
-        R[7]=R[4];R[4]=R[10];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],2);
-        R[7]=R[4];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1277:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=F(0);
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*62+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*78+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=128*80+258;
-            R[13]=BOOL(R[5]==R[12]);
-            if(R[13]==IFALSE){
-              R[14]=128*82+258;
-              R[15]=BOOL(R[5]==R[14]);
-              if(R[15]==IFALSE){
-                R[16]=G(R[1],2);
-                R[17]=G(R[1],3);
-                R[5]=R[4];R[4]=R[17];
-                ob=(word*)R[16];acc=3;
-              }else{
-                R[16]=128*0+258;
-                R[17]=prim_ref(R[4],R[16]);
-                {word ob=R[17];if(allocp(ob))ob=V(ob);R[18]=F((hval)ob>>TPOS&63);}
-                R[19]=BOOL(R[18]==R[6]);
-                if(R[19]==IFALSE){
-                  R[20]=BOOL(R[18]==R[8]);
-                  if(R[20]==IFALSE){
-                    R[21]=BOOL(R[18]==R[10]);
-                    if(R[21]==IFALSE){
-                      R[22]=BOOL(R[18]==R[12]);
-                      if(R[22]==IFALSE){
-                        R[23]=G(R[1],2);
-                        R[24]=G(R[1],4);
-                        R[5]=R[4];R[4]=R[24];
-                        ob=(word*)R[23];acc=3;
-                      }else{
-                        R[23]=ITRUE;
-                        ob=(word*)R[3];R[3]=R[23];acc=1;
-                      }
-                    }else{
-                      R[22]=IFALSE;
-                      ob=(word*)R[3];R[3]=R[22];acc=1;
-                    }
-                  }else{
-                    R[21]=ITRUE;
-                    ob=(word*)R[3];R[3]=R[21];acc=1;
-                  }
-                }else{
-                  R[20]=IFALSE;
-                  ob=(word*)R[3];R[3]=R[20];acc=1;
-                }
-              }
-            }else{
-              R[14]=ITRUE;
-              ob=(word*)R[3];R[3]=R[14];acc=1;
-            }
-          }else{
-            R[12]=IFALSE;
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }else{
-          R[10]=ITRUE;
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }
-      }else{
-        R[8]=IFALSE;
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1278:
-    if(acc==5){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-      if(R[8]==F(0)){
-        R[9]=F(0);
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        R[9]=128*2+258;
-        R[10]=prim_ref(R[4],R[9]);
-        R[11]=prim_ref(R[5],R[9]);
-        if(R[10]==INULL){
-          if(R[11]==INULL){
-            R[12]=128*0+258;
-            R[13]=prim_ref(R[5],R[12]);
-            R[14]=G(R[1],2);
-            if(R[13]==R[14]){
-              if(R[6]==F(0)){
-                R[15]=F(0);
-                ob=(word*)R[3];R[3]=R[15];acc=1;
-              }else{
-                R[15]=prim_ref(R[4],R[12]);
-                R[16]=G(R[1],3);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[15];R[3]=(word)fp;fp+=4;
-                R[4]=R[6];R[5]=R[12];
-                ob=(word*)R[16];acc=3;
-              }
-            }else{
-              R[15]=prim_ref(R[4],R[12]);
-              R[16]=G(R[1],5);
-              *fp=make_header(5,TCLOS);fp[1]=G(R[1],6);fp[4]=R[3];fp[3]=R[6];fp[2]=R[15];R[3]=(word)fp;fp+=5;
-              R[5]=R[12];R[4]=R[13];
-              ob=(word*)R[16];acc=3;
-            }
-          }else{
-            R[12]=F(0);
-            ob=(word*)R[3];R[3]=R[12];acc=1;
-          }
-        }else{
-          if(R[11]==INULL){
-            R[12]=prim_ref(R[4],R[9]);
-            R[13]=G(R[1],5);
-            *fp=make_header(6,TPROC);fp[1]=G(R[1],7);fp[5]=R[7];fp[4]=R[3];fp[3]=R[12];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-            R[5]=128*46+258;
-            R[4]=R[6];
-            ob=(word*)R[13];acc=3;
-          }else{
-            R[4]=prim_ref(R[4],R[9]);
-            R[5]=prim_ref(R[5],R[9]);
-            ob=(word*)R[7];acc=5;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1279:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=prim_less(R[4],R[3]);
-      if(R[5]==IFALSE){
-        R[6]=G(R[2],2);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],3);
-        R[9]=R[6];R[5]=R[3];
-        R[3]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[6]=G(R[2],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],3);
-        R[9]=R[6];R[5]=R[3];
-        R[3]=R[7];R[6]=R[8];
-        ob=(word*)R[9];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1280:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=G(R[2],3);
-      R[9]=R[4];
-      R[4]=R[6];R[6]=R[3];
-      R[3]=R[5];R[5]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1281:
-    if(acc==5){
-      if(R[4]==R[5]){
-        R[8]=G(R[1],2);
-        R[5]=128*0+258;
-        R[4]=R[6];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[8]=prim_less(R[4],R[5]);
-        if(R[8]==IFALSE){
-          {hval r=immval(R[5])+immval(R[5]);R[10]=F(r>>FBITS);R[9]=F(r);}
-          if(R[10]==F(0)){
-            R[11]=G(R[1],3);
-            *fp=make_header(6,TPROC);fp[1]=G(R[1],4);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[9];R[3]=(word)fp;fp+=6;
-            R[4]=R[6];
-            ob=(word*)R[11];acc=2;
-          }else{
-            R[11]=G(R[1],2);
-            R[4]=R[6];R[5]=R[10];
-            ob=(word*)R[11];acc=3;
-          }
-        }else{
-          R[9]=G(R[1],2);
-          R[5]=128*0+258;
-          R[4]=R[6];
-          ob=(word*)R[9];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1282:
-    if(acc==5){
-      if(R[6]==F(0)){
-        R[8]=F(0);
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        if(R[4]==R[5]){
-          R[8]=G(R[1],2);
-          R[5]=128*0+258;
-          R[4]=R[6];
-          ob=(word*)R[8];acc=3;
-        }else{
-          R[8]=prim_less(R[5],R[4]);
-          if(R[8]==IFALSE){
-            R[9]=128*0+258;
-            {hval x=immval(R[5]);uint n=immval(R[9]);R[10]=F(x>>n);R[11]=F(x<<(FBITS-n));}
-            R[12]=G(R[1],2);
-            *fp=make_header(6,TPROC);fp[1]=G(R[1],3);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[10];R[3]=(word)fp;fp+=6;
-            R[4]=R[6];R[5]=R[9];
-            ob=(word*)R[12];acc=3;
-          }else{
-            ob=(word*)R[3];R[3]=R[6];acc=1;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1283:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[10]=R[5];R[5]=R[7];
-      R[7]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1284:
-    if(acc==4){
-      if(R[4]==F(0)){
-        R[7]=F(0);
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[5]==F(0)){
-          R[7]=F(0);
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-          R[8]=F(0);
-          R[9]=BOOL(R[7]==R[8]);
-          if(R[9]==IFALSE){
-            R[10]=128*62+258;
-            R[11]=BOOL(R[7]==R[10]);
-            if(R[11]==IFALSE){
-              R[12]=128*78+258;
-              R[13]=BOOL(R[7]==R[12]);
-              if(R[13]==IFALSE){
-                R[14]=128*80+258;
-                R[15]=BOOL(R[7]==R[14]);
-                if(R[15]==IFALSE){
-                  R[16]=128*82+258;
-                  R[17]=BOOL(R[7]==R[16]);
-                  if(R[17]==IFALSE){
-                    R[18]=G(R[1],2);
-                    R[19]=G(R[1],3);
-                    R[6]=R[5];
-                    R[5]=R[4];R[4]=R[19];
-                    ob=(word*)R[18];acc=4;
-                  }else{
-                    {word ob=R[5];if(allocp(ob))ob=V(ob);R[18]=F((hval)ob>>TPOS&63);}
-                    R[19]=BOOL(R[18]==R[16]);
-                    if(R[19]==IFALSE){
-                      R[9]=R[5];
-                      R[5]=R[4];R[4]=R[9];
-                      ob=(word*)R[6];acc=4;
-                    }else{
-                      R[20]=G(R[1],2);
-                      R[21]=G(R[1],3);
-                      R[6]=R[5];
-                      R[5]=R[4];R[4]=R[21];
-                      ob=(word*)R[20];acc=4;
-                    }
-                  }
-                }else{
-                  {word ob=R[5];if(allocp(ob))ob=V(ob);R[16]=F((hval)ob>>TPOS&63);}
-                  R[17]=BOOL(R[16]==R[8]);
-                  if(R[17]==IFALSE){
-                    R[18]=BOOL(R[16]==R[10]);
-                    if(R[18]==IFALSE){
-                      R[19]=BOOL(R[16]==R[12]);
-                      if(R[19]==IFALSE){
-                        R[20]=BOOL(R[16]==R[14]);
-                        if(R[20]==IFALSE){
-                          R[21]=G(R[1],2);
-                          R[22]=G(R[1],3);
-                          R[6]=R[5];
-                          R[5]=R[4];R[4]=R[22];
-                          ob=(word*)R[21];acc=4;
-                        }else{
-                          R[21]=G(R[1],4);
-                          ob=(word*)R[21];acc=3;
-                        }
-                      }else{
-                        R[20]=G(R[1],4);
-                        *fp=make_header(3,TCLOS);fp[1]=G(R[1],5);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                        ob=(word*)R[20];acc=3;
-                      }
-                    }else{
-                      R[19]=G(R[1],6);
-                      R[9]=R[5];R[5]=R[4];
-                      R[6]=R[8];R[4]=R[9];
-                      ob=(word*)R[19];acc=4;
-                    }
-                  }else{
-                    R[18]=G(R[1],6);
-                    *fp=make_header(3,TCLOS);fp[1]=G(R[1],7);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    R[9]=R[5];R[5]=R[4];
-                    R[6]=R[8];R[4]=R[9];
-                    ob=(word*)R[18];acc=4;
-                  }
-                }
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-                R[15]=BOOL(R[14]==R[8]);
-                if(R[15]==IFALSE){
-                  R[16]=BOOL(R[14]==R[10]);
-                  if(R[16]==IFALSE){
-                    R[17]=BOOL(R[14]==R[12]);
-                    if(R[17]==IFALSE){
-                      R[18]=128*80+258;
-                      R[19]=BOOL(R[14]==R[18]);
-                      if(R[19]==IFALSE){
-                        R[20]=G(R[1],2);
-                        R[21]=G(R[1],3);
-                        R[6]=R[5];
-                        R[5]=R[4];R[4]=R[21];
-                        ob=(word*)R[20];acc=4;
-                      }else{
-                        R[20]=G(R[1],4);
-                        *fp=make_header(3,TCLOS);fp[1]=G(R[1],8);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                        ob=(word*)R[20];acc=3;
-                      }
-                    }else{
-                      R[18]=G(R[1],4);
-                      ob=(word*)R[18];acc=3;
-                    }
-                  }else{
-                    R[17]=G(R[1],6);
-                    *fp=make_header(3,TCLOS);fp[1]=G(R[1],9);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    R[9]=R[5];R[5]=R[4];
-                    R[6]=R[8];R[4]=R[9];
-                    ob=(word*)R[17];acc=4;
-                  }
-                }else{
-                  R[16]=G(R[1],6);
-                  R[9]=R[5];R[5]=R[4];
-                  R[6]=R[8];R[4]=R[9];
-                  ob=(word*)R[16];acc=4;
-                }
-              }
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[12]=F((hval)ob>>TPOS&63);}
-              R[13]=BOOL(R[12]==R[8]);
-              if(R[13]==IFALSE){
-                R[14]=BOOL(R[12]==R[10]);
-                if(R[14]==IFALSE){
-                  R[15]=128*78+258;
-                  R[16]=BOOL(R[12]==R[15]);
-                  if(R[16]==IFALSE){
-                    R[17]=128*80+258;
-                    R[18]=BOOL(R[12]==R[17]);
-                    if(R[18]==IFALSE){
-                      R[19]=G(R[1],2);
-                      R[20]=G(R[1],3);
-                      R[6]=R[5];
-                      R[5]=R[4];R[4]=R[20];
-                      ob=(word*)R[19];acc=4;
-                    }else{
-                      R[19]=G(R[1],6);
-                      R[6]=R[8];
-                      ob=(word*)R[19];acc=4;
-                    }
-                  }else{
-                    R[17]=G(R[1],6);
-                    *fp=make_header(3,TCLOS);fp[1]=G(R[1],10);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    R[6]=R[8];
-                    ob=(word*)R[17];acc=4;
-                  }
-                }else{
-                  {uint64_t p=(uint64_t)immval(R[4])*immval(R[5]);R[15]=F(p);R[16]=F(p>>FBITS);}
-                  R[17]=BOOL(R[16]==R[8]);
-                  if(R[17]==IFALSE){
-                    R[18]=INULL;
-                    *fp=make_header(3,40);fp[1]=R[16];fp[2]=R[18];R[19]=(word)fp;fp+=3;
-                    *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[19];R[20]=(word)fp;fp+=3;
-                    ob=(word*)R[3];R[3]=R[20];acc=1;
-                  }else{
-                    ob=(word*)R[3];R[3]=R[15];acc=1;
-                  }
-                }
-              }else{
-                {uint64_t p=(uint64_t)immval(R[4])*immval(R[5]);R[14]=F(p);R[15]=F(p>>FBITS);}
-                R[16]=BOOL(R[15]==R[8]);
-                *fp=make_header(3,TCLOS);fp[1]=G(R[1],11);fp[2]=R[3];R[17]=(word)fp;fp+=3;
-                if(R[16]==IFALSE){
-                  R[18]=INULL;
-                  *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[18];R[19]=(word)fp;fp+=3;
-                  *fp=make_header(3,40);fp[1]=R[14];fp[2]=R[19];R[3]=(word)fp;fp+=3;
-                  ob=(word*)R[17];acc=1;
-                }else{
-                  R[3]=R[14];
-                  ob=(word*)R[17];acc=1;
-                }
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[10]=F((hval)ob>>TPOS&63);}
-            R[11]=BOOL(R[10]==R[8]);
-            if(R[11]==IFALSE){
-              R[12]=128*62+258;
-              R[13]=BOOL(R[10]==R[12]);
-              if(R[13]==IFALSE){
-                R[14]=128*78+258;
-                R[15]=BOOL(R[10]==R[14]);
-                if(R[15]==IFALSE){
-                  R[16]=128*80+258;
-                  R[17]=BOOL(R[10]==R[16]);
-                  if(R[17]==IFALSE){
-                    R[18]=G(R[1],2);
-                    R[19]=G(R[1],3);
-                    R[6]=R[5];
-                    R[5]=R[4];R[4]=R[19];
-                    ob=(word*)R[18];acc=4;
-                  }else{
-                    R[18]=G(R[1],6);
-                    *fp=make_header(3,TCLOS);fp[1]=G(R[1],12);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    R[6]=R[8];
-                    ob=(word*)R[18];acc=4;
-                  }
-                }else{
-                  R[16]=G(R[1],6);
-                  R[6]=R[8];
-                  ob=(word*)R[16];acc=4;
-                }
-              }else{
-                {uint64_t p=(uint64_t)immval(R[4])*immval(R[5]);R[14]=F(p);R[15]=F(p>>FBITS);}
-                R[16]=BOOL(R[15]==R[8]);
-                *fp=make_header(3,TCLOS);fp[1]=G(R[1],13);fp[2]=R[3];R[17]=(word)fp;fp+=3;
-                if(R[16]==IFALSE){
-                  R[18]=INULL;
-                  *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[18];R[19]=(word)fp;fp+=3;
-                  *fp=make_header(3,40);fp[1]=R[14];fp[2]=R[19];R[3]=(word)fp;fp+=3;
-                  ob=(word*)R[17];acc=1;
-                }else{
-                  R[3]=R[14];
-                  ob=(word*)R[17];acc=1;
-                }
-              }
-            }else{
-              {uint64_t p=(uint64_t)immval(R[4])*immval(R[5]);R[12]=F(p);R[13]=F(p>>FBITS);}
-              R[14]=BOOL(R[13]==R[8]);
-              if(R[14]==IFALSE){
-                R[15]=INULL;
-                *fp=make_header(3,40);fp[1]=R[13];fp[2]=R[15];R[16]=(word)fp;fp+=3;
-                *fp=make_header(3,40);fp[1]=R[12];fp[2]=R[16];R[17]=(word)fp;fp+=3;
-                ob=(word*)R[3];R[3]=R[17];acc=1;
-              }else{
-                ob=(word*)R[3];R[3]=R[12];acc=1;
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1285:
-    if(acc==4){
-      if(R[4]==F(0)){
-        R[7]=F(0);
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[5]==F(0)){
-          R[7]=F(0);
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          R[7]=128*0+258;
-          if(R[4]==R[7]){
-            ob=(word*)R[3];R[3]=R[5];acc=1;
-          }else{
-            if(R[5]==R[7]){
-              ob=(word*)R[3];R[3]=R[4];acc=1;
-            }else{
-              {word ob=R[4];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-              if(R[8]==F(0)){
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-                if(R[9]==F(0)){
-                  {uint64_t p=(uint64_t)immval(R[4])*immval(R[5]);R[10]=F(p);R[11]=F(p>>FBITS);}
-                  R[12]=F(0);
-                  R[13]=BOOL(R[11]==R[12]);
-                  if(R[13]==IFALSE){
-                    R[14]=INULL;
-                    *fp=make_header(3,40);fp[1]=R[11];fp[2]=R[14];R[15]=(word)fp;fp+=3;
-                    *fp=make_header(3,40);fp[1]=R[10];fp[2]=R[15];R[16]=(word)fp;fp+=3;
-                    ob=(word*)R[3];R[3]=R[16];acc=1;
-                  }else{
-                    ob=(word*)R[3];R[3]=R[10];acc=1;
-                  }
-                }else{
-                  R[10]=G(R[1],2);
-                  R[6]=F(0);
-                  ob=(word*)R[10];acc=4;
-                }
-              }else{
-                {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-                if(R[9]==F(0)){
-                  R[10]=G(R[1],2);
-                  R[6]=F(0);
-                  R[9]=R[5];
-                  R[5]=R[4];R[4]=R[9];
-                  ob=(word*)R[10];acc=4;
-                }else{
-                  R[10]=128*2+258;
-                  R[11]=prim_ref(R[4],R[10]);
-                  if(R[11]==INULL){
-                    R[12]=prim_ref(R[5],R[10]);
-                    if(R[12]==INULL){
-                      R[13]=prim_ref(R[4],R[7]);
-                      R[14]=prim_ref(R[5],R[7]);
-                      {uint64_t p=(uint64_t)immval(R[13])*immval(R[14]);R[15]=F(p);R[16]=F(p>>FBITS);}
-                      R[17]=F(0);
-                      R[18]=BOOL(R[16]==R[17]);
-                      if(R[18]==IFALSE){
-                        R[19]=INULL;
-                        *fp=make_header(3,40);fp[1]=R[16];fp[2]=R[19];R[20]=(word)fp;fp+=3;
-                        *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[20];R[21]=(word)fp;fp+=3;
-                        ob=(word*)R[3];R[3]=R[21];acc=1;
-                      }else{
-                        ob=(word*)R[3];R[3]=R[15];acc=1;
-                      }
-                    }else{
-                      R[4]=prim_ref(R[4],R[7]);
-                      R[14]=G(R[1],2);
-                      R[6]=F(0);
-                      ob=(word*)R[14];acc=4;
-                    }
-                  }else{
-                    R[12]=prim_ref(R[5],R[10]);
-                    if(R[12]==INULL){
-                      R[13]=prim_ref(R[5],R[7]);
-                      R[14]=G(R[1],2);
-                      R[6]=F(0);
-                      R[5]=R[4];R[4]=R[13];
-                      ob=(word*)R[14];acc=4;
-                    }else{
-                      R[13]=G(R[1],3);
-                      *fp=make_header(6,TCLOS);fp[1]=G(R[1],4);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-                      R[8]=INULL;
-                      R[10]=ITRUE;
-                      R[11]=F(0);
-                      R[6]=R[4];
-                      R[7]=R[5];R[9]=R[8];
-                      ob=(word*)R[13];acc=9;
-                    }
-                  }
-                }
-              }
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1286:
-    if(acc==5){
-      R[8]=128*58+258;
-      R[9]=prim_less(R[7],R[8]);
-      if(R[9]==IFALSE){
-        R[10]=G(R[1],4);
-        R[11]=G(R[1],5);
-        *fp=make_header(9,TCLOS);fp[1]=G(R[2],2);fp[8]=R[11];fp[7]=R[7];fp[6]=R[10];fp[5]=R[5];fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[12]=(word)fp;fp+=9;
-        R[4]=R[3];
-        R[6]=R[10];R[3]=R[12];
-        ob=(word*)R[6];acc=4;
-      }else{
-        R[10]=G(R[2],3);
-        R[3]=G(R[1],5);
-        R[4]=G(R[1],3);
-        R[5]=G(R[1],2);
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1287:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      R[9]=G(R[1],7);
-      R[10]=G(R[1],8);
-      *fp=make_header(10,TCLOS);fp[1]=G(R[2],2);fp[9]=R[10];fp[8]=R[3];fp[7]=R[9];fp[6]=R[4];fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=10;
-      R[6]=R[4];
-      R[4]=R[5];R[5]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1288:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      R[10]=G(R[1],9);
-      *fp=make_header(9,TCLOS);fp[1]=G(R[2],3);fp[8]=R[10];fp[7]=R[9];fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=9;
-      R[12]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[12];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1289:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      R[9]=G(R[1],8);
-      *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=8;
-      R[11]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[4];R[4]=R[11];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1290:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],6);
-      R[8]=G(R[1],7);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[5]=R[3];R[6]=R[4];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1291:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=7;
-      R[8]=R[4];R[4]=R[7];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1292:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[10]=G(R[1],2);
-      R[8]=R[4];R[5]=R[3];
-      R[3]=R[9];R[4]=R[10];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1293:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[4];R[7]=(word)fp;fp+=5;
-      if(R[3]==F(0)){
-        R[3]=G(R[1],2);
-        ob=(word*)R[7];acc=1;
-      }else{
-        R[8]=G(R[2],2);
-        R[9]=G(R[1],2);
-        R[5]=R[3];R[6]=R[4];
-        R[3]=R[7];R[4]=R[9];
-        ob=(word*)R[8];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1294:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      if(R[4]==F(0)){
-        R[5]=G(R[1],4);
-        ob=(word*)R[5];acc=1;
-      }else{
-        R[5]=G(R[2],2);
-        R[6]=G(R[1],4);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        R[4]=G(R[1],2);
-        R[9]=128*0+258;
-        R[10]=R[5];R[5]=R[9];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1295:
-    if(acc==10){
-      if(R[4]==INULL){
-        R[13]=G(R[1],2);
-        *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[11];fp[4]=R[9];fp[3]=R[7];fp[2]=R[8];R[3]=(word)fp;fp+=7;
-        R[4]=R[6];
-        ob=(word*)R[13];acc=2;
-      }else{
-        if(R[5]==INULL){
-          R[13]=G(R[1],2);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],4);fp[6]=R[3];fp[5]=R[11];fp[4]=R[9];fp[3]=R[7];fp[2]=R[8];R[3]=(word)fp;fp+=7;
-          R[4]=R[6];
-          ob=(word*)R[13];acc=2;
-        }else{
-          if(R[10]==IFALSE){
-            {word*ob=(word*)R[6];hval hdr;assert(allocp(R[6]),R[6],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[13]=ob[1];R[14]=ob[2];}
-            {word*ob=(word*)R[7];hval hdr;assert(allocp(R[7]),R[7],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[15]=ob[1];R[16]=ob[2];}
-            R[17]=128*0+258;
-            {hval r=immval(R[11])+immval(R[17]);R[19]=F(r>>FBITS);R[18]=F(r);}
-            R[20]=128*2+258;
-            R[4]=prim_ref(R[4],R[20]);
-            R[5]=prim_ref(R[5],R[20]);
-            *fp=make_header(3,40);fp[1]=R[13];fp[2]=R[8];R[8]=(word)fp;fp+=3;
-            *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[9];R[9]=(word)fp;fp+=3;
-            R[10]=ITRUE;
-            R[6]=R[14];
-            R[7]=R[16];R[11]=R[18];
-            ob=(word*)R[12];acc=10;
-          }else{
-            R[13]=128*2+258;
-            R[4]=prim_ref(R[4],R[13]);
-            R[5]=prim_ref(R[5],R[13]);
-            R[10]=IFALSE;
-            ob=(word*)R[12];acc=10;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1296:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[3];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[7]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1297:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TCLOS);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[7]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1298:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],6);
-      *fp=make_header(7,TPROC);fp[1]=G(R[2],3);fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[10]=G(R[1],2);
-      R[7]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1299:
-    if(acc==1){
-      R[4]=G(R[1],6);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[4];R[4]=R[6];
-      R[6]=R[3];R[3]=R[5];
-      R[5]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1300:
-    if(acc==9){
-      R[12]=G(R[1],2);
-      ob=(word*)R[12];acc=10;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1301:
-    if(acc==3){
-      if(R[4]==INULL){
-        R[6]=F(0);
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[6]=ob[1];R[7]=ob[2];}
-        if(R[7]==INULL){
-          ob=(word*)R[3];R[3]=R[6];acc=1;
-        }else{
-          if(R[6]==F(0)){
-            R[4]=R[7];
-            ob=(word*)R[5];acc=3;
-          }else{
-            R[8]=G(R[1],2);
-            R[5]=INULL;
-            ob=(word*)R[8];acc=3;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1302:
-    if(acc==2){
-      R[5]=128*2+258;
-      R[6]=prim_ref(R[4],R[5]);
-      if(R[6]==INULL){
-        R[7]=128*0+258;
-        R[8]=prim_ref(R[4],R[7]);
-        ob=(word*)R[3];R[3]=R[8];acc=1;
-      }else{
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1303:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=INULL;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        R[7]=128*0+258;
-        R[8]=prim_ref(R[4],R[7]);
-        R[9]=128*2+258;
-        R[4]=prim_ref(R[4],R[9]);
-        *fp=make_header(5,TCLOS);fp[1]=G(R[1],2);fp[4]=R[3];fp[3]=R[8];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1304:
-    if(acc==1){
-      R[4]=F(0);
-      *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],4);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-      R[9]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[11]=R[6];
-      R[6]=R[4];R[4]=R[9];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1305:
-    if(acc==5){
-      if(R[6]==F(0)){
-        if(R[4]==INULL){
-          R[8]=G(R[1],2);
-          R[4]=R[5];
-          ob=(word*)R[8];acc=2;
-        }else{
-          R[8]=G(R[1],3);
-          ob=(word*)R[8];acc=3;
-        }
-      }else{
-        if(R[4]==INULL){
-          R[8]=G(R[1],4);
-          *fp=make_header(5,TCLOS);fp[1]=G(R[1],5);fp[4]=R[3];fp[3]=R[7];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-          R[5]=128*0+258;
-          R[4]=R[6];
-          ob=(word*)R[8];acc=3;
-        }else{
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-          if(R[8]==F(0)){
-            R[9]=INULL;
-            *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[9];R[4]=(word)fp;fp+=3;
-            ob=(word*)R[7];acc=5;
-          }else{
-            {word ob=R[6];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-            if(R[9]==F(0)){
-              R[10]=128*0+258;
-              {hval r=immval(R[6])-immval(R[10]);R[12]=F(r>>FBITS&1);R[11]=F(r);}
-              {word*ob=(word*)R[4];hval hdr;assert(allocp(R[4]),R[4],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[13]=ob[1];R[14]=ob[2];}
-              *fp=make_header(4,TPROC);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[13];R[3]=(word)fp;fp+=4;
-              R[6]=R[11];R[4]=R[14];
-              ob=(word*)R[7];acc=5;
-            }else{
-              R[10]=128*0+258;
-              R[11]=prim_ref(R[4],R[10]);
-              R[12]=128*2+258;
-              R[13]=prim_ref(R[4],R[12]);
-              R[14]=G(R[1],4);
-              *fp=make_header(7,TCLOS);fp[1]=G(R[1],7);fp[6]=R[3];fp[5]=R[11];fp[4]=R[7];fp[3]=R[13];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-              R[4]=R[6];R[5]=R[10];
-              ob=(word*)R[14];acc=3;
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1306:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],6);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=R[3];R[3]=R[7];
-      R[7]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1307:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],4);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],2);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=INULL;
-      R[8]=G(R[1],2);
-      R[10]=R[7];
-      R[11]=R[6];R[6]=R[3];
-      R[7]=R[4];R[5]=R[8];
-      R[4]=R[10];R[3]=R[11];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1308:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      if(R[5]==F(0)){
-        R[6]=INULL;
-        *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[6];R[7]=(word)fp;fp+=3;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1309:
-    if(acc==5){
-      if(R[5]==INULL){
-        if(R[6]==F(0)){
-          R[8]=INULL;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          R[8]=INULL;
-          *fp=make_header(3,40);fp[1]=R[6];fp[2]=R[8];R[9]=(word)fp;fp+=3;
-          ob=(word*)R[3];R[3]=R[9];acc=1;
-        }
-      }else{
-        if(R[6]==F(0)){
-          R[8]=128*0+258;
-          R[9]=prim_ref(R[5],R[8]);
-          {uint64_t p=(uint64_t)immval(R[4])*immval(R[9]);R[10]=F(p);R[11]=F(p>>FBITS);}
-          R[12]=128*2+258;
-          R[5]=prim_ref(R[5],R[12]);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-          R[6]=R[11];
-          ob=(word*)R[7];acc=5;
-        }else{
-          R[8]=128*0+258;
-          R[9]=prim_ref(R[5],R[8]);
-          {uint64_t p=(uint64_t)immval(R[4])*immval(R[9]);R[10]=F(p);R[11]=F(p>>FBITS);}
-          {hval r=immval(R[10])+immval(R[6]);R[13]=F(r>>FBITS);R[12]=F(r);}
-          {hval r=immval(R[11])+immval(R[13]);R[15]=F(r>>FBITS);R[14]=F(r);}
-          R[16]=128*2+258;
-          R[5]=prim_ref(R[5],R[16]);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[12];R[3]=(word)fp;fp+=4;
-          R[6]=R[14];
-          ob=(word*)R[7];acc=5;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1310:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*78+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=G(R[1],2);
-          R[12]=G(R[1],3);
-          R[6]=R[5];
-          R[5]=R[4];R[4]=R[12];
-          ob=(word*)R[11];acc=4;
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=G(R[1],2);
-              R[15]=G(R[1],3);
-              R[6]=R[5];
-              R[5]=R[4];R[4]=R[15];
-              ob=(word*)R[14];acc=4;
-            }else{
-              R[14]=G(R[1],4);
-              ob=(word*)R[14];acc=3;
-            }
-          }else{
-            R[13]=128*0+258;
-            R[14]=prim_ref(R[4],R[13]);
-            R[15]=R[5]^(FMAX<<IPOS&R[14]);
-            R[16]=128*2+258;
-            R[17]=prim_ref(R[4],R[16]);
-            *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[17];R[18]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[18];acc=1;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=G(R[1],2);
-            R[14]=G(R[1],3);
-            R[6]=R[5];
-            R[5]=R[4];R[4]=R[14];
-            ob=(word*)R[13];acc=4;
-          }else{
-            R[13]=128*0+258;
-            R[14]=prim_ref(R[5],R[13]);
-            R[15]=R[4]^(FMAX<<IPOS&R[14]);
-            R[16]=128*2+258;
-            R[17]=prim_ref(R[5],R[16]);
-            *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[17];R[18]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[18];acc=1;
-          }
-        }else{
-          R[11]=R[4]^(FMAX<<IPOS&R[5]);
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1311:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*78+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=G(R[1],2);
-          R[12]=G(R[1],3);
-          R[6]=R[5];
-          R[5]=R[4];R[4]=R[12];
-          ob=(word*)R[11];acc=4;
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=G(R[1],2);
-              R[15]=G(R[1],3);
-              R[6]=R[5];
-              R[5]=R[4];R[4]=R[15];
-              ob=(word*)R[14];acc=4;
-            }else{
-              R[14]=G(R[1],4);
-              ob=(word*)R[14];acc=3;
-            }
-          }else{
-            R[13]=128*0+258;
-            R[14]=prim_ref(R[4],R[13]);
-            R[15]=R[5]|R[14];
-            R[16]=128*2+258;
-            R[17]=prim_ref(R[4],R[16]);
-            *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[17];R[18]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[18];acc=1;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=G(R[1],2);
-            R[14]=G(R[1],3);
-            R[6]=R[5];
-            R[5]=R[4];R[4]=R[14];
-            ob=(word*)R[13];acc=4;
-          }else{
-            R[13]=128*0+258;
-            R[14]=prim_ref(R[5],R[13]);
-            R[15]=R[4]|R[14];
-            R[16]=128*2+258;
-            R[17]=prim_ref(R[5],R[16]);
-            *fp=make_header(3,40);fp[1]=R[15];fp[2]=R[17];R[18]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[18];acc=1;
-          }
-        }else{
-          R[11]=R[4]|R[5];
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1312:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*78+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=G(R[1],2);
-          R[12]=G(R[1],3);
-          R[6]=R[5];
-          R[5]=R[4];R[4]=R[12];
-          ob=(word*)R[11];acc=4;
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=G(R[1],2);
-              R[15]=G(R[1],3);
-              R[6]=R[5];
-              R[5]=R[4];R[4]=R[15];
-              ob=(word*)R[14];acc=4;
-            }else{
-              R[14]=G(R[1],4);
-              ob=(word*)R[14];acc=3;
-            }
-          }else{
-            R[13]=128*0+258;
-            R[14]=prim_ref(R[4],R[13]);
-            R[15]=R[14]&R[5];
-            ob=(word*)R[3];R[3]=R[15];acc=1;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=G(R[1],2);
-            R[14]=G(R[1],3);
-            R[6]=R[5];
-            R[5]=R[4];R[4]=R[14];
-            ob=(word*)R[13];acc=4;
-          }else{
-            R[13]=128*0+258;
-            R[14]=prim_ref(R[5],R[13]);
-            R[15]=R[4]&R[14];
-            ob=(word*)R[3];R[3]=R[15];acc=1;
-          }
-        }else{
-          R[11]=R[4]&R[5];
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1313:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],2);
-        R[3]=F(0);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=128*2+258;
-        R[5]=prim_ref(R[3],R[4]);
-        if(R[5]==INULL){
-          R[6]=128*0+258;
-          R[3]=prim_ref(R[3],R[6]);
-          R[8]=G(R[1],2);
-          ob=(word*)R[8];acc=1;
-        }else{
-          R[6]=G(R[1],2);
-          ob=(word*)R[6];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1314:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        if(R[5]==INULL){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          R[7]=128*0+258;
-          R[8]=prim_ref(R[4],R[7]);
-          R[9]=prim_ref(R[5],R[7]);
-          R[10]=R[8]^(FMAX<<IPOS&R[9]);
-          R[11]=128*2+258;
-          R[4]=prim_ref(R[4],R[11]);
-          R[5]=prim_ref(R[5],R[11]);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1315:
-    if(acc==1){
-      if(R[3]==INULL){
-        R[4]=G(R[1],2);
-        if(R[4]==F(0)){
-          R[5]=G(R[1],3);
-          R[3]=INULL;
-          ob=(word*)R[5];acc=1;
-        }else{
-          *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-          R[6]=G(R[1],3);
-          ob=(word*)R[6];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],2);
-        *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[6]=G(R[1],3);
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1316:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        if(R[5]==INULL){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          R[7]=128*0+258;
-          R[8]=prim_ref(R[4],R[7]);
-          R[9]=prim_ref(R[5],R[7]);
-          R[10]=R[8]|R[9];
-          R[11]=128*2+258;
-          R[4]=prim_ref(R[4],R[11]);
-          R[5]=prim_ref(R[5],R[11]);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1317:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=F(0);
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[5]==INULL){
-          R[7]=F(0);
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          R[7]=128*0+258;
-          R[8]=prim_ref(R[4],R[7]);
-          R[9]=prim_ref(R[5],R[7]);
-          R[10]=R[8]&R[9];
-          R[11]=128*2+258;
-          R[4]=prim_ref(R[4],R[11]);
-          R[5]=prim_ref(R[5],R[11]);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[10];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1318:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],3);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        {word ob=R[3];if(allocp(ob))ob=V(ob);R[4]=F((hval)ob>>TPOS&63);}
-        if(R[4]==F(0)){
-          R[5]=INULL;
-          *fp=make_header(3,40);fp[1]=R[3];fp[2]=R[5];R[6]=(word)fp;fp+=3;
-          R[7]=G(R[1],2);
-          *fp=make_header(3,40);fp[1]=R[7];fp[2]=R[6];R[3]=(word)fp;fp+=3;
-          R[9]=G(R[1],3);
-          ob=(word*)R[9];acc=1;
-        }else{
-          R[5]=G(R[1],2);
-          *fp=make_header(3,40);fp[1]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-          R[7]=G(R[1],3);
-          ob=(word*)R[7];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1319:
-    if(acc==4){
-      if(R[4]==F(0)){
-        R[7]=F(0);
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-        if(R[7]==F(0)){
-          R[8]=F(0);
-          R[9]=128*46+258;
-          {uint64_t a=(uint64_t)immval(R[8])<<FBITS|immval(R[5]);hval b=immval(R[9]);uint64_t q=a/b;R[10]=F(q>>FBITS);R[11]=F(q);R[12]=F(a-q*b);}
-          {hval r=immval(R[9])-immval(R[12]);R[14]=F(r>>FBITS&1);R[13]=F(r);}
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-          R[16]=BOOL(R[15]==R[8]);
-          if(R[16]==IFALSE){
-            R[17]=128*62+258;
-            R[18]=BOOL(R[15]==R[17]);
-            if(R[18]==IFALSE){
-              R[19]=128*78+258;
-              R[20]=BOOL(R[15]==R[19]);
-              if(R[20]==IFALSE){
-                R[21]=128*80+258;
-                R[22]=BOOL(R[15]==R[21]);
-                if(R[22]==IFALSE){
-                  R[23]=G(R[1],2);
-                  R[24]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[24];
-                  ob=(word*)R[23];acc=4;
-                }else{
-                  R[23]=G(R[1],4);
-                  *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[11];R[3]=(word)fp;fp+=4;
-                  R[6]=R[8];R[5]=R[13];
-                  ob=(word*)R[23];acc=4;
-                }
-              }else{
-                R[21]=G(R[1],4);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],6);fp[3]=R[3];fp[2]=R[11];R[3]=(word)fp;fp+=4;
-                R[6]=R[8];R[5]=R[13];
-                ob=(word*)R[21];acc=4;
-              }
-            }else{
-              {hval x=immval(R[4]);uint n=immval(R[13]);R[19]=F(x>>n);R[20]=F(x<<(FBITS-n));}
-              if(R[19]==F(0)){
-                if(R[11]==F(0)){
-                  R[21]=G(R[1],7);
-                  R[4]=R[20];
-                  ob=(word*)R[21];acc=2;
-                }else{
-                  R[21]=INULL;
-                  *fp=make_header(3,40);fp[1]=R[20];fp[2]=R[21];R[4]=(word)fp;fp+=3;
-                  R[23]=G(R[1],8);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[1],9);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  R[5]=R[11];
-                  ob=(word*)R[23];acc=3;
-                }
-              }else{
-                R[21]=INULL;
-                *fp=make_header(3,40);fp[1]=R[19];fp[2]=R[21];R[22]=(word)fp;fp+=3;
-                *fp=make_header(3,40);fp[1]=R[20];fp[2]=R[22];R[4]=(word)fp;fp+=3;
-                R[24]=G(R[1],8);
-                *fp=make_header(3,TCLOS);fp[1]=G(R[1],10);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                R[5]=R[11];
-                ob=(word*)R[24];acc=3;
-              }
-            }
-          }else{
-            {hval x=immval(R[4]);uint n=immval(R[13]);R[17]=F(x>>n);R[18]=F(x<<(FBITS-n));}
-            if(R[17]==F(0)){
-              if(R[11]==F(0)){
-                ob=(word*)R[3];R[3]=R[18];acc=1;
-              }else{
-                R[19]=INULL;
-                *fp=make_header(3,40);fp[1]=R[18];fp[2]=R[19];R[4]=(word)fp;fp+=3;
-                R[21]=G(R[1],8);
-                R[5]=R[11];
-                ob=(word*)R[21];acc=3;
-              }
-            }else{
-              if(R[11]==F(0)){
-                R[19]=INULL;
-                *fp=make_header(3,40);fp[1]=R[17];fp[2]=R[19];R[20]=(word)fp;fp+=3;
-                *fp=make_header(3,40);fp[1]=R[18];fp[2]=R[20];R[21]=(word)fp;fp+=3;
-                ob=(word*)R[3];R[3]=R[21];acc=1;
-              }else{
-                R[19]=INULL;
-                *fp=make_header(3,40);fp[1]=R[17];fp[2]=R[19];R[20]=(word)fp;fp+=3;
-                *fp=make_header(3,40);fp[1]=R[18];fp[2]=R[20];R[4]=(word)fp;fp+=3;
-                R[22]=G(R[1],8);
-                R[5]=R[11];
-                ob=(word*)R[22];acc=3;
-              }
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[8]=F((hval)ob>>TPOS&63);}
-          R[9]=128*78+258;
-          if(R[8]==R[9]){
-            *fp=make_header(5,TCLOS);fp[1]=G(R[1],11);fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-            R[5]=G(R[1],12);
-            ob=(word*)R[6];acc=4;
-          }else{
-            R[10]=G(R[1],2);
-            R[11]=G(R[1],3);
-            R[6]=R[5];
-            R[5]=R[4];R[4]=R[11];
-            ob=(word*)R[10];acc=4;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1320:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],4);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],3);fp[4]=R[6];fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=5;
-      R[8]=G(R[1],2);
-      R[5]=G(R[2],4);
-      R[10]=R[4];R[4]=R[8];
-      ob=(word*)R[10];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1321:
-    if(acc==4){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        R[7]=128*0+258;
-        {hval r=immval(R[5])-immval(R[7]);R[9]=F(r>>FBITS&1);R[8]=F(r);}
-        R[10]=F(0);
-        *fp=make_header(3,40);fp[1]=R[10];fp[2]=R[4];R[4]=(word)fp;fp+=3;
-        R[5]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1322:
-    if(acc==5){
-      if(R[4]==INULL){
-        if(R[6]==F(0)){
-          R[8]=INULL;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          R[8]=INULL;
-          *fp=make_header(3,40);fp[1]=R[6];fp[2]=R[8];R[9]=(word)fp;fp+=3;
-          ob=(word*)R[3];R[3]=R[9];acc=1;
-        }
-      }else{
-        R[8]=128*0+258;
-        R[9]=prim_ref(R[4],R[8]);
-        {hval x=immval(R[9]);uint n=immval(R[5]);R[10]=F(x>>n);R[11]=F(x<<(FBITS-n));}
-        R[12]=R[6]|R[11];
-        R[13]=128*2+258;
-        R[4]=prim_ref(R[4],R[13]);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[12];R[3]=(word)fp;fp+=4;
-        R[6]=R[10];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1323:
-    if(acc==4){
-      {word ob=R[5];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-      R[8]=F(0);
-      R[9]=BOOL(R[7]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*78+258;
-        R[11]=BOOL(R[7]==R[10]);
-        if(R[11]==IFALSE){
-          R[12]=G(R[1],2);
-          R[13]=G(R[1],3);
-          R[6]=R[5];
-          R[5]=R[4];R[4]=R[13];
-          ob=(word*)R[12];acc=4;
-        }else{
-          if(R[4]==F(0)){
-            ob=(word*)R[3];R[3]=R[8];acc=1;
-          }else{
-            R[12]=128*2+258;
-            R[13]=prim_ref(R[4],R[12]);
-            R[14]=G(R[1],4);
-            *fp=make_header(5,TPROC);fp[1]=G(R[1],5);fp[4]=R[6];fp[3]=R[3];fp[2]=R[13];R[3]=(word)fp;fp+=5;
-            R[16]=128*46+258;
-            R[4]=R[5];R[5]=R[16];
-            ob=(word*)R[14];acc=3;
-          }
-        }
-      }else{
-        R[10]=128*46+258;
-        {uint64_t a=(uint64_t)immval(R[8])<<FBITS|immval(R[5]);hval b=immval(R[10]);uint64_t q=a/b;R[11]=F(q>>FBITS);R[12]=F(q);R[13]=F(a-q*b);}
-        if(R[12]==F(0)){
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-          R[15]=BOOL(R[14]==R[8]);
-          if(R[15]==IFALSE){
-            R[16]=128*62+258;
-            R[17]=BOOL(R[14]==R[16]);
-            if(R[17]==IFALSE){
-              R[18]=128*78+258;
-              R[19]=BOOL(R[14]==R[18]);
-              if(R[19]==IFALSE){
-                R[20]=128*80+258;
-                R[21]=BOOL(R[14]==R[20]);
-                if(R[21]==IFALSE){
-                  R[22]=G(R[1],2);
-                  R[23]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[23];
-                  ob=(word*)R[22];acc=4;
-                }else{
-                  R[22]=G(R[1],6);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[1],7);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  R[5]=R[13];
-                  ob=(word*)R[22];acc=3;
-                }
-              }else{
-                R[20]=G(R[1],6);
-                R[5]=R[13];
-                ob=(word*)R[20];acc=3;
-              }
-            }else{
-              {hval x=immval(R[4]);uint n=immval(R[13]);R[18]=F(x>>n);R[19]=F(x<<(FBITS-n));}
-              if(R[18]==F(0)){
-                ob=(word*)R[3];R[3]=R[8];acc=1;
-              }else{
-                R[20]=G(R[1],8);
-                R[4]=R[18];
-                ob=(word*)R[20];acc=2;
-              }
-            }
-          }else{
-            {hval x=immval(R[4]);uint n=immval(R[13]);R[16]=F(x>>n);R[17]=F(x<<(FBITS-n));}
-            ob=(word*)R[3];R[3]=R[16];acc=1;
-          }
-        }else{
-          {word ob=R[4];if(allocp(ob))ob=V(ob);R[14]=F((hval)ob>>TPOS&63);}
-          R[15]=BOOL(R[14]==R[8]);
-          if(R[15]==IFALSE){
-            R[16]=128*62+258;
-            R[17]=BOOL(R[14]==R[16]);
-            if(R[17]==IFALSE){
-              R[18]=128*78+258;
-              R[19]=BOOL(R[14]==R[18]);
-              if(R[19]==IFALSE){
-                R[20]=128*80+258;
-                R[21]=BOOL(R[14]==R[20]);
-                if(R[21]==IFALSE){
-                  R[22]=G(R[1],2);
-                  R[23]=G(R[1],3);
-                  R[6]=R[5];
-                  R[5]=R[4];R[4]=R[23];
-                  ob=(word*)R[22];acc=4;
-                }else{
-                  R[22]=G(R[1],9);
-                  *fp=make_header(4,TCLOS);fp[1]=G(R[1],10);fp[3]=R[3];fp[2]=R[13];R[3]=(word)fp;fp+=4;
-                  R[5]=R[12];
-                  ob=(word*)R[22];acc=3;
-                }
-              }else{
-                R[20]=G(R[1],9);
-                *fp=make_header(4,TCLOS);fp[1]=G(R[1],11);fp[3]=R[3];fp[2]=R[13];R[3]=(word)fp;fp+=4;
-                R[5]=R[12];
-                ob=(word*)R[20];acc=3;
-              }
-            }else{
-              ob=(word*)R[3];R[3]=R[8];acc=1;
-            }
-          }else{
-            ob=(word*)R[3];R[3]=R[8];acc=1;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1324:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[5]=G(R[1],2);
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1325:
-    if(acc==4){
-      if(R[5]==F(0)){
-        ob=(word*)R[3];R[3]=R[4];acc=1;
-      }else{
-        if(R[4]==INULL){
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }else{
-          R[7]=128*0+258;
-          {hval r=immval(R[5])-immval(R[7]);R[9]=F(r>>FBITS&1);R[8]=F(r);}
-          R[10]=128*2+258;
-          R[4]=prim_ref(R[4],R[10]);
-          R[5]=R[8];
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1326:
-    if(acc==3){
-      if(R[4]==INULL){
-        R[6]=F(0);
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[6]=128*0+258;
-        R[7]=prim_ref(R[4],R[6]);
-        {hval x=immval(R[7]);uint n=immval(R[5]);R[8]=F(x>>n);R[9]=F(x<<(FBITS-n));}
-        R[10]=128*2+258;
-        R[11]=prim_ref(R[4],R[10]);
-        R[12]=G(R[1],2);
-        R[7]=ITRUE;
-        R[6]=R[5];
-        R[4]=R[8];R[5]=R[11];
-        ob=(word*)R[12];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1327:
-    if(acc==6){
-      if(R[5]==INULL){
-        if(R[7]==IFALSE){
-          if(R[4]==F(0)){
-            R[9]=IFALSE;
-            ob=(word*)R[3];R[3]=R[9];acc=1;
-          }else{
-            R[9]=INULL;
-            *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[9];R[10]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[10];acc=1;
-          }
-        }else{
-          ob=(word*)R[3];R[3]=R[4];acc=1;
-        }
-      }else{
-        R[9]=128*0+258;
-        R[10]=prim_ref(R[5],R[9]);
-        {hval x=immval(R[10]);uint n=immval(R[6]);R[11]=F(x>>n);R[12]=F(x<<(FBITS-n));}
-        R[13]=R[4]|R[12];
-        R[14]=128*2+258;
-        R[5]=prim_ref(R[5],R[14]);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],2);fp[4]=R[3];fp[3]=R[13];fp[2]=R[7];R[3]=(word)fp;fp+=5;
-        R[7]=IFALSE;
-        R[4]=R[11];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1328:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        if(R[4]==F(0)){
-          R[5]=G(R[1],2);
-          if(R[5]==IFALSE){
-            R[6]=G(R[1],4);
-            R[3]=IFALSE;
-            ob=(word*)R[6];acc=1;
-          }else{
-            R[6]=G(R[1],4);
-            R[3]=F(0);
-            ob=(word*)R[6];acc=1;
-          }
-        }else{
-          R[5]=G(R[1],2);
-          if(R[5]==IFALSE){
-            R[6]=INULL;
-            *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=3;
-            R[8]=G(R[1],4);
-            ob=(word*)R[8];acc=1;
-          }else{
-            R[6]=G(R[1],4);
-            R[3]=R[4];
-            ob=(word*)R[6];acc=1;
-          }
-        }
-      }else{
-        R[4]=G(R[1],3);
-        *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[6]=G(R[1],4);
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1329:
-    if(acc==3){
-      if(R[5]==F(0)){
-        R[6]=G(R[1],2);
-        R[7]=G(R[1],3);
-        R[9]=R[6];R[6]=R[5];
-        R[5]=R[4];R[4]=R[7];
-        ob=(word*)R[9];acc=4;
-      }else{
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TCLOS);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[5]=INULL;
-        ob=(word*)R[6];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1330:
-    if(acc==1){
-      {word*ob=(word*)R[3];hval hdr;assert(allocp(R[3]),R[3],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[4]=ob[1];R[5]=ob[2];}
-      R[6]=G(R[2],2);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[9]=INULL;
-      R[10]=R[6];R[3]=R[7];
-      R[6]=R[8];R[7]=R[9];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1331:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        R[7]=128*2+258;
-        R[8]=prim_ref(R[4],R[7]);
-        R[9]=128*0+258;
-        R[10]=prim_ref(R[4],R[9]);
-        *fp=make_header(3,40);fp[1]=R[10];fp[2]=R[5];R[5]=(word)fp;fp+=3;
-        R[4]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1332:
-    if(acc==6){
-      if(R[5]==INULL){
-        R[9]=128*2+258;
-        R[10]=prim_ref(R[7],R[9]);
-        if(R[10]==INULL){
-          R[11]=128*0+258;
-          R[12]=prim_ref(R[7],R[11]);
-          R[7]=R[3];R[3]=R[12];
-          ob=(word*)R[7];acc=2;
-        }else{
-          R[8]=R[3];R[3]=R[7];
-          ob=(word*)R[8];acc=2;
-        }
-      }else{
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[9]=ob[1];R[10]=ob[2];}
-        {uint64_t a=(uint64_t)immval(R[4])<<FBITS|immval(R[9]);hval b=immval(R[6]);uint64_t q=a/b;R[11]=F(q>>FBITS);R[12]=F(q);R[13]=F(a-q*b);}
-        if(R[11]==F(0)){
-          *fp=make_header(3,40);fp[1]=R[12];fp[2]=R[7];R[7]=(word)fp;fp+=3;
-          R[5]=R[10];R[4]=R[13];
-          ob=(word*)R[8];acc=6;
-        }else{
-          *fp=make_header(3,40);fp[1]=R[11];fp[2]=R[7];R[14]=(word)fp;fp+=3;
-          *fp=make_header(3,40);fp[1]=R[12];fp[2]=R[14];R[7]=(word)fp;fp+=3;
-          R[5]=R[10];R[4]=R[13];
-          ob=(word*)R[8];acc=6;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1333:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*62+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[6]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*80+258;
-            R[14]=BOOL(R[6]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=G(R[1],2);
-              ob=(word*)R[15];acc=3;
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-              R[16]=BOOL(R[15]==R[7]);
-              if(R[16]==IFALSE){
-                R[17]=BOOL(R[15]==R[9]);
-                if(R[17]==IFALSE){
-                  R[18]=BOOL(R[15]==R[11]);
-                  if(R[18]==IFALSE){
-                    R[19]=BOOL(R[15]==R[13]);
-                    if(R[19]==IFALSE){
-                      R[20]=G(R[1],2);
-                      R[8]=R[5];
-                      R[5]=R[4];R[4]=R[8];
-                      ob=(word*)R[20];acc=3;
-                    }else{
-                      R[20]=G(R[2],2);
-                      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                      R[6]=R[7];
-                      ob=(word*)R[20];acc=4;
-                    }
-                  }else{
-                    R[19]=G(R[2],4);
-                    R[8]=R[5];
-                    R[5]=R[4];R[4]=R[8];
-                    ob=(word*)R[19];acc=3;
-                  }
-                }else{
-                  R[18]=G(R[2],5);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[2],6);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  R[8]=R[5];
-                  R[5]=R[4];R[4]=R[8];
-                  ob=(word*)R[18];acc=3;
-                }
-              }else{
-                R[17]=G(R[2],7);
-                R[6]=ITRUE;
-                R[9]=R[5];
-                R[5]=R[4];R[4]=R[9];
-                ob=(word*)R[17];acc=4;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-            R[14]=BOOL(R[13]==R[7]);
-            if(R[14]==IFALSE){
-              R[15]=BOOL(R[13]==R[9]);
-              if(R[15]==IFALSE){
-                R[16]=BOOL(R[13]==R[11]);
-                if(R[16]==IFALSE){
-                  R[17]=128*80+258;
-                  R[18]=BOOL(R[13]==R[17]);
-                  if(R[18]==IFALSE){
-                    R[19]=G(R[1],2);
-                    R[8]=R[5];
-                    R[5]=R[4];R[4]=R[8];
-                    ob=(word*)R[19];acc=3;
-                  }else{
-                    R[19]=G(R[2],4);
-                    ob=(word*)R[19];acc=3;
-                  }
-                }else{
-                  R[17]=G(R[2],2);
-                  R[6]=R[7];
-                  ob=(word*)R[17];acc=4;
-                }
-              }else{
-                R[16]=G(R[2],8);
-                R[6]=ITRUE;
-                ob=(word*)R[16];acc=4;
-              }
-            }else{
-              R[15]=G(R[2],5);
-              R[8]=R[5];
-              R[5]=R[4];R[4]=R[8];
-              ob=(word*)R[15];acc=3;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=128*78+258;
-              R[15]=BOOL(R[11]==R[14]);
-              if(R[15]==IFALSE){
-                R[16]=128*80+258;
-                R[17]=BOOL(R[11]==R[16]);
-                if(R[17]==IFALSE){
-                  R[18]=G(R[1],2);
-                  R[8]=R[5];
-                  R[5]=R[4];R[4]=R[8];
-                  ob=(word*)R[18];acc=3;
-                }else{
-                  R[18]=G(R[2],5);
-                  *fp=make_header(3,TCLOS);fp[1]=G(R[2],9);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                  ob=(word*)R[18];acc=3;
-                }
-              }else{
-                R[16]=G(R[2],8);
-                R[6]=ITRUE;
-                R[9]=R[5];
-                R[5]=R[4];R[4]=R[9];
-                ob=(word*)R[16];acc=4;
-              }
-            }else{
-              R[14]=G(R[2],10);
-              ob=(word*)R[14];acc=3;
-            }
-          }else{
-            {hval r=immval(R[5])-immval(R[4]);R[14]=F(r>>FBITS&1);R[13]=F(r);}
-            R[15]=BOOL(R[14]==R[7]);
-            if(R[15]==IFALSE){
-              {hval r=immval(R[4])-immval(R[5]);R[17]=F(r>>FBITS&1);R[16]=F(r);}
-              R[18]=G(R[2],11);
-              R[4]=R[16];
-              ob=(word*)R[18];acc=2;
-            }else{
-              ob=(word*)R[3];R[3]=R[13];acc=1;
-            }
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*62+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*78+258;
-            R[14]=BOOL(R[9]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=128*80+258;
-              R[16]=BOOL(R[9]==R[15]);
-              if(R[16]==IFALSE){
-                R[17]=G(R[1],2);
-                R[8]=R[5];
-                R[5]=R[4];R[4]=R[8];
-                ob=(word*)R[17];acc=3;
-              }else{
-                R[17]=G(R[2],7);
-                R[6]=ITRUE;
-                ob=(word*)R[17];acc=4;
-              }
-            }else{
-              R[15]=G(R[2],5);
-              ob=(word*)R[15];acc=3;
-            }
-          }else{
-            {hval r=immval(R[4])-immval(R[5]);R[14]=F(r>>FBITS&1);R[13]=F(r);}
-            R[15]=BOOL(R[14]==R[7]);
-            if(R[15]==IFALSE){
-              {hval r=immval(R[5])-immval(R[4]);R[17]=F(r>>FBITS&1);R[16]=F(r);}
-              R[18]=G(R[2],11);
-              R[4]=R[16];
-              ob=(word*)R[18];acc=2;
-            }else{
-              ob=(word*)R[3];R[3]=R[13];acc=1;
-            }
-          }
-        }else{
-          {hval r=immval(R[4])+immval(R[5]);R[12]=F(r>>FBITS);R[11]=F(r);}
-          R[13]=BOOL(R[12]==R[7]);
-          if(R[13]==IFALSE){
-            R[14]=G(R[2],12);
-            *fp=make_header(3,40);fp[1]=R[11];fp[2]=R[14];R[15]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[15];acc=1;
-          }else{
-            ob=(word*)R[3];R[3]=R[11];acc=1;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1334:
-    if(acc==2){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1335:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*62+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[6]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*80+258;
-            R[14]=BOOL(R[6]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=G(R[1],2);
-              ob=(word*)R[15];acc=3;
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-              R[16]=BOOL(R[15]==R[7]);
-              if(R[16]==IFALSE){
-                R[17]=BOOL(R[15]==R[9]);
-                if(R[17]==IFALSE){
-                  R[18]=BOOL(R[15]==R[11]);
-                  if(R[18]==IFALSE){
-                    R[19]=BOOL(R[15]==R[13]);
-                    if(R[19]==IFALSE){
-                      R[20]=G(R[1],2);
-                      ob=(word*)R[20];acc=3;
-                    }else{
-                      R[20]=G(R[2],2);
-                      R[8]=R[5];
-                      R[5]=R[4];R[4]=R[8];
-                      ob=(word*)R[20];acc=3;
-                    }
-                  }else{
-                    R[19]=G(R[2],3);
-                    *fp=make_header(3,TCLOS);fp[1]=G(R[2],4);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                    R[6]=R[7];
-                    ob=(word*)R[19];acc=4;
-                  }
-                }else{
-                  R[18]=G(R[2],5);
-                  R[6]=ITRUE;
-                  R[9]=R[5];
-                  R[5]=R[4];R[4]=R[9];
-                  ob=(word*)R[18];acc=4;
-                }
-              }else{
-                R[17]=G(R[2],6);
-                *fp=make_header(3,TCLOS);fp[1]=G(R[2],7);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                R[8]=R[5];
-                R[5]=R[4];R[4]=R[8];
-                ob=(word*)R[17];acc=3;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-            R[14]=BOOL(R[13]==R[7]);
-            if(R[14]==IFALSE){
-              R[15]=BOOL(R[13]==R[9]);
-              if(R[15]==IFALSE){
-                R[16]=BOOL(R[13]==R[11]);
-                if(R[16]==IFALSE){
-                  R[17]=128*80+258;
-                  R[18]=BOOL(R[13]==R[17]);
-                  if(R[18]==IFALSE){
-                    R[19]=G(R[1],2);
-                    ob=(word*)R[19];acc=3;
-                  }else{
-                    R[19]=G(R[2],3);
-                    R[6]=R[7];
-                    ob=(word*)R[19];acc=4;
-                  }
-                }else{
-                  R[17]=G(R[2],2);
-                  ob=(word*)R[17];acc=3;
-                }
-              }else{
-                R[16]=G(R[2],6);
-                R[8]=R[5];
-                R[5]=R[4];R[4]=R[8];
-                ob=(word*)R[16];acc=3;
-              }
-            }else{
-              R[15]=G(R[2],8);
-              R[6]=ITRUE;
-              ob=(word*)R[15];acc=4;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=128*78+258;
-              R[15]=BOOL(R[11]==R[14]);
-              if(R[15]==IFALSE){
-                R[16]=128*80+258;
-                R[17]=BOOL(R[11]==R[16]);
-                if(R[17]==IFALSE){
-                  R[18]=G(R[1],2);
-                  ob=(word*)R[18];acc=3;
-                }else{
-                  R[18]=G(R[2],8);
-                  R[6]=ITRUE;
-                  R[9]=R[5];
-                  R[5]=R[4];R[4]=R[9];
-                  ob=(word*)R[18];acc=4;
-                }
-              }else{
-                R[16]=G(R[2],6);
-                *fp=make_header(3,TCLOS);fp[1]=G(R[2],9);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                ob=(word*)R[16];acc=3;
-              }
-            }else{
-              {hval r=immval(R[5])-immval(R[4]);R[15]=F(r>>FBITS&1);R[14]=F(r);}
-              R[16]=BOOL(R[15]==R[7]);
-              if(R[16]==IFALSE){
-                {hval r=immval(R[4])-immval(R[5]);R[18]=F(r>>FBITS&1);R[17]=F(r);}
-                R[19]=G(R[2],10);
-                R[4]=R[17];
-                ob=(word*)R[19];acc=2;
-              }else{
-                ob=(word*)R[3];R[3]=R[14];acc=1;
-              }
-            }
-          }else{
-            R[13]=G(R[2],11);
-            ob=(word*)R[13];acc=3;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*62+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*78+258;
-            R[14]=BOOL(R[9]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=128*80+258;
-              R[16]=BOOL(R[9]==R[15]);
-              if(R[16]==IFALSE){
-                R[17]=G(R[1],2);
-                ob=(word*)R[17];acc=3;
-              }else{
-                R[17]=G(R[2],6);
-                ob=(word*)R[17];acc=3;
-              }
-            }else{
-              R[15]=G(R[2],5);
-              R[6]=ITRUE;
-              ob=(word*)R[15];acc=4;
-            }
-          }else{
-            {hval r=immval(R[4])+immval(R[5]);R[14]=F(r>>FBITS);R[13]=F(r);}
-            R[15]=BOOL(R[14]==R[7]);
-            if(R[15]==IFALSE){
-              R[16]=G(R[2],12);
-              *fp=make_header(3,40);fp[1]=R[13];fp[2]=R[16];R[17]=(word)fp;fp+=3;
-              ob=(word*)R[3];R[3]=R[17];acc=1;
-            }else{
-              ob=(word*)R[3];R[3]=R[13];acc=1;
-            }
-          }
-        }else{
-          {hval r=immval(R[4])-immval(R[5]);R[12]=F(r>>FBITS&1);R[11]=F(r);}
-          R[13]=BOOL(R[12]==R[7]);
-          if(R[13]==IFALSE){
-            {hval r=immval(R[5])-immval(R[4]);R[15]=F(r>>FBITS&1);R[14]=F(r);}
-            R[16]=G(R[2],10);
-            R[4]=R[14];
-            ob=(word*)R[16];acc=2;
-          }else{
-            ob=(word*)R[3];R[3]=R[11];acc=1;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1336:
-    if(acc==3){
-      {hval r=immval(R[4])+immval(R[5]);R[7]=F(r>>FBITS);R[6]=F(r);}
-      if(R[7]==F(0)){
-        R[8]=G(R[1],2);
-        R[4]=R[6];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[8]=G(R[1],3);
-        *fp=make_header(3,41);fp[1]=R[6];fp[2]=R[8];R[9]=(word)fp;fp+=3;
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1337:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[7]=(word)fp;fp+=5;
-      R[8]=IFALSE;
-      R[9]=R[6];
-      R[3]=R[7];R[6]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1338:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=F(0);
-        R[9]=ITRUE;
-        R[10]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        R[6]=R[8];R[7]=R[9];
-        ob=(word*)R[10];acc=5;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-        R[7]=G(R[1],2);
-        R[8]=G(R[1],3);
-        R[9]=F(0);
-        R[10]=ITRUE;
-        R[11]=R[4];R[3]=R[6];
-        R[4]=R[7];R[5]=R[8];
-        R[6]=R[9];R[7]=R[10];
-        ob=(word*)R[11];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1339:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        {word ob=R[3];if(allocp(ob))ob=V(ob);R[4]=F((hval)ob>>TPOS&63);}
-        if(R[4]==F(0)){
-          R[5]=G(R[2],2);
-          R[6]=G(R[1],2);
-          R[4]=R[3];R[3]=R[6];
-          ob=(word*)R[5];acc=2;
-        }else{
-          R[5]=G(R[2],3);
-          R[6]=G(R[1],2);
-          R[4]=R[3];R[3]=R[6];
-          ob=(word*)R[5];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1340:
-    if(acc==6){
-      if(R[4]==INULL){
-        R[9]=IFALSE;
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }else{
-        if(R[5]==INULL){
-          if(R[6]==F(0)){
-            ob=(word*)R[3];R[3]=R[4];acc=1;
-          }else{
-            R[9]=G(R[1],2);
-            R[5]=R[6];R[6]=R[7];
-            ob=(word*)R[9];acc=4;
-          }
-        }else{
-          R[9]=128*0+258;
-          R[10]=prim_ref(R[4],R[9]);
-          R[11]=prim_ref(R[5],R[9]);
-          {hval r=immval(R[10])-immval(R[11]);R[13]=F(r>>FBITS&1);R[12]=F(r);}
-          if(R[6]==F(0)){
-            R[14]=128*2+258;
-            R[4]=prim_ref(R[4],R[14]);
-            R[5]=prim_ref(R[5],R[14]);
-            *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[7];fp[2]=R[12];R[3]=(word)fp;fp+=5;
-            R[7]=IFALSE;
-            R[6]=R[13];
-            ob=(word*)R[8];acc=6;
-          }else{
-            {hval r=immval(R[12])-immval(R[9]);R[15]=F(r>>FBITS&1);R[14]=F(r);}
-            R[16]=128*2+258;
-            R[4]=prim_ref(R[4],R[16]);
-            R[5]=prim_ref(R[5],R[16]);
-            R[6]=R[13]|R[15];
-            *fp=make_header(5,TPROC);fp[1]=G(R[1],4);fp[4]=R[3];fp[3]=R[7];fp[2]=R[14];R[3]=(word)fp;fp+=5;
-            R[7]=IFALSE;
-            ob=(word*)R[8];acc=6;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1341:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      R[6]=ITRUE;
-      R[10]=R[5];
-      R[5]=R[4];R[4]=R[10];
-      ob=(word*)R[7];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1342:
-    if(acc==1){
-      {word ob=R[3];if(allocp(ob))ob=V(ob);R[4]=F((hval)ob>>TPOS&63);}
-      R[5]=F(0);
-      R[6]=BOOL(R[4]==R[5]);
-      if(R[6]==IFALSE){
-        R[7]=G(R[2],2);
-        R[8]=G(R[1],2);
-        R[4]=R[3];R[3]=R[8];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[7]=G(R[2],3);
-        R[8]=G(R[1],2);
-        R[4]=R[3];R[3]=R[8];
-        ob=(word*)R[7];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1343:
-    if(acc==5){
-      R[8]=128*0+258;
-      R[9]=prim_ref(R[4],R[8]);
-      {hval r=immval(R[9])-immval(R[5]);R[11]=F(r>>FBITS&1);R[10]=F(r);}
-      if(R[11]==F(0)){
-        if(R[10]==F(0)){
-          R[12]=128*2+258;
-          R[13]=prim_ref(R[4],R[12]);
-          if(R[13]==INULL){
-            if(R[6]==IFALSE){
-              R[14]=IFALSE;
-              ob=(word*)R[3];R[3]=R[14];acc=1;
-            }else{
-              ob=(word*)R[3];R[3]=R[10];acc=1;
-            }
-          }else{
-            *fp=make_header(3,40);fp[1]=R[10];fp[2]=R[13];R[14]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[14];acc=1;
-          }
-        }else{
-          R[12]=128*2+258;
-          R[13]=prim_ref(R[4],R[12]);
-          *fp=make_header(3,40);fp[1]=R[10];fp[2]=R[13];R[14]=(word)fp;fp+=3;
-          ob=(word*)R[3];R[3]=R[14];acc=1;
-        }
-      }else{
-        R[12]=128*2+258;
-        R[4]=prim_ref(R[4],R[12]);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],2);fp[4]=R[3];fp[3]=R[6];fp[2]=R[10];R[3]=(word)fp;fp+=5;
-        R[6]=IFALSE;
-        R[5]=R[11];
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1344:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        if(R[4]==IFALSE){
-          R[5]=G(R[1],2);
-          if(R[5]==F(0)){
-            R[6]=G(R[1],4);
-            R[3]=IFALSE;
-            ob=(word*)R[6];acc=1;
-          }else{
-            R[6]=INULL;
-            *fp=make_header(3,40);fp[1]=R[5];fp[2]=R[6];R[3]=(word)fp;fp+=3;
-            R[8]=G(R[1],4);
-            ob=(word*)R[8];acc=1;
-          }
-        }else{
-          R[5]=G(R[1],4);
-          R[3]=G(R[1],2);
-          ob=(word*)R[5];acc=1;
-        }
-      }else{
-        R[4]=G(R[1],2);
-        *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[6]=G(R[1],4);
-        ob=(word*)R[6];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1345:
-    if(acc==5){
-      if(R[4]==INULL){
-        if(R[5]==INULL){
-          if(R[6]==F(0)){
-            R[8]=INULL;
-            ob=(word*)R[3];R[3]=R[8];acc=1;
-          }else{
-            R[8]=G(R[1],2);
-            ob=(word*)R[3];R[3]=R[8];acc=1;
-          }
-        }else{
-          if(R[6]==F(0)){
-            ob=(word*)R[3];R[3]=R[5];acc=1;
-          }else{
-            R[8]=G(R[1],3);
-            R[4]=R[6];
-            ob=(word*)R[8];acc=3;
-          }
-        }
-      }else{
-        if(R[5]==INULL){
-          if(R[6]==F(0)){
-            ob=(word*)R[3];R[3]=R[4];acc=1;
-          }else{
-            R[8]=G(R[1],3);
-            R[5]=R[4];R[4]=R[6];
-            ob=(word*)R[8];acc=3;
-          }
-        }else{
-          R[8]=128*0+258;
-          R[9]=prim_ref(R[4],R[8]);
-          R[10]=prim_ref(R[5],R[8]);
-          {hval r=immval(R[9])+immval(R[10]);R[12]=F(r>>FBITS);R[11]=F(r);}
-          if(R[6]==F(0)){
-            R[13]=128*2+258;
-            R[4]=prim_ref(R[4],R[13]);
-            R[5]=prim_ref(R[5],R[13]);
-            *fp=make_header(4,TPROC);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[11];R[3]=(word)fp;fp+=4;
-            R[6]=R[12];
-            ob=(word*)R[7];acc=5;
-          }else{
-            {hval r=immval(R[11])+immval(R[6]);R[14]=F(r>>FBITS);R[13]=F(r);}
-            R[15]=128*2+258;
-            R[4]=prim_ref(R[4],R[15]);
-            R[5]=prim_ref(R[5],R[15]);
-            R[6]=R[12]|R[14];
-            *fp=make_header(4,TPROC);fp[1]=G(R[1],5);fp[3]=R[3];fp[2]=R[13];R[3]=(word)fp;fp+=4;
-            ob=(word*)R[7];acc=5;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1346:
-    if(acc==4){
-      {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];}
-      {hval r=immval(R[4])+immval(R[7]);R[10]=F(r>>FBITS);R[9]=F(r);}
-      if(R[10]==F(0)){
-        *fp=make_header(3,40);fp[1]=R[9];fp[2]=R[8];R[11]=(word)fp;fp+=3;
-        ob=(word*)R[3];R[3]=R[11];acc=1;
-      }else{
-        if(R[8]==INULL){
-          R[11]=G(R[1],2);
-          *fp=make_header(3,40);fp[1]=R[9];fp[2]=R[11];R[12]=(word)fp;fp+=3;
-          ob=(word*)R[3];R[3]=R[12];acc=1;
-        }else{
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[9];R[3]=(word)fp;fp+=4;
-          R[5]=R[8];R[4]=R[10];
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1347:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1348:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[9]=R[6];R[10]=R[5];
-      R[5]=R[3];R[6]=R[4];
-      R[4]=R[9];R[3]=R[10];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1349:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      if(R[6]==F(0)){
-        R[7]=G(R[1],2);
-        if(R[4]==R[7]){
-          R[8]=G(R[1],3);
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          R[8]=128*0+258;
-          {hval r=immval(R[4])+immval(R[8]);R[10]=F(r>>FBITS);R[9]=F(r);}
-          ob=(word*)R[3];R[3]=R[9];acc=1;
-        }
-      }else{
-        R[7]=128*78+258;
-        if(R[6]==R[7]){
-          R[8]=128*0+258;
-          R[9]=prim_ref(R[4],R[8]);
-          R[10]=G(R[1],2);
-          if(R[9]==R[10]){
-            R[11]=128*2+258;
-            R[4]=prim_ref(R[4],R[11]);
-            *fp=make_header(3,TPROC);fp[1]=G(R[1],4);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-            ob=(word*)R[5];acc=3;
-          }else{
-            {hval r=immval(R[9])+immval(R[8]);R[12]=F(r>>FBITS);R[11]=F(r);}
-            R[13]=128*2+258;
-            R[14]=prim_ref(R[4],R[13]);
-            *fp=make_header(3,40);fp[1]=R[11];fp[2]=R[14];R[15]=(word)fp;fp+=3;
-            ob=(word*)R[3];R[3]=R[15];acc=1;
-          }
-        }else{
-          if(R[4]==INULL){
-            R[8]=G(R[1],5);
-            ob=(word*)R[3];R[3]=R[8];acc=1;
-          }else{
-            R[8]=G(R[1],6);
-            R[9]=G(R[1],7);
-            R[5]=R[4];
-            R[6]=R[4];R[4]=R[9];
-            ob=(word*)R[8];acc=4;
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1350:
-    if(acc==1){
-      R[4]=F(0);
-      *fp=make_header(3,40);fp[1]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1351:
-    if(acc==3){
-      R[6]=INULL;
-      R[7]=cons(R[5],R[6]);
-      R[5]=cons(R[4],R[7]);
-      R[9]=G(R[1],2);
-      R[4]=G(R[1],3);
-      ob=(word*)R[9];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1352:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1353:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[3]=R[5];
-        R[4]=R[6];R[5]=R[7];
-        ob=(word*)R[8];acc=3;
-      }else{
-        R[4]=G(R[1],4);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1354:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1355:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*62+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[6]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*80+258;
-            R[14]=BOOL(R[6]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=G(R[1],2);
-              R[16]=G(R[1],3);
-              R[6]=R[5];
-              R[5]=R[4];R[4]=R[16];
-              ob=(word*)R[15];acc=4;
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-              R[16]=BOOL(R[15]==R[13]);
-              if(R[16]==IFALSE){
-                R[17]=IFALSE;
-                ob=(word*)R[3];R[3]=R[17];acc=1;
-              }else{
-                R[17]=G(R[1],4);
-                ob=(word*)R[17];acc=3;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-            R[14]=BOOL(R[13]==R[11]);
-            if(R[14]==IFALSE){
-              R[15]=IFALSE;
-              ob=(word*)R[3];R[3]=R[15];acc=1;
-            }else{
-              R[15]=G(R[1],4);
-              ob=(word*)R[15];acc=3;
-            }
-          }
-        }else{
-          R[11]=BOOL(R[4]==R[5]);
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }
-      }else{
-        R[9]=BOOL(R[4]==R[5]);
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1356:
-    if(acc==3){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-      R[7]=F(0);
-      R[8]=BOOL(R[6]==R[7]);
-      if(R[8]==IFALSE){
-        R[9]=128*62+258;
-        R[10]=BOOL(R[6]==R[9]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[6]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=128*80+258;
-            R[14]=BOOL(R[6]==R[13]);
-            if(R[14]==IFALSE){
-              R[15]=G(R[1],2);
-              R[16]=G(R[1],3);
-              R[6]=R[5];
-              R[5]=R[4];R[4]=R[16];
-              ob=(word*)R[15];acc=4;
-            }else{
-              {word ob=R[5];if(allocp(ob))ob=V(ob);R[15]=F((hval)ob>>TPOS&63);}
-              R[16]=BOOL(R[15]==R[13]);
-              if(R[16]==IFALSE){
-                R[17]=ITRUE;
-                ob=(word*)R[3];R[3]=R[17];acc=1;
-              }else{
-                R[17]=G(R[1],4);
-                *fp=make_header(3,TPROC);fp[1]=G(R[1],5);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-                R[6]=IFALSE;
-                ob=(word*)R[17];acc=4;
-              }
-            }
-          }else{
-            {word ob=R[5];if(allocp(ob))ob=V(ob);R[13]=F((hval)ob>>TPOS&63);}
-            R[14]=BOOL(R[13]==R[11]);
-            if(R[14]==IFALSE){
-              R[15]=IFALSE;
-              ob=(word*)R[3];R[3]=R[15];acc=1;
-            }else{
-              R[15]=G(R[1],4);
-              R[6]=IFALSE;
-              ob=(word*)R[15];acc=4;
-            }
-          }
-        }else{
-          {word ob=R[5];if(allocp(ob))ob=V(ob);R[11]=F((hval)ob>>TPOS&63);}
-          R[12]=BOOL(R[11]==R[7]);
-          if(R[12]==IFALSE){
-            R[13]=BOOL(R[11]==R[9]);
-            if(R[13]==IFALSE){
-              R[14]=128*78+258;
-              R[15]=BOOL(R[11]==R[14]);
-              if(R[15]==IFALSE){
-                R[16]=IFALSE;
-                ob=(word*)R[3];R[3]=R[16];acc=1;
-              }else{
-                R[16]=ITRUE;
-                ob=(word*)R[3];R[3]=R[16];acc=1;
-              }
-            }else{
-              if(R[4]==R[5]){
-                R[14]=IFALSE;
-                ob=(word*)R[3];R[3]=R[14];acc=1;
-              }else{
-                R[14]=prim_less(R[5],R[4]);
-                ob=(word*)R[3];R[3]=R[14];acc=1;
-              }
-            }
-          }else{
-            R[13]=ITRUE;
-            ob=(word*)R[3];R[3]=R[13];acc=1;
-          }
-        }
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[9]=F((hval)ob>>TPOS&63);}
-        R[10]=BOOL(R[9]==R[7]);
-        if(R[10]==IFALSE){
-          R[11]=128*78+258;
-          R[12]=BOOL(R[9]==R[11]);
-          if(R[12]==IFALSE){
-            R[13]=IFALSE;
-            ob=(word*)R[3];R[3]=R[13];acc=1;
-          }else{
-            R[13]=ITRUE;
-            ob=(word*)R[3];R[3]=R[13];acc=1;
-          }
-        }else{
-          R[11]=prim_less(R[4],R[5]);
-          ob=(word*)R[3];R[3]=R[11];acc=1;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1357:
-    if(acc==5){
-      if(R[4]==R[5]){
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        if(R[4]==INULL){
-          R[8]=ITRUE;
-          ob=(word*)R[3];R[3]=R[8];acc=1;
-        }else{
-          if(R[5]==INULL){
-            R[8]=IFALSE;
-            ob=(word*)R[3];R[3]=R[8];acc=1;
-          }else{
-            R[8]=128*0+258;
-            R[9]=prim_ref(R[4],R[8]);
-            R[10]=prim_ref(R[5],R[8]);
-            R[11]=prim_less(R[9],R[10]);
-            if(R[11]==IFALSE){
-              if(R[9]==R[10]){
-                R[12]=128*2+258;
-                R[4]=prim_ref(R[4],R[12]);
-                R[5]=prim_ref(R[5],R[12]);
-                ob=(word*)R[7];acc=5;
-              }else{
-                R[12]=128*2+258;
-                R[4]=prim_ref(R[4],R[12]);
-                R[5]=prim_ref(R[5],R[12]);
-                R[6]=IFALSE;
-                ob=(word*)R[7];acc=5;
-              }
-            }else{
-              R[12]=128*2+258;
-              R[4]=prim_ref(R[4],R[12]);
-              R[5]=prim_ref(R[5],R[12]);
-              R[6]=ITRUE;
-              ob=(word*)R[7];acc=5;
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1358:
-    if(acc==4){
-      if(R[4]==R[5]){
-        R[7]=ITRUE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        if(R[4]==INULL){
-          R[7]=IFALSE;
-          ob=(word*)R[3];R[3]=R[7];acc=1;
-        }else{
-          if(R[5]==INULL){
-            R[7]=IFALSE;
-            ob=(word*)R[3];R[3]=R[7];acc=1;
-          }else{
-            R[7]=128*0+258;
-            R[8]=prim_ref(R[4],R[7]);
-            R[9]=prim_ref(R[5],R[7]);
-            if(R[8]==R[9]){
-              R[10]=128*2+258;
-              R[4]=prim_ref(R[4],R[10]);
-              R[5]=prim_ref(R[5],R[10]);
-              ob=(word*)R[6];acc=4;
-            }else{
-              R[10]=IFALSE;
-              ob=(word*)R[3];R[3]=R[10];acc=1;
-            }
-          }
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1359:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=F(0);
-      R[7]=BOOL(R[5]==R[6]);
-      if(R[7]==IFALSE){
-        R[8]=128*62+258;
-        R[9]=BOOL(R[5]==R[8]);
-        if(R[9]==IFALSE){
-          R[10]=128*78+258;
-          R[11]=BOOL(R[5]==R[10]);
-          if(R[11]==IFALSE){
-            R[12]=128*80+258;
-            R[13]=BOOL(R[5]==R[12]);
-            if(R[13]==IFALSE){
-              R[14]=IFALSE;
-              ob=(word*)R[3];R[3]=R[14];acc=1;
-            }else{
-              R[14]=G(R[1],2);
-              ob=(word*)R[14];acc=2;
-            }
-          }else{
-            R[12]=G(R[1],3);
-            ob=(word*)R[12];acc=2;
-          }
-        }else{
-          R[10]=R[6]^(FMAX<<IPOS&R[4]);
-          ob=(word*)R[3];R[3]=R[10];acc=1;
-        }
-      }else{
-        if(R[4]==F(0)){
-          ob=(word*)R[3];R[3]=R[6];acc=1;
-        }else{
-          R[8]=G(R[1],4);
-          ob=(word*)R[8];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1360:
-    if(acc==4){
-      R[7]=INULL;
-      R[8]=cons(R[6],R[7]);
-      R[9]=cons(R[5],R[8]);
-      R[5]=cons(R[4],R[9]);
-      R[11]=G(R[1],2);
-      R[4]=G(R[1],3);
-      ob=(word*)R[11];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1361:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=128*2+258;
-      R[8]=prim_ref(R[4],R[7]);
-      *fp=make_header(3,41);fp[1]=R[6];fp[2]=R[8];R[9]=(word)fp;fp+=3;
-      ob=(word*)R[3];R[3]=R[9];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1362:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=128*2+258;
-      R[8]=prim_ref(R[4],R[7]);
-      *fp=make_header(3,40);fp[1]=R[6];fp[2]=R[8];R[9]=(word)fp;fp+=3;
-      ob=(word*)R[3];R[3]=R[9];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1363:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[2],3);
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1364:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1365:
-    if(acc==4){
-      R[7]=cons(R[5],R[4]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1366:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1367:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[6];R[6]=R[3];
-      R[3]=R[5];R[5]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1368:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1369:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=INULL;
-      R[9]=R[5];
-      R[10]=R[6];R[6]=R[4];
-      R[5]=R[7];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1370:
-    if(acc==4){
-      R[7]=cons(R[5],R[6]);
-      R[8]=cons(R[7],R[4]);
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1371:
-    if(acc==3){
-      assert(pairp(R[5]),R[5],105);R[6]=G(R[5],1);
-      R[7]=G(R[5],2);
-      R[8]=G(R[1],2);
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[8];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1372:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],6);
-      R[7]=G(R[1],7);
-      *fp=make_header(6,TPROC);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[8]=(word)fp;fp+=6;
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[11]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[11];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1373:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[10]=R[6];
-      R[11]=R[5];R[5]=R[3];
-      R[6]=R[7];R[7]=R[4];
-      R[4]=R[10];R[3]=R[11];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1374:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[9]=R[4];
-      R[4]=R[3];R[3]=R[5];
-      R[5]=R[6];R[6]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1375:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[8];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1376:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],5);
-      R[6]=G(R[1],4);
-      R[7]=G(R[1],3);
-      R[8]=G(R[1],2);
-      R[10]=R[4];
-      R[11]=R[5];R[5]=R[7];
-      R[7]=R[3];R[4]=R[6];
-      R[6]=R[8];R[3]=R[11];
-      ob=(word*)R[10];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1377:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],2);
-        R[3]=ITRUE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1378:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[7]=R[5];R[5]=R[4];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1379:
-    if(acc==5){
-      if(R[5]==INULL){
-        R[8]=G(R[1],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[6];
-        ob=(word*)R[8];acc=2;
-      }else{
-        assert(pairp(R[5]),R[5],169);R[8]=G(R[5],2);
-        if(R[8]==INULL){
-          assert(pairp(R[4]),R[4],105);R[9]=G(R[4],1);
-          R[10]=cons(R[9],R[6]);
-          R[11]=G(R[1],2);
-          *fp=make_header(4,TPROC);fp[1]=G(R[1],4);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-          R[4]=R[10];
-          ob=(word*)R[11];acc=2;
-        }else{
-          assert(pairp(R[4]),R[4],169);R[9]=G(R[4],2);
-          assert(pairp(R[8]),R[8],169);R[5]=G(R[8],2);
-          R[11]=G(R[4],1);
-          R[6]=cons(R[11],R[6]);
-          R[4]=R[9];
-          ob=(word*)R[7];acc=5;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1380:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-      R[6]=G(R[1],3);
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1381:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],5);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[9]=(word)fp;fp+=6;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1382:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],4);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[2],3);fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[8]=(word)fp;fp+=5;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1383:
-    if(acc==4){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[4];R[7]=(word)fp;fp+=3;
-      R[8]=INULL;
-      R[4]=R[5];
-      R[5]=R[6];R[6]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1384:
-    if(acc==5){
-      if(R[5]==INULL){
-        R[8]=G(R[2],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-        R[4]=R[6];
-        ob=(word*)R[8];acc=2;
-      }else{
-        assert(pairp(R[5]),R[5],105);R[8]=G(R[5],1);
-        R[9]=G(R[1],2);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],4);fp[5]=R[7];fp[4]=R[3];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[5]=R[8];
-        ob=(word*)R[9];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1385:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      assert(pairp(R[5]),R[5],169);R[6]=G(R[5],2);
-      R[7]=G(R[1],3);
-      R[8]=cons(R[4],R[7]);
-      R[7]=G(R[1],5);
-      R[10]=G(R[1],4);
-      R[4]=R[3];R[5]=R[6];
-      R[6]=R[8];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1386:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[7]=(word)fp;fp+=4;
-      R[8]=R[4];
-      R[4]=R[3];R[3]=R[7];
-      ob=(word*)R[8];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1387:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[8]=R[4];R[4]=R[3];
-      R[3]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1388:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],3);fp[2]=R[4];R[7]=(word)fp;fp+=3;
-      R[8]=INULL;
-      R[9]=R[6];R[6]=R[5];
-      R[4]=R[7];R[5]=R[8];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1389:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[2],2);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1390:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],3);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        R[5]=G(R[1],3);
-        R[3]=cons(R[4],R[5]);
-        R[7]=G(R[1],4);
-        ob=(word*)R[7];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1391:
-    if(acc==3){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[4];R[6]=(word)fp;fp+=3;
-      R[7]=INULL;
-      R[4]=R[5];R[5]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1392:
-    if(acc==4){
-      if(R[4]==INULL){
-        R[7]=G(R[2],2);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[3];R[3]=(word)fp;fp+=3;
-        R[4]=R[5];
-        ob=(word*)R[7];acc=2;
-      }else{
-        assert(pairp(R[4]),R[4],105);R[7]=G(R[4],1);
-        R[8]=G(R[1],2);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],4);fp[5]=R[6];fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=6;
-        R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1393:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],3);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],3);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        R[6]=G(R[4],1);
-        R[7]=G(R[1],3);
-        R[8]=cons(R[6],R[7]);
-        R[6]=G(R[1],5);
-        R[3]=G(R[1],4);
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1394:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1395:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=INULL;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1396:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        assert(pairp(R[4]),R[4],169);R[7]=G(R[4],2);
-        R[8]=G(R[4],1);
-        R[5]=cons(R[8],R[5]);
-        R[4]=R[7];
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1397:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(5,TCLOS);fp[1]=G(R[1],3);fp[4]=R[3];fp[3]=R[5];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1398:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[3]=G(R[1],2);
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        if(R[5]==INULL){
-          R[3]=G(R[4],1);
-          R[7]=G(R[1],4);
-          ob=(word*)R[7];acc=1;
-        }else{
-          R[6]=G(R[4],1);
-          R[4]=G(R[4],2);
-          R[5]=G(R[1],3);
-          R[9]=G(R[1],4);
-          *fp=make_header(4,TCLOS);fp[1]=G(R[2],2);fp[3]=R[9];fp[2]=R[6];R[3]=(word)fp;fp+=4;
-          ob=(word*)R[5];acc=3;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1399:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1400:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=G(R[1],3);
-      R[9]=R[6];
-      R[6]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1401:
-    if(acc==3){
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1402:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=IFALSE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        assert(pairp(R[5]),R[5],105);R[7]=G(R[5],1);
-        if(R[7]==R[4]){
-          ob=(word*)R[3];R[3]=R[5];acc=1;
-        }else{
-          R[5]=G(R[5],2);
-          ob=(word*)R[6];acc=4;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1403:
-    if(acc==4){
-      if(R[5]==INULL){
-        R[7]=INULL;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        {word*ob=(word*)R[5];hval hdr;assert(allocp(R[5]),R[5],IFALSE);hdr=*ob;assert_not(rawp(hdr)||objsize(hdr)!=3,ob,IFALSE);
-R[7]=ob[1];R[8]=ob[2];}
-        *fp=make_header(6,TCLOS);fp[1]=G(R[1],2);fp[5]=R[3];fp[4]=R[6];fp[3]=R[4];fp[2]=R[8];R[3]=(word)fp;fp+=6;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1404:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[5];fp[2]=R[3];R[6]=(word)fp;fp+=4;
-      R[7]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[3]=R[6];
-      R[6]=R[4];R[4]=R[7];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1405:
-    if(acc==5){
-      if(R[6]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        assert(pairp(R[6]),R[6],105);R[8]=G(R[6],1);
-        R[6]=G(R[6],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],2);fp[4]=R[4];fp[3]=R[3];fp[2]=R[8];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[7];acc=5;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1406:
-    if(acc==1){
-      R[4]=G(R[1],4);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[8]=R[4];
-      R[9]=R[5];R[5]=R[3];
-      R[4]=R[6];R[3]=R[9];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1407:
-    if(acc==6){
-      if(R[7]==INULL){
-        R[7]=R[3];
-        R[3]=R[5];R[4]=R[6];
-        ob=(word*)R[7];acc=2;
-      }else{
-        assert(pairp(R[7]),R[7],105);R[9]=G(R[7],1);
-        *fp=make_header(6,TPROC);fp[1]=G(R[1],2);fp[5]=R[8];fp[4]=R[3];fp[3]=R[4];fp[2]=R[7];R[3]=(word)fp;fp+=6;
-        R[11]=R[4];R[4]=R[5];
-        R[5]=R[6];R[6]=R[9];
-        ob=(word*)R[11];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1408:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      assert(pairp(R[5]),R[5],169);R[6]=G(R[5],2);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],4);
-      R[9]=G(R[1],3);
-      R[5]=R[3];R[3]=R[8];
-      R[8]=R[7];R[7]=R[6];
-      R[6]=R[4];R[4]=R[9];
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1409:
-    if(acc==5){
-      *fp=make_header(7,TCLOS);fp[1]=G(R[1],2);fp[6]=R[3];fp[5]=R[7];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=7;
-      R[4]=R[5];
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1410:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],4);
-        R[5]=G(R[1],3);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],6);
-        *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[7];fp[4]=R[6];fp[3]=R[4];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        R[9]=G(R[1],2);
-        R[7]=R[4];R[4]=R[9];
-        ob=(word*)R[7];acc=2;
-      }else{
-        R[4]=G(R[1],6);
-        R[3]=INULL;
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1411:
-    if(acc==2){
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],5);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[3];R[7]=(word)fp;fp+=4;
-      R[8]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[3]=R[7];R[7]=R[5];
-      R[5]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1412:
-    if(acc==5){
-      if(R[6]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        assert(pairp(R[6]),R[6],105);R[8]=G(R[6],1);
-        *fp=make_header(6,TPROC);fp[1]=G(R[1],2);fp[5]=R[7];fp[4]=R[3];fp[3]=R[4];fp[2]=R[6];R[3]=(word)fp;fp+=6;
-        R[10]=R[4];
-        R[4]=R[5];R[5]=R[8];
-        ob=(word*)R[10];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1413:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-      R[6]=G(R[1],5);
-      R[7]=G(R[1],4);
-      R[8]=G(R[1],3);
-      R[10]=R[7];R[7]=R[6];
-      R[6]=R[5];R[5]=R[3];
-      R[4]=R[8];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1414:
-    if(acc==3){
-      if(R[4]==INULL){
-        R[6]=ITRUE;
-        ob=(word*)R[3];R[3]=R[6];acc=1;
-      }else{
-        R[6]=G(R[1],2);
-        *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[5];fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=5;
-        ob=(word*)R[6];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1415:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],3);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],2);
-        assert(pairp(R[4]),R[4],169);R[5]=G(R[4],2);
-        R[6]=G(R[1],4);
-        R[3]=G(R[1],3);
-        R[4]=R[5];R[5]=R[6];
-        ob=(word*)R[5];acc=3;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1416:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*0+258;
-      R[7]=BOOL(R[6]==R[5]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1417:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TCLOS);fp[1]=G(R[2],3);fp[2]=R[5];R[6]=(word)fp;fp+=3;
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1418:
-    if(acc==2){
-      *fp=make_header(3,TPROC);fp[1]=G(R[1],2);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      ob=(word*)R[3];R[3]=R[5];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1419:
-    if(acc==4){
-      if(R[5]==R[6]){
-        R[7]=ITRUE;
-        ob=(word*)R[3];R[3]=R[7];acc=1;
-      }else{
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[7]=F((hval)ob>>TPOS&63);}
-        R[8]=128*6+258;
-        if(R[7]==R[8]){
-          R[9]=IFALSE;
-          ob=(word*)R[3];R[3]=R[9];acc=1;
-        }else{
-          R[9]=G(R[1],2);
-          *fp=make_header(7,TCLOS);fp[1]=G(R[1],3);fp[6]=R[3];fp[5]=R[5];fp[4]=R[6];fp[3]=R[4];fp[2]=R[7];R[3]=(word)fp;fp+=7;
-          R[4]=R[5];
-          ob=(word*)R[9];acc=2;
-        }
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1420:
-    if(acc==1){
-      if(R[3]==F(0)){
-        R[4]=G(R[1],6);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],3);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],5);
-        R[9]=G(R[1],6);
-        *fp=make_header(8,TCLOS);fp[1]=G(R[2],3);fp[7]=R[9];fp[6]=R[8];fp[5]=R[7];fp[4]=R[6];fp[3]=R[3];fp[2]=R[5];R[3]=(word)fp;fp+=8;
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1421:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      if(R[4]==R[3]){
-        R[5]=G(R[1],5);
-        {word ob=R[5];if(allocp(ob))ob=V(ob);R[6]=F((hval)ob>>TPOS&63);}
-        R[7]=G(R[1],2);
-        if(R[7]==R[6]){
-          R[8]=G(R[1],6);
-          if(immediatep(R[8])){R[9]=IFALSE;}else{hval h=V(R[8]);R[9]=rawp(h)?F(payl_len(h)):IFALSE;}          if(R[9]==IFALSE){
-            R[10]=G(R[2],2);
-            R[3]=G(R[1],7);
-            R[6]=G(R[1],4);
-            R[7]=R[4];R[4]=R[8];
-            ob=(word*)R[10];acc=5;
-          }else{
-            if(immediatep(R[5])){R[10]=IFALSE;}else{hval h=V(R[5]);R[10]=rawp(h)?F(payl_len(h)):IFALSE;}            if(R[9]==R[10]){
-              R[11]=G(R[2],3);
-              R[3]=G(R[1],7);
-              R[4]=R[8];R[6]=R[9];
-              ob=(word*)R[11];acc=4;
-            }else{
-              R[11]=G(R[1],7);
-              R[3]=IFALSE;
-              ob=(word*)R[11];acc=1;
-            }
-          }
-        }else{
-          R[8]=G(R[1],7);
-          R[3]=IFALSE;
-          ob=(word*)R[8];acc=1;
-        }
-      }else{
-        R[5]=G(R[1],7);
-        R[3]=IFALSE;
-        ob=(word*)R[5];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1422:
-    if(acc==5){
-      R[8]=F(0);
-      R[9]=BOOL(R[6]==R[8]);
-      if(R[9]==IFALSE){
-        R[10]=128*0+258;
-        {hval r=immval(R[6])-immval(R[10]);R[12]=F(r>>FBITS&1);R[11]=F(r);}
-        R[13]=prim_ref(R[4],R[11]);
-        R[14]=prim_ref(R[5],R[11]);
-        if(R[13]==R[14]){
-          R[6]=R[11];
-          ob=(word*)R[7];acc=5;
-        }else{
-          R[15]=IFALSE;
-          ob=(word*)R[3];R[3]=R[15];acc=1;
-        }
-      }else{
-        ob=(word*)R[3];R[3]=R[9];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1423:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1424:
-    if(acc==6){
-      R[9]=128*0+258;
-      R[10]=BOOL(R[7]==R[9]);
-      if(R[10]==IFALSE){
-        {hval r=immval(R[7])-immval(R[9]);R[12]=F(r>>FBITS&1);R[11]=F(r);}
-        R[13]=prim_ref(R[4],R[11]);
-        R[14]=prim_ref(R[5],R[11]);
-        *fp=make_header(8,TPROC);fp[1]=G(R[1],2);fp[7]=R[3];fp[6]=R[8];fp[5]=R[4];fp[4]=R[5];fp[3]=R[6];fp[2]=R[11];R[3]=(word)fp;fp+=8;
-        R[4]=R[13];R[5]=R[14];
-        ob=(word*)R[6];acc=3;
-      }else{
-        ob=(word*)R[3];R[3]=R[10];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1425:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[1],7);
-        R[3]=IFALSE;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[1],6);
-        R[5]=G(R[1],7);
-        R[6]=G(R[1],5);
-        R[7]=G(R[1],4);
-        R[8]=G(R[1],3);
-        R[9]=G(R[1],2);
-        R[11]=R[6];
-        R[6]=R[8];R[8]=R[4];
-        R[3]=R[5];R[5]=R[7];
-        R[7]=R[9];R[4]=R[11];
-        ob=(word*)R[8];acc=6;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1426:
-    if(acc==5){
-      R[8]=G(R[1],2);
-      ob=(word*)R[8];acc=6;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1427:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[4];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1428:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],2);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[5];R[3]=(word)fp;fp+=3;
-      R[7]=G(R[1],3);
-      *fp=make_header(3,TPROC);fp[1]=G(R[2],4);fp[2]=R[7];R[8]=(word)fp;fp+=3;
-      R[7]=R[4];R[4]=R[8];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1429:
-    if(acc==2){
-      R[5]=128*0+258;
-      R[6]=prim_ref(R[4],R[5]);
-      R[7]=G(R[1],2);
-      R[8]=BOOL(R[6]==R[7]);
-      ob=(word*)R[3];R[3]=R[8];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1430:
-    if(acc==1){
-      R[4]=128*2+258;
-      R[3]=prim_ref(R[3],R[4]);
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1431:
-    if(acc==1){
-      R[4]=G(R[1],5);
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],3);
-      R[7]=G(R[1],2);
-      R[10]=R[5];R[5]=R[6];
-      R[6]=R[7];R[7]=R[4];
-      R[4]=R[3];R[3]=R[10];
-      ob=(word*)R[7];acc=5;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1432:
-    if(acc==2){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],4);fp[2]=R[4];R[5]=(word)fp;fp+=3;
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1433:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(6,TCLOS);fp[1]=G(R[2],2);fp[5]=R[3];fp[4]=R[4];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1434:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],2);
-        R[6]=G(R[1],4);
-        R[7]=G(R[1],5);
-        R[8]=G(R[1],3);
-        *fp=make_header(6,TPROC);fp[1]=G(R[2],3);fp[5]=R[8];fp[4]=R[7];fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=6;
-        ob=(word*)R[4];acc=1;
-      }else{
-        R[4]=G(R[2],4);
-        R[5]=G(R[1],4);
-        R[6]=G(R[1],5);
-        *fp=make_header(4,TPROC);fp[1]=G(R[2],5);fp[3]=R[6];fp[2]=R[5];R[3]=(word)fp;fp+=4;
-        R[8]=G(R[1],2);
-        R[9]=R[4];R[4]=R[8];
-        ob=(word*)R[9];acc=2;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1435:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[3]=G(R[1],2);
-      ob=(word*)R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1436:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=cons(R[4],R[5]);
-      R[7]=G(R[1],5);
-      R[8]=G(R[1],4);
-      R[4]=R[3];R[5]=R[6];
-      R[6]=R[7];R[3]=R[8];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1437:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[6]=INULL;
-      R[9]=R[5];
-      R[5]=R[6];R[6]=R[4];
-      R[4]=R[3];R[3]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1438:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[5]=128*24+258;
-      R[6]=IFALSE;
-      R[9]=R[4];
-      R[4]=R[5];R[5]=R[6];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1439:
-    if(acc==2){
-      R[5]=G(R[1],4);
-      R[6]=G(R[1],2);
-      *fp=make_header(4,TPROC);fp[1]=G(R[1],3);fp[3]=R[5];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[6];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1440:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[6]=(word)fp;fp+=4;
-      R[7]=128*36+258;
-      R[9]=R[5];
-      R[5]=R[4];R[3]=R[6];
-      R[6]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1441:
-    if(acc==1){
-      R[4]=G(R[2],2);
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[7]=R[4];
-      R[3]=R[5];R[4]=R[6];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1442:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=128*16+258;
-      R[9]=R[6];R[6]=R[5];
-      R[5]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1443:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=128*10+258;
-      R[9]=R[5];
-      R[10]=R[6];R[5]=R[4];
-      R[6]=R[4];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1444:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      R[7]=128*8+258;
-      R[9]=R[6];R[6]=R[5];
-      R[5]=R[4];R[4]=R[7];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1445:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=128*2+258;
-      R[9]=R[5];
-      R[10]=R[6];R[5]=R[4];
-      R[6]=R[4];R[4]=R[10];
-      ob=(word*)R[9];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1446:
-    if(acc==4){
-      R[7]=G(R[1],2);
-      *fp=make_header(5,TPROC);fp[1]=G(R[1],3);fp[4]=R[4];fp[3]=R[5];fp[2]=R[6];R[4]=(word)fp;fp+=5;
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1447:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[8]=R[5];R[5]=R[4];
-      R[4]=R[3];R[3]=R[8];
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1448:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],3);fp[3]=R[3];fp[2]=R[4];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1449:
-    if(acc==1){
-      if(R[3]==IFALSE){
-        R[4]=G(R[2],2);
-        R[5]=G(R[1],3);
-        *fp=make_header(3,TPROC);fp[1]=G(R[2],3);fp[2]=R[5];R[3]=(word)fp;fp+=3;
-        R[7]=G(R[1],2);
-        R[8]=R[4];R[4]=R[7];
-        ob=(word*)R[8];acc=2;
-      }else{
-        R[4]=G(R[1],3);
-        R[3]=F(0);
-        ob=(word*)R[4];acc=1;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1450:
-    if(acc==1){
-      R[4]=128*14+258;
-      {hval x=immval(R[3]);uint n=immval(R[4]);R[5]=F(x>>n);R[6]=F(x<<(FBITS-n));}
-      R[7]=G(R[1],2);
-      R[3]=R[5];
-      ob=(word*)R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1451:
-    if(acc==2){
-      *fp=make_header(3,TCLOS);fp[1]=G(R[1],2);fp[2]=R[3];R[5]=(word)fp;fp+=3;
-      R[7]=R[4];R[4]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1452:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      ob=(word*)R[5];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1453:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=F(0);
-      R[9]=R[6];
-      R[6]=R[5];R[5]=R[9];
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1454:
-    if(acc==4){
-      if(R[4]==INULL){
-        ob=(word*)R[3];R[3]=R[5];acc=1;
-      }else{
-        assert(pairp(R[4]),R[4],105);R[7]=G(R[4],1);
-        R[4]=G(R[4],2);
-        *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[3];fp[2]=R[7];R[3]=(word)fp;fp+=4;
-        ob=(word*)R[6];acc=4;
-      }
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1455:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      R[3]=cons(R[4],R[3]);
-      R[6]=G(R[1],3);
-      ob=(word*)R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1456:
-    if(acc==3){
-      R[6]=G(R[1],2);
-      ob=(word*)R[6];acc=4;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1457:
-    if(acc==2){
-      {word ob=R[4];if(allocp(ob))ob=V(ob);R[5]=F((hval)ob>>TPOS&63);}
-      R[6]=128*8+258;
-      R[7]=BOOL(R[6]==R[5]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1458:
-    if(acc==2){
-      R[5]=F(0);
-      R[6]=R[4]&R[5];
-      R[7]=BOOL(R[6]==R[5]);
-      ob=(word*)R[3];R[3]=R[7];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1459:
-    if(acc==2){
-      ob=(word*)R[3];R[3]=R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1460:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[8]=R[5];
-      R[5]=R[4];R[4]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1461:
-    if(acc==3){
-      *fp=make_header(4,TPROC);fp[1]=G(R[1],2);fp[3]=R[4];fp[2]=R[5];R[6]=(word)fp;fp+=4;
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1462:
-    if(acc==2){
-      R[5]=G(R[1],3);
-      R[6]=G(R[1],2);
-      R[8]=R[5];R[5]=R[6];
-      ob=(word*)R[8];acc=3;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1463:
-    if(acc==3){
-      *fp=make_header(4,TCLOS);fp[1]=G(R[1],2);fp[3]=R[4];fp[2]=R[5];R[6]=(word)fp;fp+=4;
-      ob=(word*)R[3];R[3]=R[6];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1464:
-    if(acc==2){
-      R[5]=G(R[1],2);
-      R[6]=G(R[1],3);
-      *fp=make_header(4,TPROC);fp[1]=G(R[2],2);fp[3]=R[6];fp[2]=R[3];R[3]=(word)fp;fp+=4;
-      ob=(word*)R[5];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1465:
-    if(acc==1){
-      R[4]=G(R[1],3);
-      R[5]=G(R[1],2);
-      R[7]=R[4];
-      R[4]=R[3];R[3]=R[5];
-      ob=(word*)R[7];acc=2;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-   case 1466:
-    if(acc==1){
-      R[4]=G(R[1],2);
-      ob=(word*)R[3];R[3]=R[4];acc=1;
-    }else{
-      error(61,ob,F(acc));
-    }
-     break;
-
-      default:
-         error(258, F(op), ITRUE);
-   }
-   goto apply;
-
-invoke_mcp: /* R4-R6 set, set R3=cont and R4=syscall and call mcp */
-   ob = (word *) R[0];
-   R[0] = IFALSE;
-   R[3] = F(3);
-   if (allocp(ob)) {
-      acc = 4;
-      goto apply;
-   }
-   return 1; /* no mcp to handle error (fail in it?), so nonzero exit */
-}
-
-/* Initial FASL image decoding */
-
-static word get_nat() {
-   word result = 0;
-   word new, i;
-   do {
-      i = *hp++;
-      new = result << 7;
-      if (result != new >> 7)
-         exit(9); /* overflow kills */
-      result = new + (i & 127);
-   } while (i & 128);
-   return result;
-}
-
-static word *get_field(word *ptrs, int pos) {
-   if (0 == *hp) {
-      byte type;
-      hp++;
-      type = *hp++;
-      *fp++ = make_immediate(get_nat(), type);
-   } else {
-      word diff = get_nat();
-      if (ptrs != NULL)
-         *fp++ = ptrs[pos - diff];
-   }
-   return fp;
-}
-
-static word *get_obj(word *ptrs, int me) {
-   uint type, size;
-   if (ptrs != NULL)
-      ptrs[me] = (word)fp;
-   switch (*hp++) { /* TODO: adding type information here would reduce fasl and executable size */
-      case 1:
-         type = *hp++;
-         size = get_nat();
-         *fp++ = make_header(size+1, type); /* +1 to include header in size */
-         while (size--)
-            fp = get_field(ptrs, me);
-         break;
-      case 2: {
-         type = *hp++ & 31; /* low 5 bits, the others are pads */
-         size = get_nat();
-         memcpy((word *)mkraw(type, size) + 1, hp, size);
-         hp += size;
-         break;
-      }
-      default:
-         exit(42);
-   }
-   return fp;
-}
-
-/* dry run fasl decode - just compute sizes */
-static void get_obj_metrics(int *rwords, int *rnobjs) {
-   int size;
-   switch (*hp++) {
-      case 1:
-         hp++;
-         size = get_nat();
-         *rnobjs += 1;
-         *rwords += size;
-         while (size--) {
-            if (0 == *hp)
-               hp += 2;
-            get_nat();
-         }
-         break;
-      case 2:
-         hp++;
-         size = get_nat();
-         *rnobjs += 1;
-         *rwords += (W + size + W - 1) / W;
-         hp += size;
-         break;
-      default:
-         exit(42);
-   }
-}
-
-/* count number of objects and measure heap size */
-static void heap_metrics(int *rwords, int *rnobjs) {
-   const byte *hp_start = hp;
-   while (*hp != 0)
-      get_obj_metrics(rwords, rnobjs);
-   hp = hp_start;
-}
-/*
-static void read_heap(const char *path) {
-   struct stat st;
-   off_t pos = 0;
-   ssize_t n;
-   int fd = open(path, O_RDONLY);
-   if (fd == -1)
-      exit(1);
-   if (fstat(fd, &st) != 0)
-      exit(2);
-   file_heap = realloc(NULL, st.st_size);
-   if (file_heap == NULL)
-      exit(3);
-   do {
-      n = read(fd, file_heap + pos, st.st_size - pos);
-      if (n == -1)
-         exit(4);
-   } while (n && (pos += n) < st.st_size);
-   close(fd);
-}
-*/
-
-/* find a fasl image source to *hp or exit */
-//static void find_heap(int *nargs, char ***argv, int *nobjs, int *nwords) {
-//   file_heap = NULL;
-//   if ((word)heap == 0) {
-      /* if no preloaded heap, try to load it from first vm arg */
-//      if (*nargs < 2)
-//         exit(1);
-//      read_heap(argv[0][1]);
-//      ++*argv;
-//      --*nargs;
-//      hp = file_heap;
-//      if (*hp == '#')
-//         while (*hp++ != '\n');
-//   } else {
-//      hp = heap; /* builtin heap */
-//   }
-//   heap_metrics(nwords, nobjs);
-//}
-
-static word *decode_fasl(uint nobjs) {
-   word *ptrs;
-   word *entry;
-   uint pos;
-   allocate(nobjs + 1, ptrs);
-   for (pos = 0; pos != nobjs; ++pos) {
-      if (fp >= memend) /* bug */
-         exit(1);
-      fp = get_obj(ptrs, pos);
-   }
-   entry = (word *) ptrs[pos - 1];
-   *ptrs = make_header(nobjs + 1, 0) | RAWBIT;
-   return entry;
-}
-
-static word *load_heap(uint nobjs) {
-   word *entry = decode_fasl(nobjs);
-   if (file_heap != NULL)
-      free(file_heap);
-   return entry;
-}
-/*
-static void setup(int nwords, int nobjs) {
-   tcgetattr(0, &tsettings);
-   state = IFALSE;
-   set_signal_handler();
-   max_heap_mb = W == 4 ? 4096 : 65535;
-   nwords += nobjs + INITCELLS;
-   memstart = genstart = fp = realloc(NULL, (nwords + MEMPAD) * W);
-   if (memstart == NULL)
-      exit(4);
-   memend = memstart + nwords - MEMPAD;
-}
-
-static int secondary(int nargs, char **argv) {
-   word *prog;
-   int rval, nobjs=0, nwords=0;
-   find_heap(&nargs, &argv, &nobjs, &nwords);
-   setup(nwords, nobjs);
-   prog = load_heap(nobjs);
-   rval = vm(prog, onum((uintptr_t)argv, 0));
-   setdown();
-   if (fixnump(rval)) {
-      int n = immval(rval);
-      if (!(n & ~127))
-         return n;
-   }
-   return 127;
-}
-*/
-
-void radamsa_init(void) {
-   int nobjs=0, nwords=0;
-   hp = (byte *) &heap; /* builtin heap */
-   state = IFALSE;
-   heap_metrics(&nwords, &nobjs);
-   max_heap_mb = (W == 4) ? 4096 : 65535;
-   nwords += nobjs + INITCELLS;
-   memstart = genstart = fp = (word *) realloc(NULL, (nwords + MEMPAD)*W);
-   if (!memstart) return;
-   memend = memstart + nwords - MEMPAD;
-   state = (word) load_heap(nobjs);
-}
-
-/* bvec → value library call test with preserved state */
-static word library_call(word val) {
-   word program_state = state;
-   word res;
-   state = IFALSE; 
-   if (program_state == IFALSE) {
-      exit(1);
-   }
-   res = vm((word *) program_state, val);
-   return res;
-}
-
-/*
-static size_t list_length(word lispval) {
-   size_t l = 0;
-   while(lispval != INULL) {
-      lispval = G(lispval, 2);
-      l++;
-   }
-   return l;
-}
-*/
-
-static size_t copy_list(uint8_t *ptr, word lispval, size_t max) {
-   size_t n = 0;
-   while(pairp((word)lispval) && max-- && lispval != INULL) {
-      *ptr++ = 255 & immval(G(lispval, 1)); // *ptr++ = car(list)
-      n++;
-      lispval = G(lispval, 2);              // list   = cdr(list)
-   }
-   if (lispval != INULL && max == 0) {
-      printf("ERROR: lisp return value was not a proper list. Trailing %lu\n", (unsigned long)lispval);
-   }
-   return n;
-}
-
-/* read data from *ptr - *(ptr + len), write output to *target and return amount of data written */
-size_t radamsa(uint8_t *ptr, size_t len, uint8_t *target, size_t max, unsigned int seed) {
-   word *arg, res;
-   word lptr = onum((word)ptr, 0);
-   word llen = onum((word)len, 0);
-   word lmax = onum((word)max, 0);
-   word lseed = onum((word)seed, 0);
-   arg = fp;
-   fp += 5;
-   arg[0] = make_header(5, TTUPLE);
-   arg[1] = lptr;
-   arg[2] = llen;
-   arg[3] = lmax;
-   arg[4] = lseed;
-   res = library_call((word) arg);
-   return copy_list(target, res, max);
-}
-
-size_t radamsa_inplace(uint8_t *ptr, size_t len, size_t max, unsigned int seed) {
-   return radamsa(ptr, len, ptr, max, seed);
-}
-
diff --git a/src/third_party/libradamsa/radamsa.h b/src/third_party/libradamsa/radamsa.h
deleted file mode 100644
index 073599da..00000000
--- a/src/third_party/libradamsa/radamsa.h
+++ /dev/null
@@ -1,13 +0,0 @@
-#include <inttypes.h>
-#include <stddef.h>
-
-void radamsa_init(void);
-
-size_t radamsa(uint8_t *ptr, size_t len,
-                      uint8_t *target, size_t max,
-                      unsigned int seed);
-
-size_t radamsa_inplace(uint8_t *ptr,
-                              size_t len,
-                              size_t max,
-                              unsigned int seed);