Values do not match:
         val to_list :
           ?order:('a -> 'a -> int) -> (Note.t -> 'a) -> t -> 'a list
       is not included in
         val to_list : ?order:('b -> 'b -> int) -> ('a -> 'b) -> t -> 'b list