Changeset 23924 for trunk/extsrc/gpcsw/gpcsrc/fits/burntool/trailfit.c

Timestamp:

Apr 18, 2009, 11:11:15 AM (17 years ago)

Author:

eugene

Message:

import updates from camera group (fits table outputs, fixes to persistent trails); modify import to avoid libpsf (fortran)

File:

• trunk/extsrc/gpcsw/gpcsrc/fits/burntool/trailfit.c (modified) (1 diff)

trunk/extsrc/gpcsw/gpcsrc/fits/burntool/trailfit.c

@@ -148 +148 @@
    }
 
+/* Burn extends all the way to the top */
    if(up && y1 >= ny-1) {
       box->slope = -1.0;
-      box->nfit = xe - xs + 1;
       box->fiterr = FIT_TOP_ERROR;
+/* No fit here because the burn is to top, but the persist may be fitable */
+      if(box->sy > FIT_EDGE) {
+         box->nfit = xe - xs + 1;
+/* However, if burn extends to bottom, persist will not be able to fit */
+      } else {
+         box->nfit = 1;         /* Just enough to keep it alive */
+         box->func = BURN_BLASTED;
+      }
       return(0);
    }