D[D[x*(cos(theta)/cos(x+theta)-1),x]]/.x->0