versatile

This commit is contained in:
Burkhart Wolff 2020-08-26 08:43:39 +02:00
parent 338bb7d4a4
commit 7a768cfdeb
3 changed files with 35 additions and 6 deletions

View File

@ -18,7 +18,7 @@ text*[pkosstref::st_ref_cls, title="''PikeOS Security Target''", st_version ="(0
It complies with the Common Criteria for Information Technology Security Evaluation
Version 3.1 Revision 4.\<close>
subsection*[pkossttoerefsubsec::st_ref_cls]\<open> TOE Reference \<close>
subsection*[pkossttoerefsubsec::st_ref_cls]\<open>TOE Reference\<close>
text*[pkostoeref::toe_ref_cls, dev_name="''''", toe_name="''PikeOS''",
toe_version= "(0,3,4)", prod_name="Some ''S3725''"]
@ -29,7 +29,7 @@ text*[pkostoeref::toe_ref_cls, dev_name="''''", toe_name="''PikeOS''",
Certification Kit build S4250 and PikeOS 3.4 Common Criteria Kit build S4388.\<close>
subsection*[pkossttoeovrvwsubsec::st_ref_cls]\<open> TOE Overview \<close>
text*[pkosovrw1::toe_ovrw_cls]\<open>The @{definition \<open>toe\<close> } is a special kind of operating
text*[pkosovrw1::toe_ovrw_cls]\<open>The @{definition \<open>toe_def\<close> } is a special kind of operating
system, that allows to effectively separate
different applications running on the same platform from each other. The TOE can host
user applications that can also be operating systems. User applications can also be

View File

@ -1275,11 +1275,11 @@ fun gen_enriched_document_command {inline=is_inline} cid_transform attr_transfor
(Proof_Context.init_global thy)
markdown toks
val file = {path = Path.make [oid ^ "_snippet.tex"],
(* val file = {path = Path.make [oid ^ "_snippet.tex"],
pos = @{here},
content = Latex.output_text text}
(* val _ = Generated_Files.write_file (Path.make ["latex_test"])
val _ = Generated_Files.write_file (Path.make ["latex_test"])
file
val _ = writeln (Latex.output_text text) *)
in thy end

View File

@ -148,8 +148,8 @@ textN\<open>... and here is its application macro expansion:
textN\<open> \<^theory_text>\<open>definition df = ...
\<close>
@{ML [display] \<open> let val x = 3 + 4 in true end
\<close>}
@{ML [display] \<open> let val x = 3 + 4 in true end \<close>}
@{verbatim [display] \<open> Lorem ipsum ... @{thm refl} _
Frédéric \textbf{TEST} \verb+sdf+ \<open>dfgdfg\<close> \<close>}
@{theory_text [display] \<open>definition df = ...
@ -161,5 +161,34 @@ text\<open>Final Status:\<close>
print_doc_items
print_doc_classes
section\<open>Experiments on Inline-Textelements\<close>
text\<open>Std Abbreviations. Inspired by the block *\<open>control spacing\<close>
in @{file \<open>$ISABELLE_HOME/src/Pure/Thy/document_antiquotations.ML\<close>}.
We could mechanize the table-construction and even attach the LaTeX
quirks to be dumped into the prelude.
\<close>
ML\<open>
val _ =
Theory.setup
( Thy_Output.antiquotation_raw \<^binding>\<open>dof\<close> (Scan.succeed ())
(fn _ => fn () => Latex.string "\\dof")
#> Thy_Output.antiquotation_raw \<^binding>\<open>isadof\<close> (Scan.succeed ())
(fn _ => fn () => Latex.string "\\isadof")
#> Thy_Output.antiquotation_raw \<^binding>\<open>eg\<close> (Scan.succeed ())
(fn _ => fn () => Latex.string "\\eg")
#> Thy_Output.antiquotation_raw \<^binding>\<open>TeXLive\<close> (Scan.succeed ())
(fn _ => fn () => Latex.string "\\TeXLife")
#> Thy_Output.antiquotation_raw \<^binding>\<open>LaTeX\<close> (Scan.succeed ())
(fn _ => fn () => Latex.string "\\LaTeX{}")
)
\<close>
textN\<open> \<^eg> \<^TeXLive> \<^dof> \<^isadof> \<^LaTeX> \<close>
text\<open> \<^theory_text>\<open>definition\<close>
\<close>
end
(*>*)