changeset 46822 | 95f1e700b712 |
parent 35762 | af3ff2ba4c54 |
child 76213 | e44d86131648 |
--- a/src/ZF/Coind/Dynamic.thy Tue Mar 06 16:06:52 2012 +0000 +++ b/src/ZF/Coind/Dynamic.thy Tue Mar 06 16:46:27 2012 +0000 @@ -8,7 +8,7 @@ consts EvalRel :: i inductive - domains "EvalRel" <= "ValEnv * Exp * Val" + domains "EvalRel" \<subseteq> "ValEnv * Exp * Val" intros eval_constI: " [| ve \<in> ValEnv; c \<in> Const |] ==>