* Bug #13750 fixed - Calling ss2ss function with flag = 2 returned an error.
[scilab.git] / scilab / modules / cacsd / tests / nonreg_tests / bug_13750.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2015 - Scilab Enterprises - Adeline CARNIS
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 // <-- Non-regression test for bug 13750 -->
9 //
10 // <-- Bugzilla URL -->
11 // http://bugzilla.scilab.org/show_bug.cgi?id=13750
12 //
13 // <-- Short Description -->
14 //    Calling ss2ss with flag = 2 returned an error. The variable p was missing.
15 // =============================================================================
16 in=1;m=2;n=2;
17 sys=ssrand(in,m,n);
18 F1=rand(m,n);
19 G=rand(n,in);
20 [sys1,right,left]=ss2ss(sys,rand(n,n),F1,G,2);
21 res=clean(ss2tf(sys1) - ss2tf(left*sysdiag(sys*right,eye(1,1))));
22 assert_checkalmostequal(coeff(res.num), zeros(size(res,"r"), size(res, "c")), [], %eps);