package ANN_Demo is
---------------------------------------------------------------------------
---------------------------------------------------------------------------
procedure Demo;
procedure Name_Fetch (
	    Name    :    out Name_Type );
procedure Patterns_Load (
	    Name     : in     Name_Type;
	    Patterns :    out Patterns_Type );
procedure Weights_Load (
	    Name    : in     Name_Type;
	    Weights :    out Weights_Type );
procedure Weights_Train (
	    Patterns    : in     Patterns_Type;
	    Weights : in out Weights_Type );
procedure Weights_Save (
	    Name : in     Name_Type;
	    Weights : in     Weights_Type );
---------------------------------------------------------------------------
---------------------------------------------------------------------------
end ANN_Demo;