Changeset 19215

Timestamp:

Aug 26, 2008, 11:12:27 AM (18 years ago)

Author:

Paul Price

Message:

Need to add 1 to convert C --> Fortran/FITS.

File:

• trunk/ppStack/src/ppStackSources.c (modified) (1 diff)

trunk/ppStack/src/ppStackSources.c

@@ -480 +480 @@
             source->psfMag > SOURCE_FAINTEST; // Is this a bad source?
 
-        fprintf(file, "image; circle(%f,%f,%f) # color = %s\n", x, y, radius, bad ? badColour : goodColour);
+        fprintf(file, "image; circle(%f,%f,%f) # color = %s\n", x + 1.0, y + 1.0, radius,
+                bad ? badColour : goodColour);
     }
     fclose(file);