function n=readnumber(fid)

s=readstring(fid);
n=sscanf(s,'%d');
