Mercurial > hg > ltpda
diff m-toolbox/classes/@unit/string.m @ 0:f0afece42f48
Import.
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 23 Nov 2011 19:22:13 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/m-toolbox/classes/@unit/string.m Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,30 @@ +% STRING converts a unit object to a command string which will recreate the unit object. +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% +% DESCRIPTION: STRING converts a unit object to a command string which will +% recreate the unit object. +% +% CALL: cmd = string(u) +% +% VERSION: $Id: string.m,v 1.4 2011/02/18 16:48:55 ingo Exp $ +% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +function varargout = string(varargin) + + objs = [varargin{:}]; + + pstr = '[ '; + + for ii = 1:numel(objs) + pstr = [pstr 'unit(''']; + pstr = [pstr strrep(strrep(char(objs(ii)), '[', ' '), ']', ' ')]; + pstr = [pstr ''') ']; + + end + + pstr = [pstr ']']; + + varargout{1} = pstr; +end +