1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
<svg width="65ch" height="14em" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve">
<style>
* {
font-family: Source Code Pro, monospace;
font-size: 18px;
}
tspan, text {
font-variant-ligatures: none;
dominant-baseline: central;
white-space: pre;
fill: #839496;
}
.bg {
stroke-width: "0.5px";
}
<!-- Foreground ANSI colors -->
.fa1 { fill: #dc322f; }
.fa2 { fill: #859900; }
.fa3 { fill: #b58900; }
.fa4 { fill: #268bd2; }
</style>
<rect width="100%" height="100%" x="0" y="0" style="fill: #002b36"/>
<text x="0ch" y="0.5em"><tspan> ╭─</tspan><tspan class="fa1">[fac.lisp]</tspan></text>
<text x="0ch" y="1.5em"><tspan> │</tspan></text>
<text x="0ch" y="2.5em"><tspan>1 │ (defun </tspan><tspan class="fa2">factorial </tspan><tspan>(n) </tspan><tspan class="fa4">(if (zerop n) 1</tspan></text>
<text x="0ch" y="3.5em"><tspan> ┆ </tspan><tspan class="fa2">────┬──── </tspan><tspan class="fa4">▲</tspan></text>
<text x="0ch" y="4.5em"><tspan> ┆ </tspan><tspan class="fa2">│ </tspan><tspan class="fa4">│</tspan></text>
<text x="0ch" y="5.5em"><tspan> ┆ </tspan><tspan class="fa2">╰───────────────────────── </tspan><tspan>this function ...</tspan></text>
<text x="0ch" y="6.5em"><tspan> ┆ </tspan><tspan class="fa4">╭──────────────────────╯</tspan></text>
<text x="0ch" y="7.5em"><tspan>2 │ </tspan><tspan class="fa4">│ (* n (factorial (1- n))))</tspan><tspan>)</tspan></text>
<text x="0ch" y="8.5em"><tspan> ┆ </tspan><tspan class="fa4">│ ▲ </tspan><tspan class="fa3">┬</tspan></text>
<text x="0ch" y="9.5em"><tspan> ┆ </tspan><tspan class="fa4">│ │ </tspan><tspan class="fa3">│</tspan></text>
<text x="0ch" y="10.5em"><tspan> ┆ </tspan><tspan class="fa4">╰─────────────────────────────────┴─── </tspan><tspan>... is defined by this</tspan></text>
<text x="0ch" y="11.5em"><tspan> ┆ </tspan><tspan class="fa3">│</tspan></text>
<text x="0ch" y="12.5em"><tspan> ┆ </tspan><tspan class="fa3">╰─ </tspan><tspan>(and here is EOF)</tspan></text>
<text x="0ch" y="13.5em"><tspan>──╯</tspan></text>
</svg>
|
