Module `HM.Infix`

val (-->) : 'a t -> key -> 'a

val (<--) : 'a t -> (key * 'a) -> unit