module Flex_state:sig
..end
type
t
val empty : t
type 'a
key
val create_key : unit -> 'a key
val add : 'a key -> 'a -> t -> t
val get : 'a key -> t -> 'a option
val get_exn : 'a key -> t -> 'a
Not_found
if the key is not presentval get_or : or_:'a -> 'a key -> t -> 'a