Module VSM := VSM.Module CL := CL_Sound VSM.

(* Specifications: *)
Lemma lseg_nil_or_loc : forall x y h, lseg x y h -> nil_or_loc y.
Lemma w_next_nil : forall y Sigma s, clause_denote (NegSpaceClause nil (Next Nil y :: Sigma) nil) s.