The Complete SPRLIB & ANNLIB

print_c_code

- write the code necessary to evaluate a network to a C file (LOCAL)

SYNOPSIS

ARGUMENTS

RETURNS

FUNCTION

void eval_c_ffnet (input, output)
double *input, *output;
{
  int i,j;

  for (i = 0; i < NR_HUNITS; i++)
  {
    HidActivation[i] = 0.0;
  
    for (j = 0; j < NR_INPUTS; j++)
      HidActivation[i] += InWeights[i][j] * input[j+1];
 
    HidActivation[i] += InWeights[i][NR_INPUTS];

    HidActivation[i] = 1.0 / (1.0 + exp (-1.0 * HidActivation[i]));
  }
 
  for (i = 0; i < NR_OUTPUTS; i++)
  {
    output[i+1] = 0.0;
  
    for (j = 0; j < NR_HUNITS; j++)
      output[i+1] += OutWeights[i][j] * HidActivation[j];

    output[i+1] += OutWeights[i][NR_HUNITS];

    output[i+1] = 1.0 / (1.0 + exp (-1.0 * output[i+1]));
  }
}

The written function, eval_c_ffnet, expects a vector of input values and returns a vector of output values.

SEE ALSO