equal
deleted
inserted
replaced
82 val def_name_optional: string -> string -> string |
82 val def_name_optional: string -> string -> string |
83 val def_binding_optional: Binding.binding -> Binding.binding -> Binding.binding |
83 val def_binding_optional: Binding.binding -> Binding.binding -> Binding.binding |
84 val has_name_hint: thm -> bool |
84 val has_name_hint: thm -> bool |
85 val get_name_hint: thm -> string |
85 val get_name_hint: thm -> string |
86 val put_name_hint: string -> thm -> thm |
86 val put_name_hint: string -> thm -> thm |
87 val axiomK: string |
|
88 val assumptionK: string |
|
89 val definitionK: string |
87 val definitionK: string |
90 val theoremK: string |
88 val theoremK: string |
91 val generatedK : string |
89 val generatedK : string |
92 val lemmaK: string |
90 val lemmaK: string |
93 val corollaryK: string |
91 val corollaryK: string |
411 fun put_name_hint name = untag_rule Markup.nameN #> tag_rule (Markup.nameN, name); |
409 fun put_name_hint name = untag_rule Markup.nameN #> tag_rule (Markup.nameN, name); |
412 |
410 |
413 |
411 |
414 (* theorem kinds *) |
412 (* theorem kinds *) |
415 |
413 |
416 val axiomK = "axiom"; |
|
417 val assumptionK = "assumption"; |
|
418 val definitionK = "definition"; |
414 val definitionK = "definition"; |
419 val theoremK = "theorem"; |
415 val theoremK = "theorem"; |
420 val generatedK = "generatedK" |
416 val generatedK = "generatedK" |
421 val lemmaK = "lemma"; |
417 val lemmaK = "lemma"; |
422 val corollaryK = "corollary"; |
418 val corollaryK = "corollary"; |