12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
###############################################################
## Version control history
###############################################################
## $Id$
##
## $Log$
# Revision 1.9 1996/12/07 18:21:25 peterg
# Now uses fopen + file number
#
## Revision 1.8 1996/12/05 10:05:28 peterg
## Removed the Octave switch: empty_list_elements_ok = 1;
## This is now in .octaverc
##
|
>
>
>
|
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
###############################################################
## Version control history
###############################################################
## $Id$
##
## $Log$
## Revision 1.10 1997/04/15 09:18:26 peterg
## Added structure file
##
# Revision 1.9 1996/12/07 18:21:25 peterg
# Now uses fopen + file number
#
## Revision 1.8 1996/12/05 10:05:28 peterg
## Removed the Octave switch: empty_list_elements_ok = 1;
## This is now in .octaverc
##
|
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
system_args = '';
full_name = '';
full_name_repetition = '';
% Structure matrix [states,nonstates,inputs,outputs,zero_outputs]
structure = zeros(1,5);
structure = cbg2ese(system_name, system_type, system_cr, ...
system_args, full_name, full_name_repetition, ...
1, structure, structurefilenum, infofilenum);
makedef(structure,deffilenum);
EOF
|
|
|
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
|
system_args = '';
full_name = '';
full_name_repetition = '';
% Structure matrix [states,nonstates,inputs,outputs,zero_outputs]
structure = zeros(1,6);
structure = cbg2ese(system_name, system_type, system_cr, ...
system_args, full_name, full_name_repetition, ...
1, structure, structurefilenum, infofilenum);
makedef(structure,deffilenum);
EOF
|