Mercurial Mercurial > hg > afl-material / annotate
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
progs/bf/mandelbrot.bf
author Christian Urban <christian dot urban at kcl dot ac dot uk>
Mon, 20 Jul 2020 16:46:30 +0100
changeset 736 0494995fd979
child 737 826c2bec403b
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
736
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     1
 
      A mandelbrot set fractal viewer in brainf*** written by Erik Bosman
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     2
 
+++++++++++++[->++>>>+++++>++>+<<<<<<]>>>>>++++++>--->>>>>>>>>>+++++++++++++++[[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     3
 
>>>>>>>>>]+[<<<<<<<<<]>>>>>>>>>-]+[>>>>>>>>[-]>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>[-]+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     4
 
<<<<<<<+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>>>+>>>>>>>>>>>>>>>>>>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     5
 
>+<<<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+[>>>>>>[>>>>>>>[-]>>]<<<<<<<<<[<<<<<<<<<]>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     6
 
>>>>>[-]+<<<<<<++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>>+<<<<<<+++++++[-[->>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     7
 
>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>>+<<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[[-]>>>>>>[>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     8
 
>>[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
     9
 
[>>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<+<<]>>>>>>>>]<<<<<<<<<[<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    10
 
<<]>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<<<]>>>>>>>>>+++++++++++++++[[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    11
 
>>>>>>>>>]+>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    12
 
>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>[-<<<<+>>>>]<<<<[->>>>+<<<<<[->>[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    13
 
-<<+>>]<<[->>+>>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    14
 
<<[>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    15
 
[>[-]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+<<<<<<<<<]>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    16
 
>>>>[>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    17
 
<<<<<<[->>>[-<<<+>>>]<<<[->>>+>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    18
 
>>>>>>>]<<<<<<<<<[>>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<<]>>[->>>>>>>>>+<<<<<<<<<]<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    19
 
+>>>>>>>>]<<<<<<<<<[>[-]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    20
 
<]<+<<<<<<<<<]>>>>>>>>>[>>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    21
 
>>>>>>>>>>>>>>>>>>>>>>>]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    22
 
>>>>>]<<<<<<<<<-<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+>>>>>>>>>>>>>>>>>>>>>+<<<[<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    23
 
<<<]>>>>>>>>>[>>>[-<<<->>>]+<<<[->>>->[-<<<<+>>>>]<<<<[->>>>+<<<<<<<<<<<<<[<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    24
 
<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>[-<<<<->>>>]+<<<<[->>>>-<[-<<<+>>>]<<<[->
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    25
 
>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    26
 
<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]<<<<<<<[->+>>>-<<<<]>>>>>>>>>+++++++++++++++++++
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    27
 
+++++++>>[-<<<<+>>>>]<<<<[->>>>+<<[-]<<]>>[<<<<<<<+<[-<+>>>>+<<[-]]>[-<<[->+>>>-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    28
 
<<<<]>>>]>>>>>>>>>>>>>[>>[-]>[-]>[-]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-]>>>>>>[>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    29
 
[-<<<<+>>>>]<<<<[->>>>+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>[-<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    30
 
<+>>>>>>>>>]>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>>>>>>]+>[-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    31
 
]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[>+>>>>>>>>]<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    32
 
<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<<<[->>[-<<+>>]<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    33
 
<[->>+>+<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>[->>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    34
 
>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[>[-]<->>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    35
 
[-<<<+>[<->-<<<<<<<+>>>>>>>]<[->+<]>>>]<<[->>+<<]<+<<<<<<<<<]>>>>>>>>>[>>>>>>[-<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    36
 
<<<<+>>>>>]<<<<<[->>>>>+<<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>+>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    37
 
]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<<<[->>[-<<+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    38
 
>>]<<[->>+>>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    39
 
[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[>[-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    40
 
]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+<<<<<<<<<]>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    41
 
[>>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    42
 
]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    43
 
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>]>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>++++++++
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    44
 
+++++++[[>>>>>>>>>]<<<<<<<<<-<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[>>>>>>>>[-<<<<<<<+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    45
 
>>>>>>>]<<<<<<<[->>>>>>>+<<<<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>>[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    46
 
-]>>>]<<<<<<<<<[<<<<<<<<<]>>>>+>[-<-<<<<+>>>>>]>[-<<<<<<[->>>>>+<++<<<<]>>>>>[-<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    47
 
<<<<+>>>>>]<->+>]<[->+<]<<<<<[->>>>>+<<<<<]>>>>>>[-]<<<<<<+>>>>[-<<<<->>>>]+<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    48
 
[->>>>->>>>>[>>[-<<->>]+<<[->>->[-<<<+>>>]<<<[->>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    49
 
+>>>>>>[>>>>>>>>>]>+<]]+>>>[-<<<->>>]+<<<[->>>-<[-<<+>>]<<[->>+<<<<<<<<<<<[<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    50
 
<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    51
 
[<<<<<<<<<]>>>>[-<<<<+>>>>]<<<<[->>>>+>>>>>[>+>>[-<<->>]<<[->>+<<]>>>>>>>>]<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    52
 
<<<+<[>[->>>>>+<<<<[->>>>-<<<<<<<<<<<<<<+>>>>>>>>>>>[->>>+<<<]<]>[->>>-<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    53
 
<<<<<+>>>>>>>>>>>]<<]>[->>>>+<<<[->>>-<<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>>+<<<]<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    54
 
<<<<<<<<<<]>>>>[-]<<<<]>>>[-<<<+>>>]<<<[->>>+>>>>>>[>+>[-<->]<[->+<]>>>>>>>>]<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    55
 
<<<<<+<[>[->>>>>+<<<[->>>-<<<<<<<<<<<<<<+>>>>>>>>>>[->>>>+<<<<]>]<[->>>>-<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    56
 
<<<<<<<+>>>>>>>>>>]<]>>[->>>+<<<<[->>>>-<<<<<<<<<<<<<<+>>>>>>>>>>]>]<[->>>>+<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    57
 
]<<<<<<<<<<<]>>>>>>+<<<<<<]]>>>>[-<<<<+>>>>]<<<<[->>>>+>>>>>[>>>>>>>>>]<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    58
 
[>[->>>>>+<<<<[->>>>-<<<<<<<<<<<<<<+>>>>>>>>>>>[->>>+<<<]<]>[->>>-<<<<<<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    59
 
+>>>>>>>>>>>]<<]>[->>>>+<<<[->>>-<<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>>+<<<]<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    60
 
<<<<<]]>[-]>>[-]>[-]>>>>>[>>[-]>[-]>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>[-<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    61
 
<<<+>>>>]<<<<[->>>>+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    62
 
[>>>>>>>>>]+>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    63
 
[>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>[-<<<<+>>>>]<<<<[->>>>+<<<<<[->>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    64
 
[-<<+>>]<<[->>+>+<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    65
 
<[>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    66
 
>[-]<->>>[-<<<+>[<->-<<<<<<<+>>>>>>>]<[->+<]>>>]<<[->>+<<]<+<<<<<<<<<]>>>>>>>>>[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    67
 
>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>]>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    68
 
>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>[-]>>>>+++++++++++++++[[>>>>>>>>>]<<<<<<<<<-<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    69
 
<<<<[<<<<<<<<<]>>>>>>>>>-]+[>>>[-<<<->>>]+<<<[->>>->[-<<<<+>>>>]<<<<[->>>>+<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    70
 
<<<<<<<<[<<<<<<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>[-<<<<->>>>]+<<<<[->>>>-<[-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    71
 
<<<+>>>]<<<[->>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    72
 
>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-<<<+>>>]<<<[->>>+>>>>>>[>+>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    73
 
[-<<<->>>]<<<[->>>+<<<]>>>>>>>>]<<<<<<<<+<[>[->+>[-<-<<<<<<<<<<+>>>>>>>>>>>>[-<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    74
 
+>>]<]>[-<<-<<<<<<<<<<+>>>>>>>>>>>>]<<<]>>[-<+>>[-<<-<<<<<<<<<<+>>>>>>>>>>>>]<]>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    75
 
[-<<+>>]<<<<<<<<<<<<<]]>>>>[-<<<<+>>>>]<<<<[->>>>+>>>>>[>+>>[-<<->>]<<[->>+<<]>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    76
 
>>>>>>]<<<<<<<<+<[>[->+>>[-<<-<<<<<<<<<<+>>>>>>>>>>>[-<+>]>]<[-<-<<<<<<<<<<+>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    77
 
>>>>>>>]<<]>>>[-<<+>[-<-<<<<<<<<<<+>>>>>>>>>>>]>]<[-<+>]<<<<<<<<<<<<]>>>>>+<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    78
 
]>>>>>>>>>[>>>[-]>[-]>[-]>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-]>[-]>>>>>[>>>>>>>[-<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    79
 
<+>>>>>>]<<<<<<[->>>>>>+<<<<+<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>+>[-<-<<<<+>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    80
 
>]>>[-<<<<<<<[->>>>>+<++<<<<]>>>>>[-<<<<<+>>>>>]<->+>>]<<[->>+<<]<<<<<[->>>>>+<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    81
 
<<<]+>>>>[-<<<<->>>>]+<<<<[->>>>->>>>>[>>>[-<<<->>>]+<<<[->>>-<[-<<+>>]<<[->>+<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    82
 
<<<<<<<<<[<<<<<<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>[-<<->>]+<<[->>->[-<<<+>>>]<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    83
 
<<[->>>+<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    84
 
<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-<<<+>>>]<<<[->>>+>>>>>>[>+>[-<->]<[->+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    85
 
<]>>>>>>>>]<<<<<<<<+<[>[->>>>+<<[->>-<<<<<<<<<<<<<+>>>>>>>>>>[->>>+<<<]>]<[->>>-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    86
 
<<<<<<<<<<<<<+>>>>>>>>>>]<]>>[->>+<<<[->>>-<<<<<<<<<<<<<+>>>>>>>>>>]>]<[->>>+<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    87
 
]<<<<<<<<<<<]>>>>>[-]>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<<<]]>>>>[-<<<<+>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    88
 
>>>]<<<<[->>>>+>>>>>[>+>>[-<<->>]<<[->>+<<]>>>>>>>>]<<<<<<<<+<[>[->>>>+<<<[->>>-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    89
 
<<<<<<<<<<<<<+>>>>>>>>>>>[->>+<<]<]>[->>-<<<<<<<<<<<<<+>>>>>>>>>>>]<<]>[->>>+<<[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    90
 
->>-<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>+<<]<<<<<<<<<<<<]]>>>>[-]<<<<]>>>>[-<<<<+>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    91
 
>>]<<<<[->>>>+>[-]>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+<<+<<<<<]>>>>>>>>>[>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    92
 
>>>]<<<<<<<<<[>[->>>>+<<<[->>>-<<<<<<<<<<<<<+>>>>>>>>>>>[->>+<<]<]>[->>-<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    93
 
<<<<<+>>>>>>>>>>>]<<]>[->>>+<<[->>-<<<<<<<<<<<<<+>>>>>>>>>>>]<]>[->>+<<]<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    94
 
<<<<]]>>>>>>>>>[>>[-]>[-]>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>[-]>[-]>>>>>[>>>>>[-<<<<+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    95
 
>>>>]<<<<[->>>>+<<<+<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>>[-<<<<<+>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    96
 
]<<<<<[->>>>>+<<<+<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    97
 
>>>>>]+>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+[>+>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    98
 
>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>[-<<<<+>>>>]<<<<[->>>>+<<<<<[->>[-<<+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
    99
 
>>]<<[->>+>>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   100
 
[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<]>[->>>>>>>>>+<<<<<<<<<]<+>>>>>>>>]<<<<<<<<<[>[-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   101
 
]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+<<<<<<<<<]>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   102
 
[>+>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>->>>>>[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   103
 
<<[->>>[-<<<+>>>]<<<[->>>+>+<<<<]+>>>>>>>>>]<<<<<<<<[<<<<<<<<<]]>>>>>>>>>[>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   104
 
>>>]<<<<<<<<<[>>[->>>>>>>>>+<<<<<<<<<]<<<<<<<<<<<]>>[->>>>>>>>>+<<<<<<<<<]<<+>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   105
 
>>>>>]<<<<<<<<<[>[-]<->>>>[-<<<<+>[<->-<<<<<<+>>>>>>]<[->+<]>>>>]<<<[->>>+<<<]<+
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   106
 
<<<<<<<<<]>>>>>>>>>[>>>>[-<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<+>>>>>>>>>>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   107
 
>>>>>>>>>>>>>>>>>>>]>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>+++++++++++++++[[>>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   108
 
>]<<<<<<<<<-<<<<<<<<<[<<<<<<<<<]>>>>>>>>>-]+>>>>>>>>>>>>>>>>>>>>>+<<<[<<<<<<<<<]
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   109
 
>>>>>>>>>[>>>[-<<<->>>]+<<<[->>>->[-<<<<+>>>>]<<<<[->>>>+<<<<<<<<<<<<<[<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   110
 
]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>[-<<<<->>>>]+<<<<[->>>>-<[-<<<+>>>]<<<[->>>+<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   111
 
<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   112
 
>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>->>[-<<<<+>>>>]<<<<[->>>>+<<[-]<<]>>]<<+>>>>[-<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   113
 
->>>>]+<<<<[->>>>-<<<<<<.>>]>>>>[-<<<<<<<.>>>>>>>]<<<[-]>[-]>[-]>[-]>[-]>[-]>>>[
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   114
 
>[-]>[-]>[-]>[-]>[-]>[-]>>>]<<<<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>[-]>>>>]<<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   115
 
[<<<<<<<<<]>+++++++++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>+>>>>>>>>>+<<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   116
 
<<<<<<[<<<<<<<<<]>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+[-]>>[>>>>>>>>>]<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   117
 
<<<<[>>>>>>>[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<<<<<<[<<<<<<<<<]>>>>>>>[-]+>>>]<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   118
 
<<<<<<]]>>>>>>>[-<<<<<<<+>>>>>>>]<<<<<<<[->>>>>>>+>>[>+>>>>[-<<<<->>>>]<<<<[->>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   119
 
>+<<<<]>>>>>>>>]<<+<<<<<<<[>>>>>[->>+<<]<<<<<<<<<<<<<<]>>>>>>>>>[>>>>>>>>>]<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   120
 
<<<<[>[-]<->>>>>>>[-<<<<<<<+>[<->-<<<+>>>]<[->+<]>>>>>>>]<<<<<<[->>>>>>+<<<<<<]<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   121
 
+<<<<<<<<<]>>>>>>>-<<<<[-]+<<<]+>>>>>>>[-<<<<<<<->>>>>>>]+<<<<<<<[->>>>>>>->>[>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   122
 
>>>[->>+<<]>>>>]<<<<<<<<<[>[-]<->>>>>>>[-<<<<<<<+>[<->-<<<+>>>]<[->+<]>>>>>>>]<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   123
 
<<<<[->>>>>>+<<<<<<]<+<<<<<<<<<]>+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>+<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   124
 
<<[<<<<<<<<<]>>>>>>>>>[>>>>>[-<<<<<->>>>>]+<<<<<[->>>>>->>[-<<<<<<<+>>>>>>>]<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   125
 
<<<[->>>>>>>+<<<<<<<<<<<<<<<<[<<<<<<<<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>>>>[-<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   126
 
<<<<<<->>>>>>>]+<<<<<<<[->>>>>>>-<<[-<<<<<+>>>>>]<<<<<[->>>>>+<<<<<<<<<<<<<<[<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   127
 
<<<<<<]>>>[-]+>>>>>>[>>>>>>>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   128
 
<<[<<<<<<<<<]>>>>[-]<<<+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>-<<<<<[<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   129
 
<<]]>>>]<<<<.>>>>>>>>>>[>>>>>>[-]>>>]<<<<<<<<<[<<<<<<<<<]>++++++++++[-[->>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   130
 
>+<<<<<<<<<]>>>>>>>>>]>>>>>+>>>>>>>>>+<<<<<<<<<<<<<<<[<<<<<<<<<]>>>>>>>>[-<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   131
 
<<+>>>>>>>>]<<<<<<<<[->>>>>>>>+[-]>[>>>>>>>>>]<<<<<<<<<[>>>>>>>>[-<<<<<<<+>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   132
 
>]<<<<<<<[->>>>>>>+<<<<<<<<[<<<<<<<<<]>>>>>>>>[-]+>>]<<<<<<<<<<]]>>>>>>>>[-<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   133
 
<<<+>>>>>>>>]<<<<<<<<[->>>>>>>>+>[>+>>>>>[-<<<<<->>>>>]<<<<<[->>>>>+<<<<<]>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   134
 
>>]<+<<<<<<<<[>>>>>>[->>+<<]<<<<<<<<<<<<<<<]>>>>>>>>>[>>>>>>>>>]<<<<<<<<<[>[-]<-
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   135
 
>>>>>>>>[-<<<<<<<<+>[<->-<<+>>]<[->+<]>>>>>>>>]<<<<<<<[->>>>>>>+<<<<<<<]<+<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   136
 
<<<]>>>>>>>>-<<<<<[-]+<<<]+>>>>>>>>[-<<<<<<<<->>>>>>>>]+<<<<<<<<[->>>>>>>>->[>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   137
 
>>>[->>+<<]>>>]<<<<<<<<<[>[-]<->>>>>>>>[-<<<<<<<<+>[<->-<<+>>]<[->+<]>>>>>>>>]<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   138
 
<<<<<[->>>>>>>+<<<<<<<]<+<<<<<<<<<]>+++++[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   139
 
+>>>>>>>>>>>>>>>>>>>>>>>>>>>+<<<<<<[<<<<<<<<<]>>>>>>>>>[>>>>>>[-<<<<<<->>>>>>]+<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   140
 
<<<<<[->>>>>>->>[-<<<<<<<<+>>>>>>>>]<<<<<<<<[->>>>>>>>+<<<<<<<<<<<<<<<<<[<<<<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   141
 
<<]>>>>[-]+>>>>>[>>>>>>>>>]>+<]]+>>>>>>>>[-<<<<<<<<->>>>>>>>]+<<<<<<<<[->>>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   142
 
-<<[-<<<<<<+>>>>>>]<<<<<<[->>>>>>+<<<<<<<<<<<<<<<[<<<<<<<<<]>>>[-]+>>>>>>[>>>>>>
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   143
 
>>>]>[-]+<]]+>[-<[>>>>>>>>>]<<<<<<<<]>>>>>>>>]<<<<<<<<<[<<<<<<<<<]>>>>[-]<<<++++
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   144
 
+[-[->>>>>>>>>+<<<<<<<<<]>>>>>>>>>]>>>>>->>>>>>>>>>>>>>>>>>>>>>>>>>>-<<<<<<[<<<<
0494995fd979 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff changeset 
   145
 
<<<<<]]>>>]
afl-material