fact: Definition EvalSignalsOnly (sc : SpecificationCase) (st : State.t) : Prop := let s := CASE.signalsOnly sc in forall loc , Exception loc = Frame.ret st@fr -> exists t , In t (SIGNALS_ONLY.types s) /\ assign_compatible p st@h (Ref loc) t.
imports: Coq(List) Coq(ListSet) Coq(FSetInterface) Coq(Bool) Coq(ZArith) Coq(Relation_Operators) JML(ListHelpers)