(Slot-Cardinality Smooth-Skin _Smooth 1) (<=> (Smooth-Skin ?Self) (And (Skin ?Self) (Value-Cardinality ?Self _Smooth 1)))