control_PW.mvc 746 B

12345678910111213141516171819202122232425262728293031
  1. include "primitives.alh"
  2. SimpleAttribute Boolean {}
  3. SimpleAttribute TriState {}
  4. SimpleAttribute String{
  5. constraint = $
  6. String function constraint(model : Element, name : String):
  7. if (is_physical_string(model["model"][name])):
  8. return "OK"!
  9. else:
  10. return "String has non-string value"!
  11. $
  12. }
  13. Class State {
  14. isInitial : Boolean
  15. isError : Boolean
  16. name : String
  17. }
  18. Class Up : State {}
  19. Class Down : State {}
  20. Class Neutral : State {}
  21. Association Transition (State, State) {
  22. objDetected : TriState
  23. }
  24. Association UpPressed : Transition (State, State) {}
  25. Association NonePressed : Transition (State, State) {}
  26. Association DownPressed : Transition (State, State) {}