Summary: Saito's color

diff --git a/src/imach.c b/src/imach.c
index 755a667200a41f267324e5dec7275469aa9242ee..256f6e37568d80c0646b6ba9870af4858546cd94 100644 (file)
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,9 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.274  2017/06/29 09:47:08  brouard
+  Summary: Version 0.99r14
+
   Revision 1.273  2017/06/27 11:06:02  brouard
   Summary: More documentation on projections
 
@@ -7890,12 +7893,12 @@ set ter svg size 640, 480\nunset log y\nplot [%.f:%.f]  ", ageminpar, agemaxpar)
            }
            fprintf(ficgp,")");
            if(ng ==2)
-             fprintf(ficgp," t \"p%d%d\" ", k2,k);
+             fprintf(ficgp," w l lt (%d*%d+%d)%%%d+1 dt %d t \"p%d%d\" ", nlstate+ndeath, k2, k, nlstate+ndeath, k2, k2,k);
            else /* ng= 3 */
-             fprintf(ficgp," t \"i%d%d\" ", k2,k);
+             fprintf(ficgp," w l lt (%d*%d+%d)%%%d+1 dt %d t \"i%d%d\" ",  nlstate+ndeath, k2, k, nlstate+ndeath, k2, k2,k);
          }else{ /* end ng <> 1 */
            if( k !=k2) /* logit p11 is hard to draw */
-             fprintf(ficgp," t \"logit(p%d%d)\" ", k2,k);
+             fprintf(ficgp," w l lt (%d*%d+%d)%%%d+1 dt %d t \"logit(p%d%d)\" ",  nlstate+ndeath, k2, k, nlstate+ndeath, k2, k2,k);
          }
          if ((k+k2)!= (nlstate*2+ndeath) && ng != 1)
            fprintf(ficgp,",");