wenzelm@28838: #!/usr/bin/env perl
wenzelm@28838: 
wenzelm@28838: print "\\begin{supertabular}{ll\@{\\qquad}ll}\n";
wenzelm@28838: 
wenzelm@28838: $eol = "&";
wenzelm@28838: 
wenzelm@28838: while (<ARGV>) {
wenzelm@28838:     if (m/^\\newcommand\{\\isasym([A-Za-z]+)\}/) {
wenzelm@28838:        print "\\verb,\\<$1>, & {\\isasym$1} $eol\n";
wenzelm@28838: #       print "\\verb,\\<$1>, & \\isactrlbold{\\isasym$1}~{\\isasym$1} $eol\n";
wenzelm@28838: #       print "\\verb,\\<$1>, & B\\isactrlsup{\\isasym$1} $eol\n";
wenzelm@28838: #       print "\\verb,\\<$1>, & B\\isactrlsub{\\isasym$1} $eol\n";
wenzelm@28838:         if ("$eol" eq "&") {
wenzelm@28838:             $eol = "\\\\";
wenzelm@28838:         } else {
wenzelm@28838:             $eol = "&";
wenzelm@28838:         }
wenzelm@28838:     }
wenzelm@28838: }
wenzelm@28838: 
wenzelm@28838: if ("$eol" eq "\\\\") {
wenzelm@28838:     print "$eol\n";
wenzelm@28838: }
wenzelm@28838: 
wenzelm@28838: print "\\end{supertabular}\n";
wenzelm@28838: