GetContact: PROC [layer1, layer2: CD.Layer] RETURNS [CD.Object];
-- Create a contact of minimal size; may return the same object
-- on multiple calls; the contact object should be considered
-- to be read-only.
GetBigContact: PROC [size: DABasics.Position, layer1, layer2: CD.Layer] RETURNS [CD.Object];
-- Create a big contact; may return the same object
-- on multiple calls; the contact object should be considered
-- to be read-only.