%
% ex7 is a matlab file that solves for 
% the 'steady-state' for a rbc model
% using the ex7F.m file 
%

% ----- save output to file ----- %

clear all
diary ex7.mout
diary off
delete ex7.mout
diary ex7.mout

% ----- display date and time of computation ----- %

%format long
date
time0 = clock;

% ----- define the parameters ----- %

psi      = .7/.3;
alpha    = 0.40;
delta    = 0.025;
beta     = 0.98;
thetabar = 1.0;

% ----- dfine fsolve options ----- %

options = optimset('Display','iter','MaxIter',15000,'MaxFunEvals',15000);

% ----- solve for steady states ----- %

x = fsolve(@ex7F,[.03 0.33 0.5],options,psi,alpha,delta,beta,thetabar)

% ----- exit ----- %

comptime = etime(clock, time0)
diary off