#!/bin/sh # -*- coding: utf-8 -*- # Copyright (C) 2016, 2017 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 . . ./defs set -e cat >alt.hoa <alt.dot cat >expect.dot < -11 [arrowhead=onormal] subgraph cluster_0 { color=green label="" 2 [label="G(a)"] } subgraph cluster_1 { color=red label="" 1 [label="FG(a)\n⓿"] } subgraph cluster_2 { color=green label="" 6 [label="t"] } subgraph cluster_3 { color=red label="" 4 [label="F(b)\n⓿"] } subgraph cluster_4 { color=green label="" 3 [label="GF(b)"] -8 [label=<>,shape=point] } subgraph cluster_5 { color=red label="" 5 [label="((a) U (b))\n⓿"] } subgraph cluster_6 { color=black label="" 0 [label="((((a) U (b)) && GF(b)) && FG(a))"] } -11 [label=<>,shape=point] -11 -> 0 -11 -> 2 0 -> -1 [label="b", arrowhead=onormal] -1 [label=<>,shape=point] -1 -> 1 -1 -> 3 0 -> -4 [label="a & !b", style=bold, color="#E31A1C", arrowhead=onormal] -4 [label=<>,shape=point] -4 -> 1 [style=bold, color="#E31A1C"] -4 -> 3 [style=bold, color="#E31A1C"] -4 -> 5 [style=bold, color="#E31A1C"] 1 -> 2 [label="a"] 1 -> 1 [label="1"] 2 -> 2 [label="a"] 3 -> 3 [label="b"] 3 -> -8 [label="!b", style=bold, color="#FF7F00", arrowhead=onormal] -8 -> 3 [style=bold, color="#FF7F00"] -8 -> 4 [style=bold, color="#FF7F00"] 4 -> 6 [label="b"] 4 -> 4 [label="!b"] 5 -> 6 [label="b"] 5 -> 5 [label="a & !b"] 6 -> 6 [label="1"] } EOF diff expect.dot alt.dot autfilt --trust=no --check=strength alt.hoa | grep properties: >output cat >expected <out.hoa <res cat >expected <res cat >expected <ex1<ex2<ex3<ex4<expect4<expect4d< out4 diff expect4 out4 run 0 autfilt --remove-dead-states ex4 > out4 diff expect4d out4 cat >ex5< out5 cat >expect <ex6< ex6.dot style='arrowhead=onormal' cat >expect6.dot<⓿)
[co-Büchi]> labelloc="t" node [shape="circle"] fontname="Lato" node [fontname="Lato"] edge [fontname="Lato"] I [label="", style=invis, width=0] I -> -1 [arrowhead=onormal] -1 [label=<>,shape=point] -1 -> 0 -1 -> 1 0 [label=<0>] 0 -> 0 [label=] 0 -> -1.1 [label=, style=bold, color="#FF4DA0", $style] -1.1 [label=<>,shape=point] -1.1 -> 0 [style=bold, color="#FF4DA0"] -1.1 -> 1 [style=bold, color="#FF4DA0"] 0 -> -1.2 [label=, style=bold, color="#FF7F00", arrowhead=onormal] -1.2 [label=<>,shape=point] -1.2 -> 0 [style=bold, color="#FF7F00"] -1.2 -> 1 [style=bold, color="#FF7F00"] 1 [label=<1>] 1 -> 1 [label=] } EOF diff ex6.dot expect6.dot cat >ex7< ex7.dot color='' color1='' cat >expect7.dot<[Streett-like 2]> labelloc="t" fontname="Lato" node [fontname="Lato"] edge [fontname="Lato"] I [label="", style=invis, width=0] I -> 0 subgraph cluster_0 { color=green label="" 4 [label=] } subgraph cluster_1 { color=green label="" 1 [label=] } subgraph cluster_2 { color=red label="" 2 [label=] } subgraph cluster_3 { color=red label="" 3 [label=] } subgraph cluster_4 { color=green label="" 0 [label=] -1 [label=<>,shape=point] -4 [label=<>,shape=point] -7 [label=<>,shape=point] -10 [label=<>,shape=point] } 0 -> 4 [label=] 0 -> 0 [label=] 0 -> -1 [label=, arrowhead=onormal] -1 -> 0 -1 -> 1 0 -> -4 [label=, arrowhead=onormal] -4 -> 0 -4 -> 2 0 -> -7 [label=, arrowhead=onormal] -7 -> 0 -7 -> 3 0 -> -10 [label=, arrowhead=onormal] -10 -> 0 -10 -> 2 -10 -> 3 1 -> 1 [label=] 2 -> 4 [label=] 2 -> 2 [label=>] 3 -> 4 [label=] 3 -> 3 [label=>] 4 -> 4 [label=<1>] } EOF diff ex7.dot expect7.dot cat >ex8< ex8.dot cat >expect8.dot<[Streett-like 2]> labelloc="t" fontname="Lato" node [fontname="Lato"] edge [fontname="Lato"] I [label="", style=invis, width=0] I -> 0 subgraph cluster_0 { color=green label="" 4 [label=] } subgraph cluster_1 { color=red label="" 2 [label=] } subgraph cluster_2 { color=red label="" 3 [label=] } subgraph cluster_3 { color=green label="" 0 [label=] -1 [label=<>,shape=point] -4 [label=<>,shape=point] -7 [label=<>,shape=point] 1 [label=] -10 [label=<>,shape=point] } 0 -> 4 [label=] 0 -> 0 [label=] 0 -> -1 [label=, arrowhead=onormal] -1 -> 0 -1 -> 1 0 -> -4 [label=, arrowhead=onormal] -4 -> 0 -4 -> 2 0 -> -7 [label=, arrowhead=onormal] -7 -> 0 -7 -> 3 1 -> 1 [label=] 1 -> -10 [label=, arrowhead=onormal] -10 -> 0 -10 -> 2 -10 -> 3 2 -> 4 [label=] 2 -> 2 [label=>] 3 -> 4 [label=] 3 -> 3 [label=>] 4 -> 4 [label=<1>] } EOF diff ex8.dot expect8.dot cat >ex9 < ex9.dot cat >expect9.dot <⓿)
[co-Büchi]> labelloc="t" node [shape="circle"] fontname="Lato" node [fontname="Lato"] edge [fontname="Lato"] I [label="", style=invis, width=0] I -> 0 0 [label=<0>] 0 -> -1.1 [label=, style=bold, color="#FF4DA0", arrowhead=onormal] -1.1 [label=<>,shape=point] -1.1 -> 1 [style=bold, color="#FF4DA0"] -1.1 -> 2 [style=bold, color="#FF4DA0"] 1 [label=<1>] 1 -> -1.1 [label=
, style=bold, color="#FF4DA0", arrowhead=onormal] 2 [label=<2>] 2 -> -1.2 [label=, style=bold, color="#FF7F00", $style] -1.2 [label=<>,shape=point] -1.2 -> 1 [style=bold, color="#FF7F00"] -1.2 -> 2 [style=bold, color="#FF7F00"] } EOF diff ex9.dot expect9.dot cat >ex10 < ex10.dot cat >expect10.dot <⓿)
[co-Büchi]> labelloc="t" node [shape="circle"] fontname="Lato" node [fontname="Lato"] edge [fontname="Lato"] I [label="", style=invis, width=0] I -> 0 0 [label=<0>] 0 -> -1.1 [label=, style=bold, color="#FF4DA0", arrowhead=onormal] -1.1 [label=<>,shape=point] -1.1 -> 1 [style=bold, color="#FF4DA0"] -1.1 -> 2 [style=bold, color="#FF4DA0"] 1 [label=<1>] 1 -> -1.3 [label=
, style=bold, color="#6A3D9A", arrowhead=onormal] -1.3 [label=<>,shape=point] -1.3 -> 1 [style=bold, color="#6A3D9A"] -1.3 -> 2 [style=bold, color="#6A3D9A"] 2 [label=<2>] 2 -> -1.2 [label=, style=bold, color="#FF7F00", $style] -1.2 [label=<>,shape=point] -1.2 -> 1 [style=bold, color="#FF7F00"] -1.2 -> 2 [style=bold, color="#FF7F00"] } EOF diff ex10.dot expect10.dot cat >ex11 < ex11.dot cat >expect11.dot <⓿)
[co-Büchi]> labelloc="t" fontname="Lato" node [fontname="Lato"] edge [fontname="Lato"] I [label="", style=invis, width=0] I -> 0 subgraph cluster_0 { color=green label="" 3 [label=] } subgraph cluster_1 { color=green label="" 1 [label=] } subgraph cluster_2 { color=green label="" 2 [label=] } subgraph cluster_3 { color=green label="" 0 [label=] -1 [label=<>,shape=point] -4 [label=<>,shape=point] } 0 -> 0 [label=
] 0 -> -1 [label=, arrowhead=onormal] -1 -> 0 -1 -> 1 0 -> -4 [label=, arrowhead=onormal] -4 -> 0 -4 -> 2 1 -> 3 [label=] 1 -> 1 [label=] 2 -> 2 [label=] 3 -> 3 [label=<1>] } EOF diff ex11.dot expect11.dot # Detect cases where alternation-removal cannot work. cat >in <out && exit 1 grep 'autfilt.*weak.*alternating' out test '0 2 2 1' = "`autfilt --stats='%[Wiw]c %[w]c %[iw]c %[W]c' in`" cat >in <out && exit 1 grep 'autfilt.*weak.*alternating' out test '2 0 2 2' = "`autfilt --stats='%[Wiw]c %[w]c %[iw]c %[W]c' in`" cat >in <in <in <