gcgcheck.c

来自「经典生物信息学多序列比对工具clustalw」· C语言 代码 · 共 16 行

#include <ctype.h>   /* because of toupper() */
int SeqGCGCheckSum(char *seq, int len);

int SeqGCGCheckSum(char *seq, int len)
{
	int  i;
        long check;
        
        for( i=0, check=0; i< len; i++,seq++)
                check += ((i % 57)+1) * toupper(*seq);

        return(check % 10000);
}