+log 0, 'Turn indented block after use cases into block quotes'
+inscope=false
+quote=false
+data.each_with_index do |lin, idx|
+ if quote
+ lin.sub!(/^/, "> ")
+ end
+ if lin =~ /^> Profile written by/
+ quote=false
+ end
+ # To this heading
+ if lin =~ /^## Bibliography/
+ inscope=false
+ end
+ # From this heading
+ if lin =~ /^## Arduino/
+ inscope=true
+ end
+ if inscope and lin =~ /^## /
+ quote=true
+ next
+ end
+end
+
+log 0, 'emphesize keywords'
+data.map {|lin| lin.gsub!(/^(>\s*)(Revenue model|Interview date|Interviewees?):/, '\\1**\\2**:')}
+
+log 0, 'make figure sizes relative to text body width while keeping aspect ratio'
+data.map {|lin| lin.gsub!(/width="6.5in"/, 'width="100%"')}
+data.map {|lin| lin.gsub!(/width="4.198in"/, 'width="40%"')}
+data.map {|lin| lin.gsub!(/width="4.1665in"/, 'width="40%"')}
+data.map {|lin| lin.gsub!(/height="[0-9.]+in"/, '')}
+