src/Doc/IsarRef/document/showsymbols
changeset 48985 5386df44a037
parent 48958 12afbf6eb7f9
equal deleted inserted replaced
48984:f51d4a302962 48985:5386df44a037
       
     1 #!/usr/bin/env perl
       
     2 
       
     3 print "\\begin{supertabular}{ll\@{\\qquad}ll}\n";
       
     4 
       
     5 $eol = "&";
       
     6 
       
     7 while (<ARGV>) {
       
     8     if (m/^\\newcommand\{\\isasym([A-Za-z]+)\}/) {
       
     9        print "\\verb,\\<$1>, & {\\isasym$1} $eol\n";
       
    10 #       print "\\verb,\\<$1>, & \\isactrlbold{\\isasym$1}~{\\isasym$1} $eol\n";
       
    11 #       print "\\verb,\\<$1>, & B\\isactrlsup{\\isasym$1} $eol\n";
       
    12 #       print "\\verb,\\<$1>, & B\\isactrlsub{\\isasym$1} $eol\n";
       
    13         if ("$eol" eq "&") {
       
    14             $eol = "\\\\";
       
    15         } else {
       
    16             $eol = "&";
       
    17         }
       
    18     }
       
    19 }
       
    20 
       
    21 if ("$eol" eq "\\\\") {
       
    22     print "$eol\n";
       
    23 }
       
    24 
       
    25 print "\\end{supertabular}\n";
       
    26