The KLVStateEvent class implements a test event that does not perform
any action, but returns the status of the Cab Display and the
Emergency Break.
\begin{vdm_al} class KLVStateEvent issubclassof Event
operations
public
execute : KLV ==> Test`TestResult
execute (klv) ==
(let mk_(a,e,g) = klv.getCabDisplay().getDisplay(),
e' = klv.getEmergencyBreak().getEmergencyBreak() in return mk_Test`KLVstate(mk_Test`CabDisp(a,e,g),
mk_Test`EmerBreak(e')) );
end KLVStateEvent
\end{vdm_al}
¤ Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.0.0Bemerkung:
(vorverarbeitet)
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.