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