linorder_cases;
authorwenzelm
Thu, 07 Sep 2000 20:53:50 +0200
changeset 9897 3a50d71323a8
parent 9896 1319676eb2db
child 9898 5f28e5b4c68e
linorder_cases;
src/HOL/Real/HahnBanach/HahnBanach.thy
--- a/src/HOL/Real/HahnBanach/HahnBanach.thy	Thu Sep 07 20:53:02 2000 +0200
+++ b/src/HOL/Real/HahnBanach/HahnBanach.thy	Thu Sep 07 20:53:50 2000 +0200
@@ -257,7 +257,7 @@
                   (rule vs_sum_subspace [OF _ lin_subspace])
               have "is_subspace F H" .
               also from h lin_vs 
-              have [fold H'_def]: "is_subspace H (H + lin x')" ..
+              have [folded H'_def]: "is_subspace H (H + lin x')" ..
               finally (subspace_trans [OF _ h]) 
               show f_h': "is_subspace F H'" .