with Types; use Types;
package Customers is
------------------------------------------------------------------------
--| Customer package for bank siumulation. Each customer is
--| a task object.
--| Author: Michael B. Feldman, The George Washington University 
--| Last Modified: January 1996                                     
------------------------------------------------------------------------

    task type Customer is  -- Requestor task type, no entries
    end Customer;

    CustomerGroup : array (1 .. NumberOfCustomers) of Customer;
    
end Customers;