#  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: comparing.rules 7466 2006-11-17 00:30:09Z witte $


# category: Comparing
# args: SimplicialComplex1, SimplicialComplex2
# return: boolean
# Check whether the face lattices of two simplicial complexes are isomorphic.
# The problem is reduced to graph isomorphism of the vertex-facet incidence graphs.

user_function check_iso(SimplicialComplex,SimplicialComplex) {
   my @result;
   client("isomorphic_complexes", @_, \@result);
   return $result[0]+0;
}


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