Equivalente a: Target := To_Unbounded_String (Source);
Para utilizarla hay que incluir la librería Ada.Strings.Unbounded).
procedure Set_Unbounded_String (Target : out Unbounded_String; Source : in String);
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded; ... Din : Unbounded_String; ... Set_Unbounded_String (Din, "Universidad de Las Palmas de Gran Canaria");