29 lines
530 B
Text
29 lines
530 B
Text
|
node count() returns (o : int)
|
||
|
let
|
||
|
o = 0 fby (o + 1);
|
||
|
tel
|
||
|
|
||
|
node main(x : bool) returns (d : bool)
|
||
|
var last c : bool = false;
|
||
|
let
|
||
|
d = c;
|
||
|
automaton
|
||
|
state One
|
||
|
var last xone : bool = false;
|
||
|
do
|
||
|
automaton
|
||
|
state A
|
||
|
do c = xone & x;
|
||
|
xone = true;
|
||
|
until count() = 2 then B
|
||
|
state B
|
||
|
do
|
||
|
until count() = 3 then A
|
||
|
end
|
||
|
until count() = 5 then Two
|
||
|
state Two
|
||
|
do c = x;
|
||
|
until count() = 3 then One
|
||
|
end
|
||
|
tel
|