package Test_TripDobl_Vectors is

-- DESCRIPTION :
--   Tests vectors in triple double precision.

  procedure Test_Triple_Double_Vectors;

  -- DESCRIPTION :
  --   Prompts the user for a dimension and writes then
  --   a randomly generated complex vector in triple double precision.

  procedure Test_Triple_Double_Complex_Vectors;

  -- DESCRIPTION :
  --   Prompts for a dimension and generates random complex vectors
  --   in triple double precision.

  procedure Main;

  -- DESCRIPTION :
  --   Displays a menu and prompts for a test.

end Test_TripDobl_Vectors;
