src/Tools/IsaPlanner/isand.ML
changeset 81954 6f2bcdfa9a19
parent 81521 1bfad73ab115
--- a/src/Tools/IsaPlanner/isand.ML	Wed Jan 22 21:35:05 2025 +0100
+++ b/src/Tools/IsaPlanner/isand.ML	Wed Jan 22 22:22:19 2025 +0100
@@ -102,7 +102,7 @@
 fun hide_other_goals th =
   let
     (* tl beacuse fst sg is the goal we are interested in *)
-    val cprems = tl (Drule.cprems_of th);
+    val cprems = tl (Thm.cprems_of th);
     val aprems = map Thm.assume cprems;
   in (Drule.implies_elim_list (Drule.rotate_prems 1 th) aprems, cprems) end;