Changeset 7917 for trunk/Ohana/src/opihi/cmd.data/vgauss.c

Timestamp:

Jul 16, 2006, 10:58:49 PM (20 years ago)

Author:

eugene

Message:

major updates to use gprint for buffered / threaded printing

File:

• trunk/Ohana/src/opihi/cmd.data/vgauss.c (modified) (4 diffs)

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

@@ -7 +7 @@
   c = get_variable (A); \
   if (c == NULL) { \
-    fprintf (stderr, "missing fit parameter A\n"); \
+    gprint (GP_ERR, "missing fit parameter A\n"); \
     return (FALSE); \
   } \
@@ -31 +31 @@
 
   if (argc != 5) {
-    fprintf (stderr, "USAGE: vgauss <x> <y> <dy> (out)\n");
-    fprintf (stderr, " uses guesses: C0 (mean), C1 (sigma), C2 (norm), C3 (sky)\n");
+    gprint (GP_ERR, "USAGE: vgauss <x> <y> <dy> (out)\n");
+    gprint (GP_ERR, " uses guesses: C0 (mean), C1 (sigma), C2 (norm), C3 (sky)\n");
     return (FALSE);
   }
@@ -64 +64 @@
     dchisq = ochisq - chisq;
     ochisq = chisq;
-    if (!Quiet) fprintf (stderr, "dchisq: %f, Ndof: %d\n", dchisq, Npts - Npar);
+    if (!Quiet) gprint (GP_ERR, "dchisq: %f, Ndof: %d\n", dchisq, Npts - Npar);
   }  
-  if (!Quiet) fprintf (stderr, "%d iterations\n", i); 
+  if (!Quiet) gprint (GP_ERR, "%d iterations\n", i); 
 
   for (i = 0; i < Npts; i++) {
@@ -79 +79 @@
     sprintf (name, "C%d", i);
     set_variable (name, par[i]);
-    if (!Quiet) fprintf (stderr, "%d  %f  %f\n", i, par[i], sqrt(covar[i][i]));
+    if (!Quiet) gprint (GP_ERR, "%d  %f  %f\n", i, par[i], sqrt(covar[i][i]));
     sprintf (name, "dC%d", i);
     set_variable (name, sqrt(covar[i][i]));