#!/usr/bin/perl

use lib '.';
use AlgParser;

my $parser = new AlgParserWithImplicitExpand;
my $ret;

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