function prcLwn2Seabass(filepath)
% prcLwn2Seabass - Converts all *.LWN files in a directory to seabass format
%
% Use as: prcLwn2Seabass(filepath)

f = getfname(fullfile(filepath, '*.lwn'));
if isempty(f)
   warning(['NO LWN files found in ' filepath])
   return
end

for i = 1:size(f, 1)
   try 
      filename = fullfile(filepath, deblank(f(i, :)));
      simbiosLwnFormat(filename);
      fprintf(1, 'Processed %s\n', filename)
   catch
      fprintf(1, 'Unable to process %s\n', filename)
   end
   
end

   