diff options
Diffstat (limited to 'org/out_latex.org')
| -rw-r--r-- | org/out_latex.org | 715 |
1 files changed, 377 insertions, 338 deletions
diff --git a/org/out_latex.org b/org/out_latex.org index 4156071..91ef042 100644 --- a/org/out_latex.org +++ b/org/out_latex.org @@ -33,89 +33,96 @@ template outputLaTeX() { static auto rgx = RgxO(); mixin spineLanguageCodes; auto lang = Lang(); - <<output_latex_shared_a_0>> - <<output_latex_shared_a_1>> - <<output_latex_shared_a_2>> - <<output_latex_shared_a_3>> - <<output_latex_shared_a_4>> - <<output_latex_shared_a_5>> - <<output_latex_shared_a_6>> - <<output_latex_shared_a_7>> - <<output_latex_shared_a_8>> - <<output_latex_shared_a_9>> - <<output_latex_shared_a_10>> - <<output_latex_shared_a_11>> -<<output_latex_shared_b_0>> -<<output_latex_shared_b_1>> -<<output_latex_shared_b_2>> -<<output_latex_shared_b_3>> -<<output_latex_shared_b_4>> -<<output_latex_shared_b_5>> -<<output_latex_shared_b_6>> + <<output_latex_shared_a_paper_type>> + <<output_latex_shared_a_special_characters_to_escape_object>> + <<output_latex_shared_a_special_characters_to_escape_text>> + <<output_latex_shared_a_fontface>> + <<output_latex_shared_a_leading_hardspaces>> + <<output_latex_shared_a_character_nbsp_to_hardspace>> + <<output_latex_shared_a_character_nbsp_to_space>> + <<output_latex_shared_a_links_and_images>> + <<output_latex_shared_a_footnotes>> + <<output_latex_shared_a_footnotes_remove>> + <<output_latex_shared_a_para>> + <<output_latex_shared_a_bookindex>> +<<output_latex_shared_b_heading>> +<<output_latex_shared_b_group>> +<<output_latex_shared_b_block>> +<<output_latex_shared_b_verse>> +<<output_latex_shared_b_codeblock>> +<<output_latex_shared_b_tablarize>> +<<output_latex_shared_b_table>> + <<output_latex_head_bullets_and_indentation>> <<output_latex_head_0>> - <<output_latex_head_1>> - <<output_latex_head_2>> - <<output_latex_head_3>> -<<output_latex_head_b_tex_0>> -<<output_latex_head_b_tex_1>> -<<output_latex_head_b_tex_2>> -<<output_latex_head_b_tex_3>> -<<output_latex_head_b_tex_4>> -<<output_latex_head_b_tex_5>> -<<output_latex_head_b_tex_6>> -<<output_latex_head_b_tex_7>> -<<output_latex_head_b_tex_8>> -<<output_latex_head_b_tex_9>> -<<output_latex_head_b_tex_10>> -<<output_latex_head_b_tex_11>> -<<output_latex_head_b_tex_12>> -<<output_latex_head_b_tex_13>> -<<output_latex_head_b_tex_14>> -<<output_latex_head_b_tex_15>> -<<output_latex_head_b_tex_16>> -<<output_latex_head_b_tex_17>> - <<output_latex_head_b_format_string_variables>> - <<output_latex_head_format_string_0>> - <<output_latex_head_format_string_1>> - <<output_latex_head_format_string_2>> - <<output_latex_head_format_string_3>> -<<output_latex_head_tex_0>> -<<output_latex_head_tex_1>> -<<output_latex_head_tex_2>> -<<output_latex_head_tex_3>> -<<output_latex_head_tex_4>> -<<output_latex_head_tex_5>> -<<output_latex_head_tex_6>> -<<output_latex_head_tex_7>> -<<output_latex_head_tex_8>> -<<output_latex_head_tex_9>> -<<output_latex_head_tex_10>> -<<output_latex_head_tex_11>> -<<output_latex_head_tex_12>> -<<output_latex_head_tex_13>> -<<output_latex_head_tex_14>> + <<output_latex_head_papertype>> + <<output_latex_head_footer>> +<<output_latex_head_b_tex_papermargins>> +<<output_latex_head_b_tex_papermargins_portrait>> +<<output_latex_head_b_tex_papermargins_portrait_set>> +<<output_latex_head_b_tex_papermargins_portrait_close>> +<<output_latex_head_b_tex_papermargins_landscape>> +<<output_latex_head_b_tex_papermargins_landscape_set>> +<<output_latex_head_b_tex_papermargins_landscape_close>> +<<output_latex_head_b_tex_columns_multi>> +<<output_latex_head_b_tex_columns_multi_portrait>> +<<output_latex_head_b_tex_columns_multi_portrait_set>> +<<output_latex_head_b_tex_columns_multi_portrait_close>> +<<output_latex_head_b_tex_columns_multi_landscape>> +<<output_latex_head_b_tex_colorlinks>> +<<output_latex_head_b_tex_colorlinks_mono>> +<<output_latex_head_b_tex_colorlinks_mono_set>> +<<output_latex_head_b_tex_colorlinks_mono_close>> +<<output_latex_head_b_tex_colorlinks_color>> +<<output_latex_head_b_tex_colorlinks_color_set>> +<<output_latex_head_b_tex_colorlinks_color_close>> + <<output_latex_head_format_string_paper_set>> + <<output_latex_head_format_string_paper_set_format_portrait>> +<<output_latex_head_format_string_paper_set_format_portrait_tex>> + <<output_latex_head_format_string_paper_set_format_portrait_variables>> + <<output_latex_head_format_string_paper_set_format_landscape>> +<<output_latex_head_format_string_paper_set_format_landscape_tex>> + <<output_latex_head_format_string_paper_set_format_landscape_variables>> + <<output_latex_head_format_string_paper_set_return>> + <<output_latex_head_format_string_paper_set_orientation>> + <<output_latex_head_format_string_paper_set_color>> + <<output_latex_head_format_tex_set_start_latex_head>> +<<output_latex_head_tex_set_generated_by>> +<<output_latex_head_tex_set_paper_type>> +<<output_latex_head_tex_set_orintation>> +<<output_latex_head_tex_set_margins>> +<<output_latex_head_tex_set_columns>> +<<output_latex_head_tex_set_usepackages_languages_and_font>> +<<output_latex_head_tex_set_usepackages_1>> +<<output_latex_head_tex_set_usepackages_color>> +<<output_latex_head_tex_set_metadata>> +<<output_latex_head_tex_set_colors>> +<<output_latex_head_tex_set_url>> +<<output_latex_head_tex_set_usepackage_misc>> +<<output_latex_head_tex_set_indent_bullet_list>> +<<output_latex_head_tex_set_part_section_subsection_paragraph_subparagraph>> +<<output_latex_head_tex_set_misc>> <<output_latex_head_a_format_string_variables>> <<output_latex_head_close>> - <<output_latex_body_0>> - <<output_latex_body_1>> - <<output_latex_body_2>> - <<output_latex_body_3>> - <<output_latex_body_4>> - <<output_latex_body_5>> - <<output_latex_body_6>> - <<output_latex_tail_0>> - <<output_latex_tail_1>> -<<output_latex_tail_tex>> - <<output_latex_tail_close_0>> - <<output_latex_tail_close_1>> - <<output_latex_0>> - <<output_latex_1>> + <<output_latex_body_function>> + <<output_latex_body_foreach_doc_part>> + <<output_latex_body_for_doc_frontmatter>> + <<output_latex_body_for_doc_body>> + <<output_latex_body_for_doc_backmatter>> + <<output_latex_body_for_doc_default>> + <<output_latex_body_function_return>> + <<output_latex_tail_function>> + <<output_latex_tail_format_string>> +<<output_latex_tail_format_string_tex>> + <<output_latex_tail_format_string_close>> + <<output_latex_tail_function_return>> + <<output_latex_output_write>> + <<output_latex_output_set>> } #+END_SRC ** write latex output :latex:out: -#+NAME: output_latex_0 +#+NAME: output_latex_output_write #+BEGIN_SRC d void writeOutputLaTeX(T,M)( const T latex_content, @@ -157,7 +164,7 @@ void writeOutputLaTeX(T,M)( ** latex output hub [#A] :latex:pdf:out: -#+NAME: output_latex_1 +#+NAME: output_latex_output_set #+BEGIN_SRC d void outputLaTeX(D,M)( const D doc_abstraction, @@ -168,7 +175,7 @@ void outputLaTeX(D,M)( string content; string tail; } - auto latex = LaTeX(); + auto latex = LaTeX(); foreach (paper_size_orientation; doc_matters.conf_make_meta.conf.set_papersize) { latex.head = latex_head(doc_matters, paper_size_orientation); latex.content = latex_body(doc_abstraction, doc_matters, paper_size_orientation); @@ -195,7 +202,7 @@ import doc_reform.io_out; ** shared *** paper dimensions (struct) -#+NAME: output_latex_shared_a_0 +#+NAME: output_latex_shared_a_paper_type #+BEGIN_SRC d auto paper() { struct PaperType { @@ -362,7 +369,7 @@ import doc_reform.io_out; *** latex \escape special characters **** general -#+NAME: output_latex_shared_a_1 +#+NAME: output_latex_shared_a_special_characters_to_escape_object #+BEGIN_SRC d @safe string sp_char_esc(O)( string _txt, @@ -391,7 +398,7 @@ import doc_reform.io_out; } #+END_SRC -#+NAME: output_latex_shared_a_2 +#+NAME: output_latex_shared_a_special_characters_to_escape_text #+BEGIN_SRC d @safe string sp_char_esc_txt()( string _txt, @@ -433,7 +440,7 @@ import doc_reform.io_out; - bold, italics, underscore, strikethrough -#+NAME: output_latex_shared_a_3 +#+NAME: output_latex_shared_a_fontface #+BEGIN_SRC d @safe string fontface()( string _txt, @@ -456,7 +463,7 @@ _txt = _txt **** spaces ***** leading hardspace -#+NAME: output_latex_shared_a_4 +#+NAME: output_latex_shared_a_leading_hardspaces #+BEGIN_SRC d @safe string leading_hardspaces()( string _txt, @@ -473,7 +480,7 @@ _txt = _txt ***** nbsp character -#+NAME: output_latex_shared_a_5 +#+NAME: output_latex_shared_a_character_nbsp_to_hardspace #+BEGIN_SRC d @safe string nbsp_char()(string _txt) { if (_txt.match(rgx.nbsp_char)) { @@ -485,7 +492,7 @@ _txt = _txt ***** remove nbsp character -#+NAME: output_latex_shared_a_6 +#+NAME: output_latex_shared_a_character_nbsp_to_space #+BEGIN_SRC d @safe string nbsp_char_to_space()(string _txt) { if (_txt.match(rgx.nbsp_char)) { @@ -498,7 +505,7 @@ _txt = _txt **** links and images ***** links / urls -#+NAME: output_latex_shared_a_7 +#+NAME: output_latex_shared_a_links_and_images #+BEGIN_SRC d @safe string links_and_images(O,M)( string _txt, @@ -550,7 +557,7 @@ _txt = _txt *** footnotes **** footnotes -#+NAME: output_latex_shared_a_8 +#+NAME: output_latex_shared_a_footnotes #+BEGIN_SRC d @safe string footnotes()( string _txt, @@ -571,7 +578,7 @@ _txt = _txt **** footnote remove -#+NAME: output_latex_shared_a_9 +#+NAME: output_latex_shared_a_footnotes_remove #+BEGIN_SRC d @safe string remove_footnotes()( string _txt, @@ -586,7 +593,7 @@ _txt = _txt *** para **** para -#+NAME: output_latex_shared_a_10 +#+NAME: output_latex_shared_a_para #+BEGIN_SRC d @safe string para(O)( string _txt, @@ -607,7 +614,7 @@ _txt = _txt **** bookindex para -#+NAME: output_latex_shared_a_11 +#+NAME: output_latex_shared_a_bookindex #+BEGIN_SRC d @safe string bookindex(O)( string _txt, @@ -628,7 +635,7 @@ _txt = _txt *** bullets & indentation -#+NAME: output_latex_head_0 +#+NAME: output_latex_head_bullets_and_indentation #+BEGIN_SRC d @safe string bullets_and_indentation(O)( string _txt, @@ -673,7 +680,7 @@ _txt = _txt *** heading -#+NAME: output_latex_shared_b_0 +#+NAME: output_latex_shared_b_heading #+BEGIN_SRC d @safe string heading(O,M)( string _txt, @@ -847,7 +854,7 @@ _txt = _txt - (hardspace not honored) clear hardspace marker -#+NAME: output_latex_shared_b_1 +#+NAME: output_latex_shared_b_group #+BEGIN_SRC d string group(O,M)( string _txt, @@ -875,7 +882,7 @@ string group(O,M)( - (hardspace honored) \hardspace -#+NAME: output_latex_shared_b_2 +#+NAME: output_latex_shared_b_block #+BEGIN_SRC d string block(O,M)( string _txt, @@ -907,7 +914,7 @@ string block(O,M)( - (hardspace honored) \hardspace -#+NAME: output_latex_shared_b_3 +#+NAME: output_latex_shared_b_verse #+BEGIN_SRC d string verse(O,M)( string _txt, @@ -939,7 +946,7 @@ string verse(O,M)( - (hardspace honored) \begin{lstlisting} clear hardspace marker -#+NAME: output_latex_shared_b_4 +#+NAME: output_latex_shared_b_codeblock #+BEGIN_SRC d string codeblock(O,M)( string _txt, @@ -971,7 +978,7 @@ string codeblock(O,M)( ***** tablarize -#+NAME: output_latex_shared_b_5 +#+NAME: output_latex_shared_b_tablarize #+BEGIN_SRC d auto tablarize(O)( string _txt, @@ -1010,7 +1017,7 @@ auto tablarize(O)( ***** table -#+NAME: output_latex_shared_b_6 +#+NAME: output_latex_shared_b_table #+BEGIN_SRC d string table(O,M)( string _txt, @@ -1070,7 +1077,7 @@ string table(O,M)( *** latex head :head: **** latex head function -#+NAME: output_latex_head_1 +#+NAME: output_latex_head_0 #+BEGIN_SRC d string latex_head(M)( M doc_matters, @@ -1082,7 +1089,7 @@ string latex_head(M)( ***** paper type dimensions ****** struct -#+NAME: output_latex_head_2 +#+NAME: output_latex_head_papertype #+BEGIN_SRC d struct paperTypeLatex { string a4_portrait; @@ -1101,7 +1108,7 @@ string latex_head(M)( ****** footer -#+NAME: output_latex_head_3 +#+NAME: output_latex_head_footer #+BEGIN_SRC d string _footer(M)(M doc_matters) { string _ft = "\\lfoot[\\textrm{\\thepage}]"; @@ -1136,7 +1143,7 @@ string latex_head(M)( ***** paper margins ****** struct -#+NAME: output_latex_head_b_tex_0 +#+NAME: output_latex_head_b_tex_papermargins #+BEGIN_SRC d struct paperMargins { string portrait; @@ -1147,19 +1154,19 @@ string latex_head(M)( ****** portrait -#+NAME: output_latex_head_b_tex_1 +#+NAME: output_latex_head_b_tex_papermargins_portrait #+BEGIN_SRC d margins.portrait = format(q"┃ #+END_SRC -#+NAME: output_latex_head_b_tex_2 +#+NAME: output_latex_head_b_tex_papermargins_portrait_set #+BEGIN_SRC latex \setlength{\oddsidemargin}{0mm} \setlength{\evensidemargin}{0mm} \setlength{\topmargin}{-12pt} \setlength{\headheight}{12pt} \setlength{\headsep}{35pt} #+END_SRC -#+NAME: output_latex_head_b_tex_3 +#+NAME: output_latex_head_b_tex_papermargins_portrait_close #+BEGIN_SRC d ┃", ); @@ -1167,19 +1174,19 @@ string latex_head(M)( ****** landscape -#+NAME: output_latex_head_b_tex_4 +#+NAME: output_latex_head_b_tex_papermargins_landscape #+BEGIN_SRC d margins.landscape = format(q"┃ #+END_SRC -#+NAME: output_latex_head_b_tex_5 +#+NAME: output_latex_head_b_tex_papermargins_landscape_set #+BEGIN_SRC latex \setlength{\oddsidemargin}{6mm} \setlength{\evensidemargin}{6mm} \setlength{\topmargin}{-12mm} \setlength{\headheight}{12pt} \setlength{\headsep}{20pt} #+END_SRC -#+NAME: output_latex_head_b_tex_6 +#+NAME: output_latex_head_b_tex_papermargins_landscape_close #+BEGIN_SRC d ┃", ); @@ -1188,7 +1195,7 @@ string latex_head(M)( ***** multicol ****** struct -#+NAME: output_latex_head_b_tex_7 +#+NAME: output_latex_head_b_tex_columns_multi #+BEGIN_SRC d struct columnsMulti { string portrait; @@ -1199,17 +1206,17 @@ string latex_head(M)( ****** portrait -#+NAME: output_latex_head_b_tex_8 +#+NAME: output_latex_head_b_tex_columns_multi_portrait #+BEGIN_SRC d multicol.portrait = format(q"┃ #+END_SRC -#+NAME: output_latex_head_b_tex_9 +#+NAME: output_latex_head_b_tex_columns_multi_portrait_set #+BEGIN_SRC latex \usepackage{multicol} #+END_SRC -#+NAME: output_latex_head_b_tex_10 +#+NAME: output_latex_head_b_tex_columns_multi_portrait_close #+BEGIN_SRC d ┃", ); @@ -1217,7 +1224,7 @@ string latex_head(M)( ****** landscape -#+NAME: output_latex_head_b_tex_11 +#+NAME: output_latex_head_b_tex_columns_multi_landscape #+BEGIN_SRC d multicol.landscape = ""; #+END_SRC @@ -1225,7 +1232,7 @@ string latex_head(M)( ***** color links ****** struct -#+NAME: output_latex_head_b_tex_12 +#+NAME: output_latex_head_b_tex_colorlinks #+BEGIN_SRC d struct colorLinks { string mono; @@ -1236,12 +1243,12 @@ string latex_head(M)( ****** mono -#+NAME: output_latex_head_b_tex_13 +#+NAME: output_latex_head_b_tex_colorlinks_mono #+BEGIN_SRC d links.mono = format(q"┃ #+END_SRC -#+NAME: output_latex_head_b_tex_14 +#+NAME: output_latex_head_b_tex_colorlinks_mono_set #+BEGIN_SRC latex \usepackage[xetex, colorlinks=true, @@ -1250,7 +1257,7 @@ string latex_head(M)( linkcolor=myblack, #+END_SRC -#+NAME: output_latex_head_b_tex_15 +#+NAME: output_latex_head_b_tex_colorlinks_mono_close #+BEGIN_SRC d ┃", ); @@ -1258,12 +1265,12 @@ string latex_head(M)( ****** color -#+NAME: output_latex_head_b_tex_16 +#+NAME: output_latex_head_b_tex_colorlinks_color #+BEGIN_SRC d links.color = format(q"┃ #+END_SRC -#+NAME: output_latex_head_b_tex_17 +#+NAME: output_latex_head_b_tex_colorlinks_color_set #+BEGIN_SRC latex \usepackage[xetex, colorlinks=true, @@ -1272,7 +1279,7 @@ string latex_head(M)( linkcolor=myred, %% \href{...} and \pageref{...} #+END_SRC -#+NAME: output_latex_head_b_format_string_variables +#+NAME: output_latex_head_b_tex_colorlinks_color_close #+BEGIN_SRC d ┃", ); @@ -1282,83 +1289,111 @@ string latex_head(M)( ***** dimensions & orientation ****** set -#+NAME: output_latex_head_format_string_0 +#+NAME: output_latex_head_format_string_paper_set +#+BEGIN_SRC d +string set_paper(P)(P paper_set,) { + string paper_type_description; +#+END_SRC + +#+NAME: output_latex_head_format_string_paper_set_format_portrait +#+BEGIN_SRC d +if (paper_set.is_portrait) { + paper_type_description = format(q"┃ +#+END_SRC + +#+NAME: output_latex_head_format_string_paper_set_format_portrait_tex #+BEGIN_SRC d - string set_paper(P)(P paper_set,) { - string paper_type_description; - if (paper_set.is_portrait) { - paper_type_description = format(q"┃ \documentclass[%s,%s,titlepage]{scrartcl} \setlength{\textheight}{%s} \setlength{\textwidth}{%s} ┃", - paper_set.font_size, - paper_set.name, - paper_set.height, - paper_set.width, - ); - } else { - paper_type_description = format(q"┃ +#+END_SRC + +#+NAME: output_latex_head_format_string_paper_set_format_portrait_variables +#+BEGIN_SRC d + paper_set.font_size, + paper_set.name, + paper_set.height, + paper_set.width, +); +#+END_SRC + +#+NAME: output_latex_head_format_string_paper_set_format_landscape +#+BEGIN_SRC d +} else { + paper_type_description = format(q"┃ +#+END_SRC + +#+NAME: output_latex_head_format_string_paper_set_format_landscape_tex +#+BEGIN_SRC d \documentclass[%s,%s,landscape,titlepage,twocolumn]{scrartcl} \setlength{\textheight}{%s} \setlength{\textwidth}{%s} ┃", - paper_set.font_size, - paper_set.name, - paper_set.height, - paper_set.width, - ); - } - return paper_type_description; - } #+END_SRC -***** (a4, a5, b4, letter, legal) * (portrait & landscape) +#+NAME: output_latex_head_format_string_paper_set_format_landscape_variables +#+BEGIN_SRC d + paper_set.font_size, + paper_set.name, + paper_set.height, + paper_set.width, +); +#+END_SRC -#+NAME: output_latex_head_format_string_1 -#+BEGIN_SRC d - string paper_size_orientation_latex; - switch (paper_size_orientation) { - case "a4.portrait": paper_size_orientation_latex = set_paper(paper.a4.portrait); break; - case "a4.landscape": paper_size_orientation_latex = set_paper(paper.a4.landscape); break; - case "a5.portrait": paper_size_orientation_latex = set_paper(paper.a5.portrait); break; - case "a5.landscape": paper_size_orientation_latex = set_paper(paper.a5.landscape); break; - case "b4.portrait": paper_size_orientation_latex = set_paper(paper.b4.portrait); break; - case "b4.landscape": paper_size_orientation_latex = set_paper(paper.b4.landscape); break; - case "letter.portrait": paper_size_orientation_latex = set_paper(paper.letter.portrait); break; - case "letter.landscape": paper_size_orientation_latex = set_paper(paper.letter.landscape); break; - case "legal.portrait": paper_size_orientation_latex = set_paper(paper.legal.portrait); break; - case "legal.landscape": paper_size_orientation_latex = set_paper(paper.legal.landscape); break; - default: paper_size_orientation_latex = paper_type_latex.a4_portrait; +#+NAME: output_latex_head_format_string_paper_set_return +#+BEGIN_SRC d } + return paper_type_description; +} +#+END_SRC + +***** (a4, a5, b4, letter, legal) * (portrait & landscape) + +#+NAME: output_latex_head_format_string_paper_set_orientation +#+BEGIN_SRC d +string paper_size_orientation_latex; +switch (paper_size_orientation) { +case "a4.portrait": paper_size_orientation_latex = set_paper(paper.a4.portrait); break; +case "a4.landscape": paper_size_orientation_latex = set_paper(paper.a4.landscape); break; +case "a5.portrait": paper_size_orientation_latex = set_paper(paper.a5.portrait); break; +case "a5.landscape": paper_size_orientation_latex = set_paper(paper.a5.landscape); break; +case "b4.portrait": paper_size_orientation_latex = set_paper(paper.b4.portrait); break; +case "b4.landscape": paper_size_orientation_latex = set_paper(paper.b4.landscape); break; +case "letter.portrait": paper_size_orientation_latex = set_paper(paper.letter.portrait); break; +case "letter.landscape": paper_size_orientation_latex = set_paper(paper.letter.landscape); break; +case "legal.portrait": paper_size_orientation_latex = set_paper(paper.legal.portrait); break; +case "legal.landscape": paper_size_orientation_latex = set_paper(paper.legal.landscape); break; +default: paper_size_orientation_latex = paper_type_latex.a4_portrait; +} #+END_SRC ***** set color links -#+NAME: output_latex_head_format_string_2 -#+BEGIN_SRC d - string links_mono_or_color_set = links.mono.strip; - if ( - (doc_matters.opt.action.latex_color_links) - || (paper_size_orientation == - "a4.landscape" || - "a5.landscape" || - "b4.landscape" || - "letter.landscape" || - "legal.landscape") - ){ - links_mono_or_color_set = links.color.strip; - } +#+NAME: output_latex_head_format_string_paper_set_color +#+BEGIN_SRC d +string links_mono_or_color_set = links.mono.strip; +if ( + (doc_matters.opt.action.latex_color_links) + || (paper_size_orientation == + "a4.landscape" || + "a5.landscape" || + "b4.landscape" || + "letter.landscape" || + "legal.landscape") +){ + links_mono_or_color_set = links.color.strip; +} #+END_SRC ***** format latex head, open -#+NAME: output_latex_head_format_string_3 +#+NAME: output_latex_head_format_tex_set_start_latex_head #+BEGIN_SRC d - string _latex_head = format(q"┃%%%% spine LaTeX output +string _latex_head = format(q"┃%%%% spine LaTeX output #+END_SRC ***** description comment -#+NAME: output_latex_head_tex_0 +#+NAME: output_latex_head_tex_set_generated_by #+BEGIN_SRC latex %%%% Generated by: %s %%%% D version: %s @@ -1375,7 +1410,7 @@ string latex_head(M)( - paper_type_latex.us_letter_portrait - paper_type_latex.us_letter_landscape -#+NAME: output_latex_head_tex_1 +#+NAME: output_latex_head_tex_set_paper_type #+BEGIN_SRC latex %s #+END_SRC @@ -1385,14 +1420,14 @@ string latex_head(M)( - margins.portrait - margins.landscape -#+NAME: output_latex_head_tex_2 +#+NAME: output_latex_head_tex_set_orintation #+BEGIN_SRC latex %s #+END_SRC ***** margin shared -#+NAME: output_latex_head_tex_3 +#+NAME: output_latex_head_tex_set_margins #+BEGIN_SRC latex \setlength{\marginparsep}{4mm} \setlength{\marginparwidth}{8mm} @@ -1400,16 +1435,20 @@ string latex_head(M)( ***** multicol (portrait | landscape) -#+NAME: output_latex_head_tex_4 +#+NAME: output_latex_head_tex_set_columns #+BEGIN_SRC latex %s #+END_SRC ***** language & font -#+NAME: output_latex_head_tex_5 +#+NAME: output_latex_head_tex_set_usepackages_languages_and_font #+BEGIN_SRC latex -\usepackage{polyglossia, ucs, fontspec, xltxtra, xunicode} +\usepackage{polyglossia} +\usepackage{ucs} +\usepackage{fontspec} +\usepackage{xltxtra} +\usepackage{xunicode} \setmainlanguage{%s} \setotherlanguage{%s} \setmainfont{Liberation Sans} @@ -1421,7 +1460,7 @@ string latex_head(M)( ***** latex head -#+NAME: output_latex_head_tex_6 +#+NAME: output_latex_head_tex_set_usepackages_1 #+BEGIN_SRC latex \usepackage{alltt} \usepackage{thumbpdf} @@ -1429,14 +1468,14 @@ string latex_head(M)( ***** color links: no = mono | yes = color -#+NAME: output_latex_head_tex_7 +#+NAME: output_latex_head_tex_set_usepackages_color #+BEGIN_SRC latex %s #+END_SRC ***** metadata -#+NAME: output_latex_head_tex_8 +#+NAME: output_latex_head_tex_set_metadata #+BEGIN_SRC latex pdftitle={%s}, pdfauthor={%s}, @@ -1470,7 +1509,7 @@ string latex_head(M)( ***** define colors -#+NAME: output_latex_head_tex_9 +#+NAME: output_latex_head_tex_set_colors #+BEGIN_SRC latex \usepackage[usenames]{color} \definecolor{myblack}{rgb}{0,0,0} @@ -1482,7 +1521,7 @@ string latex_head(M)( ***** latex head -#+NAME: output_latex_head_tex_10 +#+NAME: output_latex_head_tex_set_url #+BEGIN_SRC latex \usepackage{url} \urlstyle{sf} @@ -1492,7 +1531,7 @@ string latex_head(M)( ***** latex head -#+NAME: output_latex_head_tex_11 +#+NAME: output_latex_head_tex_set_usepackage_misc #+BEGIN_SRC latex \usepackage{textcomp} \usepackage[parfill]{parskip} @@ -1514,7 +1553,7 @@ string latex_head(M)( ***** indent, bullet, list -#+NAME: output_latex_head_tex_12 +#+NAME: output_latex_head_tex_set_indent_bullet_list #+BEGIN_SRC latex \usepackage[multiple,ragged]{footmisc} \setlength\footnotemargin{12pt} @@ -1558,7 +1597,7 @@ string latex_head(M)( ***** part, section, subsection, paragraph, subparagraph -#+NAME: output_latex_head_tex_13 +#+NAME: output_latex_head_tex_set_part_section_subsection_paragraph_subparagraph #+BEGIN_SRC latex \usepackage{fancyhdr} \lhead{} @@ -1592,7 +1631,7 @@ string latex_head(M)( ***** latex head misc. including defined commands -#+NAME: output_latex_head_tex_14 +#+NAME: output_latex_head_tex_set_misc #+BEGIN_SRC latex \selectlanguage{%s} \lhead[ ]{ } @@ -1686,7 +1725,7 @@ string latex_head(M)( *** ↻ latex body :content:body: **** latex body function -#+NAME: output_latex_body_0 +#+NAME: output_latex_body_function #+BEGIN_SRC d string latex_body(D,M)( const D doc_abstraction, @@ -1700,166 +1739,166 @@ string latex_body(D,M)( **** ↻ loop open -#+NAME: output_latex_body_1 +#+NAME: output_latex_body_foreach_doc_part #+BEGIN_SRC d - foreach (part; doc_matters.has.keys_seq.latex) { - foreach (obj; doc_abstraction[part]) { - switch (obj.metainfo.is_of_part) { +foreach (part; doc_matters.has.keys_seq.latex) { + foreach (obj; doc_abstraction[part]) { + switch (obj.metainfo.is_of_part) { #+END_SRC **** ↻ within loop ***** frontmatter -#+NAME: output_latex_body_2 -#+BEGIN_SRC d - case "frontmatter": assert(part == "head" || "toc"); - _txt = obj.text - .sp_char_esc(obj) - .fontface; - switch (obj.metainfo.is_of_type) { - case "para": - switch (obj.metainfo.is_a) { - case "heading": - _txt = _txt.heading(obj, doc_matters); - goto default; - case "toc": - break; - default: - _latex_body ~= _txt ~ "\n\n"; - _txt = ""; - break; - } - break; - default: break; - } - break; +#+NAME: output_latex_body_for_doc_frontmatter +#+BEGIN_SRC d +case "frontmatter": assert(part == "head" || "toc"); + _txt = obj.text + .sp_char_esc(obj) + .fontface; + switch (obj.metainfo.is_of_type) { + case "para": + switch (obj.metainfo.is_a) { + case "heading": + _txt = _txt.heading(obj, doc_matters); + goto default; + case "toc": + break; + default: + _latex_body ~= _txt ~ "\n\n"; + _txt = ""; + break; + } + break; + default: break; + } + break; #+END_SRC ***** body -#+NAME: output_latex_body_3 -#+BEGIN_SRC d - case "body": assert(part == "body" || "head"); // surprise - _txt = obj.text - .sp_char_esc(obj) - .fontface; - switch (obj.metainfo.is_of_type) { - case "para": - switch (obj.metainfo.is_a) { - case "heading": - _txt = _txt.heading(obj, doc_matters); - goto default; - case "para": - _txt = _txt.para(obj) - .bullets_and_indentation(obj) - .links_and_images(obj, doc_matters); - goto default; - default: - _latex_body ~= _txt ~ "\n\n"; - _txt = ""; - break; - } - break; - case "block": - switch (obj.metainfo.is_a) { - case "quote": - goto default; // TODO - case "group": - /+ (hardspaces not honored) [remove any hardspace marker] +/ - _txt = _txt.group(obj, doc_matters) - .links_and_images(obj, doc_matters); - goto default; - case "block": - /+ (hardspace honored) \hardspace +/ - _txt = _txt.block(obj, doc_matters) - .links_and_images(obj, doc_matters); - goto default; - case "verse": - /+ (hardspace honored) \hardspace +/ - _txt = _txt.verse(obj, doc_matters) - .links_and_images(obj, doc_matters); - goto default; - case "code": - /+ (hardspace honored) \begin{lstlisting} clear hardspace marker +/ - _txt = _txt.codeblock(obj, doc_matters); - goto default; - case "table": - _txt = _txt.table(obj, doc_matters, paper_size_orientation); - goto default; // TODO - default: - _latex_body ~= _txt ~ "\n\n"; - _txt = ""; - break; - } - break; - default: break; - } - break; +#+NAME: output_latex_body_for_doc_body +#+BEGIN_SRC d +case "body": assert(part == "body" || "head"); // surprise + _txt = obj.text + .sp_char_esc(obj) + .fontface; + switch (obj.metainfo.is_of_type) { + case "para": + switch (obj.metainfo.is_a) { + case "heading": + _txt = _txt.heading(obj, doc_matters); + goto default; + case "para": + _txt = _txt.para(obj) + .bullets_and_indentation(obj) + .links_and_images(obj, doc_matters); + goto default; + default: + _latex_body ~= _txt ~ "\n\n"; + _txt = ""; + break; + } + break; + case "block": + switch (obj.metainfo.is_a) { + case "quote": + goto default; // TODO + case "group": + /+ (hardspaces not honored) [remove any hardspace marker] +/ + _txt = _txt.group(obj, doc_matters) + .links_and_images(obj, doc_matters); + goto default; + case "block": + /+ (hardspace honored) \hardspace +/ + _txt = _txt.block(obj, doc_matters) + .links_and_images(obj, doc_matters); + goto default; + case "verse": + /+ (hardspace honored) \hardspace +/ + _txt = _txt.verse(obj, doc_matters) + .links_and_images(obj, doc_matters); + goto default; + case "code": + /+ (hardspace honored) \begin{lstlisting} clear hardspace marker +/ + _txt = _txt.codeblock(obj, doc_matters); + goto default; + case "table": + _txt = _txt.table(obj, doc_matters, paper_size_orientation); + goto default; // TODO + default: + _latex_body ~= _txt ~ "\n\n"; + _txt = ""; + break; + } + break; + default: break; + } + break; #+END_SRC ***** backmatter -#+NAME: output_latex_body_4 -#+BEGIN_SRC d - case "backmatter": - assert(part == "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail"); - _txt = obj.text - .sp_char_esc(obj) - .fontface; - switch (obj.metainfo.is_of_type) { - case "para": - if (part != "bookindex" && _multicolumns) { - _multicolumns = false; - _latex_body ~= "\n\\end{multicols}\n"; - } - switch (obj.metainfo.is_a) { - case "heading": - if (part == "bookindex") { - _multicolumns = true; - } - _txt = _txt.heading(obj, doc_matters, part); - goto default; - case "endnote": assert(part == "endnotes"); - /* uncomment code to reinstate endnotes in endnote section */ - // _txt = _txt.para(obj) - // .bullets_and_indentation(obj) - // .links_and_images(obj, doc_matters); - // goto default; - break; - case "glossary": assert(part == "glossary"); - _txt = _txt.para(obj) - .bullets_and_indentation(obj) - .links_and_images(obj, doc_matters); - goto default; - case "bibliography": assert(part == "bibliography"); - _txt = _txt.para(obj) - .bullets_and_indentation(obj); - goto default; - case "bookindex": assert(part == "bookindex"); - /+ two column, special section +/ - _txt = _txt.bookindex(obj) - .links_and_images(obj, doc_matters); - goto default; - case "blurb": assert(part == "blurb"); - _txt = _txt.para(obj) - .bullets_and_indentation(obj) - .links_and_images(obj, doc_matters); - goto default; - default: - _latex_body ~= (part == "bookindex" && obj.metainfo.is_a != "heading") - ? _txt : (_txt ~ "\n\n"); - _txt = ""; - break; - } - break; - default: break; - } - break; +#+NAME: output_latex_body_for_doc_backmatter +#+BEGIN_SRC d +case "backmatter": + assert(part == "endnotes" || "glossary" || "bibliography" || "bookindex" || "blurb" || "tail"); + _txt = obj.text + .sp_char_esc(obj) + .fontface; + switch (obj.metainfo.is_of_type) { + case "para": + if (part != "bookindex" && _multicolumns) { + _multicolumns = false; + _latex_body ~= "\n\\end{multicols}\n"; + } + switch (obj.metainfo.is_a) { + case "heading": + if (part == "bookindex") { + _multicolumns = true; + } + _txt = _txt.heading(obj, doc_matters, part); + goto default; + case "endnote": assert(part == "endnotes"); + /* uncomment code to reinstate endnotes in endnote section */ + // _txt = _txt.para(obj) + // .bullets_and_indentation(obj) + // .links_and_images(obj, doc_matters); + // goto default; + break; + case "glossary": assert(part == "glossary"); + _txt = _txt.para(obj) + .bullets_and_indentation(obj) + .links_and_images(obj, doc_matters); + goto default; + case "bibliography": assert(part == "bibliography"); + _txt = _txt.para(obj) + .bullets_and_indentation(obj); + goto default; + case "bookindex": assert(part == "bookindex"); + /+ two column, special section +/ + _txt = _txt.bookindex(obj) + .links_and_images(obj, doc_matters); + goto default; + case "blurb": assert(part == "blurb"); + _txt = _txt.para(obj) + .bullets_and_indentation(obj) + .links_and_images(obj, doc_matters); + goto default; + default: + _latex_body ~= (part == "bookindex" && obj.metainfo.is_a != "heading") + ? _txt : (_txt ~ "\n\n"); + _txt = ""; + break; + } + break; + default: break; + } + break; #+END_SRC ***** after -#+NAME: output_latex_body_5 +#+NAME: output_latex_body_for_doc_default #+BEGIN_SRC d case "comment": break; @@ -1884,7 +1923,7 @@ string latex_body(D,M)( **** latex body return -#+NAME: output_latex_body_6 +#+NAME: output_latex_body_function_return #+BEGIN_SRC d return _latex_body; } @@ -1893,7 +1932,7 @@ string latex_body(D,M)( *** latex tail :tail: **** latex tail function -#+NAME: output_latex_tail_0 +#+NAME: output_latex_tail_function #+BEGIN_SRC d string latex_tail(M)( M doc_matters, @@ -1903,16 +1942,16 @@ string latex_tail(M)( **** latex tail starts -#+NAME: output_latex_tail_1 +#+NAME: output_latex_tail_format_string #+BEGIN_SRC d - string _latex_tail = format(q"┃ +string _latex_tail = format(q"┃ #+END_SRC ***** latex tail format inclusions ***** latex document end -#+NAME: output_latex_tail_tex +#+NAME: output_latex_tail_format_string_tex #+BEGIN_SRC latex \end{document} @@ -1920,7 +1959,7 @@ string latex_tail(M)( **** latex tail format inclusions -#+NAME: output_latex_tail_close_0 +#+NAME: output_latex_tail_format_string_close #+BEGIN_SRC d ┃", // doc_matters.conf_make_meta.meta.title_full, @@ -1930,7 +1969,7 @@ string latex_tail(M)( **** latex tail return -#+NAME: output_latex_tail_close_1 +#+NAME: output_latex_tail_function_return #+BEGIN_SRC d return _latex_tail; } @@ -1939,7 +1978,7 @@ string latex_tail(M)( * latex system command helper script ** latex command, ruby script -#+HEADER: :tangle "../sundry/util/rb/tex/dr_tex.rb" +#+HEADER: :tangle "../sundry/misc/util/rb/tex/dr_tex.rb" #+HEADER: :tangle-mode (identity #o755) #+HEADER: :shebang #!/usr/bin/env ruby #+BEGIN_SRC ruby |