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.

(* rule w2 *)
Lemma w_lseg_nil : forall y Sigma s,
clause_denote (NegSpaceClause nil (Lseg Nil y :: Sigma) [Eqv y Nil]) s.