JWS-112 Bumping version of Mafft to version 7.310.
[jabaws.git] / binaries / src / mafft / core / iteration.c
index b24875b..f16aed9 100644 (file)
@@ -54,7 +54,7 @@ static void Writeoptions( FILE *fp )
 
 
 
-char **align0( float *wm, char **aseq, char *seq, double effarr[M], int icyc, int ex )
+char **align0( double *wm, char **aseq, char *seq, double effarr[M], int icyc, int ex )
 {
     char **result;
 
@@ -121,7 +121,7 @@ int iteration( int locnjob, char name[M][B], int nlen[M], char **aseq, char **bs
 #endif
        int cyc[2];
        char shindou = 0;
-       float wm;
+       double wm;
        int returnvalue;
 
     for( i=0; i<locnjob; i++ ) 
@@ -187,7 +187,7 @@ int iteration( int locnjob, char name[M][B], int nlen[M], char **aseq, char **bs
        sss[1] = 0;
        sss[0] = locnjob-1;
 /*
-       sss[0] = (int)( (float)locnjob/2.0 );
+       sss[0] = (int)( (double)locnjob/2.0 );
 */
        ou = 1;
        cyc[0] = 0; cyc[1] = 0;