[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;34mwith[m Ada[31m.[mCalendar[31m;[m
[01;34muse[m Ada[31m.[mCalendar[31m;[m
[01;34mpackage[m Gnos[31m.[mAbstracts [01;34mis[m
	
	[01;34mtype[m String_Access [01;34mis[m [01;34maccess[m [01;34mall[m [32mString[m[31m;[m
	[01;34mtype[m Wide_String_Access [01;34mis[m [01;34maccess[m [01;34mall[m [32mWide_String[m[31m;[m

	[01;34mtype[m Abstract_Project_Type [01;34mis[m [01;34mtagged[m
		[01;34mrecord[m
		   Name [31m:[m string_access[31m;[m
		   Description [31m:[m wide_string_access[31m;[m
		[01;34mend[m [01;34mrecord[m[31m;[m
	
	[01;34mtype[m Abstract_Project_Access [01;34mis[m [01;34maccess[m [01;34mall[m Abstract_Project_Type'Class[31m;[m
	
	[01;34mtype[m Abstract_Data_Type [01;34mis[m [01;34mabstract[m [01;34mtagged[m
		[01;34mrecord[m
			Project [31m:[m Abstract_Project_Access[31m;[m
		[01;34mend[m [01;34mrecord[m[31m;[m
[01;34mend[m Gnos[31m.[mAbstracts[31m;[m
