#  Copyright (c) 1997-2006
#  Ewgenij Gawrilow, Michael Joswig (Technische Universitaet Berlin, Germany)
#  http://www.math.tu-berlin.de/polymake,  mailto:polymake@math.tu-berlin.de
#
#  This program is free software; you can redistribute it and/or modify it
#  under the terms of the GNU General Public License as published by the
#  Free Software Foundation; either version 2, or (at your option) any
#  later version: http://www.gnu.org/licenses/gpl.txt.
#
#  This program is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#  GNU General Public License for more details.
#-----------------------------------------------------------------------------
#  $Project: polymake $$Id: main.rules 7425 2006-09-05 22:07:53Z gawrilow $

USE
  common

# these rules are intrinsic: they don't depend on any external software to be installed separately
INCLUDE
  visual.rules

# self-configuring rules
INCLUDE
  postscript.rules
  javaview.rules
  geomview.rules
  jreality.rules
  povray.rules
  metapost.rules
  graphviz.rules


# category: Comparing
# args: Object1, Graph1, Object2, Graph2
# return: boolean
# Check the isomorphism of two graph properties

user_function check_iso (Poly::Object, $, Poly::Object, $) {
   my @result;
   client("isomorphic_graphs", @_, \@result);
   return $result[0]+0;
}

# Local Variables:
# mode: perl
# c-basic-offset:3
# End: