#!%%PERL5%% -- # -*- Perl -*-
#
# Run the LaTeX filter
#
# $Id: gmat.latex 2.0 1995/04/01 21:09:46 norm Exp $
#
#

$BASEVERS   = "0.1";
$RCS_ID     = '$Id: gmat.latex 2.0 1995/04/01 21:09:46 norm Exp $'; # '
($PROGNAME  = $RCS_ID) =~ s/^.Id: (\S+) .*$/$1/;
($PATCHLEVEL= $RCS_ID) =~ s/^.Id: \S+ \d+\.(\d+) .*$/$1/;
$VERSION    = "$BASEVERS patchlevel $PATCHLEVEL";
$EXECDIR    = ".";
$EXECDIR    = $1 if $0 =~ /^(.*)\/[^\/]+$/;

######################################################################

$source = pop (@ARGV);

system ("texit $source");

