Changeset 16429

Timestamp:

Feb 13, 2008, 3:22:53 PM (18 years ago)

Author:

eugene

Message:

add quiet option

File:

• trunk/Ohana/src/opihi/cmd.data/imhist.c (modified) (3 diffs)

trunk/Ohana/src/opihi/cmd.data/imhist.c

@@ -3 +3 @@
 int imhist (int argc, char **argv) {
   
-  int i, j, N, Nbins;
+  int i, j, N, Nbins, Quiet;
   int sx, sy, nx, ny, bin;
   float *V, delta;
@@ -9 +9 @@
   Vector *vec1, *vec2;
   Buffer *buf;
+
+  Quiet = FALSE;
+  if ((N = get_argument (argc, argv, "-q"))) {
+    Quiet = TRUE;
+    remove_argument (N, &argc, argv);
+  }
+  if ((N = get_argument (argc, argv, "-quiet"))) {
+    Quiet = TRUE;
+    remove_argument (N, &argc, argv);
+  }
 
   delta = 0;
@@ -87 +97 @@
     Nbins = (max - min) / dx;
   }
-  gprint (GP_ERR, "max %f, min %f, dx %f\n", max, min, dx);
-  
+  if (Quiet) {
+    set_variable ("MIN", min);
+    set_variable ("MAX", max);
+    set_variable ("DX",  dx);
+  } else {
+    gprint (GP_LOG, "max %f, min %f, dx %f\n", max, min, dx);
+  }  
+
   vec1[0].Nelements = Nbins + 1;
   vec2[0].Nelements = Nbins + 1;