Require Export Bmc.Logic.
Definition lasso_fwd_conj (I : prop) (T : trans) (k : nat) : Prop :=
forall ss : sseq,
~(I ss.[0] /\ loop_free T ss 0 k).

Lemma lasso_fwd_conj_eq :
forall (I:prop) (T:trans) (k:nat),
lasso_fwd I T k <-> lasso_fwd_conj I T k.