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