Hi there, I am working my way through Janestreet’s implementation of the List.Assoc module, trying to use the find function in an assocciation like this one:

let assoc = [(“one”, 1); (“two”, 2); (“three”, 3)]

but when I try the pattern matching:

match List.Assoc.find assoc “Two” with

|None -> 0

|Some x -> x

I get the following error:

Error: This pattern matches values of type 'a option

but a pattern was expected which matches values of type

equal:(string -> string -> bool) -> int option

Any hints on what I may be doing wrong?

Thanks,

Alex.