Constraint MOTORSCOMPATIBLE_MACHINE28

• Defined in theory: Vt-domain
• Source code: vt-domain.lisp

Slots on this instance:

Instance-Of: Constraint

Constraint-On: Elevator

Constraint.Expression:

'(=> (= (Model-Id (Elevator.Machine ?X)) Machine_Model_M02)
     (Member (Model-Id (Elevator.Motor ?X))
             (Setof Motor_Model_M03
                    Motor_Model_M04
                    Motor_Model_M05
                    Motor_Model_M06)))