Index: /branches/eam_branches/20091113/psastro/src/psastroRemoveClumps.c
===================================================================
--- /branches/eam_branches/20091113/psastro/src/psastroRemoveClumps.c	(revision 26131)
+++ /branches/eam_branches/20091113/psastro/src/psastroRemoveClumps.c	(revision 26132)
@@ -12,4 +12,15 @@
 
 # include "psastroInternal.h"
+
+psArray *psastroRemoveClumpsIterate (psArray *input, int scale, int nIter) {
+
+    psArray *newset = psMemIncrRefCounter (input);
+    for (int i = 0; i < nIter; i++) {
+	psArray *subset = psastroRemoveClumps (newset, 150);
+	psFree (newset);
+	newset = subset;
+    }
+    return newset;
+}    
 
 /**