IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Mar 9, 2005, 9:23:49 PM (22 years ago)
Author:
eugene
Message:

adding mosaic astrom support

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

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/addstar/Makefile

    r3389 r3402  
    1 #install:
    2 #       @echo "addstar under re-construction"
    31default: addstar
    42help:
    … …  
    3129$(SRC)/ConfigInit.$(ARCH).o \
    3230$(SRC)/conversions.$(ARCH).o \
     31$(SRC)/dump.$(ARCH).o \
    3332$(SRC)/edge_check.$(ARCH).o \
    3433$(SRC)/find_matches.$(ARCH).o \
    … …  
    112111# utilities #################################################
    113112
    114 # install:
     113install:
    115114        for i in $(INSTALL); do make $$i.install; done
    116115
  • trunk/Ohana/src/addstar/include/addstar.h

    r3400 r3402  
    8787
    8888int MODE;
     89char *DUMP;
    8990
    9091time_t TIMEREF;
  • trunk/Ohana/src/addstar/src/addstar.c

    r3376 r3402  
    2424  case M_IMAGE:
    2525    stars = gstars (argv[1], &Nstars, &image);
     26    if ((DUMP != NULL) && !strcmp (DUMP, "rawstars")) dump_rawstars (stars, Nstars);
    2627    regions = gregion_image (&image, &Nregions);
    2728    overlap = gimages (&image, &Noverlap);
  • trunk/Ohana/src/addstar/src/args.c

    r3389 r3402  
    149149    remove_argument (N, &argc, argv);
    150150  }
     151  DUMP = NULL;
     152  if ((N = get_argument (argc, argv, "-dump"))) {
     153    remove_argument (N, &argc, argv);
     154    DUMP = strcreate(argv[N]);
     155    remove_argument (N, &argc, argv);
     156  }
    151157
    152158  if (argc != 2) {
  • trunk/Ohana/src/addstar/src/gstars.c

    r3389 r3402  
    4444    exit (1);
    4545  }
    46   while (image[0].coords.crval1 < 0) image[0].coords.crval1 += 360.0;
    47   while (image[0].coords.crval1 > 360.0) image[0].coords.crval1 -= 360.0;
    4846  itmp = 0;
    4947  fits_scan (&header, "NASTRO",   "%d", 1, &itmp);
    … …  
    5856    }
    5957    RegisterMosaic (MOSAIC);
    60   }   
     58  } else {
     59    /* force image to lie in 0-360 range */
     60    while (image[0].coords.crval1 < 0) image[0].coords.crval1 += 360.0;
     61    while (image[0].coords.crval1 > 360.0) image[0].coords.crval1 -= 360.0;
     62  }
    6163   
    6264  /* get ST (used for airmass calculation) */
Note: See TracChangeset for help on using the changeset viewer.