FSA Related Types
FSASpecific: TYPE = REF FSASpecificRec;
FSASpecificRec:
TYPE =
RECORD [
state: State ← 0,
ctlAB: DM.Component ← NIL,
ctlBA: DM.Component ← NIL
];
State: TYPE = [0..16);
Create: PUBLIC PROC [Reset, PhA, EvPhA, PhB, EvPhB: DM.ActionProc, ctlAB, ctlBA: DM.Component] RETURNS [fsa: DM.Component];