Commit b588e825 authored by Ralf Jung's avatar Ralf Jung
Browse files

make sim_ectx simpl never

parent 42e45f5a
......@@ -80,3 +80,6 @@ Section fix_lang.
Definition sim_expr_ectx `{!SimE s} π K_t K_s Φ :=
( v_t v_s, ext_rel π v_t v_s - sim_expr Φ π (fill K_t (of_val v_t)) (fill K_s (of_val v_s)))%I.
End fix_lang.
Global Arguments sim_ectx : simpl never.
Global Arguments sim_expr_ectx : simpl never.
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment