improved arbitrary_def: we now really don't know nothing about it!
authorwenzelm
Fri, 05 Dec 1997 17:19:38 +0100
changeset 4371 8755cdbbf6b3
parent 4370 162abcd128a1
child 4372 b9852572af0f
improved arbitrary_def: we now really don't know nothing about it!
src/HOL/HOL.thy
--- a/src/HOL/HOL.thy	Fri Dec 05 17:16:22 1997 +0100
+++ b/src/HOL/HOL.thy	Fri Dec 05 17:19:38 1997 +0100
@@ -183,6 +183,7 @@
   Let_def       "Let s f == f(s)"
   o_def         "(f::'b=>'c) o g == (%(x::'a). f(g(x)))"
   if_def        "If P x y == @z::'a. (P=True --> z=x) & (P=False --> z=y)"
+  arbitrary_def "False ==> arbitrary == (@x. False)"
 
 
 end