mirror of
http://172.16.200.102/MOISE/Timed-Altarica-To-Fiacre-Translator.git
synced 2025-12-27 08:03:57 +01:00
12 lines
407 B
Plaintext
12 lines
407 B
Plaintext
|
|
domain FState = {NOMINAL, LOST, ERROR} ;
|
||
|
|
domain FailureType = {Err, Loss, Ok} ;
|
||
|
|
|
||
|
|
node Function
|
||
|
|
flow I : FailureType : in ; O : FailureType : out ;
|
||
|
|
state S : FState ;
|
||
|
|
event fail_loss, fail_err ;
|
||
|
|
init S := NOMINAL ;
|
||
|
|
trans S != LOST |- fail_loss -> S := LOST ;
|
||
|
|
S = NOMINAL |- fail_err -> S := ERROR ;
|
||
|
|
assert O = case { S = NOMINAL : I, S = LOST : Loss, else Err } ;
|
||
|
|
edon
|