%Calibration and steady-state code for RBC model

%Author: Abdumavlonov and Fang


function outc = modifiedrbc_calibration(inc)

% Function that contains the equations for the steady state

global beta delta alpha zss eta gamma gbar;

n = inc(1);
k = inc(2);
y = inc(3);
c = inc(4);



outc(1) = -gamma*(n)^(1/eta)+(1/c)*zss*(1-alpha)*(k/n)^(alpha);
outc(2) = -1 + beta*((1 - delta)+zss*alpha*(n/k)^(1-alpha));
outc(3) = -y+zss*n^(1-alpha)*k^(alpha);
outc(4) =c+k*delta+gbar-y;

end

%addpath /Applications/Dynare/4.6.2/matlab
%dynare rbc.mod


