progs/while-arrays/mandelbrot.bf
author Christian Urban <christian.urban@kcl.ac.uk>
Mon, 30 Oct 2023 12:58:45 +0000
changeset 949 61797848eede
parent 791 d47041b23498
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
746
6916229b817b updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 745
diff changeset
     1
// a Mandelbrot set generator in brainf___ written by Erik Bosman
6916229b817b updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 745
diff changeset
     2
// (http://esoteric.sange.fi/brainfuck/utils/mandelbrot/)
6916229b817b updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 745
diff changeset
     3
6916229b817b updated
Christian Urban <christian.urban@kcl.ac.uk>
parents: 745
diff changeset
     4
745
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     5
+++++++++++++[->++>>>+++++>++>+<<<<<<]>>>>>++++++>--->>>>>>>>>>+++++++++++++++[[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     6
>>>>>>>>>]+[<<<<<<<<<]>>>>>>>>>-]+[>>>>>>>>[-]>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>[-]+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     7
<<<<<<<+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>>>+>>>>>>>>>>>>>>>>>>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     8
>+<<<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+[>>>>>>[>>>>>>>[-]>>]<<<<<<<<<[<<<<<<<<<]>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     9
>>>>>[-]+<<<<<<++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>>+<<<<<<+++++++[-[->>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    10
>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>>+<<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[[-]>>>>>>[>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    11
>>[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    12
[>>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<+<<]>>>>>>>>]<<<<<<<<<[<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    13
<<]>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<<<]>>>>>>>>>+++++++++++++++[[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    14
>>>>>>>>>]+>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    15
>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>[-<<<<+>>>>]<<<<[->>>>+<<<<<[->>[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    16
-<<+>>]<<[->>+>>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    17
<<[>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    18
[>[-]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+<<<<<<<<<]>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    19
>>>>[>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    20
<<<<<<[->>>[-<<<+>>>]<<<[->>>+>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    21
>>>>>>>]<<<<<<<<<[>>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<<]>>[->>>>>>>>>+<<<<<<<<<]<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    22
+>>>>>>>>]<<<<<<<<<[>[-]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    23
<]<+<<<<<<<<<]>>>>>>>>>[>>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    24
>>>>>>>>>>>>>>>>>>>>>>>]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    25
>>>>>]<<<<<<<<<-<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+>>>>>>>>>>>>>>>>>>>>>+<<<[<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    26
<<<]>>>>>>>>>[>>>[-<<<->>>]+<<<[->>>->[-<<<<+>>>>]<<<<[->>>>+<<<<<<<<<<<<<[<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    27
<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>[-<<<<->>>>]+<<<<[->>>>-<[-<<<+>>>]<<<[->
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    28
>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    29
<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]<<<<<<<[->+>>>-<<<<]>>>>>>>>>+++++++++++++++++++
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    30
+++++++>>[-<<<<+>>>>]<<<<[->>>>+<<[-]<<]>>[<<<<<<<+<[-<+>>>>+<<[-]]>[-<<[->+>>>-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    31
<<<<]>>>]>>>>>>>>>>>>>[>>[-]>[-]>[-]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-]>>>>>>[>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    32
[-<<<<+>>>>]<<<<[->>>>+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>[-<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    33
<+>>>>>>>>>]>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>>>>>>]+>[-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    34
]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[>+>>>>>>>>]<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    35
<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<<<[->>[-<<+>>]<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    36
<[->>+>+<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>[->>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    37
>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[>[-]<->>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    38
[-<<<+>[<->-<<<<<<<+>>>>>>>]<[->+<]>>>]<<[->>+<<]<+<<<<<<<<<]>>>>>>>>>[>>>>>>[-<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    39
<<<<+>>>>>]<<<<<[->>>>>+<<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>+>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    40
]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<<<[->>[-<<+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    41
>>]<<[->>+>>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    42
[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[>[-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    43
]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+<<<<<<<<<]>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    44
[>>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    45
]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    46
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>]>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>++++++++
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    47
+++++++[[>>>>>>>>>]<<<<<<<<<-<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[>>>>>>>>[-<<<<<<<+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    48
>>>>>>>]<<<<<<<[->>>>>>>+<<<<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>>[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    49
-]>>>]<<<<<<<<<[<<<<<<<<<]>>>>+>[-<-<<<<+>>>>>]>[-<<<<<<[->>>>>+<++<<<<]>>>>>[-<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    50
<<<<+>>>>>]<->+>]<[->+<]<<<<<[->>>>>+<<<<<]>>>>>>[-]<<<<<<+>>>>[-<<<<->>>>]+<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    51
[->>>>->>>>>[>>[-<<->>]+<<[->>->[-<<<+>>>]<<<[->>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    52
+>>>>>>[>>>>>>>>>]>+<]]+>>>[-<<<->>>]+<<<[->>>-<[-<<+>>]<<[->>+<<<<<<<<<<<[<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    53
<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    54
[<<<<<<<<<]>>>>[-<<<<+>>>>]<<<<[->>>>+>>>>>[>+>>[-<<->>]<<[->>+<<]>>>>>>>>]<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    55
<<<+<[>[->>>>>+<<<<[->>>>-<<<<<<<<<<<<<<+>>>>>>>>>>>[->>>+<<<]<]>[->>>-<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    56
<<<<<+>>>>>>>>>>>]<<]>[->>>>+<<<[->>>-<<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>>+<<<]<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    57
<<<<<<<<<<]>>>>[-]<<<<]>>>[-<<<+>>>]<<<[->>>+>>>>>>[>+>[-<->]<[->+<]>>>>>>>>]<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    58
<<<<<+<[>[->>>>>+<<<[->>>-<<<<<<<<<<<<<<+>>>>>>>>>>[->>>>+<<<<]>]<[->>>>-<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    59
<<<<<<<+>>>>>>>>>>]<]>>[->>>+<<<<[->>>>-<<<<<<<<<<<<<<+>>>>>>>>>>]>]<[->>>>+<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    60
]<<<<<<<<<<<]>>>>>>+<<<<<<]]>>>>[-<<<<+>>>>]<<<<[->>>>+>>>>>[>>>>>>>>>]<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    61
[>[->>>>>+<<<<[->>>>-<<<<<<<<<<<<<<+>>>>>>>>>>>[->>>+<<<]<]>[->>>-<<<<<<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    62
+>>>>>>>>>>>]<<]>[->>>>+<<<[->>>-<<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>>+<<<]<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    63
<<<<<]]>[-]>>[-]>[-]>>>>>[>>[-]>[-]>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>[-<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    64
<<<+>>>>]<<<<[->>>>+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    65
[>>>>>>>>>]+>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    66
[>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>[-<<<<+>>>>]<<<<[->>>>+<<<<<[->>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    67
[-<<+>>]<<[->>+>+<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    68
<[>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    69
>[-]<->>>[-<<<+>[<->-<<<<<<<+>>>>>>>]<[->+<]>>>]<<[->>+<<]<+<<<<<<<<<]>>>>>>>>>[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    70
>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>]>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    71
>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>[-]>>>>+++++++++++++++[[>>>>>>>>>]<<<<<<<<<-<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    72
<<<<[<<<<<<<<<]>>>>>>>>>-]+[>>>[-<<<->>>]+<<<[->>>->[-<<<<+>>>>]<<<<[->>>>+<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    73
<<<<<<<<[<<<<<<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>[-<<<<->>>>]+<<<<[->>>>-<[-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    74
<<<+>>>]<<<[->>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    75
>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-<<<+>>>]<<<[->>>+>>>>>>[>+>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    76
[-<<<->>>]<<<[->>>+<<<]>>>>>>>>]<<<<<<<<+<[>[->+>[-<-<<<<<<<<<<+>>>>>>>>>>>>[-<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    77
+>>]<]>[-<<-<<<<<<<<<<+>>>>>>>>>>>>]<<<]>>[-<+>>[-<<-<<<<<<<<<<+>>>>>>>>>>>>]<]>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    78
[-<<+>>]<<<<<<<<<<<<<]]>>>>[-<<<<+>>>>]<<<<[->>>>+>>>>>[>+>>[-<<->>]<<[->>+<<]>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    79
>>>>>>]<<<<<<<<+<[>[->+>>[-<<-<<<<<<<<<<+>>>>>>>>>>>[-<+>]>]<[-<-<<<<<<<<<<+>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    80
>>>>>>>]<<]>>>[-<<+>[-<-<<<<<<<<<<+>>>>>>>>>>>]>]<[-<+>]<<<<<<<<<<<<]>>>>>+<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    81
]>>>>>>>>>[>>>[-]>[-]>[-]>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-]>[-]>>>>>[>>>>>>>[-<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    82
<+>>>>>>]<<<<<<[->>>>>>+<<<<+<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>+>[-<-<<<<+>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    83
>]>>[-<<<<<<<[->>>>>+<++<<<<]>>>>>[-<<<<<+>>>>>]<->+>>]<<[->>+<<]<<<<<[->>>>>+<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    84
<<<]+>>>>[-<<<<->>>>]+<<<<[->>>>->>>>>[>>>[-<<<->>>]+<<<[->>>-<[-<<+>>]<<[->>+<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    85
<<<<<<<<<[<<<<<<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>[-<<->>]+<<[->>->[-<<<+>>>]<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    86
<<[->>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    87
<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-<<<+>>>]<<<[->>>+>>>>>>[>+>[-<->]<[->+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    88
<]>>>>>>>>]<<<<<<<<+<[>[->>>>+<<[->>-<<<<<<<<<<<<<+>>>>>>>>>>[->>>+<<<]>]<[->>>-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    89
<<<<<<<<<<<<<+>>>>>>>>>>]<]>>[->>+<<<[->>>-<<<<<<<<<<<<<+>>>>>>>>>>]>]<[->>>+<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    90
]<<<<<<<<<<<]>>>>>[-]>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<<<]]>>>>[-<<<<+>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    91
>>>]<<<<[->>>>+>>>>>[>+>>[-<<->>]<<[->>+<<]>>>>>>>>]<<<<<<<<+<[>[->>>>+<<<[->>>-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    92
<<<<<<<<<<<<<+>>>>>>>>>>>[->>+<<]<]>[->>-<<<<<<<<<<<<<+>>>>>>>>>>>]<<]>[->>>+<<[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    93
->>-<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>+<<]<<<<<<<<<<<<]]>>>>[-]<<<<]>>>>[-<<<<+>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    94
>>]<<<<[->>>>+>[-]>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<<<]>>>>>>>>>[>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    95
>>>]<<<<<<<<<[>[->>>>+<<<[->>>-<<<<<<<<<<<<<+>>>>>>>>>>>[->>+<<]<]>[->>-<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    96
<<<<<+>>>>>>>>>>>]<<]>[->>>+<<[->>-<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>+<<]<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    97
<<<<]]>>>>>>>>>[>>[-]>[-]>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-]>[-]>>>>>[>>>>>[-<<<<+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    98
>>>>]<<<<[->>>>+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>>[-<<<<<+>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
    99
]<<<<<[->>>>>+<<<+<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   100
>>>>>]+>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[>+>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   101
>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>[-<<<<+>>>>]<<<<[->>>>+<<<<<[->>[-<<+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   102
>>]<<[->>+>>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   103
[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[>[-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   104
]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+<<<<<<<<<]>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   105
[>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   106
<<[->>>[-<<<+>>>]<<<[->>>+>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   107
>>>]<<<<<<<<<[>>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<<]>>[->>>>>>>>>+<<<<<<<<<]<<+>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   108
>>>>>]<<<<<<<<<[>[-]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   109
<<<<<<<<<]>>>>>>>>>[>>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   110
>>>>>>>>>>>>>>>>>>>]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   111
>]<<<<<<<<<-<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+>>>>>>>>>>>>>>>>>>>>>+<<<[<<<<<<<<<]
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   112
>>>>>>>>>[>>>[-<<<->>>]+<<<[->>>->[-<<<<+>>>>]<<<<[->>>>+<<<<<<<<<<<<<[<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   113
]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>[-<<<<->>>>]+<<<<[->>>>-<[-<<<+>>>]<<<[->>>+<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   114
<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   115
>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>->>[-<<<<+>>>>]<<<<[->>>>+<<[-]<<]>>]<<+>>>>[-<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   116
->>>>]+<<<<[->>>>-<<<<<<.>>]>>>>[-<<<<<<<.>>>>>>>]<<<[-]>[-]>[-]>[-]>[-]>[-]>>>[
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   117
>[-]>[-]>[-]>[-]>[-]>[-]>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>[-]>>>>]<<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   118
[<<<<<<<<<]>+++++++++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>+>>>>>>>>>+<<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   119
<<<<<<[<<<<<<<<<]>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+[-]>>[>>>>>>>>>]<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   120
<<<<[>>>>>>>[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<<<<<<[<<<<<<<<<]>>>>>>>[-]+>>>]<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   121
<<<<<<]]>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+>>[>+>>>>[-<<<<->>>>]<<<<[->>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   122
>+<<<<]>>>>>>>>]<<+<<<<<<<[>>>>>[->>+<<]<<<<<<<<<<<<<<]>>>>>>>>>[>>>>>>>>>]<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   123
<<<<[>[-]<->>>>>>>[-<<<<<<<+>[<->-<<<+>>>]<[->+<]>>>>>>>]<<<<<<[->>>>>>+<<<<<<]<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   124
+<<<<<<<<<]>>>>>>>-<<<<[-]+<<<]+>>>>>>>[-<<<<<<<->>>>>>>]+<<<<<<<[->>>>>>>->>[>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   125
>>>[->>+<<]>>>>]<<<<<<<<<[>[-]<->>>>>>>[-<<<<<<<+>[<->-<<<+>>>]<[->+<]>>>>>>>]<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   126
<<<<[->>>>>>+<<<<<<]<+<<<<<<<<<]>+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>+<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   127
<<[<<<<<<<<<]>>>>>>>>>[>>>>>[-<<<<<->>>>>]+<<<<<[->>>>>->>[-<<<<<<<+>>>>>>>]<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   128
<<<[->>>>>>>+<<<<<<<<<<<<<<<<[<<<<<<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>>>>[-<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   129
<<<<<<->>>>>>>]+<<<<<<<[->>>>>>>-<<[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<<<<<<<<<<<[<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   130
<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   131
<<[<<<<<<<<<]>>>>[-]<<<+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>-<<<<<[<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   132
<<]]>>>]<<<<.>>>>>>>>>>[>>>>>>[-]>>>]<<<<<<<<<[<<<<<<<<<]>++++++++++[-[->>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   133
>+<<<<<<<<<]>>>>>>>>>]>>>>>+>>>>>>>>>+<<<<<<<<<<<<<<<[<<<<<<<<<]>>>>>>>>[-<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   134
<<+>>>>>>>>]<<<<<<<<[->>>>>>>>+[-]>[>>>>>>>>>]<<<<<<<<<[>>>>>>>>[-<<<<<<<+>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   135
>]<<<<<<<[->>>>>>>+<<<<<<<<[<<<<<<<<<]>>>>>>>>[-]+>>]<<<<<<<<<<]]>>>>>>>>[-<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   136
<<<+>>>>>>>>]<<<<<<<<[->>>>>>>>+>[>+>>>>>[-<<<<<->>>>>]<<<<<[->>>>>+<<<<<]>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   137
>>]<+<<<<<<<<[>>>>>>[->>+<<]<<<<<<<<<<<<<<<]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>[-]<-
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   138
>>>>>>>>[-<<<<<<<<+>[<->-<<+>>]<[->+<]>>>>>>>>]<<<<<<<[->>>>>>>+<<<<<<<]<+<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   139
<<<]>>>>>>>>-<<<<<[-]+<<<]+>>>>>>>>[-<<<<<<<<->>>>>>>>]+<<<<<<<<[->>>>>>>>->[>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   140
>>>[->>+<<]>>>]<<<<<<<<<[>[-]<->>>>>>>>[-<<<<<<<<+>[<->-<<+>>]<[->+<]>>>>>>>>]<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   141
<<<<<[->>>>>>>+<<<<<<<]<+<<<<<<<<<]>+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   142
+>>>>>>>>>>>>>>>>>>>>>>>>>>>+<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>>[-<<<<<<->>>>>>]+<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   143
<<<<<[->>>>>>->>[-<<<<<<<<+>>>>>>>>]<<<<<<<<[->>>>>>>>+<<<<<<<<<<<<<<<<<[<<<<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   144
<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>>>>>[-<<<<<<<<->>>>>>>>]+<<<<<<<<[->>>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   145
-<<[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   146
>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>[-]<<<++++
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   147
+[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>->>>>>>>>>>>>>>>>>>>>>>>>>>>-<<<<<<[<<<<
7dc3643a0cc5 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
   148
<<<<<]]>>>]