forked from Isabelle_DOF/Isabelle_DOF
versatile
This commit is contained in:
parent
338bb7d4a4
commit
7a768cfdeb
|
@ -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
|
It complies with the Common Criteria for Information Technology Security Evaluation
|
||||||
Version 3.1 Revision 4.\<close>
|
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''",
|
text*[pkostoeref::toe_ref_cls, dev_name="''''", toe_name="''PikeOS''",
|
||||||
toe_version= "(0,3,4)", prod_name="Some ''S3725''"]
|
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>
|
Certification Kit build S4250 and PikeOS 3.4 Common Criteria Kit build S4388.\<close>
|
||||||
|
|
||||||
subsection*[pkossttoeovrvwsubsec::st_ref_cls]\<open> TOE Overview \<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
|
system, that allows to effectively separate
|
||||||
different applications running on the same platform from each other. The TOE can host
|
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
|
user applications that can also be operating systems. User applications can also be
|
||||||
|
|
|
@ -1275,11 +1275,11 @@ fun gen_enriched_document_command {inline=is_inline} cid_transform attr_transfor
|
||||||
(Proof_Context.init_global thy)
|
(Proof_Context.init_global thy)
|
||||||
markdown toks
|
markdown toks
|
||||||
|
|
||||||
val file = {path = Path.make [oid ^ "_snippet.tex"],
|
(* val file = {path = Path.make [oid ^ "_snippet.tex"],
|
||||||
pos = @{here},
|
pos = @{here},
|
||||||
content = Latex.output_text text}
|
content = Latex.output_text text}
|
||||||
|
|
||||||
(* val _ = Generated_Files.write_file (Path.make ["latex_test"])
|
val _ = Generated_Files.write_file (Path.make ["latex_test"])
|
||||||
file
|
file
|
||||||
val _ = writeln (Latex.output_text text) *)
|
val _ = writeln (Latex.output_text text) *)
|
||||||
in thy end
|
in thy end
|
||||||
|
|
|
@ -148,8 +148,8 @@ textN\<open>... and here is its application macro expansion:
|
||||||
|
|
||||||
textN\<open> \<^theory_text>\<open>definition df = ...
|
textN\<open> \<^theory_text>\<open>definition df = ...
|
||||||
\<close>
|
\<close>
|
||||||
@{ML [display] \<open> let val x = 3 + 4 in true end
|
@{ML [display] \<open> let val x = 3 + 4 in true end \<close>}
|
||||||
\<close>}
|
|
||||||
@{verbatim [display] \<open> Lorem ipsum ... @{thm refl} _
|
@{verbatim [display] \<open> Lorem ipsum ... @{thm refl} _
|
||||||
Frédéric \textbf{TEST} \verb+sdf+ \<open>dfgdfg\<close> \<close>}
|
Frédéric \textbf{TEST} \verb+sdf+ \<open>dfgdfg\<close> \<close>}
|
||||||
@{theory_text [display] \<open>definition df = ...
|
@{theory_text [display] \<open>definition df = ...
|
||||||
|
@ -161,5 +161,34 @@ text\<open>Final Status:\<close>
|
||||||
print_doc_items
|
print_doc_items
|
||||||
print_doc_classes
|
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
|
end
|
||||||
(*>*)
|
(*>*)
|
||||||
|
|
Reference in New Issue