empty_fun: generalized from -> to Pi
authorlcp
Fri, 23 Dec 1994 16:27:07 +0100
changeset 824 120fc7e857ba
parent 823 33dc37d46296
child 825 76d9575950f2
empty_fun: generalized from -> to Pi
src/ZF/func.ML
--- a/src/ZF/func.ML	Fri Dec 23 16:26:34 1994 +0100
+++ b/src/ZF/func.ML	Fri Dec 23 16:27:07 1994 +0100
@@ -57,7 +57,7 @@
 qed "Pi_empty2";
 
 (*The empty function*)
-goalw ZF.thy [Pi_def, function_def] "0: 0->A";
+goalw ZF.thy [Pi_def, function_def] "0: Pi(0,B)";
 by (fast_tac ZF_cs 1);
 qed "empty_fun";