heptagon/test/good/updown.ept
2012-07-18 16:54:44 +02:00

16 lines
283 B
Text

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;
tel
node main() returns (o:bool)
var half:bool;
let
o = updown(half);
half = true fby not half
tel