--- a/src/HOL/Tools/SMT/z3_replay_rules.ML Wed Oct 20 17:11:46 2021 +0200
+++ b/src/HOL/Tools/SMT/z3_replay_rules.ML Wed Oct 20 18:13:17 2021 +0200
@@ -16,7 +16,6 @@
(
type T = thm Net.net
val empty = Net.empty
- val extend = I
val merge = Net.merge Thm.eq_thm
)