Project

General

Profile

Download (312 Bytes) Statistics
| Branch: | Tag: | Revision:
1
(*@ ensures open_light; *)
2
node top(millisecond : bool) returns (open_light : bool)
3
let
4
  automaton command_control
5
    state Open :
6
          let
7
            open_light = true;
8
          tel
9
          
10
    state Silent :
11
          let
12
            open_light = false;
13
          tel
14
          
15
tel
(7-7/24)