All VT constraints have a restricted form, specified by vt-constraint-sentence.
(Inherited-Facet-Value Slot-Value-Type Vt-Component Has-Constraint Vt-Constraint) (=> (Vt-Component ?Component) (And (Value-Type ?Component Has-Constraint Vt-Constraint) (Has-Parameter-Slot ?Component Component.Cost) (Value-Type ?Component Component.Cost Cost-Quantity) (Value-Cardinality ?Component Component.Cost 1)))