/*
 *  $Id: NetExit.c 1.1 1995/03/20 23:40:05 daltern Exp $
 */

#include "Neural.h"

void NetExit( NET *netI, VECTOR *vecS, float **Node, float ***Weight, 
                                                     float ***Delta_weight )

{

  register int i, j;

  FREE2D(vecS->InVec,MAX_VECS);
  FREE2D(vecS->OutVec,MAX_VECS);
  FREE3D(Weight,(netI->NumLayers-1),(netI->LayerSize[i]));
  FREE3D(Delta_weight,(netI->NumLayers-1),(netI->LayerSize[i]+1));

  for ( i = 1; i < netI->NumLayers; i++ ) {
	free(Node[i]); 
  }   /* end for i */
  free(Node);

  free(netI->LayerSize);

  exit(0);

}   /* end function NetExit */