author | traytel |
Tue, 10 Dec 2019 01:06:39 +0100 | |
changeset 71264 | 0c454a5d125d |
parent 67146 | 909dcdec2122 |
permissions | -rwxr-xr-x |
#!/usr/bin/env perl print "\\begin{supertabular}{ll\@{\\qquad}ll}\n"; $eol = "&"; while (<ARGV>) { if (m/^\\newcommand\{\\isasym([A-Za-z]+)\}/) { print "\\verb,\\<$1>, & {\\isasym$1} $eol\n"; if ("$eol" eq "&") { $eol = "\\\\"; } else { $eol = "&"; } } } if ("$eol" eq "\\\\") { print "$eol\n"; } print "\\end{supertabular}\n";