author | wenzelm |
Sun, 12 Aug 2018 14:28:28 +0200 | |
changeset 68743 | 91162dd89571 |
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";