[scicos] dia.ref updated
[scilab.git] / scilab / modules / scicos / tests / unit_tests / scicos.dia.ref
1 //<-- CLI SHELL MODE -->
2 // =============================================================================
3 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
4 // Copyright (C) ????-2008 - INRIA
5 //
6 //  This file is distributed under the same license as the Scilab package.
7 // =============================================================================
8 if exists("scicos_scicoslib") == 0 then
9     load("SCI/modules/scicos/macros/scicos_scicos/lib");
10 end
11 if exists("scicos_utilslib") == 0 then
12     load("SCI/modules/scicos/macros/scicos_utils/lib");
13 end
14 if or(~isdef(["modelica_libs" "scicos_pal_libs"])) then
15     [modelica_libs, scicos_pal_libs, %scicos_with_grid, %scs_wgrid] = initial_scicos_tables()
16 end
17  modelica_libs  = 
18          column 1
19   "SCI/modules/scicos_blocks/macros/Electrical"
20          column 2
21   "SCI/modules/scicos_blocks/macros/Hydraulics"
22  scicos_pal_libs  = 
23          column 1 to 6
24   "Branching"  "Events"  "Misc"  "Sinks"  "Threshold"  "Linear"
25          column 7 to 12
26   "MatrixOp"  "NonLinear"  "Sources"  "Electrical"  "Hydraulics"  "PDE"
27          column 13
28   "IntegerOp"
29  %scicos_with_grid  = 
30   F
31  %scs_wgrid  = 
32    10.
33    10.
34    12.
35 exec(loadpallibs,-1)
36 exec("SCI/modules/scicos/tests/unit_tests/scicos_tests.sci");
37 options = default_options();
38 //build the block set
39 blockslib = "scs" + ["Branching" "Events" "Misc" "Sinks" "Threshold" "Linear" ...
40 "NonLinear" "Sources" "Electrical" "Hydraulics"] + "lib";
41 Blocs = [];
42 for blocklib=blockslib
43     B = string(blocklib);
44     Blocs = [Blocs; B(2:$)];
45 end
46 Blocs(Blocs=="m_sin") = [];
47 nb = size(Blocs, 1);
48 assert_checkfalse(checkdefine());
49 assert_checkfalse(checkinputs());
50 assert_checkfalse(checkoutputs());
51 assert_checkfalse(checkorigin());
52 assert_checkfalse(checkdeput());
53 assert_checkfalse(checkfiring());
54 assert_checkfalse(check_define_ports());
55 assert_checkfalse(check_set_ports());