---

Class Relations

• class: ::nx::VariableSlot

::nx::VariableSlot create ::xotcl::Attribute::slot::multivalued

Methods (to be applied on the object)

• value=get (scripted)

  return [$object eval [list :isMultivalued]]

• value=set (scripted)

  set mClass [expr {$value ? "0..n" : "1..1"}]
  $object configure -incremental $value -multiplicity $mClass

---