export_to_file(diagr,dest)
function export_to_file(diagr,dest) //Load findfile library //getf(MODNUM+'/macros/util/find_file.sci'); //find directory path of dname+'.cos' file path_dname=return_path_cos_file(diagr); if path_dname==[] then disp('Unable to find '+dname+'.cos'); return; end //load scicos diagram load(path_dname+dname+'.cos'); endfunction