Diff for /imach/src/imach.c between versions 1.81 and 1.83

version 1.81, 2003/06/05 15:41:51 version 1.83, 2003/06/10 13:39:11
Line 1 Line 1
 /* $Id$  /* $Id$
     $State$
     $Log$
     Revision 1.83  2003/06/10 13:39:11  lievre
     *** empty log message ***
   
     Revision 1.82  2003/06/05 15:57:20  brouard
     Add log in  imach.c and  fullversion number is now printed.
   
   */
   /*
    Interpolated Markov Chain     Interpolated Markov Chain
   
   Short summary of the programme:    Short summary of the programme:
Line 120 Line 130
 #endif  #endif
   
 /* $Id$ */  /* $Id$ */
 /* $Log$  
  * Revision 1.81  2003/06/05 15:41:51  brouard  
  * *** empty log message ***  
  *  
 /* Revision 1.80  2003/06/05 15:34:14  brouard  
 /* Trying to add the true revision in the program and log  
 /*  
 /* Revision 1.79  2003/06/05 15:17:23  brouard  
 /* *** empty log message ***  
 /* */  
 /* $Revision$ */  
 /* $Date$ */  
 /* $State$ */  /* $State$ */
   
 char version[80]="Imach version 0.95a1, June 2003, INED-EUROREVES ";  char version[]="Imach version 0.95a1, June 2003, INED-EUROREVES ";
 char fullversion[]="$Revision$ $Date$";   char fullversion[]="$Revision$ $Date$"; 
 int erreur; /* Error number */  int erreur; /* Error number */
 int nvar;  int nvar;
Line 3003  m=pow(2,cptcoveff); Line 3001  m=pow(2,cptcoveff);
       fprintf(ficgp,"\nset out \"p%s%d%d.png\" \n",strtok(optionfile, "."),cpt,k1);        fprintf(ficgp,"\nset out \"p%s%d%d.png\" \n",strtok(optionfile, "."),cpt,k1);
       fprintf(ficgp,"set xlabel \"Age\" \nset ylabel \"Probability\" \nset ter png small\nset size 0.65,0.65\nplot [%.f:%.f] \"pij%s\" u ($1==%d ? ($3):1/0):($%d/($%d",ageminpar,agemaxpar,fileres,k1,k+cpt+1,k+1);        fprintf(ficgp,"set xlabel \"Age\" \nset ylabel \"Probability\" \nset ter png small\nset size 0.65,0.65\nplot [%.f:%.f] \"pij%s\" u ($1==%d ? ($3):1/0):($%d/($%d",ageminpar,agemaxpar,fileres,k1,k+cpt+1,k+1);
               
       for (i=1; i<= nlstate ; i ++)        for (i=1; i< nlstate ; i ++)
         fprintf(ficgp,"+$%d",k+i+1);          fprintf(ficgp,"+$%d",k+i+1);
       fprintf(ficgp,")) t\"prev(%d,%d)\" w l",cpt,cpt+1);        fprintf(ficgp,")) t\"prev(%d,%d)\" w l",cpt,cpt+1);
               

Removed from v.1.81  
changed lines
  Added in v.1.83


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>