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;