comp_err.c

C-package of "Long Short-Term Memory" for Protein classification

/*
 * $Id: comp_err.c 1269 2007-05-09 07:49:08Z mhe $
 */
 
#include <math.h>
#include <stdio.h>

#include "lstm.h"
#include "roc.h"
#include "comp_err.h"

void comp_err(double out, struct seqperf *sp) {
  
  double err = 0;
  
  
  err +=  error[0] * error[0];
  
  seq_err+=err;
  epoch_err+=err;

  
  if ((seq_cor==1)&&(fabs(error[0]) > fabs(targetvalue0 - targetvalue1)/2)) { 
  
    seq_cor=0;
    if (ispos) { 
        class_err++;
    }
    else {
        classnon_err++;
    }

  }
  
  (*sp).target = ispos;
  (*sp).out = out;    

}