template outputXHTMLs() {
  private import
    std.algorithm,
    std.array,
    std.container,
    std.exception,
    std.file,
    std.getopt,
    std.json,
    std.process,
    std.stdio,
    std.path,
    std.range,
    std.regex,
    std.string,
    std.traits,
    std.typecons,
    std.uni,
    std.utf,
    std.conv : to;
  import
    defaults,
    output_rgx,
    output_xhtmls;
  mixin SiSUoutputRgxInit;
  struct outputXHTMLs {
    auto rgx = Rgx();
    string special_characters(string _txt){
      _txt = (_txt)
        .replaceAll(rgx.xhtml_ampersand,    "&")
        .replaceAll(rgx.xhtml_less_than,    "<")
        .replaceAll(rgx.xhtml_greater_than, ">")
        .replaceAll(rgx.xhtml_line_break,   "
");
      return _txt;
    }
    string font_face(string _txt){
      _txt = (_txt)
        .replaceAll(rgx.inline_emphasis,    ("$1"))
        .replaceAll(rgx.inline_bold,        ("$1"))
        .replaceAll(rgx.inline_underscore,  ("$1"))
        .replaceAll(rgx.inline_italics,     ("$1"))
        .replaceAll(rgx.inline_superscript, ("$1"))
        .replaceAll(rgx.inline_subscript,   ("$1"))
        .replaceAll(rgx.inline_strike,      ("$1"))
        .replaceAll(rgx.inline_insert,      ("$1"))
        .replaceAll(rgx.inline_mono,        ("$1"))
        .replaceAll(rgx.inline_cite,        ("$1"));
      return _txt;
    }
    string _xhtml_anchor_tags(const(string[]) anchor_tags) {
      string tags="";
      if (anchor_tags.length > 0) {
        foreach (tag; anchor_tags) {
          if (!(tag.empty)) {
            tags ~= "";
          }
        }
      }
      return tags;
    }
    auto scroll_head(Me)(
      Me dochead_meta,
    ) {
      debug(asserts){
        static assert(is(typeof(dochead_meta) == string[string][string]));
      }
      string o;
      o = format(q"¶
    
    
      
      
        %s%s
      
    
      
      
      
      
      
      
      
      
      
      
      
        
      
      
      
    
    
    ¶",
    dochead_meta["title"]["full"],
    (dochead_meta["creator"]["author"].empty) ? "" : ", " ~ dochead_meta["creator"]["author"],
    );
      return o;
    }
    auto seg_head(Me)(
      Me dochead_meta,
    ) {
      debug(asserts){
        static assert(is(typeof(dochead_meta) == string[string][string]));
      }
      string o;
      o = format(q"¶
    
    
      
      
        %s%s
      
    
      
      
      
      
      
      
      
      
      
      
      
        
      
      
      
    
    
    ¶",
    dochead_meta["title"]["full"],
    (dochead_meta["creator"]["author"].empty) ? "" : ", " ~ dochead_meta["creator"]["author"],
    );
      return o;
    }
    auto tail() {
      string o;
      o = format(q"¶  
      
    
    
    ¶");
      return o;
    }
    auto inline_links(O)(
      auto return ref const O obj,
      string                  _txt,
      string                  _suffix    = ".html",
      string                  seg_scroll = "seg",
    ) {
      if (obj.inline_links) {
        if ((seg_scroll == "scroll")
        && _txt.match(rgx.mark_internal_site_lnk)) {
          _txt = (_txt).replaceAll(
            rgx.inline_seg_link,
            "$1");
        }
        _txt = (_txt).replaceAll(
          rgx.inline_link_fn_suffix,
          ("$1" ~ _suffix));
        _txt = (_txt).replaceAll(
          rgx.inline_link,
          ("$1"));
        _txt = (_txt).replaceAll(
          rgx.mark_internal_site_lnk,
          ""
        );
      }
      debug(markup_links) {
        if (_txt.match(rgx.inline_link)) {
          writeln(__LINE__,
            " (missed) markup link identified (",
            obj.inline_links,
            "): ", obj.is_a, ": ",
            obj.text
          );
        }
      }
      debug(markup) {
        if (_txt.match(rgx.inline_link)) {
          writeln(__LINE__,
            " (missed) markup link identified (",
            obj.inline_links,
            "): ", obj.is_a, ": ",
            obj.text
          );
        }
      }
      return _txt;
    }
    auto inline_notes_scroll(O)(
      auto return ref const O         obj,
      string                  _txt,
    ) {
      if (obj.inline_notes_reg) {
        _txt = (_txt).replaceAll(
          rgx.inline_notes_delimiter_al_regular_number_note,
          (" $1 ")
        );
      }
      debug(markup_endnotes) {
        if (_txt.match(rgx.inline_notes_delimiter_al_regular_number_note)) {
          writeln(__LINE__, " (missed) markup endnote: ", obj.is_a, ": ", obj.text);
        }
      }
      debug(markup) {
        if (_txt.match(rgx.inline_notes_delimiter_al_regular_number_note)) {
          writeln(__LINE__, " (missed) markup endnote: ", obj.is_a, ": ", obj.text);
        }
      }
      // if (obj.inline_notes_star) {
      //   _txt = replaceAll(
      //     _txt,
      //     rgx.inline_notes_delimiter_al_regular_number_note,
      //     (" $1 ")
      //   );
      // }
      return _txt;
    }
    auto inline_notes_seg(O)(
      auto return ref const O     obj,
      string                      _txt,
    ) {
      string[] _endnotes;
      if (obj.inline_notes_reg) {
        /+ need markup for text, and separated footnote +/
        foreach(m; _txt.matchAll(rgx.inline_notes_delimiter_al_regular_number_note)) {
          _endnotes ~= format(
            "%s%s%s%s\n  %s%s%s%s%s\n  %s\n%s",
            "",
            "",
            " ",
            m.captures[1],
            ".",
            m.captures[2],
            "
"
          );
        }
        _txt = (_txt).replaceAll(
          rgx.inline_notes_delimiter_al_regular_number_note,
          (" $1 ")
        );
      } else if (_txt.match(rgx.inline_notes_delimiter_al_regular_number_note)) {
        debug(markup) {
          writeln(__LINE__, " endnote: ", obj.is_a, ": ", obj.text);
        }
      }
      auto t = tuple(
        _txt,
        _endnotes,
      );
      return t;
    }
    auto inline_markup_scroll(O)(
      auto return ref const O  obj,
      string                   _suffix = ".html",
    ) {
      string _txt = obj.text;
      _txt = special_characters(_txt);
      _txt = inline_links(obj, _txt, _suffix, "scroll");
      _txt = inline_notes_scroll(obj, _txt);
      return _txt;
    }
    auto inline_markup_seg(O)(
      auto return ref const O  obj,
      string                   _suffix = ".html",
    ) {
      string _txt = obj.text;
      _txt = special_characters(_txt);
      _txt = inline_links(obj, _txt, _suffix, "seg");
      auto t = inline_notes_seg(obj, _txt);
      return t;
    }
    auto toc(O)(
      auto return ref const O    obj,
    ) {
      string o;
      o = format(q"¶  ¶",
      obj.is_a,
      obj.indent_hang,
      obj.indent_base,
      obj.text
      );
      return o;
    }
    auto heading(O)(
      auto return ref const O    obj,
      string                     _txt,
    ) {
      auto tags = _xhtml_anchor_tags(obj.anchor_tags);
      string o;
      if (obj.obj_cite_number.empty) {
        o = format(q"¶
      
        %s
          %s
        
      
¶",
          obj.heading_lev_markup,
          obj.is_a,
          tags,
          _txt,
          obj.heading_lev_markup,
        );
      } else {
        o = format(q"¶
      ¶",
        obj.obj_cite_number,
        obj.obj_cite_number,
        obj.heading_lev_markup,
        obj.is_a,
        obj.obj_cite_number,
        obj.obj_cite_number,
        tags,
        _txt,
        obj.heading_lev_markup,
        );
      }
      return o;
    }
    auto heading_scroll(O)(
      auto return ref const O    obj,
      string                     _suffix = ".html",
    ) {
      auto tags = _xhtml_anchor_tags(obj.anchor_tags);
      string _txt = inline_markup_scroll(obj, _suffix); // issue
      string o = heading(obj, _txt);
      return o;
    }
    auto heading_seg(O)(
      auto return ref const O    obj,
      string                     _suffix = ".html",
    ) {
      auto t = inline_markup_seg(obj, _suffix);
      string _txt = t[0];
      string[] _endnotes = t[1];
      string o = heading(obj, _txt);
      auto u = tuple(
        o,
        _endnotes,
      );
      return u;
    }
    auto para(O)(
      auto return ref const O    obj,
      string                     _txt,
    ) {
      auto tags = _xhtml_anchor_tags(obj.anchor_tags);
      _txt = font_face(_txt);
      string o;
      _txt = (obj.bullet) ? ("●  " ~ _txt) : _txt;
      if (obj.obj_cite_number.empty) {
        o = format(q"¶  ¶",
          obj.is_a,
          obj.indent_hang,
          obj.indent_base,
          tags,
          _txt
        );
      } else {
        o = format(q"¶  ¶",
          obj.obj_cite_number,
          obj.obj_cite_number,
          obj.is_a,
          obj.indent_hang,
          obj.indent_base,
          obj.obj_cite_number,
          tags,
          _txt
        );
      }
      return o;
    }
    auto para_scroll(O)(
      auto return ref const O    obj,
      string                     _suffix = ".html",
    ) {
      auto tags = _xhtml_anchor_tags(obj.anchor_tags);
      string _txt = inline_markup_scroll(obj, _suffix); // issue
      string o = para(obj, _txt);
      return o;
    }
    auto para_seg(O)(
      auto return ref const O    obj,
      string                     _suffix = ".html",
    ) {
      auto t = inline_markup_seg(obj, _suffix);
      string _txt = to!string(t[0]);
      string[] _endnotes = t[1];
      string o = para(obj, _txt);
      auto u = tuple(
        o,
        _endnotes,
      );
      return u;
    }
    auto nugget(O)(
      auto return ref const O    obj,
    ) {
      string o;
      if (obj.obj_cite_number.empty) {
        o = format(q"¶  ¶",
          obj.is_a,
          obj.text
        );
      } else {
        o = format(q"¶  ¶",
          obj.obj_cite_number,
          obj.obj_cite_number,
          obj.is_a,
          obj.obj_cite_number,
          obj.text
        );
      }
      return o;
    }
    auto endnote(O)(
      auto return ref const O    obj,
    ) {
      string o;
      o = format(q"¶    
      %s
    
¶",
        obj.is_a,
        obj.indent_hang,
        obj.indent_base,
        obj.text
      );
      return o;
    }
    auto code(O)(
      auto return ref const O  obj,
    ) {
      string _txt = obj.text;
      _txt = (_txt)
        .replaceAll(rgx.newline, "
\n")
        .replaceAll(rgx.nbsp_char, " ");
      string o;
      if (obj.obj_cite_number.empty) {
          o = format(q"¶  ¶",
          obj.is_a,
          _txt
        );
      } else {
        o = format(q"¶  ¶",
          obj.obj_cite_number,
          obj.obj_cite_number,
          obj.is_a,
          obj.obj_cite_number,
          _txt
        );
      }
      return o;
    }
  }
}