Hopfield networks; checks errors in current state vs patterns

compare_state_errors.c

static VALUE hopfield_calculate_state_errors(VALUE self, VALUE state, VALUE patterns) {
  // Compare state to patterns and calculate errors for each pattern
  int patterns_count = (int) RARRAY_LEN(patterns);
  int pattern_length = (int) RARRAY_LEN(state);
  
  VALUE errors = rb_ary_new2(patterns_count);
  
  for(int p = 0; p < patterns_count; p++) {
    int sum = 0;
    
    for(int c = 0; c < pattern_length; c++) {
      int state_value = FIX2INT(rb_ary_entry(state, c));
      int pattern_value = FIX2INT(rb_ary_entry(rb_ary_entry(patterns, p), c));
      if (pattern_value != state_value)
        sum++;
    }
    
    rb_ary_push(errors, INT2FIX(sum));
  }
  
  return errors;
}