IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 40520 for trunk


Ignore:
Timestamp:
Aug 21, 2018, 4:28:33 PM (8 years ago)
Author:
eugene
Message:

small fixes to the UKIRT addstar code to make it work

Location:
trunk/Ohana/src/addstar
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/addstar/include/addstar.h

    r39162 r40520  
    327327void saveMosaicCoords (Coords *input);
    328328
    329 Catalog *ReadStarsUKIRT (FILE *f, char *name, Header *header, Image *images, off_t *nimages);
    330 Catalog *LoadDataUKIRT (FILE *f, char *file, Image **images, off_t *nimages, Header **headers, off_t *extsize, HeaderSet *headerSets, off_t NheaderSets);
     329Catalog *ReadStarsUKIRT (FILE *f, char *name, Header *header, Image *images, off_t *nimages, SkyRegion *region);
     330Catalog *LoadDataUKIRT (FILE *f, char *file, Image **images, off_t *nimages, Header **headers, off_t *extsize, HeaderSet *headerSets, off_t NheaderSets, SkyRegion *region);
    331331
    332332AddstarFile *LoadFilenames (int *nfile, char *filename, AddstarClientOptions *options);
  • trunk/Ohana/src/addstar/src/LoadDataUKIRT.c

    r38553 r40520  
    66int MergeCatalogs (Catalog *tgt, Catalog *src);
    77
    8 Catalog *LoadDataUKIRT (FILE *f, char *imagename, Image **images, off_t *nimages, Header **headers, off_t *extsize, HeaderSet *headerSets, off_t NheaderSets) {
     8Catalog *LoadDataUKIRT (FILE *f, char *imagename, Image **images, off_t *nimages, Header **headers, off_t *extsize, HeaderSet *headerSets, off_t NheaderSets, SkyRegion *region) {
    99
    1010  off_t Nskip, Nvalid, NVALID;
     
    4141    fseeko (f, Nskip, SEEK_SET);
    4242
    43     Catalog *newcat = ReadStarsUKIRT (f, imagename, headers[Nhead], images[0], &Nvalid);
     43    Catalog *newcat = ReadStarsUKIRT (f, imagename, headers[Nhead], images[0], &Nvalid, region);
    4444    MergeCatalogs (catalog, newcat);
    4545
  • trunk/Ohana/src/addstar/src/LoadStars.c

    r39273 r40520  
    7777    // if these are SDSS data, load with SDSS-specific wrapper
    7878    if (headerSets[0].exttype && !strcmp (headerSets[0].exttype, "UKIRT_OBJ")) {
    79       newcat = LoadDataUKIRT (f, file[i].imagename, images, Nimages, headers, extsize, headerSets, NheaderSets);
     79      newcat = LoadDataUKIRT (f, file[i].imagename, images, Nimages, headers, extsize, headerSets, NheaderSets, &region);
    8080      goto next_file;
    8181    }
  • trunk/Ohana/src/addstar/src/ReadStarsUKIRT.c

    r40291 r40520  
    88// given a file with the pointer at the start of the table block and the
    99// corresponding image header, load the stars from the table
    10 Catalog *ReadStarsUKIRT (FILE *f, char *imagename, Header *header, Image *images, off_t *nimages) {
     10Catalog *ReadStarsUKIRT (FILE *f, char *imagename, Header *header, Image *images, off_t *nimages, SkyRegion *region) {
    1111
    1212  off_t Nrow;
     
    1414  char type[80];
    1515  FTable table;
    16  
    17   myAbort("need to save the RA,DEC range in a returned SkyRegion (see LoadData)");
     16  float RMIN, RMAX, DMIN, DMAX;
     17 
     18  // myAbort("need to save the RA,DEC range in a returned SkyRegion (see LoadData)");
     19
     20  RMIN = region->Rmin;
     21  RMAX = region->Rmax;
     22  DMIN = region->Dmin;
     23  DMAX = region->Dmax;
    1824
    1925  // the FITS binary table header is the same as the image header
     
    177183    catalog->average[i].Nmeasure      = 1;
    178184    catalog->average[i].measureOffset = i;
     185
     186    // determine the full coverage of this set of measurements
     187    RMIN = MIN (RMIN, catalog->average[i].R);
     188    RMAX = MAX (RMAX, catalog->average[i].R);
     189    DMIN = MIN (DMIN, catalog->average[i].D);
     190    DMAX = MAX (DMAX, catalog->average[i].D);
    179191
    180192    catalog->measure[i].R         = catalog->average[i].R;
     
    210222    catalog->measure[i].imageID   = *nimages; // set imageID to entry for this filter
    211223  }
     224  catalog->Naverage = Nstars;
     225  catalog->Nmeasure = Nstars;
    212226
    213227  if (1) {
     
    272286  // ohana_memcheck (TRUE);
    273287
     288  if (VERBOSE) fprintf (stderr, "stars cover region %f,%f - %f,%f\n", RMIN, DMIN, RMAX, DMAX);
     289
     290  // define containing region a bit generously
     291  region->Rmin = RMIN;
     292  region->Rmax = RMAX;
     293  region->Dmin = DMIN;
     294  region->Dmax = DMAX;
     295
    274296  return (catalog);
    275297}
Note: See TracChangeset for help on using the changeset viewer.