Changeset 5448 for trunk/Ohana/src/opihi/dvo/gcat.c
- Timestamp:
- Oct 27, 2005, 10:38:30 AM (21 years ago)
- File:
-
- 1 edited
-
trunk/Ohana/src/opihi/dvo/gcat.c (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/opihi/dvo/gcat.c
r3462 r5448 3 3 int gcat (int argc, char **argv) { 4 4 5 int i, Nregions; 6 RegionFile *regions; 7 char filename[128]; 5 int i; 8 6 struct stat filestat; 9 7 double Ra, Dec, Radius; 8 SkyTable *sky; 9 SkyList *skylist; 10 10 char catdir[256]; 11 11 … … 17 17 } 18 18 19 /* load sky from correct table */ 20 sky = SkyTableLoadOptimal (CATDIR, SKY_TABLE, GSCFILE, -1, VERBOSE); 21 SkyTableSetFilenames (sky, CATDIR, "cpt"); 22 19 23 Ra = atof (argv[1]); 20 24 Dec = atof (argv[2]); … … 24 28 Radius = 0.0001; 25 29 26 regions = find_regions (Ra, Dec, Radius, &Nregions);30 skylist = SkyListByRadius (sky, -1, Ra, Dec, Radius); 27 31 28 for (i = 0; i < Nregions; i++) { 29 sprintf (filename, "%s/%s", catdir, regions[i].name); 30 if (stat (filename, &filestat) != -1) { 32 for (i = 0; i < skylist[0].Nregions; i++) { 33 if (stat (skylist[0].regions[i][0].filename, &filestat) != -1) { 31 34 fprintf (stderr, "%3d %s *\n", i, regions[i].name); 32 35 } else { … … 37 40 38 41 return (TRUE); 39 free (regions); 40 42 SkyListFree (regions); 41 43 } 42
Note:
See TracChangeset
for help on using the changeset viewer.
