%Parametros calibrados para Honduras%
beta=0.89;
delta=0.025;
phi=0.47;
sigma=2;
zeta=0.5;
theta=1;
xi=0.5;
varphi=0.30;
vartheta_y=10000;
g=0.1735;
euler=2.718281;

%% estado estacionario%%
y_ss=1;
pi_ss=1;
s_ss=1;
v_ss=1;
r_ss=(1/beta)-(1-delta);
g_ss=g;
k_ss=(phi*((vartheta_y-1)/vartheta_y))*(y_ss/r_ss);
q_ss=k_ss*delta;
n_ss=(y_ss/((s_ss)*(k_ss^phi)))^(1/(1-phi));
c_ss=y_ss-q_ss-g_ss;
w_ss=(theta*((1-n_ss)^(-zeta))*(c_ss^(sigma)))/(euler^(v_ss));
i_ss=((r_ss+(1-delta))*(1+pi_ss))-1;
m_ss=((xi*(c_ss^sigma)*(1+i_ss))/((euler^(v_ss))*i_ss))^(1/varphi);

%Parametros que no afectan el estado estacionario%
rho_s=0.7;
rho_g=0.7;
rho_v=0.7;
lambda_r=0.7;
lambda_pi=1.5;
lambda_y=0.5;
y=1;
save parEX beta delta phi sigma zeta theta xi varphi vartheta_y g euler y_ss pi_ss s_ss v_ss r_ss g_ss k_ss q_ss n_ss c_ss w_ss i_ss m_ss rho_s rho_g rho_v lambda_r lambda_pi lambda_y y