with Ada.Float_Text_IO;
procedure Idatzi_Erreala (N : in Float) is
   -- Aurrebaldintza:
   --    N (zenb. erreala)
   -- Postbaldintza:
   --    G = <N>
begin
   Ada.Float_Text_IO.Put (Item => N);
end Idatzi_Erreala;
