//i@attr =1 for selected points
int primpoints[] = primpoints(0,@primnum);
int min = min(primpoints);
int selPoint[] = findattribval(0,"point", "attr", 1);
foreach (int sel;selPoint) {
foreach (int pt;primpoints) {
if (find(primpoints,sel)>=0 && pt<sel && pt>=min) {
removepoint(0,pt,0);
}
}
}