Source file LaTeXTemplate.ml
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
let write ch ~packages ~source =
let newline() = Printf.fprintf ch "\n" in
Printf.fprintf ch {|\RequirePackage{ifpdf}|};
newline ();
Printf.fprintf ch {|\ifpdf\documentclass[crop]{standalone}\else\documentclass[crop,dvisvgm]{standalone}\fi|};
newline ();
begin
packages |> List.iter @@ fun pkg ->
Printf.fprintf ch {|\usepackage{%s}|} pkg;
newline ();
end;
Printf.fprintf ch {|\begin{document}|};
newline ();
Printf.fprintf ch "%s" source;
newline ();
Printf.fprintf ch {|\end{document}|}