package GAda.Float_Text_IO is
-- Lit et retourne un réel
function FGet return Float ;
-- Affiche un réel
procedure Put (Aff : in Float) ;
-- Lit un réel (version originale)
procedure Get (Item : out Float) ;
end GAda.Float_Text_IO ;