#!/usr/bin/perl
use FindBin qw($Bin);
my $TNT=$Bin.'/../tnt/tnt';
my $MODEL=$Bin.'/../tnt/models/wsj.tnt';
system ($TNT,$MODEL,@ARGV);
#!/usr/bin/perl
use FindBin qw($Bin);
my $TNT=$Bin.'/../tnt/tnt';
my $MODEL=$Bin.'/../tnt/models/wsj.tnt';
system ($TNT,$MODEL,@ARGV);