--- a/src/Pure/Isar/specification.ML Wed Aug 27 20:42:15 2025 +0200
+++ b/src/Pure/Isar/specification.ML Thu Aug 28 13:49:52 2025 +0200
@@ -260,7 +260,8 @@
|> Local_Theory.define_internal ((b, mx), ((Binding.suffix_name "_raw" name, []), rhs));
val ([(def_name, [th])], lthy3) = lthy2
- |> Local_Theory.notes [((name, Code.singleton_default_equation_attrib :: atts), [([prove lthy2 raw_th], [])])];
+ |> Local_Theory.notes
+ [((name, Code.singleton_default_equation_attrib :: atts), [([prove lthy2 raw_th], [])])];
val lthy4 = lthy3
|> Spec_Rules.add name Spec_Rules.equational [lhs] [th];