with Test_TripDobl_Singular_Values;

procedure ts_tdsvd is

-- DESCRIPTION :
--   Calls the main interactive test on the Singular Value Decomposition
--   in triple double precision.

begin
  Test_TripDobl_Singular_Values.Main;
end ts_tdsvd;
