Load loadpath.
veristar.list_denote veristar.superpose veristar.basic
veristar.compare.
Module Type SP_SOUND.
Declare Module VSM : VERISTAR_MODEL.

Axiom check_clauseset_Cexample_sound: forall init final empty R selected,
check_clauseset init = (C_example R selected, final, empty) ->
setd clause_denote inter TT init |--
setd clause_denote inter TT selected &&
setd clause_denote inter TT final.