#!/usr/bin/perl

use lib '.';
use AlgParser;

my $parser = new AlgParserWithImplicitExpand;
my $ret;

foreach $str (@ARGV) {
$ret = $parser -> parse($str);
if ( ref($ret) ) {
    print $parser -> tostring().$/;
    print $parser -> normalize().$/;
    print $parser -> tolatex().$/;
} else {
    print $parser->{htmlerror};
}
print "\n";
}