IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 9038


Ignore:
Timestamp:
Sep 28, 2006, 2:14:03 PM (20 years ago)
Author:
eugene
Message:

adding quiet mode

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/opihi/cmd.astro/coords.c

    r7917 r9038  
    55int coords (int argc, char **argv) {
    66
    7   int mode, N;
     7  int mode, N, Quiet;
    88  double X, Y, R, D;
    99  char *MOSAIC;
     
    1515    remove_argument (N, &argc, argv);
    1616    MOSAIC = strcreate (argv[N]);
     17    remove_argument (N, &argc, argv);
     18  }
     19
     20  Quiet = FALSE;
     21  if ((N = get_argument (argc, argv, "-q"))) {
     22    Quiet = TRUE;
     23    remove_argument (N, &argc, argv);
     24  }
     25  if ((N = get_argument (argc, argv, "-quiet"))) {
     26    Quiet = TRUE;
    1727    remove_argument (N, &argc, argv);
    1828  }
     
    5363  if (mode == SKY) {
    5464    XY_to_RD (&R, &D, X, Y, &coords);
    55     gprint (GP_LOG, "%10.6f %10.6f\n", R, D);
     65    if (!Quiet) gprint (GP_LOG, "%10.6f %10.6f\n", R, D);
    5666    set_variable ("RA", R);
    5767    set_variable ("DEC", D);
     
    6171  if (mode == PIXEL) {
    6272    RD_to_XY (&X, &Y, R, D, &coords);
    63     gprint (GP_LOG, "%7.2f %7.2f\n", X, Y);
     73    if (!Quiet) gprint (GP_LOG, "%7.2f %7.2f\n", X, Y);
    6474    set_variable ("Xc", X);
    6575    set_variable ("Yc", Y);
Note: See TracChangeset for help on using the changeset viewer.