Load loadpath.
veristar.list_denote veristar.heapresolve
veristar.model_type veristar.model veristar.compare.
(* clause lemmas -Interpretation of clauses under reordering, etc. *)
Module Type CL_SOUND.
Declare Module VSM : VERISTAR_MODEL. Import VSM VeriStarLogic.

Axiom rev_cmp_eq : forall {A:Type} (f : A -> A -> comparison) (a1 a2 : A),
Eq = rev_cmp f a1 a2 -> rev_cmp f a1 a2 = f a1 a2.