shrink_ps function

Shrink a ParamSet towards a point.