|
424
|
1 |
import M5a._
|
392
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
2 |
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
3 |
assert(jumpRight("[xxxxxx]xxx", 1, 0) == 8)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
4 |
assert(jumpRight("[xx[x]x]xxx", 1, 0) == 8)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
5 |
assert(jumpRight("[xx[x]x]xxx", 1, 0) == 8)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
6 |
assert(jumpRight("[xx[xxx]xxx", 1, 0) == 11)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
7 |
assert(jumpRight("[x[][]x]xxx", 1, 0) == 8)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
8 |
assert(jumpLeft("[xxxxxx]xxx", 6, 0) == 1)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
9 |
assert(jumpLeft("[xxxxxx]xxx", 7, 0) == -1)
|
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff
changeset
|
10 |
assert(jumpLeft("[x[][]x]xxx", 6, 0) == 1)
|