include "primitives.alh"

SimpleClassDiagram Control_PW{
    SimpleAttribute Boolean {}
    SimpleAttribute String{
        constraint = $
            String function constraint(model : Element, name : String):
                if (is_physical_string(model["model"][name])):
                    return "OK"!
                else:
                    return "String has non-string value"!
            $
    }

    Class Named {
        name : String
    }

    Class Transition : Named {}
    Class State : Named {
        initial : Boolean
    }

    Association PortTransition (Port, Transition) {}
    Association From (State, Transition) {}
    Association To (Transition, State) {}
    Association PortState (Port, State) {}
}