FUNCTION Hash_Division_Integer 
  (K: String; Capacity: Positive) RETURN Natural IS
------------------------------------------------------------------------
--| Division_Integer Hash Function
--| Assumes K is a numeric string
--| Author: Michael B. Feldman, The George Washington University 
--| Last Modified: February 1996                                     
------------------------------------------------------------------------

BEGIN -- Hash_Division_Integer

  RETURN Integer'Value (K) REM Capacity;

END Hash_Division_Integer;