with Test_Bits_of_Doubles;

procedure ts_dblbits is

-- DESCRIPTION :
--   Test to get the fraction and the exponent from a double,
--   the equivalent constructions of frexp() and ldexp() in C.

begin
  Test_Bits_of_Doubles.Main;
end ts_dblbits;
