with Test_PentDobl_QRLS_Solvers;

procedure ts_pdqrd is

-- DESCRIPTION :
--   Calls the main interactive test on the QR Decomposition and
--   the least squares solver in penta double precision.

begin
  Test_PentDobl_QRLS_Solvers.Main;
end ts_pdqrd;
