fact: Definition EvalFresh (flist : list Expression) (st : State.t) : Prop := forall loc , In loc (map (fun e => match EvalRefExpression e st with | Some loc => loc | _ => UndefinedObject end ) flist ) -> Heap.typeof (st@fr@preheap) loc = None.
imports: Coq(List) Coq(ListSet) Coq(FSetInterface) Coq(Bool) Coq(ZArith) Coq(Relation_Operators) JML(ListHelpers)