heptagon/test/good/counter.ept

node counter(res: bool; tick: bool) returns (o: int)
let
  o = if res then 0 else if tick then 1 -> pre o + 1 else 0 -> pre o;
tel

node main() returns (y:int)
var half:bool;
let
  y = counter(false fby (y > 35), half);
  half = true fby not half
tel
Add lib/pervasives.epi, tests, tools 2010-06-21 12:11:06 +02:00			`node counter(res: bool; tick: bool) returns (o: int)`
			`let`
			`o = if res then 0 else if tick then 1 -> pre o + 1 else 0 -> pre o;`
			`tel`
Added main to several tests Added main to tests Added dependency statics -> statics2 in scripts 2012-07-17 17:57:04 +02:00
			`node main() returns (y:int)`
			`var half:bool;`
			`let`
			`y = counter(false fby (y > 35), half);`
			`half = true fby not half`
			`tel`