sig
val index : Wp.Sigs.s_lval -> Wp.Lang.F.term -> Wp.Sigs.s_lval
val field : Wp.Sigs.s_lval -> Cil_types.fieldinfo -> Wp.Sigs.s_lval
val equal : Wp.Sigs.s_lval -> Wp.Sigs.s_lval -> bool
type 'a model
type state
val create :
(module Wp.Sigs.Model with type Sigma.t = 'a) -> 'a Wp.Mstate.model
val state : 'a Wp.Mstate.model -> 'a -> Wp.Mstate.state
val lookup : Wp.Mstate.state -> Wp.Lang.F.term -> Wp.Sigs.mval
val apply :
(Wp.Lang.F.term -> Wp.Lang.F.term) -> Wp.Mstate.state -> Wp.Mstate.state
val iter :
(Wp.Sigs.mval -> Wp.Lang.F.term -> unit) -> Wp.Mstate.state -> unit
val updates :
Wp.Mstate.state Wp.Sigs.sequence ->
Wp.Lang.F.Vars.t -> Wp.Sigs.update Bag.t
end