Overview
Comment:Fixed error message
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: cacc8a5875e5708cc6e998f66b707312c00474fc2295aa9d3b4a67e63891745f
User & Date: gawthrop@users.sourceforge.net on 2003-03-14 14:03:28
Other Links: branch diff | manifest | tags
Context
2003-03-14
14:19:04
Initial aliasing code - but need to pass cbg via arg list check-in: 50b3a5acb6 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
14:03:28
Fixed error message check-in: cacc8a5875 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:49:50
Reads the cbg data structure form a file check-in: 772b1cdd4e user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/mtt_cbg.m from [7f6f970f07] to [d685c05ad4].

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
function cbg = mtt_cbg (name)

  ## usage:  cbg = mtt_cbg (name)
  ##
  ## Gets the cbg (causal bond graph) structure for system name
  ## Copyright (C) 2003 by Peter J. Gawthrop


  ## File name   
  cbg_file = sprintf("%s_cbg",name);

  if (exist(cbg_file)==0)
    error(sprintf("mtt_component_eqn: subystem \"%s\" does not exist", name));
  endif
  
  ## Subsystem data structure
  cbg = eval(sprintf("%s;", cbg_file));

endfunction












|






1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
function cbg = mtt_cbg (name)

  ## usage:  cbg = mtt_cbg (name)
  ##
  ## Gets the cbg (causal bond graph) structure for system name
  ## Copyright (C) 2003 by Peter J. Gawthrop


  ## File name   
  cbg_file = sprintf("%s_cbg",name);

  if (exist(cbg_file)==0)
    error(sprintf("mtt_cbg: subsystem \"%s\" does not exist", name));
  endif
  
  ## Subsystem data structure
  cbg = eval(sprintf("%s;", cbg_file));

endfunction


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]