src/HOL/Statespace/state_space.ML
changeset 59936 b8ffc3dc9e24
parent 59900 a5591a15112e
child 60327 a3f565b8ba76
     1.1 --- a/src/HOL/Statespace/state_space.ML	Mon Apr 06 16:30:44 2015 +0200
     1.2 +++ b/src/HOL/Statespace/state_space.ML	Mon Apr 06 17:06:48 2015 +0200
     1.3 @@ -650,7 +650,7 @@
     1.4          (plus1_unless comp parent --
     1.5            Scan.optional (@{keyword "+"} |-- Parse.!!! (Scan.repeat1 comp)) [])));
     1.6  val _ =
     1.7 -  Outer_Syntax.command @{command_spec "statespace"} "define state-space as locale context"
     1.8 +  Outer_Syntax.command @{command_keyword statespace} "define state-space as locale context"
     1.9      (statespace_decl >> (fn ((args, name), (parents, comps)) =>
    1.10        Toplevel.theory (define_statespace args name parents comps)));
    1.11