Changeset 386

Timestamp:

08/19/08 19:40:12 (3 months ago)

Author:

powell

Message:

One more refining step, better loop_max considering refining, better T

Files:

• trunk/matml/src/ternary/ternary.c (modified) (2 diffs)

trunk/matml/src/ternary/ternary.c

@@ -28 +28 @@
 int main (int argc, char *argv[])
 {
-  int i,j, index, loop_max=50, numpoints, *verts, hullnumverts,*hullverts=NULL;
+  int i,j, index, loop_max=20, numpoints, *verts, hullnumverts,*hullverts=NULL;
   char gv_version[100];
   FILE *pfd = NULL;
-  double T=0.75, P=1.;
+  double T=0.7, P=1.;
   ternary_point *points;
   /* eparams: R,T0, G1@T0,G2,G3, C1,C2,C3, M1,M2,M3, O12,O13,O23,O123 */
@@ -87 +87 @@
   if (i=hullCalculate (3, points, numpoints))
     { printf ("main: Error %d in hullCalculate\n", i); exit (i); }
+  if (i=hullRefine (&points, &numpoints, allparams, 2, T, P,
+                    1e-10, 1e-7, 0))
+    { printf ("main: error %d in hullRefine\n", i); exit (i); }
   if (i=hullRefine (&points, &numpoints, allparams, 2, T, P,
                     1e-10, 1e-7, 0))