resAllFinalq2New.txt

((-1/8*I)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1])/((-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1])/((-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*e[1])/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*(I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*e[1])/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (y*dot[a[1], k[2]]*dot[a[1], v[2]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*e[1]*tr[F[2], S[1]])/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[a[1], k[2]]*dot[a[1], v[2]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*e[1]*tr[F[2], S[1]])/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], F[2], v[1]]*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(8*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (dot[a[1], F[2], v[1]]*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(8*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/32)*dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2])))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2])))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2])))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2])))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/32)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2])))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((I/32)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2])))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*dot[v[1], F[2], v[2]])/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/32)*dot[a[1], F[2], v[1]]*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*dot[v[1], F[2], v[2]])/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/64)*dot[a[1], F[2], v[1]]*((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]]))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/64)*dot[a[1], F[2], v[1]]*(I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]]))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (y*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*tr[F[2], S[1]])/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + (y*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*tr[F[2], S[1]])/(64*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + (dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1]))/(32*(-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1]))/(32*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/128)*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1]))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/128)*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1]))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2*(y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2))/((-1 + y^2)^2*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2*(y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2))/((-1 + y^2)^2*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/32)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/32)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2])))/(32*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2])))/(32*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((-1 + 2*y^2)*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2)/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])) - (y*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2)))/(8*(-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])) - ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[a[1], F[2], v[1]]^2*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/(32*(-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/128)*(-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)^2*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3]))/(32*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])^2)/((-1 + y^2)^2*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((-1 + 2*y^2)*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2)/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])) + (y*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2)))/(8*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])) - ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (y*dot[a[1], F[2], v[1]]^2*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/(32*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/128)*(-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/((-1 + y^2)^2*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3]))/(32*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])^2)/((-1 + y^2)^2*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]])/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((I/16)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + (dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1])*(1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + (y*dot[a[1], F[2], v[1]]^2*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + (y*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(64*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/((-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(128*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2*(y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2)*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)^2*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/32)*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*y*dot[a[1], F[2], v[1]]^2*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/((-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(128*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)^2*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/32)*dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/((-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])^2*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)^2*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], F[2], v[1]]*(I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(64*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((I/64)*y*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(128*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])^2*(y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2)*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)^2*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(128*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + (dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)^2*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - ((I/32)*dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])^2*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])))/(32*(-1 + y^2)^2*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2) - (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (2*I)*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(8*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (2*I)*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(8*(-1 + y^2)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + (2*I)*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(8*(-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], F[2], v[1]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + (2*I)*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(32*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + (2*I)*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + (2*I)*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(8*(-1 + y^2)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*e[1]*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (y*dot[a[1], k[2]]*dot[a[1], v[2]]*((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*e[1]*tr[F[2], S[1]]*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], F[2], v[1]]*(((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(8*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/32)*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*(I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*e[1]*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[a[1], k[2]]*dot[a[1], v[2]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*e[1]*tr[F[2], S[1]]*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (dot[a[1], F[2], v[1]]*((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(8*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2]))*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((I/32)*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/((-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2))/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]])/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((I/16)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) - (dot[a[1], F[2], v[1]]^2*e[1]*(-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) - (dot[a[1], F[2], v[1]]^2*e[1]*(-1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2)*(-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(16*(-1 + y^2)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (dot[a[1], F[2], v[1]]^2*e[1]*(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (dot[a[1], F[2], v[1]]^2*e[1]*(-1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) + 2*ω^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2)*(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(16*(-1 + y^2)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]])/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - ((I/16)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*dot[v[1], F[2], S[1], v[2]])/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[a[1], a[1]]*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2)/(16*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((I/32)*dot[a[1], a[1]]*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]^2 + dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2*w[1]^2 + 2*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*w[2] + dot[a[1], F[2], v[1]]^2*w[2]^2)*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(dot[a[1], F[2], v[1]]*dot[k[2], S[1], F[2], v[1]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((-1 + 2*y^2)*tr[F[2], S[1]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((I/32)*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + (y*dot[v[1], F[2], S[1], v[2]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((dot[a[1], k[2]]*(dot[a[1], F[2], v[1]] + 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]) + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*(2*y*w[1] - w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*(dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + dot[a[1], a[1]]*w[1]*(dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + dot[a[1], k[2]]*(2*y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*y*dot[a[1], v[2]]*tr[F[2], S[1]]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (y*(dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(y*w[1] - w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*(y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2)*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/16)*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/16)*y*dot[a[1], F[2], v[1]]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*dot[a[1], F[2], v[1]]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (dot[v[1], F[2], v[2]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (y*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(8*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[2]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*w[2]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + ((dot[a[1], F[2], v[1]]^2 + 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]] + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2)*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (y*(dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*dot[a[1], F[2], v[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/32)*y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2)/(8*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*dot[v[1], F[2], v[2]]*dot[k[2], S[1], F[2], v[1]]*w[2])/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*dot[v[1], F[2], v[2]]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(4*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[k[2], S[1], F[2], v[1]]*w[2])*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - ((-1 + 2*y^2)*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*dot[k[2], S[1], v[2]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]])/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - ((I/16)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2]))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*dot[v[1], F[2], S[1], v[2]])/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[a[1], a[1]]*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2)/(16*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((I/32)*dot[a[1], a[1]]*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]^2 + dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2*w[1]^2 + 2*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*w[2] + dot[a[1], F[2], v[1]]^2*w[2]^2)*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(dot[a[1], F[2], v[1]]*dot[k[2], S[1], F[2], v[1]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((-1 + 2*y^2)*tr[F[2], S[1]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(64*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((I/32)*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) - (y*dot[v[1], F[2], S[1], v[2]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((dot[a[1], k[2]]*(dot[a[1], F[2], v[1]] + 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]) + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*(2*y*w[1] - w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*(dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + dot[a[1], a[1]]*w[1]*(dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + dot[a[1], k[2]]*(2*y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*y*dot[a[1], v[2]]*tr[F[2], S[1]]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (y*(dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(y*w[1] - w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*(y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2)*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/16)*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/16)*y*dot[a[1], F[2], v[1]]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*dot[a[1], F[2], v[1]]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[v[1], F[2], v[2]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]))/(8*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[2]*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (y*w[2]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + ((dot[a[1], F[2], v[1]]^2 + 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]] + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2)*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (y*(dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*dot[a[1], F[2], v[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/32)*y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2)/(8*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*dot[v[1], F[2], v[2]]*dot[k[2], S[1], F[2], v[1]]*w[2])/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*dot[v[1], F[2], v[2]]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(4*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(dot[k[2], S[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[k[2], S[1], F[2], v[1]]*w[2])*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2)))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - ((-1 + 2*y^2)*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (y*dot[k[2], S[1], v[2]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))^2)/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (y*dot[v[1], F[2], v[2]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 - dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) - dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) + (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 - dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) - dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))))/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (y*dot[v[1], F[2], v[2]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 + dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) + dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))))/(8*w[1]^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) - u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 + dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) + dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))))/(8*w[1]*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))) - (dot[a[1], a[1]]*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2)/(16*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((I/32)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(dot[a[1], F[2], v[1]]*dot[k[2], S[1], F[2], v[1]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((-1 + 2*y^2)*tr[F[2], S[1]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - ((I/32)*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - ((I/32)*y*dot[a[1], v[2]]*tr[F[2], S[1]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((dot[a[1], k[2]]*(dot[a[1], F[2], v[1]] + 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]) + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*(2*y*w[1] - w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (y*(dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(y*w[1] - w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))^2)/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((I/16)*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((I/16)*y*dot[a[1], F[2], v[1]]*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((I/32)*dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - I*(-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - I*(-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*((dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])))/w[1] - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[2])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]^2 + dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2*w[1]^2 + 2*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*w[2] + dot[a[1], F[2], v[1]]^2*w[2]^2)*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (tr[F[2], S[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] - (dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*w[1])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (dot[a[1], a[1]]*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((2*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(-(y*dot[a[1], k[2]]) + dot[a[1], v[2]]*w[1]) + dot[a[1], F[2], v[1]]*(2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*(w[1] - 2*y*w[2])))*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + dot[a[1], a[1]]*w[1]*(dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + dot[a[1], k[2]]*(2*y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2)*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))^2*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((dot[a[1], F[2], v[1]]^2 + 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]] + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2)*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (y*(dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - I*(-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (y*dot[a[1], F[2], v[1]]^2*((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - I*(-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2])*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - ((-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(128*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*(((-I)*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (I*y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - I*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))^2)/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], F[2], v[1]]^2*((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(1 + (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) - (u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-((1 - dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) - dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])) + ((-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*((dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])))/w[1] - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[2])*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(128*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/128)*(2*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(-(y*dot[a[1], k[2]]) + dot[a[1], v[2]]*w[1]) + dot[a[1], F[2], v[1]]*(2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*(w[1] - 2*y*w[2])))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (tr[F[2], S[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] - (dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*w[1])*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(128*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/128)*tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1])*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/32)*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1])*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*(((-I)*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) - (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/64)*dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/128)*(-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (y*dot[a[1], F[2], v[1]]^2*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], F[2], v[1]]^2*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 - dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) - dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (dot[a[1], F[2], v[1]]*(-4*dot[a[1], k[2]]*dot[a[1], v[2]]^2 + dot[a[1], a[1]]*(dot[a[1], k[2]] + 2*dot[a[1], v[2]]*w[2]))*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2]))*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]^2 - (dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*(dot[a[1], F[2], v[1]] - 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]))/4)*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-w[1] + y*w[2]))/(-1 + y^2)) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(8*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) + ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + (e[1]*(dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])) - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[1]*w[2])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/32)*e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - ((I/32)*dot[a[1], k[2]]*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) + (y*dot[a[1], k[2]]*dot[a[1], v[2]]*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + (dot[a[1], F[2], v[1]]*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(8*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*e[1]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-w[1] + y*w[2]))/(-1 + y^2)) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/32)*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*e[1]*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) - (dot[a[1], F[2], v[1]]^2*e[1]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 - dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) - dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], a[1]]*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]^2)/(16*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((I/32)*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(dot[a[1], F[2], v[1]]*dot[k[2], S[1], F[2], v[1]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((-1 + 2*y^2)*tr[F[2], S[1]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(64*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - ((I/32)*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + ((I/32)*y*dot[a[1], v[2]]*tr[F[2], S[1]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((dot[a[1], k[2]]*(dot[a[1], F[2], v[1]] + 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]) + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*(2*y*w[1] - w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (y*(dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(y*w[1] - w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))^2)/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((I/16)*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((I/16)*y*dot[a[1], F[2], v[1]]*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((I/32)*dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*((dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])))/w[1] - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[2])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]]^2 + dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2*w[1]^2 + 2*dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*w[2] + dot[a[1], F[2], v[1]]^2*w[2]^2)*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(64*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (tr[F[2], S[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] - (dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*w[1])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((y*dot[a[1], k[2]]^2*dot[v[1], F[2], v[2]] + dot[a[1], k[2]]*(2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + w[1]*(y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + ((2*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(-(y*dot[a[1], k[2]]) + dot[a[1], v[2]]*w[1]) + dot[a[1], F[2], v[1]]*(2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*(w[1] - 2*y*w[2])))*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + ((dot[a[1], k[2]]^2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + dot[a[1], a[1]]*w[1]*(dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2]) + dot[a[1], k[2]]*(2*y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2]))*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(128*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - ((y*dot[a[1], k[2]]^2*dot[a[1], v[2]] + dot[a[1], k[2]]*((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1] + y*dot[a[1], a[1]]*dot[a[1], v[2]]*w[1]^2)*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))^2*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/(64*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (y*(dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (y*dot[a[1], F[2], v[1]]^2*((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(1 - (2*I)*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*w[1] + y*dot[a[1], F[2], v[1]]*w[2])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[a[1], v[2]]*dot[v[1], F[2], v[2]] + y*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]*w[1] + dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*w[2])*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - ((-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(128*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (dot[a[1], F[2], v[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] + ((-1 + y^2)*dot[a[1], a[1]] + dot[a[1], v[2]]^2)*w[1])*((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2) + (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*((I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (I*y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + I*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + 2*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - (y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*w[2])/(-1 + y^2) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))^2)/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((dot[a[1], F[2], v[1]]^2 + 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]] + 2*dot[a[1], a[1]]*dot[v[1], F[2], v[2]]^2)*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(32*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (dot[a[1], F[2], v[1]]^2*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2)) + (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + I*(-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] + (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) - (u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 + dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) + dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])) + ((((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2)))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (y*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*((dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])))/w[1] - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[2])*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(128*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/128)*(2*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*(-(y*dot[a[1], k[2]]) + dot[a[1], v[2]]*w[1]) + dot[a[1], F[2], v[1]]*(2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*(w[1] - 2*y*w[2])))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (tr[F[2], S[1]]*(2*y*dot[a[1], k[2]]*dot[a[1], v[2]] - (dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*w[1])*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(128*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/128)*tr[F[2], S[1]]*((-1 + 2*y^2)*dot[a[1], k[2]] + 2*y*dot[a[1], v[2]]*w[1])*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/32)*dot[a[1], F[2], v[1]]*dot[v[1], F[2], v[2]]*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (dot[a[1], F[2], v[1]]*(y*dot[a[1], k[2]] + dot[a[1], v[2]]*w[1])*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/64)*dot[a[1], F[2], v[1]]*(((-I)*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) - (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*((I*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-w[1] + y*w[2]))/(-1 + y^2)) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (y*dot[a[1], F[2], v[1]]^2*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-w[1] + y*w[2]))/(-1 + y^2)) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/128)*(-1 + 2*y^2)*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + (dot[a[1], F[2], v[1]]^2*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 + dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) + dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(64*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) - (dot[a[1], F[2], v[1]]*(-4*dot[a[1], k[2]]*dot[a[1], v[2]]^2 + dot[a[1], a[1]]*(dot[a[1], k[2]] + 2*dot[a[1], v[2]]*w[2]))*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(32*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2]))*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]^2 - (dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*(dot[a[1], F[2], v[1]] - 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]))/4)*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-w[1] + y*w[2]))/(-1 + y^2)) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(8*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) + ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (e[1]*(dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])) - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[1]*w[2])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/32)*e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])) + ((I/32)*dot[a[1], k[2]]*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) - (y*dot[a[1], k[2]]*dot[a[1], v[2]]*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - (dot[a[1], F[2], v[1]]*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(8*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + ((I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*e[1]*(((-I)*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) - (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/32)*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) - ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*e[1]*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])/(-1 + y^2))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3) + (dot[a[1], F[2], v[1]]^2*e[1]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) + (Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))/(-1 + y^2) - (u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 + dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) + dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])))*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^3*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3) + ((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^3))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[-(u^2*(-1 + y^2)) - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)]*(-(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2)])^2) + (dot[a[1], a[1]]*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(I + 2*ω*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - I*((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) - (y^2*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))/(-1 + y^2) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))] - (2*I)*ω*(-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])))/(32*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*((I*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-I - (2*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(2*ω + (I*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2))/((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - ((2*I)*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2))))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - (dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(1 - ((2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*((2*I)*ω - ((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)/((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2))))/(16*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (e[1]*(dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])) - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[1]*w[2])*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]*(-4*dot[a[1], k[2]]*dot[a[1], v[2]]^2 + dot[a[1], a[1]]*(dot[a[1], k[2]] + 2*dot[a[1], v[2]]*w[2]))*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(32*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) + (y*dot[a[1], k[2]]*dot[a[1], v[2]]*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(8*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*e[1]*((I*y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) + (I*(-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] - I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-w[1] + y*w[2]))/(-1 + y^2)) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]^2 - (dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*(dot[a[1], F[2], v[1]] - 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]))/4)*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(8*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - (dot[a[1], F[2], v[1]]^2*e[1]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) - (u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))*(-((1 - dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) - dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])) + ((-(((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2)) + (1 - y^2)*(1 - dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 + (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((I/32)*dot[a[1], k[2]]*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2]))*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*(-((y*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 - dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) + dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) - (((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]] + (1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - ((I/32)*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) + ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*e[1]*(-((-1 + y^2)*(I*(1 - dot[at[1], b[0]])*dot[b[0], St[1], v[2]] - (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((-I)*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 - dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + ((-((1 - y^2)*(1 - dot[at[1], b[0]])*w[0]) - (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(-((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]))) - (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + 2*ω^2*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-((1 - dot[at[1], b[0]])*dot[at[1], b[0]]) + dot[at[1], v[0]]^2/(-1 + y^2))*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2) + 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])) + (((1 - y^2)*(1 - dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2) + ((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 - dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) + 2*u*(-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3]) - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])^2/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (-(dot[at[1], v[0]]*w[0]) + (-1 + y^2)*(1 - dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - (e[1]*tr[F[2], S[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(((-I)*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(I - (2*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(2*ω - (I*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2))/((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + ((2*I)*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2))))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - (dot[a[1], F[2], v[1]]*(-2*y*dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*(w[1] - 2*y*w[2]))*(-(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(1 + ((2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*((-2*I)*ω - ((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)/((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + (2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]))/((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2))))/(16*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - ((I/32)*dot[a[1], k[2]]*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - ((I/32)*dot[a[1], F[2], v[1]]*(4*y*dot[a[1], k[2]]*dot[a[1], v[2]] + dot[a[1], a[1]]*(w[1] - 2*y*w[2]))*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - ((I/8)*dot[a[1], k[2]]*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) + ((I/32)*(dot[a[1], a[1]] - 2*dot[a[1], v[2]]^2)*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/((-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) + ((I/16)*y*dot[a[1], F[2], v[1]]*(2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]] + dot[a[1], a[1]]*dot[v[1], F[2], v[2]])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((I/8)*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]^2*e[1]*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(-((-1 + y^2)*(1 + dot[at[1], b[0]])^2) - dot[at[1], v[0]]^2 + (2*I)*ω*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) - (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - (e[1]*(dot[a[1], k[2]]*(-2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]*tr[F[2], S[1]]*w[1] + dot[a[1], F[2], v[1]]*(-2*dot[k[2], S[1], F[2], v[1]] + tr[F[2], S[1]]*w[1])) - 2*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*tr[F[2], S[1]]*w[1]*w[2])*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(32*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]*(-4*dot[a[1], k[2]]*dot[a[1], v[2]]^2 + dot[a[1], a[1]]*(dot[a[1], k[2]] + 2*dot[a[1], v[2]]*w[2]))*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(32*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) - (y*dot[a[1], k[2]]*dot[a[1], v[2]]*e[1]*tr[F[2], S[1]]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], v[2]]*w[1])/(-1 + y^2)) - (-((-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], F[2], v[1]]) - dot[at[1], v[0]]*dot[v[0], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((-((1 - y^2)*dot[at[1], v[0]]*dot[b[0], F[2], v[1]]) + (1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], F[2], v[1]]*e[1]*(dot[a[1], k[2]]*dot[v[1], F[2], v[2]] + dot[a[1], F[2], v[1]]*w[2])*(-((-1 + y^2)*(I*(1 + dot[at[1], b[0]])*dot[b[0], St[1], v[2]] + (I*dot[at[1], v[0]]*dot[v[0], St[1], v[2]])/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], v[2]])/(-1 + y^2) - (I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], v[2]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(8*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) - (dot[a[1], k[2]]*dot[a[1], F[2], v[1]]*e[1]*(((-I)*y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*dot[v[1], F[2], St[1], v[2]]*w[1])/(-1 + y^2) - (I*(-1 + y^2)*(1 + dot[at[1], b[0]])*dot[b[0], St[1], F[2], v[1]] + I*dot[at[1], v[0]]*dot[v[0], St[1], F[2], v[1]])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) - ((I*(1 - y^2)*dot[at[1], v[0]]*dot[b[0], St[1], F[2], v[1]] - I*(1 - y^2)*(1 + dot[at[1], b[0]])*dot[v[0], St[1], F[2], v[1]])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + ((dot[a[1], v[2]]^2*dot[a[1], F[2], v[1]]^2 - (dot[a[1], a[1]]*dot[a[1], F[2], v[1]]*(dot[a[1], F[2], v[1]] - 2*dot[a[1], v[2]]*dot[v[1], F[2], v[2]]))/4)*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(8*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^3) + (y*dot[a[1], v[2]]*dot[a[1], F[2], v[1]]*e[1]*tr[F[2], S[1]]*(-((((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(w[1] - y*w[2]))/(-1 + y^2)) + (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + ((-((1 - y^2)*(1 + dot[at[1], b[0]])*w[0]) + (1 - y^2)*dot[at[1], v[0]]*w[3])*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2) + (dot[a[1], F[2], v[1]]^2*e[1]*(-((y*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*((I*dot[v[0], St[1], v[2]]*w[0])/(-1 + y^2) + I*dot[b[0], St[1], v[2]]*w[3]))/(-1 + y^2)) - (u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))*(-((1 + dot[at[1], b[0]])*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2]))) + dot[at[1], v[0]]*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3])) + ((((1 - y^2)*dot[at[1], v[0]]*(I*dot[b[0], St[1], v[0]]*w[0] - I*dot[b[0], St[1], v[2]]*(y*w[1] - w[2])))/(-1 + y^2) + (1 - y^2)*(1 + dot[at[1], b[0]])*(((-I)*dot[v[0], St[1], v[2]]*(-(y*w[1]) + w[2]))/(-1 + y^2) + I*dot[b[0], St[1], v[0]]*w[3]))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])/(-1 + y^2))*(((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2 + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2 + (2*I)*ω*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])) + (-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2*(((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)^2 - (2*I)*ω*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*(-((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))) - (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]) - 2*ω^2*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)))/(16*((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^3*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))]*((-1 + y^2)*(-(dot[at[1], b[0]]*(1 + dot[at[1], b[0]])) - dot[at[1], v[0]]^2/(-1 + y^2))*(u - 2*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2)) + (-(((1 - y^2)*dot[at[1], b[0]]*dot[at[1], v[0]])/(-1 + y^2)) + ((1 - y^2)*(1 + dot[at[1], b[0]])*dot[at[1], v[0]])/(-1 + y^2))*Sqrt[u^2 - u^2*y^2 - (((-1 + y^2)*(1 + dot[at[1], b[0]])^2 + dot[at[1], v[0]]^2)*w[1]^2)/(-1 + y^2) - 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])^2 + 2*u*(dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3]) - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])^2/(-1 + y^2) + 4*(-1 + y^2)*(-((dot[at[1], v[0]]*w[0])/(-1 + y^2)) - dot[at[1], b[0]]*w[3])*(u - (dot[at[1], v[0]]*w[0] + (-1 + y^2)*(1 + dot[at[1], b[0]])*w[3])/(-1 + y^2))])^2)