%
%  Name:   loadmat
%
%  Usage:  loadmat
%
%  Loads the  model matrices for the model correlation tasks
%
%  The following variable must be defined prior to calling
%   this script:
%  
%   damsuf = '_u' or '_d' to define whether the matrices
%            should be placed in the undamaged or damaged
% 	     model sets
%

%  Version SWD970114
%
%  Author(s): Scott W. Doebling, doebling@lanl.gov
%
%  Institution: Los Alamos National Laboratory,
%               ESA-EA
%
%  Copyright (c) 1997, The Regents of the University
%       of California. (See top level of code for
%       full copyright statement.)


eval(['load ',[pathname,filename]]);

if exist('filename') == 1,

   eval([' filename_mat',damsuf,' = filename;'])

   clear filename

end


if exist('M')==1,

  eval([' M',damsuf,' = M;'])
  
  clear M

end

if exist('K') == 1,

      eval([' K',damsuf,' = K;'])
      clear K

end

if exist('matrixDOF')

  eval([' matrixDOF',damsuf,' = matrixDOF;'])
   clear matrixDOF

end

