Module WpAnnot.FunctionContracts


module FunctionContracts: Wprop.Indexed2(Dashtbl.Default_key_marshaler(Kernel_function))(Dashtbl.Default_key_marshaler(Datatype.String))(sig
type key = Db_types.kernel_function * string 
val size : int
val kind : [> `Correctness ]
val dependencies : State.t list
val state_name : Kernel_function.t * string -> string
val state_proxy : Db_types.kernel_function * 'a ->
'b -> (string * Property.identified_property list) option
end)

module P: Datatype.Pair_with_collections(Key1)(Key2)(sig
val module_name : string
end)
module I: Wprop.Indexed(P)(Info)
type key1 = Key1.t 
type key2 = Key2.t 
val state : Key1.t -> Key2.t -> State.t
val property : Key1.t -> Key2.t -> Property.identified_property