[31m--------------------------------------------------------------------------------------------------------------------------------------------------------------[m
[31m-- Gnostic is Ada Generic Neural Object System Engineering.                                                                                                --[m
[31m-- Gnostic (C) Copyright 2016 Manuel De Girardi.                                                                                                           --[m
[31m--------------------------------------------------------------------------------------------------------------------------------------------------------------[m
  
[31m--------------------------------------------------------------------------------------------------------------------------------------------------------------[m
[31m-- Date        := 2016-11-27 19:33:08 ; [m
[31m-- Description : Ada Generic Neural Object System Engineering.                                                                                              --[m
[31m-- Version     := 2016.12.1a ; [m
[31m-- Authors     : Manuel De Girardi.                                                                                                                         --[m
[31m--------------------------------------------------------------------------------------------------------------------------------------------------------------[m
[01;34mpackage[m [01;34mbody[m Gnos[31m.[mEngineering [01;34mis[m

	[01;34mprocedure[m Initialize

		[31m([m
			Data [31m:[m [01;34min[m [01;34mout[m Data_Class[31m;[m
			Project [31m:[m [01;34min[m Gnose_Project_Type
		[31m)[m [01;34mis[m
	[01;34mbegin[m
		Data[31m.[mProject [31m:=[m
			[01;34mnew[m Gnose_Project_Type '

				[31m([mProject[31m);[m
	[01;34mend[m Initialize[31m;[m

[01;34mend[m Gnos[31m.[mEngineering[31m;[m
