Takes one argument, operator-action-model class. The value is a slot that the op-action acts For example, (model-class-to-operate-on turn-valve) = valve-open-p.
(=> (Slot-To-Operate-On $X $Y) (Operator-Action-Model $X))