| author | Christian Urban <christian.urban@kcl.ac.uk> |
| Sat, 31 Oct 2020 16:23:12 +0000 | |
| changeset 344 | 8686ae7174c3 |
| parent 323 | 93b6c16dded8 |
| permissions | -rw-r--r-- |
| 227 | 1 |
|
| 283 | 2 |
import CW7a._ |
| 227 | 3 |
|
4 |
assert(occurrences(List("a", "b", "b", "c", "d")) == Map("a" -> 1, "b" -> 2, "c" -> 1, "d" -> 1))
|
|
5 |
||
6 |
assert(occurrences(List("d", "b", "d", "b", "d")) == Map("d" -> 3, "b" -> 2))
|
|
| 323 | 7 |
|
8 |
assert(occurrences(List("b", "b", "b", "b", "b")) == Map("b" -> 5))
|
|
9 |
||
10 |
assert(occurrences(Nil) == Map()) |