4671821611e6492a96402d737ec71bcc508c42f9
[scilab.git] / scilab / modules / cacsd / tests / unit_tests / freson.tst
1 //<-- CLI SHELL MODE -->
2 // =============================================================================
3 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
4 // Copyright (C) 2010 - 2016 - INRIA - Serge Steer
5 //
6 //  This file is distributed under the same license as the Scilab package.
7 // =============================================================================
8 h=syslin("c",-1+%s,(3+2*%s+%s^2)*(50+0.1*%s+%s^2));
9 fr=freson(h);
10 assert_checkalmostequal(fr,[0.26162097704;1.12527981797]);
11
12
13 hd=dscr(h,0.05);
14 fr=freson(hd);
15 assert_checkalmostequal(fr,[0.26155702493;1.12527923264]);