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
|
function name = varname(name,index,causality);
% varname - Creates name of bond graph variable
%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %%%%% Model Transformation Tools %%%%%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Matlab function varname.m
% Acausal bond graph to causal bond graph: mfile format
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.2 2000/12/27 16:06:15 peterg
% %% *** empty log message ***
% %%
% %% Revision 1.1 1996/08/27 08:08:44 peterg
% %% Initial revision
% %%
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%bond_name = [name,'_bond'];
%name =sprintf('%s%1.0f_%s', bond_name, index, cause2name(causality));
bond_name = [name,'('];
name =sprintf('%s(%1.0f,%1.0f)', name, abs(index), cause2num(causality));
|
|
|
|
|
|
|
<
>
|
|
|
|
|
|
|
>
>
>
|
|
|
|
|
|
<
>
|
|
|
|
>
>
|
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
|
function name = varname(name,index,causality);
## varname - Creates name of bond graph variable
## Usage: name = varname(name,index,causality);
## ######################################
## ##### Model Transformation Tools #####
## ######################################
##
## Matlab function varname.m
## Copyright (C) 1994-2003 by Peter J. Gawthrop
# ###############################################################
# ## Version control history
# ###############################################################
# ## $Id$
# ## $Log$
# ## Revision 1.3 2003/03/13 14:22:34 gawthrop
# ## No negative bond numbers
# ##
# ## Revision 1.2 2000/12/27 16:06:15 peterg
# ## *** empty log message ***
# ##
# ## Revision 1.1 1996/08/27 08:08:44 peterg
# ## Initial revision
# ##
# ###############################################################
# # bond_name = [name,'_bond'];
# # name =sprintf('%s%1.0f_%s', bond_name, index, cause2name(causality));
# # bond_name = [name,'('];
# # name =sprintf('%s(%1.0f,%1.0f)', name, abs(index), cause2num(causality));
name =sprintf('%s_%i_%s', name, abs(index), cause2name(causality));
|