end
end
m.fr.FinReq(:,:,p)=totalFR1(:,:,1); %distribution of simulated financial requirements by year
switch s.frFeedback
    case 'yes'
        m.fr.Expenses(1,:,p)=mean(totalFR1(:,:,3),1);   %distribution of realized expense by year
        m.fr.Revenues(1,:,p)=mean(totalFR1(:,:,4),1);   %distribution of realized revenue by year

        m.bar.base.mean(1,:,p) = mean(m.fr.FinReq(:,:,p));  %average financial requirement by year  
        m.bar.base.std(1,:,p)  = std(m.fr.FinReq(:,:,p));   %standard deviati