notes-ing2/surete/tp1/temp_prop/once_since.ec
2024-03-10 21:33:20 +01:00

15 lines
235 B
Text

node once_since
(a: bool;
reset: bool)
returns
(o: bool);
var
V14_a_happened: bool;
let
o = ((a and (not reset)) -> V14_a_happened);
V14_a_happened = (a -> (if reset then false else ((pre V14_a_happened) or a))
);
tel