vex

 Find points nearby and delete

int pts [] = pcfind(0,"P",v@P,chf("rad"),chi("max_pts"));

if(len(pts) <= chi("remove_amount")) removepoint(0,i@ptnum,1);