input chord;
beginfig(-1);
verbatimtex
\documentclass[12pt]{article}
\usepackage{times}
\begin{document}
etex;
init_chord;
path nodes[];
node(0, nodes[8], 12, blue, top, "N8");
node(0, nodes[21], 30, blue, urt, "N21");
node(0, nodes[36], 52, blue, urt, "N36");
node(0, nodes[48], 68, blue, rt, "N48");
node(0, nodes[61], 87, blue, rt, "N61");
node(0, nodes[88], 125, blue, lrt, "N88");
node(0, nodes[96], 135, blue, lrt, "N96");
node(0, nodes[114], 161, blue, bot, "N114");
node(0, nodes[129], 182, blue, bot, "N129");
node(0, nodes[156], 220, blue, llft, "N156");
node(0, nodes[174], 245, blue, llft, "N174");
node(0, nodes[205], 289, blue, lft, "N205");
node(0, nodes[216], 305, blue, ulft, "N216");
node(0, nodes[232], 327, blue, ulft, "N232");
node(0, nodes[251], 353, blue, top, "N251");
endfig;
verbatimtex
\end{document}
etex
end