Index: /tags/ipp-20141024/extsrc/gpcsw/gpcsrc/fits/burntool/persistio.c
===================================================================
--- /tags/ipp-20141024/extsrc/gpcsw/gpcsrc/fits/burntool/persistio.c	(revision 37678)
+++ /tags/ipp-20141024/extsrc/gpcsw/gpcsrc/fits/burntool/persistio.c	(revision 37679)
@@ -115,4 +115,7 @@
 #define DIFFERENT_STREAK 20	/* Proximity for union versus intersection */
 
+# define myMAXSIZE 20000
+
+
 /****************************************************************/
 /* persist_merge(): Disentangle overlapping persistence streaks */
@@ -123,5 +126,5 @@
    int lapmax;
    OBJBOX *box;
-   int xusage[MAXSIZE], yctr[MAXSIZE], boxid[MAXSIZE];
+   int xusage[myMAXSIZE], yctr[myMAXSIZE], boxid[myMAXSIZE];
    double zk, zj;
 
@@ -131,15 +134,15 @@
 
 /* Assess the clustering of all the streaks */
-   for(i=0; i<MAXSIZE; i++) xusage[i] = 0;
-   for(i=0; i<MAXSIZE; i++) boxid[i] = -1;
+   for(i=0; i<myMAXSIZE; i++) xusage[i] = 0;
+   for(i=0; i<myMAXSIZE; i++) boxid[i] = -1;
    for(k=0; k<nbox; k++) {
-      if(box[k].exfit >= MAXSIZE-1) continue;
+      if(box[k].exfit >= myMAXSIZE-1) continue;
       for(i=box[k].sxfit; i<=box[k].exfit; i++) xusage[i] += 1;
    }
 
 /* Identify clusters */
-   for(xs=0; xs<MAXSIZE-1; xs++) {
+   for(xs=0; xs<myMAXSIZE-1; xs++) {
       if(xusage[xs] == 0) continue;
-      for(xe=xs, lapmax=0; xe<MAXSIZE-1; xe++) {
+      for(xe=xs, lapmax=0; xe<myMAXSIZE-1; xe++) {
 	 if(xusage[xe+1] == 0) break;
 	 lapmax = MAX(lapmax, xusage[xe]);