2018-09-06 10:07:37 +00:00
|
|
|
theory InnerSyntaxAntiquotations
|
|
|
|
|
imports "../../ontologies/Conceptual"
|
|
|
|
|
begin
|
|
|
|
|
|
|
|
|
|
ML\<open>
|
|
|
|
|
val ({tab = x, ...},y,z)= DOF_core.get_data @{context};
|
|
|
|
|
|
|
|
|
|
Symtab.dest z;
|
|
|
|
|
|
|
|
|
|
\<close>
|
|
|
|
|
|
2018-09-11 11:51:25 +00:00
|
|
|
lemma murks : "T = {ert,dfg}" sorry
|
|
|
|
|
|
2018-09-06 10:07:37 +00:00
|
|
|
text*[xcv::F, u="@{file ''./examples/conceptual/Attributes.thy''}"]\<open>Lorem ipsum ...\<close>
|
|
|
|
|
|
2018-09-11 12:15:11 +00:00
|
|
|
text*[xcv1::F, r="[@{thm ''HOL.refl''},
|
|
|
|
|
@{thm ''InnerSyntaxAntiquotations.murks''}]",
|
|
|
|
|
b="{(@{docitem ''xcv''},@{docitem ''xcv''})}", (* lamentable ! No typecheck.*)
|
2018-09-11 11:51:25 +00:00
|
|
|
s="[@{typ ''int list''}]"]\<open>Lorem ipsum ...\<close>
|
2018-09-11 10:08:25 +00:00
|
|
|
|
2018-09-06 10:07:37 +00:00
|
|
|
|
|
|
|
|
end
|
