e998b740a7579a4f21b023e155c34cdd937864c1
[scilab.git] / scilab / modules / xcos / tests / unit_tests / xcos_simulate.tst
1 // ============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2016 - Scilab Enterprises - Paul Bignier
4 // Copyright (C) 2014 - Scilab Enterprises - Bruno JOFRET
5 //
6 //  This file is distributed under the same license as the Scilab package.
7 // ============================================================================
8 //
9 // <-- XCOS TEST -->
10
11 // Load diagram as mlist
12 load(SCI+"/modules/xcos/tests/unit_tests/SimpleGENSINExport.sod");
13 assert_checkequal(type(scs_m), 17);
14
15 [%cpr, ok] = xcos_simulate(scs_m, 4);
16
17 assert_checktrue(ok);
18 assert_checkequal(data.time, (0:0.1:29.9)');
19 assert_checkequal(data.values, sin(data.time));
20
21 load(SCI+"/modules/xcos/tests/unit_tests/SimpleGENSINSCOPE.sod");
22 assert_checkequal(type(scs_m), 17);
23
24 [%cpr, ok] = xcos_simulate(scs_m, 4);
25 assert_checkfalse(ok); // Cannot use scope in without graphics
26
27
28 // Load diagram as userType
29 load(SCI+"/modules/xcos/tests/unit_tests/SimpleGENSINExport2.sod");
30 assert_checkequal(type(scs_m), 128);
31
32 [%cpr, ok] = xcos_simulate(scs_m, 4);
33
34 assert_checktrue(ok);
35 assert_checkequal(data.time, (0:0.1:29.9)');
36 assert_checkequal(data.values, sin(data.time));
37
38 load(SCI+"/modules/xcos/tests/unit_tests/SimpleGENSINSCOPE2.sod");
39 assert_checkequal(type(scs_m), 128);
40
41 [%cpr, ok] = xcos_simulate(scs_m, 4);
42 assert_checkfalse(ok); // Cannot use scope without graphics