| author | Christian Urban <christian.urban@kcl.ac.uk> | 
| Fri, 22 Jan 2021 10:35:50 +0000 | |
| changeset 387 | d0f90515407a | 
| parent 382 | fec2c2f2d3db | 
| 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())  |