


ATTACHMDL attach an mdl file to the analysis object.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: ATTACHMDL attach an mdl file to the analysis object.
CALL: a = sltpda_attach_mdl(a)
VERSION: $Id: attachmdl.html,v 1.2 2007/07/10 05:37:08 hewitson Exp $
HISTORY: 31-03-07 M Hewitson
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

0001 function a = attachmdl(a) 0002 % ATTACHMDL attach an mdl file to the analysis object. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: ATTACHMDL attach an mdl file to the analysis object. 0007 % 0008 % CALL: a = sltpda_attach_mdl(a) 0009 % 0010 % VERSION: $Id: attachmdl.html,v 1.2 2007/07/10 05:37:08 hewitson Exp $ 0011 % 0012 % HISTORY: 31-03-07 M Hewitson 0013 % Creation 0014 % 0015 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0016 0017 mdlfile = gcs; 0018 % find(pl, 'mdlfile'); 0019 0020 [pathstr,name,ext,vers] = fileparts(mdlfile); 0021 if isempty(ext) 0022 mdlfile = [mdlfile '.mdl']; 0023 end 0024 0025 0026 mdlfilein = textread(mdlfile,'%s','delimiter','\n','whitespace',''); 0027 mdlout = ''; 0028 for j=1:length(mdlfilein) 0029 mdlout = [mdlout '\n' mdlfilein{j}]; 0030 end 0031 a.mdlfile = mdlout; 0032 a.mdlfilename = mdlfile; 0033 0034 0035 % END