%% Calculate Fi for 1997 - 2009
%
%%
function fi_step1;



for year = 1997:2009
 disp(year);
    Hproj_arr = fi_arr(year);
    fi_corr(year,Hproj_arr);
end;