equal
deleted
inserted
replaced
19 val begin_delim: string -> string |
19 val begin_delim: string -> string |
20 val end_delim: string -> string |
20 val end_delim: string -> string |
21 val begin_tag: string -> string |
21 val begin_tag: string -> string |
22 val end_tag: string -> string |
22 val end_tag: string -> string |
23 val tex_trailer: string |
23 val tex_trailer: string |
24 val isabelle_file: string -> string -> string |
24 val isabelle_theory: string -> string -> string |
25 val symbol_source: (string -> bool) * (string -> bool) -> |
25 val symbol_source: (string -> bool) * (string -> bool) -> |
26 string -> Symbol.symbol list -> string |
26 string -> Symbol.symbol list -> string |
27 val theory_entry: string -> string |
27 val theory_entry: string -> string |
28 val modes: string list |
28 val modes: string list |
29 end; |
29 end; |
165 "%%% Local Variables:\n\ |
165 "%%% Local Variables:\n\ |
166 \%%% mode: latex\n\ |
166 \%%% mode: latex\n\ |
167 \%%% TeX-master: \"root\"\n\ |
167 \%%% TeX-master: \"root\"\n\ |
168 \%%% End:\n"; |
168 \%%% End:\n"; |
169 |
169 |
170 fun isabelle_file name txt = |
170 fun isabelle_theory name txt = |
171 "%\n\\begin{isabellebody}%\n\ |
171 "%\n\\begin{isabellebody}%\n\ |
172 \\\def\\isabellecontext{" ^ output_syms name ^ "}%\n" ^ txt ^ |
172 \\\setisabellecontext{" ^ output_syms name ^ "}%\n" ^ txt ^ |
173 "\\end{isabellebody}%\n" ^ tex_trailer; |
173 "\\end{isabellebody}%\n" ^ tex_trailer; |
174 |
174 |
175 fun symbol_source known name syms = isabelle_file name |
175 fun symbol_source known name syms = |
176 ("\\isamarkupheader{" ^ output_known_symbols known (Symbol.explode name) ^ "}%\n" ^ |
176 isabelle_theory name |
177 output_known_symbols known syms); |
177 ("\\isamarkupfile{" ^ output_known_symbols known (Symbol.explode name) ^ "}%\n" ^ |
|
178 output_known_symbols known syms); |
178 |
179 |
179 fun theory_entry name = "\\input{" ^ name ^ ".tex}\n\n"; |
180 fun theory_entry name = "\\input{" ^ name ^ ".tex}\n\n"; |
180 |
181 |
181 |
182 |
182 (* print mode *) |
183 (* print mode *) |