aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorvan Hauser <vh@thc.org>2020-06-25 16:51:29 +0200
committervan Hauser <vh@thc.org>2020-06-25 16:51:29 +0200
commit8178f4dfddfb51f7a3e2f94e67bb9cf7332c7ef1 (patch)
tree1c72f66dfa99ed06e79d095f7d1fca37e859e88b /src
parent4a3305c0074cc6172faac12934bb2ad367d23759 (diff)
downloadafl++-8178f4dfddfb51f7a3e2f94e67bb9cf7332c7ef1.tar.gz
remove radamsa, add radamsa custom mutator
Diffstat (limited to 'src')
-rw-r--r--src/afl-fuzz-mutators.c4
-rw-r--r--src/afl-fuzz-one.c62
-rw-r--r--src/afl-fuzz-stats.c27
-rw-r--r--src/afl-fuzz.c112
-rw-r--r--src/third_party/libradamsa/.gitignore3
-rw-r--r--src/third_party/libradamsa/GNUmakefile26
-rw-r--r--src/third_party/libradamsa/LICENSE19
-rw-r--r--src/third_party/libradamsa/README.md9
-rw-r--r--src/third_party/libradamsa/libradamsa-test.c75
-rw-r--r--src/third_party/libradamsa/libradamsa.c30853
-rw-r--r--src/third_party/libradamsa/radamsa.h13
11 files changed, 20 insertions, 31183 deletions
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 60db9777..dfb103d7 100644
--- a/src/afl-fuzz-one.c
+++ b/src/afl-fuzz-one.c
@@ -554,8 +554,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,
@@ -1685,6 +1683,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);
@@ -1709,7 +1708,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;
@@ -2426,63 +2425,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,
- rand_get_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:
diff --git a/src/afl-fuzz-stats.c b/src/afl-fuzz-stats.c
index 0f89abca..fc93011b 100644
--- a/src/afl-fuzz-stats.c
+++ b/src/afl-fuzz-stats.c
@@ -746,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) {
@@ -835,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 a20d4cba..2f23aec7 100644
--- a/src/afl-fuzz.c
+++ b/src/afl-fuzz.c
@@ -46,63 +46,6 @@ static void at_exit() {
}
-static u8 *get_libradamsa_path(u8 *own_loc) {
-
- u8 *tmp, *cp, *rsl, *own_copy;
-
- tmp = getenv("AFL_PATH");
-
- if (tmp) {
-
- cp = alloc_printf("%s/libradamsa.so", tmp);
-
- if (access(cp, X_OK)) { FATAL("Unable to find '%s'", cp); }
-
- return cp;
-
- }
-
- own_copy = ck_strdup(own_loc);
- rsl = strrchr(own_copy, '/');
-
- if (rsl) {
-
- *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)) {
-
- return ck_strdup(AFL_PATH "/libradamsa.so");
-
- }
-
- if (!access(BIN_PATH "/libradamsa.so", X_OK)) {
-
- return ck_strdup(BIN_PATH "/libradamsa.so");
-
- }
-
- 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. */
static void usage(afl_state_t *afl, u8 *argv0, int more_help) {
@@ -130,8 +73,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 = "
@@ -794,15 +735,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;
@@ -845,47 +780,6 @@ int main(int argc, char **argv_orig, char **envp) {
}
- 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) {
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 cc7c5e0b..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,
-#if !defined __HAIKU__
- F_GETOWN, F_SETOWN,
-#endif
- F_GETLK, F_SETLK, F_SETLKW, F_RDLCK, F_UNLCK, F_WRLCK, CLOCK_MONOTONIC,
- CLOCK_PROCESS_CPUTIME_ID, CLOCK_REALTIME, CLOCK_THREAD_CPUTIME_ID
- };
- 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);
generated by cgit v1.2.3 (git 2.25.1) at 2026-01-14 15:42:27 +0000