Changeset 7917 for trunk/Ohana/src/opihi/lib.data/mrqmin.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/lib.data/mrqmin.c (modified) (2 diffs)

trunk/Ohana/src/opihi/lib.data/mrqmin.c

@@ -72 +72 @@
   chisq = mrqcof (x, y, dy, Npts, partry, Npar, talpha, tbeta, funcs);
   if (VERBOSE) { 
-    fprintf (stderr, "chisq: %f  ", chisq);
-    fprintf (stderr, "lambda: %f  ", lambda);
+    gprint (GP_ERR, "chisq: %f  ", chisq);
+    gprint (GP_ERR, "lambda: %f  ", lambda);
     for (j = 0; j < Npar; j++) {
-      fprintf (stderr, "%f ", partry[j]);
+      gprint (GP_ERR, "%f ", partry[j]);
     }
-    fprintf (stderr, "\n");
+    gprint (GP_ERR, "\n");
   }
 
@@ -125 +125 @@
   ochisq = mrqcof (x, y, dy, Npts, par, Npar, alpha, beta, funcs);
   if (VERBOSE) {
-    fprintf (stderr, "chisq: %f  ", ochisq);
-    fprintf (stderr, "lambda: %f  ", lambda);
+    gprint (GP_ERR, "chisq: %f  ", ochisq);
+    gprint (GP_ERR, "lambda: %f  ", lambda);
     for (i = 0; i < Npar; i++) {
-      fprintf (stderr, "%f ", par[i]);
+      gprint (GP_ERR, "%f ", par[i]);
     }
-    fprintf (stderr, "\n");
+    gprint (GP_ERR, "\n");
   }
   return (ochisq);