-- -----------------------------------------------------------
-- |                                                          |
-- |               Object Oriented Programming                |
-- |		         (Type extension)                     |
-- |                                                          |
-- -----------------------------------------------------------


-- This example is a more precise definition of the class Clerks through a root class Humans
-- which take advantage


-- Furthermore, the notion of class wide type is strictly related to the concept of polimorphism
-- a paradigm that will be dealt with later on

package Utility is

	function Get_Character return Character;

	function Get_String return String;

	function Get_Integer return Integer;

end Utility;
