src/Pure/Isar/isar_syn.ML
changeset 40965 54b6c9e1c157
parent 40960 9e54eb514a46
child 41229 d797baa3d57c
     1.1 --- a/src/Pure/Isar/isar_syn.ML	Sun Dec 05 13:42:58 2010 +0100
     1.2 +++ b/src/Pure/Isar/isar_syn.ML	Sun Dec 05 14:02:16 2010 +0100
     1.3 @@ -513,13 +513,6 @@
     1.4      (Parse.begin >> K Proof.begin_notepad);
     1.5  
     1.6  val _ =
     1.7 -  Outer_Syntax.local_theory_to_proof "example_proof"
     1.8 -    "example proof body, without any result" Keyword.thy_schematic_goal
     1.9 -    (Scan.succeed
    1.10 -      (Specification.theorem_cmd "" NONE (K I)
    1.11 -        Attrib.empty_binding [] (Element.Shows []) false #> Proof.enter_forward));
    1.12 -
    1.13 -val _ =
    1.14    Outer_Syntax.command "have" "state local goal"
    1.15      (Keyword.tag_proof Keyword.prf_goal)
    1.16      (Parse_Spec.statement >> ((Toplevel.print oo Toplevel.proof') o Isar_Cmd.have));