anchor.diff:            id2items
             item.Body
       addItems Map.empty model
  -  fprintf wr "<!doctype html>\n\
  -              <html>\n"
  -  fprintf wr "<head>\n"
  -  fprintf wr "<title>%s Library Reference</title>\n" title
  +  fprintf wr "%s" """<!doctype html>
  +<html>
  +<head>
  +<link rel="stylesheet" href="https://cdnjs.cloudflare.com/ajax/libs/highlight.js/9.4.0/styles/github.min.css">
  +<script src="https://cdnjs.cloudflare.com/ajax/libs/highlight.js/9.4.0/highlight.min.js"></script>
  +<script src="https://cdnjs.cloudflare.com/ajax/libs/jquery/2.2.4/jquery.min.js"></script>
  +<script src="https://cdnjs.cloudflare.com/ajax/libs/highlight.js/9.4.0/languages/fsharp.min.js"></script>
  +<script>
  +$(document).ready(function() {
  +  $('code').each(function(i, block) {
  +    hljs.highlightBlock(block);
  +  });
  +});
  +</script>
  +"""
  +  fprintfn wr "<title>%s Library Reference</title>" title
     fprintfn wr "%s" """<style>
  -pre {
  -  border: 1px solid #e0e0e0;
  -  border-radius: 3px;
  -  padding: 5px;
  -  background: #f7f7f7;
  -  line-height: 160%;
  +p > code.hljs {
  +  display: inline;
  +  padding: 1px;
  +}
  +code {
     font-family: "Lucida Console", Monaco, monospace;
     font-size: 72%;
  -}
  -code {
  -  border: 1px solid #e0e0e0;
     border-radius: 3px;
  -  padding: 2px;
  -  background: #f7f7f7;
  -  line-height: 160%;
  -  font-family: "Lucida Console", Monaco, monospace;
  -  font-size: 72%;
   }
   span.h3 {
     display: inline-block;
  -  font-weight: bold;
  -  font-size: 1.17em;
  -  font-family: inherit;
     margin: 0.75em 0em 0.5em 0em;
   }
   span.spacing {
  
positive.code:      fprintf wr "%s" (spaces n)
       loop ts
     | (s, n)::ts when Array.exists ((=) s.[0]) (symFirst.ToCharArray ()) ->
       fprintf wr "<b>%s</b>%s" (asText s) (spaces n) ; loop ts
     | (t, n)::ts ->
       fprintf wr "%s%s" (asText t) (spaces n) ; loop ts
     | [] ->
  
negative.code:     | (empty: string)::lines when "" = empty.Trim () ->
        paras lines
      | code::lines when code.StartsWith ">" ->
        fprintf wr "<pre><code class=\"fsharp\">"
        inPre (code::lines)
      | text::lines ->
        fprintf wr "<p>"
  