Changeset 4864 for trunk/Ohana/src/uniphot/src/find_image_sgroups.c

Timestamp:

Aug 23, 2005, 8:55:22 PM (21 years ago)

Author:

eugene

Message:

converted to the libohana/dvo_image I/O routines; improvements in fits_db.c

File:

• trunk/Ohana/src/uniphot/src/find_image_sgroups.c (modified) (1 diff)

trunk/Ohana/src/uniphot/src/find_image_sgroups.c

@@ -1 +1 @@
 # include "uniphot.h"
 
-Group *find_image_sgroups (Image *image, ImageLink *imlink, int Nimage, int *Nsgroup) {
+Group *find_image_sgroups (FITS_DB *db, ImageLink *imlink, int *Nsgroup) {
 
-  int i, j, Ngroup, Nentry, NENTRY;
+  int i, j, Nimage, Ngroup, Nentry, NENTRY;
   double r, d, x, y, radius;
   Group *group;
   Coords coords;
-  
+  Image *image;
+
+  image = fits_table_get_Image (&db[0].ftable, &Nimage, &db[0].swapped);
+
   coords.crpix1 = coords.crpix2 = 0.0;
   coords.cdelt1 = coords.cdelt2 = 1.0; /* scale is degrees, radius in degrees */