Module Hoare_mem.Create.Model


module Model: sig .. end

module F: F
module A: A
module R: R
val tau_of_loc : Formula.tau

type loc =
| Addr of F.integer * F.integer
| Ptr of Hoare_mem.Create.pointer
val ptr : loc -> Hoare_mem.Create.pointer
val base : loc -> F.integer
val offset : loc -> F.integer
val loc_of_term : 'a -> F.abstract -> loc
val term_of_loc : loc -> F.abstract
val pp_loc : Format.formatter -> loc -> unit
val equal_loc_bool : loc ->
loc -> 'a F.term
val lt_loc_bool : loc ->
loc -> 'a F.term
val le_loc_bool : loc ->
loc -> 'a F.term
val equal_loc : loc ->
loc -> F.pred
val lt_loc : loc ->
loc -> F.pred
val le_loc : loc ->
loc -> F.pred
val minus_loc : loc ->
loc -> 'a F.term
val null : loc
val is_null : loc -> 'a F.term
val cast_loc_to_int : 'a -> 'b -> 'c -> 'd
val cast_int_to_loc : 'a -> 'b -> 'c -> 'd