


ATTACHM attach the m file being executes to the analysis object.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: ATTACHM attach the m file being executes to the analysis object.
CALL:
VERSION: $Id: attachm.m,v 1.2 2007/06/20 15:19:54 ingo Exp $
HISTORY: 31-03-07 M Hewitson
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

0001 function a = attachm(a, mfile) 0002 % ATTACHM attach the m file being executes to the analysis object. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: ATTACHM attach the m file being executes to the analysis object. 0007 % 0008 % CALL: 0009 % 0010 % VERSION: $Id: attachm.m,v 1.2 2007/06/20 15:19:54 ingo Exp $ 0011 % 0012 % HISTORY: 31-03-07 M Hewitson 0013 % Creation 0014 % 0015 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0016 0017 [pathstr,name,ext,vers] = fileparts(mfile); 0018 if isempty(ext) 0019 mfile = [mfile '.m']; 0020 end 0021 a.mfile = textread(mfile,'%s','delimiter','\n','whitespace',''); 0022 a.mfilename = mfile; 0023 0024