Changeset 314

Show
Ignore:
Timestamp:
03/25/08 18:24:18 (8 months ago)
Author:
powell
Message:

Striking vertcolor option, just using it by default.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/matml/src/ternary/ternary.c

    r313 r314  
    1414  char gv_version[100]; 
    1515  FILE *pfd = NULL; 
    16   int i, j, loop_max=50, vertcolor=1; 
     16  int i, j, loop_max=50; 
    1717  coordT Gmin=1.e+100, Gmax=-1.e+100, centerG; 
    1818 
     
    5050  fprintf (pfd, "(geometry \"Ternary Phase Diagram\" { : tpd })"); 
    5151  fprintf (pfd, "(read geometry { define tpd \n"); 
    52   fprintf (pfd, "appearance {}\n%sOFF\n", vertcolor ? "C" : ""); 
     52  fprintf (pfd, "appearance {}\nCOFF\n"); 
    5353  fprintf (pfd, "%d %d 0\n", (loop_max+1)*(loop_max+2)/2, loop_max*loop_max); 
    5454 
     
    8080        z = G; 
    8181 
    82         fprintf (pfd, "%g %g %g", x, z, 1.-y); 
    83         if (vertcolor) 
    84           fprintf (pfd, " %g %g %g 1", 
    85                    RED(Grel(G)), GREEN(Grel(G)), BLUE(Grel(G))); 
    86         fprintf (pfd, "\n"); 
     82        fprintf (pfd, "%g %g %g %g %g %g 1\n", x, z, 1.-y, 
     83                 RED(Grel(G)), GREEN(Grel(G)), BLUE(Grel(G))); 
    8784      } 
    8885 
     
    9390      for (j=0; j<loop_max-1-i; j++) 
    9491        { 
    95           centerG = free_energy (((coordT)i+0.333333)/loop_max, 
    96                                  ((coordT)j+0.333333)/loop_max, 0.); 
    97           fprintf (pfd, "3 %d %d %d", 
     92          fprintf (pfd, "3 %d %d %d\n", 
    9893                   ROWSTART(i)+j, ROWSTART(i)+j+1, ROWSTART(i+1)+j); 
    99           if (!vertcolor) 
    100             fprintf (pfd, " %g %g %g 1", 
    101                      RED(Grel(centerG)), GREEN(Grel(centerG)), 
    102                      BLUE(Grel(centerG))); 
    103           fprintf (pfd, "\n"); 
    104  
    105           centerG = free_energy (((coordT)i+0.666667)/loop_max, 
    106                                  ((coordT)j+0.666667)/loop_max, 0.); 
    107           fprintf (pfd, "3 %d %d %d", 
     94          fprintf (pfd, "3 %d %d %d\n", 
    10895                   ROWSTART(i)+j+1, ROWSTART(i+1)+j, ROWSTART(i+1)+j+1); 
    109           if (!vertcolor) 
    110             fprintf (pfd, " %g %g %g 1", 
    111                      RED(Grel(centerG)), GREEN(Grel(centerG)), 
    112                      BLUE(Grel(centerG))); 
    113           fprintf (pfd, "\n"); 
    11496        } 
    115       centerG = free_energy (((coordT)i+0.333333)/loop_max, 
    116                              ((coordT)j+0.333333)/loop_max, 0.); 
    117       fprintf (pfd, "3 %d %d %d", 
     97      fprintf (pfd, "3 %d %d %d\n", 
    11898               ROWSTART(i)+j, ROWSTART(i)+j+1, ROWSTART(i+1)+j); 
    119       if (!vertcolor) 
    120         fprintf (pfd, " %g %g %g 1", 
    121                  RED(Grel(centerG)), GREEN(Grel(centerG)), 
    122                  BLUE(Grel(centerG))); 
    123       fprintf (pfd, "\n"); 
    12499    } 
    125   centerG = free_energy (((coordT)i+0.333333)/loop_max, 
    126                          0.333333/loop_max, 0.); 
    127   fprintf (pfd, "3 %d %d %d", 
     100  fprintf (pfd, "3 %d %d %d\n", 
    128101           ROWSTART(i), ROWSTART(i)+1, ROWSTART(i+1)); 
    129   if (!vertcolor) 
    130     fprintf (pfd, " %g %g %g 1", 
    131              RED(Grel(centerG)), GREEN(Grel(centerG)), 
    132              BLUE(Grel(centerG))); 
    133   fprintf (pfd, "\n"); 
    134102  fprintf (pfd, "})\n"); 
    135103  fflush (pfd);