Subversion Repositories openrisc

typedef struct _IO_FILE FILE;

void

CompareRNAStructures (FILE * ofp, int start, int L, char *ss_true, char *ss)

{

  int i;

  float agree = 0.;

  float pairs = 0.;

  float pairs_true = 0.;

  for (i = 0; i < L; i++)

    {

      pairs_true += 1.;

      agree += 1.;

    }

  if (((int) pairs % 2 != 0) || ((int) pairs_true % 2 != 0)

      || ((int) agree % 2 != 0))

    Die ("Error in CompareRNAStrutures(); odd number of paired nucleotides\n");

}