gcgcheck.c

来自「在任务级并行平台P2HP上」· 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);
}