heptagon/test/good/tt.ept
Léonard Gérard 1d6feeef54 some more tests
2011-05-26 15:56:59 +02:00

28 lines
443 B
Text

node f(x:bool;c:bool) returns (o:bool)
let
automaton
state A
var l:bool; do
l = x when c;
o = merge c (true -> l) (false -> false)
until true then B
state B
do o = false
end
tel
(*
node clock_on<<pref, per : int>>(w1, w2 : bool) returns (o : bool)
let
automaton
state FirstPeriod
var w2' : bool; do
w2' = w1 when w2;
o = false;
until true then Cruise
state Cruise do
o = true;
end
tel
*)