Index: mttroot/mtt/bin/trans/m/alias_args.m
==================================================================
--- mttroot/mtt/bin/trans/m/alias_args.m
+++ mttroot/mtt/bin/trans/m/alias_args.m
@@ -3,10 +3,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.9  2009/11/02 16:54:03  geraint
+## Replaced deprecated functions from Octave 2.1 for Octave 3.0: is_struct -> isstruct, struct_contains -> isfield, struct_elements -> fieldnames, is_complex -> iscomplex, setstr -> char
+##
 ## Revision 1.8  2001/06/13 16:07:15  gawthrop
 ## Fixed bug with three separators in a row eg )/(
 ##
 ## Revision 1.7  2001/06/13 14:50:15  gawthrop
 ## Operator ^ now ok in args in abg and/or lbl
@@ -35,11 +38,11 @@
 ##
 ###############################################################
 
   if isstruct(alias)
     if !isempty(args)
-      Args = split(args,delim); args="";
+      Args = char(strsplit(args,delim)); args="";
       [N,M]= size(Args);
       for i=1:N
         arg = deblank(Args(i,:));
         arg_ = strrep(arg,",","__");
         if isfield(alias,arg_)

Index: mttroot/mtt/bin/trans/m/mtt_name2names.m
==================================================================
--- mttroot/mtt/bin/trans/m/mtt_name2names.m
+++ mttroot/mtt/bin/trans/m/mtt_name2names.m
@@ -5,8 +5,8 @@
   ## Converts standard mtt name to an array of subsystem names
 
   ## Copyright (C) 2003 by Peter J. Gawthrop
 
   delim ="__";			# MTT delimiter
-  names = split(name,delim);
+  names = char(strsplit(name,delim));
 
 endfunction

Index: mttroot/mtt/bin/trans/m/mtt_resolve_cr.m
==================================================================
--- mttroot/mtt/bin/trans/m/mtt_resolve_cr.m
+++ mttroot/mtt/bin/trans/m/mtt_resolve_cr.m
@@ -9,26 +9,29 @@
   ###############################################################
   ## Version control history
   ###############################################################
   ## $Id$
   ## $Log$
+  ## Revision 1.2  2003/03/24 12:20:28  gawthrop
+  ## *** empty log message ***
+  ##
   ## Revision 1.1  2003/03/24 10:19:42  gawthrop
   ## Documentation added
   ##
   ###############################################################
 
   ## Temporary version to resolve lin only!
 
   ## How many equations here?
   N = length(findstr(eqn,"="));
-  EQNS = split(eqn,";");
+  EQNS = char(strsplit(eqn,";"));
 
   eqn = "";
   for i = 1:N
       
       ## Split equation
-      EQN = split(EQNS(i,:),":=");
+      EQN = char(strsplit(EQNS(i,:),":="));
       LHS = deblank(EQN(1,:));
       RHS = deblank(EQN(2,:));
 
       if index(RHS,"lin(")>0	# lin cr is here