%
%	These are data types and constants that are global to 
%	all procedures in our search program.
%
const N := 1000

type namelist:
	array 1..N of string