Changeset 477

Timestamp:

10/05/2009 07:46:36 PM (3 years ago)

Author:

powell

Message:

New debugging output for geomview.

Files:

• trunk/matml/src/ternary/geomview.c (modified) (1 diff)

trunk/matml/src/ternary/geomview.c

@@ -205 +205 @@
   fprintf (geompipe, "%d %d 0\n", npoints, theboundary->n_edges);
 
+#ifdef DEBUG
+  printf ("(geometry \"%s\" { : %s })\n", name, label);
+  printf ("(read geometry { define %s \n", label);
+  printf ("appearance { %s }\nCOFF\n", appearance);
+  printf ("%d %d 0\n", npoints, theboundary->n_edges);
+#endif
+
   for (i=0; i<npoints; i++)
-    fprintf (geompipe, "%g %g %g %g %g %g %g\n", points[i].x, points[i].y,
-             points[i].z, points[i].red, points[i].green, points[i].blue,
-             points[i].alpha);
-
+    {
+      fprintf (geompipe, "%g %g %g %g %g %g %g\n", points[i].x, points[i].y,
+               points[i].z, points[i].red, points[i].green, points[i].blue,
+               points[i].alpha);
+#ifdef DEBUG
+      printf ("%g %g %g %g %g %g %g\n", points[i].x, points[i].y,
+              points[i].z, points[i].red, points[i].green, points[i].blue,
+              points[i].alpha);
+#endif
+    }
   for (i=0; i<theboundary->n_edges; i++)
-    fprintf (geompipe, "3 %d %d %d\n", theboundary->edges [c*i],
-             (c>1) ? theboundary->edges [c*i+1] : theboundary->edges [c*i],
-             (c>2) ? theboundary->edges [c*i+2] : theboundary->edges [c*i]);
+    {
+      fprintf (geompipe, "3 %d %d %d\n", theboundary->edges [c*i],
+               (c>1) ? theboundary->edges [c*i+1] : theboundary->edges [c*i],
+               (c>2) ? theboundary->edges [c*i+2] : theboundary->edges [c*i]);
+#ifdef DEBUG
+      printf ("3 %d %d %d\n", theboundary->edges [c*i],
+              (c>1) ? theboundary->edges [c*i+1] : theboundary->edges [c*i],
+              (c>2) ? theboundary->edges [c*i+2] : theboundary->edges [c*i]);
+#endif
+    }
   fprintf (geompipe, "})\n");
+#ifdef DEBUG
+  printf ("})\n");
+#endif
   fflush (geompipe);