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
64
65
66
67
68
69
|
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
64
|
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
-
-
+
+
-
-
-
-
+
-
|
if length(known)<2 # Invalid
known = " ";
endif
if length(Name)>0
cbg = mtt_cbg(Name); # Structure for this subsystem
endif
if struct_contains (cbg, "ports")
## Combine ports with the other subsystems
for [component_structure, component] = cbg.ports
eval(sprintf("cbg.subsystems.%s=cbg.ports.%s;",component,component));
endfor
endif
## Aliasing
if length(name)>0
endif
## Call to a subsystem (represented by name="")
if strcmp(name,"")
|