function [F]=ss_policy(ss,RK_SS,MCP_SS,MCR_SS,G_SS,DELTA_K,ALPHA,PHI,MU_L,A_SS,AR_SS,VARPHI, GAMMA0, GAMMA1, GAMMA2,PHI2,PHI1,Z_SS_T,M_SS,OMEGAT,OMEGAY,d1,d2,RK2_SS,MCP2_SS,MCR2_SS,G2_SS,A2_SS,AR2_SS,M2_SS);
L_SS=ss(1);
LP_SS=ss(2);
LR_SS=ss(3);
Y_SS=ss(4);
YP_SS=ss(5);
YR_SS=ss(6);
PSIP_SS=ss(7);
PSIR_SS=ss(8);
K_SS=ss(9);
KP_SS=ss(10);
KR_SS=ss(11);
U_SS=ss(12);
KG_SS=ss(13);
L2_SS=ss(14);
LP2_SS=ss(15);
LR2_SS=ss(16);
Y2_SS=ss(17);
YP2_SS=ss(18);
YR2_SS=ss(19);
PSIP2_SS=ss(20);
PSIR2_SS=ss(21);
K2_SS=ss(22);
KP2_SS=ss(23);
KR2_SS=ss(24);
U2_SS=ss(25);
KG2_SS=ss(26);


F(1)=MU_L*(LP_SS^(PHI))*(Y_SS-K_SS*DELTA_K-G_SS-(PHI1*U_SS^(PHI2))*YP_SS)-(1-ALPHA)*PSIP_SS*YP_SS/LP_SS;
F(2)=MU_L*(LR_SS^(PHI))*(Y_SS-K_SS*DELTA_K-G_SS)-(1-ALPHA)*PSIR_SS*YR_SS/LR_SS;
F(3)=YP_SS-(1-GAMMA0-GAMMA1*M_SS-GAMMA2*M_SS^2)*A_SS*(KP_SS^ALPHA)*(LP_SS^(1-ALPHA));
F(4)=YR_SS-A_SS*AR_SS*(KR_SS^ALPHA)*(LR_SS^(1-ALPHA))*((1+1.2*KG_SS^1.1)/(1+KG_SS^1.1));
F(5)=Y_SS-(YP_SS^OMEGAY+YR_SS^OMEGAY)^(1/OMEGAY);
F(6)=ALPHA*PSIP_SS*YP_SS/KP_SS-RK_SS;
F(7)=ALPHA*PSIR_SS*YR_SS/KR_SS-RK_SS;
F(8)=MCP_SS-PSIP_SS-(PHI1*U_SS^(PHI2))-PHI2*(1-U_SS)*(PHI1*U_SS^(PHI2-1));
F(9)=MCR_SS-PSIR_SS;
F(10)=Z_SS_T-(1-U_SS)*VARPHI*YP_SS;
F(11)=K_SS-(1-OMEGAT)*KP_SS-OMEGAT*KR_SS;
F(12)=L_SS-(1-OMEGAT)*LP_SS-OMEGAT*LR_SS;
F(13)=KG_SS-YR_SS*MCR_SS*(d2*d1*KG_SS^(d2-1)/(1+d1*KG_SS^d2)+1/((1+KG_SS^d2)*d2*KG_SS^(d2-1)));
F(14)=MU_L*(LP2_SS^(PHI))*(Y2_SS-K2_SS*DELTA_K-G2_SS-(PHI1*U2_SS^(PHI2))*YP2_SS)-(1-ALPHA)*PSIP2_SS*YP2_SS/LP2_SS;
F(15)=MU_L*(LR2_SS^(PHI))*(Y2_SS-K2_SS*DELTA_K-G2_SS)-(1-ALPHA)*PSIR2_SS*YR2_SS/LR2_SS;
F(16)=YP2_SS-(1-GAMMA0-GAMMA1*M2_SS-GAMMA2*M2_SS^2)*A2_SS*(KP2_SS^ALPHA)*(LP2_SS^(1-ALPHA));
F(17)=YR2_SS-A2_SS*AR2_SS*(KR2_SS^ALPHA)*(LR2_SS^(1-ALPHA))*((1+1.2*KG2_SS^1.1)/(1+KG2_SS^1.1));
F(18)=Y2_SS-(YP2_SS^OMEGAY+YR2_SS^OMEGAY)^(1/OMEGAY);
F(19)=ALPHA*PSIP2_SS*YP2_SS/KP2_SS-RK2_SS;
F(20)=ALPHA*PSIR2_SS*YR2_SS/KR2_SS-RK2_SS;
F(21)=MCP2_SS-PSIP2_SS-(PHI1*U2_SS^(PHI2))-PHI2*(1-U2_SS)*(PHI1*U2_SS^(PHI2-1));
F(22)=MCR2_SS-PSIR2_SS;
F(23)=Z_SS_T-(1-U2_SS)*VARPHI*YP2_SS;
F(24)=K2_SS-(1-OMEGAT)*KP2_SS-OMEGAT*KR2_SS;
F(25)=L2_SS-(1-OMEGAT)*LP2_SS-OMEGAT*LR2_SS;
F(26)=KG2_SS-YR2_SS*MCR2_SS*(d2*d1*KG2_SS^(d2-1)/(1+d1*KG2_SS^d2)+1/((1+KG2_SS^d2)*d2*KG2_SS^(d2-1)));





