functionsave_variable (var, format, filename)% function save_variable (var, format, filename)%% Saves a variable var to filename using format,% e.g., save_variable (x, '%d', 'input.dat');[fid,message]=fopen(filename,'w');iffid==-1disp('File error. Message returned was:')disp(message)returnendfprintf(fid,[format,'\n'],var);fclose(fid);return;