function test(flag)


[fid,message] = fopen('temp.dat','r');
keyboard
year = fscanf(fid,'%d',1);
keyboard
bob = feof(fid);

keyboard