spot/tests/core/optba.test
Alexandre Duret-Lutz 5cb94a1a3f Merge the core and python tests in the tests/ directory
* tests/: Rename as...
* tests/core/: ... this.
* python/tests/: Rename as...
* tests/python/: ... this.
* python/tests/run.in: Move as...
* tests/run.in: This, and adjust.
* tests/Makefile.am: Adjust to run both core and python tests.
* configure.ac, README, debian/python3-spot.examples, debian/rules,
doc/org/tut.org, python/Makefile.am, spot/ltsmin/Makefile.am,
spot/ltsmin/kripke.test, spot/sanity/ipynb.test: Adjust.
2016-01-04 16:02:30 +01:00

163 lines
4.2 KiB
Bash
Executable file

#!/bin/sh
# -*- coding: utf-8 -*-
# Copyright (C) 2015 Laboratoire de Recherche et Développement de
# l'Epita (LRDE).
#
# 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 3 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 this program. If not, see <http://www.gnu.org/licenses/>.
. ./defs
# This is a case where autfilt is used to optimize BA, but used to
# produce a larger one. See issue #79.
autfilt=autfilt
# ltldo -s -f '!(((p1 W c1) U Gp2) || (GXc2 <-> F!F!c1))' 'ltl3ba -M0'
cat >input <<EOF
never {
T0_init:
if
:: ((!(c1)) && (!(p1)) && (!(p2))) -> goto accept_S1
:: ((!(c1)) && (!(p1))) -> goto T0_S2
:: ((!(c1)) && (!(p2))) -> goto T0_S3
:: ((true)) -> goto T0_S4
:: ((!(c1)) && (!(p1)) && (!(p2))) -> goto T0_S5
:: ((!(c1)) && (!(p1))) -> goto T0_S6
:: ((!(c1)) && (!(p2))) -> goto T0_S7
:: ((true)) -> goto T0_S8
fi;
accept_S1:
if
:: ((!(c1)) && (c2)) -> goto accept_S1
:: ((c2)) -> goto T0_S9
fi;
T0_S2:
if
:: ((c2) && (!(p2))) -> goto T0_S9
:: ((c2)) -> goto T0_S2
fi;
T0_S3:
if
:: ((!(c1)) && (c2) && (!(p1))) -> goto accept_S1
:: ((!(c1)) && (c2)) -> goto T0_S3
fi;
T0_S4:
if
:: ((!(c1)) && (c2) && (!(p1)) && (!(p2))) -> goto accept_S1
:: ((!(c1)) && (c2) && (!(p1))) -> goto T0_S2
:: ((!(c1)) && (c2) && (!(p2))) -> goto T0_S3
:: ((c2) && (!(p2))) -> goto T0_S10
:: ((!(c1)) && (c2) && (!(p2))) -> goto accept_S11
:: ((c2)) -> goto T0_S4
fi;
T0_S5:
if
:: ((true)) -> goto T0_S5
:: ((!(c2))) -> goto T0_S12
fi;
T0_S6:
if
:: ((!(p2))) -> goto T0_S5
:: ((true)) -> goto T0_S6
:: ((!(c2)) && (!(p2))) -> goto T0_S12
:: ((!(c2))) -> goto T0_S13
fi;
T0_S7:
if
:: ((!(c1)) && (!(p1))) -> goto T0_S5
:: ((!(c1))) -> goto T0_S7
:: ((!(c1)) && (!(c2)) && (!(p1))) -> goto T0_S12
:: ((!(c1)) && (!(c2))) -> goto T0_S14
fi;
T0_S8:
if
:: ((!(c1)) && (!(p1)) && (!(p2))) -> goto T0_S5
:: ((!(c1)) && (!(p1))) -> goto T0_S6
:: ((!(c1)) && (!(p2))) -> goto T0_S7
:: ((!(c1)) && (!(c2)) && (!(p1)) && (!(p2))) -> goto T0_S12
:: ((!(c1)) && (!(c2)) && (!(p1))) -> goto T0_S13
:: ((!(c1)) && (!(c2)) && (!(p2))) -> goto T0_S14
:: ((!(c2))) -> goto T0_S18
:: ((true)) -> goto T0_S8
fi;
T0_S9:
if
:: ((!(c1)) && (c2)) -> goto accept_S1
:: ((c2)) -> goto T0_S9
fi;
T0_S10:
if
:: ((!(c1)) && (c2) && (!(p1)) && (!(p2))) -> goto accept_S1
:: ((!(c1)) && (c2) && (!(p1))) -> goto T0_S2
:: ((!(c1)) && (c2) && (!(p2))) -> goto T0_S3
:: ((c2)) -> goto T0_S10
:: ((!(c1)) && (c2)) -> goto accept_S11
fi;
accept_S11:
if
:: ((!(c1)) && (c2) && (!(p1)) && (!(p2))) -> goto accept_S1
:: ((!(c1)) && (c2) && (!(p1))) -> goto T0_S2
:: ((!(c1)) && (c2) && (!(p2))) -> goto T0_S3
:: ((c2) && (!(p2))) -> goto T0_S10
:: ((!(c1)) && (c2) && (!(p2))) -> goto accept_S11
:: ((c2)) -> goto T0_S4
fi;
T0_S12:
if
:: ((true)) -> goto T0_S12
:: ((c1)) -> goto accept_S15
fi;
T0_S13:
if
:: ((!(p2))) -> goto T0_S12
:: ((c1) && (!(p2))) -> goto accept_S15
:: ((true)) -> goto T0_S13
fi;
T0_S14:
if
:: ((!(c1)) && (!(p1))) -> goto T0_S12
:: ((!(c1))) -> goto T0_S14
fi;
accept_S15:
if
:: ((c1)) -> goto accept_S15
fi;
accept_S16:
if
:: ((c1) && (!(p2))) -> goto accept_S16
:: ((c1)) -> goto T0_S17
fi;
T0_S17:
if
:: ((c1) && (!(p2))) -> goto accept_S16
:: ((c1)) -> goto T0_S17
fi;
T0_S18:
if
:: ((!(c1)) && (!(p1)) && (!(p2))) -> goto T0_S12
:: ((!(c1)) && (!(p1))) -> goto T0_S13
:: ((!(c1)) && (!(p2))) -> goto T0_S14
:: ((c1)) -> goto T0_S17
:: ((true)) -> goto T0_S18
fi;
}
EOF
# 18 states is fine for transition-based acceptance
test `$autfilt --exclusive-ap=c1,c2 --high --small --stats=%s input` = 18
# But we should have 19 with Büchi acceptance, not 20.
test `$autfilt --exclusive-ap=c1,c2 --high --small -B --stats=%s input` = 19