lagrule = 1;%1;
pl_periods = 300;
% Macro varibales Eq-Transition
G_Y_1       = 100*oo_.endo_simul((strmatch('dgdp_a_t',M_.endo_names,'exact')),lagrule:pl_periods)';
G_C_1       = 100*oo_.endo_simul((strmatch('c_a_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_Pi_1      = 100*oo_.endo_simul((strmatch('pi_a_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_B_1       = 100*oo_.endo_simul((strmatch('BG_a_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_R_1       = 100*oo_.endo_simul((strmatch('i_EMU_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_In_1      = 100*oo_.endo_simul((strmatch('in_a_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_U_1       = 100*oo_.endo_simul((strmatch('ur_a_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_W_1       = 100*oo_.endo_simul((strmatch('wr_a_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
G_RER_1     = 100*oo_.endo_simul((strmatch('rer_ba_obs',M_.endo_names,'exact')),lagrule:pl_periods)';

Eu_Y_1      = 100*oo_.endo_simul((strmatch('dgdp_b_t',M_.endo_names,'exact')),lagrule:pl_periods)';
Eu_C_1      = 100*oo_.endo_simul((strmatch('c_b_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
Eu_Pi_1     = 100*oo_.endo_simul((strmatch('pi_b_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
Eu_B_1      = 100*oo_.endo_simul((strmatch('BG_b_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
Eu_In_1     = 100*oo_.endo_simul((strmatch('in_b_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
Eu_U_1      = 100*oo_.endo_simul((strmatch('ur_b_obs',M_.endo_names,'exact')),lagrule:pl_periods)';
Eu_W_1      = 100*oo_.endo_simul((strmatch('wr_b_obs',M_.endo_names,'exact')),lagrule:pl_periods)';

%Fiscal variables Eq-Transition
G_tauw_1    = (oo_.endo_simul((strmatch('tauw_a_t',M_.endo_names,'exact')),lagrule:20)'-tauw_a)*100;
G_tausc_1   = (oo_.endo_simul((strmatch('tausc_a_t',M_.endo_names,'exact')),lagrule:20)'-tausc_a)*100;
G_tauk_1    = (oo_.endo_simul((strmatch('tauk_a_t',M_.endo_names,'exact')),lagrule:20)'-tauk_a)*100;
G_tauc_1    = (oo_.endo_simul((strmatch('tauc_a_t',M_.endo_names,'exact')),lagrule:20)'-tauc_a)*100;
G_T_1       = (oo_.endo_simul((strmatch('T_a_t',M_.endo_names,'exact')),lagrule:20)'-T_a_ts)/T_a_ts*100;

Eu_tauw_1   = (oo_.endo_simul((strmatch('tauw_b_t',M_.endo_names,'exact')),lagrule:20)'-tauw_b)*100;
Eu_tausc_1  = (oo_.endo_simul((strmatch('tausc_b_t',M_.endo_names,'exact')),lagrule:20)'-tausc_b)*100;
Eu_tauk_1   = (oo_.endo_simul((strmatch('tauk_b_t',M_.endo_names,'exact')),lagrule:20)'-tauk_b)*100;
Eu_tauc_1   = (oo_.endo_simul((strmatch('tauc_b_t',M_.endo_names,'exact')),lagrule:20)'-tauc_b)*100;
Eu_T_1      = (oo_.endo_simul((strmatch('T_b_t',M_.endo_names,'exact')),lagrule:20)'-T_b_ts)/T_b_ts*100;

G_cG_1      = (oo_.endo_simul((strmatch('cG_a_t',M_.endo_names,'exact')),lagrule:20)'-cG_a_ts)/cG_a_ts*100;
G_inG_1     = (oo_.endo_simul((strmatch('inG_a_t',M_.endo_names,'exact')),lagrule:20)'-inG_a_ts)/inG_a_ts*100;
G_N_1       = (oo_.endo_simul((strmatch('nG_a_t',M_.endo_names,'exact')),lagrule:20)'-nG_a_ts)*100;
G_TR_r_1    = (oo_.endo_simul((strmatch('TR_r_a_t',M_.endo_names,'exact')),lagrule:20)'-TR_r_a_ts)/TR_r_a_ts*100;
G_TR_o_1    = (oo_.endo_simul((strmatch('TR_o_a_t',M_.endo_names,'exact')),lagrule:20)'-TR_o_a_ts)/TR_o_a_ts*100;
G_TR_1      = (oo_.endo_simul((strmatch('TR_a_t',M_.endo_names,'exact')),lagrule:20)'-TR_a_ts)/TR_a_ts*100;

Eu_cG_1     = (oo_.endo_simul((strmatch('cG_b_t',M_.endo_names,'exact')),lagrule:20)'-cG_b_ts)/cG_b_ts*100;
Eu_inG_1    = (oo_.endo_simul((strmatch('inG_b_t',M_.endo_names,'exact')),lagrule:20)'-inG_b_ts)/inG_b_ts*100;
Eu_N_1      = (oo_.endo_simul((strmatch('nG_b_t',M_.endo_names,'exact')),lagrule:20)'-nG_b_ts)*100;
Eu_TR_r_1   = (oo_.endo_simul((strmatch('TR_r_b_t',M_.endo_names,'exact')),lagrule:20)'-TR_r_b_ts)/TR_r_b_ts*100;
Eu_TR_o_1   = (oo_.endo_simul((strmatch('TR_o_b_t',M_.endo_names,'exact')),lagrule:20)'-TR_o_b_ts)/TR_o_b_ts*100;
Eu_TR_1     = (oo_.endo_simul((strmatch('TR_b_t',M_.endo_names,'exact')),lagrule:20)'-TR_b_ts)/TR_b_ts*100;

save TransEq G_Y_1 G_C_1 G_Pi_1 G_B_1 G_R_1 G_In_1 G_U_1 G_W_1 G_RER_1 Eu_Y_1 Eu_C_1 Eu_Pi_1 Eu_B_1 Eu_In_1 Eu_U_1 Eu_W_1 G_tauw_1 G_tausc_1 G_tauk_1 G_tauc_1 G_T_1 Eu_tauw_1 Eu_tausc_1 Eu_tauk_1 Eu_tauc_1 Eu_T_1 G_cG_1 G_inG_1 G_N_1 G_TR_r_1 G_TR_o_1 G_TR_1 Eu_cG_1 Eu_inG_1 Eu_N_1 Eu_TR_r_1 Eu_TR_o_1 Eu_TR_1 
