#include <stdio.h>
#include <stdlib.h>

#define TAPE_SIZE 30000
void panic(char *msg) {
    fprintf(stderr, "panic: %s\n", msg);
    exit(-1);
}
void print_tape(unsigned int *tape, unsigned int *taken_cells, unsigned int size) { for (unsigned int i = 0; i < size; i++) { printf("%u ", tape[i]); } printf("\n"); int unfreed = 0; for (unsigned int i=0; i < TAPE_SIZE; i++) {unfreed += taken_cells[i]; i += taken_cells[i];} printf("%d unfreed\n", unfreed); }
unsigned int allocate(unsigned int *tape, unsigned int ptr, unsigned int *taken_cells) {
    unsigned int requested_mem = tape[ptr];
    unsigned int consecutive_zero_cells = 0;
    for (int i=TAPE_SIZE-1; i>0; i--) {
        if (taken_cells[i] == 0) {
            consecutive_zero_cells++;
        } else {
            consecutive_zero_cells = 0;
        }
        if (consecutive_zero_cells >= requested_mem) {
            unsigned int addr = i;
            for (int j=0; j<requested_mem; j++) {
                taken_cells[addr + j] = requested_mem - j;
            }
            return addr;
        }
    }
    panic("no free memory");
}
void free_mem(unsigned int *tape, unsigned int ptr, unsigned int *taken_cells) {
    unsigned int address = tape[ptr];
    unsigned int size = taken_cells[address];

    for (int i=0; i<size; i++) {
        taken_cells[address+i] = 0;
        tape[address+i] = 0;
    }
}
void zero(unsigned int *tape) {
    for (int i = 0; i < TAPE_SIZE; i++) tape[i] = 0;
}
int main() {
    unsigned int tape[TAPE_SIZE], taken_cells[TAPE_SIZE], ref_tape[256]; 
    unsigned int ptr = 0, ref_ptr = 0;
    zero(tape);
    zero(taken_cells);
while (tape[ptr]) {tape[ptr]-=1;}tape[ptr]+=14;ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}tape[ptr]+=14;ptr-=3;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];scanf("%d", &tape[ptr]);ptr = ref_tape[--ref_ptr];tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr] = allocate(tape, ptr, taken_cells);ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=6;while (tape[ptr]) {tape[ptr]-=1;}ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=7;tape[ptr]+=1;ptr-=6;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=2;while (tape[ptr]) {tape[ptr]-=1;}ptr-=3;while (tape[ptr]) {ptr+=3;tape[ptr]+=1;ptr-=2;tape[ptr]+=1;ptr-=1;tape[ptr]-=1;}ptr+=1;while (tape[ptr]) {ptr-=1;tape[ptr]+=1;ptr+=1;tape[ptr]-=1;}ptr+=2;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=7;while (tape[ptr]) {ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=6;tape[ptr]-=1;}ptr-=6;while (tape[ptr]) {ptr+=6;tape[ptr]+=1;ptr-=6;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=7;while (tape[ptr]) {ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=6;tape[ptr]-=1;}ptr-=6;while (tape[ptr]) {ptr+=6;tape[ptr]+=1;ptr-=6;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];free_mem(tape, ptr, taken_cells);while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]+=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]+=1;ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]+=1;ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=2;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;while (tape[ptr]) {ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=2;tape[ptr]+=1;ptr-=2;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]-=1;ptr+=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;}ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=2;while (tape[ptr]) {ptr-=2;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]+=1;ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr+=1;tape[ptr]-=1;}ptr-=2;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]+=1;ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]-=1;ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr = ref_tape[--ref_ptr];tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr-=1;tape[ptr]+=1;ptr+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr] = allocate(tape, ptr, taken_cells);ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=9;while (tape[ptr]) {tape[ptr]-=1;}ptr-=10;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=10;tape[ptr]+=1;ptr-=9;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=10;while (tape[ptr]) {ptr-=10;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=9;tape[ptr]-=1;}ptr-=9;while (tape[ptr]) {ptr+=9;tape[ptr]+=1;ptr-=9;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=10;while (tape[ptr]) {ptr-=10;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=9;tape[ptr]-=1;}ptr-=9;while (tape[ptr]) {ptr+=9;tape[ptr]+=1;ptr-=9;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];free_mem(tape, ptr, taken_cells);while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr] = allocate(tape, ptr, taken_cells);ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=6;while (tape[ptr]) {tape[ptr]-=1;}ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=7;tape[ptr]+=1;ptr-=6;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=2;while (tape[ptr]) {tape[ptr]-=1;}ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=3;tape[ptr]+=1;ptr-=2;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=7;while (tape[ptr]) {ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=6;tape[ptr]-=1;}ptr-=6;while (tape[ptr]) {ptr+=6;tape[ptr]+=1;ptr-=6;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=7;while (tape[ptr]) {ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=6;tape[ptr]-=1;}ptr-=6;while (tape[ptr]) {ptr+=6;tape[ptr]+=1;ptr-=6;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];free_mem(tape, ptr, taken_cells);while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];tape[ptr]-=1;ptr+=7;while (tape[ptr]) {tape[ptr]-=1;}ptr-=7;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr] = allocate(tape, ptr, taken_cells);ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=6;while (tape[ptr]) {tape[ptr]-=1;}ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=7;tape[ptr]+=1;ptr-=6;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=2;while (tape[ptr]) {tape[ptr]-=1;}ptr-=3;while (tape[ptr]) {ptr+=3;tape[ptr]+=1;ptr-=2;tape[ptr]+=1;ptr-=1;tape[ptr]-=1;}ptr+=1;while (tape[ptr]) {ptr-=1;tape[ptr]+=1;ptr+=1;tape[ptr]-=1;}ptr+=2;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=7;while (tape[ptr]) {ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=6;tape[ptr]-=1;}ptr-=6;while (tape[ptr]) {ptr+=6;tape[ptr]+=1;ptr-=6;tape[ptr]-=1;}while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=7;while (tape[ptr]) {ptr-=7;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=6;tape[ptr]-=1;}ptr-=6;while (tape[ptr]) {ptr+=6;tape[ptr]+=1;ptr-=6;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];free_mem(tape, ptr, taken_cells);while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=3;while (tape[ptr]) {ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=2;tape[ptr]-=1;}ptr-=2;while (tape[ptr]) {ptr+=2;tape[ptr]+=1;ptr-=2;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=3;while (tape[ptr]) {tape[ptr]-=1;}ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=4;tape[ptr]+=1;ptr-=3;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;tape[ptr]+=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ptr+=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr-=4;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]+=1;ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr-=3;while (tape[ptr]) {ptr+=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr-=3;tape[ptr]-=1;}ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];printf("%d", tape[ptr]);ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]+=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {tape[ptr]-=1;}ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=10;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];putchar(tape[ptr]);ptr = ref_tape[--ref_ptr];tape[ptr]-=1;tape[ptr]-=1;ptr+=1;while (tape[ptr]) {tape[ptr]-=1;}ptr+=2;while (tape[ptr]) {tape[ptr]-=1;}ptr-=3;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];while (tape[ptr]) {ptr = ref_tape[--ref_ptr];ptr+=3;tape[ptr]+=1;ptr-=2;tape[ptr]+=1;ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]-=1;ptr = ref_tape[--ref_ptr];ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];}ptr = ref_tape[--ref_ptr];ptr+=1;while (tape[ptr]) {ptr-=1;ref_tape[ref_ptr++] = ptr; ptr = tape[ptr];tape[ptr]+=1;ptr = ref_tape[--ref_ptr];ptr+=1;tape[ptr]-=1;}ptr-=1;tape[ptr]-=1;ptr+=7;while (tape[ptr]) {tape[ptr]-=1;}ptr-=7; }
