diff options
Diffstat (limited to 'report/pyp_clustering/format-grammar-latex.pl')
-rwxr-xr-x | report/pyp_clustering/format-grammar-latex.pl | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/report/pyp_clustering/format-grammar-latex.pl b/report/pyp_clustering/format-grammar-latex.pl deleted file mode 100755 index e1fe3e45..00000000 --- a/report/pyp_clustering/format-grammar-latex.pl +++ /dev/null @@ -1,21 +0,0 @@ -#!/usr/bin/perl -w -use strict; -my $x = ''; -while(<>){ - if (/^$/) { print "\\hline\n"; next; } - if (/^(\d+)$/) { - $x=$1; - $x=~s/^(\d\d\d)(\d\d\d)(\d\d\d)$/$1,$2,$3/; - $x=~s/^(\d\d)(\d\d\d)(\d\d\d)$/$1,$2,$3/; - $x=~s/^(\d)(\d\d\d)(\d\d\d)$/$1,$2,$3/; - $x=~s/^(\d\d\d)(\d\d\d)$/$1,$2/; - $x=~s/^(\d\d)(\d\d\d)$/$1,$2/; - $x=~s/^(\d)(\d\d\d)$/$1,$2/; - next; - } - s/ \|\|\| LHSProb.*$//; s/ \|\|\| / \\rightarrow \\langle \\textrm{/; s/\[X(\d+)\]/\\textrm{X}^{$1}/; - s/ \|\|\| /},\\textrm{{\\emph /; - chomp; - print "$x & \$ $_}} \\rangle \$ \\\\\n"; - $x=""; -} |