unit generic_types;

interface

type
  TThreeStateBoolean = (nbUnset, nbFalse, nbTrue);


implementation

end.