util1_jan/private/file_name.m

   1 function id=file_id(name,num1,num2)
   2 % id=file_id(name,num1,num2)
   3 % create part of filename of the form _nnnnn_nnnnn
   4 % Jan Mandel 22-apr-05
   5
   6 if num1>=0 & num2>=0,
   7         id=sprintf('%s_%08i_%05i',name,num1,num2);
   8 elseif num1>=0 & num2<0,
   9         id=sprintf('%s_%08i',name,num1);
  10 elseif num1<0 & num2>=0,
  11         id=sprintf('%s_%08i',name,num2);
  12 elseif num1<0 & num2<0,
  13         id=name;
  14 end