A:=Matrix([[1,l_0*epsilon*(1-tauh)^(epsilon-1)*w^(epsilon),0,0,0,0],[tauh*w,w*lh,-Qh,0,0,0],[0,-epsilon*(1-(tauh*epsilon)/(1-tauh))^(-2)*Qh*(1-tauh)^(-2),(1/beta)*qh^((1-beta)/(beta))*alpha^(-1/beta),0,(1-taul)^(-2)*epsilon*(p/(1-p))*(Qh-Ql)*(1-(taul/(1-taul))*epsilon)^(-2),0],[0,0,0,1,l_0*epsilon*(1-taul)^(epsilon-1)*w^(epsilon),0],[0,0,-(Qh-Ql),taul*w,w*ll,-Ql],[0,0,0,0,-epsilon*(1-(taul/(1-taul))*epsilon)^(-2)*Ql*(1-taul)^(-2),(1/beta)*ql^((1-beta)/(beta))*alpha^(-1/beta)]]):