src/Doc/IsarRef/document/showsymbols
author Christian Sternagel
Wed, 29 Aug 2012 10:57:24 +0900
changeset 49081 092668a120cc
parent 48985 5386df44a037
permissions -rwxr-xr-x
changed arguement order of suffixeq (to facilitate reading "suffixeq xs ys" as "xs is a (possibly empty) suffix of ys)

#!/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";
#       print "\\verb,\\<$1>, & \\isactrlbold{\\isasym$1}~{\\isasym$1} $eol\n";
#       print "\\verb,\\<$1>, & B\\isactrlsup{\\isasym$1} $eol\n";
#       print "\\verb,\\<$1>, & B\\isactrlsub{\\isasym$1} $eol\n";
        if ("$eol" eq "&") {
            $eol = "\\\\";
        } else {
            $eol = "&";
        }
    }
}

if ("$eol" eq "\\\\") {
    print "$eol\n";
}

print "\\end{supertabular}\n";