INTERFACE Copyright;

TYPE
  T = {German, English, All};

PROCEDURE Get(t : T) : TEXT;

PROCEDURE Show(t : T);

END Copyright.