summaryrefslogtreecommitdiff
path: root/modules/scicos/tests/unit_tests/scicos.dia.ref
blob: 3f28b2517df73c9a72eb240d61dc321e8ad3c2a0 (plain)
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