houdini sprite animation

houdini sprite animation with POPWrangle for removing too closely spaced points.
POPWrangle:
int handle = pcopen(0, "P", @P, 0.1, 2);
pciterate(handle);
if(pciterate(handle)) {
 int nnum;
 pcimport(handle, "point.number", nnum);
 if(nnum > @ptnum)
  i@dead = 1;
}