The Datafile PD-CD 5/DATAFILE_PDCD5.iso/utilities/r/rlab/CTB/Test_new

Text File | 1995-11-15 | 8.7 KB | 529 lines

// ********************************************************
// *                 Master Test Routine                  *
// *                 Version JBL 940924                   *
// ********************************************************

clearall();
//-----------------------------------------------------------------------------
// ******************
// * APPEND Testing *
// ******************

rfile banner

printf("%s"," \n");
banner("Routine: APPEND QA");
printf("%s"," \n");

rfile appendtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * ARE2 Testing *
// ****************
// Ref: MATLAB Control Toolbox Manual
// Ref: Laub, A. J., "A Schur Method for Solving Algebraic Riccati
//      Equations," IEEE Trans. AC-24, 1979, pp. 913-921.

rfile banner

printf("%s"," \n");
banner("Continuous ARE2 QA");
printf("%s"," \n");

rfile are2test

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ******************
// * AREMSF Testing *
// ******************

rfile banner

printf("%s"," \n");
banner("Continuous AREMSF QA");
printf("%s"," \n");

// rfile aremsftest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ********************
// * AUGSTATE Testing *
// ********************

rfile banner

printf("%s"," \n");
banner("AUGSTATE QA");
printf("%s"," \n");

rfile augstatetest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * C2D Testing *
// *****************

rfile banner
rfile c2d

printf("%s"," \n");
banner("C2D QA");
printf("%s"," \n");

// rfile c2dtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * C2DM Testing *
// ****************

rfile banner
rfile c2dm

printf("%s"," \n");
banner("C2DM QA");
printf("%s"," \n");

rfile c2dmtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * CLOOP Testing *
// *****************

rfile banner
rfile cloop

printf("%s"," \n");
banner("CLOOP QA");
printf("%s"," \n");

// rfile clooptest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * CONV Testing *
// ****************

rfile banner
rfile conv

printf("%s"," \n");
banner("CONV QA");
printf("%s"," \n");

rfile convtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * COVAR Testing *
// *****************

rfile banner
rfile covar

printf("%s"," \n");
banner("COVAR QA");
printf("%s"," \n");

// rfile covartest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * CTRB Testing *
// ****************

rfile banner
rfile ctrb

printf("%s"," \n");
banner("CTRB QA");
printf("%s"," \n");

// rfile ctrbtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * DAMP Testing *
// ****************

rfile banner
rfile damp

printf("%s"," \n");
banner("DAMP QA");
printf("%s"," \n");

// rfile damptest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * DARE2 Testing *
// *****************

rfile banner
rfile dare2

printf("%s"," \n");
banner("DARE2 QA");
printf("%s"," \n");

// rfile dare2test

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *******************
// * DAREMSF Testing *
// *******************

rfile banner
rfile daremsf

printf("%s"," \n");
banner("DAREMSF QA");
printf("%s"," \n");

// rfile daremsftest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ******************
// * DCGAIN Testing *
// ******************

rfile banner
rfile dcgain

printf("%s"," \n");
banner("DCGAIN QA");
printf("%s"," \n");

// rfile dcgaintest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ******************
// * DCOVAR Testing *
// ******************

rfile banner
rfile dcovar

printf("%s"," \n");
banner("DCOVAR QA");
printf("%s"," \n");

// rfile dcovartest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * DDAMP Testing *
// *****************

rfile banner
rfile ddamp

printf("%s"," \n");
banner("DDAMP QA");
printf("%s"," \n");

// rfile ddamptest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ******************
// * DECONV Testing *
// ******************

rfile banner
rfile deconv

printf("%s"," \n");
banner("DECONV QA");
printf("%s"," \n");

// rfile deconvtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * DGRAM Testing *
// *****************

rfile banner
rfile dgram

printf("%s"," \n");
banner("DGRAM QA");
printf("%s"," \n");

// rfile dgramtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ********************
// * DINITIAL Testing *
// ********************

rfile banner
rfile dinitial

printf("%s"," \n");
banner("DINITIAL QA");
printf("%s"," \n");

// rfile dinitialtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * DLQR Testing *
// ****************

rfile banner
rfile dlqr

printf("%s"," \n");
banner("DLQR QA");
printf("%s"," \n");

// rfile dlqrtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * DLSIM Testing *
// ****************

rfile banner
rfile dlsim

printf("%s"," \n");
banner("DLSIM QA");
printf("%s"," \n");

// rfile dlsimtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *****************
// * DSTEP Testing *
// *****************

rfile banner
rfile dstep

printf("%s"," \n");
banner("DSTEP QA");
printf("%s"," \n");

// rfile dsteptest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *******************
// * IMPULSE Testing *
// *******************

rfile banner
rfile impulse

printf("%s"," \n");
banner("IMPULSE QA");
printf("%s"," \n");

// rfile impulsetest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// *******************
// * INITIAL Testing *
// *******************

rfile banner
rfile initial

printf("%s"," \n");
banner("INITIAL QA");
printf("%s"," \n");

// rfile initialtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ***************
// * LQR Testing *
// ***************

rfile banner
rfile lqr

printf("%s"," \n");
banner("LQR QA");
printf("%s"," \n");

// rfile lqrtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * LSIM Testing *
// ****************

rfile banner
rfile lsim

printf("%s"," \n");
banner("LSIM QA");
printf("%s"," \n");

// rfile lsimtest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * LYAP Testing *
// ****************

rfile banner
rfile lyap

printf("%s"," \n");
banner("LYAP QA");
printf("%s"," \n");

// rfile lyaptest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ****************
// * STEP Testing *
// ****************

rfile banner
rfile step

printf("%s"," \n");
banner("STEP QA");
printf("%s"," \n");

// rfile steptest

printf("%s"," \n");
pause();
clearall();

//-----------------------------------------------------------------------------
// ********************
// * SSSELECT Testing *
// ********************

rfile banner
rfile ssselect

printf("%s"," \n");
banner("SSSELECT QA");
printf("%s"," \n");

// rfile ssselecttest

printf("%s"," \n");
pause();
clearall();