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
|
function alias = SS_alias # Port aliases for SS
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1 1998/07/02 14:37:42 peterg
## Initial revision
##
###############################################################
alias.in = "1";
alias.out = "1";
alias.in1 = "1";
alias.out1 = "1";
alias.in2 = "1,2";
alias.out2 = "1,2";
alias.in3 = "1,2,3";
alias.out3 = "1,2,3";
alias.in4 = "1,2,3,4";
alias.out4 = "1,2,3,4";
alias.in5 = "1,2,3,4,5";
alias.out5 = "1,2,3,4,5";
endfunction
|
>
>
>
|
|
|
<
<
|
<
<
|
<
<
|
<
<
|
|
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
|
function alias = SS_alias # Port aliases for SS
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.2 1998/07/28 19:08:22 peterg
## Some vector aliases added.
##
## Revision 1.1 1998/07/02 14:37:42 peterg
## Initial revision
##
###############################################################
alias.in = "1";
alias.out = "1";
MAX = 10;
value = "1";
for i=1:MAX
eval(sprintf("alias.in%i = \"%s\";", i, value));
eval(sprintf("alias.out%i = \"%s\";", i, value));
value = sprintf("%s,%i",value,i+1);
endfor;
endfunction
|