End WF_SOUND.
Module WF_Sound (VSM : VERISTAR_MODEL) : WF_SOUND with Module VSM := VSM.
Module VSM := VSM.
Module CL := CL_Sound VSM. Import CL.

Lemma state_join_var_eq' : forall (s0 s1 s : state) x y,
join s0 s1 s -> (x === y) s -> (x === y) s0.