function addsave(fname,v1,name1,v2,name2,v3,name3)
%function addsave('fname',v1,'name1,v2,'name2',v3,'name3')
%           add up to 3 new vars to an existing file.
fname
eval(concat('load ',fname))
v1
eval(concat(name1,'=v1;'))
clear name1
if nargin>3
   eval(concat(name2,'=v2;'))
   clear name2
   if nargin>5
      eval(concat(name3,'=v3;'))
      clear name3
   end
end
eval(concat('save ',fname))
