heptagon/test/good/updown.ept

17 lines
283 B
Plaintext
Raw Normal View History

2010-06-21 12:11:06 +02:00
node updown(on_off : bool) returns (o : bool)
let
automaton
state Down
do o = false until on_off then Up
state Up
do o = true until on_off then Down
end;
2012-07-18 16:54:44 +02:00
tel
node main() returns (o:bool)
var half:bool;
let
o = updown(half);
half = true fby not half
tel