with Ada.Containers.Ordered_Sets; package Adafn.Key.Sets is new Ada.Containers.Ordered_Sets (Key.Object);