heptagon/test/good/bad_updown.ept

21 lines
366 B
Plaintext
Raw Normal View History

2010-12-14 18:36:54 +01:00
node updown(b : bool) returns (o : bool)
var o2,on_off:bool;
2010-12-14 18:36:54 +01:00
let
on_off = true;
automaton
state Down
do o2 = false until on_off then Up
2010-12-14 18:36:54 +01:00
state Up
do o2 = true until on_off then Down
2010-12-14 18:36:54 +01:00
end;
o = merge b (true-> o2) (false -> false)
2010-12-14 18:36:54 +01:00
tel
node main() returns (o:bool)
var b:bool;
let
b = true fby true fby false fby b;
o = updown(b);
tel