


tests utp_ltpda_ss_make %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: tests utp_ltpda_ss_make. Numerical tests are done for the subfunction. Only syntaxic tests here. CALL: utp_ltpda_ss_make INPUTS: 1/0 ***** THERE ARE NO DEFAULT PARAMETERS ***** VERSION: $Id: utp_ltpda_ss_make.m,v 1.2 2008/02/20 09:20:07 adrien Exp $ HISTORY: 22-01-2008 A Grynagier Creation 02-01-2008 A Grynagier TO DO : syntaxic tests for making a plist system out of a pzmodel %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


0001 function result = utp_ltpda_ss_make 0002 % tests utp_ltpda_ss_make 0003 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0004 % 0005 % DESCRIPTION: tests utp_ltpda_ss_make. Numerical tests are done for 0006 % the subfunction. Only syntaxic tests here. 0007 % 0008 % CALL: utp_ltpda_ss_make 0009 % 0010 % INPUTS: 1/0 0011 % 0012 % ***** THERE ARE NO DEFAULT PARAMETERS ***** 0013 % 0014 % VERSION: $Id: utp_ltpda_ss_make.m,v 1.2 2008/02/20 09:20:07 adrien Exp $ 0015 % 0016 % HISTORY: 22-01-2008 A Grynagier 0017 % Creation 02-01-2008 A Grynagier 0018 % 0019 % TO DO : syntaxic tests for making a plist system out of a pzmodel 0020 % 0021 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0022 display(['starting ' mfilename]); 0023 result = 1; 0024 % try 0025 %% out of a iir 0026 display('iir part') 0027 f = miir(plist('type', 'bandpass','fs', 1000,'fc', [50 100],'order', 3,'gain',2,'ripple',0.7)); 0028 syst1 = ltpda_ss_make(f); 0029 0030 %% out of a pz model 0031 display('pz part') 0032 pzm = pzmodel(1,pole(2/2/pi,1) , [zero(-1/2/pi) zero(-2/2/pi) ]); 0033 syst2 = ltpda_ss_make(pzm); 0034 0035 %% out of a file 0036 display('file part') 0037 fname = 'System_Noise_TMact'; 0038 fname = 'Y_N_TMact'; 0039 syst3 = ltpda_ss_make(fname); 0040 % catch 0041 % result = 0; 0042 % end 0043 display(result) 0044 0045 0046 0047 0048 0049 0050 end