* src/tgbatest/reductgba.cc, src/tgbatest/reductgba.test: Test for

reduction of tgba.

src/tgbatest/reductgba.test

@@ -0,0 +1,48 @@
+#!/bin/sh
+# Copyright (C) 2003, 2004  Laboratoire d'Informatique de Paris 6 (LIP6),
+# département Systèmes Répartis Coopératifs (SRC), Université Pierre
+# et Marie Curie.
+#
+# This file is part of Spot, a model checking library.
+#
+# Spot 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 of the License, or
+# (at your option) any later version.
+#
+# Spot 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.
+#
+# You should have received a copy of the GNU General Public License
+# along with Spot; see the file COPYING.  If not, write to the Free
+# Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+# 02111-1307, USA.
+
+
+. ./defs
+
+set -e
+
+check ()
+{
+  run 0 ./reductgba "$1"
+}
+
+# We don't check the output, but just running these might be enough to
+# trigger assertions.
+
+check 'a'
+check 'a U b'
+check 'a U Fb'
+check 'X a'
+check 'a & b & c'
+check 'a | b | (c U (d & (g U (h ^ i))))'
+check 'Xa & (b U !a) & (b U !a)'
+check 'Fa & Xb & GFc & Gd'
+check 'Fa & Xa & GFc & Gc'
+check 'Fc & X(a | Xb) & GF(a | Xb) & Gc'
+check 'a R (b R c)'
+check '(a U b) U (c U d)'
+check '((Xp2)U(X(1)))*(p1 R(p2 R p0))'