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